% Librarian I01-42+N+7P7 YYY  44(h@ACCDEF& ACCESSDEF4ACEDEF4nACLDEFBlACLEDIT$ROUTINESHpACMEDEF ACMEMSGDEF: ACMEVMSDEFGACRDEFsAFRDEFAGNDEFRALPHADEF7ARGDEF?ARMDEFQ:ATRDEFw^BASDEF2BREAKDEFfBRKDEFCAPDEFCBODEFCHFDEF0. CHKPNTDEF6xCHPDEFOCIADEF{: CLI$ROUTINESCLIDEF CLIMSGDEFD CLISERVDEF6 CLIVERBDEF+CLSDEFYP CLUEVTDEF]CMA$DEF FAB FAR_POINTERSXAB]+ r FDL$ROUTINES: FDLDEFC  FDLMSGDEFU FDSCDEFl $FIBDEF FIDDEF (FLTDEF FMLDEF FORDEF6 FSCNDEFA >GEN64DEFJ  GETSPIDEF 0GLOCKDEFGPSDEF+GSDEF5GSYDEF@HLPDEFRHWDEFV0 IA64REGDEF`NIACDEFwICCDEFTIDCDEFIEEEDEFILEDEF INDICTDEF INITDEF6IODEFIOSADEFbIOSBDEFISSDEF JBCMSGDEF+JPIDEFcJPIFDEFnjKGBDEF.LADEF$LBER CLI$ROUTINESCVTMSGEGSYDEF FAR_POINTERS INDICTDEF LBERLNKDEF MTDEF PCCDEF PTDDEF" SECSRVDEFP& STR$ROUTINESQ0 UTCBLKDEF2XWDEFDEFFCLIDEF CLIMSGDEFD CLISERVDEF6 CLIVERBDEF+CLSDEFYP CLUEVTDEF3CMA]CMA$DEF 4 CMA_CONFIG<4 CMA_LIBRARYE4CMA_TISCMBDEFCOBDEF CONV$ROUTINESCONVDEF- CONVMSGDEF@CPUIDEFHFCQUALDEFg CRDEFnCREDEF{CRFDEFCRFMSGCSHDEFCSTDEFp CVT$ROUTINESCVTDEFH CVTFNMDEFCVTMSGDEF{ DELPRCSYMDEFDDEVDEFDIBDEF FAB FAR_POINTERShDCDEF<` DCX$ROUTINESSDDDTMDEFlj DDTMMSGDEF{ DELPRCSYMDEFDDEVDEFDIBDEF DIRENTDEFXDMTDEFDPSDEFDSCDEFVzDSTDEF_VDTIDEFs DTK$ROUTINESDTKDEFDTKMSGDVIDEF0 DVSDEF5 $ EDT$ROUTINES< EEOMDEFG |EFNDEFK EGPSDEFk EGSDEFs REGSTDEF~ 6EGSYDEF EIDCDEF ELFDATYP ELFDEFo &EMHDEFw ENVDEF  EOBJRECDEF EOMDEF FAB FAR_POINTERSq EIDCDEF ELFDATYP ELFDEFo &EMHDEFw ENVDEF  EOBJRECDEF EOMDEF EOMWDEF EPMDEF BEPMMDEF EPMVDEF "EPMWDEF ERADEF lESDFDEF ESDFMDEF ESDFVDEF VESFDEF vESGPSDEF jESRFDEF ETIRDEF EVENTDEF]4 EXC_HANDLING FAB FABDEF FALDEF FAR_POINTERS^~ LBR$ROUTINESB LBRCTLTBLLLBRDEF LCKDEFLDAPLDDEFxLEPMDEFLGIDEF LHIDEF LIB$ROUTINES LIBCLIDEF LIBDCFDEFLIBDEFALIBDTDEFSL LIBFILDEFY LIBFISDEF_LIBICBLIBVMDEF~ LIBWAITDEF LICENSEDEF@LKIDEF8,LKSBDEFDXLMFDEFKVLNKDEFTLNMDEFd LOGTYPDEFz NAMz PAL_BUILTINS PAL_SERVICEShRAB.RMSBSTARLET_BIGPAGE& SYS_PAL_QINSTXAB INITDEF6IODEFIOSADEFbIOSBDEFISSDEF JBCMSGDEF+JPIDEFcJPIFDEFnjKGBDEF.LADEFLATDEFt LATMSGDEF$LBERaTLNMDEFd LOGTYPDEFq*LPDEFLPRODEFLSDFDEFVLSRFDEFLSYDEFMACIDDEF MAIL$ROUTINESjMAILDEF! MAILMSGDEFS MAPPINGDEFhXMHDDEFwMHDEFMMEDEF MMEMSGDEFVMMIDEFMNTDEFdMOUNDEFDMSGDEF[ MSGHLPDEFbMT2DEFo4MT3DEF~ MTADEF<MTDEFX MTH$ROUTINESz NAMz PAL_BUILTINS PAL_SERVICEShRAB.RMSBSTARLET_BIGPAGE& SYS_PAL_QINSTXABbX MTH$ROUTINESMTHDEFz NAMNAMDEF~ NCS$ROUTINESNCSDEFNETDEFtNSADEF* NSAMSGDEF NSARECDEF~( OBJRECDEFOPCDEFhOPCMSGMOPRDEF]OSSDDEFOSSDEF OTS$ROUTINES>OTSDEFL&PAGEDEFz PAL_BUILTINS PAL_SERVICESTPASLIB_IEEEFLT$ROUTINESd$PCCDEFpFPDSCDEFPMMDEFPOSIX_SERVICEDEFvPOWERDEFhRAB.RMSBSTARLET_BIGPAGE& SYS_PAL_QINSTXAB\pFPDSCDEFPMMDEFPOSIX_SERVICEDEFvPOWERDEFfPPL$DEF PPL$ROUTINES%LPPLDEFr^PPROPDEF|PQLDEFrPRCDEF|PRDEF84PRODEF?PROMDEFHbPROVDEFPPROWDEFXPRTDEFjPRVDEFlPRXDEFPSCANDEFBPSIGDEFPSLDEFt PSM$ROUTINES PSMMSGDEF PTDDEF QSRVDEF PQUIDEFhRAB !RABDEF!@RBLDDEF!`REGDEF!REGMSG.RMSBSTARLET_BIGPAGE& SYS_PAL_QINSTXAB8#ifndef __FAB_LOADED#define __FAB_LOADED 1@/* RMS - V3.0 - Include real FABDEF data structure definition */# include #endif /* __FAB_LOADED */wwI#ifndef __FAR_POINTERS_LOADED#define __FAR_POINTERS_LOADED 1+/* Module FAR_POINTERS.H "X-11" */N/****************************************************************************** *$* COPYRIGHT (c) 1995 BY *9* DIGITAL EQUIPMENT CORPORATION, MAYNARD, M ASS. *+* ALL RIGHTS RESERVED. ** * N* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED *N* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE *N* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER *N* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY *N* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY *$* TRANSFERRED.  ** * O* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * O* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * $* CORPORATION. ** * N* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS *B* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. ** *N*****************************************************************************//**++ * FACILITY:** Open/VMS AXP (STARLET)* * ABSTRACT:*N* This header file will provide a basic set of 64-bit pointer types. 64-bit L* pointers to particular structures, like PTEs, should be defined with that@* particular structure's definition file, like [LIB]PTEDEF.SDL.* * AUTHOR:** Karen Noel*!* CREATION DATE: 6-Sep-1994** MODIFICATION HISTORY:*.* X-11 HHG1199 Harry H. Goforth 18-Nov-19995* Fix syntax error with semicolon at end of typedef 2* statement for unsigned 64-bit pointer UINT32_PQ*+* X-10 KLN2089 Karen L. Noel 1-Jul-1998* Add UINT64_PPQ*#* X-9 Andy Kuehnel 18-Jun-1997* Add UINT32_PQ*2* X-8 NYKxxx Nitin Y. Karkhanis 27-Nov-1995;* Add 64-bit pointer typedefs for pointer to unsigned int,3* pointer to short, and pointer to unsigned short.*** X-7 KLN1381 Karen L. Noel 8-Feb-19957* Fix typo when __INITIAL_POINTER_SIZE is not defined.*+* X-6 KLN1373 Karen L. Noel 30-Jan-1995$* Add __INITIAL_POINTER_SIZE check.*** X-5 KLN1359 Karen L. Noel 3-Jan-1995* Define CHAR_PQ and CHAR_PPQ.*+* X-4 KLN1333 Karen L. Noel 15-Nov-1994* Define UINT64_PQ.*.* X-3 NYK092 Nitin Y. Karkhanis 1-Nov-19948* The save, long, and restore pragmas should be __save,* __long, and __restore*,* X-1 KLN1326 Karen L. Noel 19-Oct-1994+* Add __FAR_POINTERS_LOADED symbol and use,* __required_pointer_size pragma instead of* required_poin ter_size.**--*/ E#ifdef __INITIAL_POINTER_SIZE /* Not defined for older compilers */M#pragma __required_pointer_size __save /* Save current pointer size */M#pragma __required_pointer_size __long /* Pointers are 64-bit */Ctypedef int * INT_PQ; /* 64-bit pointer to 32-bit int */Otypedef unsigned int * UINT_PQ; /* 64-bit pointer to an unsigned 32-bit int */atypedef unsigned __int32 * UINT32_PQ; /* 64-bit pointer to a different unsigned 32-bit int :-( */Ktypedef void * VOID_PQ; /* 64-bit pointer to arbitrary data */Ltypedef void ** VOID_PPQ; /* 64-bit pointer to VOID_PQ */Ltypedef __int64 * INT64_PQ; /* 64-bit pointer to 64-bit int */Ntypedef unsigned __int64 * UINT64_PQ; /* 64-bit ptr to unsigned 64-bit int */Gtypedef unsigned __int64 ** UINT64_PPQ; /* 64-bit ptr to a UINT64_PQ */;typedef char * CHAR_PQ; /* 64-bit pointer to char */@typedef char ** CHAR_PPQ; /* 64-bit pointer to CHAR_PQ */@typedef short * SHORT_PQ; /* 64-bit pointer to a short */Ptypedef unsigned short * USHORT_PQ; /* 64-bit pointer to an unsigned short */O#pragma __required_pointer_size __restore /* Return to previous pointer size */#elseJtypedef unsigned __int64 INT_PQ; /* 64-bit pointer to 32-bit int */Rtypedef unsigned __int64 UINT_PQ; /* 64-bit pointer to an unsigned 32-bit int */atypedef unsigned __int64 UINT32_PQ; /* 64-bit pointer to a different unsigned 32-bit int :-( */Ktypedef unsigned __int64 VOID_PQ; /* 64-bit pointer to arbitrary data */Ltypedef unsigned __int64 VOID_PPQ; /* 64-bit pointer to VOID_PQ */Ltypedef unsigned __int64 INT64_PQ; /* 64-bit pointer to 64-bit int */Ntypedef unsigned __int64 UINT64_PQ; /* 64-bit ptr to unsigned 64-bit int */Gtypedef unsigned __int64 UINT64_PPQ; /* 64-bit ptr to a UINT64_PQ */Etypedef unsigned __int64 CHAR_PQ; /* 64-bit pointer to char */Jtypedef unsigned __int64 CHAR_PPQ; /* 64-bit pointer to CHAR_PQ */Itypedef unsigned __int64 SHORT_PQ; /* 64-bit pointer to a short */Otypedef unsigned __int64 USHORT_PQ; /* 64-bit pointer to an unsigned short */##endif /* __INITIAL_POINTER_SIZE */"#endif /* __FAR_POINTERS_LOADED */ww q/*- * Copyright 2000 Compaq Computer Corporation * 9 * COMPAQ Registered in U.S. Patent and Trademark Office. * G * Consistent with FAR 12.211 and 12.212, Commercial Computer Software,K *  Computer Software Documentation, and Technical Data for Commercial ItemsI * are licensed to the U.S. Government under vendor's standard commercial * license. * L * This software is subject to change without notice and is provided "AS IS"J * WITHOUT WARRANTY OF ANY KIND. THE ENTIRE RISK ARISING OUT OF THE USE OFK * THIS SOFTWARE REMAINS WITH RECIPIENT. IN NO EVENT SHALL COMPAQ BE LIABLEH * FOR ANY DIRECT, CONSEQUENTIAL, INCIDENTAL, SPECIAL, PUNITIVE OR OTHERH * DAMAGES WHATSOEVER (INCLU DING WITHOUT LIMITATION, DAMAGES FOR LOSS OFL * BUSINESS PROFITS, BUSINESS INTERRUPTION OR LOSS OF BUSINESS INFORMATION),K * EVEN IF COMPAQ HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. THEG * FOREGOING SHALL APPLY REGARDLESS OF THE NEGLIGENCE OR OTHER FAULT OFL * EITHER PARTY AND REGARDLESS OF WHETHER SUCH LIABILITY SOUNDS IN CONTRACT,@ * NEGLIGENCE, TORT, OR ANY OTHER THEORY OF LEGAL LIABILITY, ANDJ * NOTWITHSTANDING ANY FAILURE OF ESSENTIAL PURPOSE OF ANY LIMITED REMEDY. * J * T he limited warranties for Compaq products are exclusively set forth inI * the documentation accompanying such products. Nothing herein should be> * construed as constituting a further or additional warranty. * * This file is "lber.h" *N * This file is no longer used. The following text is taken from the document* * "draft-ietf-ldapext-ldap-c-api-04.txt": *K * "Implementations SHOULD also provide a header named lber.h to facilitateF * development of applications desiring compatibility with older LDAPL * implementations. The lber.h header MAY be empty. Old applications thatF * include lber.h in order to use BER facilities will need to include * ldap.h." * */wwХ/* -*- C++ -*-  *%COPYRIGHT_START% *@ * Copyright 2001-2010 Hewlett-Packard Development Company, L.P. *C * Confidential computer software. Valid license from HP and/or its9 * subsidiaries required for possession, use, or copying. *G * Consistent with FAR 12.211 and 12.212, Commercial Computer Software,E * Computer Software Documentation, and Technical Data for CommercialD * Items are licensed to the U.S. Government under vendor's standard * commercial license. *G * Neither HP nor any of its subsidiaries shall be liable for technicalH * or editorial errors or omissions contained herein. The information inH * this document is provided "as is" without warranty of any kind and isG * subject to change without notice. The warranties for HP products areD * set forth in the express limited warranty statements accompanyingG * such products. Nothing herein should be construed as constituting an * additional warranty. * *%COPYRIGHT_END% * M * Copyright (c) 1998-1999 Innosoft International, Inc. All Rights Reserved. *C * Copyright (c) 1996-1998 Critical Angle Inc. All Rights Reserved. * A * Copyright (c) 1990-1996 Regents of the University of Michigan. * All rights reserved. *B * Redistribution and use in source and binary forms are permittedF * provided that this notice is preserved and that due credit is givenI * to the University of Michigan at Ann Arbor. The name of the UniversityC * may not be used to endorse or promote products derived from thisD * software without specific prior written permission. This software= * is provided ``as is'' without express or implied warranty. *  *//* * Compaq revision history *. * Rev Author Date Comments. * --- ------ ---- ------ --N * 001 Nick Hudson 03-May-2000 Add pragmas to support "ldap$" prefixingN * 002 Nick Hudson 10-May-2000 First attempt at fixing LDAP_CONST issue- * for BL1O * 003 Nick Hudson 10-May-2000 First attempt at fixing ldap_modrdn issue- * for BL1N * 004 Nick Hudson 12-May-2000 Fixes to make library use "tis" routines, * on VMS: * 005 Nick Hudson 16-May-2000 !Clean up header file *N * 006 Nick Hudson 19-May-2000 Remove references to DOLLAR_PREFIX macroM * since all builds now will do prefixing;H * Used pragma to disable LONGEXTERN . * warnings *L * 007 Nick Hudson 30-May-2000 Hide all private data; fix ldap_modrdn@ * prototypes; fix LDAP_CONST * S * 008 Nick Hudson 15-Jun-2000 Change "s for initial 32/64 bit implementation:H * 1. Name mapping for 64-bit callersG * 2. used "member_alignment" pragmaE * 3. correct "ber_init" prototypeK * 4. Remove all private data altogether *N * 009 Nick Hudson 19-Jul-2000 Make function naming more consistent forN * 32/64 bit entry points: use "_32" suffix *#B * 010 Nick Hudson 20-Jul-2000 Set LDAP_API_VERSION to 2004 *: * 011 Paul Dallas 13-Feb-2002 Include SSL definitions *: * 012 Paul Dallas 24-Feb-2002 Include URL definitions *@ * 013 Nick Hudson 18-Apr-2002 Increment LDAP_VENDOR_VERSION *K * 014 Paul Dallas 30-Apr-2003 Add jacket routine for ldap_free_urldesc *F * 015 Prasad SG 04-Aug-2010 Added LDAP_OPT_BIND_TIMELIMIT option *//*T * $RCSfile: ldap.h,v $ $Revision: 1.84 $ $Date: 2000/01/27 21:54:$51 $ $State: Exp $ * * $Log: ldap.h,v $+ * Revision 1.84 2000/01/27 21:54:51 wahl. * A0001274A move str_parse_line_b64 to ldap.h *+ * Revision 1.83 2000/01/22 05:57:24 wahl * A0001214B add ldap_stats_info *) * Revision 1.82 2000/01/07 22:29:45 acJ * A00010520A - align ber_scanf/ber_printf integer types with latest draft *+ * Revision 1.81 1999/12/23 18:20:19 wahl * add ldap_memalloc_fns ** * Revision 1.80 1999/12/15 23:17:54 rcw * AIX not ready for AF_INET6 *%* * Revision 1.79 1999/11/19 23:41:56 kvc * Suppress INET6 for VMS, too *+ * Revision 1.78 1999/11/15 23:40:01 wahl * add ldap_errno *+ * Revision 1.77 1999/11/13 21:55:02 wahl * integrate draft -04 changes *+ * Revision 1.76 1999/10/28 07:25:46 wahl * enable FreeBSD threads *) * Revision 1.75 1999/09/08 15:24:37 ac8 * A99090320A - move dn normalize functions into libldap *4 * Revision 1.74 1999/08/04 20:13:37 Administrator% * A9908034A add LDAP_OPT_TLS_CONT&EXT *+ * Revision 1.73 1999/07/01 23:15:12 wahl * update const arguments *) * Revision 1.72 1999/06/29 19:37:47 nr) * add LDAP_CONTROL_PROXIED_AUTHORIZATION *+ * Revision 1.71 1999/06/25 22:43:07 wahl * reorganize LDAP_DEBUG values *+ * Revision 1.70 1999/05/24 16:46:33 wahl * add CLDAP prototypes *) * Revision 1.69 1999/05/15 01:10:37 nr * add LDAP_CONTROL_TREE_DELETE *4 * Revision 1.68 1999/05/11 18:20:57 Administrator * add cldap_setretryinfo *'4 * Revision 1.67 1999/04/20 04:30:16 Administrator * add LDAP_OPT_TLS_VERSION *+ * Revision 1.66 1999/03/29 21:39:33 wahl3 * A9903294A adjust calculation of LDIF_SIZE_NEEDED *+ * Revision 1.65 1999/03/25 17:45:25 wahl3 * A9903244A estabfn in ldap_conn_swap returns long *+ * Revision 1.64 1999/03/25 17:30:16 wahl. * A9903244A use long instead of int for sb_sd *4 * Revision 1.63 1999/03/04 21:25:17 Administrator- * A9903044A ensure pthread.h included on AIX *) * R(evision 1.62 1999/02/09 20:44:34 ac# * DIGEST-MD5 initial auth response *4 * Revision 1.61 1999/01/08 23:44:39 Administrator, * correct export for ldap_parse_unsolicited *4 * Revision 1.60 1999/01/07 02:47:44 Administrator0 * allow ldap.h and Perl to be combined on Win32 *+ * Revision 1.59 1999/01/06 23:50:44 wahl' * advertise string arguments as const *4 * Revision 1.58 1999/01/06 18:50:00 Administrator * add IDDS controls and ext ops *4 * Revision 1.57 1998/12/30) 18:01:50 Administrator * add LDAP_CONTROL_INCR_UPDATE *+ * Revision 1.56 1998/12/30 17:56:19 wahl * add ldap_modrdn *4 * Revision 1.55 1998/12/23 18:21:48 Administrator * add Mozilla compat stubs *4 * Revision 1.54 1998/12/22 00:57:03 Administrator= * add search preferences and display templates from U-M LDAP *4 * Revision 1.53 1998/12/21 23:38:30 Administrator' * readd filter, compatibility commands *+ * Revision 1.52 1998/11/25 20:56:47 wahl2 * A9811254B HP-*UX 11.0 threads support in headers *+ * Revision 1.51 1998/11/15 23:25:43 wahl * add new LDAP control OIDs ** * Revision 1.50 1998/11/13 16:35:05 crw" * Fix ifdef for no threads on VMS *+ * Revision 1.49 1998/10/25 00:26:51 wahl * A9810244A add NetBSD *+ * Revision 1.48 1998/10/21 15:38:56 wahl * add LDAPAPIInfo ** * Revision 1.47 1998/10/06 05:51:39 kvc' * A98100413A changes to support VMS V6 *+ * Revision 1.46 1998/10/02 17:40:14 wahl2 * A9810024A add lbe+r.h and ldap_parse_unsolicited ** * Revision 1.45 1998/09/20 06:16:56 kvc2 * A98092013A #include needed on VMS *+ * Revision 1.44 1998/09/12 00:47:47 wahl * call ldap_log_set_path *+ * Revision 1.43 1998/09/09 21:57:58 wahl * add LDAP_URL_SCOPE_UNSET *+ * Revision 1.42 1998/09/07 01:57:45 wahl * change hpux to __hppa *+ * Revision 1.41 1998/09/03 21:25:19 wahl! * add LDAPCDECL to all functions * * */#ifndef _H_III_LDAP#define _H_III_L,DAP 1#define LDAP_API_VERSION 2005#define LDAP_VERSION_MIN 2#define LDAP_VERSION_MAX 36#define LDAP_VENDOR_NAME "Compaq Computer Corporation"#define LDAP_VENDOR_VERSION 200#ifndef LDAP_CONST#define LDAP_CONST const#endif/* * N * =========================================================================== * Other Portability Definitions *L * This is where we define common stuff to make life easier on various Unix * systems. * */#include #inclu-de #if defined(__VMS)#include #include #include #include #include #endif /* __VMS */#include #include #include #include #include #ifndef __VMS#include #endif#include /*G * Allow or use IPv6? This is set on non-linux machines if AF_INET6 is> * defined. Win32 defines AF_INET6 but does not contain the .! * correct structure definitions. */?#if defined(AF_INET6) && (!defined(__VMS) && !defined(__osf__))#define CAI_HAVE_INET6#endif/* #define CAI_USE_INET6 */#if defined(__osf__)#include #endif/*J * The RFC documents define the names of the entry points to the API whichE * the user can expect to see. For the VMS implementation, the namesM * exposed by the RTL differ from the public names for the following reasons: *J * 1. All of the names are prefixed /by "LDAP$" in order to ensure that the& * symbol namespace isn't polluted. *H * 2. Because the RTL offers both 32 and 64 bit interfaces, the suffixesF * "_32" and "_64" are used for entry points which are 32 or 64 bitF * specific (functions which are not sensitive to pointer size have * no suffix) *N * 3. Function names which (with suffix and prefix) would exceed 31 characters * in length are truncated. *G * Adding the "LDAP$" prefix is done by the compiler as a result o0f the% * "#pragma extern_prefix" directive. *G * Adding suffixes and truncating names is done in the following set of * "#define" statements: */"#if (__INITIAL_POINTER_SIZE != 64)/*9 * This section will be processed for 32 bit compilations */4#define ldap_init ldap_init_324#define ldap_open ldap_open_32:#define ldap_get_option ldap_get_option_32:#define ldap_set_option ldap_set_option_32<#define 1ldap_control_free ldap_control_free_32=#define ldap_controls_free ldap_controls_free_329#define ldap_sasl_bind ldap_sasl_bind_32;#define ldap_sasl_bind_s ldap_sasl_bind_s_32:#define ldap_unbind_ext ldap_unbind_ext_32:#define ldap_search_ext ldap_search_ext_32<#define ldap_search_ext_s ldap_search_ext_s_326#define ldap_search ldap_search_328#define ldap_search_s 2 ldap_search_s_329#define ldap_search_st ldap_search_st_32;#define ldap_compare_ext ldap_compare_ext_32=#define ldap_compare_ext_s ldap_compare_ext_s_32:#define ldap_modify_ext ldap_modify_ext_32<#define ldap_modify_ext_s ldap_modify_ext_s_326#define ldap_modify ldap_modify_328#define ldap_modify_s ldap_modify_s_326#define ldap_rename ldap_rename_32 38#define ldap_rename_s ldap_rename_s_327#define ldap_add_ext ldap_add_ext_329#define ldap_add_ext_s ldap_add_ext_s_323#define ldap_add ldap_add_325#define ldap_add_s ldap_add_s_32:#define ldap_delete_ext ldap_delete_ext_32<#define ldap_delete_ext_s ldap_delete_ext_s_328#define ldap_extended_operation ldap_ext_oper_32:#define ldap_extended_operation_s 4 ldap_ext_oper_s_32;#define ldap_abandon_ext ldap_abandon_ext_326#define ldap_result ldap_result_32<#define ldap_parse_result ldap_parse_result_32A#define ldap_parse_sasl_bind_result ldap_prs_sasl_bind_res_32=#define ldap_parse_extended_result ldap_parse_ext_res_32:#define ldap_err2string ldap_err2string_32=#define ldap_first_message ldap_first_message_32<#define ldap_next_message ldap_nex 5t_message_32;#define ldap_first_entry ldap_first_entry_32:#define ldap_next_entry ldap_next_entry_32?#define ldap_first_reference ldap_first_reference_32>#define ldap_next_reference ldap_next_reference_32?#define ldap_first_attribute ldap_first_attribute_32>#define ldap_next_attribute ldap_next_attribute_32:#define ldap_get_values ldap_get_values_32>#define ldap_get_values_len ldap_get_v 6alues_len_32<#define ldap_count_values ldap_count_values_32@#define ldap_count_values_len ldap_count_values_len_32:#define ldap_value_free ldap_value_free_32>#define ldap_value_free_len ldap_value_free_len_326#define ldap_get_dn ldap_get_dn_32:#define ldap_explode_dn ldap_explode_dn_32;#define ldap_explode_rdn ldap_explode_rdn_326#define ldap_dn2ufn ldap_dn2ufn_32B#defin 7e ldap_get_entry_controls ldap_get_entry_controls_32?#define ldap_parse_reference ldap_parse_reference_325#define ber_bvfree ber_bvfree_327#define ber_bvecfree ber_bvecfree_324#define ber_bvdup ber_bvdup_326#define ber_alloc_t ber_alloc_t_325#define ber_printf ber_printf_326#define ber_flatten ber_flatten_323#define ber_init be8r_init_324#define ber_scanf ber_scanf_32<#define ber_first_element ber_first_element_32*#define ldap_url_parse ldap_url_parse_32/#define ldap_free_urldesc ldap_free_urldesc_321#define ldap_url_search_st ldap_url_search_st_32/#define ldap_url_search_s ldap_url_search_s_32(#else /* __INITIAL_POINTER_SIZE == 64 *//*A * This section will be processed if we are compiling /POINTER=64 */4#define ldap_init ldap_init_644#d 9efine ldap_open ldap_open_64:#define ldap_get_option ldap_get_option_64:#define ldap_set_option ldap_set_option_64<#define ldap_control_free ldap_control_free_64=#define ldap_controls_free ldap_controls_free_649#define ldap_sasl_bind ldap_sasl_bind_64;#define ldap_sasl_bind_s ldap_sasl_bind_s_64:#define ldap_unbind_ext ldap_unbind_ext_64:#define ldap_search_ext : ldap_search_ext_64<#define ldap_search_ext_s ldap_search_ext_s_646#define ldap_search ldap_search_648#define ldap_search_s ldap_search_s_649#define ldap_search_st ldap_search_st_64;#define ldap_compare_ext ldap_compare_ext_64=#define ldap_compare_ext_s ldap_compare_ext_s_64:#define ldap_modify_ext ldap_modify_ext_64<#define ldap_modify_ext_s ldap_modif ;y_ext_s_646#define ldap_modify ldap_modify_648#define ldap_modify_s ldap_modify_s_646#define ldap_rename ldap_rename_648#define ldap_rename_s ldap_rename_s_647#define ldap_add_ext ldap_add_ext_649#define ldap_add_ext_s ldap_add_ext_s_643#define ldap_add ldap_add_645#define ldap_add_s ldap_add_s_64:#define ldap_delete_ext < ldap_delete_ext_64<#define ldap_delete_ext_s ldap_delete_ext_s_648#define ldap_extended_operation ldap_ext_oper_64:#define ldap_extended_operation_s ldap_ext_oper_s_64;#define ldap_abandon_ext ldap_abandon_ext_646#define ldap_result ldap_result_64<#define ldap_parse_result ldap_parse_result_64A#define ldap_parse_sasl_bind_result ldap_prs_sasl_bind_res_64=#define ldap_parse_extended_result ldap_parse_ext_r =es_64:#define ldap_err2string ldap_err2string_64=#define ldap_first_message ldap_first_message_64<#define ldap_next_message ldap_next_message_64;#define ldap_first_entry ldap_first_entry_64:#define ldap_next_entry ldap_next_entry_64?#define ldap_first_reference ldap_first_reference_64>#define ldap_next_reference ldap_next_reference_64?#define ldap_first_attribute ldap_first_attribute >_64>#define ldap_next_attribute ldap_next_attribute_64:#define ldap_get_values ldap_get_values_64>#define ldap_get_values_len ldap_get_values_len_64<#define ldap_count_values ldap_count_values_64@#define ldap_count_values_len ldap_count_values_len_64:#define ldap_value_free ldap_value_free_64>#define ldap_value_free_len ldap_value_free_len_646#define ldap_get_dn ldap_get_dn_64:#def ?ine ldap_explode_dn ldap_explode_dn_64;#define ldap_explode_rdn ldap_explode_rdn_646#define ldap_dn2ufn ldap_dn2ufn_64B#define ldap_get_entry_controls ldap_get_entry_controls_64?#define ldap_parse_reference ldap_parse_reference_645#define ber_bvfree ber_bvfree_647#define ber_bvecfree ber_bvecfree_644#define ber_bvdup ber_bvdup_646#define ber_alloc_t @ ber_alloc_t_645#define ber_printf ber_printf_646#define ber_flatten ber_flatten_643#define ber_init ber_init_644#define ber_scanf ber_scanf_64<#define ber_first_element ber_first_element_64*#define ldap_url_parse ldap_url_parse_64/#define ldap_free_urldesc ldap_free_urldesc_641#define ldap_url_search_st ldap_url_search_st_64/#define ldap_url_search_s ldap_url_search_s_64+A#endif /* (__INITIAL_POINTER_SIZE == 64) *//*) * End of name mapping for 64/32-bit APIs *//*N * =========================================================================== *# * Lightweight BER library routines * */ typedef unsigned long ber_len_t; typedef unsigned long ber_tag_t; typedef long ber_int_t;!typedef unsigned long ber_uint_t;!typedef long ber_slen_t;/*I * Note that LBER_ERROR and LBER_DEFAULT are values that can never appearIB * as valid BER tags, and so it is safe to use them to report errors. In< * fact, any tag for which the following is true is invalid:C * (( tag & 0x00000080 ) != 0 ) && (( tag & 0xFFFFFF00 ) != 0 ) */#ifdef LBER_ERROR_COMPAT+#define LBER_ERROR 0xffffffffL+#define LBER_DEFAULT 0xffffffffL#else/#define LBER_ERROR ((ber_tag_t)-1)/#define LBER_DEFAULT ((ber_tag_t)-1)#endif$#define LBER_USE_DER 0x01%typedef struct bCerelement BerElement;/* @ * Structure for returning a sequence of octet strings + length.B * Using "pragma member_alignment" ensures that everyone sees this1 * the same way, regardless of compilation flags. *? * For a module built with 32-bit pointers, the structure looks5 * like this (assuming it's located at address "A") : * * +-----------------+ * | bv_len | : A * +-----------------+ * | bv_val | : A+4 * +-----------------+ *? * For a modulDe built with 64-bit pointers, the structure looks5 * like this (assuming it's located at address "A") : *) * +-----------------+-----------------+. * | *** unused *** | bv_len | : A) * +-----------------+-----------------+0 * | bv_val | : A+8) * +-----------------+-----------------+ */#pragma member_alignment save#pragma member_alignment typedef struct berval { ber_len_t bv_len; char *bv_val; E} BerValue; #pragma member_alignment restore#ifdef __cplusplus extern "C" {#endif/* * ber public functions */#pragma extern_prefix save#pragma extern_prefix "LDAP$"-ber_tag_t ber_first_element(BerElement *ber, / ber_len_t *lenPtr,4 char **opaquePtr);,ber_tag_t ber_next_element(BerElement *ber,/ ber_len_t *lenPtr,0 char *opaque);'ber_tag_Ft ber_skip_tag(BerElement *ber,+ ber_len_t *lenPtr);'ber_tag_t ber_peek_tag(BerElement *ber,+ ber_len_t *lenPtr);)ber_tag_t ber_scanf(BerElement *ber,/ LDAP_CONST char *fmt, ...);#void ber_bvfree(struct berval *bv);&void ber_bvecfree(struct berval **bv);7struct berval *ber_bvdup(LDAP_CONST struct berval *bv);int ber_printf(BerElement *ber,* LDAP_CONST char *fmt, ...);%BerElement *ber_Galloc_t(int options);void ber_free(BerElement *ber, int fbuf);/*< * Note that the function below matches the draft 4 document */(BerElement *ber_init(struct berval *bv);&int ber_flatten(const BerElement *ber,* struct berval **bvPtr);#pragma extern_prefix restore#ifdef __cplusplus}#endif/*N * ===========================================================================% * LDAP definitions from the protocol *  */#dHefine LDAP_PORT 389#define LDAP_VERSION2 2#define LDAP_VERSION3 3%#define LDAP_VERSION LDAP_VERSION2/* : * specific LDAP instantiations of BER types we know about *///* possible result types a server can return */O#define LDAP_RES_BIND 0x61L /* application + constructed */O#define LDAP_RES_SEARCH_ENTRY 0x64L /* application + constructed */O#define LDAP_RES_SEARCH_RESULT 0x65L /* application + constructed */O#define LDIAP_RES_SEARCH_REFERENCE 0x73L /* application + constructed */O#define LDAP_RES_MODIFY 0x67L /* application + constructed */O#define LDAP_RES_ADD 0x69L /* application + constructed */O#define LDAP_RES_DELETE 0x6bL /* application + constructed */O#define LDAP_RES_MODRDN 0x6dL /* application + constructed */O#define LDAP_RES_MODDN 0x6dL /* application + constructed */O#define LDAP_RES_COMPARE J 0x6fL /* application + constructed */O#define LDAP_RES_EXTENDED 0x78L /* application + constructed */-#define LDAP_RES_ANY (-1L)+#define LDAP_RES_UNSOLICITED 0x0&/* authentication methods available */L#define LDAP_AUTH_SIMPLE 0x80L /* context specific + primitive */L#define LDAP_AUTH_KRBV41 0x81L /* context specific + primitive */L#define LDAP_AUTH_KRBV42 0x82L /* context specific + primitive K *//* search scopes */$#define LDAP_SCOPE_BASE 0x00$#define LDAP_SCOPE_ONELEVEL 0x01$#define LDAP_SCOPE_SUBTREE 0x02%#define LDAP_NO_ATTRS "1.1"##define LDAP_ALL_USER_ATTRS "*"/* % * possible error codes we can return */,#define LDAP_SUCCESS 0x00,#define LDAP_OPERATIONS_ERROR 0x01,#define LDAP_PROTOCOL_ERROR 0x02,#define LDAP_TIMELIMIT_EXCEEDED 0x03,#define LDAP_SIZELIMIT_EXCEEDED L0x04,#define LDAP_COMPARE_FALSE 0x05,#define LDAP_COMPARE_TRUE 0x06,#define LDAP_STRONG_AUTH_NOT_SUPPORTED 0x07,#define LDAP_STRONG_AUTH_REQUIRED 0x08,#define LDAP_REFERRAL 0x0a,#define LDAP_ADMIN_LIMIT_EXCEEDED 0x0b4#define LDAP_UNAVAILABLE_CRITICAL_EXTENSION 0x0c,#define LDAP_CONFIDENTIALITY_REQUIRED 0x0d,#define LDAP_SASL_BIND_IN_PROGRESS 0x0e,#define LDAP_NO_SUCH_ATTRIBUTE 0x10,#define LDAP_UNDEFINED_TYPE M 0x11,#define LDAP_INAPPROPRIATE_MATCHING 0x12,#define LDAP_CONSTRAINT_VIOLATION 0x13,#define LDAP_TYPE_OR_VALUE_EXISTS 0x14,#define LDAP_INVALID_SYNTAX 0x15,#define LDAP_NO_SUCH_OBJECT 0x20,#define LDAP_ALIAS_PROBLEM 0x21,#define LDAP_INVALID_DN_SYNTAX 0x22,#define LDAP_IS_LEAF 0x23,#define LDAP_ALIAS_DEREF_PROBLEM 0x24,#define LDAP_INAPPROPRIATE_AUTH 0x30,#define LDAP_INVALID_C NREDENTIALS 0x31,#define LDAP_INSUFFICIENT_ACCESS 0x32,#define LDAP_BUSY 0x33,#define LDAP_UNAVAILABLE 0x34,#define LDAP_UNWILLING_TO_PERFORM 0x35,#define LDAP_LOOP_DETECT 0x36,#define LDAP_NAMING_VIOLATION 0x40,#define LDAP_OBJECT_CLASS_VIOLATION 0x41,#define LDAP_NOT_ALLOWED_ON_NONLEAF 0x42,#define LDAP_NOT_ALLOWED_ON_RDN 0x43,#define LDAP_ALREADY_EXISTS 0x44,#define LDAP_NO_OBJE OCT_CLASS_MODS 0x45,#define LDAP_RESULTS_TOO_LARGE 0x46,#define LDAP_AFFECTS_MULTIPLE_DSAS 0x47,#define LDAP_OTHER 0x50,#define LDAP_SERVER_DOWN 0x51,#define LDAP_LOCAL_ERROR 0x52,#define LDAP_ENCODING_ERROR 0x53,#define LDAP_DECODING_ERROR 0x54,#define LDAP_TIMEOUT 0x55,#define LDAP_AUTH_UNKNOWN 0x56,#define LDAP_FILTER_ERROR 0x57,#define LDAP_USER_ PCANCELLED 0x58,#define LDAP_PARAM_ERROR 0x59,#define LDAP_NO_MEMORY 0x5a,#define LDAP_CONNECT_ERROR 0x5b,#define LDAP_NOT_SUPPORTED 0x5c,#define LDAP_CONTROL_NOT_FOUND 0x5d,#define LDAP_NO_RESULTS_RETURNED 0x5e,#define LDAP_MORE_RESULTS_TO_RETURN 0x5f,#define LDAP_CLIENT_LOOP 0x60,#define LDAP_REFERRAL_LIMIT_EXCEEDED 0x61#define LDAP_OPT_ON ((void *)1) #define LDAP_OPT_OFF ((void Q*)0),#define LDAP_OPT_API_INFO 0x00,#define LDAP_OPT_DESC 0x01,#define LDAP_OPT_DEREF 0x02,#define LDAP_OPT_SIZELIMIT 0x03,#define LDAP_OPT_TIMELIMIT 0x04,#define LDAP_OPT_REFERRALS 0x08,#define LDAP_OPT_RESTART 0x09,#define LDAP_OPT_PROTOCOL_VERSION 0x11,#define LDAP_OPT_SERVER_CONTROLS 0x12,#define LDAP_OPT_CLIENT_CONTROLS 0x13,#define LDAP_OPT_API_FEATURE_INFO R 0x15,#define LDAP_OPT_HOST_NAME 0x30,#define LDAP_OPT_ERROR_NUMBER 0x31,#define LDAP_OPT_ERROR_STRING 0x32,#define LDAP_OPT_MATCHED_DN 0x33.#define LDAP_OPT_PRIVATE_EXTENSION_BASE 0x4000)#define LDAP_OPT_TLS_CERT_REQUIRED 0x7001+#define LDAP_OPT_TLS_VERIFY_REQUIRED 0x7002&#define LDAP_OPT_TLS_CERT_FILE 0x7003&#define LDAP_OPT_TLS_PKEY_FILE 0x7004$#define LDAP_OPT_TLS_CA_FILE 0x7005$#define LDAP_OPT_TLS_CA_PATH 0x7006.#define LDAP_OSPT_TLS_VERSION 0x7007$#define LDAP_OPT_TLS_CONTEXT 0x70083/* Timelimit for ldap_simple_bind[_s]() to timeout.5 * This is used internally for TCP connect() timeout. * zero means - Unlimited */'#define LDAP_OPT_BIND_TIMELIMIT 0x7009/*N * =========================================================================== * LDAP protocol structures * *//*  * For modifications.8 * Use pragmas to make sure that these structures always8 * look the same for a givenT pointer size, regardless of$ * compiler "/member_align" switches */#pragma member_alignment save#pragma member_alignment typedef struct ldapmod { int mod_op;$#define LDAP_MOD_ADD 0x00$#define LDAP_MOD_DELETE 0x01$#define LDAP_MOD_REPLACE 0x02$#define LDAP_MOD_BVALUES 0x80" char *mod_type; union mod_vals_u {/ char **modv_strvals;- struct berval **modv_bvalsU; } mod_vals;-#define mod_values mod_vals.modv_strvals+#define mod_bvalues mod_vals.modv_bvals } LDAPMod; #pragma member_alignment restore/*C * This structure represents both ldap messages and ldap responses.E * These are really the same, except in the case of search responses,* * where a response has multiple messages. */#typedef struct ldapmsg LDAPMessage;/* J * structure representing the interface between the client and the library+ * for a cVonnection, or set of connections. */!#define LDAP_DEREF_NEVER 0!#define LDAP_DEREF_SEARCHING 1!#define LDAP_DEREF_FINDING 2!#define LDAP_DEREF_ALWAYS 3!#define LDAP_NO_LIMIT 0typedef struct ldap LDAP;/*8 * Use pragmas to make sure that these structures always8 * look the same for a given pointer size, regardless of$ * compiler "/member_align" switches */#pragma member_alignment save#pragma member_alignment typedef struct ldapapiin Wfo {< int ldapai_info_version; /* version of this struct */C int ldapai_api_version; /* revision of the API supported */D int ldapai_protocol_version; /* highest LDAP version supported */= char **ldapai_extensions; /* names of API extensions */6 char *ldapai_vendor_name; /* name of supplier */I int ldapai_vendor_version; /* supplier-specific version times 100 */} LDAPAPIInfo;#define LDAP_API_INFO_VERSION 1%typedef struct ldap_apifeature_info {9 int lXdapaif_info_version; /* version of this struct */< char *ldapaif_name; /* name of supported feature */@ int ldapaif_version; /* revision of supported feature */} LDAPAPIFeatureInfo;##define LDAP_FEATURE_INFO_VERSION 1typedef struct ldapcontrol {" char *ldctl_oid;# struct berval ldctl_value;( char ldctl_iscritical;} LDAPControl, *PLDAPControl;/* * types for ldap URL handling */typedef struct ldap_url_desc { chYar *lud_host; int lud_port; char *lud_dn; char **lud_attrs; int lud_scope; char *lud_filter; char **lud_exts;1 char *lud_string; /* for internal use only */} LDAPURLDesc;E#define LDAP_URL_ERR_NOTLDAP 1 /* URL doesn't begin with "ldap://" */:#define LDAP_URL_ERR_NODN 2 /* URL has no DN (required) */A#define LDAP_URL_ERR_BADSCOPE 3 /* URL scope string is invalid */<#define LDAP_URL_ERR_MEM 4 /* can't allocate memory space */9#define LDAP_URL_ERR_BADEXZT 5 /* unsupported extension */!#define LDAP_URL_SCOPE_UNSET -1 #pragma member_alignment restore/*N * =========================================================================== * Core LDAPv2 functions *  */#ifdef __cplusplus extern "C" {#endif#pragma extern_prefix save#pragma extern_prefix "LDAP$"int ldap_abandon(LDAP *ld, int msgid);!int ldap_add(LDAP *ld,! LDAP_CONST char *dn,& LDAPMod **att[rs);#int ldap_add_s(LDAP *ld,# LDAP_CONST char *dn,( LDAPMod **attrs);)int ldap_simple_bind(LDAP *ld,) LDAP_CONST char *dn,. LDAP_CONST char *passwd);+int ldap_simple_bind_s(LDAP *ld,+ LDAP_CONST char *dn,0 LDAP_CONST char *passwd);%int ldap_compare(LDAP *ld,% LDAP_CONST char *dn,' \ LDAP_CONST char *attr,) LDAP_CONST char *value);'int ldap_compare_s(LDAP *ld,' LDAP_CONST char *dn,) LDAP_CONST char *attr,+ LDAP_CONST char *value);$int ldap_delete(LDAP *ld,% LDAP_CONST char *dn);&int ldap_delete_s(LDAP *ld,' LDAP_CONST char *dn);char *ldap_err2string(int err);$int ldap_modify(LDAP *ld,$ LD]AP_CONST char *dn,( LDAPMod **mods);&int ldap_modify_s(LDAP *ld,& LDAP_CONST char *dn,* LDAPMod **mods);*LDAP *ldap_init(LDAP_CONST char *hostname,) int portno);.LDAPMessage *ldap_first_entry(LDAP *ld,0 LDAPMessage *res);-LDAPMessage *ldap_next_entry(LDAP *ld,1 LDAPMessage *entry);'int ldap_count_entries(L^DAP *ld,) LDAPMessage *res);#char *ldap_get_dn(LDAP *ld,' LDAPMessage *entry);'char *ldap_dn2ufn(LDAP_CONST char *dn);+char **ldap_explode_dn(LDAP_CONST char *dn,0 int notypes);-char **ldap_explode_rdn(LDAP_CONST char *rdn,1 int notypes);+char *ldap_first_attribute(LDAP *ld,. LDAPMessage *entry,. _ BerElement **ptr);*char *ldap_next_attribute(LDAP *ld,- LDAPMessage *entry,, BerElement *ptr);+char **ldap_get_values(LDAP *ld,. LDAPMessage *entry,. LDAP_CONST char *attr);8struct berval **ldap_get_values_len(LDAP *ld,; LDAPMessage *entry,; LDAP_CONST char *attr);#int ldap_c`ount_values(char **vals);0int ldap_count_values_len(struct berval **vals);"void ldap_value_free(char **vals);/void ldap_value_free_len(struct berval **vals);#define LDAP_MSG_ONE 0#define LDAP_MSG_ALL 1#define LDAP_MSG_RECEIVED 2$int ldap_result(LDAP *ld,& int msgid,$ int all,) struct timeval *timeout,' LDAPMessage **res);#int ldap_msgfree(LDAPMessage *res);a%int ldap_search(LDAP *ld,' LDAP_CONST char *base,' int scope,) LDAP_CONST char *filter,) char **attrs,, int attrsonly);'int ldap_search_s(LDAP *ld,) LDAP_CONST char *base,) int scope,+ LDAP_CONST char *filter,+ char **attrs,- inbt attrsonly,+ LDAPMessage **res );(int ldap_search_st(LDAP *ld,* LDAP_CONST char *base,* int scope,, LDAP_CONST char *filter,, char **attrs,. int attrsonly,- struct timeval *timeout,+ LDAPMessage **res);int ldap_unbind(LDAP *ld);int ldap_unbind_s(LDAP *ld);%inct ldap_unbind_ext(LDAP *ld,/ LDAPControl **serverctrls,0 LDAPControl **clientctrls);void ldap_memfree(void *mem);/*N * ===========================================================================! * LDAPv2 compatibility functions) * (please avoid using these if possible) *  */+LDAP *ldap_open(LDAP_CONST char *hostname, ( int portno);"int ldap_bind(LDAP *ld," LDAP_CONST cdhar *dn,$ LDAP_CONST char *cred,& int method);$int ldap_bind_s(LDAP *ld,$ LDAP_CONST char *dn,& LDAP_CONST char *cred,( int method);/*G * There are two variants for each of "ldap_modrdn" and "ldap_modrdn_s" * functions. *I * The RFC1823 document specifies versions of these functions that accept, * a fourth paramter, called "deleteoldrdn". *J * The "draft 4" C API document especifies that these functions should only * accept 3 parameters. *H * The "draft 4" document says that most implementations only supply theL * 3-parameter version of the routines, which in any case are now deprecated1 * in favour of "ldap_rename" and "ldap_rename_s" *H * This implementation of the API supplies both versions of the "modrdn"L * functions. By default, the "draft 4" versions will be used; in order forD * an application to be able to use the "RFC1823" version, the macro@ *f LDAP_RFC1823_MODRDN should be defined before including LDAP.H * */0/* "draft4" versions of ldap_modrdn functions */ int ldap_modrdn_draft4(LDAP *ld,+ LDAP_CONST char *dn,0 LDAP_CONST char *newrdn);"int ldap_modrdn_s_draft4(LDAP *ld,- LDAP_CONST char *dn,2 LDAP_CONST char *newrdn);1/* "rfc1823" versions of ldap_modrdn functions */!int ldap_modrdn_rfc1823(LDAP *ld,! g char *dn,% char *newrdn,* int deleteoldrdn);#int ldap_modrdn_s_rfc1823(LDAP *ld,# char *dn,' char *newrdn,, int deleteoldrdn);#ifdef LDAP_RFC1823_MODRDN'#define ldap_modrdn ldap_modrdn_rfc1823+#define ldap_modrdn_s ldap_modrdn_s_rfc1823#else&#define ldap_modrdn ldap_modrdn_draft4*#define ldap_modrdn_s ldap_modrdn_s_draft4 #endif /* LDAP_RFC1823_MODRDN h*/%int ldap_modrdn2(LDAP *ld,% LDAP_CONST char *dn,) LDAP_CONST char *newrdn,/ int deleteoldrdn);'int ldap_modrdn2_s(LDAP *ld,' LDAP_CONST char *dn,+ LDAP_CONST char *newrdn,1 int deleteoldrdn);&int ldap_result2error(LDAP *ld,' LDAPMessage *res,* int freeit);%void ldap_iperror(LDAP *ld,' LDAP_CONST char *msg);/*N * =========================================================================== * LDAPv3 functions *  */>#define LDAP_NOTICE_OF_DISCONNECTION "1.3.6.1.4.1.1466.20036"7#define LDAP_CHASE_SUBORDINATE_REFERRALS 0x00000020U7#define LDAP_CHASE_EXTERNAL_REFERRALS 0x00000040U#define LDAP_SASL_SIMPLE NULL,int ldap_sasl_bind(LDAP *ld,, const char *dn,3 j const char *mechanism,. const struct berval *cred,6 LDAPControl **serverctrls,6 LDAPControl **clientctrls,1 int *msgidp);/int ldap_sasl_bind_s(LDAP *ld,/ const char *dn,6 const char *mechanism,1 const struct berval *cred,9 LDAPContro kl **serverctrls,9 LDAPControl **clientctrls,: struct berval **servercredp);*int ldap_search_ext(LDAP *ld, + const char *base,+ int scope,- const char *filter,- char **attrs,/ int attrsonly,3 LDAPControl **serverctrls,3 lLDAPControl **clientctrls,. struct timeval *timeout,/ int sizelimit,. int *msgidp);)int ldap_search_ext_s(LDAP *ld,+ const char *base,+ int scope,- const char *filter,- char **attrs,/ int attrsonly,3 LDAPControl **ser mverctrls,3 LDAPControl **clientctrls,. struct timeval *timeout,/ int sizelimit,, LDAPMessage **res);4int ldap_compare_ext(LDAP *ld,4 const char *dn,6 const char *attr,8 LDAP_CONST struct berval *bvalue,> LDAPControl **serverctrls,> n LDAPControl **clientctrls,9 int *msgidp); 4int ldap_compare_ext_s(LDAP *ld,4 const char *dn,6 const char *attr,8 LDAP_CONST struct berval *bvalue,> LDAPControl **serverctrls,? LDAPControl **clientctrls);#int ldap_add_ext(LDAP *old,# const char *dn,' LDAPMod **attrs,- LDAPControl **serverctrls,- LDAPControl **clientctrls,( int *msgidp);#int ldap_add_ext_s(LDAP *ld,# const char *dn,' LDAPMod **attrs,- LDAPControl **serverctrls,. LDAPControl **clientctrls);&int ldap_delete_ext(LDAP *ld,& conspt char *dn,0 LDAPControl **serevrctrls,0 LDAPControl **clientctrls,+ int *msgidp);&int ldap_delete_ext_s(LDAP *ld,& const char *dn,0 LDAPControl **serverctrls,1 LDAPControl **clientctrls);&int ldap_modify_ext(LDAP *ld,& const char *dn,) LDAPMod **mods,0 LDAPControl q**serverctrls,0 LDAPControl **clientctrls,+ int *msgidp);&int ldap_modify_ext_s(LDAP *ld,& const char *dn,) LDAPMod **mods,0 LDAPControl **serverctrls,1 LDAPControl **clientctrls);"int ldap_rename(LDAP *ld," const char *dn,& const char *newrdn,) const char *newparent,+ r int deleteoldrdn,, LDAPControl **serverctrls,, LDAPControl **clientctrls,' int *msgidp);"int ldap_rename_s(LDAP *ld," const char *dn,& const char *newrdn,) const char *newparent,+ int deleteoldrdn,, LDAPControl **serverctrls,- LDAPControl **clientctrls); ;int ldap_extended_operation(LDAP s *ld,C const char *requestoid,D LDAP_CONST struct berval *requestdata,E LDAPControl **serverctrls,E LDAPControl **clientctrls,@ int *msgidp);;int ldap_extended_operation_s(LDAP *ld,C const char *reques ttoid,D LDAP_CONST struct berval *requestdata,E LDAPControl **serverctrls,E LDAPControl **clientctrls,A char **retoidp,C struct berval **retdatap);&int ldap_abandon_ext(LDAP *ld,( int msgid,0 LDAPControl **serverctrls,1 u LDAPControl **clientctrls);#int ldap_msgtype(LDAPMessage *res);!int ldap_msgid(LDAPMessage *res);'int ldap_parse_result(LDAP *ld,( LDAPMessage *res,/ int *errorcodep,0 char **matcheddnp,/ char **errormsgp,1 char ***referralsp,3 LDAPControl ***serverctrlsp,+ int freeit); v2int ldap_parse_sasl_bind_result(LDAP *ld,3 LDAPMessage *res,< struct berval **servercredp,6 int freeit);1int ldap_parse_extended_result(LDAP *ld,2 LDAPMessage *res,7 char **retoidp,8 struct berval **retdatap,5 int freeit);*wint ldap_parse_reference(LDAP *ld,+ LDAPMessage *ref,4 char ***referralsp,6 LDAPControl ***serverctrlsp,. int freeit);0LDAPMessage *ldap_first_message(LDAP *ld,2 LDAPMessage *res);/LDAPMessage *ldap_next_message(LDAP *ld,1 LDAPMessage *res);(int ldap_count_messages(LDAP *ld,+ x LDAPMessage *res); 2LDAPMessage *ldap_first_reference(LDAP *ld,4 LDAPMessage *res);1LDAPMessage *ldap_next_reference(LDAP *ld,3 LDAPMessage *ref);*int ldap_count_references(LDAP *ld,- LDAPMessage *res); int ldap_get_option(LDAP *ld, int option,$ void *outvalue);#int ldap_set_option(LDAP *ld,& y int option,) const void *invalue);*void ldap_control_free(LDAPControl *ctrl);-void ldap_controls_free(LDAPControl **ctrls);,int ldap_get_entry_controls(LDAP *ld,/ LDAPMessage *entry,9 LDAPControl ***serverctrlsp);int ldap_tls_start(LDAP *ld, int negotiated);,int ldap_is_ldap_url(LDAP_CONST char *url );(int ldap_url_parse(LDAP_CONST char *url, LDAPURLDesc **ludpp);z*void ldap_free_urldesc(LDAPURLDesc *ludp);int ldap_url_search(LDAP *ld, char *url, int attrsonly);int ldap_url_search_s(LDAP *ld, LDAP_CONST char *url, int attrsonly, LDAPMessage **res); int ldap_url_search_st(LDAP *ld, LDAP_CONST char *url, int attrsonly,! struct timeval *timeout, LDAPMessage **res);#pragma extern_prefix restore#ifdef __cplusplus}#endif#endif /* _H_III_LDAP */{ww#ifndef __NAM_LOADED#define __NAM_LOADED 1@/* RMS - V3.0 - Include real NAMDEF data structure definition */# include #endif /* __NAM_LOADED */wwk=#ifndef __PAL_BUILTINS_LOADED#define __PAL_BUILTINS_LOADED 1(/* module pal_builtins.h "X-21"*I*************************************************************************I* *I* Copyright 2002 Compaq |Computer Corporation *I* *I* COMPAQ Registered in U.S. Patent and Trademark Office. *I* *I* Confidential computer software. Valid license from Compaq or *I* authorized sublicensor required for possession, use or copying. *I* Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *}I* Computer Software Documentation, and Technical Data for Commercial *I* Items are licensed to the U.S. Government under vendor's standard *I* commercial license. *I* *I* Compaq shall not be liable for technical or editorial errors or *I* omissions contained herein. The information in this document is *I* subject to change without notice. ~ *I* *I**************************************************************************++ * FACILITY:** STARLET_H for now* * ABSTRACT:*B* This module contains the C builtins for the Alpha CALL_PAL5* compatibility system services on non-Alpha systems.* * AUTHOR:* * Clair Grant** CREATION DATE:* * 04-Mar-2002** MODIFICATION HISTORY:*)* X-21  CMOS Christian Moser 25-JAN-2005:* Add definition of __PAL_MFPR_KSP which fell between the * cracks.*)* X-20 CMOS Christian Moser 15-NOV-2004<* Fix a typo in __PAL_MFPR_PRBR for the /STANDARD=VAXC case<* as it should translate to a call to SYS$PAL_MFPR_PRBR and=* not a call to the non-existing SYS$PAL_MFPR_CPUDB routine.* Fix generation number.*)* X-18 CMOS Christian Moser 14-OCT-2004<* C programs compiled with /STANDARD=VAXC will not generate9* correct code for 64 -bit pointers and will only fetch a:* sign-extended longword off SYS$GPQ_IPR_xxx. Use the old9* method and call the SYS$PAL_MFPR_xxx routines instead.*)* X-17 CMOS Christian Moser 27-SEP-2004>* Only define the fancy MFPR macros if __INITIAL_POINTER_SIZE9* is defined, which means we are using a newer compiler.7* C++ also does not like the MTPR_TBIS flavour macros.*)* X-16 CMOS Christian Moser 14-SEP-2004=* Declare the SYS$GPQ_IPR_xxx cells to match the declaration * of SYS$PAL_MFPR_xxx routines.*)* X-15 CMOS Christian Moser 13-SEP-20048* Fetch MFPR data directly from cells pointed to by the%* global SYS$GPQ_IPR_xxx data cells.*%* X-14 WBF Burns Fisher 19-Sep-2003%* CHMU is a system service-like call*** X-13 KLN3307 Karen L. Noel 17-Jun-2003* Oops. Put back mfpr_prbr.*+* X-12 KLN3306 Karen L. Noel 17-Jun-2003>* Remove mtpr_fen, mfpr_fen, mtpr_mces, mfpr_mces, mfpr_pcbb.*%* X-11 WBF Burns Fisher 06-May-20035* CHMS should be system service rather than break to* match the .MAR version.*%* X-10 WBF Burns Fisher 03-Dec-2002/* Wrong name for break codes for CHMU and CHMS*&* X-9 DJM Dennis Mattoon 12-NOV-2002#* Add inclusion of sys_pal_qinst.h*'* X-8 JRK396 Jim Kauffman 31-Oct-2002* Add __PAL_MFPR_WHAMI_SLOT*$* X-7 WBF Burns Fisher 24-Oct-20024* Add __CHMU and __CHMS. Remove MFPR_PCBB since the#* IPF version gets virtual address*#* X-6 CEG Clair Grant 25-Jul-2002 * Add __RPCC* #* X-5 CEG Clair Grant 18-Jul-20029* Redefine __PAL_BPT to use __break, __PAL_BUGCHK to use#* __break2, and add __PAL_GENTRAP.*#* X-4 CEG Clair Grant 30-Apr-20023* Move the system service prototypes to a new file+* pal_services.h. Add definition for __MF.*#* X-3 CEG Clair Grant 12-Apr-2002-* Remove sys$pal_mfpr_asn and sys$pal_draina*&* X-2 DJM Dennis Mattoon 02-APR-20029* Added instr argument to the prototype for sys$pal_imb.*#* X-1 CEG Clair Grant 04-Mar-2002* Original version.*/ #ifndef __alpha#include #include C#ifdef __INITIAL_POINTER_SIZE // Not defined for older compilersD#pragma __required_pointer_size __save // Save current pointer size>#pragma __required_pointer_size __long // Pointers are 64-bitextern int *sys$gpq_ipr_ipl;&extern unsigned int *sys$gpq_ipr_sisr;#extern __int64 *sys$gpq_ipr_cpuid;#extern __int64 *sys$gpq_ipr_cpudb; extern void * *sys$gpq_ipr_ksp; extern void * *sys$gpq_ipr_esp; extern void * *sys$gpq_ipr_ssp; extern void * *sys$gpq_ipr_usp;L#pragma __required_pointer_size __restore // Return to previous pointer size#endif+#define __PAL_MFPR_ASTEN sys$pal_mfpr_asten+#define __PAL_MTPR_ASTEN sys$pal_mtpr_asten+#define __PAL_MFPR_ASTSR sys$pal_mfpr_astsr+#define __PAL_MTPR_ASTSR sys$pal_mtpr_astsr+#define __PAL_MTPR_DATFX sys$pal_mtpr_datfx(#define __PAL_MTPR_ESP sys$pal_mtpr_esp*#define __PAL_MTPR_IPIR sys$pal_mtpr_ipir(#define __PAL_MTPR_IPL sys$pal_mtpr_ipl*#define __PAL_MTPR_PRBR sys$pal_mtpr_prbr*#define __PAL_MTPR_SIRR sys$pal_mtpr_sirr(#define __PAL_MTPR_SSP sys$pal_mtpr_ssp*#define __PAL_MTPR_TBIA sys$pal_mtpr_tbia+#define __PAL_MTPR_TBIAP sys$pal_mtpr_tbiap(#define __PAL_MTPR_USP sys$pal_mtpr_usp5#define __PAL_MFPR_WHAMI_SLOT sys$pal_mfpr_whami_slotC#ifdef __INITIAL_POINTER_SIZE // Not defined for older compilers #ifdef __vaxc(#define __PAL_MFPR_ESP sys$pal_mfpr_esp(#define __PAL_MFPR_IPL sys$pal_mfpr_ipl*#define __PAL_MFPR_PRBR sys$pal_mfpr_prbr*#define __PAL_MFPR_SISR sys$pal_mfpr_sisr(#define __PAL_MFPR_SSP sys$pal_mfpr_ssp(#define __PAL_MFPR_USP sys$pal_mfpr_usp+#define __PAL_MFPR_WHAMI sys$pal_mfpr_cpuid#else)#define __PAL_MFPR_KSP() *sys$gpq_ipr_ksp)#define __PAL_MFPR_ESP() *sys$gpq_ipr_esp)#define __PAL_MFPR_IPL() *sys$gpq_ipr_ipl,#define __PAL_MFPR_PRBR() *sys$gpq_ipr_cpudb+#define __PAL_MFPR_SISR() *sys$gpq_ipr_sisr)#define __PAL_MFPR_SSP() *sys$gpq_ipr_ssp)#define __PAL_MFPR_USP() *sys$gpq_ipr_usp-#define __PAL_MFPR_WHAMI() *sys$gpq_ipr_cpuid#endif*#define __PAL_MTPR_TBIS sys$pal_mtpr_tbis+#define __PAL_MTPR_TBISD sys$pal_mtpr_tbisd+#define __PAL_MTPR_TBISI sys$pal_mtpr_tbisi#endif1#define __PAL_BPT() __break(BREAK$C_DBG_PAL_BPT)>#define __PAL_GENTRAP(code) __break2(BREAK$C_SYS_GENTRAP,code)>#define __PAL_BUGCHK(code) __break2(BREAK$C_SYS_BUGCHECK,code)"#define __PAL_IMB sys$pal_imb&#define __PAL_PROBER sys$pal_prober&#define __PAL_PROBEW sys$pal_probew%#define __PAL_RD_PS sys$pal_rd_ps'#define __PAL_SWASTEN sys$pal_swasten(#define __PAL_WR_PS_SW sys$pal_wr_ps_sw$#define __PAL_HALT sys$pal_halt%#define __PAL_CFLUSH sys$pal_cflush##define __PAL_LDQP sys$pal_ldqp$#define __PAL_STQP sys$pal_stqp#define __MF __MBB#define __RPCC() ((unsigned __int64)0x0ffffffff & sys$rpcc_64())"#define __PAL_CHMU() sys$pal_chmu"#define __PAL_CHMS() sys$pal_chmsA#include /* get the system service prototypes */#endif /* __alpha */##endif /* __PAL_BUILTINS_LOADED */wwN#ifndef __PAL_SERVICES_LOADED#define __PAL_SERVICES_LOADED 1(/* module pal_services.h "X-15"*I*************************************************************************I* *I* Copyright 2002 Compaq Computer Corporation *I*  *I* COMPAQ Registered in U.S. Patent and Trademark Office. *I* *I* Confidential computer software. Valid license from Compaq or *I* authorized sublicensor required for possession, use or copying. *I* Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *I* Computer Software Documentation, and Technical Data for Commercial *I* Items are licensed to the U.S. Government under vendor's standard *I* commercial license. *I* *I* Compaq shall not be liable for technical or editorial errors or *I* omissions contained herein. The information in this document is *I* subject to change without notice. *I*  *I**************************************************************************++ * FACILITY:* * STARLET_H* * ABSTRACT:*M* This module contains the C function prototypes for the Alpha CALL_PAL5* compatibility system services on non-Alpha systems.* * AUTHOR:* * Clair Grant** CREATION DATE:** 30-April-2002** MODIFICATION HISTORY:*3* X-15 Clair Grant St. Patrick's Day-2004!* Update sys$cflush for 64b PFNs*&* X-14 WBM Brad McCusker 10-Dec-20035* Correct pointer size conditional to be consistent * builtins.h. PTR 75-101-547*%* X-13 WBF Burns Fisher 22-Oct-20035* Remove context argument for SYS$RPCC_64-not needed* now on either architecture.*%* X-12 WBF Burns Fisher 20-Oct-20035* Allow optional argument for SYS$RPCC_64 for compat* with Alpha.*$* X-11 CEG Clair Grant 13-Oct-20033* Put the "#define lowercase UPPERCASE" before the * prototype.*$* X-10 CEG Clair Grant 09-Oct-2003-* Mistakenly uppercased and __INT64. Fix it.*#* X-9 CEG Clair Grant 07-Oct-20035* #define an uppercase version for each service call*$* X-8 WBF Burns Fisher 19-Sep-2003* Add CHMU and CHMS*)* X-7 KLN3306 Karen L. Noel 17-Jun-2003@* o Remove mfpr_fen, mtpr_fen, mfpr_mces, mtpr_mces, mfpr_pcbb./* o Fix pointer_size conditions for C++ usage.*'* X-6 JRK396 Jim Kauffman 31-Oct-2002* Add MFPR_WHAMI_SLOT*$* X-5 WBF Burns Fisher 29-Jul-20026* MFPR_ASTSR and MFPR_ASTEN should have return values*#* X-4 CEG Clair Grant 25-Jul-2002'* Add sys$rpcc_64. Remove sys$pal_rei.* #* X-3 CEG Clair Grant 18-Jul-2002(* Remove sys$pal_bpt and sys$pal_bugchk*)* X-2 KLN3076 Karen L. Noel 19-Jun-20024* Add length argument to sys$pal_imb for IA64 only.*#* X-1 CEG Clair Grant 30-Apr-2002* Original version.*/ /*D** Certain OpenVMS header files expect the __PAL builtins to acceptC** 64-bit pointers regardless of whether the /POINTER_SIZE is usedD** or not. To allow this, we will define a typedef to be used with** those prototypes.*/# if __INITIAL_POINTER_SIZE-# pragma __required_pointer_size __save)# pragma __required_pointer_size 64# ifndef ___VOID__PTR64"# define ___VOID__PTR64 1) typedef void * ___void__ptr64; # endif# else# ifndef ___VOID__PTR64"# define ___VOID__PTR64 13  typedef unsigned __int64 ___void__ptr64; # endif # endif -#define sys$pal_mfpr_asten SYS$PAL_MFPR_ASTEN@unsigned int sys$pal_mfpr_asten(void); /* AST Enable */-#define sys$pal_mtpr_asten SYS$PAL_MTPR_ASTENHunsigned int sys$pal_mtpr_asten(unsigned int __mask); /* AST Enable */-#define sys$pal_mfpr_astsr SYS$PAL_MFPR_ASTSRJunsigned int sys$pal_mfpr_astsr(void); /* AST Summary Register */-#define sys$pal_mtpr_astsr SYS$PAL_MTPR_ASTSRRunsigned int sys$pal_mtpr_astsr(unsigned int __mask); /* AST Summary Register */-#define sys$pal_mtpr_datfx SYS$PAL_MTPR_DATFXOvoid sys$pal_mtpr_datfx(int __value); /* Data Alignment Trap Fixup */)#define sys$pal_mfpr_esp SYS$PAL_MFPR_ESP>void * sys$pal_mfpr_esp(void); /* Executive Stack Pointer */)#define sys$pal_mtpr_esp SYS$PAL_MTPR_ESPCvoid sys$pal_mtpr_esp(void *__addr); /* Executive Stack Pointer */+#define sys$pal_mtpr_ipir SYS$PAL_MTPR_IPIRHvoid sys$pal_mtpr_ipir(__int64 __number); /* Interprocessor Inter Req */)#define sys$pal_mfpr_ipl SYS$PAL_MFPR_IPL<int sys$pal_mfpr_ipl(void); /* Interrupt Priority Level */)#define sys$pal_mtpr_ipl SYS$PAL_MTPR_IPLCint sys$pal_mtpr_ipl(int __value); /* Interrupt Priority Level */+#define sys$pal_mfpr_prbr SYS$PAL_MFPR_PRBR?__int64 sys$pal_mfpr_prbr(void); /* Processor Base Register */+#define sys$pal_mtpr_prbr SYS$PAL_MTPR_PRBRFvoid sys$pal_mtpr_prbr(__int64 __value); /* Processor Base Register */+ #define sys$pal_mtpr_sirr SYS$PAL_MTPR_SIRRGvoid sys$pal_mtpr_sirr(int __level); /* Software Inter Req Register */+#define sys$pal_mfpr_sisr SYS$PAL_MFPR_SISRGunsigned int sys$pal_mfpr_sisr(void); /* Software Int Summ Register */6#define sys$pal_mfpr_ssp SYS$PAL_MFPR_SSP ?void * sys$pal_mfpr_ssp(void); /* Supervisor Stack Pointer */)#define sys$pal_mtpr_ssp SYS$PAL_MTPR_SSPCvoid sys$pal_mtpr_ssp(int *__addr); /* Supervisor Stack Pointer */+#define sys$pal_mtpr_tbia SYS$PAL_MTPR_TBIA8void sys$pal_mtpr_tbia(void); /* User Stack Pointer */-#define sys$pal_mtpr_tbiap SYS$PAL_MTPR_TBIAPAvoid sys$pal_mtpr_tbiap(void); /* T Buffer Inval All Process */+#define sys$pal_mtpr_tbis SYS$PAL_MTPR_TBISJvoid sys$pal_mtpr_tbis(___void__ptr64 __addr); /* T Buffer Inval Single */-#define sys$pal_mtpr_tbisd SYS$PAL_MTPR_TBISDPvoid sys$pal_mtpr_tbisd(___void__ptr64 __addr); /* T Buffer Inval Single Data */-#define sys$pal_mtpr_tbisi SYS$PAL_MTPR_TBISIQ void sys$pal_mtpr_tbisi(___void__ptr64 __addr); /* T Buffer Inval Single Instr */)#define sys$pal_mfpr_usp SYS$PAL_MFPR_USP9void * sys$pal_mfpr_usp(void); /* User Stack Pointer */)#define sys$pal_mtpr_usp SYS$PAL_MTPR_USP>void sys$pal_mtpr_usp(void *__addr); /* User Stack Pointer */-#define sys$pal_mfpr_whami SYS$PAL_MFPR_WHAMI>__int64 sys$pal_mfpr_whami(void); /* Who Am I - from CPUDB */7#define sys$pal_mfpr_whami_slot SYS$PAL_MFPR_WHAMI_SLOTC__int64 sys$pal_mfpr_whami_slot(void); /* Who Am I - from slots */!#define sys$pal_chmu SYS$PAL_CHMU4void sys$pal_chmu(void); /* Change mode to user */!#define sys$pal_chms SYS$PAL_CHMS5void sys$pal_chms(void); /* Change mode to super */ #ifdef __ia64! #define sys$pal_imb SYS$PAL_IMB[ void sys$pal_imb(void * instr, unsigned __int64 length); /* instruction memory barrier */ #else! #define sys$pal_imb SYS$PAL_IMBD void sys$pal_imb(void * instr); /* instruction memory barrier */ #endif %#define sys$pal_prober SYS$PAL_PROBERJint sys$pal_prober(const void *__base_address, int __offset, char __mode);%#define sys$pal_probew SYS$PAL_PROBEWJint sys$pal_probew(const void *__base_address, int __offset, char __mode);##define sys$pal_rd_ps SYS$PAL_RD_PSBunsigned __int64 sys$pal_rd_ps(void); /* read processor status */'#define sys$pal_swasten SYS$PAL_SWASTEN3unsigned int sys$pal_swasten(int __new_state_mask);)#define sys$pal_wr_ps_sw SYS$PAL_WR_PS_SW@void sys$pal_wr_ps_sw(int __mask); /* write processor status */!#define sys$pal_halt SYS$PAL_HALT/void sys$pal_halt(void); /* halt processor */%#define sys$pal_cflush SYS$PAL_CFLUSHAvoid sys$pal_cflush(unsigned __int64 __value); /* cache flush */!#define sys$pal_ldqp SYS$PAL_LDQP7unsigned __int64 sys$pal_ldqp(void *__addr); /* Load */!#define sys$pal_stqp SYS$PAL_STQPFvoid sys$pal_stqp(void *__addr, unsigned __int64 __value); /* Store */J/* NOTE: There are no Alpha C builtins for the following CALL_PALs. SystemG** services are defined for them so that new code can be rewritten in C** and use the services.*/!#define sys$pal_rscc SYS$PAL_RSCCDunsigned __int64 sys$pal_rscc(void); /* read system cycle count */)#define sys$pal_read_unq SYS$PAL_READ_UNQCunsigned __int64 sys$pal_read_unq(void); /* read unique context */+#define sys$pal_write_unq SYS$PAL_WRITE_UNQLvoid sys$pal_write_unq(unsigned __int64 __value); /* store unique context */K/* There is no direct equivalent of the rpcc Alpha instruction on IPF so we: * redefine the C builtin so VMS can provide the function. * on Alpha.  */#define sys$rpcc_64 SYS$RPCC_64#unsigned __int64 sys$rpcc_64(void);# if __INITIAL_POINTER_SIZE0# pragma __required_pointer_size __restore # endif"#endif /* __PAL_SERVICES_LOADED */ww+#ifndef __RAB_LOADED#define __RAB_LOADED 1@/* RMS - V3.0 - Include real RABDEF data structure definition */# include #endif /* __RAB_LOADED */wwK`#ifndef __RMS_LOADED#define __RMS_LOADED 1=/* RMS - V3.0 - Include all RMS data structure definitions */# include # include # include # include # include #endif /* __RMS_LOADED */wwm/* Version X-3 */N/****************************************************************************** *$* COPYRIGHT (c) 1994 BY *9* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS. *+* ALL RIGHTS RESERVED. ** * N* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED *N* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE *N* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER *N* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY *N* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWAR E IS HEREBY *$* TRANSFERRED. ** * O* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * O* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * $* CORPORATION. ** * N* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS *B* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. ** *N*****************************************************************************//**++ * FACILITY:** Open/VMS AXP (STARLET)* * ABSTRACT:*?* This header file will provide big page macros equivalent to ?* the STARLET big page macros which exist for BLISS and Macro.* * AUTHOR:** Karen Noel*!* CREATION DATE: 8-Sep-1994** MODIFICATION HISTORY:*)* X-3 KLN1329 Karen L. Noel 2-Nov-1994,* Work around problem with C in $is_32bits.*+* X-2 KLN1322 Karen L. Noel 19-Sep-1994'* 64-bit Project: Internal programming2* Fix $is_p2_va and $is_process_va to be < not <=* Define roundup argument.*--*/ /**++>* $start_of_page - Calculate the starting address of the page.* * Inputs:* source_va - source address2* page_size - Application supplied page size* * Returns:G* The address of the first byte within the page specified by source_va.*--*/.#define $start_of_page(source_va, page_size) \I(VOID_PQ)((unsigned __int64)source_va & ~(unsigned __int64)(page_size-1)) /* *++6* $next_page - Calculate the address of the next page.* * Inputs:* source_va - source address5* clearbwp - If 1, masks the bwp portion of the VA./* page_size - Application specified page size.* * Returns:F* The address of one page after the source address. If clearbwp is 1,E* the address will be rounded down to be the start of the next page.**--*/4#define $next_page(source_va, clearbwp, page_size) \*(VOID_PQ)(((unsigned __int64)source_va + \+ (unsigned __int64)page_size) & \9 ~(clearbwp * ((unsigned __int64)page_size-1)) ) /* *++>* $previous_page - Calculate the address of the previous page.* * Inputs:* source_va - source address5* clearbwp - If 1, masks the bwp portion of the VA./* page_size - Application specified page size.* * Returns:G* The address of one page before the source address. If clearbwp is 1,I* the address will be rounded down to be the start of the previous page.**--*/9#define $previous_page(source_va, clearbwp, page_size) \*(VOID_PQ)(((unsigned __int64)source_va - \+ (unsigned __int64)page_size) & \9 ~(clearbwp * ((unsigned __int64)page_size-1)) ) /* *++** $pages_to_bytes - Convert pages to bytes* * Inputs:* page_count - Page count5* page_size - Application specified page size.* * Returns:.* Return the number of bytes in source_pagcnt.**--*/G#define $pages_to_bytes(page_count, page_size) (page_count * page_size) /* *+++* $bytes_to_pages - Convert bytes to pages * * Inputs:* byte_count - Byte count5* page_size - Application specified page size.E* roundup = 1 if round up byte_count before calculating page count"* = 0 if no rounding required.* * Returns:.* Return the number of pages in source_pagcnt.**--*/9#define $bytes_to_pages(byte_count, page_size, roundup) \4((byte_count + (roundup*(page_size-1))) / page_size) /**++7* $is_32bits - Test if quadword is 32-bit sign-extended* * Input: arg*** Output: 1 if arg is 32-bit sign-extended(* 0 if arg is not 32-bit sign-extended**--*/#define $is_32bits(arg) \8 ((((__int64)(arg)<<32)>>32) == (unsigned __int64)(arg)) /**++2* $is_p0_va - Test if quadword is P0 space address** Input: arg - 64-bit address*&* Output: 1 if arg is P0 space address$* 0 if arg is not P0 space address**--*/#define $is_p0_va(arg) \ ($is_32bits(arg) && \( !((unsigned int)arg & VA$M_SYSTEM) && \ !((unsigned int)arg & VA$M_P1)) /**++2* $is_p1_va - Test if quadword is P1 space address** Input: arg - 64-bit address*&* Output: 1 if arg is P1 space address$* 0 if arg is not P1 space address**--*/#define $is_p1_va(arg) \ ($is_32bits(arg) && \( !((unsigned int)arg & VA$M_SYSTEM) && \ ((unsigned int)arg & VA$M_P1)) /**++2* $is_p2_va - Test if quadword is P2 space address** Inputs: arg - 64-bit addressD* proc_limit - upper limit on process space, obtained from $GETSYI*&* Output: 1 if arg is P2 space address$* 0 if arg is not P2 space address**--*/##define $is_p2_va(arg,proc_limit) \@ (((unsigned __int64)(arg) >= (unsigned __int64)0x80000000) && \? ((unsigned __int64)(arg) < (unsigned __int64)(proc_limit)))  /**++>* $is_process_va - Test if quadword is a process space address** Inputs: arg - 64-bit addressD* proc_limit - upper limit on process space, obtained from $GETSYI*+* Output: 1 if arg is process space address)* 0 if arg is not process space address**--*/(#define $is_process_va(arg,proc_limit) \= ((unsigned __int64)(arg) < (unsigned __int64)(proc_limit))  /**++<* $is_system_va - Test if quadword is a system space address** Inputs: arg - 64-bit addressE* system_base - Base address of system space, obtained from $GETSYI*** Output: 1 if arg is system space address(* 0 if arg is not system space address**--*/(#define $is_system_va(arg,system_base) \? ((unsigned __int64)(arg) >= (unsigned __int64)(system_base))  /**++3* $is_s0s1_va - Test if quadword is an s0s1 address** Inputs: arg - 64-bit address*"* Output: 1 if arg is s0s1 address * 0 if arg is not s0s1 address**--*/#define $is_s0s1_va(arg) \ ($is_32bits(arg) && \# ((unsigned int)arg & VA$M_SYSTEM)) /**++/* $is_s2_va - Test if quadword is an s2 address** Inputs: arg - 64-bit address* * Output: 1 if arg is s2 address* 0 if arg is not s2 address**--*/$#define $is_s2_va(arg,system_base) \C (((unsigned __int64)(arg) >= (unsigned __int64)(system_base)) && \A ((unsigned __int64)(arg) < (unsigned __int64)(int)0x80000000))ww⯛/*. * Copyright 2002 Compaq Computer Corporation *: * COMPAQ Registered in U.S. Patent and Trademark Office. *@ * Confidential computer software. Valid license from Compaq orC * authoriz ed sublicensor required for possession, use or copying.H * Consistent with FAR 12.211 and 12.212, Commercial Computer Software,F * Computer Software Documentation, and Technical Data for CommercialE * Items are licensed to the U.S. Government under vendor's standard * commercial license. *C * Compaq shall not be liable for technical or editorial errors orC * omissions contained herein. The information in this document is% * subject to change without notice. *I ************************************************************************ *++ * FACILITY: * * VMS Executive (SYS) * * ABSTRACT: *C * This module contains definitions for the IPF compatibility G * routines for the Alpha unprivileged queue PALcode instructions. * * AUTHOR: * * Dennis Mattoon * * CREATION DATE: * * 06-JUN-2002 * * MODIFICATION HISTORY: *' * X-5 DJM Dennis Mattoon 20-NOV-20026 * Moved more symbol definitions and typedefs over to8 * sys_pal_qinst.c. The symbols and struct defs do not7 * need to be availble globaly. They are only used by2 * the queue instruction system service routines. *' * X-4 DJM Dennis Mattoon 15-NOV-20028 * Moved QINST$L_GLOBAL and QINST$Q_GLOBAL declarations8 * out of this module and into SYS_PAL_QINST.C to avoid) * "multiply defined" linker warnings... * *' * X-3 DJM Dennis Mattoon 12-NOV-20021 * Redefined memory-resident self-relative queue2 * instruction builtins to point at corresponding1 * non-resident versions. See comment below for * more details. *C * X-2 DJM Dennis Mattoon 05-NOV-20026 * Removed Alpha specific code (queue system services3 * are now IA64 only) and fixed some status values7 * that did not match the original PALcode definition. *C * X-1 DJM Dennis Mattoon 06-JUN-2002! * Original version. * *-- */#ifndef __SYS_PAL_QINST_LOADED #def ine __SYS_PAL_QINST_LOADED 1F/* The following memory-resident PALcode routines are redefined as */F/* the resident versions of the self-relative queue instructions. */F/* They get redefined because we are unable to safely implement */F/* system service routines that emulate their behaviour exactly. */F/* This is because we have to make sure that isertions and removals */F/* to and from queues are non-interruptable. To ensure this we have */F/* to execute in kernel mode at elevated I PL. If we're callable */F/* from user mode and executing at high ipl we MUST make sure that */F/* we do not incur any memory management exceptons. In order to */F/* do this we have to make certain alignment and memory management */F/* checks, thus negating the whole purpose of executing the memory */F/* resident version of any queue instruction in the first place. */ #ifdef __ia64$#define __PAL_INSQHILR __PAL_INSQHIL$#define __PAL_INSQTILR __PAL_INSQTIL$#define __PAL_REMQHILR __PAL_REMQHIL$#define __PAL_REMQTILR __PAL_REMQTIL$#define __PAL_INSQHIQR __PAL_INSQHIQ$#define __PAL_INSQTIQR __PAL_INSQTIQ$#define __PAL_REMQHIQR __PAL_REMQHIQ$#define __PAL_REMQTIQR __PAL_REMQTIQ#endif#endif /* __SYS_PAL_QINST_H */ww+#ifndef __XAB_LOADED#define __XAB_LOADED 1#pragma nostandard/* XAB - V3.0 */F/* Include all of the definitions for different types of XAB blocks */#include #include #include #include #include #include #include #include #include #include #include #include #include #include #pragma standard#endif /* __XAB_LOADED */wwKB/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by Open VMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $ACCDEF ***/#ifndef __ACCDEF_LOADED#define __ACCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N#define ACC$K_TERMLEN 84 /* TERMINATION MESSAGE LENGTH */N#define ACC$C_TERMLEN 84 /* TERMINATION MESSAGE LENGTH */N/* AND ACCOUNTING RECORD FOR NON BATCH JOBS */T#define ACC$K_JOB_LEN 108 /* LENGTH OF BATCH JOB ACCOUNTING RECORD */T#define ACC$C_JOB_ LEN 108 /* LENGTH OF BATCH JOB ACCOUNTING RECORD */ #ifdef __NEW_STARLETtypedef struct _accdef {N unsigned short int acc$w_msgtyp; /* MESSAGE TYPE CODE */\ unsigned short int acc$w_msgsiz; /* LENGTH OF DATA MESSAGE (VALID ONLY IN ACCLOG) */N unsigned int acc$l_finalsts; /* FINAL EXIT STATUS */N unsigned int acc$l_pid; /* PROCESS ID */X unsigned int acc$l_jobid; /* JOB IDENTIFICATION (VALID ONLY IN ACCLOG) */N unsigned __int64 acc$q_termtime; /* TERMINATION TIME (100NS UNITS) */Q char acc$t_account [8]; /* ACCOUNT NAME STRING (BLANK FILLED) */N char acc$t_username [12]; /* USER NAME STRING (BLANK FILLED) */N unsigned int acc$l_cputim; /* CPUTIM IN 10MS UNITS */N unsigned int acc$l_pageflts; /* TOTAL PAGE FAULTS */N unsigned int acc$l_pgflpeak; /* PEAK PAGING FILE USAGE */N unsigned int acc$l_wspeak; /* PEAK WORKING SET SIZE */O unsigned int acc$l_biocnt; /* COUNT OF BUFFERED I/O OPERATIONS */N unsigned int acc$l_diocnt; /* COUNT OF DIRECT I/O OPERATIONS */N unsigned int acc$l_volumes; /* COUNT OF VOLUMES MOUNTED */N unsigned __int64 acc$q_login; /* LOGIN TIME (100NS UNITS) */N unsigned int acc$l_owner; /* PID OF SUBPROCESS OWNER */N/* END O F TERMINATION MESSAGE */N char acc$t_job_name [8]; /* JOB NAME (BLANK FILLED) */N char acc$t_job_que [16]; /* QUEUE NAME (.ASCIC) */ } ACCDEF;#else /* __OLD_STARLET */struct accdef {N unsigned short int acc$w_msgtyp; /* MESSAGE TYPE CODE */\ unsigned short int acc$w_msgsiz; /* LENGTH OF DATA MESSAGE (VALID ONLY IN ACCLOG) */N unsigned int acc$l_finalsts;  /* FINAL EXIT STATUS */N unsigned int acc$l_pid; /* PROCESS ID */X unsigned int acc$l_jobid; /* JOB IDENTIFICATION (VALID ONLY IN ACCLOG) */N unsigned int acc$q_termtime [2]; /* TERMINATION TIME (100NS UNITS) */Q char acc$t_account [8]; /* ACCOUNT NAME STRING (BLANK FILLED) */N char acc$t_username [12]; /* USER NAME STRING (BLANK FILLED) */N unsigned int acc$l_cputim; /* CPUTIM IN 10MS UNITS */N unsigned int acc$l_pageflts; /* TOTAL PAGE FAULTS */N unsigned int acc$l_pgflpeak; /* PEAK PAGING FILE USAGE */N unsigned int acc$l_wspeak; /* PEAK WORKING SET SIZE */O unsigned int acc$l_biocnt; /* COUNT OF BUFFERED I/O OPERATIONS */N unsigned int acc$l_diocnt; /* COUNT OF DIRECT I/O OPERATIONS */N unsigned int acc$l_volumes; /* COUNT OF VOLUMES MOUNTED */N unsigned int acc$q_login [2]; /* LOGIN TIME (100NS UNITS) */N unsigned int acc$l_owner; /* PID OF SUBPROCESS OWNER */N/* END OF TERMINATION MESSAGE */N char acc$t_job_name [8]; /* JOB NAME (BLANK FILLED) */N char acc$t_job_que [16]; /* QUEUE NAME (.ASCIC) */ } ;%#endif /* #ifdef __NEW_STARLET */P#define ACC$K_PRT_LEN 88 /* LEN GTH OF PRINT ACCOUNTING RECORD */P#define ACC$C_PRT_LEN 88 /* LENGTH OF PRINT ACCOUNTING RECORD */N/* */ #ifdef __NEW_STARLETtypedef struct _accdef1 { char accdef$$_fill_1 [48];N unsigned int acc$l_pagcnt; /* SYMBIONT PAGE COUNT */N unsigned int acc$l_qiocnt; /* SYMBIONT QIO COUNT */N unsigned int acc$l_getcnt; /* SYMBIONT GET COUNT */N unsigned __int64 acc$q_quetime; /* TIME JOB WAS QUEUED */N char acc$t_prt_name [8]; /* NAME OF PRINT JOB */N char acc$t_prt_que [12]; /* NAME OF PRINT QUEUE */N/* DEFINE USER ACCOUNTING MESSAGE DATA AREA */N/* */ } ACCDEF1;#else /* __OLD_STARLET */struct accdef1 { char accdef$$_fill_1 [48];N unsigned int acc$l_pagcnt; /* SYMBIONT PAGE COUNT */N unsigned int acc$l_qiocnt; /* SYMBIONT QIO COUNT */N unsigned int acc$l_getcnt; /* SYMBIONT GET COUNT */N unsigned int acc$q_quetime [2]; /* TIME JOB WAS QUEUED */N char acc$t_prt_name [8]; /* NAME OF PRINT JOB */N char acc$t_prt_que [12]; /* NAME OF PRINT QUEUE */N/* DEFINE USER ACCOUNTING MESSAGE DATA AREA */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */N#define ACC$K_INS_LEN 176 /* LENGTH OF INSERT MESSAGE */N#define ACC$C_INS_LEN 176 /* LENGTH OF INSERT MESSAGE */N/* */N#define ACC$K_PRCTRM 1 /* JOB TERMINATION  */N#define ACC$K_BATTRM 2 /* BATCH JOB TERMINATION */N#define ACC$K_INTTRM 3 /* INTERACTIVE JOB TERMINATION */P#define ACC$K_LOGTRM 4 /* LOGIN FAILURE PROCESS TERMINATION */N#define ACC$K_IMGTRM 5 /* IMAGE TERMINATION */N#define ACC$K_SUBTRM 6 /* SUBPROCESS TERMINATION */N#define ACC$K_DETTRM 7 /* DETACHED PROCESS TERMINATION */N#define ACC$K_NETTRM 8 /* NETWORK PROCESS TERMINATION */N/* MISC ACCOUNTING RECORDS */N#define ACC$K_PRTJOB 16 /* PRINT JOB ACCOUNTING */N#define ACC$K_INSMSG 17 /* INSERTED MESSAGE */N/* */R#define ACC$K_INSMESG 1 /* INSERT MESSAGE INTO ACCOUNTING FILE */N#define ACC$K_NEWFILE 2 /* CREATE A NEW ACCOUNT FILE */N#define ACC$K_ENABACC 3 /* ENABLE ACCOUNTING */N#define ACC$K_DISAACC 4 /* DISABLE ACCOUNTING */N#define ACC$K_ENABSEL 5 /* ENABLE SELECTIVE ACCOUNTING */N#define ACC$K_DISASEL 6 /* DISABLE SELECTIVE ACCOUNTING */ #ifdef __NEW_STARLETtypedef struct _accdef2 { char accdef$$_fill_2 [44];Q char acc$t_user_data [132]; /* ALLOW UP TO 132 BYTES OF USER DATA */N/* ASSIGN RECORD TYPE CODES FOR RECORDS IN THE ACCOUNT LOG FILE */N/* */N/* PROCESS ACCOUNTING RECORDS */N/* DEFINE ACCOUNTING MANAGER MESSAGE CODES */N/* */N/* */ } ACCDEF2;#else /* __OLD_STARLET */struct accdef2 { char accdef$$_fill_2 [44];Q char acc$t_user_data [132]; /* ALLOW UP TO 132 BYTES OF USER DATA */N/* ASSIGN RECORD TYPE CODES FOR RECORDS IN THE ACCOUNT LOG FILE */N/* */N/* PROCESS ACCOUNTING RECORDS */N/* DEFINE ACCOUNTING MANAGER MESSAGE CODES */N/*  */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ACCDEF_LOADED */ wwk/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $ACCESSDEF ***/#ifndef __ACCESS DEF_LOADED#define __ACCESSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* Definitions for Acmode arugment to several MMG system services */N/* */ #define ACCESS$M_LOCK_IMAGE 0x40"#define ACCESS$M_LKWSET_EXACT 0x80 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _access {#pragma __nomember_alignment __union {_ unsigned __i nt64 access$q_quad; /* Combined acmode/arch/prot argument - full 64-bits */ __struct {N unsigned char access$b_mode; /* Access mode */N unsigned char access$b_arch; /* Architecture 3=IA64 */Z unsigned short int access$w_prot; /* Page protection in architecture format */N int access$l_reserved1; /* Reserved */( } access$r_accessdef_fields; __struct {( unsigned access$v_fill1 : 6;V unsigned access$v_lock_image : 1; /* For $LKWSET_64 and $ULWSET_64 only */a unsigned access$v_lkwset_exact : 1; /* For $LKWSET[_64] and $ULWSET[_64] IA64 only */N/* Alpha always performs exact */) unsigned access$v_fill2 : 24;) unsigned access$v_fill3 : 32;& } access$r_accessdef_bits; } access$r_access_union; } ACCESS; #if !defined(__VAXC)9#define access$q_quad access$r_access_union.access$q_quadS#define access$b_mode access$r_access_union.access$r_accessdef_fields.access$b_modeS#define access$b_arch access$r_access_union.access$r_accessdef_fields.access$b_archS#define access$w_prot access$r_access_union.access$r_accessdef_fields.access$w_prot]#define access$l_reserved1 access$r_access_union.access$r_accessdef_fields.access$l_reserved1]#define access$v_lock_image access$r_access_union.access$r_accessdef_bits.access$v_lock_image a#define access$v_lkwset_exact access$r_access_union.access$r_accessdef_bits.access$v_lkwset_exact"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _access {#pragma __nomember_alignment __union {_ unsigned int access$q_quad [2]; /* Combined acmode/arch/prot a rgument - full 64-bits */ __struct {N unsigned char access$b_mode; /* Access mode */N unsigned char access$b_arch; /* Architecture 3=IA64 */Z unsigned short int access$w_prot; /* Page protection in architecture format */N int access$l_reserved1; /* Reserved */( } access$r_accessdef_fields; __struct {( unsigned access$v_fill1 : 6;V unsign ed access$v_lock_image : 1; /* For $LKWSET_64 and $ULWSET_64 only */a unsigned access$v_lkwset_exact : 1; /* For $LKWSET[_64] and $ULWSET[_64] IA64 only */N/* Alpha always performs exact */) unsigned access$v_fill2 : 24;) unsigned access$v_fill3 : 32;& } access$r_accessdef_bits; } access$r_access_union; } access; #if !defined(__VAXC)9#define access$q_quad access$r_access_union.access$q_quadS#define access$b_mode access$r_access_union.access$r_accessdef_fields.access$b_modeS#define access$b_arch access$r_access_union.access$r_accessdef_fields.access$b_archS#define access$w_prot access$r_access_union.access$r_accessdef_fields.access$w_prot]#define access$l_reserved1 access$r_access_union.access$r_accessdef_fields.access$l_reserved1]#define access$v_lock_image access$r_access_union.access$r_accessdef_bits.access$v_lock_imagea#define access$v_lkwset_exact access$r_access_union.access$r_accessdef_bits.access$v_lkwset_exact"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define ACCESS$C_IA64 3 /* IA64 */  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ACCESSDEF_LOADED */ wwޱ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $ACEDEF ***/#ifnde f __ACEDEF_LOADED#define __ACEDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/*  */N/* Access Control list Entry structure definitions */N/* */N/*- */N#define ACE$C_KEYID 1 /* Key identifier entry */N#define ACE$C_RMSJNL_BI 2 /* RMS BI journal */N#define ACE$C_RMSJNL_AI 3 /* RMS AI journal */N#define ACE$C_RMSJNL_AT 4 /* RMS AT journal */N#define ACE$C_AUDIT 5 /* Security audit journal entry */N#define ACE$C_ALARM 6 /* Security alarm entry */N#define ACE$C_INFO 7 /* General purpose information */N#define ACE$C_RMSJNL_RU_DEFAULT 8 /* RU journal default volume */N#define ACE$C_DIRDEF 9 /* Directory default protection */N#define ACE$C_RMSJNL_RU 10 /* RU journal (many per file) */N#define ACE$C_SUBSYSTEM_IDS 11 /* Protected subsystem ids */N#define ACE$C_OIL 12 /* Object Information Label */N#define ACE$C_NEW_OWNER 13 /* Protection for owner ACE */P#define ACE$C_POSIX_OWNER 14 /* Posix UID/GID (persona) from image */N#define ACE$C_MAX_CODE 15 /* Maximum ACE type code plus 1 */N#define ACE$C_RESERVED 255 /* Reserved ACE type */N#define ACE$C_APPLICATION 7 /* Alternate application ACE code */N#define ACE$C_CUST 1 /* Customer defined */N#define ACE$C_CSS 2 /* CSS defined */N#define ACE$C_VMS 3 /* VMS defined */#define ACE$M_SUCCESS 0x1#define ACE$M_FAILURE 0x2#define ACE$M_DEFAULT 0x100#define ACE$M_PROTECTED 0x200#define AC E$M_HIDDEN 0x400#define ACE$M_NOPROPAGATE 0x800#define ACE$M_READ 0x1#define ACE$M_WRITE 0x2#define ACE$M_EXECUTE 0x4#define ACE$M_DELETE 0x8#define ACE$M_CONTROL 0x10N#define ACE$K_LENGTH 8 /* Length of the overhead area */N#define ACE$C_LENGTH 8 /* Length of the overhead area */P#define ACE$C_RMS_ATTRIBUTES 0 /* variant of ACE for file attributes */P#define ACE$K_RMS_ATTRIBUTES 0 /* variant of ACE for file attributes */ N#define ACE$K_RMSATR_MINOR_V50 2 /* minor ID for VMS 5.0 */N#define ACE$K_RMSATR_MINOR_VDW 2 /* minor ID for DECwindows V1.0 */P#define ACE$C_RMSATR_MINOR_ID 2 /* current minor ID (obsolete symbol) */#define ACE$K_RMSATR_MINOR_ID 2N#define ACE$C_RMSATR_MAJOR_ID 1 /* current major ID */#define ACE$K_RMSATR_MAJOR_ID 1#define ACE$M_STATISTICS 0x1#define ACE$M_XLATE_DEC 0x2\#define ACE$S_RMSATR 20 /* size of RMS file attributes ACE (fixed fields) */\#define ACE$S_RMSATR_V50 20 /* size of RMS file attributes ACE (fixed fields) */\#define ACE$S_RMSATR_VDW 20 /* size of RMS file attributes ACE (fixed fields) */N/* Beyond the fixed fields, variable length information will by stored */Q#define ACE$_RMSATR_ORGANIZATION 1 /* organizational extension object ID */N#define ACE$_RMSATR_SEMANTICS 2 /* file semantics object ID */##define ACE$K_RMSATR_ORG_MAX_LEN 6 4##define ACE$K_RMSATR_SEM_MAX_LEN 64N#define ACE$S_RMSJNL_RU_DEFAULT 17 /* length of RMSJNL RU default ACE */"#define ACE$M_JOURNAL_DISABLED 0x1#define ACE$M_BACKUP_DONE 0x2N#define ACE$S_RMSJNL_RU 38 /* length of RMSJNL RU ACE */N#define ACE$S_RMSJNL 50 /* length of RMSJNL AI/BI/AT ACE */N#define ACE$S_OIL_S64I64 32 /* Length of Type 0 OIL ACE */N#define ACE$S_OIL_S128 32 /* Length of Type 1 OIL ACE */N#define ACE$S_OIL 32 /* Maximum OIL ACE Size */ #define ACE$M_USERNAME_VALID 0x1#define ACE$M_UIC_VALID 0x2#define ACE$M_UID_VALID 0x4#define ACE$M_GID_VALID 0x8##define ACE$M_GROUP_MODE_VALID 0x10#define ACE$M_OTHER 0x7#define ACE$M_GROUP 0x38#define ACE$M_USER 0x1C0#define ACE$M_S_IXOTH 0x1#define ACE$M_S_IWOTH 0x2#define ACE$M_S_IROTH 0x4#define ACE$M_S_IXGRP 0x8#define ACE$M_S_IWGRP 0x10#define ACE$M_S_IRGRP 0x20#define ACE$M_ S_IXUSR 0x40#define ACE$M_S_IWUSR 0x80#define ACE$M_S_IRUSR 0x100#define ACE$M_S_ISGID 0x400#define ACE$M_S_ISUID 0x800N#define ACE$S_POSIX_OWNER_LENGTH 60 /* Length of POSIX_OWNER ACE */ #ifdef __NEW_STARLETtypedef struct _acedef {N unsigned char ace$b_size; /* Size of the entry */N unsigned char ace$b_type; /* Type of entry */ __union {Q unsigned short int ace$w_flags; /* Type dependent & indepe ndent flags */N __struct { /* Flags for INFO type ACE */N unsigned ace$v_info_type : 4; /* INFO ACE subtype */( unsigned ace$v_fill_10_ : 4; } ace$r_flags_info;N __struct { /* Flags for KEYID type */N unsigned ace$v_reserved : 4; /* Count of reserved longwords */( unsigned ace$v_fill_11_ : 4; } ace$r_flags_keyid; __struct {N unsigned ace$v_success : 1; /* Audit or alarm upon success */N unsigned ace$v_failure : 1; /* Audit ot alarm upon failure */( unsigned ace$v_fill_12_ : 6; } ace$r_flags_bits0;N __struct { /* Type independent flags */( unsigned ace$v_filler_1 : 8;N unsigned ace$v_default : 1; /* Directory default entry */N unsigned ace$v_protected : 1; /* Protected ACE */N unsigned ace$v_hidden : 1; /* Hidden ACE */Q unsigned ace$v_nopropagate : 1; /* No propagation between versions */( unsigned ace$v_fill_13_ : 4; } ace$r_flags_bits; } ace$r_flags_overlay;N __union { /* Start of ACE overlayed area */N __struct { /* KEY-ID and security audit types */ __union {N unsigned int ace$l_access; /* Access rights bitmask */ __struct {N unsigned ace$v_read : 1; /* Allowed to read */N unsigned ace$v_write : 1; /* Allowed to write */N unsigned ace$v_execute : 1; /* Allowed to execute */N unsigned ace$v_delete : 1; /* Allowed to delete */R unsigned ace$v_control : 1; /* All privileges of the owner */0 unsi gned ace$v_fill_14_ : 3;$ } ace$r_fill_1_; } ace$r_fill_0_; __union {N unsigned int ace$l_key; /* Start of the key fields */S char ace$t_auditname [16]; /* Start of the security journal name */$ } ace$r_key_overlay;! } ace$r_key_aud_type; __struct { __union {P unsigned int ace$l_info_flags; /* INFO type application flags */ __struct {` unsigned short int ace$w_application_flags; /* VMS application flags word */f unsigned short int ace$w_application_facility; /* VMS application facility code */$ } ace$r_fill_3_; } ace$r_fill_2_; __union {N char ace$t_info_start; /* Start of the information */ __struct {j unsigned short int ace$w_rmsatr_variant; /* Which variant of the RMS attributes ACE */Z unsigned char ace$b_rmsatr_fixlen; /* length of fixed format fields */N/* (introduced at minor ID 3. Older */N/* ACE's are assumed to be all fixed form) */N char ace$b_rmsatr_spare1; /* currectly unused */d unsigned short int ace$w_rmsatr_minor_id; /* RMS file attributes ACE minor ID */d unsigned short int ace$w_rmsatr_major_id; /* RMS file attributes ACE major ID */ __union {k unsigned int ace$l_rms_attribute_flags; /* RMS file attributes flags definitions */# __struct {k unsigned ace$v_statistics : 1; /* Statistics monitoring enabled on this file */\ unsigned ace$v_xlate_dec : 1; /* File semantics are DEC-local */8 unsigned ace$v_fill_15_ : 6;, } ace$r_fill_5_;( } ace$r_fill_4_;N/* using a {field-type, length, value} scheme. This allows extensibility */N/* and compact representation. */N/* */N/* field types are: */( } ace$r_rmsatr_type;" } ace$r_info_data; } ace$r_info_type;N __struct { /* Used for all 5 RMSJNL_xxx ACEs */N char ace$t_volnam [12]; /* Volume name of journal file */W unsigned char ace$b_volnam_len; /* Length of volume name of journal file */N unsigned char ace$b_rjrver; /* RMS journal file structure level */N __union { /* File-id of journal file */N unsigned short int ace$w_fid [3]; /* file id */  __struct {N unsigned short int ace$w_fid_num; /* file number */N unsigned short int ace$w_fid_seq; /* sequence number */ __union {W unsigned short int ace$w_fid_rvn; /* relative volume number */# __struct {T unsigned char ace$b_fid_rvn; /* alternate format RVN */f unsigned char ace$b_fid_nmx; /* alternate format file nu mber extension */3 } ace$r_fid_rvn_fields;0 } ace$r_fid_rvn_overlay;' } ace$r_fid_fields;$ } ace$r_fid_overlay; __union {6 unsigned short int ace$w_rmsjnl_flags; __struct {R unsigned ace$v_journal_disabled : 1; /* journaling disabled */N/* (AI, BI, AT only; set by BACKUP) */S unsigned ace$v_backup_done : 1; /* BACKUP done on this file; */N/* RMS needs to write a backup marker */N/* (AI, BI, AT only; set by BACKUP) */0 unsigned ace$v_fill_16_ : 6;. } ace$r_rmsjnl_flags_bits;- } ace$r_rmsjnl_flags_overlay;N unsigned int ace$l_jnlidx; /* journal stream index number */N unsigned __int64 ace$q_cdate; /* creation date/tim e of journal */N unsigned int ace$l_backup_seqno; /* BACKUP sequence number (to */N/* find where to start in journal). */\ unsigned __int64 ace$q_modification_time; /* timestamp of last backup or last */N/* journal entry recovered. */ } ace$r_rmsjnl_type; __struct {N unsigned int ace$l_spare1; /* For alignment */N unsigned int ace$l_sys_prot; /* Default system protection */N unsigned int ace$l_own_prot; /* Default owner protection */N unsigned int ace$l_grp_prot; /* Default group protection */N unsigned int ace$l_wor_prot; /* Default world protection */ } ace$r_dirdef_type;N __struct { /* Protected subsystem ACE type */N unsigned int ace$l_spare2; /* For alignment */N  unsigned __int64 ace$q_image_ids; /* Start of the image ids (a */N/* quadword for each identifier) */" } ace$r_image_id_type;N __struct { /* Object Information Label */N unsigned int ace$l_oil_flags; /* For Alignment */N unsigned int ace$l_brand_name; /* OIL Type-Specific Info */N char ace$r_class_prot; /* OIL Class Block */ } ace$r_oil_type;J/* - POSIX_OWNER ACE, Persona from Image - */N/* Process effective persona derived from image activation. */N/* Support for POSIX/COE effective UID/GID identities granted */N/* to a process if the image has this ACE and it is valid. */N/* The UID and GID are extensions to the Persona Security Block */N/* (PSBDEF). */N/* */N/* Currently, only the SUID, SGID, GID and POSIX_MODE (GROUP) */N/* fields are supported. VMS_GRP_PROT is also used internally. */N/* */N __struct { /* POSIX_OWNER ACE Type */ __union {N unsigned int ace$l_posix_flags; /* POSIX_OWNER Flags */ __struct {V unsigned ace$v_username_valid : 1; /* Validates Posix username */N unsigned ace$v_uic_valid : 1; /* Validates Posix UIC */O unsigned ace$v_uid_valid : 1; /* Validates Posix User ID */P unsigned ace$v_gid_valid : 1; /* Validates Posix Group ID */n unsigned ace$v_group_mode_valid : 1; /* Validates Posix mode for Group file protection */0 unsigned ace $v_fill_17_ : 3;$ } ace$r_fill_7_; } ace$r_fill_6_;N char ace$t_posix_username [32]; /* Posix Username */ __union {N unsigned int ace$l_posix_uic; /* Posix UIC */ __struct {R unsigned short int ace$w_posix_mem; /* Member number in UIC */Q unsigned short int ace$w_posix_grp; /* Group number in UIC */$ } ace$r_fill_9 _; } ace$r_fill_8_;N unsigned int ace$l_posix_uid; /* Posix User ID */N unsigned int ace$l_posix_gid; /* Posix Group ID */ __union {Q unsigned int ace$l_posix_mode; /* Posix file protection (mode) */ __struct {N unsigned ace$v_other : 3; /* Other Permissions */N unsigned ace$v_group : 3; /* Group Permissions */N  unsigned ace$v_user : 3; /* User Permissions */0 unsigned ace$v_fill_18_ : 7;. } ace$r_posix_mode_fields; __struct {N/* - Other Permissions - */Q unsigned ace$v_s_ixoth : 1; /* Posix mode - other execute */O unsigned ace$v_s_iwoth : 1; /* Posix mode - other write */N unsigned ace$v_s_iroth : 1; /* Posix mode - other read */N/* - Group Permissions - */Q unsigned ace$v_s_ixgrp : 1; /* Posix mode - group execute */O unsigned ace$v_s_iwgrp : 1; /* Posix mode - group write */N unsigned ace$v_s_irgrp : 1; /* Posix mode - group read */N/* - User Permissions - */P unsigned ace$v_s_ixusr : 1; /* Posix mode - user execute */N unsigned ace$v_s_iwusr : 1; /* Posix mode - user write */N unsigned ace$v_s_irusr : 1; /* Posix mode - user read */N unsigned ace$v_s_spare : 1; /* Blank bit field */N/* - SxID Bits - */V unsigned ace$v_s_isgid : 1; /* Posix set group ID on execution */U unsigned ace$v_s_isuid : 1; /* Posix set user ID on execution */0 unsigned ace$v_fill_19_ : 4;, } ace$r_posix_mode_bits;+ } ace$r_posix_mode_overlay;N unsigned int ace$l_vms_grp_prot; /* Posix to VMS Group Prot. */% } ace$r_posix_owner_type;N/* End - POSIX_OWNER ACE */ } ace$r_ace_fields; } ACEDEF; #if !defined(__VAXC)3#define ace$w_flags ace$r_flags_overlay.ace$w_flagsL#define ace$v_info_type ace$r_flags_overlay.ace$r_flags_info.ace$v_info_typeK#define ace$v_reserved ace$r_flags_overlay.ace$r_flags_keyid.ace$v_reservedI#define ace$v_success ace$r_flags_overlay.ace$r_flags_bits0.ace$v_successI#define ace$v_failure ace$r_flags_overlay.ace$r_flags_bits0.ace$v_failureH#define ace$v_default ace$r_flags_overlay.ace$r_flags_bits.ace$v_defaultL#define ace$v_protected ace$r_flags_overlay.ace$r_flags_bits.ace$v_protectedF#define ace$v_hidden ace$r_flags_overlay.ace$r_flags_bits.ace$v_hiddenP#define ace$v_nopropagate ace$r_flags_overlay.ace$r_flags_bits.ace$v_nopropagateS#define ace$l_access ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$l_access]#define ace$v_read ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$r_fill_1_.ace$v_read_#define ace$v_write ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$r_fill_1_.ace$v_writec#define ace$v_execute ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$r_fill_1_.ace$v_executea#define ace$v_delete ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$r_fill_1_.ace$v_deletec#define ace$v_control ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$r_fill_1_.ace$v_controlQ#define ace$l_key ace$r_ace_fields.ace$r_key_aud_type.ace$r_key_overlay.ace$l_key]#define ace$t_auditname ace$r_ace_fields.ace$r_key_aud_type.ace$r_key_overlay.ace$t_auditnameX#define ace$l_info_flags ace$r_ace_fields.ace$r_info_type.ace$r_fill_2_.ace$l_info_flagst#define ace$w_application_flags ace$r_ace_fields.ace$r_info_type.ace$r_fill_2_.ace$r_fill_3_.ace$w_application_flagsz#define ace$w_application_facility ace$r_ace_fields.ace$r_info_type.ace$r_fill_2_.ace$r_fill_3_.ace$w_application_facilityZ#define ace$t_info_start ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$t_info_startt#define ace$w_rmsatr_variant ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$w_rmsatr_variantr#define ace$b_rmsatr_fixlen ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$b_rmsatr_fixlenv#define ace$w_rmsatr_minor_id ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$w_rmsatr_minor_idv#define ace$w_rmsatr_major_id ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$w_rmsatr_major_id#define ace$l_rms_attribute_flags ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$r_fill_4_.ace$l_rms_attrib\ ute_flags#define ace$v_statistics ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$r_fill_4_.ace$r_fill_5_.ace$v_stati\stics#define ace$v_xlate_dec ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$r_fill_4_.ace$r_fill_5_.ace$v_xlate_\decD#define ace$t_volnam ace$r_ace_fields.ace$r_rmsjnl_type.ace$t_volnamL#define ace$b_volnam_len ace$r_ace_fields.ace$r_rmsjnl_type.ace$b_volnam_lenD#define ace$b_rjrver ace$r_ace_fields.ace$r_rmsjnl_type.ace$b_rjrverN#define ace$r_fid_overlay ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_fid_overlay-#define ace$w_fid ace$r_fid_overlay.ace$w_fid;#define ace$r_fid_fields ace$r_fid _overlay.ace$r_fid_fields4#define ace$w_fid_num ace$r_fid_fields.ace$w_fid_num4#define ace$w_fid_seq ace$r_fid_fields.ace$w_fid_seqD#define ace$r_fid_rvn_overlay ace$r_fid_fields.ace$r_fid_rvn_overlay9#define ace$w_fid_rvn ace$r_fid_rvn_overlay.ace$w_fid_rvnG#define ace$r_fid_rvn_fields ace$r_fid_rvn_overlay.ace$r_fid_rvn_fields8#define ace$b_fid_rvn ace$r_fid_rvn_fields.ace$b_fid_rvn8#define ace$b_fid_nmx ace$r_fid_rvn_fields.ace$b_fid_nmxk#define ace$w_rmsjnl_flags ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_rmsjnl_flags_overlay.ace$w_rmsjnl_flags#define ace$v_journal_disabled ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_rmsjnl_flags_overlay.ace$r_rmsjnl_flags_bits.ace$v_journal_\disabled#define ace$v_backup_done ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_rmsjnl_flags_overlay.ace$r_rmsjnl_flags_bits.ace$v_backup_doneD#define ace$l_jnlidx ace$r_ace_fields.ace$r_rmsjnl_type.ace$l_jnlidxB#define ace$q_cdate ace$r_ace_fields.ace$r_rmsjnl_type.ace$q_cdateP#define ace$l_backup_seqno ace$r_ace_fields.ace$r_rmsjnl_type.ace$l_backup_seqnoZ#define ace$q_modification_time ace$r_ace_fields.ace$r_rmsjnl_type.ace$q_modification_timeD#define ace$l_spare1 ace$r_ace_fields.ace$r_dirdef_type.ace$l_spare1H#define ace$l_sys_prot ace$r_ace_fields.ace$r_dirdef_type.ace$l_sys_protH#define ace$l_own_prot ace$r_ace_fields.ace$r_dirdef_type.ace$l_own_protH#define ace$l_grp_prot ace$r_ace_fields.ace$r_dirdef_type.ace$l_grp_protH#define ace$l_wor_prot ace$r_ace_fields.ace$r_dirdef_type.ace$l_wor_protF#define ace$l_spare2 ace$r_ace_fields.ace$r_image_id_type.ace$l_spare2L#define ace$q_image_ids ace$r_ace_fields.ace$r_image_id_type.ace$q_image_idsG#define ace$l_oil_flags ace$r_ace_fields.ace$r_oil_type.ace$l_oil_flagsI#define ace$l_brand_name ace$r_ace_fields.ace$r_oil_type.ace$l_brand_nameI#define ace$r_class_prot ace$r_ace_fields.ace$r_oil_type.ace$r_class_prota#define ace$l_posix_flags ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$l_posix_flagsu#define ace$v_username_valid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$r_fill_7_.ace$v_username_validk#define ace$v_uic_valid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$r_fill_7_.ace$v_uic_validk#define ace$v_uid_valid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$r_fill_7_.ace$v_uid_validk#define ace$v_gid_valid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$r_fill_7_.ace$v_gid_validy#define ace$v_group_mode_valid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$r_fill_7_.ace$v_group_mode_validY#define ace$t_posix_username ace$r_ace_fields.ace$r_posix_owner_type.ace$t_posix_username]#define ace$l_posix_uic ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_8_.ace$l_posix_uick#define ace$w_posix_mem ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_8_.ace$r_fill_9_.ace$w_posix_memk#define ace$w_posix_grp ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_8_.ace$r_fill_9_.ace$w_posix_grpO#define ace$l_posix_uid ace$r_ace_fields.ace$r_posix_owner_type.ace$l_posix_uidO#define ace$l_posix_gid ace$r_ace_fields.ace$r_posix_owner_type.ace$l_posix_gidj#define ace$l_posix_mode ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$l_posix_modex#define ace$v_other ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_fields.ace$v_otherx#define ace$v_group ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_fields.ace$v_groupv#define ace$v_user ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_fields.ace$v_userz#define ace$v_s_ixoth ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_ixothz#define ace$v_s_iwoth ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_iwothz#define ace$v_s_iroth ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_irothz#define ace$v_s_ixgrp ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_ixgrpz#define ace$v_s_iwgrp ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_iwgrpz#define ace$v_s_irgrp ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_irgrpz#define ace$v_s_ixusr ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_ixusrz#define ace$v_s_iwusr ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posi x_mode_overlay.ace$r_posix_mode_bits.ace$v_s_iwusrz#define ace$v_s_irusr ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_irusrz#define ace$v_s_spare ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_sparez#define ace$v_s_isgid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_isgidz#define ace$v_s_isuid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_ove rlay.ace$r_posix_mode_bits.ace$v_s_isuidU#define ace$l_vms_grp_prot ace$r_ace_fields.ace$r_posix_owner_type.ace$l_vms_grp_prot"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct acedef {N unsigned char ace$b_size; /* Size of the entry */N unsigned char ace$b_type; /* Type of entry */ __union {Q unsigned short int ace$w_flags; /* Type dependent & independent flags */N __struct {  /* Flags for INFO type ACE */N unsigned ace$v_info_type : 4; /* INFO ACE subtype */( unsigned ace$v_fill_10_ : 4; } ace$r_flags_info;N __struct { /* Flags for KEYID type */N unsigned ace$v_reserved : 4; /* Count of reserved longwords */( unsigned ace$v_fill_11_ : 4; } ace$r_flags_keyid; __struct {N unsigned ace$v_success : 1 ; /* Audit or alarm upon success */N unsigned ace$v_failure : 1; /* Audit ot alarm upon failure */( unsigned ace$v_fill_12_ : 6; } ace$r_flags_bits0;N __struct { /* Type independent flags */( unsigned ace$v_filler_1 : 8;N unsigned ace$v_default : 1; /* Directory default entry */N unsigned ace$v_protected : 1; /* Protected ACE */N unsigned ace$v _hidden : 1; /* Hidden ACE */Q unsigned ace$v_nopropagate : 1; /* No propagation between versions */( unsigned ace$v_fill_13_ : 4; } ace$r_flags_bits; } ace$r_flags_overlay;N __union { /* Start of ACE overlayed area */N __struct { /* KEY-ID and security audit types */ __union {N unsigned int ace$l_access; /* Access rights bitmask */ __struct {N unsigned ace$v_read : 1; /* Allowed to read */N unsigned ace$v_write : 1; /* Allowed to write */N unsigned ace$v_execute : 1; /* Allowed to execute */N unsigned ace$v_delete : 1; /* Allowed to delete */R unsigned ace$v_control : 1; /* All privileges of the owner */0 unsigned ace$v_fill_14_ : 3;$  } ace$r_fill_1_; } ace$r_fill_0_; __union {N unsigned int ace$l_key; /* Start of the key fields */S char ace$t_auditname [16]; /* Start of the security journal name */$ } ace$r_key_overlay;! } ace$r_key_aud_type; __struct { __union {P unsigned int ace$l_info_flags; /* INFO type application flags */ __struct {` unsigned s hort int ace$w_application_flags; /* VMS application flags word */f unsigned short int ace$w_application_facility; /* VMS application facility code */$ } ace$r_fill_3_; } ace$r_fill_2_; __union {N char ace$t_info_start; /* Start of the information */ __struct {j unsigned short int ace$w_rmsatr_variant; /* Which variant of the RMS attributes ACE */Z unsigned char ace$b_rmsatr_fixlen; /* length of fixed format fields */N/* (introduced at minor ID 3. Older */N/* ACE's are assumed to be all fixed form) */N char ace$b_rmsatr_spare1; /* currectly unused */d unsigned short int ace$w_rmsatr_minor_id; /* RMS file attributes ACE minor ID */d unsigned short int ace$w_rmsatr_major_id; /* RMS file attributes ACE maj or ID */ __union {k unsigned int ace$l_rms_attribute_flags; /* RMS file attributes flags definitions */# __struct {k unsigned ace$v_statistics : 1; /* Statistics monitoring enabled on this file */\ unsigned ace$v_xlate_dec : 1; /* File semantics are DEC-local */8 unsigned ace$v_fill_15_ : 6;, } ace$r_fill_5_;(  } ace$r_fill_4_;N/* using a {field-type, length, value} scheme. This allows extensibility */N/* and compact representation. */N/* */N/* field types are: */( } ace$r_rmsatr_type;" } ace$r_info_data; } ace$r_info_type;N __struct { /* Used for all 5 RMSJNL_xxx ACEs */N char ace$t_volnam [12]; /* Volume name of journal file */W unsigned char ace$b_volnam_len; /* Length of volume name of journal file */N unsigned char ace$b_rjrver; /* RMS journal file structure level */N __union { /* File-id of journal file */N unsigned short int ace$w_fid [3]; /* file id */ __struct {N unsigned short int ace$w_fid_num; /* file number */N unsigned short int ace$w_fid_seq; /* sequence number */ __union {W unsigned short int ace$w_fid_rvn; /* relative volume number */# __struct {T unsigned char ace$b_fid_rvn; /* alternate format RVN */f unsigned char ace$b_fid_nmx; /* alternate format file number extension */3  } ace$r_fid_rvn_fields;0 } ace$r_fid_rvn_overlay;' } ace$r_fid_fields;$ } ace$r_fid_overlay; __union {6 unsigned short int ace$w_rmsjnl_flags; __struct {R unsigned ace$v_journal_disabled : 1; /* journaling disabled */N/* (AI, BI, AT only; set by BACKUP) */S unsigned ace$v_backup_done : 1; /* BACKUP done on th is file; */N/* RMS needs to write a backup marker */N/* (AI, BI, AT only; set by BACKUP) */0 unsigned ace$v_fill_16_ : 6;. } ace$r_rmsjnl_flags_bits;- } ace$r_rmsjnl_flags_overlay;N unsigned int ace$l_jnlidx; /* journal stream index number */N unsigned int ace$q_cdate [2]; /* creation date/time of journal */N unsigned int ace$l_backup_seqno; /* BACKUP sequence number (to */N/* find where to start in journal). */\ unsigned int ace$q_modification_time [2]; /* timestamp of last backup or last */N/* journal entry recovered. */ } ace$r_rmsjnl_type; __struct {N unsigned int ace$l_spare1; /* For alignment */N unsigned int ace$l_sys_prot; /* Default system protection */N unsigned int ace$l_own_prot; /* Default owner protection */N unsigned int ace$l_grp_prot; /* Default group protection */N unsigned int ace$l_wor_prot; /* Default world protection */ } ace$r_dirdef_type;N __struct { /* Protected subsystem ACE type */N unsigned int ace$l_spare2; /* For alignment */N unsigned int ace$q_image_ids [2]; /* Start  of the image ids (a */N/* quadword for each identifier) */" } ace$r_image_id_type;N __struct { /* Object Information Label */N unsigned int ace$l_oil_flags; /* For Alignment */N unsigned int ace$l_brand_name; /* OIL Type-Specific Info */N char ace$r_class_prot; /* OIL Class Block */ } ace$r_oil_type;J/* - POSIX_OWNER ACE, Persona from Image - */N/* Process effective persona derived from image activation. */N/* Support for POSIX/COE effective UID/GID identities granted */N/* to a process if the image has this ACE and it is valid. */N/* The UID and GID are extensions to the Persona Security Block */N/* (PSBDEF). */N/*  */N/* Currently, only the SUID, SGID, GID and POSIX_MODE (GROUP) */N/* fields are supported. VMS_GRP_PROT is also used internally. */N/* */N __struct { /* POSIX_OWNER ACE Type */ __union {N unsigned int ace$l_posix_flags; /* POSIX_OWNER Flags */ __struct {V  unsigned ace$v_username_valid : 1; /* Validates Posix username */N unsigned ace$v_uic_valid : 1; /* Validates Posix UIC */O unsigned ace$v_uid_valid : 1; /* Validates Posix User ID */P unsigned ace$v_gid_valid : 1; /* Validates Posix Group ID */n unsigned ace$v_group_mode_valid : 1; /* Validates Posix mode for Group file protection */0 unsigned ace$v_fill_17_ : 3;$ } ace$ r_fill_7_; } ace$r_fill_6_;N char ace$t_posix_username [32]; /* Posix Username */ __union {N unsigned int ace$l_posix_uic; /* Posix UIC */ __struct {R unsigned short int ace$w_posix_mem; /* Member number in UIC */Q unsigned short int ace$w_posix_grp; /* Group number in UIC */$ } ace$r_fill_9_; } ace$r_fill_8_;N  unsigned int ace$l_posix_uid; /* Posix User ID */N unsigned int ace$l_posix_gid; /* Posix Group ID */ __union {Q unsigned int ace$l_posix_mode; /* Posix file protection (mode) */ __struct {N unsigned ace$v_other : 3; /* Other Permissions */N unsigned ace$v_group : 3; /* Group Permissions */N unsigned ace$v_user : 3; /* User P ermissions */0 unsigned ace$v_fill_18_ : 7;. } ace$r_posix_mode_fields; __struct {N/* - Other Permissions - */Q unsigned ace$v_s_ixoth : 1; /* Posix mode - other execute */O unsigned ace$v_s_iwoth : 1; /* Posix mode - other write */N unsigned ace$v_s_iroth : 1; /* Posix mode - other read */N/* - Group Permissions - ! */Q unsigned ace$v_s_ixgrp : 1; /* Posix mode - group execute */O unsigned ace$v_s_iwgrp : 1; /* Posix mode - group write */N unsigned ace$v_s_irgrp : 1; /* Posix mode - group read */N/* - User Permissions - */P unsigned ace$v_s_ixusr : 1; /* Posix mode - user execute */N unsigned ace$v_s_iwusr :" 1; /* Posix mode - user write */N unsigned ace$v_s_irusr : 1; /* Posix mode - user read */N unsigned ace$v_s_spare : 1; /* Blank bit field */N/* - SxID Bits - */V unsigned ace$v_s_isgid : 1; /* Posix set group ID on execution */U unsigned ace$v_s_isuid : 1; /* Posix set user ID on execution */0 unsigned ace$v_fill_19_ : 4;, # } ace$r_posix_mode_bits;+ } ace$r_posix_mode_overlay;N unsigned int ace$l_vms_grp_prot; /* Posix to VMS Group Prot. */% } ace$r_posix_owner_type;N/* End - POSIX_OWNER ACE */ } ace$r_ace_fields; } ; #if !defined(__VAXC)3#define ace$w_flags ace$r_flags_overlay.ace$w_flagsL#define ace$v_info_type ace$r_flags_overlay.ace$r_flags_info.ace$v_info_typeK#define ace$v_reserv$ed ace$r_flags_overlay.ace$r_flags_keyid.ace$v_reservedI#define ace$v_success ace$r_flags_overlay.ace$r_flags_bits0.ace$v_successI#define ace$v_failure ace$r_flags_overlay.ace$r_flags_bits0.ace$v_failureH#define ace$v_default ace$r_flags_overlay.ace$r_flags_bits.ace$v_defaultL#define ace$v_protected ace$r_flags_overlay.ace$r_flags_bits.ace$v_protectedF#define ace$v_hidden ace$r_flags_overlay.ace$r_flags_bits.ace$v_hiddenP#define ace$v_nopropagate ace$r_flags_overlay.ace$r_flags_bits.ace$v_nop%ropagateS#define ace$l_access ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$l_access]#define ace$v_read ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$r_fill_1_.ace$v_read_#define ace$v_write ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$r_fill_1_.ace$v_writec#define ace$v_execute ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$r_fill_1_.ace$v_executea#define ace$v_delete ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$r_fill_1_.ace$v_deletec#define ace$v_&control ace$r_ace_fields.ace$r_key_aud_type.ace$r_fill_0_.ace$r_fill_1_.ace$v_controlQ#define ace$l_key ace$r_ace_fields.ace$r_key_aud_type.ace$r_key_overlay.ace$l_key]#define ace$t_auditname ace$r_ace_fields.ace$r_key_aud_type.ace$r_key_overlay.ace$t_auditnameX#define ace$l_info_flags ace$r_ace_fields.ace$r_info_type.ace$r_fill_2_.ace$l_info_flagst#define ace$w_application_flags ace$r_ace_fields.ace$r_info_type.ace$r_fill_2_.ace$r_fill_3_.ace$w_application_flagsz#define ace$w_application_faci'lity ace$r_ace_fields.ace$r_info_type.ace$r_fill_2_.ace$r_fill_3_.ace$w_application_facilityZ#define ace$t_info_start ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$t_info_startt#define ace$w_rmsatr_variant ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$w_rmsatr_variantr#define ace$b_rmsatr_fixlen ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$b_rmsatr_fixlenv#define ace$w_rmsatr_minor_id ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_r(msatr_type.ace$w_rmsatr_minor_idv#define ace$w_rmsatr_major_id ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$w_rmsatr_major_id#define ace$l_rms_attribute_flags ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$r_fill_4_.ace$l_rms_attrib\ ute_flags#define ace$v_statistics ace$r_ace_fields.ace$r_info_type.ace$r_info_data.ace$r_rmsatr_type.ace$r_fill_4_.ace$r_fill_5_.ace$v_stati\stics#define ace$v_xlate_dec ace$r_ace_fields.ace$r_info_type.ace$r_i)nfo_data.ace$r_rmsatr_type.ace$r_fill_4_.ace$r_fill_5_.ace$v_xlate_\decD#define ace$t_volnam ace$r_ace_fields.ace$r_rmsjnl_type.ace$t_volnamL#define ace$b_volnam_len ace$r_ace_fields.ace$r_rmsjnl_type.ace$b_volnam_lenD#define ace$b_rjrver ace$r_ace_fields.ace$r_rmsjnl_type.ace$b_rjrverP#define ace$w_fid ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_fid_overlay.ace$w_fidi#define ace$w_fid_num ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_fid_overlay.ace$r_fid_fields.ace$w_fid_numi#define ace$w_fid_seq *ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_fid_overlay.ace$r_fid_fields.ace$w_fid_seq#define ace$w_fid_rvn ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_fid_overlay.ace$r_fid_fields.ace$r_fid_rvn_overlay.ace$w_fid_rvn#define ace$b_fid_rvn ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_fid_overlay.ace$r_fid_fields.ace$r_fid_rvn_overlay.ace$r_fid_rvn_fie\lds.ace$b_fid_rvn#define ace$b_fid_nmx ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_fid_overlay.ace$r_fid_fields.ace$r_fid_rvn_overlay.ace$r_fid_rvn_fie\ld+s.ace$b_fid_nmxk#define ace$w_rmsjnl_flags ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_rmsjnl_flags_overlay.ace$w_rmsjnl_flags#define ace$v_journal_disabled ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_rmsjnl_flags_overlay.ace$r_rmsjnl_flags_bits.ace$v_journal_\disabled#define ace$v_backup_done ace$r_ace_fields.ace$r_rmsjnl_type.ace$r_rmsjnl_flags_overlay.ace$r_rmsjnl_flags_bits.ace$v_backup_doneD#define ace$l_jnlidx ace$r_ace_fields.ace$r_rmsjnl_type.ace$l_jnlidxB#define ace$q_cdate ace$r_ace_fi,elds.ace$r_rmsjnl_type.ace$q_cdateP#define ace$l_backup_seqno ace$r_ace_fields.ace$r_rmsjnl_type.ace$l_backup_seqnoZ#define ace$q_modification_time ace$r_ace_fields.ace$r_rmsjnl_type.ace$q_modification_timeD#define ace$l_spare1 ace$r_ace_fields.ace$r_dirdef_type.ace$l_spare1H#define ace$l_sys_prot ace$r_ace_fields.ace$r_dirdef_type.ace$l_sys_protH#define ace$l_own_prot ace$r_ace_fields.ace$r_dirdef_type.ace$l_own_protH#define ace$l_grp_prot ace$r_ace_fields.ace$r_dirdef_type.ace$l_grp_protH#def-ine ace$l_wor_prot ace$r_ace_fields.ace$r_dirdef_type.ace$l_wor_protF#define ace$l_spare2 ace$r_ace_fields.ace$r_image_id_type.ace$l_spare2L#define ace$q_image_ids ace$r_ace_fields.ace$r_image_id_type.ace$q_image_idsG#define ace$l_oil_flags ace$r_ace_fields.ace$r_oil_type.ace$l_oil_flagsI#define ace$l_brand_name ace$r_ace_fields.ace$r_oil_type.ace$l_brand_nameI#define ace$r_class_prot ace$r_ace_fields.ace$r_oil_type.ace$r_class_prota#define ace$l_posix_flags ace$r_ace_fields.ace$r_posix_owner._type.ace$r_fill_6_.ace$l_posix_flagsu#define ace$v_username_valid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$r_fill_7_.ace$v_username_validk#define ace$v_uic_valid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$r_fill_7_.ace$v_uic_validk#define ace$v_uid_valid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$r_fill_7_.ace$v_uid_validk#define ace$v_gid_valid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$r_fill_7_.ace$v_gid_validy#define ace$v_gr/oup_mode_valid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_6_.ace$r_fill_7_.ace$v_group_mode_validY#define ace$t_posix_username ace$r_ace_fields.ace$r_posix_owner_type.ace$t_posix_username]#define ace$l_posix_uic ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_8_.ace$l_posix_uick#define ace$w_posix_mem ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_8_.ace$r_fill_9_.ace$w_posix_memk#define ace$w_posix_grp ace$r_ace_fields.ace$r_posix_owner_type.ace$r_fill_8_.ace$r_fill_9_.ace$w_po0six_grpO#define ace$l_posix_uid ace$r_ace_fields.ace$r_posix_owner_type.ace$l_posix_uidO#define ace$l_posix_gid ace$r_ace_fields.ace$r_posix_owner_type.ace$l_posix_gidj#define ace$l_posix_mode ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$l_posix_modex#define ace$v_other ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_fields.ace$v_otherx#define ace$v_group ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_1fields.ace$v_groupv#define ace$v_user ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_fields.ace$v_userz#define ace$v_s_ixoth ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_ixothz#define ace$v_s_iwoth ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_iwothz#define ace$v_s_iroth ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_i2rothz#define ace$v_s_ixgrp ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_ixgrpz#define ace$v_s_iwgrp ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_iwgrpz#define ace$v_s_irgrp ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_irgrpz#define ace$v_s_ixusr ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_ixusrz#def3ine ace$v_s_iwusr ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_iwusrz#define ace$v_s_irusr ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_irusrz#define ace$v_s_spare ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_sparez#define ace$v_s_isgid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_isgidz#define ace$v_ 4s_isuid ace$r_ace_fields.ace$r_posix_owner_type.ace$r_posix_mode_overlay.ace$r_posix_mode_bits.ace$v_s_isuidU#define ace$l_vms_grp_prot ace$r_ace_fields.ace$r_posix_owner_type.ace$l_vms_grp_prot"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#e5ndif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ACEDEF_LOADED */ wwۡ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************* 6***********************//*** MODULE $ACLDEF ***/#ifndef __ACLDEF_LOADED#define __ACLDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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-bi7t 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 N#define ACL$K_LENGTH 12 /* Lengt8h of the overhead area */N#define ACL$C_LENGTH 12 /* Length of the overhead area */N#define ACL$C_FILE 1 /* Files */N#define ACL$C_DEVICE 2 /* MBX, MT, TT, etc. */N#define ACL$C_JOBCTL_QUEUE 3 /* Job controller queue */N#define ACL$C_COMMON_EF_CLUSTER 4 /* Common event flag clusters */N#define ACL$C_LOGICAL_NAME_TABLE 5 /* Logical name tables 9 */N#define ACL$C_PROCESS 6 /* Process */N#define ACL$C_GROUP_GLOBAL_SECTION 7 /* Group global sections */N#define ACL$C_SYSTEM_GLOBAL_SECTION 8 /* System global sections */N#define ACL$C_CAPABILITY 9 /* Capability */N#define ACL$C_EVENT_FACILITY 10 /* Event facility */N#define ACL$C_LOCK 11 /* Lock block/resource */N#define ACL$C_VOLUME: 12 /* Disk volume (set) */N#define ACL$C_MAX_OBJECT 13 /* max object code */N#define ACL$C_NUM_OBJECTS 12 /* number of objects */N#define ACL$K_NUM_OBJECTS 12 /* number of objects */N/* Action codes */N#define ACL$C_ADDACLENT 1 /* Add an ACL entry */N#define ACL$C_DELACLENT 2 /* Del;ete an ACL entry */N#define ACL$C_MODACLENT 3 /* Modify an ACL entry */N#define ACL$C_FNDACLENT 4 /* Locate an ACL entry */N#define ACL$C_FNDACETYP 5 /* Locate specific ACE type */N#define ACL$C_DELETEACL 6 /* Delete ACL, leaving protected */N#define ACL$C_READACL 7 /* Read the ACL */N#define ACL$C_ACLLENGTH 8 /* Get the ACL's length < */N#define ACL$C_READACE 9 /* Read a single ACE */N#define ACL$C_RLOCK_ACL 10 /* Read lock on ACL */N#define ACL$C_WLOCK_ACL 11 /* Write lock on ACL */N#define ACL$C_UNLOCK_ACL 12 /* Release exclusive lock */N#define ACL$C_GRANT_ACE 13 /* ACE granting access */N#define ACL$C_NEXT_ACE 14 /* Increment ACE number */N#define ACL$C_DELE=TE_ALL 15 /* Delete entire ACL */N#define ACL$C_RESERVED_ITEM_2 16 /* Reserved item code */N#define ACL$C_RESERVED_ITEM_3 17 /* Reserved item code */N#define ACL$S_ADDACLENT 255 /* Add an ACL entry */N#define ACL$S_DELACLENT 255 /* Delete an ACL entry */N#define ACL$S_MODACLENT 255 /* Modify an ACL entry */N#define ACL$S_FNDACLENT 255 /* L>ocate an ACL entry */N#define ACL$S_FNDACETYP 255 /* Locate specific ACE type */N#define ACL$S_DELETEACL 255 /* Delete ACL, leaving protected */N#define ACL$S_READACL 512 /* Read the ACL */N#define ACL$S_ACLLENGTH 4 /* Get the ACL's length */N#define ACL$S_READACE 255 /* Read a single ACE */N#define ACL$S_RLOCK_ACL 4 /* Read lock on ACL ? */N#define ACL$S_WLOCK_ACL 4 /* Write lock on ACL */N#define ACL$S_UNLOCK_ACL 4 /* Remove lock on ACL */N#define ACL$S_GRANT_ACE 255 /* ACE granting access */N#define ACL$S_NEXT_ACE 4 /* Increment ACE number */N#define ACL$S_DELETE_ALL 255 /* Delete entire ACL */N#define ACL$S_RESERVED_ITEM_2 255 /* Reserved item code */N#define ACL$S_RE @SERVED_ITEM_3 255 /* Reserved item code */N#define ACL$C_MAX_SEGMENT_SIZE 512 /* Maximum ACL segemnt size */N#define ACL$K_MAX_SEGMENT_SIZE 512 /* Maximum ACL segemnt size */ #ifdef __NEW_STARLETtypedef struct _acldef {U unsigned int acl$l_flink; /* Forward link to next list in the queue */R unsigned int acl$l_blink; /* Back link to previous list in queue */N unsigned short int acl$w_size; /* Total size of t Ahe list */N unsigned char acl$b_type; /* Structure type code */N char acldef$$_fill_1; /* Spare unused byte */R unsigned int acl$l_list; /* Start of the Access Control Entries */N/* Object types */ } ACLDEF;#else /* __OLD_STARLET */struct acldef {U unsigned int acl$l_flink; /* Forward link to next list in the queue */R unBsigned int acl$l_blink; /* Back link to previous list in queue */N unsigned short int acl$w_size; /* Total size of the list */N unsigned char acl$b_type; /* Structure type code */N char acldef$$_fill_1; /* Spare unused byte */R unsigned int acl$l_list; /* Start of the Access Control Entries */N/* Object types */ } ;%#endif /* C#ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ACLDEF_LOADED */ wwﲛ/******************************************************************************************************************************* D*/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */T/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]ACLEDIT$ROUTINES.SDI;1 *//********************************************************************************************************************************/+/*** MODULE ACLEDIT$ROUTINES IDENT X-1 ***/!#ifndef __ACLEDIT_ROUTINES_LOADED##define __ACLEDIT_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignEment __save#pragma __nomember_alignmentR#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 F#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 N/* */N/* Access Control List Editor (ACLEDIT) Routine */N/* */N/* G */N/* ACLEDIT$EDIT - Edit Access Control List */N/* */N/* status = ACLEDIT$EDIT (item_list) */N/* */N/* item_list - Itemlist for operation */N/* H */##define acledit$edit ACLEDIT$EDIT #ifdef __NEW_STARLETunsigned int acledit$edit( unsigned int *item_list);#else /* __OLD_STARLET */,unsigned int acledit$edit(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#i Ifdef __cplusplus }#endif#pragma __standard &#endif /* __ACLEDIT_ROUTINES_LOADED */ ww+e/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//******************************************************************************************************* J*************************/#/*** MODULE $acmedef IDENT X-8 ***/#ifndef __ACMEDEF_LOADED#define __ACMEDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 deKfault 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 N/*+ L */N/* */N/* Miscellaneous constants */N/* */N/*- */N#define ACME$K_MAXCHAR_ITEM 16383 /* Maximum length (in characters) */N/* of an item M */N#define ACME$K_MAXCHAR_DOI_NAME 32 /* Maximum length (in characters) */N/* of a DOI name string */N#define ACME$K_MAXCHAR_PRINCIPAL_NAME 512 /* Maximum length (in characters) */N/* of a principal name string */N#define ACME$K_MAX_NUM_AGENTS 32 /* Maximum number of ACME agents */N/* that can be loaded */N#definNe ACME$K_MAX_CRED_TYPE 32 /* Maximum number of credential */N/* types supported */N/*+ */N/* */N/* ACME agent id */N/* */N/* An ACME agent id is a 32-bitO unsigned value, encoded as follows: */N/* */O/* Remote host address type is a 16-bit unsigned value, encoded as follows: */N/* */N/* 3 2 2 1 1 */N/* 1 4 3 6 5 8 7 0 */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-P+-+-+-+-+-+-+ */N/* | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* ^.............................^ ^ ^...........................^ */N/* | | | | | */c/* | | | +---------------------------+-- Bit [14:0] = ACME number */N/* | | | Q */m/* | | +-------------------------------- Bit [15] = 0 ==> Ancillary agent */l/* | | 1 ==> Registered DOI */N/* | | */e/* +-----------------------------+---------------------------------- Bit [31:16] = Server number */N/* */NR/*- */ !#pragma __member_alignment __save#pragma __nomember_alignment #define ACMEID$M_ACME_NUM 0x7FFF&#define ACMEID$M_DOI_DESIGNATOR 0x8000&#define ACMEID$M_SERVER_NUM 0xFFFF0000 #ifdef __NEW_STARLETtypedef struct _acmeid { __union {N unsigned int acmeid$l_agent_id; /* Composite id */ __struct {N unsigned acmeid$v_acme_num : 15; /* ACME agent number S */N unsigned acmeid$v_doi_designator : 1; /* Registered DOI */N unsigned acmeid$v_server_num : 16; /* Server number */ } acmeid$r_fill_21_; } acmeid$r_fill_20_; } ACMEID; #if !defined(__VAXC)=#define acmeid$l_agent_id acmeid$r_fill_20_.acmeid$l_agent_idO#define acmeid$v_acme_num acmeid$r_fill_20_.acmeid$r_fill_21_.acmeid$v_acme_num[#define acmeid$v_doi_designator acmeid$r_fill_20_.acmeid$r_fill_21_.acmeid$v_doi_desig TnatorS#define acmeid$v_server_num acmeid$r_fill_20_.acmeid$r_fill_21_.acmeid$v_server_num"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmeid { __union {N unsigned int acmeid$l_agent_id; /* Composite id */ __struct {N unsigned acmeid$v_acme_num : 15; /* ACME agent number */N unsigned acmeid$v_doi_designator : 1; /* Registered DOI */N unsigned acmeid$v_server U_num : 16; /* Server number */ } acmeid$r_fill_21_; } acmeid$r_fill_20_; } acmeid; #if !defined(__VAXC)=#define acmeid$l_agent_id acmeid$r_fill_20_.acmeid$l_agent_idO#define acmeid$v_acme_num acmeid$r_fill_20_.acmeid$r_fill_21_.acmeid$v_acme_num[#define acmeid$v_doi_designator acmeid$r_fill_20_.acmeid$r_fill_21_.acmeid$v_doi_designatorS#define acmeid$v_server_num acmeid$r_fill_20_.acmeid$r_fill_21_.acmeid$v_server_num"#endif /* #if !defined(__VAXC V) */ %#endif /* #ifdef __NEW_STARLET */#define ACMEID$K_LENGTH 4 $#pragma __member_alignment __restore N/*+ */N/* */N/* $ACM Function Codes and Modifiers */N/* */N/* Function code plus modifiers form a 32-bit unsigned value,W encoded */N/* as follows: */N/* */N/* 3 2 2 1 1 */N/* 1 4 3 6 5 8 7 0 */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | */N/* +-+-X+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* ^.............................^ ^.................^ ^.........^ */N/* | | | | | | */e/* | | | | +---------+-- Bit [5:0] = function code */N/* | | | | */p/* | | +-----------------+-------------- Bit [15:06] = crossY function modifiers */N/* | | */s/* +-----------------------------+---------------------------------- Bit [31:16] = function specific modifiers */N/*- */N/* */N/* Function codes */N/* Z */N/* Function code values */N#define ACME$_AUTHENTICATE_PRINCIPAL 1 /* AUTHENTICATE_PRINCIPAL */N#define ACME$_CHANGE_PASSWORD 2 /* CHANGE_PASSWORD */N#define ACME$_RELEASE_CREDENTIALS 3 /* RELEASE_CREDENTIALS */N#define ACME$_QUERY 4 /* QUERY */N#define ACME$_EVENT 5 /* EVENT [ */N/* Function code value */N#define ACME$_FREE_CONTEXT 63 /* FREE_CONTEXT */N/* Function code values */N#define ACME$_FC_AUTHENTICATE_PRINCIPAL 1 /* AUTHENTICATE_PRINCIPAL */N#define ACME$_FC_CHANGE_PASSWORD 2 /* CHANGE_PASSWORD */N#define ACME$_FC_RELEASE_CREDENTIALS 3 /* RELEASE_CREDENTIALS */N#define ACME$_FC \_QUERY 4 /* QUERY */N#define ACME$_FC_EVENT 5 /* EVENT */N/* Function code value */N#define ACME$_FC_FREE_CONTEXT 63 /* FREE_CONTEXT */ !#pragma __member_alignment __save#pragma __nomember_alignment#define ACMEFC$M_FUNCTION 0x3F%#define ACMEFC$M_MODIFIERS 0xFFFFFFC0#define ACME$M_NOAUDIT 0x40#define ACME$M_TIMEOUT 0x80]#define ACME$M_UCS2_4 0x8000*#define ACME$M_ACQUIRE_CREDENTIALS 0x10000$#define ACME$M_MERGE_PERSONA 0x20000##define ACME$M_COPY_PERSONA 0x40000'#define ACME$M_OVERRIDE_MAPPING 0x80000-#define ACME$M_NATIVE_AUTHENTICATION 0x100000'#define ACME$M_NOAUTHORIZATION 0x200000,#define ACME$M_FOREIGN_POLICY_HINTS 0x400000)#define ACME$M_DEFAULT_PRINCIPAL 0x800000 #ifdef __NEW_STARLETtypedef struct _acmefc { __union {N/* ^ */N/* Overall function code/modifiers structure */N/* */ __union {N unsigned int acmefc$l_fcode_struct; /* Composite field */ __struct {/ unsigned acmefc$v_function : 6;N/* Function code */1 unsigned acmefc$v_modifiers : 26;N/* Function modifiers _ */$ } acmefc$r_fill_23_; } acmefc$r_fill_22_;N/* */N/* Modifiers applicable to all function codes */N/* */ __union {( unsigned int acme$l_gen_mod; __struct {3 unsigned acme$v_gen_mod_fill_1 : 6 `;N unsigned acme$v_noaudit : 1; /* Suppress auditing */N unsigned acme$v_timeout : 1; /* Timed operation */3 unsigned acme$v_gen_mod_fill_2 : 7;T unsigned acme$v_ucs2_4 : 1; /* Strings are in 4-byte UCS-2 format */4 unsigned acme$v_gen_mod_fill_3 : 16;" } acme$r_fill_25_; } acmefc$r_fill_24_;N/* */ aN/* Modifiers applicable to AUTHENTICATE_PRINCIPAL/CHANGE_PASSWORD */N/* */ __union {) unsigned int acme$l_auth_mod; __struct {5 unsigned acme$v_auth_mod_fill_1 : 16;R unsigned acme$v_acquire_credentials : 1; /* Acquire credentials */T unsigned acme$v_merge_persona : 1; /* Merge with base credentials */N unsigned acmbe$v_copy_persona : 1; /* Copy base credentials */` unsigned acme$v_override_mapping : 1; /* Override VMS username mapping checks */` unsigned acme$v_native_authentication : 1; /* Allow native DOI authentication */T unsigned acme$v_noauthorization : 1; /* Skip authorization checks */a unsigned acme$v_foreign_policy_hints : 1; /* Honor NOAUDIT and NOAUTHORIZATION */N/* for non-native authentications c */W unsigned acme$v_default_principal : 1; /* Use principal name and DOI */N/* designator defined by the */N/* primary persona extension */4 unsigned acme$v_auth_mod_fill_2 : 8;" } acme$r_fill_27_; } acmefc$r_fill_26_; } acmefc$r_overlay; } ACMEFC; #if !defined(__VAXC)V#define acmefc$l_fcode_struct acmefc$r_overlay.acmefdc$r_fill_22_.acmefc$l_fcode_struct`#define acmefc$v_function acmefc$r_overlay.acmefc$r_fill_22_.acmefc$r_fill_23_.acmefc$v_functionb#define acmefc$v_modifiers acmefc$r_overlay.acmefc$r_fill_22_.acmefc$r_fill_23_.acmefc$v_modifiersX#define acme$v_noaudit acmefc$r_overlay.acmefc$r_fill_24_.acme$r_fill_25_.acme$v_noauditX#define acme$v_timeout acmefc$r_overlay.acmefc$r_fill_24_.acme$r_fill_25_.acme$v_timeoutV#define acme$v_ucs2_4 acmefc$r_overlay.acmefc$r_fill_24_.acme$r_fill_25_.acme$v_ucs2_4p#defeine acme$v_acquire_credentials acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_acquire_credentialsd#define acme$v_merge_persona acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_merge_personab#define acme$v_copy_persona acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_copy_personaj#define acme$v_override_mapping acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_override_mappingt#define acme$v_native_authentication acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27 f_.acme$v_native_authenticationh#define acme$v_noauthorization acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_noauthorizationr#define acme$v_foreign_policy_hints acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_foreign_policy_hintsl#define acme$v_default_principal acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_default_principal"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmefc { __union {N/* g */N/* Overall function code/modifiers structure */N/* */ __union {N unsigned int acmefc$l_fcode_struct; /* Composite field */ __struct {/ unsigned acmefc$v_function : 6;N/* Function code */1 unsigned acmefc$v_modi hfiers : 26;N/* Function modifiers */$ } acmefc$r_fill_23_; } acmefc$r_fill_22_;N/* */N/* Modifiers applicable to all function codes */N/* */ __union {( unsigned int acme$l_gen_mod; __struct {3 i unsigned acme$v_gen_mod_fill_1 : 6;N unsigned acme$v_noaudit : 1; /* Suppress auditing */N unsigned acme$v_timeout : 1; /* Timed operation */3 unsigned acme$v_gen_mod_fill_2 : 7;T unsigned acme$v_ucs2_4 : 1; /* Strings are in 4-byte UCS-2 format */4 unsigned acme$v_gen_mod_fill_3 : 16;" } acme$r_fill_25_; } acmefc$r_fill_24_;N/* j */N/* Modifiers applicable to AUTHENTICATE_PRINCIPAL/CHANGE_PASSWORD */N/* */ __union {) unsigned int acme$l_auth_mod; __struct {5 unsigned acme$v_auth_mod_fill_1 : 16;R unsigned acme$v_acquire_credentials : 1; /* Acquire credentials */T unsigned acme$v_merge_persona : 1; /* Merge with base credenktials */N unsigned acme$v_copy_persona : 1; /* Copy base credentials */` unsigned acme$v_override_mapping : 1; /* Override VMS username mapping checks */` unsigned acme$v_native_authentication : 1; /* Allow native DOI authentication */T unsigned acme$v_noauthorization : 1; /* Skip authorization checks */a unsigned acme$v_foreign_policy_hints : 1; /* Honor NOAUDIT and NOAUTHORIZATION */N/* for non-native authentications l */W unsigned acme$v_default_principal : 1; /* Use principal name and DOI */N/* designator defined by the */N/* primary persona extension */4 unsigned acme$v_auth_mod_fill_2 : 8;" } acme$r_fill_27_; } acmefc$r_fill_26_; } acmefc$r_overlay; } acmefc; #if !defined(__VAXC)V#define acmefcm$l_fcode_struct acmefc$r_overlay.acmefc$r_fill_22_.acmefc$l_fcode_struct`#define acmefc$v_function acmefc$r_overlay.acmefc$r_fill_22_.acmefc$r_fill_23_.acmefc$v_functionb#define acmefc$v_modifiers acmefc$r_overlay.acmefc$r_fill_22_.acmefc$r_fill_23_.acmefc$v_modifiersX#define acme$v_noaudit acmefc$r_overlay.acmefc$r_fill_24_.acme$r_fill_25_.acme$v_noauditX#define acme$v_timeout acmefc$r_overlay.acmefc$r_fill_24_.acme$r_fill_25_.acme$v_timeoutV#define acme$v_ucs2_4 acmefc$r_overlay.acmefc$r_fill_2n4_.acme$r_fill_25_.acme$v_ucs2_4p#define acme$v_acquire_credentials acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_acquire_credentialsd#define acme$v_merge_persona acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_merge_personab#define acme$v_copy_persona acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_copy_personaj#define acme$v_override_mapping acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_override_mappingt#define acme$v_native_authentication acmefc$r_ovoerlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_native_authenticationh#define acme$v_noauthorization acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_noauthorizationr#define acme$v_foreign_policy_hints acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_foreign_policy_hintsl#define acme$v_default_principal acmefc$r_overlay.acmefc$r_fill_26_.acme$r_fill_27_.acme$v_default_principal"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define ACMEFC$K_LENGTH p4 $#pragma __member_alignment __restore N/*+ */N/* */N/* $ACM Item Codes */N/* */N/* Item codes are 16-bit unsigned values, encoded as follows: */N/* q */N/* 1 */N/* 5 8 7 0 */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* | | | | | | | | | | | | | | | | | */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* ^ ^ ^ ^ ^ */N/*r | | | | | */N/* | | | +-----------------------+-- Bit [12:0] = item */N/* | | | */d/* | | +---------------------------- Bit [13] = 0 ==> not subject to VTF-7 <-> UCS conversion */`/* | | 1 ==> subject to VTF-7 <-> UCS conversion */N/* | | s */N/* | +------------------------------ Bit [14] = 0 ==> input item */N/* | 1 ==> output item */N/* | */N/* +-------------------------------- Bit [15] = 0 ==> common item */O/* 1 ==> ACME specific item */N/* */N/*- t */N/* Specialty */N/* Cross function */N/* AUTHENTICATE_PRINCIPAL/CHANGE_PASSWORD */N/* RELEASE_CREDENTIALS */N/* QUERY */N/* EVENT u */ !#pragma __member_alignment __save#pragma __nomember_alignment#define ACMEIC$M_ITEM 0x1FFF#define ACMEIC$M_UCS 0x2000#define ACMEIC$M_OUTPUT 0x4000%#define ACMEIC$M_ACME_SPECIFIC 0x8000 #ifdef __NEW_STARLETtypedef struct _acmeic { __union {N unsigned short int acmeic$w_item_code; /* Composite field */ __struct {N unsigned acmeic$v_item : 13; /* Ranged value */[ vunsigned acmeic$v_ucs : 1; /* 0 ==> not subject to VTF-7 <-> UCS conversion */N/* 1 ==> subject to VTF-7 <-> UCS conversion */N unsigned acmeic$v_output : 1; /* 0 ==> input item */N/* 1 ==> output item */N unsigned acmeic$v_acme_specific : 1; /* 0 ==> common item */N/* 1 ==> ACME specific item */ } acmeic$r_f will_29_; } acmeic$r_fill_28_; } ACMEIC; #if !defined(__VAXC)?#define acmeic$w_item_code acmeic$r_fill_28_.acmeic$w_item_codeG#define acmeic$v_item acmeic$r_fill_28_.acmeic$r_fill_29_.acmeic$v_itemE#define acmeic$v_ucs acmeic$r_fill_28_.acmeic$r_fill_29_.acmeic$v_ucsK#define acmeic$v_output acmeic$r_fill_28_.acmeic$r_fill_29_.acmeic$v_outputY#define acmeic$v_acme_specific acmeic$r_fill_28_.acmeic$r_fill_29_.acmeic$v_acme_specific"#endif /* #if !defined(__VAXC) */ #e xlse /* __OLD_STARLET */typedef struct _acmeic { __union {N unsigned short int acmeic$w_item_code; /* Composite field */ __struct {N unsigned acmeic$v_item : 13; /* Ranged value */[ unsigned acmeic$v_ucs : 1; /* 0 ==> not subject to VTF-7 <-> UCS conversion */N/* 1 ==> subject to VTF-7 <-> UCS conversion */N unsigned acmeic$v_output : 1; /* 0 ==> input item */ yN/* 1 ==> output item */N unsigned acmeic$v_acme_specific : 1; /* 0 ==> common item */N/* 1 ==> ACME specific item */ } acmeic$r_fill_29_; } acmeic$r_fill_28_; } acmeic; #if !defined(__VAXC)?#define acmeic$w_item_code acmeic$r_fill_28_.acmeic$w_item_codeG#define acmeic$v_item acmeic$r_fill_28_.acmeic$r_fill_29_.acmeic$v_itemE#define acmeic$v_u zcs acmeic$r_fill_28_.acmeic$r_fill_29_.acmeic$v_ucsK#define acmeic$v_output acmeic$r_fill_28_.acmeic$r_fill_29_.acmeic$v_outputY#define acmeic$v_acme_specific acmeic$r_fill_28_.acmeic$r_fill_29_.acmeic$v_acme_specific"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define ACMEIC$K_LENGTH 2 $#pragma __member_alignment __restore N/* */N/* Input item codes not subject to VTF-7 <-> UCS { conversion */N/* */#define ACME$_MIN_SPEC_IN 1N/* Specialty items */Y#define ACME$_NULL 1 /* Place holder item (skip entry in item list) */P#define ACME$_CHAIN 2 /* Chain to another item list segment */#define ACME$_MAX_SPEC_IN 2#define ACME$_MIN_GEN_IN 256N/* Generic items | */P#define ACME$_ACCESS_MODE 256 /* Access mode for persona operations */N#define ACME$_DIALOGUE_SUPPORT 257 /* Dialogue capabilities */N#define ACME$_CONTEXT_ACME_ID 258 /* ID of ACME for specific context */N#define ACME$_PERSONA_HANDLE_IN 259 /* Target persona */N#define ACME$_TARGET_DOI_ID 260 /* ID of DOI for a directed call */N#define ACME$_TIMEOUT_INTERVAL 261 /* Timeout interval in seconds } */#define ACME$_MAX_GEN_IN 261!#define ACME$_MIN_AUTH_PWD_IN 512N/* AUTHENTICATE_PRINCIPAL/CHANGE_PASSWORD items */N#define ACME$_AUTH_MECHANISM 512 /* Authentication mechanism */N#define ACME$_CHALLENGE_DATA 513 /* Challenge data */N#define ACME$_LOGON_TYPE 514 /* Logon type */P#define ACME$_NEW_PASSWORD_FLAGS 515 /* New password request/control flags */N#define ACME$_REMOTE_HOST_ADDRES ~S 516 /* Remote host address */P#define ACME$_REMOTE_HOST_ADDRESS_TYPE 517 /* Remote host address type/format */N#define ACME$_RESPONSE_DATA 518 /* Response data */!#define ACME$_MAX_AUTH_PWD_IN 518!#define ACME$_MIN_REL_CRED_IN 768N/* RELEASE_CREDENTIALS items */U#define ACME$_CREDENTIALS_TYPE 768 /* Index associated with persona extension */!#define ACME$_MAX_REL_CRED_IN 768#define ACME$_MIN_QU ERY_IN 1024N/* QUERY items */N#define ACME$_QUERY_KEY_TYPE 1024 /* Key type */N#define ACME$_QUERY_KEY_VALUE 1025 /* Key value */X#define ACME$_QUERY_TYPE 1026 /* Type of data to be returned via QUERY_DATA */#define ACME$_MAX_QUERY_IN 1026#define ACME$_MIN_EVENT_IN 1280N/* EVENT items */N#define ACME$_EVENT_DATA_IN 1280 /* Event function input data */N#define ACME$_EVENT_TYPE 1281 /* Event type */#define ACME$_MAX_EVENT_IN 1281N/* */N/* Input item codes subject to VTF-7 <-> UCS conversion */N/* */!#define ACME$_MIN_GEN_IN_UCS 8448N/* Generic items  */O#define ACME$_CONTEXT_ACME_NAME 8448 /* Name of ACME for specific context */N#define ACME$_LOCALE 8449 /* Language specifier (location) */N#define ACME$_TARGET_DOI_NAME 8450 /* Name of DOI for a directed call */N#define ACME$_SERVER_NAME_IN 8451 /* ACME relative server name */N#define ACME$_SERVICE_NAME 8452 /* Caller's service name */!#define ACME$_MAX_GEN_IN_UCS 8452&#define ACME$_MIN_AUTH_PWD_IN_UCS 8704N/* AUTHENTICATE_PRINCIPAL/CHANGE_PASSWORD items */N#define ACME$_ACCESS_PORT 8704 /* Access port name */N#define ACME$_NEW_PASSWORD_1 8705 /* New primary password */N#define ACME$_NEW_PASSWORD_2 8706 /* New secondary password */N#define ACME$_NEW_PASSWORD_SYSTEM 8707 /* New system password */N#define ACME$_PASSWORD_1 8708 /* Primary password */N#define ACME$_PASSWORD_2 8709 /* Secondary password */N#define ACME$_PASSWORD_SYSTEM 8710 /* System password */N#define ACME$_PRINCIPAL_NAME_IN 8711 /* Principal name */N#define ACME$_REMOTE_HOST_FULLNAME 8712 /* Remote host expanded name */N#define ACME$_REMOTE_HOST_NAME 8713 /* Remote host name */N#define ACME$_REMOTE_USERNAME 8714 /* Remote username */&#define ACME$_MAX_AUTH_PWD_IN_UCS 8714&#define ACME$_MIN_REL_CRED_IN_UCS 8960N/* RELEASE_CREDENTIALS items */T#define ACME$_CREDENTIALS_NAME 8960 /* Name associated with persona extension */&#define ACME$_MAX_REL_CRED_IN_UCS 8960N/* */N/* Output item codes not subject to VTF-7 <-> UCS conversion */N/* */ #define ACME$_MIN_SPEC_OUT 163 85N/* Specialty items */$#define ACME$_PHASE_TRANSITION 16385 #define ACME$_MAX_SPEC_OUT 16385#define ACME$_MIN_GEN_OUT 16640N/* Generic items */N#define ACME$_PERSONA_HANDLE_OUT 16640 /* Persona acted upon */#define ACME$_MAX_GEN_OUT 16640$#define ACME$_MIN_AUTH_PWD_OUT 16896N/* AUTHENTICATE_PRINCIPAL/CHANGE_PASSWORD items */N#def ine ACME$_AUTHENTICATING_DOI_ID 16896 /* ID of DOI accepting principal */N#define ACME$_LOGON_INFORMATION 16897 /* Logon information */N#define ACME$_MAPPING_ACME_ID 16898 /* ID of ACME mapping principal */$#define ACME$_MAX_AUTH_PWD_OUT 16898!#define ACME$_MIN_QUERY_OUT 17408N/* QUERY items */N#define ACME$_QUERY_DATA 17408 /* Query function output data */!#define ACME$_MAX_QUERY_OUT 17408!#define ACME$_MIN_EVENT_OUT 17664N/* EVENT items */N#define ACME$_EVENT_DATA_OUT 17664 /* Event function output data */!#define ACME$_MAX_EVENT_OUT 17664N/* */N/* Output item codes subject to VTF-7 <-> UCS conversion */N/* */##define ACME$_MIN_GEN_OUT_UCS 2483 2N/* Generic items */N#define ACME$_SERVER_NAME_OUT 24832 /* ACME relative server name */##define ACME$_MAX_GEN_OUT_UCS 24832(#define ACME$_MIN_AUTH_PWD_OUT_UCS 25088N/* AUTHENTICATE_PRINCIPAL/CHANGE_PASSWORD items */Q#define ACME$_AUTHENTICATING_DOI_NAME 25088 /* Name of DOI accepting principal */N#define ACME$_MAPPED_VMS_USERNAME 25089 /* Resultant VMS Username */N#define ACME$_MAPP ING_ACME_NAME 25090 /* Name of ACME mapping principal */N#define ACME$_PRINCIPAL_NAME_OUT 25091 /* Processed principal name */(#define ACME$_MAX_AUTH_PWD_OUT_UCS 25091N/* */N/* Logon (Job) Type Values */N/* */#define ACME$K_NETWORK 1#define ACME$K_BATCH 2#define ACME$K_LOCAL 3#define ACME$K_DIALUP 4#define ACME$K_REMOTE 5N/*+ */N/* */N/* Revision Level */N/* */N/* Revision level is a 16-bit unsigned value, encoded as follows: */N/*  */N/* 1 */N/* 5 8 7 0 */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* | | | | | | | | | | | | | | | | | */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* ^.............^ ^.............^ */N/* |  | | | */N/* | | +-------------+-- Bit [7:0] = revision minor id */N/* | | */N/* +-------------+------------------ Bit [15:8] = revision major id */N/* */N/*- */ !#pragma __member_alignment __save#pragma __nomember_alignment&#define ACMEREVLVL$K_MINOR_ID_BITPOS 0&#define ACMEREVLVL$K_MAJOR_ID_BITPOS 8 #ifdef __NEW_STARLETtypedef struct _acmerevlvl { __union {N unsigned short int acmerevlvl$w_revision_level; /* Composite field */ __struct {N unsigned char acmerevlvl$b_minor_id; /* Revision level minor id */N unsigned char acmerevlvl$b_major_id; /* Revision level major id */$ } acmerevlvl$r_fill_31_; } acmerevl vl$r_fill_30_; } ACMEREVLVL; #if !defined(__VAXC)U#define acmerevlvl$w_revision_level acmerevlvl$r_fill_30_.acmerevlvl$w_revision_level_#define acmerevlvl$b_minor_id acmerevlvl$r_fill_30_.acmerevlvl$r_fill_31_.acmerevlvl$b_minor_id_#define acmerevlvl$b_major_id acmerevlvl$r_fill_30_.acmerevlvl$r_fill_31_.acmerevlvl$b_major_id"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmerevlvl { __union {N unsigned short int acmerevlvl$w_re vision_level; /* Composite field */ __struct {N unsigned char acmerevlvl$b_minor_id; /* Revision level minor id */N unsigned char acmerevlvl$b_major_id; /* Revision level major id */$ } acmerevlvl$r_fill_31_; } acmerevlvl$r_fill_30_; } acmerevlvl; #if !defined(__VAXC)U#define acmerevlvl$w_revision_level acmerevlvl$r_fill_30_.acmerevlvl$w_revision_level_#define acmerevlvl$b_minor_id acmerevlvl$r_fill_30_.acmerevlvl$r_fill_31_.acmere vlvl$b_minor_id_#define acmerevlvl$b_major_id acmerevlvl$r_fill_30_.acmerevlvl$r_fill_31_.acmerevlvl$b_major_id"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define ACMEREVLVL$K_LENGTH 2 $#pragma __member_alignment __restore N/*+ */N/* */N/* Authentication Mechanism  */N/* */O/* Authentication mechanism is a 16-bit unsigned value, encoded as follows: */N/* */N/* 3 2 2 1 1 */N/* 1 4 3 6 5 8 7 0 */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* ^.............................^ ^ ^...........................^ */N/* | | | | | */p/* | | | +---------------------------+-- Bit [14:0] = authentication mechanism */N/* | | | */p/* |  | +-------------------------------- Bit [15] = 0 ==> standard mechanism */w/* | | 1 ==> vendor specific mechanism */N/* | | */n/* +-----------------------------+---------------------------------- Bit [31:16] = vendor's facility code */N/* */N/*-  */N/* */N/* Standard mechanism types */J/* */N#define ACMEMECH$K_PASSWORD 1 /* Username-Password */N#define ACMEMECH$K_CHALLENGE_RESPONSE 2 /* Challenge-Response */ !#pragma __member_alignment __sav e#pragma __nomember_alignment(#define ACMEMECH$M_MECHANISM_TYPE 0x7FFF+#define ACMEMECH$M_FACILITY_SPECIFIC 0x8000 #ifdef __NEW_STARLETtypedef struct _acmemech { __union {N unsigned short int acmemech$w_mechanism; /* Composite field */ __struct {S unsigned acmemech$v_mechanism_type : 15; /* Authentication mechanism */U unsigned acmemech$v_facility_specific : 1; /* 0 ==> standard mechanism */N/* 1 ==> facility specific mechanism  */" } acmemech$r_fill_33_; } acmemech$r_fill_32_;Q unsigned short int acmemech$w_facility; /* Vendor's assigned facility code */ } ACMEMECH; #if !defined(__VAXC)E#define acmemech$w_mechanism acmemech$r_fill_32_.acmemech$w_mechanismc#define acmemech$v_mechanism_type acmemech$r_fill_32_.acmemech$r_fill_33_.acmemech$v_mechanism_typei#define acmemech$v_facility_specific acmemech$r_fill_32_.acmemech$r_fill_33_.acmemech$v_facili ty_specific"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmemech { __union {N unsigned short int acmemech$w_mechanism; /* Composite field */ __struct {S unsigned acmemech$v_mechanism_type : 15; /* Authentication mechanism */U unsigned acmemech$v_facility_specific : 1; /* 0 ==> standard mechanism */N/* 1 ==> facility specific mechanism */" } acmeme ch$r_fill_33_; } acmemech$r_fill_32_;Q unsigned short int acmemech$w_facility; /* Vendor's assigned facility code */ } acmemech; #if !defined(__VAXC)E#define acmemech$w_mechanism acmemech$r_fill_32_.acmemech$w_mechanismc#define acmemech$v_mechanism_type acmemech$r_fill_32_.acmemech$r_fill_33_.acmemech$v_mechanism_typei#define acmemech$v_facility_specific acmemech$r_fill_32_.acmemech$r_fill_33_.acmemech$v_facility_specific"#endif /* #if !defined(__VAXC) */ %#endif  /* #ifdef __NEW_STARLET */#define ACMEMECH$K_LENGTH 4 $#pragma __member_alignment __restore N/*+ */N/* */N/* Remote Host Address Type */N/* */O/* Remote host address type is a 16-bit unsigned value, encoded as follows: */N/* */N/* 3 2 2 1 1 */N/* 1 4 3 6 5 8 7 0 */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* ^.............................^ ^ ^...........................^ */N/* | | | | | */y/* | | | +---------------------------+-- Bit [14:0] = network protocol (address format) */N/* | | | */o/* | | +-------------------------------- Bit [15] = 0 ==> standard protocol */v/* | |  1 ==> vendor specific protocol */N/* | | */n/* +-----------------------------+---------------------------------- Bit [31:16] = vendor's facility code */N/* */N/*- */N/* */N/* Standard protocol types */N/* */N#define ACMEHAT$K_DECNET_IV 1 /* DECnet Phase IV */N#define ACMEHAT$K_DECNET_OSI 2 /* DECnet OSI */N#define ACMEHAT$K_IP_V4 3 /* Internet Protocol V4 */N#define ACMEHAT$K_IP_V6 4 /* Internet Protocol V6 */ !#pragma __member_alignment  __save#pragma __nomember_alignment&#define ACMEHAT$M_PROTOCOL_TYPE 0x7FFF*#define ACMEHAT$M_FACILITY_SPECIFIC 0x8000 #ifdef __NEW_STARLETtypedef struct _acmehat { __union {N unsigned short int acmehat$w_protocol; /* Composite field */ __struct {X unsigned acmehat$v_protocol_type : 15; /* Network protocol/address format */S unsigned acmehat$v_facility_specific : 1; /* 0 ==> standard protocol */N/* 1 ==> facility specific protoco l */! } acmehat$r_fill_35_; } acmehat$r_fill_34_;P unsigned short int acmehat$w_facility; /* Vendor's assigned facility code */ } ACMEHAT; #if !defined(__VAXC)@#define acmehat$w_protocol acmehat$r_fill_34_.acmehat$w_protocol]#define acmehat$v_protocol_type acmehat$r_fill_34_.acmehat$r_fill_35_.acmehat$v_protocol_typee#define acmehat$v_facility_specific acmehat$r_fill_34_.acmehat$r_fill_35_.acmehat$v_facility_specific"#e ndif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmehat { __union {N unsigned short int acmehat$w_protocol; /* Composite field */ __struct {X unsigned acmehat$v_protocol_type : 15; /* Network protocol/address format */S unsigned acmehat$v_facility_specific : 1; /* 0 ==> standard protocol */N/* 1 ==> facility specific protocol */! } acmehat$r_fill_35_;  } acmehat$r_fill_34_;P unsigned short int acmehat$w_facility; /* Vendor's assigned facility code */ } acmehat; #if !defined(__VAXC)@#define acmehat$w_protocol acmehat$r_fill_34_.acmehat$w_protocol]#define acmehat$v_protocol_type acmehat$r_fill_34_.acmehat$r_fill_35_.acmehat$v_protocol_typee#define acmehat$v_facility_specific acmehat$r_fill_34_.acmehat$r_fill_35_.acmehat$v_facility_specific"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#d efine ACMEHAT$K_LENGTH 4 $#pragma __member_alignment __restore N/*+ */N/* */N/* Password change request control flags */N/* */N/*- */ !#pragma __member_alignment __save#pragma __nomember_alignment#define ACMEPWDFLG$K_SYSTEM 0#define ACMEPWDFLG$M_SYSTEM 0x1!#define ACMEPWDFLG$K_PASSWORD_1 1##define ACMEPWDFLG$M_PASSWORD_1 0x2!#define ACMEPWDFLG$K_PASSWORD_2 2##define ACMEPWDFLG$M_PASSWORD_2 0x4 #define ACMEPWDFLG$K_MAX_FLAGS 3!#define ACMEPWDFLG$K_SPECIFIED 31)#define ACMEPWDFLG$M_SPECIFIED 0x80000000$#define ACMEPWDFLG$M_VALID_FLAGS 0x7.#define ACMEPWDFLG$M_PASSWORD_FLAGS 0x7FFFFFFF #ifdef __NEW_STARLETtypedef struct _acmepwdflg {  __union { __union {N unsigned int acmepwdflg$l_flags_struct; /* Composite field */ __struct {V unsigned acmepwdflg$v_system : 1; /* Request system password change */U unsigned acmepwdflg$v_password_1 : 1; /* Request password 1 change */U unsigned acmepwdflg$v_password_2 : 1; /* Request password 2 change */: unsigned acmepwdflg$v_pwd_flg_fill_1 : 28;Y unsigned acmepwdflg$v_specified : 1; /* Used internally by the service */N/* to indicate flags reflect caller */N/* specified NEW_PASSWORD_FLAGS item */N/* Caller's setting is ignored */( } acmepwdflg$r_fill_37_;$ } acmepwdflg$r_fill_36_;N unsigned acmepwdflg$v_valid_flags : 3; /* Currently defined flags */N unsigned acmepwdflg$v_password_flags : 31; /* Non-reserved flags */ } acmepwdflg$r_overlay; } ACMEPWDFLG; #if !defined(__VAXC)f#define acmepwdflg$l_flags_struct acmepwdflg$r_overlay.acmepwdflg$r_fill_36_.acmepwdflg$l_flags_structp#define acmepwdflg$v_system acmepwdflg$r_overlay.acmepwdflg$r_fill_36_.acmepwdflg$r_fill_37_.acmepwdflg$v_systemx#define acmepwdflg$v_password_1 acmepwdflg$r_overlay.acmepwdflg$r_fill_36_.acmepwdflg$r_fill_37_.acmepwdflg$v_password_1x#define acmepwdflg$v_password_2 acmepwdflg$r_overlay.acmepwd flg$r_fill_36_.acmepwdflg$r_fill_37_.acmepwdflg$v_password_2v#define acmepwdflg$v_specified acmepwdflg$r_overlay.acmepwdflg$r_fill_36_.acmepwdflg$r_fill_37_.acmepwdflg$v_specifiedN#define acmepwdflg$v_valid_flags acmepwdflg$r_overlay.acmepwdflg$v_valid_flagsT#define acmepwdflg$v_password_flags acmepwdflg$r_overlay.acmepwdflg$v_password_flags"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmepwdflg { __union { __union {N unsigned int acmepwdflg$l_flags_struct; /* Composite field */ __struct {V unsigned acmepwdflg$v_system : 1; /* Request system password change */U unsigned acmepwdflg$v_password_1 : 1; /* Request password 1 change */U unsigned acmepwdflg$v_password_2 : 1; /* Request password 2 change */: unsigned acmepwdflg$v_pwd_flg_fill_1 : 28;Y unsigned acmepwdflg$v_specified : 1; /* Used internally by the service */N/* to indicate flags reflect caller */N/* specified NEW_PASSWORD_FLAGS item */N/* Caller's setting is ignored */( } acmepwdflg$r_fill_37_;$ } acmepwdflg$r_fill_36_;N unsigned acmepwdflg$v_valid_flags : 3; /* Currently defined flags */N unsigned acmepwdflg$v_password_flags : 31; /* Non-reserved flags */ } acmepwdflg$r_overlay; } acmepwdflg; #if !defined(__VAXC)f#define acmepwdflg$l_flags_struct acmepwdflg$r_overlay.acmepwdflg$r_fill_36_.acmepwdflg$l_flags_structp#define acmepwdflg$v_system acmepwdflg$r_overlay.acmepwdflg$r_fill_36_.acmepwdflg$r_fill_37_.acmepwdflg$v_systemx#define acmepwdflg$v_password_1 acmepwdflg$r_overlay.acmepwdflg$r_fill_36_.acmepwdflg$r_fill_37_.acmepwdflg$v_password_1x#define acmepwdflg$v_password_2 acmepwdflg$r_overlay.acmepwdflg$r_fill_36_.acmepwdflg$r_fill_37_.acmepwdflg$v_passwo rd_2v#define acmepwdflg$v_specified acmepwdflg$r_overlay.acmepwdflg$r_fill_36_.acmepwdflg$r_fill_37_.acmepwdflg$v_specifiedN#define acmepwdflg$v_valid_flags acmepwdflg$r_overlay.acmepwdflg$v_valid_flagsT#define acmepwdflg$v_password_flags acmepwdflg$r_overlay.acmepwdflg$v_password_flags"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define ACMEPWDFLG$K_LENGTH 4 $#pragma __member_alignment __restore N/*+  */N/* */N/* $ACM Item Set Message Category */N/* */N/* Message Categories are 16-bit unsigned values, encoded as follows: */N/* */N/* 1 */N/* 5 8 7 0 */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* | | | | | | | | | | | | | | | | | */N/* +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */N/* ^ ^ ^ ^ */N/* | | | | */N/* | | +-------------------------+-- Bit [13:0] = message type */N/* | | */d/* | +------------------------------ Bit [14] = 0 ==> not subject to VTF-7 <-> UCS conversion */`/* | = 1 ==> subject to VTF-7 <-> UCS conversion */N/* | */N/* +-------------------------------- Bit [15] = 0 ==> common item */O/*  1 ==> ACME specific item */N/* */N/*- */ !#pragma __member_alignment __save#pragma __nomember_alignment#define ACMEMC$M_TYPE 0x3FFF#define ACMEMC$M_UCS 0x4000%#define ACMEMC$M_ACME_SPECIFIC 0x8000 #ifdef __NEW_STARLETtypedef struct _acmemc { __union {N unsigned short int acmemc$w_msg_code; /* Composite field */ __struct {N unsigned acmemc$v_type : 14; /* Ranged value */[ unsigned acmemc$v_ucs : 1; /* 0 ==> not subject to VTF-7 <-> UCS conversion */N/* 1 ==> subject to VTF-7 <-> UCS conversion */N unsigned acmemc$v_acme_specific : 1; /* 0 ==> common category */N/* 1 ==> ACME specific category */ } acmemc$r_fill_39_; } acmemc$r_fill_38_; } ACMEMC; #if !defined(__VAXC)=#define acmemc$w_msg_code acmemc$r_fill_38_.acmemc$w_msg_codeG#define acmemc$v_type acmemc$r_fill_38_.acmemc$r_fill_39_.acmemc$v_typeE#define acmemc$v_ucs acmemc$r_fill_38_.acmemc$r_fill_39_.acmemc$v_ucsY#define acmemc$v_acme_specific acmemc$r_fill_38_.acmemc$r_fill_39_.acmemc$v_acme_specific"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmemc { __union {N unsigned short int acmemc$w_msg_code; /* Composite field */ __struct {N unsigned acmemc$v_type : 14; /* Ranged value */[ unsigned acmemc$v_ucs : 1; /* 0 ==> not subject to VTF-7 <-> UCS conversion */N/* 1 ==> subject to VTF-7 <-> UCS conversion */N unsigned acmemc$v_acme_specific : 1; /* 0 ==> common category */N/* 1 ==> ACME specific category */  } acmemc$r_fill_39_; } acmemc$r_fill_38_; } acmemc; #if !defined(__VAXC)=#define acmemc$w_msg_code acmemc$r_fill_38_.acmemc$w_msg_codeG#define acmemc$v_type acmemc$r_fill_38_.acmemc$r_fill_39_.acmemc$v_typeE#define acmemc$v_ucs acmemc$r_fill_38_.acmemc$r_fill_39_.acmemc$v_ucsY#define acmemc$v_acme_specific acmemc$r_fill_38_.acmemc$r_fill_39_.acmemc$v_acme_specific"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define ACMEMC$K_LENGT H 2 $#pragma __member_alignment __restore N/* */N/* Generic output message categories */N/* */N/* These are all subject to UCS conversion */N/* */"#define ACMEMC$K_MIN_GEN_MSG 16384N#define ACMEMC$K_GENERAL 16384 /* General text */N#define ACMEMC$K_HEADER 16385 /* Header text */N#define ACMEMC$K_TRAILER 16386 /* Trailer text */N#define ACMEMC$K_SELECTION 16387 /* Acceptable choices */N#define ACMEMC$K_DIALOGUE_ALERT 16388 /* Alert (advisory) */"#define ACMEMC$K_MAX_GEN_MSG 16388N/* */N/* LOGINOUT related output message categories */N/* */N/* These are all subject to UCS conversion */N/* */$#define ACMEMC$K_MIN_LOGON_MSG 16640N#define ACMEMC$K_SYSTEM_IDENTIFICATION 16640 /* System identification text */N#define ACMEMC$K_SYSTEM_NOTICES 16641 /* System notices */N#define ACMEMC$K_WELCOME_NOTICES 16642 /* Welcome notices, */N#define ACMEMC$K_LOGON_NOTICES 16643 /* Logon notices */N#define ACMEMC$K_PASSWORD_NOTICES 16644 /* Password notices */N#define ACMEMC$K_MAIL_NOTICES 16645 /* MAIL notices */$#define ACMEMC$K_MAX_LOGON_MSG 16645N/*+ */N/*  */N/* ACMESB - ACM Status Block */N/* */N/*- */ #ifdef __NEW_STARLET#pragma __member_alignmenttypedef struct _acmesb {N int acmesb$l_status; /* Primary status */N int acmesb$l_secondary_status; /* Auxillary (privileged) status */V ACMEID  acmesb$l_acme_id; /* ID of ACME/DOI reporting specific status */N int acmesb$l_acme_status; /* ACME/DOI specific status */ } ACMESB;#else /* __OLD_STARLET */typedef struct _acmesb {N int acmesb$l_status; /* Primary status */N int acmesb$l_secondary_status; /* Auxillary (privileged) status */V acmeid acmesb$l_acme_id; /* ID of ACME/DOI reporting specific status */N int acmesb$l_acme_stat us; /* ACME/DOI specific status */ } acmesb;%#endif /* #ifdef __NEW_STARLET */#define ACMESB$K_LENGTH 16 N/*+ */N/* */N/* ACMECB - ACM Communications Buffer */N/* */N/*-  */ !#pragma __member_alignment __save#pragma __nomember_alignment#define ACMEDLOGFLG$M_INPUT 0x1 #define ACMEDLOGFLG$M_NOECHO 0x2*#define ACMEDLOGFLG$M_SPECIFIED 0x80000000%#define ACMEDLOGFLG$M_VALID_FLAGS 0x3/#define ACMEDLOGFLG$M_DIALOGUE_FLAGS 0x7FFFFFFF #ifdef __NEW_STARLETtypedef struct _acmedlogflg { __union { __union {N unsigned int acmedlogflg$l_flags_struct; /* Composite field */ __struct {N unsigned acmedlogflg$v_input : 1; /* Response required */] unsigned acmedlogflg$v_noecho : 1; /* When prompting, do not echo response */< unsigned acmedlogflg$v_dlog_flg_fill_1 : 29;Z unsigned acmedlogflg$v_specified : 1; /* Used internally by the service */N/* to indicate flags reflect caller */N/* specified DIALOGUE_SUPPORT item */N/* Caller's se tting is ignored */) } acmedlogflg$r_fill_41_;% } acmedlogflg$r_fill_40_;N unsigned acmedlogflg$v_valid_flags : 2; /* Currently defined flags */N unsigned acmedlogflg$v_dialogue_flags : 31; /* Non-reserved flags */ } acmedlogflg$r_overlay; } ACMEDLOGFLG; #if !defined(__VAXC)j#define acmedlogflg$l_flags_struct acmedlogflg$r_overlay.acmedlogflg$r_fill_40_.acmedlogflg$l_flags_structs#define acmedlogflg$v_input acmedlogflg$r_overlay.acmedlogflg$r_fill_40_.acmedlogflg$r_fill_41_.acmedlogflg$v_inputu#define acmedlogflg$v_noecho acmedlogflg$r_overlay.acmedlogflg$r_fill_40_.acmedlogflg$r_fill_41_.acmedlogflg$v_noecho{#define acmedlogflg$v_specified acmedlogflg$r_overlay.acmedlogflg$r_fill_40_.acmedlogflg$r_fill_41_.acmedlogflg$v_specifiedQ#define acmedlogflg$v_valid_flags acmedlogflg$r_overlay.acmedlogflg$v_valid_flagsW#define acmedlogflg$v_dialogue_flags acmedlogflg$r_overlay.acmedlo gflg$v_dialogue_flags"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmedlogflg { __union { __union {N unsigned int acmedlogflg$l_flags_struct; /* Composite field */ __struct {N unsigned acmedlogflg$v_input : 1; /* Response required */] unsigned acmedlogflg$v_noecho : 1; /* When prompting, do not echo response */< unsigned acmedlogflg$v_dlog_flg_fill_1 : 29;Z unsigned acmedlogflg$v_specified : 1; /* Used internally by the service */N/* to indicate flags reflect caller */N/* specified DIALOGUE_SUPPORT item */N/* Caller's setting is ignored */) } acmedlogflg$r_fill_41_;% } acmedlogflg$r_fill_40_;N unsigned acmedlogflg$v_valid_flags : 2; /* Currently defined flags */N unsigned acmedlogflg$v_dialogue_flags : 31; /* Non-reserved flags */ } acmedlogflg$r_overlay; } acmedlogflg; #if !defined(__VAXC)j#define acmedlogflg$l_flags_struct acmedlogflg$r_overlay.acmedlogflg$r_fill_40_.acmedlogflg$l_flags_structs#define acmedlogflg$v_input acmedlogflg$r_overlay.acmedlogflg$r_fill_40_.acmedlogflg$r_fill_41_.acmedlogflg$v_inputu#define acmedlogflg$v_noecho acmedlogflg$r_overlay.acmedlogflg$r_fill_40_.acmedlogflg$r_fill_41_.acmedlogflg$v_noecho{#define acmedlogflg$v_specified acmedlogflg$r_overlay.acmedlogflg$r_fill_40_.acmedlogflg$r_fill_41_.acmedlogflg$v_specifiedQ#define acmedlogflg$v_valid_flags acmedlogflg$r_overlay.acmedlogflg$v_valid_flagsW#define acmedlogflg$v_dialogue_flags acmedlogflg$r_overlay.acmedlogflg$v_dialogue_flags"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define ACMEDLOGFLG$K_LENGTH 4 $#pragma __member_alignment __restore  #ifdef __NEW_STARLETtypedef struct _acmeitmset {N ACMEDLOGFLG acmeis$l_flags; /* Item set processing flags */P ACMEIC acmeis$w_item_code; /* Item code reflecting the nature of */N/* information provided/requested */ __union {U unsigned short int acmeis$w_max_length; /* Maximum length of an input data */N ACMEMC acmeis$w_msg_type; /* Message category for output data */ } acmeis$r_itm_msg_ctl;N unsigned __int64 acmeis$q_data_1; /* Dat a 1 (prompt text) */N unsigned __int64 acmeis$q_data_2; /* Data 2 (default response) */ } ACMEITMSET; #if !defined(__VAXC)D#define acmeis$w_max_length acmeis$r_itm_msg_ctl.acmeis$w_max_length@#define acmeis$w_msg_type acmeis$r_itm_msg_ctl.acmeis$w_msg_type"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmeitmset {N acmedlogflg acmeis$l_flags; /* Item set processing flags */P acmeic acmeis$w_item_code; /* Item code reflecting the nature of */N/* information provided/requested */ __union {U unsigned short int acmeis$w_max_length; /* Maximum length of an input data */N acmemc acmeis$w_msg_type; /* Message category for output data */ } acmeis$r_itm_msg_ctl;N unsigned int acmeis$q_data_1 [2]; /* Data 1 (prompt text) */N unsigned int acmeis$q_data_2 [2]; /* Data 2 (default response)  */ } acmeitmset; #if !defined(__VAXC)D#define acmeis$w_max_length acmeis$r_itm_msg_ctl.acmeis$w_max_length@#define acmeis$w_msg_type acmeis$r_itm_msg_ctl.acmeis$w_msg_type"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define ACMEIS$K_LENGTH 24#define ACMECB$K_MINOR_ID_000 0#define ACMECB$K_MINOR_ID 0#define ACMECB$K_MAJOR_ID_001 1#define ACMECB$K_MAJOR_ID 1#define ACMECB$K_REVISION 256 #ifdef __NEW_STARLETtypedef struct _acmecb {R unsigned __int64 acmecb$q_context_id; /* ID of associated ACM Request Block */N unsigned short int acmecb$w_size; /* Structure size, in bytes */N ACMEREVLVL acmecb$w_revision_level; /* Structure revision level */P ACMEID acmecb$l_acme_id; /* ID of ACME/DOI requesting dialogue */N unsigned int acmecb$l_item_set_count; /* Number of item set entries */+ struct _acmeitmset *acmecb$ps_item_set;N/* Pointer to item set array  */ } ACMECB;#else /* __OLD_STARLET */#pragma __member_alignmenttypedef struct _acmecb {R unsigned int acmecb$q_context_id [2]; /* ID of associated ACM Request Block */N unsigned short int acmecb$w_size; /* Structure size, in bytes */N acmerevlvl acmecb$w_revision_level; /* Structure revision level */P acmeid acmecb$l_acme_id; /* ID of ACME/DOI requesting dialogue */N unsigned int acmecb$l_item_set_count; /* Numbe r of item set entries */$ unsigned int acmecb$ps_item_set;N/* Pointer to item set array */ } acmecb;%#endif /* #ifdef __NEW_STARLET */#define ACMECB$K_LENGTH 24 N/*+ */N/* */N/* ACMELI - ACM Logon Information Block */N/*  */N/*- */ !#pragma __member_alignment __save#pragma __nomember_alignment&#define ACMELGIFLG$K_MIN_LOGON_FLAG -1(#define ACMELGIFLG$K_NEW_MAIL_AT_LOGIN 0*#define ACMELGIFLG$M_NEW_MAIL_AT_LOGIN 0x1'#define ACMELGIFLG$K_PASSWORD_CHANGED 1)#define ACMELGIFLG$M_PASSWORD_CHANGED 0x2'#define ACMELGIFLG$K_PASSWORD_EXPIRED 2)#define ACMELGIFLG$M_PASSWORD_EXPIRED 0x4'#define ACMELGIFLG$K_PASSWORD_WARNING 3)#define ACMELGIFLG$M_PASSWORD_WARNING 0x8(#define ACMELGIFLG$K_PASSWORD2_CHANGED 4+#define ACMELGIFLG$M_PASSWORD2_CHANGED 0x10(#define ACMELGIFLG$K_PASSWORD2_EXPIRED 5+#define ACMELGIFLG$M_PASSWORD2_EXPIRED 0x20(#define ACMELGIFLG$K_PASSWORD2_WARNING 6+#define ACMELGIFLG$M_PASSWORD2_WARNING 0x40%#define ACMELGIFLG$K_MAX_LOGON_FLAG 6 #ifdef __NEW_STARLETtypedef struct _acmelgiflg { __union {N unsigned int acmelgiflg$l_logon_flags; /* Composite field */ __struct {[ unsigned acmelgiflg$v_new_mail_at_login : 1; /* User had new MAIL message(s) */V unsigned acmelgiflg$v_password_changed : 1; /* Primary password changed */_ unsigned acmelgiflg$v_password_expired : 1; /* Primary password expired on login */b unsigned acmelgiflg$v_password_warning : 1; /* Primary password expiration imminent */Y unsigned acmelgiflg$v_password2_changed : 1; /* Secondary passwo rd changed */b unsigned acmelgiflg$v_password2_expired : 1; /* Secondary password expired on login */e unsigned acmelgiflg$v_password2_warning : 1; /* Secondary password expiration imminent */6 unsigned acmelgiflg$v_lgi_flg_fill_1 : 25;$ } acmelgiflg$r_fill_43_; } acmelgiflg$r_fill_42_; } ACMELGIFLG; #if !defined(__VAXC)O#define acmelgiflg$l_logon_flags acmelgiflg$r_fill_42_.acmelgiflg$l_logon_flagsq#define acmelgiflg$v_new_mail_at_login acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_new_mail_at_logino#define acmelgiflg$v_password_changed acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password_changedo#define acmelgiflg$v_password_expired acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password_expiredo#define acmelgiflg$v_password_warning acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password_warningq#define acmelgiflg$v_password2_changed acmelgiflg$r_fill_42_.acmelgiflg$r_fill _43_.acmelgiflg$v_password2_changedq#define acmelgiflg$v_password2_expired acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password2_expiredq#define acmelgiflg$v_password2_warning acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password2_warning"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmelgiflg { __union {N unsigned int acmelgiflg$l_logon_flags; /* Composite field */ __struct {[ unsigned acmelgiflg$v_new_mail_at_login : 1; /* User had new MAIL message(s) */V unsigned acmelgiflg$v_password_changed : 1; /* Primary password changed */_ unsigned acmelgiflg$v_password_expired : 1; /* Primary password expired on login */b unsigned acmelgiflg$v_password_warning : 1; /* Primary password expiration imminent */Y unsigned acmelgiflg$v_password2_changed : 1; /* Secondary password changed */b unsigned acmelgiflg$v_password2_expire d : 1; /* Secondary password expired on login */e unsigned acmelgiflg$v_password2_warning : 1; /* Secondary password expiration imminent */6 unsigned acmelgiflg$v_lgi_flg_fill_1 : 25;$ } acmelgiflg$r_fill_43_; } acmelgiflg$r_fill_42_; } acmelgiflg; #if !defined(__VAXC)O#define acmelgiflg$l_logon_flags acmelgiflg$r_fill_42_.acmelgiflg$l_logon_flagsq#define acmelgiflg$v_new_mail_at_login acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_new_mail_at_logino#define acmelgiflg$v_password_changed acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password_changedo#define acmelgiflg$v_password_expired acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password_expiredo#define acmelgiflg$v_password_warning acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password_warningq#define acmelgiflg$v_password2_changed acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password2_changedq#define acmelgiflg$v_password2_expired acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password2_expiredq#define acmelgiflg$v_password2_warning acmelgiflg$r_fill_42_.acmelgiflg$r_fill_43_.acmelgiflg$v_password2_warning"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define ACMELGIFLG$K_LENGTH 4 $#pragma __member_alignment __restore  "#define ACMELIVMS$K_MINOR_ID_000 0#define ACMELIVMS$K_MINOR_ID 0"#define ACMELIVMS$K_MAJOR_ID_001 1#define ACMELIVMS$K_MAJOR_ID 1 #def ine ACMELIVMS$K_REVISION 256 #ifdef __NEW_STARLETtypedef struct _acmelivms {Y ACMEID acmelivms$l_acme_id; /* ID of ACME which reported logon information */Y unsigned int acmelivms$l_phase; /* Phase during which information was reported */N unsigned short int acmelivms$w_size; /* Structure size, in bytes */N ACMEREVLVL acmelivms$w_revision_level; /* Structure revision level */Q unsigned int acmelivms$l_logfail_count; /* Number of failed logon attemp ts */N UTCBLK acmelivms$o_logon_int; /* Time of last interactive logon */P UTCBLK acmelivms$o_logon_nonint; /* Time of last non-interactive logon */ } ACMELIVMS;#else /* __OLD_STARLET */typedef struct _acmelivms {Y acmeid acmelivms$l_acme_id; /* ID of ACME which reported logon information */Y unsigned int acmelivms$l_phase; /* Phase during which information was reported */N unsigned short int acmelivms$w_size; /* Structure size, in bytes  */N acmerevlvl acmelivms$w_revision_level; /* Structure revision level */Q unsigned int acmelivms$l_logfail_count; /* Number of failed logon attempts */N utcblk acmelivms$o_logon_int; /* Time of last interactive logon */P utcblk acmelivms$o_logon_nonint; /* Time of last non-interactive logon */ } acmelivms;%#endif /* #ifdef __NEW_STARLET */#define ACMELIVMS$K_LENGTH 48 "#define ACMELIDOI$K_MINOR_ID_000 0#define ACMELIDOI$K_MINOR_ID 0"#define AC MELIDOI$K_MAJOR_ID_001 1#define ACMELIDOI$K_MAJOR_ID 1 #define ACMELIDOI$K_REVISION 256 #ifdef __NEW_STARLETtypedef struct _acmelidoi {Y ACMEID acmelidoi$l_acme_id; /* ID of ACME which reported logon information */Y unsigned int acmelidoi$l_phase; /* Phase during which information was reported */N unsigned short int acmelidoi$w_size; /* Structure size, in bytes */N ACMEREVLVL acmelidoi$w_revision_level; /* Structure revision level */Q unsigned int acmelidoi$l_logfail_count; /* Number of failed logon attempts */N UTCBLK acmelidoi$o_logon; /* Time of last logon */N UTCBLK acmelidoi$o_logon_int; /* Time of last interactive logon */P UTCBLK acmelidoi$o_logon_nonint; /* Time of last non-interactive logon */N UTCBLK acmelidoi$o_logfail; /* Time of last logon failure */T UTCBLK acmelidoi$o_logfail_int; /* Time of last interactive logon failure */X UTCBLK acmelidoi$o_logfa il_nonint; /* Time of last non-interactive logon failure */ } ACMELIDOI;#else /* __OLD_STARLET */typedef struct _acmelidoi {Y acmeid acmelidoi$l_acme_id; /* ID of ACME which reported logon information */Y unsigned int acmelidoi$l_phase; /* Phase during which information was reported */N unsigned short int acmelidoi$w_size; /* Structure size, in bytes */N acmerevlvl acmelidoi$w_revision_level; /* Structure revision level */Q unsigned int acmelidoi$l_logfail_count; /* Number of failed logon attempts */N utcblk acmelidoi$o_logon; /* Time of last logon */N utcblk acmelidoi$o_logon_int; /* Time of last interactive logon */P utcblk acmelidoi$o_logon_nonint; /* Time of last non-interactive logon */N utcblk acmelidoi$o_logfail; /* Time of last logon failure */T utcblk acmelidoi$o_logfail_int; /* Time of last interactive logon failure */X utcblk acmelidoi$o_logfail_nonint; /* Time of last non-interactive logon failure */ } acmelidoi;%#endif /* #ifdef __NEW_STARLET */#define ACMELIDOI$K_LENGTH 112 #define ACMELI$K_MINOR_ID_000 0#define ACMELI$K_MINOR_ID 0#define ACMELI$K_MAJOR_ID_001 1#define ACMELI$K_MAJOR_ID 1#define ACMELI$K_REVISION 256 #ifdef __NEW_STARLETtypedef struct _acmeli { __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */6 struct _acmelidoi *acmeli$pq_logon_info_doi64;#else- unsigned __int64 acmeli$pq_logon_info_doi64;#endifN/* Non-native (non-OpenVMS) logon information */#pragma __member_alignment __struct {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif: struct _ac melidoi *acmeli$ps_logon_info_doi32;N/* Non-native (non-OpenVMS) logon information */#pragma __member_alignment5 unsigned int acmeli$l_logon_info_doi32se;N/* Sign extension field */ } acmeli$r_li_doi32; } acmeli$r_li_doi;N unsigned short int acmeli$w_size; /* Structure size, in bytes */N ACMEREVLVL acmeli$w_revision_level; /* Structure revision level */N  ACMELGIFLG acmeli$l_logon_flags; /* Logon flags */ __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */6 struct _acmelivms *acmeli$pq_logon_info_vms64;#else- unsigned __int64 acmeli$pq_logon_info_vms64;#endifN/* Native (OpenVMS) logon information */#pragma __member_alignment __struct {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif: struct _acmelivms *acmeli$ps_logon_info_vms32;N/* Native (OpenVMS) logon information */#pragma __member_alignment5 unsigned int acmeli$l_logon_info_vms32se;N/* Sign extension field */  } acmeli$r_li_vms32; } acmeli$r_li_vms;P ACMELIVMS acmeli$r_logon_info_vms; /* Native (OpenVMS) logon information */X ACMELIDOI acmeli$r_logon_info_doi; /* Non-native (non-OpenVMS) logon information */ } ACMELI; #if !defined(__VAXC)M#define acmeli$pq_logon_info_doi64 acmeli$r_li_doi.acmeli$pq_logon_info_doi64_#define acmeli$ps_logon_info_doi32 acmeli$r_li_doi.acmeli$r_li_doi32.acmeli$ps_logon_info_doi32a#define acmeli$l_logon_info_doi32se acmeli$r_li_doi.ac meli$r_li_doi32.acmeli$l_logon_info_doi32seM#define acmeli$pq_logon_info_vms64 acmeli$r_li_vms.acmeli$pq_logon_info_vms64_#define acmeli$ps_logon_info_vms32 acmeli$r_li_vms.acmeli$r_li_vms32.acmeli$ps_logon_info_vms32a#define acmeli$l_logon_info_vms32se acmeli$r_li_vms.acmeli$r_li_vms32.acmeli$l_logon_info_vms32se"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _acmeli { __union {4 unsigned __int64 acmeli$pq_logon_info_doi64;N/* Non-native (non-OpenVMS) logon information */ __struct {4 unsigned int acmeli$ps_logon_info_doi32;N/* Non-native (non-OpenVMS) logon information */5 unsigned int acmeli$l_logon_info_doi32se;N/* Sign extension field */ } acmeli$r_li_doi32; } acmeli$r_li_doi;N unsigned short int acmeli$w_size; /* Structure size, in bytes */N ac merevlvl acmeli$w_revision_level; /* Structure revision level */N acmelgiflg acmeli$l_logon_flags; /* Logon flags */ __union {4 unsigned __int64 acmeli$pq_logon_info_vms64;N/* Native (OpenVMS) logon information */ __struct {4 unsigned int acmeli$ps_logon_info_vms32;N/* Native (OpenVMS) logon information */5 unsigned int acmeli$l_logon_info_v ms32se;N/* Sign extension field */ } acmeli$r_li_vms32; } acmeli$r_li_vms;P acmelivms acmeli$r_logon_info_vms; /* Native (OpenVMS) logon information */X acmelidoi acmeli$r_logon_info_doi; /* Non-native (non-OpenVMS) logon information */ } acmeli; #if !defined(__VAXC)M#define acmeli$pq_logon_info_doi64 acmeli$r_li_doi.acmeli$pq_logon_info_doi64_#define acmeli$ps_logon_info_doi32 acmeli$r_li_doi.acmeli$r_ li_doi32.acmeli$ps_logon_info_doi32a#define acmeli$l_logon_info_doi32se acmeli$r_li_doi.acmeli$r_li_doi32.acmeli$l_logon_info_doi32seM#define acmeli$pq_logon_info_vms64 acmeli$r_li_vms.acmeli$pq_logon_info_vms64_#define acmeli$ps_logon_info_vms32 acmeli$r_li_vms.acmeli$r_li_vms32.acmeli$ps_logon_info_vms32a#define acmeli$l_logon_info_vms32se acmeli$r_li_vms.acmeli$r_li_vms32.acmeli$l_logon_info_vms32se"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define AC MELI$K_LENGTH 184 N#define ACME$K_QUERY_REVISION_LEVEL 1 /* Service revision level */N#define ACME$K_QUERY_ACME_COUNT 2 /* Number of registered agents */N#define ACME$K_QUERY_ACME_ID 3 /* Specify/report agent id */N#define ACME$K_QUERY_ACME_NAME 4 /* Specify/reprot agent name */+#define ACME$K_SERVICE_REVISION_001_000 256N/* */N/* Pre-$ACM definitions...  */N/* */N/* Definitions for the $AUTHENTICATE[W], $LOGON[W], and $SET_PASSWORD[W] */N/* system services. */N/* */N/* */N/* $LOGON[W] function codes.  */N/* */N#define ACME$_MAP_TO_USERNAME 1 /* Map userid to username */N#define ACME$_VERIFY_PASSWORD_ONLY 2 /* Authenticate password */N#define ACME$_MAX_FUNCTION_CODE 3 /* maximum legal function code + 1 */N/* */N/* Item codes. Codes specific to a particular service are noted: */N/*  */I/* $AU = $AUTHENTICATE[W] */I/* $LO = $LOGON[W] */I/* $SP = $SET_PASSWORD[W] */N/* */N#define ACME$_DOMAIN 2 /* Authentication domain */N#define ACME$_USERID 3 /* User ID */N#define ACME$_PASSWORD 4 /* Single password */N#define ACME$_PASSWORD_LIST 5 /* Password list */N#define ACME$_NEW_PASSWORD 6 /* New password ($SP) */N#define ACME$_OUTPUT_VMS_USERNAME 7 /* Mapped OpenVMS username ($LO) */N#define ACME$_NOAUTHENTICATION 8 /* No password authentication ($SP) */N#define ACME$_OVERRIDE_POLICY 9 /* Override password policy ($SP) */O#define ACME$_SYNCHRONIZE 10 /* Set password in all domains ($SP) */N#define ACME$_REASON_CODE 11 /* ACME-specific reason code */N#define ACME$_VALIDATE_ONLY 12 /* Validate user can login ($LO) */V#define ACME$_UAF_RECORD_LOCKED 13 /* Advisory that UAF record is locked ($LO) */N#define ACME$_RESERVED_ITEM_1 14 /* Reserved 1 */N#define ACME$_RESERVED_ITEM_2 15 /* Reserved 2 */N#define ACME$_MAX_ITEM_CODE 16 /* maximum legal item code + 1 */N/* */N/* Structures and constants. */N/* */N#define ACME$C_MAJOR_VERSION 1 /* Major ACME version */N#define ACME$C_MINOR_VERSION 0 /* Minor ACME version */N#define ACME$S_MAX_DOMAIN 256  /* Maximum domain length */N#define ACME$S_MAX_USERID 256 /* Maximum userid length */N#define ACME$S_MAX_PASSWORD 256 /* Maximum password length */N/* */N/* The PASSWORD_LIST item code requires a list of password items with each */N/* item specified by a PWDITM structure definition. The list is terminated */N/* by a longword zero.  */N/* */ #ifdef __NEW_STARLETtypedef struct _acme$r_pwditm { __union {N unsigned int acme$l_terminator; /* Termination longword */ __struct {U unsigned short int acme$w_pwdnum; /* Password number (1=primary, etc.) */P unsigned short int acme$w_rsrvd1; /* reserved for future use, MBZ */# } acme$r_pwdnum_fields; } acme$r_pwd trm;Q void *acme$a_oldpwd; /* Descriptor address for old password */Q void *acme$a_newpwd; /* Descriptor address for new password */ } ACME$R_PWDITM; #if !defined(__VAXC)9#define acme$l_terminator acme$r_pwdtrm.acme$l_terminatorF#define acme$w_pwdnum acme$r_pwdtrm.acme$r_pwdnum_fields.acme$w_pwdnumF#define acme$w_rsrvd1 acme$r_pwdtrm.acme$r_pwdnum_fields.acme$w_rsrvd1"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct a cme$r_pwditm { __union {N unsigned int acme$l_terminator; /* Termination longword */ __struct {U unsigned short int acme$w_pwdnum; /* Password number (1=primary, etc.) */P unsigned short int acme$w_rsrvd1; /* reserved for future use, MBZ */# } acme$r_pwdnum_fields; } acme$r_pwdtrm;Q void *acme$a_oldpwd; /* Descriptor address for old password */Q void *acme$a_newpwd; /* Descriptor address for new password */ } ; #if !defined(__VAXC)9#define acme$l_terminator acme$r_pwdtrm.acme$l_terminatorF#define acme$w_pwdnum acme$r_pwdtrm.acme$r_pwdnum_fields.acme$w_pwdnumF#define acme$w_rsrvd1 acme$r_pwdtrm.acme$r_pwdnum_fields.acme$w_rsrvd1"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* Maximum password number to be used in password list */N/* */!#define ACME$C_MAX_PASSWORD_NUM 8  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ACMEDEF_LOADED */ ww/*************************** *****************************************************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */K/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]ACMEMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $ACMEMSGDEF ***/#ifndef __ACMEMSGDEF_LOADED#define __ACMEMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:57:41.05 */N/*  */N/* */O/* ************************************************************************* */O/* * * */O/* * COPYRIGHT 2000, 2001 COMPAQ COMPUTER CORPORATION * */O/* * * */O/* * COMPAQ REGISTERED IN U.S. PATENT AND TRADEMARK OFFICE. * */O/* * * */O/* * CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM COMPAQ OR * */O/* * AUTHORIZED SUBLICENSOR REQUIRED FOR POSSESSION, USE OR COPYING. * */O/* * CONSISTENT WITH FAR 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE, * */O/* * COMPUTER SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL * */O/* * ITEMS ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD * */O/* * COMMERCIAL LICENSE. * */O/* * * */O/* * COMPAQ SHALL NOT BE LIABLE FOR TECHNICAL OR EDITORIAL ERRORS OR * */O/* * OMISSIONS CONTAINED HEREIN. THE INFORMATION IN THIS DOCUMENT IS * */O/* * SUBJECT TO CHANGE WITHOUT NOTICE. * */O/* *  * */O/* ************************************************************************* */N/* */N/*++ */N/* */N/* FACILITY: */N/* */I/* STARLET  */N/* */N/* ABSTRACT: */N/* */I/* THIS MODULE DEFINES THE MESSAGE CODES USED BY THE $AUTHENTICATE[W], */I/* $LOGON[W], $SET_PASSWORD[W] AND $ACM[W] SYSTEM SERVICES. */N/*  */N/* ENVIRONMENT: */N/* */G/* VMS PROTECTED SHAREABLE IMAGE ($AUTHENTICATE[W], $LOGON[W], */-/* $SET_PASSWORD[W]) */9/* VMS EXECUTIVE ($ACM[W] SERVICE) */D/* VMS AUTHENTICIATION SERVER ($ACM[W] SERVICE) */N/*  */N/* AUTHOR: */N/* */B/* RICHARD J. BARRY DECEMBER 15, 1995 */N/* */N/* */N/* NOTE: */I/* THIS MODULE IS COMMON BETWEEN ALPHA AND VAX. */N/* */N/* MODIFICATIONS: */N/* */./* X-20 DOUGLAS FYFE 22-MAY-2003 */B/* ADD DIALOGUELM ERROR CODE. */N/* */1/* X-19 RICHARD J. BARRY 14-NOV-2001 */B/* TWEEK THE ACME$_FAILURE MESSAGE DESCRIPTION ONE LAST */B/* TIME TO COMMUNICATE THE FACT THAT ACME SERVER LOGGING */B/* MAY NEED TO BE ENABLED. */N/* */./* X-18 DOUGLAS FYFE 5-OCT-2001 */F/* X-17 ADD ERROR CODES FOR CONFIGURATION/RESTART FILE */B/* OPEN FAILURES. FIX CUT-N-PASTE ERROR. */N/* */8/* X-16 RJB0129 RICHARD J. BARRY 6-AUG-2001 */B/* CORRECT MESSAGE DESCRIPTION TYPOS. */N/* */=/* X-15 LJK0204 LAWRENCE J. KILGALLEN 4-JAN-2001 */B/* CHANGE FAILURE TEXT TO MENTION ACME$SERVER LOG FILE. */N/* */=/* X-14 LJK0182 LAWRENCE J. KILGALLEN 31-AUG-2000 */B/* ADD BADSTRUCTLEN. */B/* ADD CONTACTSYSMGR, PER PTR 75-43-211. */N/* */8/* X-13 AJM00701 ANDREW J. MOSKAL 24-JUL-2000 */B/* ADD NOAGENTINIT. */N/* */8/* X-12 AJM00602 ANDREW J. MOSKAL 21-JUN-2000 */B/* ADD WASCLR, WASSET AND LOCKED ALTERNATIVE SUCCESS. */B/* ADD INVITMSEQ AND NOACMECTX. */B/* ADD NOTOUTITEM. */B/* ADD AGENTLOADFAIL. */B/* UPDATE COPYRIGHT NOTICE PER MANAGEMENT DIRECTIVES. */N/* */8/* X-11 AJM63405 ANDREW J. MOSKAL 13-APR-1999 */B/* ADD INCOMPATSTATE. */N/* */8/* X-10 AJM62A07 ANDREW J. MOSKAL 29-OCT-1998 */B/* ADD BUSY. */N/* */7/* X-9 AJM62602 ANDREW J. MOSKAL 23-JUN-1998 */B/* MOVE ERROPNLOGFIL, RENAME TO ERROPENLOGFIL. */B/* ADD ERRCLOSELOGFIL AND ERRWRITELOGFIL. */B/* ADD SERVERSTART AND SERVEREXIT. */B/* CORRECT TYPO: DOIUNAVAILBLE ==> DOIUNAVAILBLE. */N/* */7/* X-8 AJM62307 ANDREW J. MOSKAL 16-MAR-1998 */B/* REINSTATE PERFORMDIALOGUE. */N/* */7/* X-7 AJM62301 ANDREW J. MOSKAL 11-MAR- 1998 */B/* MOVE TRACE MESSAGES TO [ACMESRV]ACMESRVMSG.MSG. */N/* */7/* X-6 AJM62202 ANDREW J. MOSKAL 12-FEB-1998 */B/* ADD GENERAL FAILURE STATUS MESSAGE. */N/* */7/* X-5 AJM62120 ANDREW J. MOSKAL 23-JAN-1998 */B/* ADD SET SERVER (DCL INTERFACE) RELATED MESSAGES. */B/* FIX FAO DIRECTIVES: */B/* - !XQ SHOULD BE !@XQ (INDIRECT REFERENCES) */B/* - %UL SHOULD BE !UL. */B/* REVISE AUTHDOWN TEXT. */N/* */7/* X-4 AJM62103 ANDREW J. MOSKAL 8-JAN-1998 */B/* INCORPORATE $ACM[W] RELATED MESSAGE. */B/* (LEFT PRE-$ACM MESSAGES INTACT TO ALLOW FOR THE CONTINUED */B/* BUILDING OF PREVIOUS SUPPORT. MAY REVISIT PRIOR TO SSB.) */N/* */8/* X-3 JACH0036 JEREMY A. C. HITT 5-AUG-1996 */B/* ADDED MESSAGES FOR ACME MODULES. */N/* */8/* X-2 JACH0014 JEREMY A. C. HITT 4-MAR-1996 */B/* INITIAL VERSION MERGED FROM ACME STREAM.  */N/*-- */#define ACME$_FACILITY 1866N/*++ */N/* */N/* ADD NEW MESSAGE CODES AT THE END OF THE APPROPRIATE LIST. */N/* */N/* ASSIGNED RANGES:  */N/* */>/* 0 - 99 SUCCESS ( 100 MESSAGES) */C/* 100 - 199 INFORMATIONAL ( 100 MESSAGES) */>/* 200 - 1199 WARNING (1000 MESSAGES) */</* 1200 - 2199 ERROR (1000 MESSAGES) */</* 2200 - 2559 FATAL ( 360 MESSAGES) */N/* */E/* 2560 - 3071  AUTHENTICATION SERVER EXECUTION CONTROL. */F/* 3072 - 4095 AUTHENTICATION SERVER EXECUTION CONTROL AND TRACING. */;/* (MESSAGES ARE DEFINED BY [ACMESRV]ACMESRVMSG.MSG) */N/* */N/*-- */#define ACME$_NORMAL 122322945#define ACME$_WASCLR 122322953#define ACME$_WASSET 122322961#define ACME$_LOCKED 122322969 #define ACME$_CONTINUE 122 322945 #define ACME$_PWDSYNCH 122323747"#define ACME$_PWDNOSYNCH 122323755 #define ACME$_LOCLOGIN 122323763N/* */N/* $ACM MESSAGES */N/* */!#define ACME$_BUFFEROVF 122323771##define ACME$_SERVERSTART 122323779"#define ACME$_SERVEREXIT 122323787N/*  */N/* $ACM MESSAGES */N/* */!#define ACME$_OPINCOMPL 122324544$#define ACME$_NOSUCHUSERID 122332546 #define ACME$_PWDWRONG 122332554"#define ACME$_ACCEXPIRED 122332562"#define ACME$_PWDEXPIRED 122332570##define ACME$_INVALIDTIME 122332578##define ACME$_UNSPECIFIED 122332586$#define ACME$_PWDINHISTORY 122332594!#define ACME$_PW DINDICT 122332602##define ACME$_PWDTOOSHORT 122332610"#define ACME$_PWDTOOLONG 122332618"#define ACME$_PWDINVCHAR 122332626"#define ACME$_PWDTOOEASY 122332634"#define ACME$_PWDINVALID 122332642%#define ACME$_PWDCANTCHANGE 122332650!#define ACME$_NOLOCAUTH 122332658"#define ACME$_USERIDRQRD 122332666#define ACME$_PWDRQRD 122332674 #define ACME$_INSUFITM 122332682N/* */N/* $ACM MESSAGES  */N/* */##define ACME$_AUTHFAILURE 122332690##define ACME$_ACCOUNTLOCK 122332698"#define ACME$_NOSUCHUSER 122332706"#define ACME$_INVALIDPWD 122332714!#define ACME$_INVNEWPWD 122332722!#define ACME$_PWDNOTCHG 122332730"#define ACME$_INVMAPPING 122332738##define ACME$_MAPCONFLICT 122332746%#define ACME$_NOTAUTHORIZED 122332754!#define ACME$_NOEXTAUTH 122332762 #define ACME$_INTRUDER 122332770"#define ACME$_INVPERSONA 122332778$#define ACME$_NOTARGETCRED 122332786%#define ACME$_NOCREDENTIALS 122332794'#define ACME$_INSFDIALSUPPORT 122332802"#define ACME$_INVALIDCTX 122332810"#define ACME$_INVREQUEST 122332818"#define ACME$_INVALIDTLV 122332826#define ACME$_NOPRIV 122332834&#define ACME$_DOIUNAVAILABLE 122332842!#define ACME$_NOSUCHDOI 122332850#define ACME$_TIMEOUT 122332858N#define ACME$_UNSUPPORTED 122332866 /* */Q/* THI S MESSAGE IS SENT TO THE SYSTEM MANAGER WHEN DETAILS ARE IN THE LOG FILE */N/* */#define ACME$_FAILURE 122332874%#define ACME$_ERROPENLOGFIL 122332882&#define ACME$_ERRCLOSELOGFIL 122332890&#define ACME$_ERRWRITELOGFIL 122332898!#define ACME$_INVITMSEQ 122332906!#define ACME$_NOACMECTX 122332914N/* */N/* THIS MESSAGE IS SENT TO THE END USER WH EN DETAILS ARE IN THE LOG FILE */N/* */%#define ACME$_CONTACTSYSMGR 122332922N/* */N/* ERROR MESSAGES TO REPORT FAILURES OPENING AUTO-RESTART FILES */N/* */)#define ACME$_ERROPENRESTARTFIL 122332930)#define ACME$_ERROPENCONFIGSFIL 122332938"#define ACME$_DIALOG UELM 122332946N/* */N/* CONTROL (DCL) INTERFACE RELATED MESSAGES */N/* */#define ACME$_ACTIVE 122338946 #define ACME$_INACTIVE 122338954"#define ACME$_NOTSTARTED 122338962N/* */##define ACME$_AGENTDBFULL 122338970#define ACME$_DUPACME 12233897 8#define ACME$_BUSY 122338986%#define ACME$_INCOMPATSTATE 122338994%#define ACME$_AGENTLOADFAIL 122339002##define ACME$_NOAGENTINIT 122339010 #define ACME$_AUTHDOWN 122340548"#define ACME$_INCONSTATE 122340556N/*++ */N/* */N/* MESSAGE CODES 2560 THROUGH 4095 ARE RESERVED FOR INTERNAL (NOT VISIBLE */O/* AT THE $ACM[W] SERVICE INTERFACE) USE WITHIN THE AUTHENTICATION SERVER. */N/* */N/* ASSIGNED RANGES: */N/* */E/* 2560 - 3071 EXECUTION CONTROL */;/* (DEFINED HEREIN) */E/* 3072 - 4095 EXECUTION CONTROL AND TRACE MESSAGES */;/* (DEFINED BY [ACME SRV]ACMESRVMSG.MSG) */N/* */N/*-- */'#define ACME$_PERFORMDIALOGUE 122344448$#define ACME$_PERFORMPHASE 122344456 #define ACME$_RETRYPWD 122344464#define ACME$_WAITAST 122344472$#define ACME$_WAITRESOURCE 122344480$#define ACME$_ASTCTXNOTFND 122345474##define ACME$_BUFTOOSMALL 122345482"#define ACME$_DIALOGFULL 122345490"#define ACME$_DUPCREDTYP 122345498"#define ACME$_INVCREDTYP 122345506#define ACME$_INVFLAG 122345514$#define ACME$_INVPARAMETER 122345522 #define ACME$_NOMSGFND 122345530!#define ACME$_NULLVALUE 122345538(#define ACME$_RESOURCENOTAVAIL 122345546##define ACME$_UNSUPREVLVL 122345554"#define ACME$_NOTOUTITEM 122345562$#define ACME$_BADSTRUCTLEN 122345570N/* FATAL */##define ACME$_THREADERROR 122346500 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ACMEMSGDEF_LOADED */ ww /********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SD L EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************/'/*** MODULE $acmevmsdef IDENT X-11 ***/#ifndef __ACMEVMSDEF_LOADED#define __ACMEVMSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* Item code biasing factors */N/* */N/* Backward-compatibility */N/* Not for initial call */N/* Contemporary supported */N/* $CREPRC argument items */N/* UAI data */N/* */N/* ACME-specific output data types */N/*  */N/* These codes are provided by the VMS ACME for return */N/* in field MAX_LENGTH of an output Item Set. */N/* */N/* The field MAX_LENGTH is named for its purpose within */N/* Input Item Sets, but for Output Item Sets it allows */N/* SYS$ACM[W] clients to categorize the output they receive */N/* and dispatch to specialized handling. */N/* */N/* These ACME-specific values are provided only where the caller */N/* is one the VMS ACME knows can handle these particular binary */N/* codes, i.e. LOGINOUT. */N/* */P/* These data types are defined exclusively to provide backward compatibility */N/* with interface methods used prior to the introduction of SYS$ACM[W] by */N/* TNT$SERVER, LOGINOUT LGI-callouts and LOGINOUT DECwindows interfaces. */N/* They will not be provided to other clients which call SYS$ACM[W]. */N/* */$#define ACMEVMS$K_MIN_MSG_TYPE 32768N#define ACMEVMS$K_OLD_DECW_PWD_EXP_1 32768 /* Binary expiration warning */N#define ACMEVMS$K_OLD_DECW_PWD_EXP_2 32769 /* Binary expiration warning */Q#define ACMEVMS$K_OLD_DECW_PWD_QUALITY 32770 /* Binary password quality status */N#define ACMEVMS$K_OLD_SYSUAF_070 32771 /* Authorization Record */N#define ACMEVMS$K_OLD_AUTH_FLAGS 32772 /* Password requirement flags */N#define ACMEVMS$K_OLD_TERMINAL_CONNECT 32773 /* UIC, Username and Account */$#define ACMEVMS$K_MAX_MSG_TYPE 32773N/*  */N/* ACME-specific Item Codes for the VMS ACME */N/* */N/* Items with these codes from the callr of SYS$ACM[W] will */N/* be provided to the VMS ACME (exclusively) if they follow */N/* an instance of General Item Code ACME_TARGET_ACME_ID which */N/* specifies the VMS ACME. */N /* */N/* ACME-specific Item Codes have the high bit (15) set, whereas */N/* General Item Codes have it clear. */N/* */N/* */N/* Input Item Codes */N/* ! */N/* While SYS$ACM does not specify semantics for the handling */N/* of multiple input item codes of the same value, the semantics */N/* of the VMS ACME are uniform for all input item codes -- */N/* the value associated with the last input item prevails. */N/* */N/* " */N/* Input item codes not subject to VTF-7 <-> UCS conversion */N/* */N/* */N/* Backward-compatibility Input Item Codes */N/* */N/* These codes are defined exclusively to provide backward compatibility */#N/* with interface methods used prior to the introduction of SYS$ACM[W] by */N/* TNT$SERVER, LOGINOUT LGI-callouts and LOGINOUT DECwindows interfaces. */N/* They will not be honored from other clients which call SYS$ACM[W]. */N/* */!#define ACMEVMS$_MIN_OLD_IN 32768X#define ACMEVMS$_OLD_DECWINDOWS_FLAG 32768 /* old DECwindows authentication mechanism */U#define ACMEVMS$_OLD_HASHED_PASSWORD_1 32769 /* old ARGUS $authentication mechanism */U#define ACMEVMS$_OLD_HASHED_PASSWORD_2 32770 /* old ARGUS authentication mechanism */V#define ACMEVMS$_OLD_LGI_PHASE 32771 /* old LGI-callout authentication mechanism */V#define ACMEVMS$_OLD_LGI_STATUS 32772 /* old LGI-callout authentication mechanism */!#define ACMEVMS$_MAX_OLD_IN 32772N/* */N/* Solicited Input Item Codes */N/* % */N/* These codes support historic LOGINOUT behavour and in addition to */N/* being retricted to LOGINOUT are not honored on initial calls from */N/* LOGINOUT. They can only be provided in response to an Input Item Set. */N/* */'#define ACMEVMS$_MIN_SOLICITED_IN 33024R#define ACMEVMS$_LOGINOUT_CLI_FLAGS 33024 /* LOGINOUT received these qualifiers &*/N#define ACMEVMS$_OLD_CONNECTION_FLAG 33025 /* LOGINOUT did a reconnection */U#define ACMEVMS$_OLD_PROCESS_NAME 33026 /* the process name after LOGINOUT $SETPRN */'#define ACMEVMS$_MAX_SOLICITED_IN 33026N/* */N/* General Input Items */N/* */N/* These non-converting input item codes are permane'nt features */N/* of the VMS ACME, although some require particular privileges. */N/* */N/* LOGINOUT_CREPRC_FLAGS is only honored from LOGINOUT, although */N/* other clients can achieve the same results using other Item Codes. */N/* The reason LOGINOUT_CREPRC_FLAGS exists is to minimize coding */N/* changes for the transition of LOGINOUT to using SYS$ACM[W]. */(N/* */%#define ACMEVMS$_MIN_GENERAL_IN 33280Y#define ACMEVMS$_AUTOLOGIN_ALLOWED_FLAG 33280 /* autologin is allowed for this request */O#define ACMEVMS$_SPARE_1 33281 /* originally default_principal_flag */S#define ACMEVMS$_GENPWD_COUNT 33282 /* desired number of generated passwords */T#define ACMEVMS$_GENPWD_MANDATORY_FLAG 33283 /* generated password must be chosen */R#define ACMEVMS$_GENPWD_MAXLENGTH 3328)4 /* maximum length of generated password */R#define ACMEVMS$_GENPWD_MINLENGTH 33285 /* minimum length of generated password */T#define ACMEVMS$_LOGINOUT_CREPRC_FLAGS 33286 /* CTL$GL_CREPRC_FLAGS from LOGINOUT */^#define ACMEVMS$_REQUESTOR_PID 33287 /* PID of client process (make spare after Kestrel) */N#define ACMEVMS$_PREAUTHENTICATION_FLAG 33288 /* preauthenticated request */W#define ACMEVMS$_USES_SYSTEM_PASSWORD 33289 /* this connection uses system passwords */^#define ACMEVMS$_REQUEST*OR_UIC 33290 /* UIC of client process (make spare after Kestrel) */%#define ACMEVMS$_MAX_GENERAL_IN 33290N/* */N/* Input item codes subject to VTF-7 <-> UCS conversion */N/* */)#define ACMEVMS$_MIN_GENERAL_IN_UCS 41472Y#define ACMEVMS$_NET_PROXY 41472 /* network proxy username string from LOGINOUT */e#define ACMEVMS$_R+EQUESTOR_USERNAME 41473 /* Username of client process (make spare after Kestrel) */N#define ACMEVMS$_CONFIRM_PASSWORD_SYS 41474 /* Reenter New System Password */N#define ACMEVMS$_CONFIRM_PASSWORD_1 41475 /* Reenter New Primary Password */N#define ACMEVMS$_CONFIRM_PASSWORD_2 41476 /* Reenter New Secondary Password */)#define ACMEVMS$_MAX_GENERAL_IN_UCS 41476N/* */N/* Output Item Codes , */N/* */N/* While SYS$ACM does not specify semantics for the handling */N/* of multiple output item codes of the same value, the semantics */N/* of the VMS ACME are uniform for all output item codes -- */N/* all such codes are honored independently. */N/* */N/*- */N/* Output item codes not subject to VTF-7 <-> UCS conversion */N/* */N/* */N/* General Output Items */N/* */N/* These non-converting outp.ut item codes are permanent features */N/* of the VMS ACME. */N/* */&#define ACMEVMS$_MIN_GENERAL_OUT 49664R#define ACMEVMS$_CLASS_DAYS 49664 /* primary days for the scheduler class */N#define ACMEVMS$_CLASS_FLAGS 49665 /* flags for the scheduler class */N#define ACMEVMS$_CLASS_NUMBER 49666 /* number of the scheduler class */Z#define AC/MEVMS$_CLASS_PRIMEDAY_LIMIT 49667 /* hourly quantum percentage on primary day */\#define ACMEVMS$_CLASS_SECONDAY_LIMIT 49668 /* hourly quantum percentage on secondary day */&#define ACMEVMS$_MAX_GENERAL_OUT 49668N/* */N/* CREPRC-based output items */N/* */N/* These Output Item Codes provide information in 0a format suitable */N/* for passing to the $CREPRC System service, freeing callers of any */N/* need to track the introduction of new VMS process quotas. */N/* */%#define ACMEVMS$_MIN_CREPRC_OUT 49920N#define ACMEVMS$_CREPRC_BASPRI 49920 /* Process base priority */N#define ACMEVMS$_CREPRC_IMAGE 49921 /* Image name (LOGINOUT) */N#define ACMEVMS$_CREPRC_PRCNAM 499221 /* Process name (blank) */N#define ACMEVMS$_CREPRC_PRVADR 49923 /* Process privilege */N#define ACMEVMS$_CREPRC_QUOTA 49924 /* Process quota list */N#define ACMEVMS$_CREPRC_UIC 49925 /* UIC for detached process */%#define ACMEVMS$_MAX_CREPRC_OUT 49925N/* */N/* UAI-based output items */N/* 2 */N/* These codes provide the same information returned by $GETUAI, */N/* but synchronized with the UAI data as used for authentication. */N/* */N/* Correspondence between these codes and those from UAIDEF is */N/* tested in the private part of module STARLET_WE_USE_ by arrays */N/* ENSURE_UAI_NO_BIGGER_THAN_ACMEVMS_UAI and als3o by the array */N/* ENSURE_ACMEVMS_UAI_NO_BIGGER_THAN_UAI. */N/* */N/* The UAI_BASE constant defined below, added to normal UAI$_ codes */N/* used for the $SETUAI and $GETUAI system services will produce */N/* the following values: */N/* 4 */"#define ACMEVMS$_MIN_UAI_OUT 50176N#define ACMEVMS$_UAI_RTYPE 50176 /* UAF record type */N#define ACMEVMS$_UAI_VERSION 50177 /* UAF format version */S#define ACMEVMS$_UAI_USRDATOFF 50178 /* offset of counted string of user data */N#define ACMEVMS$_UAI_USERNAME 50179 /* username */N#define ACMEVMS$_UAI_USERNAME_TAG 50180 /* tag to differentiate records */N#define ACMEVMS$_UAI_UIC 50181 /* user ID code 5 */N#define ACMEVMS$_UAI_MEM 50182 /* member subfield */N#define ACMEVMS$_UAI_GRP 50183 /* group subfield */N#define ACMEVMS$_UAI_SUB_ID 50184 /* user sub-identifier */Q#define ACMEVMS$_UAI_PARENT_ID 50185 /* identifier of owner of this account */N#define ACMEVMS$_UAI_ACCOUNT 50186 /* account name */N#define ACMEVMS$_UAI_OWNER 50187 /* owner's name */N6#define ACMEVMS$_UAI_DEFDEV 50188 /* default device */N#define ACMEVMS$_UAI_DEFDIR 50189 /* default directory */N#define ACMEVMS$_UAI_LGICMD 50190 /* login command file */N#define ACMEVMS$_UAI_DEFCLI 50191 /* default command interpreter */N#define ACMEVMS$_UAI_CLITABLES 50192 /* user CLI tables */N#define ACMEVMS$_UAI_PWD 50193 /* hashed password */N#define ACMEVMS$_UAI_PWD2 750194 /* second password */N#define ACMEVMS$_UAI_LOGFAILS 50195 /* count of login failures */N#define ACMEVMS$_UAI_SALT 50196 /* random password salt */N#define ACMEVMS$_UAI_ENCRYPT 50197 /* primary password hash algorithm */O#define ACMEVMS$_UAI_ENCRYPT2 50198 /* secondary password hash algorithm */N#define ACMEVMS$_UAI_PWD_LENGTH 50199 /* minimum password length */N#define ACMEVMS$_UAI_EXPIRATION 50200 /* expirat8ion date for account */N#define ACMEVMS$_UAI_PWD_LIFETIME 50201 /* password lifetime */N#define ACMEVMS$_UAI_PWD_DATE 50202 /* date of password change */N#define ACMEVMS$_UAI_PWD2_DATE 50203 /* date of 2nd password change */N#define ACMEVMS$_UAI_LASTLOGIN_I 50204 /* date of last interactive login */P#define ACMEVMS$_UAI_LASTLOGIN_N 50205 /* date of last non-interactive login */N#define ACMEVMS$_UAI_PRIV 50206 /* process privilege vector 9 */N#define ACMEVMS$_UAI_DEF_PRIV 50207 /* default process privileges */N#define ACMEVMS$_UAI_MIN_CLASS 50208 /* minimum security class */N#define ACMEVMS$_UAI_MAX_CLASS 50209 /* maximum security class */N#define ACMEVMS$_UAI_FLAGS 50210 /* user flags longword */P#define ACMEVMS$_UAI_NETWORK_ACCESS_P 50211 /* hourly network access, primary */R#define ACMEVMS$_UAI_NETWORK_ACCESS_S 50212 /* hourly network access, secondary */N#define ACMEVM:S$_UAI_BATCH_ACCESS_P 50213 /* hourly batch access, primary */N#define ACMEVMS$_UAI_BATCH_ACCESS_S 50214 /* hourly batch access, secondary */N#define ACMEVMS$_UAI_LOCAL_ACCESS_P 50215 /* hourly local access, primary */N#define ACMEVMS$_UAI_LOCAL_ACCESS_S 50216 /* hourly local access, secondary */N#define ACMEVMS$_UAI_DIALUP_ACCESS_P 50217 /* hourly dialup access, primary */P#define ACMEVMS$_UAI_DIALUP_ACCESS_S 50218 /* hourly dialup access, secondary */N#define ACMEVMS$_UAI_REMOTE_ACCESS_P 5;0219 /* hourly remote access, primary */P#define ACMEVMS$_UAI_REMOTE_ACCESS_S 50220 /* hourly remote access, secondary */N#define ACMEVMS$_UAI_PRIMEDAYS 50221 /* bits representing primary days */N#define ACMEVMS$_UAI_PRI 50222 /* base process priority */N#define ACMEVMS$_UAI_QUEPRI 50223 /* maximum job queuing priority */N#define ACMEVMS$_UAI_MAXJOBS 50224 /* maximum jobs for UIC allowed */N#define ACMEVMS$_UAI_MAXACCTJOBS 50225 /* maximum jobs for ac<count allowed */P#define ACMEVMS$_UAI_MAXDETACH 50226 /* maximum detached processes for UIC */N#define ACMEVMS$_UAI_PRCCNT 50227 /* subprocess creation limit */N#define ACMEVMS$_UAI_BIOLM 50228 /* buffered I/O limit */N#define ACMEVMS$_UAI_DIOLM 50229 /* direct I/O limit */N#define ACMEVMS$_UAI_TQCNT 50230 /* timer queue entry limit */N#define ACMEVMS$_UAI_ASTLM 50231 /* AST queue limit */N#defin=e ACMEVMS$_UAI_ENQLM 50232 /* enqueue limit */N#define ACMEVMS$_UAI_FILLM 50233 /* open file limit */N#define ACMEVMS$_UAI_SHRFILLM 50234 /* shared file limit */N#define ACMEVMS$_UAI_WSQUOTA 50235 /* working set size quota */N#define ACMEVMS$_UAI_DFWSCNT 50236 /* default working set size */N#define ACMEVMS$_UAI_WSEXTENT 50237 /* working set size limit */N#define ACMEVMS$_UAI_PGFLQUOTA 5>0238 /* page file quota */N#define ACMEVMS$_UAI_CPUTIM 50239 /* CPU time quota */N#define ACMEVMS$_UAI_BYTLM 50240 /* buffered I/O byte count limit */O#define ACMEVMS$_UAI_PBYTLM 50241 /* paged buffer I/O byte count limit */X#define ACMEVMS$_UAI_JTQUOTA 50242 /* job-wide logical name table creation quota */N#define ACMEVMS$_UAI_PROXY_LIM 50243 /* number of proxies user can grant */N#define ACMEVMS$_UAI_PROXIES 50244 /* num?ber of proxies granted */N#define ACMEVMS$_UAI_ACCOUNT_LIM 50245 /* number of sub-accounts allowed */N#define ACMEVMS$_UAI_ACCOUNTS 50246 /* number of sub-accounts in use */N#define ACMEVMS$_UAI_USER_DATA 50247 /* user data area */N/* Next two codes not supported for output */N#define ACMEVMS$_UAI_PASSWORD 50248 /* plaintext primary password */N#define ACMEVMS$_UAI_PASSWORD2 50249 /* plaintext secondary password @ */N/* Previous two codes not supported for output */N#define ACMEVMS$_UAI_DEF_CLASS 50250 /* default security classification */W#define ACMEVMS$_UAI_AUDIT_FLAGS 50251 /* audit flags to be used when changing data */"#define ACMEVMS$_MAX_UAI_OUT 50251N/* */N/* Output item codes subject to VTF-7 <-> UCS conversion */N/* A */*#define ACMEVMS$_MIN_GENERAL_OUT_UCS 57856N#define ACMEVMS$_CLASS_NAME 57856 /* name of the scheduler class */*#define ACMEVMS$_MAX_GENERAL_OUT_UCS 57856N/*+ */N/* */N/* Bit mask types */N/* B */N/*- */N/* */N/* Flags indicating CLI qualifiers were supplied */N/* */N/* Most of these are passed to the VMS ACME to possibly */N/* trigger (audited) rejection of the login attempt. */N/* C */#define ACMEVMS$M_DISK 0x1#define ACMEVMS$M_CLI 0x2#define ACMEVMS$M_TABLES 0x4#define ACMEVMS$M_COMMAND 0x8#define ACMEVMS$M_CONNECT 0x10##define ACMEVMS$M_NEW_PASSWORD 0x20%#define ACMEVMS$M_LOCAL_PASSWORD 0x40 #ifdef __NEW_STARLETtypedef struct _cli_flags {N unsigned acmevms$v_disk : 1; /* /DISK= */N unsigned acmevms$v_cli : 1; /* /CLI= */ DN unsigned acmevms$v_tables : 1; /* /TABLES= */N unsigned acmevms$v_command : 1; /* /COMMAND= */N unsigned acmevms$v_connect : 1; /* /CONNECT[=] */N unsigned acmevms$v_new_password : 1; /* /NEW_PASSWORD */N unsigned acmevms$v_local_password : 1; /* /LOCAL_PASSWORD */- unsigned acmevms$v_cli_flags_fill_1 : 25; } CLI_FLAGS;#else /* __OLD_STARLET */typedeEf struct _cli_flags {N unsigned acmevms$v_disk : 1; /* /DISK= */N unsigned acmevms$v_cli : 1; /* /CLI= */N unsigned acmevms$v_tables : 1; /* /TABLES= */N unsigned acmevms$v_command : 1; /* /COMMAND= */N unsigned acmevms$v_connect : 1; /* /CONNECT[=] */N unsigned acmevms$v_new_password : 1; /* /NEW_PASSWORD */N F unsigned acmevms$v_local_password : 1; /* /LOCAL_PASSWORD */- unsigned acmevms$v_cli_flags_fill_1 : 25; } cli_flags;%#endif /* #ifdef __NEW_STARLET */#define ACMEVMS$K_LENGTH 4N/*+ */N/* */N/* Miscellaneous constants */N/* G */N/*- */N/* Authentication mechanism for TNT$SERVER */N#define ACMEVMS$K_AUTH_MECH_ARGUS 13860864 /* Only for TNT$SERVER */N/* Base to which UAI$_ codes can be added for use in SYS$ACM[W] */N#define ACMEVMS$K_UAI_BASE 50175 /* Item Code Base */N/* Maximum length (in characters) of a Mapped VMS Username */NH#define ACMEVMS$K_MAXCHAR_VMS_USERNAME 32 /* in characters */  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ACMEVMSDEF_LOADED */ ww;/***************************************************************** I***************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $ACRDEF ***/#ifndef __ACRDEF_LOADED#define __ACRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragmJa __member_alignment __save#pragma __nomember_alignmentR#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 ..K.#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 N/*+ */N/* ACRDEF - ACCOUNTING RECORD DEFINITIONS */N/* */LN/*********************************************************************** */N/* NOTE: IF ANY FIELDS CHANGE, A NEW VERSION NUMBER MUST BE ADDED AND * */R/* "ACR$K_CURVER" EQUATED TO IT. * */N/*********************************************************************** */N/* */N/*- */N/* RECORD/PACKET VERMSIONS (ACR$V_VERSION) */N#define ACR$K_VERSION2 0 /* VMS VERSION 2 ACCOUNTING FORMAT */N#define ACR$K_VERSION3T 1 /* VMS VERSION 3 FIELD TEST */N#define ACR$K_VERSION3 2 /* VMS VERSION 3 ACCOUNTING FORMAT */N#define ACR$K_VERSION4 3 /* VMS VERSION 4 ACCOUNTING FORMAT */N#define ACR$K_CURVER 3 /* CURRENT FORMAT VERSION NUMBER */#define ACR$M_PACKET 0x1#define ACR$M_TYPE 0 NxFE#define ACR$M_SUBTYPE 0xF00#define ACR$M_VERSION 0x7000#define ACR$M_CUSTOMER 0x8000N#define ACR$K_PRCDEL 1 /* PROCESS DELETE */N#define ACR$K_PRCPUR 2 /* PROCESS PURGE */N#define ACR$K_IMGDEL 3 /* IMAGE DELETE */N#define ACR$K_IMGPUR 4 /* IMAGE PURGE */N#define ACR$K_SYSINIT 5 /* SYSTEM INITIALIZATION */N#define OACR$K_SETTIME 6 /* SET SYSTEM TIME */N#define ACR$K_LOGFAIL 7 /* LOGIN VALIDATION FAILURE */N#define ACR$K_PRINT 8 /* PRINT JOB */N#define ACR$K_USER 9 /* USER SUPPLIED DATA */N#define ACR$K_ENABLE 10 /* ACC. MANG. FUNCTION ENABLE */N#define ACR$K_DISABLE 11 /* ACC. MANG. FUNCTION DISABLE */N#define ACR$K_ALTACM 12 P /* DECLARE ALTERNATE ACC. MANG. */N#define ACR$K_FILE_FL 13 /* ACCOUNTING FILE - FORWARD LINK */N#define ACR$K_FILE_BL 14 /* ACCOUNTING FILE - BACKWARD LINK */N/* RECORD SUBTYPE (ACR$V_SUBTYPE) CONSTANTS */N#define ACR$K_INTERACTIVE 1 /* INTERACTIVE PROCESS */N#define ACR$K_SUBPROCESS 2 /* SUBPROCESS */N#define ACR$K_DETACHED 3 /* DETACHED PROCESS Q */N#define ACR$K_BATCH 4 /* BATCH PROCESS */N#define ACR$K_NETWORK 5 /* NETWORK PROCESS */N/* PACKET TYPE (ACR$V_TYPE) CONSTANTS */N#define ACR$K_ID 1 /* IDENTIFICATION PACKET */N#define ACR$K_RESOURCE 2 /* RESOURCE USAGE PACKET */N#define ACR$K_IMAGENAME 3 /* IMAGENAME PACKET */N#defin Re ACR$K_FILENAME 4 /* FILENAME PACKET */N#define ACR$K_USER_DATA 5 /* USER DATA PACKET */ #ifdef __NEW_STARLETtypedef struct _acrdef { __union {N unsigned short int acr$w_type; /* RECORD/PACKET TYPE */ __struct {N unsigned acr$v_packet : 1; /* RECORD(0)/PACKET(1) */N unsigned acr$v_type : 7; /* RECORD/PACKET TYPE */N unsigned aScr$v_subtype : 4; /* RECORD/PACKET SUBTYPE */N unsigned acr$v_version : 3; /* RECORD/PACKET VERSION NUMBER */N unsigned acr$v_customer : 1; /* DIGITAL(0)/CUSTOMER(1) */ } acr$r_type_bits;N/* RECORD TYPE (ACR$V_TYPE) CONSTANTS */ } acr$r_type_overlay;N unsigned short int acr$w_length; /* RECORD OR PACKET LENGTH */N/* T */N/* RECORD HEADER */N/* */ } ACRDEF; #if !defined(__VAXC)0#define acr$w_type acr$r_type_overlay.acr$w_typeD#define acr$v_packet acr$r_type_overlay.acr$r_type_bits.acr$v_packet@#define acr$v_type acr$r_type_overlay.acr$r_type_bits.acr$v_typeF#define acr$v_subtype acr$r_type_overlay.acr$r_type_bits.acr$v_subtypeF#define acr$v_version acr$r_ty Upe_overlay.acr$r_type_bits.acr$v_versionH#define acr$v_customer acr$r_type_overlay.acr$r_type_bits.acr$v_customer"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct acrdef { __union {N unsigned short int acr$w_type; /* RECORD/PACKET TYPE */ __struct {N unsigned acr$v_packet : 1; /* RECORD(0)/PACKET(1) */N unsigned acr$v_type : 7; /* RECORD/PACKET TYPE */N unsigned aVcr$v_subtype : 4; /* RECORD/PACKET SUBTYPE */N unsigned acr$v_version : 3; /* RECORD/PACKET VERSION NUMBER */N unsigned acr$v_customer : 1; /* DIGITAL(0)/CUSTOMER(1) */ } acr$r_type_bits;N/* RECORD TYPE (ACR$V_TYPE) CONSTANTS */ } acr$r_type_overlay;N unsigned short int acr$w_length; /* RECORD OR PACKET LENGTH */N/* W */N/* RECORD HEADER */N/* */ } ; #if !defined(__VAXC)0#define acr$w_type acr$r_type_overlay.acr$w_typeD#define acr$v_packet acr$r_type_overlay.acr$r_type_bits.acr$v_packet@#define acr$v_type acr$r_type_overlay.acr$r_type_bits.acr$v_typeF#define acr$v_subtype acr$r_type_overlay.acr$r_type_bits.acr$v_subtypeF#define acr$v_version acr$r_type_ove Xrlay.acr$r_type_bits.acr$v_versionH#define acr$v_customer acr$r_type_overlay.acr$r_type_bits.acr$v_customer"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define ACR$K_HDRLEN 12 /* RECORD HEADER LENGTH */N#define ACR$C_HDRLEN 12 /* RECORD HEADER LENGTH */N/* */ #ifdef __NEW_STARLETtypedef struct _acrdef1 { char acrdef$$_fill Y_2 [4];N unsigned __int64 acr$q_systime; /* EVENT SYSTEM TIME */N/* IDENTIFICATION PACKET */N/* */ } ACRDEF1;#else /* __OLD_STARLET */struct acrdef1 { char acrdef$$_fill_2 [4];N unsigned int acr$q_systime [2]; /* EVENT SYSTEM TIME */N/* IDENTIFICATION PACKET */ ZN/* */ } ;%#endif /* #ifdef __NEW_STARLET */#define ACR$M_FULLNAME 0x1#define ACR$M_UIDGID 0x2#define ACR$M_FILL_1 0xFCQ#define ACR$K_IDVAR 58 /* BEGINNING OF VARIABLE STORAGE AREA */Q#define ACR$C_IDVAR 58 /* BEGINNING OF VARIABLE STORAGE AREA */N/* */ #ifdef __NEW_STARLETtypedef struct _ac [rdef2 { char acrdef$$_fill_3 [4];N unsigned int acr$l_pid; /* PROCESS ID */N unsigned int acr$l_owner; /* OWNER PROCES ID */ __union {N unsigned int acr$l_uic; /* PROCESS UIC */ __struct {N unsigned short int acr$w_mem; /* MEMBER UIC */N unsigned short int acr$w_grp; /* GROUP UIC */ } acr$r_uic_fi \elds; } acr$r_uic_overlay;N unsigned __int64 acr$q_priv; /* PROCESS PRIV */N unsigned char acr$b_pri; /* PROCESS PRIORITY */ __union {N unsigned char acr$b_idflgs; /* FLAGS BIT MASK */ __struct {N unsigned acr$v_fullname : 1; /* NOT PRESENT (0)/PRESENT(1) */N unsigned acr$v_uidgid : 1; /* NOT PRESENT (0)/PRESENT(1) */N unsigned acr$v_fil]l_1 : 6; /* SPARE BITS */ } acr$r_idflgs_bits; } acr$r_idflgs_overlay;N unsigned short int acr$w_username; /* USERNAME OFFSET */N unsigned short int acr$w_account; /* ACCOUNT NAME OFFSET */N unsigned short int acr$w_nodename; /* NODE NAME OFFSET */N unsigned short int acr$w_terminal; /* TERMINAL NAME OFFSET */N unsigned short int acr$w_jobname; /* JOB NAME OFFSET ^ */N unsigned int acr$l_jobid; /* JOB ID */N unsigned short int acr$w_queue; /* QUEUE NAME OFFSET */N unsigned short int acr$w_nodeaddr; /* REMOTE NODE ADDRESS */N unsigned short int acr$w_remoteid; /* REMOTE ID OFFSET */N unsigned short int acr$w_fulladdr; /* REMOTE PHASE V ADDRESS */N unsigned short int acr$w_fullname; /* REMOTE PHASE V FULLNAME */N unsigned i _nt acr$l_posix_uid; /* POSIX UID */N unsigned int acr$l_posix_gid; /* POSIX GID */N/* RESOURCE PACKET */N/* */ } ACRDEF2; #if !defined(__VAXC)-#define acr$l_uic acr$r_uic_overlay.acr$l_uic>#define acr$w_mem acr$r_uic_overlay.acr$r_uic_fields.acr$w_mem>#define acr$w_grp acr$r_uic_overlay.acr$r_uic_ `fields.acr$w_grp6#define acr$b_idflgs acr$r_idflgs_overlay.acr$b_idflgsL#define acr$v_fullname acr$r_idflgs_overlay.acr$r_idflgs_bits.acr$v_fullnameH#define acr$v_uidgid acr$r_idflgs_overlay.acr$r_idflgs_bits.acr$v_uidgidH#define acr$v_fill_1 acr$r_idflgs_overlay.acr$r_idflgs_bits.acr$v_fill_1"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct acrdef2 { char acrdef$$_fill_3 [4];N unsigned int acr$l_pid; /* PROCESS ID */N aunsigned int acr$l_owner; /* OWNER PROCES ID */ __union {N unsigned int acr$l_uic; /* PROCESS UIC */ __struct {N unsigned short int acr$w_mem; /* MEMBER UIC */N unsigned short int acr$w_grp; /* GROUP UIC */ } acr$r_uic_fields; } acr$r_uic_overlay;N unsigned int acr$q_priv [2]; /* PROCESS PRIV */N unsi bgned char acr$b_pri; /* PROCESS PRIORITY */ __union {N unsigned char acr$b_idflgs; /* FLAGS BIT MASK */ __struct {N unsigned acr$v_fullname : 1; /* NOT PRESENT (0)/PRESENT(1) */N unsigned acr$v_uidgid : 1; /* NOT PRESENT (0)/PRESENT(1) */N unsigned acr$v_fill_1 : 6; /* SPARE BITS */ } acr$r_idflgs_bits; } acr$r_idflgs_overlay;N unsicgned short int acr$w_username; /* USERNAME OFFSET */N unsigned short int acr$w_account; /* ACCOUNT NAME OFFSET */N unsigned short int acr$w_nodename; /* NODE NAME OFFSET */N unsigned short int acr$w_terminal; /* TERMINAL NAME OFFSET */N unsigned short int acr$w_jobname; /* JOB NAME OFFSET */N unsigned int acr$l_jobid; /* JOB ID */N unsigned short int acr$w_queued; /* QUEUE NAME OFFSET */N unsigned short int acr$w_nodeaddr; /* REMOTE NODE ADDRESS */N unsigned short int acr$w_remoteid; /* REMOTE ID OFFSET */N unsigned short int acr$w_fulladdr; /* REMOTE PHASE V ADDRESS */N unsigned short int acr$w_fullname; /* REMOTE PHASE V FULLNAME */N unsigned int acr$l_posix_uid; /* POSIX UID */N unsigned int acr$l_posix_gid; /* POSIX GID e */N/* RESOURCE PACKET */N/* */ } ; #if !defined(__VAXC)-#define acr$l_uic acr$r_uic_overlay.acr$l_uic>#define acr$w_mem acr$r_uic_overlay.acr$r_uic_fields.acr$w_mem>#define acr$w_grp acr$r_uic_overlay.acr$r_uic_fields.acr$w_grp6#define acr$b_idflgs acr$r_idflgs_overlay.acr$b_idflgsL#define acr$v_fullname acr$r_idflgs_overlay.acr$r_idflgs_b fits.acr$v_fullnameH#define acr$v_uidgid acr$r_idflgs_overlay.acr$r_idflgs_bits.acr$v_uidgidH#define acr$v_fill_1 acr$r_idflgs_overlay.acr$r_idflgs_bits.acr$v_fill_1"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _acrdef3 { char acrdef$$_fill_4 [4];N unsigned __int64 acr$q_login; /* PROCESS/IMAGE START TIME */N unsigned int acr$l_status; /* PROCESS/IMAGE FINAL STATUS */T unsignedg int acr$l_imgcnt; /* IMAGE EXECUTION COUNT/SEQUENCE NUMBER */N unsigned int acr$l_cputime; /* PROCESS/IMAGE CPU TIME */N unsigned int acr$l_faults; /* PROCESS/IMAGE PAGE FAULT COUNT */Q unsigned int acr$l_faultio; /* PROCESS/IMAGE PAGE FAULT I/O COUNT */N unsigned int acr$l_wspeak; /* PROCESS/IMAGE WORKING SET PEAK */Q unsigned int acr$l_pagefl; /* PROCESS/IMAGE PEAK PAGE FILE USAGE */N unsigned int acr$l_dhiocnt; /* PROCESS/IMAGE DIRECT I/O COUNT */O unsigned int acr$l_biocnt; /* PROCESS/IMAGE BUFFERED I/O COUNT */O unsigned int acr$l_volumes; /* PROCESS/IMAGE VOLUME MOUNT COUNT */N unsigned int acr$l_vp_cputime; /* PROCESS/IMAGE VECTOR CPU TIME */N/* */N/* IMAGENAME PACKET */N/* i */ } ACRDEF3;#else /* __OLD_STARLET */struct acrdef3 { char acrdef$$_fill_4 [4];N unsigned int acr$q_login [2]; /* PROCESS/IMAGE START TIME */N unsigned int acr$l_status; /* PROCESS/IMAGE FINAL STATUS */T unsigned int acr$l_imgcnt; /* IMAGE EXECUTION COUNT/SEQUENCE NUMBER */N unsigned int acr$l_cputime; /* PROCESS/IMAGE CPU TIME */N unsigned int acr$l_faults; /* PROCEjSS/IMAGE PAGE FAULT COUNT */Q unsigned int acr$l_faultio; /* PROCESS/IMAGE PAGE FAULT I/O COUNT */N unsigned int acr$l_wspeak; /* PROCESS/IMAGE WORKING SET PEAK */Q unsigned int acr$l_pagefl; /* PROCESS/IMAGE PEAK PAGE FILE USAGE */N unsigned int acr$l_diocnt; /* PROCESS/IMAGE DIRECT I/O COUNT */O unsigned int acr$l_biocnt; /* PROCESS/IMAGE BUFFERED I/O COUNT */O unsigned int acr$l_volumes; /* PROCESS/IMAGE VOLUME kMOUNT COUNT */N unsigned int acr$l_vp_cputime; /* PROCESS/IMAGE VECTOR CPU TIME */N/* */N/* IMAGENAME PACKET */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _acrdef4 { char acrdef$$_fill_5 [4];N char acr$t_imagename [256]; l /* IMAGENAME */N/* */N/* PRINT RESOURCE PACKET */N/* */ } ACRDEF4;#else /* __OLD_STARLET */struct acrdef4 { char acrdef$$_fill_5 [4];N char acr$t_imagename [256]; /* IMAGENAME */N/* m */N/* PRINT RESOURCE PACKET */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _acrdef5 { char acrdef$$_fill_6 [4];N unsigned int acr$l_printsts; /* JOB STATUS */N unsigned __int64 acr$q_quetime; /* TIME JOB WAS QUEUED */N unsignned __int64 acr$q_begtime; /* TIME JOB WAS BEGUN */N unsigned int acr$l_symcputim; /* SYMBIONT CPU TIME */N unsigned int acr$l_pagecnt; /* TOTAL PAGES PRINTED */N unsigned int acr$l_qiocnt; /* TOTAL QIOS ISSUED */N unsigned int acr$l_getcnt; /* TOTAL GETS ISSUED */N/* */N/* FILENAME PACKET o */N/* */ } ACRDEF5;#else /* __OLD_STARLET */struct acrdef5 { char acrdef$$_fill_6 [4];N unsigned int acr$l_printsts; /* JOB STATUS */N unsigned int acr$q_quetime [2]; /* TIME JOB WAS QUEUED */N unsigned int acr$q_begtime [2]; /* TIME JOB WAS BEGUN */N unsigned int acr$l_symcputim; /* SpYMBIONT CPU TIME */N unsigned int acr$l_pagecnt; /* TOTAL PAGES PRINTED */N unsigned int acr$l_qiocnt; /* TOTAL QIOS ISSUED */N unsigned int acr$l_getcnt; /* TOTAL GETS ISSUED */N/* */N/* FILENAME PACKET */N/* q */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _acrdef6 { char acrdef$$_fill_7 [4];N char acr$t_filename [256]; /* FILENAME */N/* */N/* USER DATA PACKET */N/* */ } ACRDEF6;#else /* __OLD_STARL rET */struct acrdef6 { char acrdef$$_fill_7 [4];N char acr$t_filename [256]; /* FILENAME */N/* */N/* USER DATA PACKET */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _acrdef7 { char acrdef$$_fill_8 s [4];N char acr$t_user_data [256]; /* USER DATA */ } ACRDEF7;#else /* __OLD_STARLET */struct acrdef7 { char acrdef$$_fill_8 [4];N char acr$t_user_data [256]; /* USER DATA */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previtously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ACRDEF_LOADED */ wwkr/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//******************************************************************* u*************************************************************//*** MODULE $AFRDEF ***/#ifndef __AFRDEF_LOADED#define __AFRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 v /* 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 N#define AFwR$K_USER_LENGTH 16 /* Length of user entry */N#define AFR$C_USER_LENGTH 16 /* Length of user entry */N#define AFR$K_VMS_LENGTH 24 /* Length of VMS entry */N#define AFR$C_VMS_LENGTH 24 /* Length of VMS entry */N#define AFR$K_EXTENDED_LENGTH 296 /* Extended length */N#define AFR$C_EXTENDED_LENGTH 296 /* Extended length */#define AFR$C_UNINITIALIZED 0#defxine AFR$C_BUFFERED 1S#define AFR$C_EXCEPTION 2 /* Values passed to start system service */ #ifdef __NEW_STARLETtypedef struct _afrdef { __union {N unsigned __int64 afr$q_fault_pc; /* PC of alignment fault */ __struct {* unsigned int afr$l_fault_pc_l;* unsigned int afr$l_fault_pc_h;& } afr$r_pc_data_longwords; } afr$r_pc_data_overlay; __union {N unsigned __int64 afr$q_fault_va; /* Unaligyned virtual address */ __struct {* unsigned int afr$l_fault_va_l;* unsigned int afr$l_fault_va_h;& } afr$r_va_data_longwords; } afr$r_va_data_overlay; __union {N unsigned __int64 afr$q_reserved; /* Reserved for VMS */ __struct {* unsigned int afr$l_reserved_l;* unsigned int afr$l_reserved_h;' } afr$r_reserved_longwords;! } afr$r_reserved_overlay;N char z afr$t_image_name [256]; /* Image name */N char afr$t_user_name [16]; /* User name */ } AFRDEF; #if !defined(__VAXC);#define afr$q_fault_pc afr$r_pc_data_overlay.afr$q_fault_pcM#define afr$r_pc_data_longwords afr$r_pc_data_overlay.afr$r_pc_data_longwordsA#define afr$l_fault_pc_l afr$r_pc_data_longwords.afr$l_fault_pc_lA#define afr$l_fault_pc_h afr$r_pc_data_longwords.afr$l_fault_pc_h;#define afr$q_fault_va afr$r_va_da{ta_overlay.afr$q_fault_vaM#define afr$r_va_data_longwords afr$r_va_data_overlay.afr$r_va_data_longwordsA#define afr$l_fault_va_l afr$r_va_data_longwords.afr$l_fault_va_lA#define afr$l_fault_va_h afr$r_va_data_longwords.afr$l_fault_va_h<#define afr$q_reserved afr$r_reserved_overlay.afr$q_reservedP#define afr$r_reserved_longwords afr$r_reserved_overlay.afr$r_reserved_longwordsB#define afr$l_reserved_l afr$r_reserved_longwords.afr$l_reserved_lB#define afr$l_reserved_h afr$r_reserved_longwords.|afr$l_reserved_h"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct afrdef { __union {N unsigned int afr$q_fault_pc [2]; /* PC of alignment fault */ __struct {* unsigned int afr$l_fault_pc_l;* unsigned int afr$l_fault_pc_h;& } afr$r_pc_data_longwords; } afr$r_pc_data_overlay; __union {N unsigned int afr$q_fault_va [2]; /* Unaligned virtual address */ __struct {* } unsigned int afr$l_fault_va_l;* unsigned int afr$l_fault_va_h;& } afr$r_va_data_longwords; } afr$r_va_data_overlay; __union {N unsigned int afr$q_reserved [2]; /* Reserved for VMS */ __struct {* unsigned int afr$l_reserved_l;* unsigned int afr$l_reserved_h;' } afr$r_reserved_longwords;! } afr$r_reserved_overlay;N char afr$t_image_name [256]; /* Image name ~ */N char afr$t_user_name [16]; /* User name */ } ; #if !defined(__VAXC);#define afr$q_fault_pc afr$r_pc_data_overlay.afr$q_fault_pcW#define afr$l_fault_pc_l afr$r_pc_data_overlay.afr$r_pc_data_longwords.afr$l_fault_pc_lW#define afr$l_fault_pc_h afr$r_pc_data_overlay.afr$r_pc_data_longwords.afr$l_fault_pc_h;#define afr$q_fault_va afr$r_va_data_overlay.afr$q_fault_vaW#define afr$l_fault_va_l afr$r_va_data_overlay.afr$r_va_data_longw ords.afr$l_fault_va_lW#define afr$l_fault_va_h afr$r_va_data_overlay.afr$r_va_data_longwords.afr$l_fault_va_h<#define afr$q_reserved afr$r_reserved_overlay.afr$q_reservedY#define afr$l_reserved_l afr$r_reserved_overlay.afr$r_reserved_longwords.afr$l_reserved_lY#define afr$l_reserved_h afr$r_reserved_overlay.afr$r_reserved_longwords.afr$l_reserved_h"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define AFR$M_ENABLED 0x1#define AFR$M_TEMP_ENABLED 0x2#defin e AFR$M_PERM_ENABLED 0x4#define AFR$M_DISABLED 0#define AFR$M_USER_INFO 0x8 #ifdef __NEW_STARLETtypedef struct _afredef {N unsigned afr$v_enabled : 1; /* Enable bit */N unsigned afr$v_temp_enabled : 1; /* TRUE if enabled image by image */N unsigned afr$v_perm_enabled : 1; /* TRUE if permanently enabled */N unsigned afr$v_user_info : 1; /* If set, user info is saved */ unsigned afr$v_fill_44_ : 4; } AFREDEF; #else /* __OLD_STARLET */struct afredef {N unsigned afr$v_enabled : 1; /* Enable bit */N unsigned afr$v_temp_enabled : 1; /* TRUE if enabled image by image */N unsigned afr$v_perm_enabled : 1; /* TRUE if permanently enabled */N unsigned afr$v_user_info : 1; /* If set, user info is saved */ unsigned afr$v_fill_44_ : 4; } ;%#endif /* #ifdef __NEW_STARLET */#define AME$M_KERNEL_MODE 0x1#define AME$M_EXEC_MODE 0x2#define AME$M_SUPER_MODE 0x4#define AME$M_USER_MODE 0x8#define AME$M_USER_VA 0x10#define AME$M_SYSTEM_VA 0x20#define AME$M_USER_PC 0x40#define AME$M_SYSTEM_PC 0x80#define AME$M_USER_VA_P0 0x100#define AME$M_USER_VA_P1 0x200#define AME$M_USER_VA_P2 0x400N#define AME$C_SIZE 4 /* Length in bytes for mask */N#define AME$K_SIZE 4 /* Length in bytes for mask */ #ifdef __NEW_STARLETtypedef struct _amedef {# unsigned ame$v_kernel_mode : 1;! unsigned ame$v_exec_mode : 1;" unsigned ame$v_super_mode : 1;! unsigned ame$v_user_mode : 1; unsigned ame$v_user_va : 1;! unsigned ame$v_system_va : 1; unsigned ame$v_user_pc : 1;! unsigned ame$v_system_pc : 1;" unsigned ame$v_user_va_p0 : 1;" unsigned ame$v_user_va_p1 : 1;" unsigned ame$v_user_va_p2 : 1; unsigned ame$v_fill_45_ : 5; } AMEDEF;#else /* __OLD_STARLET */struct amedef {# unsigned ame$v_kernel_mode : 1;! unsigned ame$v_exec_mode : 1;" unsigned ame$v_super_mode : 1;! unsigned ame$v_user_mode : 1; unsigned ame$v_user_va : 1;! unsigned ame$v_system_va : 1; unsigned ame$v_user_pc : 1;! unsigned ame$v_system_pc : 1;" unsigned ame$v_user_va_p0 : 1;" unsigned ame$v_user_va_p1 : 1;" unsigned ame$v_user_va_p2 : 1; unsigned ame$v_fill_45_ : 5; } ;%#endif /* #ifdef __NEW_STARLET */N/*  */N/* AFLDEF defines which region a VA lies in */N/* */#define AFL$M_P0_VA 0x1#define AFL$M_P1_VA 0x2#define AFL$M_P2_VA 0x4#define AFL$M_S0S1_VA 0x8#define AFL$M_S2_VA 0x10#define AFL$M_PROCESS_VA 0x20#define AFL$M_SYSTEM_VA 0x40 #ifdef __NEW_STARLETNtypedef struct _afldef { /* Alignment fault location */ __union {"  unsigned int afl$l_va_loc; __struct {N unsigned afl$v_p0_va : 1; /* Address is in P0 space */N unsigned afl$v_p1_va : 1; /* Address is in P1 space */N unsigned afl$v_p2_va : 1; /* Address is in P2 space */N unsigned afl$v_s0s1_va : 1; /* Address is in S0 or S1 space */N unsigned afl$v_s2_va : 1; /* Address is in S2 space */Z unsigned afl$v_process_va : 1; /* Addr ess is in P0,P1,or P2 (process space) */X unsigned afl$v_system_va : 1; /* Address is in S0,S1,or S2 (system space) */( unsigned afl$v_fill_46_ : 1;# } afl$r_va_loc_bitdefs; } afl$r_afl_overlay; } AFLDEF; #if !defined(__VAXC)3#define afl$l_va_loc afl$r_afl_overlay.afl$l_va_locC#define afl$r_va_loc_bitdefs afl$r_afl_overlay.afl$r_va_loc_bitdefs4#define afl$v_p0_va afl$r_va_loc_bitdefs.afl$v_p0_va4#define afl$v_p1_va afl$r_va_loc_bitdefs.afl $v_p1_va4#define afl$v_p2_va afl$r_va_loc_bitdefs.afl$v_p2_va8#define afl$v_s0s1_va afl$r_va_loc_bitdefs.afl$v_s0s1_va4#define afl$v_s2_va afl$r_va_loc_bitdefs.afl$v_s2_va>#define afl$v_process_va afl$r_va_loc_bitdefs.afl$v_process_va<#define afl$v_system_va afl$r_va_loc_bitdefs.afl$v_system_va"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */Ntypedef struct _afldef { /* Alignment fault location */ __union {" unsigned int afl$l_va_loc; __struct {N unsigned afl$v_p0_va : 1; /* Address is in P0 space */N unsigned afl$v_p1_va : 1; /* Address is in P1 space */N unsigned afl$v_p2_va : 1; /* Address is in P2 space */N unsigned afl$v_s0s1_va : 1; /* Address is in S0 or S1 space */N unsigned afl$v_s2_va : 1; /* Address is in S2 space */Z unsigned afl$v_process_va : 1; /* Address is in P0,P1,or P2 (process spa ce) */X unsigned afl$v_system_va : 1; /* Address is in S0,S1,or S2 (system space) */( unsigned afl$v_fill_46_ : 1;# } afl$r_va_loc_bitdefs; } afl$r_afl_overlay; } afldef; #if !defined(__VAXC)3#define afl$l_va_loc afl$r_afl_overlay.afl$l_va_locF#define afl$v_p0_va afl$r_afl_overlay.afl$r_va_loc_bitdefs.afl$v_p0_vaF#define afl$v_p1_va afl$r_afl_overlay.afl$r_va_loc_bitdefs.afl$v_p1_vaF#define afl$v_p2_va afl$r_afl_overlay.afl$r_va_loc_bitdefs .afl$v_p2_vaJ#define afl$v_s0s1_va afl$r_afl_overlay.afl$r_va_loc_bitdefs.afl$v_s0s1_vaF#define afl$v_s2_va afl$r_afl_overlay.afl$r_va_loc_bitdefs.afl$v_s2_vaP#define afl$v_process_va afl$r_afl_overlay.afl$r_va_loc_bitdefs.afl$v_process_vaN#define afl$v_system_va afl$r_afl_overlay.afl$r_va_loc_bitdefs.afl$v_system_va"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __AFRDEF_LOADED */ ww綛/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]S TARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $AGNDEF ***/#ifndef __AGNDEF_LOADED#define __AGNDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* $ASSIGN FLAGS bit definitions */N/*- */#define AGN$M_READONLY 0x1#define AGN$M_WRITEONLY 0x2#define AGN$M_CLONE 0x4 #ifdef __NEW_STARLETtypedef union _agndef { __struct {\ unsigned agn$v_readonly : 1; /* Channel to be assigned to device is READ ONLY. */] unsigned agn$v_writeonly : 1; /* Channel to be assigned to device is WRITE ONLY. */U unsigned agn$v_clone : 1; /* Channel will be cloned by POSIX fork(). */# unsigned agn$v_fill_0 : 29; } agn$r_agndef_bits; } AGNDEF; #if !defined(__VAXC)7#define agn$v_readonly agn$r_agndef_bits.agn$v_readonly9#define agn$v_writeonly agn$r_agndef_bits.agn$v_writeonly1#define agn$v_clone agn$r_agndef_bits.agn$v_clone"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union agndef { __struct {\ unsigned agn$v_readonly : 1; /* Channel to be assigned to device is READ ONLY. */] unsigned agn$v_writeonly : 1; /* Channel to be assigned to device is WRITE ONLY. */U unsigned agn$v_clone : 1; /* Channel will be cloned by POSIX fork(). */# unsigned agn$v_fill_0 : 29; } agn$r_agndef_bits; } ; #if !defined(__VAXC)7 #define agn$v_readonly agn$r_agndef_bits.agn$v_readonly9#define agn$v_writeonly agn$r_agndef_bits.agn$v_writeonly1#define agn$v_clone agn$r_agndef_bits.agn$v_clone"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus  }#endif#pragma __standard #endif /* __AGNDEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//* ** MODULE $ALPHADEF ***/#ifndef __ALPHADEF_LOADED#define __ALPHADEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*  */N/* Not all of what you see here was built, shipped and/or announced. */N/* So-called Whitebox (Microsoft Windows-Only) systems are not listed. */N/* Various systems listed here are not supported by OpenVMS Alpha. */N/* */N#define ALPHA$K_NOT_A_VAX 1024 /* A pseudo-SMM sometimes seen */^#define ALPHA$K_MIN_ALPHA 1024 /* The smallest architecturally-permitted Alpha SMM */N#define ALPHA$K_MIN_SMM 1025 /* The smallest Alpha SMM */#define ALPHA$K_ID_BASE 1025N#define ALPHA$K_A7000_610 1025 /* DEC 7000 Model 610 */N#define ALPHA$K_A7000_620 1026 /* DEC 7000 Model 620 */N#define ALPHA$K_A7000_630 1027 /* DEC 7000 Model 630 */N#define ALPHA$K_A7000_640 1028 /* DEC 7000 Model 640 */N#define ALPHA$K_A10000_610 1029 /* DEC 10000 Model 610 */N#define ALPHA$K_A10000_620 1030 /* DEC 10000 Model 620 */N#define ALPHA$K_A10000_630 1031 /* DEC 10000 Model 630 */N#define ALPHA$K_A10000_640 1032 /* DEC 10000 Model 640 */N#define ALPHA$K_A3000_500W 1033 /* DEC 3000 Model 500 */N#define ALPHA$K_A3000_500S 1034 /* DEC 3000 Model 500S */N#define ALPHA$K_A3000_400W 1035 /* DEC 3000 Model 400 */N#define ALPHA$K_A3000_ 400S 1036 /* DEC 3000 Model 400S */N#define ALPHA$K_A4000_610 1037 /* DEC 4000 Model 610 */N#define ALPHA$K_A4000_620 1038 /* DEC 4000 Model 620 */#define ALPHA$K_A4000_810 1039#define ALPHA$K_A4000_820 1040#define ALPHA$K_AADU 1041N#define ALPHA$K_A3000_300 1042 /* DEC 3000 Model 300 */N#define ALPHA$K_A3000_300L 1043 /* DEC 3000 Model 300L */N#define ALPHA$K_A2000_300 1044  /* DEC 2000 Model 300 */N#define ALPHA$K_A2000_300S 1045 /* DEC 2000 Model 300S */N#define ALPHA$K_A7000_650 1046 /* DEC 7000 Model 650 */N#define ALPHA$K_A7000_660 1047 /* DEC 7000 Model 660 */N#define ALPHA$K_A10000_650 1048 /* DEC 10000 Model 650 */N#define ALPHA$K_A10000_660 1049 /* DEC 10000 Model 660 */#define ALPHA$K_A4000_630 1050#define ALPHA$K_A4000_640 1051 #define ALPHA$K_A4000_650 1052#define ALPHA$K_A4000_660 1053#define ALPHA$K_A2000_200 1054#define ALPHA$K_A2000_200S 1055N#define ALPHA$K_A3000_500X 1056 /* DEC 3000 Model 500X */N/* */Y/* The following Alpha System entries have been added to this file for REFERENCE ONLY. */T/* Please note that the Alpha system model name string and System Marketing Model */U/* value (SMM) are now passed by the SRM console to the Operating System through a */S/* structure called the HWRPB (hardware restart parameter block); by the Dynamic */V/* System Recognition (DSR) support that is present within all but the most ancient */S/* of Alpha systems and the correspondingly ancient versions of the SRM console. */N/* */X/* The following symbol-naming convention was derived from the Alpha System Reference */N/* Manual (SRM) Registry of Alpha Platforms, Systems, and Processors: */N/* */N/* ASa1a2b1b2c1c2d1d2e1e2 */N/* */N/* AS = Alpha System */X/* a1a2 = Family ID (2 digit hex value), Example: 0C (TurboLaser family) */o/* b1b2 = Processor Type (2 digit hex value), Example: 02 (EV4) , 05 (EV5), 06 (EV45), 07(EV56) */Q/* c1c2 = Member ID (2 digit hex value), Example: 04 (Rack Mount) */o/* d1d2 = SRM Variant (2 digit hex value) for each Family ID/Processor Type/Member ID. Used for */m/* differentiating between same platforms with different chip speed (MHz) and/or cache */j/* size and/or expansion capabilities and/or AlphaStation/AlphaServer variants. In */l/*  specific cases, there is the potential for the CPU count to spill into this field. */n/* e1e2 = Number of CPUs (2 digit hex value), Example: 0A (10 cpus), or maximum number of CPUs */N/* */N#define ALPHA$K_AS0202020001 1057 /* DEC 4000 Model 710 */N#define ALPHA$K_AS0202020002 1058 /* DEC 4000 Model 720 */N#define ALPHA$K_AS0902020001 1059 /* AlphaServer 2100 4/200 (1cpu) */N#define ALPHA$K_AS0902020002 1060 /* AlphaServer 2100 4/200 (2cpu) */N#define ALPHA$K_AS0902020003 1061 /* AlphaServer 2100 4/200 (3cpu) */N#define ALPHA$K_AS0902020004 1062 /* AlphaServer 2100 4/200 (4cpu) */N#define ALPHA$K_AS0402040001 1063 /* DEC 3000 Model 800 */N#define ALPHA$K_AS0402060001 1064 /* DEC 3000 Model 600 */N#define ALPHA$K_AS0602010001 1065 /* DEC 2000 Model 500 */N#define ALPHA$K_AS0B04000001 1067 /* DECAXPpci33 */N#define ALPHA$K_AS0702020001 1068 /* DEC 3000 Model 300X */N#define ALPHA$K_AS0702030001 1069 /* DEC 3000 Model 300LX */N#define ALPHA$K_AS0406070001 1070 /* DEC 3000 Model 700 */N#define ALPHA$K_AS0406080001 1071 /* DEC 3000 Model 900 */N#define ALPHA$K_AS0706040001 1072 /* DEC 3000 series */N#define ALPHA$K_AS0706050001 1073 /* DEC 3000 series */N#define ALPHA$K_AS0306030001 1074 /* DEC 7000 Model 710 */N#define ALPHA$K_AS0306030002 1075 /* DEC 7000 Model 720 */N#define ALPHA$K_AS0306030003 1076 /* DEC 7000 Model 730 */N#define ALPHA$K_AS0306030004 1077 /* DEC 7000 Model 740 */N#define ALPHA$K_AS0306030005 1078 /* DEC 7000 Model 750 */N#define ALPHA$K_AS0306030006 1079 /* DEC 7000 Model 760 */N#define ALPHA$K_AS0D02010001 1086 /* AlphaStation 400 4/166 */N#define ALPHA$K_AS0D02020001 1087 /* AlphaStation 200 4/166 */N#define ALPHA$K_AS0D02030001 1088 /* AlphaStation 200 4/133 */N#define ALPHA$K_AS0F05010001 1089 /* AlphaStation 600 5/300 */N#define ALPHA$K_AS1102010001 1090 /* AlphaServer 1000 4/200 */N#define ALPHA$K_AS1106020001 1091 /* AlphaServer 1000 4/233 */N#define ALPHA$K_AS0C05000001 1093 /* AlphaServer 8200 5/300 (1cpu) */N#define ALPHA$K_AS0C05000002 1094 /* AlphaServer 8200 5/300 (2cpu) */N#define ALPHA$K_AS0C05000003 1095 /* AlphaServer 8200 5/300 (3cpu) */N#define ALPHA$K_AS0C05000004 1096 /* AlphaServer 8200 5/300 (4cpu) */N#define ALPHA$K_AS0C05000005 1097 /* AlphaServer 8200 5/300 (5cpu) */N#define ALPHA$K_AS0C05000006 1098 /* AlphaServer 8200 5/300 (6cpu) */N#define ALPHA$K_AS0C05010001 1099 /* AlphaServer 8400 5/300 (1cpu) */N#define ALPHA$K_AS0C05010002 1100 /* AlphaServer 8400 5/300 (2cpu) */N#define ALPHA$K_AS0C05010003 1101 /* AlphaServer 8400 5/300 (3cpu) */N#define ALPHA$K_AS0C05010004 1102 /* AlphaServer 8400 5/300 (4cpu) */N#define ALPHA$K_AS0C05010005 1103 /* AlphaServer 8400 5/300 (5cpu) */N#define ALPHA$K_AS0C05010006 1104 /* AlphaServer 8400 5/300 (6cpu) */N#define ALPHA$K_AS0C05010007 1105 /* AlphaServer 8400 5/300 (7cpu) */N#define ALPHA$K_AS0C05010008 1106 /* AlphaServer 8400 5/300 (8cpu) */N#define ALPHA$K_AS0C05010009 1107 /* AlphaServer 8400 5/300 (9cpu) */N#define ALPHA$K_AS0C0501000A 1108 /* AlphaServer 8400 5/300 (10cpu) */N#define ALPHA$K_AS0C0501000B 1109 /* AlphaServer 8400 5/300 (11cpu) */N#define ALPHA$K_AS0C0501000C 1110 /* AlphaServer 8400 5/300 (12cpu) */N#define ALPHA$K_AS0906020001 1115 /* AlphaServer 2100 4/275 (1cpu) */N#define ALPHA$K_AS0906020002 1116 /* AlphaServer 2100 4/275 (2cpu) */N#define ALPHA$K_AS0906020003 1117 /* AlphaServer 2100 4/275 (3cpu) */N#define ALPHA$K_AS0906020004 1118 /* AlphaServer 2100 4/275 (4cpu) */N#define ALPHA$K_AS0905020001 1119 /* AlphaServer 2100 5/250 (1cpu) */N#define ALPHA$K_AS0905020002 1120 /* AlphaServer 2100 5/250 (2cpu) */N#define ALPHA$K_AS0905020003 1121 /* AlphaServer 2100 5/250 (3cpu) */N#define ALPHA$K_AS0905020004 1122 /* AlphaServer 2100 5/250 (4cpu) */N#define ALPHA$K_AS0902010001 1123 /* AlphaServer 2000 4/200 (1cpu) */N#define ALPHA$K_AS0902010002 1124 /* AlphaServer 2000 4/200 (2cpu) */N#define ALPHA$K_AS0902010003 1125 /* AlphaServer 2000 4/200 (3cpu) */N#define ALPHA$K_AS0902010004 1126 /* AlphaServer 2000 4/200 (4cpu) */N#define ALPHA$K_AS0906010001 1127 /* AlphaServer 2000 4/275 (1cpu) */N#define ALPHA$K_AS0906010002 1128 /* AlphaServer 2000 4/275 (2cpu) */N#define ALPHA$K_AS0906010003 1129 /* AlphaServer 2000 4/275 (3cpu) */N#define ALPHA$K_AS0906010004 1130 /* AlphaServer 2000 4/275 (4cpu) */N#define ALPHA$K_AS0905010001 1131 /* AlphaServer 2000 5/250 (1cpu) */N#define ALPHA$K_AS0905010002 1132 /* AlphaServer 2000 5/250 (2cpu) */N#define ALPHA$K_AS0905010003 1133 /* AlphaServer 2000 5/250 (3cpu) */N#define ALPHA$K_AS0905010004 1134 /* AlphaServer 2000 5/250 (4cpu) */R#define ALPHA$K_AS0902030001 1135 /* AlphaServer 2100 4/200 (1cpu) (rack) */R#define ALPHA$K_AS0902030002 1136 /* AlphaServer 2100 4/200 (2cpu) (rack) */R#define ALPHA$K_AS0902030003 1137 /* AlphaServer 2100 4/200 (3cpu) (rack) */R#define ALPHA$K_AS0902030004 1138 /* AlphaServer 2100 4/200 (4cpu) (rack) */R#define ALPHA$K_AS0906030001 1139 /* AlphaServer 2100 4/275 (1cpu) (rack) */R#define ALPHA$K_AS0906030002 1140 /* AlphaServer 2100 4/275 (2cpu) (rack) */R#define ALPHA$K_AS0906030003 1141 /* AlphaServer 2100 4/275 (3cpu) (rack) */R#define ALPHA$K_AS0906030004 1142 /* AlphaServer 2100 4/275 (4cpu) (rack) */R#define ALPHA$K_AS0905030001 1143 /* AlphaServer 2100 5/250 (1cpu) (rack) */R#define ALPHA$K_AS0905030002 1144 /* AlphaServer 2100 5/250 (2cpu) (rack) */R#define ALPHA$K_AS0905030003 1145 /* AlphaServer 2100 5/250 (3cpu) (rack) */R#define ALPHA$K_AS0905030004 1146 /* AlphaServer 2100 5/250 (4cpu) (rack) */N#define ALPHA$K_AS0D06040001 1151 /* AlphaStation 200 4/233 */N#define ALPHA$K_AS0D06050001 1152 /* AlphaStation 400 4/233 */N#define ALPHA$K_AS0D06060001 1153 /* AlphaStation 400 4/266 (2M) */N#define ALPHA$K_AS0D06070001 1154 /* AlphaStation 400 4/266 (512kb) */!#define ALPHA$K_AS0D06080001 1155N#define ALPHA$K_AS0D02090001 1156 /* AlphaStation 200 4/100 */N#define ALPHA$K_AS0D060A0001 1157 /* AlphaStation 200 4/300  */N#define ALPHA$K_AS0D060B0001 1158 /* AlphaStation 200 4/266, 512KB */!#define ALPHA$K_AS0D060C0001 1159N#define ALPHA$K_AS0D060D0001 1160 /* AlphaStation 400 4/300 */N#define ALPHA$K_AS0F05020001 1161 /* AlphaStation 600 5/266 */!#define ALPHA$K_AS1706010001 1167N#define ALPHA$K_AS0906010101 1171 /* AlphaServer 2000 4/233 (1cpu) */N#define ALPHA$K_AS0906010102 1172 /* AlphaServer 2000 4/233 (2cpu) */N#define ALPHA$K_AS0906010103 1173 /* AlphaServer 2000 4/233 (3cpu) */N#define ALPHA$K_AS0906010104 1174 /* AlphaServer 2000 4/233 (4cpu) */N#define ALPHA$K_AS0905010101 1175 /* AlphaServer 2000 5/300 (1cpu) */N#define ALPHA$K_AS0905010102 1176 /* AlphaServer 2000 5/300 (2cpu) */N#define ALPHA$K_AS0905010103 1177 /* AlphaServer 2000 5/300 (3cpu) */N#define ALPHA$K_AS0905010104 1178 /* AlphaServer 2000 5/300 (4cpu) */N#define ALPHA$K_AS0906020101 1179 /* AlphaServer 2100 4/233 (1cpu) */N#define ALPHA$K_AS0906020102 1180 /* AlphaServer 2100 4/233 (2cpu) */N#define ALPHA$K_AS0906020103 1181 /* AlphaServer 2100 4/233 (3cpu) */N#define ALPHA$K_AS0906020104 1182 /* AlphaServer 2100 4/233 (4cpu) */N#define ALPHA$K_AS0905020101 1183 /* AlphaServer 2100 5/300 (1cpu) */N#define ALPHA$K_AS0905020102 1184 /* AlphaServer 2100 5/300 (2cpu) */N#define ALPHA$K_AS0905020103 1185 /* AlphaServer 2100 5/300 (3cpu) */N#define ALPHA$K_AS0905020104 1186 /* AlphaServer 2100 5/300 (4cpu) */R#define ALPHA$K_AS0906030101 1187 /* AlphaServer 2100 4/233 (1cpu) (rack) */R#define ALPHA$K_AS0906030102 1188 /* AlphaServer 2100 4/233 (2cpu) (rack) */R#define ALPHA$K_AS0906030103 1189 /* AlphaServer 2100 4/233 (3cpu) (rack) */R#define ALPHA$K_AS0906030104 1190 /* AlphaServer 2100 4/233 (4cpu) (rack) */R#define ALPHA$K_AS0905030101 1191 /* AlphaServer 2100 5/300 (1cpu) (rack) */R#define ALPHA$K_AS0905030102 1192 /* AlphaServer 2100 5/300 (2cpu) (rack) */R#define ALPHA$K_AS0905030103 1193 /* AlphaServer 2100 5/300 (3cpu) (rack) */R#define ALPHA$K_AS0905030104 1194 /* AlphaServer 2100 5/300 (4cpu) (rack) */N#define ALPHA$K_AS1806010001 1195 /* AlphaServer 2000A 4/233 (1cpu) */N#define ALPHA$K_AS1806010002 1196 /* AlphaServer 2000A 4/233 (2cpu) */N#define ALPHA$K_AS1806010003 1197 /* AlphaServer 2000A 4/233 (3cpu) */N#define ALPHA$K_AS1806010004 1198 /* AlphaServer 2000A 4/233 (4cpu) */N#define ALPHA$K_AS1806010101 1199 /* AlphaServer 2000A 4/275 (1cpu) */N#define ALPHA$K_AS1806010102 1200 /* AlphaServer 2000A 4/275 (2cpu) */N#define ALPHA$K_AS1806010103 1201 /* AlphaServer 2000A 4/275 (3cpu) */N#define ALPHA$K_AS1806010104 1202 /* AlphaServer 2000A 4/275 (4cpu) */N#define ALPHA$K_AS1805010001 1203 /* AlphaServer 2000A 5/250 (1cpu) */N#define ALPHA$K_AS1805010002 1204 /* AlphaServer 2000A 5/250 (2cpu) */N#define ALPHA$K_AS1805010003 1205 /* AlphaServer 2000A 5/250 (3cpu) */N#define ALPHA$K_AS1805010004 1206 /* AlphaServer 2000A 5/250 (4cpu) */N#define ALPHA$K_AS1805010101 1207 /* AlphaServer 2000A 5/300 (1cpu) */N#define ALPHA$K_AS1805010102 1208 /* AlphaServer 2000A 5/300 (2cpu) */N#define ALPHA$K_AS1805010103 1209 /* AlphaServer 2000A 5/300 (3cpu) */N#define ALPHA$K_AS1805010104 1210 /* AlphaServer 2000A 5/300 (4cpu) */N#define ALPHA$K_AS1806020001 1211 /* AlphaServer 2100A 4/233 (1cpu) */N#define ALPHA$K_AS1806020002 1212 /* AlphaServer 2100A 4/233 (2cpu) */N#define ALPHA$K_AS1806020003 1213 /* AlphaServer 2100A 4/233 (3cpu) */N#define ALPHA$K_AS1806020004 1214 /* AlphaServer 2100A 4/233 (4cpu) */N#define ALPHA$K_AS1806020101 1215 /* AlphaServer 2100A 4/275 (1cpu) */N#define ALPHA$K_AS1806020102 1216 /* AlphaServer 2100A 4/275 (2cpu) */N#define ALPHA$K_AS1806020103 1217 /* AlphaServer 2100A 4/275 (3cpu) */N#define ALPHA$K_AS1806020104 1218 /* AlphaServer 2100A 4/275 (4cpu) */N#define ALPHA$K_AS1805020001 1219 /* AlphaServer 2100A 5/250 (1cpu) */N#define ALPHA$K_AS1805020002 1220 /* AlphaServer 2100A 5/250 (2cpu) */N#define ALPHA$K_AS1805020003 1221 /* AlphaServer 2100A 5/250 (3cpu) */N#define ALPHA$K_AS1805020004 1222 /* AlphaServer 2100A 5/250 (4cpu) */N#define ALPHA$K_AS1805020101 1223 /* AlphaServer 2100A 5/300 (1cpu) */N#define ALPHA$K_AS1805020102 1224 /* AlphaServer 2100A 5/300 (2cpu) */N#define ALPHA$K_AS1805020103 1225 /* AlphaServer 2100A 5/300 (3cpu) */N#define ALPHA$K_AS1805020104 1226 /* AlphaServer 2100A 5/300 (4cpu) */S#define ALPHA$K_AS1806030001 1227 /* AlphaServer 2100A 4/233 (1cpu) (rack) */S#define ALPHA$K_AS1806030002 1228 /* AlphaServer 2100A 4/233 (2cpu) (rack) */S#define ALPHA$K_AS1806030003 1229 /* AlphaServer 2100A 4/233 (3cpu) (rack) */S#define ALPHA$K_AS1806030004 1230 /* AlphaServer 2100A 4/233 (4cpu) (rack) */S#define ALPHA$K_AS1806030101 1231 /* AlphaServer 2100A 4/275 (1cpu) (rack) */S#define ALPHA$K_AS1806030102 1232 /* AlphaServer 2100A 4/275 (2cpu) (rack) */S#define ALPHA$K_AS1806030103 1233 /* AlphaServer 2100A 4/275 (3cpu) (rack) */S#define ALPHA$K_AS1806030104 1234 /* AlphaServer 2100A 4/275 (4cpu) (rack) */S#define ALPHA$K_AS1805030001 1235 /* AlphaServer 2100A 5/250 (1cpu) (rack) */S#define ALPHA$K_AS1805030002 1236 /* AlphaServer 2100A 5/250 (2cpu) (rack) */S#define ALPHA$K_AS1805030003 1237 /* AlphaServer 2100A 5/250 (3cpu) (rack) */S#define ALPHA$K_AS1805030004 1238 /* AlphaServer 2100A 5/250 (4cpu) (rack) */S#define ALPHA$K_AS1805030101 1239 /* AlphaServer 2100A 5/300 (1cpu) (rack) */S#define ALPHA$K_AS1805030102 1240 /* AlphaServer 2100A 5/300 (2cpu) (rack) */S#define ALPHA$K_AS1805030103 1241  /* AlphaServer 2100A 5/300 (3cpu) (rack) */S#define ALPHA$K_AS1805030104 1242 /* AlphaServer 2100A 5/300 (4cpu) (rack) */N#define ALPHA$K_AS1A05010001 1245 /* EB164 266 */N#define ALPHA$K_AS1A05020001 1246 /* EB164 300 */N#define ALPHA$K_AS0D06200001 1250 /* AlphaStation 205 4/133 */N#define ALPHA$K_AS0D06210001 1251 /* AlphaStation 205 4/166 */N#define ALPHA$K_AS0D06220001 1252 /* AlphaStation 205 4/200 */N#define ALPHA$K_AS0D06230001 1253 /* AlphaStation 205 4/233 */N#define ALPHA$K_AS0D06240001 1254 /* AlphaStation 205 4/266 */N#define ALPHA$K_AS0D06250001 1255 /* AlphaStation 205 4/300 */N#define ALPHA$K_AS0D06260001 1256 /* AlphaStation 205 4/333 */N#define ALPHA$K_AS0D06270001 1257 /* AlphaStation 255 4/133 */N#define ALPHA$K_AS0D06280001 1258 /* AlphaStation 255 4/166 */N#define ALPHA$K_AS0D06290001 1259 /* AlphaStation 255 4/200 */N#define ALPHA$K_AS0D062A0001 1260 /* AlphaStation 255 4/233 */N#define ALPHA$K_AS0D062B0001 1261 /* AlphaStation 255 4/266 */N#define ALPHA$K_AS0D062C0001 1262 /* AlphaStation 255 4/300 */N#define ALPHA$K_AS0D062D0001 1263 /* AlphaStation 255 4/333 */N#define ALPHA$K_AS1106030001 1264 /* AlphaServer 1000 4/266 */N#define ALPHA$K_AS1B06010001 1265 /* AlphaServer 1000A 4/266 */N#define ALPHA$K_AS0F05030001 1266 /* AlphaStation 500 5/266 */N#define ALPHA$K_AS0F05040001 1267 /* AlphaStation 500 5/300 */N#define ALPHA$K_AS0F05050001 1268 /* AlphaStation 500 5/333 */N#define ALPHA$K_AS1105040001 1269 /* AlphaServer 1000 5/300 */N#define ALPHA$K_AS1B05020001 1270 /* AlphaServer 1000A 5/300 */N#define ALPHA$K_AS0F05060001 1275 /* AlphaStation 600 5/333 */N#define ALPHA$K_AS0F05070001 1276 /* AlphaStation 600 5/366 */N#define ALPHA$K_AS0F05080001 1277 /* AlphaStation 600 5/400 */N#define ALPHA$K_AS0F05090001 1278 /* AlphaStation 600 5/433 */N#define ALPHA$K_AS0F050A0001 1279 /* AlphaStation 600 5/466 */N#define ALPHA$K_AS0F050B0001 1280 /* AlphaStation 600 5/500 */N#define ALPHA$K_AS0F070C0001 1281 /* AlphaStation 500/333  */N#define ALPHA$K_AS0F070D0001 1282 /* AlphaStation 500/366 */N#define ALPHA$K_AS0F070E0001 1283 /* AlphaStation 500/400 */N#define ALPHA$K_AS0F070F0001 1284 /* AlphaStation 500/433 */N#define ALPHA$K_AS0F07100001 1285 /* AlphaStation 500/466 */N#define ALPHA$K_AS0F07110001 1286 /* AlphaStation 500/500 */N#define ALPHA$K_AS0C05020001 1292 /* AlphaServer 8200 5/350 (1cpu) */N#define ALPHA$K_AS0C05020002 1293 /* AlphaServer 8200 5/350 (2cpu) */N#define ALPHA$K_AS0C05020003 1294 /* AlphaServer 8200 5/350 (3cpu) */N#define ALPHA$K_AS0C05020004 1295 /* AlphaServer 8200 5/350 (4cpu) */N#define ALPHA$K_AS0C05020005 1296 /* AlphaServer 8200 5/350 (5cpu) */N#define ALPHA$K_AS0C05020006 1297 /* AlphaServer 8200 5/350 (6cpu) */N#define ALPHA$K_AS0C05030001 1298 /* AlphaServer 8400 5/350 (1cpu) */N#define ALPHA$K_AS0C05030002 1299 /* AlphaServer 8400 5/350 (2cpu) */N#define ALPHA$K_AS0C05030003 1300 /* AlphaServer 8400 5/350 (3cpu) */N#define ALPHA$K_AS0C05030004 1301 /* AlphaServer 8400 5/350 (4cpu) */N#define ALPHA$K_AS0C05030005 1302 /* AlphaServer 8400 5/350 (5cpu) */N#define ALPHA$K_AS0C05030006 1303 /* AlphaServer 8400 5/350 (6cpu) */N#define ALPHA$K_AS0C05030007 1304 /* AlphaServer 8400 5/350 (7cpu) */N#define ALPHA$K_AS0C05030008 1305 /* AlphaServer 8400 5/350 (8cpu) */N#define ALPHA$K_AS0C05030009 1306 /* AlphaServer 8400 5/350 (9cpu) */N#define ALPHA$K_AS0C0503000A 1307 /* AlphaServer 8400 5/350 (10cpu) */N#define ALPHA$K_AS0C0503000B 1308 /* AlphaServer 8400 5/350 (11cpu) */N#define ALPHA$K_AS0C0503000C 1309 /* AlphaServer 8400 5/350 (12cpu) */N#define ALPHA$K_AS1B07040001 1310 /* AlphaServer 600 5/333 */N#define ALPHA$K_AS1B07030001 1311 /* AlphaServer 1000A 5/400 */N#define ALPHA$K_AS1107050001 1312 /* AlphaServer 1000 5/400 */O#define ALPHA$K_AS1605020001 1313 /* AlphaServer 4100 5/266 0MB (1cpu) */O#define ALPHA$K_AS1605020002 1314 /* AlphaServer 4100 5/266 0MB (2cpu) */O#define ALPHA$K_AS1605020003 1315 /* AlphaServer 4100 5/266 0MB (3cpu) */O#define ALPHA$K_AS1605020004 1316 /* AlphaServer 4100 5/266 0MB (4cpu) */O#define ALPHA$K_AS1605010001 1317 /* AlphaServer 4100 5/266 0MB (1cpu) */O#define ALPHA$K_AS1605010002 1318  /* AlphaServer 4100 5/266 0MB (2cpu) */O#define ALPHA$K_AS1605010003 1319 /* AlphaServer 4100 5/266 0MB (3cpu) */O#define ALPHA$K_AS1605010004 1320 /* AlphaServer 4100 5/266 0MB (4cpu) */O#define ALPHA$K_AS1605020101 1321 /* AlphaServer 4100 5/300 0MB (1cpu) */O#define ALPHA$K_AS1605020102 1322 /* AlphaServer 4100 5/300 0MB (2cpu) */O#define ALPHA$K_AS1605020103 1323 /* AlphaServer 4100 5/300 0MB (3cpu) */O#define ALPHA$K_AS1605020104 1324 /* AlphaServer 4100 5/300 0MB (4cpu) */O#define ALPHA$K_AS1605010101 1325 /* AlphaServer 4100 5/300 0MB (1cpu) */O#define ALPHA$K_AS1605010102 1326 /* AlphaServer 4100 5/300 0MB (2cpu) */O#define ALPHA$K_AS1605010103 1327 /* AlphaServer 4100 5/300 0MB (3cpu) */O#define ALPHA$K_AS1605010104 1328 /* AlphaServer 4100 5/300 0MB (4cpu) */O#define ALPHA$K_AS1607020001 1329 /* AlphaServer 4100 5/400 0MB (1cpu) */O#define ALPHA$K_AS1607020002 1330 /* AlphaServer 4100 5/400 0MB (2cpu) */O#define ALPHA$K_AS1607020003 1331 /* AlphaServer 4100 5/400 0MB (3cpu) */O#define ALPHA$K_AS1607020004 1332 /* AlphaServer 4100 5/400 0MB (4cpu) */O#define ALPHA$K_AS1607010001 1333 /* AlphaServer 4100 5/400 0MB (1cpu) */O#define ALPHA$K_AS1607010002 1334 /* AlphaServer 4100 5/400 0MB (2cpu) */O#define ALPHA$K_AS1607010003 1335 /* AlphaServer 4100 5/400 0MB (3cpu) */O#define ALPHA$K_AS1607010004 1336 /* AlphaServer 4100 5/400 0MB (4cpu) */O#define ALPHA$K_AS1605020201 1337 /* AlphaServer 4100 5/266 1MB (1cpu) */O#define ALPHA$K_AS1605020202 1338 /* AlphaServer 4100 5/266 1MB (2cpu) */O#define ALPHA$K_AS1605020203 1339 /* AlphaServer 4100 5/266 1MB (3cpu) */O#define ALPHA$K_AS1605020204 1340 /* AlphaServer 4100 5/266 1MB (4cpu) */O#define ALPHA$K_AS1605010201 1341 /* AlphaServer 4100 5/266 1MB (1cpu) */O#define ALPHA$K_AS1605010202 1342 /* AlphaServer 4100 5/266 1MB (2cpu) */O#define ALPHA$K_AS1605010203 1343 /* AlphaServer 4100 5/266 1MB (3cpu) */O#define ALPHA$K_AS1605010204 1344 /* AlphaServer 4100 5/266 1MB (4cpu) */O#define ALPHA$K_AS1605020301 1345 /* AlphaServer 4100 5/300 1MB (1cpu) */O#define ALPHA$K_AS1605020302 1346 /* AlphaServer 4100 5/300 1MB (2cpu) */O#define ALPHA$K_AS1605020303 1347 /* AlphaServer 4100 5/300 1MB (3cpu) */O#define ALPHA$K_AS1605020304 1348 /* AlphaServer 4100 5/300 1MB (4cpu) */O#define ALPHA$K_AS1605010301 1349 /* AlphaServer 4100 5/300 1MB (1cpu) */O#define ALPHA$K_AS1605010302 1350 /* AlphaServer 4100 5/300 1MB (2cpu) */O#define ALPHA$K_AS1605010303 1351 /* AlphaServer 4100 5/300 1MB (3cpu) */O#define ALPHA$K_AS1605010304 1352 /* AlphaServer 4100 5/300 1MB (4cpu) */O#define ALPHA$K_AS1607020101 1353 /* AlphaServer 4100 5/400 1MB (1cpu) */O#define ALPHA$K_AS1607020102 1354 /* AlphaServer 4100 5/400 1MB (2cpu) */O#define ALPHA$K_AS1607020103 1355  /* AlphaServer 4100 5/400 1MB (3cpu) */O#define ALPHA$K_AS1607020104 1356 /* AlphaServer 4100 5/400 1MB (4cpu) */O#define ALPHA$K_AS1607010101 1357 /* AlphaServer 4100 5/400 1MB (1cpu) */O#define ALPHA$K_AS1607010102 1358 /* AlphaServer 4100 5/400 1MB (2cpu) */O#define ALPHA$K_AS1607010103 1359 /* AlphaServer 4100 5/400 1MB (3cpu) */O#define ALPHA$K_AS1607010104 1360 /* AlphaServer 4100 5/400 1MB (4cpu) */O#define ALPHA$K_AS1605020401 1361 /* AlphaServer 4100 5/266 2MB (1cpu) */O#define ALPHA$K_AS1605020402 1362 /* AlphaServer 4100 5/266 2MB (2cpu) */O#define ALPHA$K_AS1605020403 1363 /* AlphaServer 4100 5/266 2MB (3cpu) */O#define ALPHA$K_AS1605020404 1364 /* AlphaServer 4100 5/266 2MB (4cpu) */O#define ALPHA$K_AS1605010401 1365 /* AlphaServer 4100 5/266 2MB (1cpu) */O#define ALPHA$K_AS1605010402 1366 /* AlphaServer 4100 5/266 2MB (2cpu) */O#define ALPHA$K_AS1605010403 1367 /* AlphaServer 4100 5/266 2MB (3cpu) */O#define ALPHA$K_AS1605010404 1368 /* AlphaServer 4100 5/266 2MB (4cpu) */O#define ALPHA$K_AS1605020501 1369 /* AlphaServer 4100 5/300 2MB (1cpu) */O#define ALPHA$K_AS1605020502 1370 /* AlphaServer 4100 5/300 2MB (2cpu) */O#define ALPHA$K_AS1605020503 1371 /* AlphaServer 4100 5/300 2MB (3cpu) */O#define ALPHA$K_AS1605020504 1372 /* AlphaServer 4100 5/300 2MB (4cpu) */O#define ALPHA$K_AS1605010501 1373 /* AlphaServer 4100 5/300 2MB (1cpu) */O#define ALPHA$K_AS1605010502 1374 /* AlphaServer 4100 5/300 2MB (2cpu) */O#define ALPHA$K_AS1605010503 1375 /* AlphaServer 4100 5/300 2MB (3cpu) */O#define ALPHA$K_AS1605010504 1376 /* AlphaServer 4100 5/300 2MB (4cpu) */O#define ALPHA$K_AS1607020201 1377 /* AlphaServer 4100 5/400 2MB (1cpu) */O#define ALPHA$K_AS1607020202 1378 /* AlphaServer 4100 5/400 2MB (2cpu) */O#define ALPHA$K_AS1607020203 1379 /* AlphaServer 4100 5/400 2MB (3cpu) */O#define ALPHA$K_AS1607020204 1380 /* AlphaServer 4100 5/400 2MB (4cpu) */O#define ALPHA$K_AS1607010201 1381 /* AlphaServer 4100 5/400 2MB (1cpu) */O#define ALPHA$K_AS1607010202 1382 /* AlphaServer 4100 5/400 2MB (2cpu) */O#define ALPHA$K_AS1607010203 1383 /* AlphaServer 4100 5/400 2MB (3cpu) */O#define ALPHA$K_AS1607010204 1384 /* AlphaServer 4100 5/400 2MB (4cpu) */O#define ALPHA$K_AS1605020601 1385 /* AlphaServer 4100 5/266 4MB (1cpu) */O#define ALPHA$K_AS1605020602 1386 /* AlphaServer 4100 5/266 4MB (2cpu) */O#define ALPHA$K_AS1605020603 1387 /* AlphaServer 4100 5/266 4MB (3cpu) */O#define ALPHA$K_AS1605020604 1388 /* AlphaServer 4100 5/266 4MB (4cpu) */O#define ALPHA$K_AS1605010601 1389 /* AlphaServer 4100 5/266 4MB (1cpu) */O#define ALPHA$K_AS1605010602 1390 /* AlphaServer 4100 5/266 4MB (2cpu) */O#define ALPHA$K_AS1605010603 1391 /* AlphaServer 4100 5/266 4MB (3cpu) */O#define ALPHA$K_AS1605010604 1392  /* AlphaServer 4100 5/266 4MB (4cpu) */O#define ALPHA$K_AS1605020701 1393 /* AlphaServer 4100 5/300 4MB (1cpu) */O#define ALPHA$K_AS1605020702 1394 /* AlphaServer 4100 5/300 4MB (2cpu) */O#define ALPHA$K_AS1605020703 1395 /* AlphaServer 4100 5/300 4MB (3cpu) */O#define ALPHA$K_AS1605020704 1396 /* AlphaServer 4100 5/300 4MB (4cpu) */O#define ALPHA$K_AS1605010701 1397 /* AlphaServer 4100 5/300 4MB (1cpu) */O#define ALPHA$K_AS1605010702 1398 /* AlphaServer 4100 5/300 4MB (2cpu) */O#define ALPHA$K_AS1605010703 1399 /* AlphaServer 4100 5/300 4MB (3cpu) */O#define ALPHA$K_AS1605010704 1400 /* AlphaServer 4100 5/300 4MB (4cpu) */O#define ALPHA$K_AS1607020301 1401 /* AlphaServer 4100 5/400 4MB (1cpu) */O#define ALPHA$K_AS1607020302 1402 /* AlphaServer 4100 5/400 4MB (2cpu) */O#define ALPHA$K_AS1607020303 1403 /* AlphaServer 4100 5/400 4MB (3cpu) */O#define ALPHA$K_AS1607020304 1404 /* AlphaServer 4100 5/400 4MB (4cpu) */O#define ALPHA$K_AS1607010301 1405 /* AlphaServer 4100 5/400 4MB (1cpu) */O#define ALPHA$K_AS1607010302 1406 /* AlphaServer 4100 5/400 4MB (2cpu) */O#define ALPHA$K_AS1607010303 1407 /* AlphaServer 4100 5/400 4MB (3cpu) */O#define ALPHA$K_AS1607010304 1408 /* AlphaServer 4100 5/400 4MB (4cpu) */O#define ALPHA$K_AS1605040001 1409 /* AlphaServer 4000 5/266 0MB (1cpu) */O#define ALPHA$K_AS1605040002 1410 /* AlphaServer 4000 5/266 0MB (2cpu) */O#define ALPHA$K_AS1605030001 1411 /* AlphaServer 4000 5/266 0MB (1cpu) */O#define ALPHA$K_AS1605030002 1412 /* AlphaServer 4000 5/266 0MB (2cpu) */O#define ALPHA$K_AS1605040101 1413 /* AlphaServer 4000 5/300 0MB (1cpu) */O#define ALPHA$K_AS1605040102 1414 /* AlphaServer 4000 5/300 0MB (2cpu) */O#define ALPHA$K_AS1605030101 1415 /* AlphaServer 4000 5/300 0MB (1cpu) */O#define ALPHA$K_AS1605030102 1416 /* AlphaServer 4000 5/300 0MB (2cpu) */O#define ALPHA$K_AS1607040001 1417 /* AlphaServer 4000 5/400 0MB (1cpu) */O#define ALPHA$K_AS1607040002 1418 /* AlphaServer 4000 5/400 0MB (2cpu) */O#define ALPHA$K_AS1607030001 1419 /* AlphaServer 4000 5/400 0MB (1cpu) */O#define ALPHA$K_AS1607030002 1420 /* AlphaServer 4000 5/400 0MB (2cpu) */O#define ALPHA$K_AS1605040201 1421 /* AlphaServer 4000 5/266 1MB (1cpu) */O#define ALPHA$K_AS1605040202 1422 /* AlphaServer 4000 5/266 1MB (2cpu) */O#define ALPHA$K_AS1605030201 1423 /* AlphaServer 4000 5/266 1MB (1cpu) */O#define ALPHA$K_AS1605030202 1424 /* AlphaServer 4000 5/266 1MB (2cpu) */O#define ALPHA$K_AS1605040301 1425 /* AlphaServer 4000 5/300 1MB (1cpu) */O#define ALPHA$K_AS1605040302 1426 /* AlphaServer 4000 5/300 1MB (2cpu) */O#define ALPHA$K_AS1605030301 1427 /* AlphaServer 4000 5/300 1MB (1cpu) */O#define ALPHA$K_AS1605030302 1428 /* AlphaServer 4000 5/300 1MB (2cpu) */O#define ALPHA$K_AS1607040101 1429 /* AlphaServer 4000 5/400 1MB (1cpu) */O#define ALPHA$K_AS1607040102 1430 /* AlphaServer 4000 5/400 1MB (2cpu) */O#define ALPHA$K_AS1607030101 1431 /* AlphaServer 4000 5/400 1MB (1cpu) */O#define ALPHA$K_AS1607030102 1432 /* AlphaServer 4000 5/400 1MB (2cpu) */O#define ALPHA$K_AS1605040401 1433 /* AlphaServer 4000 5/266 2MB (1cpu) */O#define ALPHA$K_AS1605040402 1434 /* AlphaServer 4000 5/266 2MB (2cpu) */O#define ALPHA$K_AS1605030401 1435 /* AlphaServer 4000 5/266 2MB (1cpu) */O#define ALPHA$K_AS1605030402 1436 /* AlphaServer 4000 5/266 2MB (2cpu) */O#define ALPHA$K_AS1605040501 1437 /* AlphaServer 4000 5/300 2MB (1cpu) */O#define ALPHA$K_AS1605040502 1438 /* AlphaServer 4000 5/300 2MB (2cpu) */O#define ALPHA$K_AS1605030501 1439 /* AlphaServer 4000 5/300 2MB (1cpu) */O#define ALPHA$K_AS1605030502 1440 /* AlphaServer 4000 5/300 2MB (2cpu) */O#define ALPHA$K_AS1607040201 1441 /* AlphaServer 4000 5/400 2MB (1cpu) */O#define ALPHA$K_AS1607040202 1442 /* AlphaServer 4000 5/400 2MB (2cpu) */O#define ALPHA$K_AS1607030201 1443 /* AlphaServer 4000 5/400 2MB (1cpu) */O#define ALPHA$K_AS1607030202 1444 /* AlphaServer 4000 5/400 2MB (2cpu) */O#define ALPHA$K_AS1605040601 1445 /* AlphaServer 4000 5/266 4MB (1cpu) */O#define ALPHA$K_AS1605040602 1446 /* AlphaServer 4000 5/266 4MB (2cpu) */O#define ALPHA$K_AS1605030601 1447 /* AlphaServer 4000 5/266 4MB (1cpu) */O#define ALPHA$K_AS1605030602 1448 /* AlphaServer 4000 5/266 4MB (2cpu) */O#define ALPHA$K_AS1605040701 1449 /* AlphaServer 4000 5/300 4MB (1cpu) */O#define ALPHA$K_AS1605040702 1450 /* AlphaServer 4000 5/300 4MB (2cpu) */O#define ALPHA$K_AS1605030701 1451 /* AlphaServer 4000 5/300 4MB (1cpu) */O#define ALPHA$K_AS1605030702 1452 /* AlphaServer 4000 5/300 4MB (2cpu) */O#define ALPHA$K_AS1607040301 1453 /* AlphaServer 4000 5/400 4MB (1cpu) */O#define ALPHA$K_AS1607040302 1454 /* AlphaServer 4000 5/400 4MB (2cpu) */O#define ALPHA$K_AS1607030301 1455 /* AlphaServer 4000 5/400 4MB (1cpu) */O#define ALPHA$K_AS1607030302 1456 /* AlphaServer 4000 5/400 4MB (2cpu) */P#define ALPHA$K_AS1605060001 1457 /* AlphaServer 4000A 5/266 0MB (1cpu) */P#define ALPHA$K_AS1605060002 1458 /* AlphaServer 4000A 5/266 0MB (2cpu) */P#define ALPHA$K_AS1605050001 1459 /* AlphaServer 4000A 5/266 0MB (1cpu) */P#define ALPHA$K_AS1605050002 1460 /* AlphaServer 4000A 5/266 0MB (2cpu) */P#define ALPHA$K_AS1605060101 1461 /* AlphaServer 4000A 5/300 0MB (1cpu) */P#define ALPHA$K_AS1605060102 1462 /* AlphaServer 4000A 5/300 0MB (2cpu) */P#define ALPHA$K_AS1605050101 1463 /* AlphaServer 4000A 5/300 0MB (1cpu) */P#define ALPHA$K_AS1605050102 1464 /* AlphaServer 4000A 5/300 0MB (2cpu) */P#define ALPHA$K_AS1607060001 1465 /* AlphaServer 4000A 5/400 0MB (1cpu) */P#define ALPHA$K_AS1607060002 1466 /* AlphaServer 4000A 5/400 0MB (2cpu) */P#define ALPHA$K_AS1607050001 1467 /* AlphaServer 4000A 5/400 0MB (1cpu) */P#define ALPHA$K_AS1607050002 1468 /* AlphaServer 4000A 5/400 0MB (2cpu) */P#define ALPHA$K_AS1605060201 1469 /* AlphaServer 4000A 5/266 1MB (1cpu) */P#define ALPHA$K_AS1605060202 1470 /* AlphaServer 4000A 5/266 1MB (2cpu) */P#define ALPHA$K_AS1605050201 1471 /* AlphaServer 4000A 5/266 1MB (1cpu) */P#define ALPHA$K_AS1605050202 1472 /* AlphaServer 4000A 5/266 1MB (2cpu) */P#define ALPHA$K_AS1605060301 1473 /* AlphaServer 4000A 5/300 1MB (1cpu) */P#define ALPHA$K_AS1605060302 1474 /* AlphaServer 4000A 5/300 1MB (2cpu) */P#define ALPHA$K_AS1605050301 1475 /* AlphaServer 4000A 5/300 1MB (1cpu) */P#define ALPHA$K_AS1605050302 1476 /* AlphaServer 4000A 5/300 1MB (2cpu) */P#define ALPHA$K_AS1607060101 1477 /* AlphaServer 4000A 5/400 1MB (1cpu) */P#define ALPHA$K_AS1607060102 1478 /* AlphaServer 4000A 5/400 1MB (2cpu) */P#define ALPHA$K_AS1607050101 1479 /* AlphaServer 4000A 5/400 1MB (1cpu) */P#define ALPHA$K_AS1607050102 1480 /* AlphaServer 4000A 5/400 1MB (2cpu) */P#define ALPHA$K_AS1605060401 1481 /* AlphaServer 4000A 5/266 2MB (1cpu) */P#define ALPHA$K_AS1605060402 1482 /* AlphaServer 4000A 5/266 2MB (2cpu) */P#define ALPHA$K_AS1605050401 1483 /* AlphaServer 4000A 5/266 2MB (1cpu) */P#define ALPHA$K_AS1605050402 1484 /* AlphaServer 4000A 5/266 2MB (2cpu) */P#define ALPHA$K_AS1605060501 1485 /* AlphaServer 4000A 5/300 2MB (1cpu) */P#define ALPHA$K_AS1605060502 1486 /* AlphaServer 4000A 5/300 2MB (2cpu) */P#define ALPHA$K_AS1605050501 1487 /* AlphaServer 4000A 5/300 2MB (1cpu) */P#define ALPHA$K_AS1605050502 1488 /* AlphaServer 4000A 5/300 2MB (2cpu) */P#define ALPHA$K_AS1607060201 1489 /* AlphaServer 4000A 5/400 2MB (1cpu) */P#define ALPHA$K_AS1607060202 1490 /* AlphaServer 4000A 5/400 2MB (2cpu) */P#define ALPHA$K_AS1607050201 1491 /* AlphaServer 4000A 5/400 2MB (1cpu) */P#define ALPHA$K_AS1607050202 1492 /* AlphaServer 4000A 5/400 2MB (2cpu) */P#define ALPHA$K_AS1605060601 1493 /* AlphaServer 4000A 5/266 4MB (1cpu) */P#define ALPHA$K_AS1605060602 1494 /* AlphaServer 4000A 5/266 4MB (2cpu) */P#define ALPHA$K_AS1605050601 1495 /* AlphaServer 4000A 5/266 4MB (1cpu) */P#define ALPHA$K_AS1605050602 1496 /* AlphaServer 4000A 5/266 4MB (2cpu) */P#define ALPHA$K_AS1605060701 1497 /* AlphaServer 4000A 5/300 4MB (1cpu) */P#define ALPHA$K_AS1605060702 1498 /* AlphaServer 4000A 5/300 4MB (2cpu) */P#define ALPHA$K_AS1605050701 1499 /* AlphaServer 4000A 5/300 4MB (1cpu) */P#define ALPHA$K_AS1605050702 1500 /* AlphaServer 4000A 5/300 4MB (2cpu) */P#define ALPHA$K_AS1607060301 1501 /* AlphaServer 4000A 5/400 4MB (1cpu) */P#define ALPHA$K_AS1607060302 1502 /* AlphaServer 4000A 5/400 4MB (2cpu) */P#define ALPHA$K_AS1607050301 1503 /* AlphaServer 4000A 5/400 4MB (1cpu) */P#define ALPHA$K_AS1607050302 1504 /* AlphaServer 4000A 5/400 4MB (2cpu) */N#define ALPHA$K_AS0907010001 1505 /* AlphaServer 2000 5/375 (1cpu) */N#define ALPHA$K_AS0907010002 1506 /* AlphaServer 2000 5/375 (2cpu) */N#define ALPHA$K_AS0907010003 1507 /* AlphaServer 2000 5/375 (3cpu) */N#define ALPHA$K_AS0907010004 1508 /* AlphaServer 2000 5/375 (4cpu) */N#define ALPHA$K_AS0907020001 1509 /* AlphaServer 2100 5/375 (1cpu) */N#define ALPHA$K_AS0907020002 1510 /* AlphaServer 2100 5/375 (2cpu) */N#define ALPHA$K_AS0907020003 1511 /* AlphaServer 2100 5/375 (3cpu) */N#define ALPHA$K_AS0907020004 1512 /* AlphaServer 2100 5/375 (4cpu) */R#define ALPHA$K_AS0907030001 1513 /* AlphaServer 2100 5/375 (1cpu) (rack) */R#define ALPHA$K_AS0907030002 1514 /* AlphaServer 2100 5/375 (2cpu) (rack) */R#define ALPHA$K_AS0907030003 1515 /* AlphaServer 2100 5/375 (3cpu) (rack) */R#define ALPHA$K_AS0907030004 1516 /* AlphaServer 2100 5/375 (4cpu) (rack) */N#define ALPHA$K_AS0907010101 1517 /* AlphaServer 2000 5/400 (1cpu) */N#define ALPHA$K_AS0907010102 1518 /* AlphaServer 2000 5/400 (2cpu) */N#define ALPHA$K_AS0907010103 1519 /* AlphaServer 2000 5/400 (3cpu) */N#define ALPHA$K_AS0907010104 1520 /* AlphaServer 2000 5/400 (4cpu) */N#define ALPHA$K_AS0907020101 1521 /* AlphaServer 2100 5/400 (1cpu) */N#define ALPHA$K_AS0907020102 1522 /* AlphaServer 2100 5/400 (2cpu) */N#define ALPHA$K_AS0907020103 1523 /* AlphaServer 2100 5/400 (3cpu) */N#define ALPHA$K_AS0907020104 1524 /* AlphaServer 2100 5/400 (4cpu) */R#define ALPHA$K_AS0907030101 1525 /* AlphaServer 2100 5/400 (1cpu) (rack) */R#define ALPHA$K_AS0907030102 1526 /* AlphaServer 2100 5/400 (2cpu) (rack) */R#define ALPHA$K_AS0907030103 1527 /* AlphaServer 2100 5/400 (3cpu) (rack) */R#define ALPHA$K_AS0907030104 1528  /* AlphaServer 2100 5/400 (4cpu) (rack) */N#define ALPHA$K_AS1807010001 1529 /* AlphaServer 2000A 5/375 (1cpu) */N#define ALPHA$K_AS1807010002 1530 /* AlphaServer 2000A 5/375 (2cpu) */N#define ALPHA$K_AS1807010003 1531 /* AlphaServer 2000A 5/375 (3cpu) */N#define ALPHA$K_AS1807010004 1532 /* AlphaServer 2000A 5/375 (4cpu) */N#define ALPHA$K_AS1807020001 1533 /* AlphaServer 2100A 5/375 (1cpu) */N#define ALPHA$K_AS1807020002 1534 /* AlphaServer 2100A 5/375 (2cpu) */N#define ALPHA$K_AS1807020003 1535 /* AlphaServer 2100A 5/375 (3cpu) */N#define ALPHA$K_AS1807020004 1536 /* AlphaServer 2100A 5/375 (4cpu) */S#define ALPHA$K_AS1807030001 1537 /* AlphaServer 2100A 5/375 (1cpu) (rack) */S#define ALPHA$K_AS1807030002 1538 /* AlphaServer 2100A 5/375 (2cpu) (rack) */S#define ALPHA$K_AS1807030003 1539 /* AlphaServer 2100A 5/375 (3cpu) (rack) */S#define ALPHA$K_AS1807030004 1540 /* AlphaServer 2100A 5/375 (4cpu) (rack) */N#define ALPHA$K_AS1807010101 1541 /* AlphaServer 2000A 5/400 (1cpu) */N#define ALPHA$K_AS1807010102 1542 /* AlphaServer 2000A 5/400 (2cpu) */N#define ALPHA$K_AS1807010103 1543 /* AlphaServer 2000A 5/400 (3cpu) */N#define ALPHA$K_AS1807010104 1544 /* AlphaServer 2000A 5/400 (4cpu) */N#define ALPHA$K_AS1807020101 1545 /* AlphaServer 2100A 5/400 (1cpu) */N#define ALPHA$K_AS1807020102 1546 /* AlphaServer 2100A 5/400 (2cpu) */N#define ALPHA$K_AS1807020103 1547 /* AlphaServer 2100A 5/400 (3cpu) */N#define ALPHA$K_AS1807020104 1548 /* AlphaServer 2100A 5/400 (4cpu) */S#define ALPHA$K_AS1807030101 1549 /* AlphaServer 2100A 5/400 (1cpu) (rack) */S#define ALPHA$K_AS1807030102 1550 /* AlphaServer 2100A 5/400 (2cpu) (rack) */S#define ALPHA$K_AS1807030103 1551 /* AlphaServer 2100A 5/400 (3cpu) (rack) */S#define ALPHA$K_AS1807030104 1552 /* AlphaServer 2100A 5/400 (4cpu) (rack) */N#define ALPHA$K_AS1406030001 1553 /* AlphaPCI64 275, EV45 2MB Cache */N#define ALPHA$K_AS1E07010001 1554 /* Personal Workstation 433au */N#define ALPHA$K_AS1E07020001 1555 /* Personal Workstation 466au */N#define ALPHA$K_AS1E07030001 1556 /* Personal Workstation 500au */N#define ALPHA$K_AS1E07040001 1557 /* Personal Workstation 533au */N#define ALPHA$K_AS1B07030101 1558 /* AlphaServer 1000A 5/333 */N#define ALPHA$K_AS1107050101 1559  /* AlphaServer 1000 5/333 */N#define ALPHA$K_AS0C07040001 1560 /* AlphaServer 8200 5/440 (1cpu) */N#define ALPHA$K_AS0C07040002 1561 /* AlphaServer 8200 5/440 (2cpu) */N#define ALPHA$K_AS0C07040003 1562 /* AlphaServer 8200 5/440 (3cpu) */N#define ALPHA$K_AS0C07040004 1563 /* AlphaServer 8200 5/440 (4cpu) */N#define ALPHA$K_AS0C07040005 1564 /* AlphaServer 8200 5/440 (5cpu) */N#define ALPHA$K_AS0C07040006 1565 /* AlphaServer 8200 5/440 (6cpu) */N#define ALPHA$K_AS0C07050001 1566 /* AlphaServer 8400 5/440 (1cpu) */N#define ALPHA$K_AS0C07050002 1567 /* AlphaServer 8400 5/440 (2cpu) */N#define ALPHA$K_AS0C07050003 1568 /* AlphaServer 8400 5/440 (3cpu) */N#define ALPHA$K_AS0C07050004 1569 /* AlphaServer 8400 5/440 (4cpu) */N#define ALPHA$K_AS0C07050005 1570 /* AlphaServer 8400 5/440 (5cpu) */N#define ALPHA$K_AS0C07050006 1571 /* AlphaServer 8400 5/440 (6cpu) */N#define ALPHA$K_AS0C07050007 1572 /* AlphaServer 8400 5/440 (7cpu) */N#define ALPHA$K_AS0C07050008 1573 /* AlphaServer 8400 5/440 (8cpu) */N#define ALPHA$K_AS0C07050009 1574 /* AlphaServer 8400 5/440 (9cpu) */N#define ALPHA$K_AS0C0705000A 1575 /* AlphaServer 8400 5/440 (10cpu) */N#define ALPHA$K_AS0C0705000B 1576 /* AlphaServer 8400 5/440 (11cpu) */N#define ALPHA$K_AS0C0705000C 1577 /* AlphaServer 8400 5/440 (12cpu) */N#define ALPHA$K_AS1F05010001 1578 /* XXM, EV5 266 MHz */N#define ALPHA$K_AS2007010001 1579 /* DIGITAL 21164 PICMG SBC */O#define ALPHA$K_AS1B07030201 1580 /* AlphaServer 1000A 5/500 2MB Cache */O#define ALPHA$K_AS1B07030301 1581 /* AlphaServer 1000A 5/500 8MB Cache */N#define ALPHA$K_AS1107050201 1582 /* AlphaServer 1000 5/500 2MB Cache */N#define ALPHA$K_AS1107050301 1583 /* AlphaServer 1000 5/500 8MB Cache */N#define ALPHA$K_AS1B07040101 1584 /* AlphaServer 800 5/400 2MB Cache */N#define ALPHA$K_AS1B07040201 1585 /* AlphaServer 800 5/500 2MB Cache */N#define ALPHA$K_AS1A07060001 1586 /* AlphaPC 164, EV56 466 MHz */N#define ALPHA$K_AS1A07070001 1587 /* AlphaPC 164, EV56 500 MHz */N#define ALPHA$K_AS2107000001 1588 /* AlphaVME 5/320, EV56 */N#define ALPHA$K_AS2107010001 1589 /* AlphaVME 5/480, EV56 */O#define ALPHA$K_AS1B07030401 1590 /* AlphaStation 600A 5/500 8MB Cache */N#define ALPHA$K_AS0C0705000D 1591 /* AlphaServer 8400 5/440 (13cpu) */N#define ALPHA$K_AS0C0705000E 1592 /* AlphaServer 8400 5/440 (14cpu) */N#define ALPHA$K_AS0D06080101 1593 /* AlphaServer 300 4/266 */V#define ALPHA$K_AS1607020401 1594 /* AlphaServer 4100 5/466 4MB (1cpu) (rack) */V#define ALPHA$K_AS1607020402 1595 /* AlphaServer 4100 5/466 4MB (2cpu) (rack) */V#define ALPHA$K_AS1607020403 1596 /* AlphaServer 4100 5/466 4MB (3cpu) (rack) */V#define ALPHA$K_AS1607020404 1597 /* AlphaServer 4100 5/466 4MB (4cpu) (rack) */Z#define ALPHA$K_AS1607010401 1598 /* AlphaServer 4100 5/466 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607010402 1599 /* AlphaServer 4100 5/466 4MB (2cpu) (pedestal) */Z#define ALPHA$K_AS1607010403 1600 /* AlphaServer 4100 5/466 4MB (3cpu) (pedestal) */Z#define ALPHA$K_AS1607010404 1601 /* AlphaServer 4100 5/466 4MB (4cpu) (pedestal) */V#define ALPHA$K_AS1607020501 1602 /* AlphaServer 4100 5/533 4MB (1cpu) (rack) */V#define ALPHA$K_AS1607020502 1603 /* AlphaServer 4100 5/533 4MB (2cpu) (rack) */V#define ALPHA$K_AS1607020503 1604 /* AlphaServer 4100 5/533 4MB (3cpu) (rack) */V#define ALPHA$K_AS1607020504 1605 /* AlphaServer 4100 5/533 4MB (4cpu) (rack) */Z#define ALPHA$K_AS1607010501 1606 /* AlphaServer 4100 5/533 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607010502 1607 /* AlphaServer 4100 5/533 4MB (2cpu) (pedestal) */Z#define ALPHA$K_AS1607010503 1608 /* AlphaServer 4100 5/533 4MB (3cpu) (pedestal) */Z#define ALPHA$K_AS1607010504 1609 /* AlphaServer 4100 5/533 4MB (4cpu) (pedestal) */V#define ALPHA$K_AS1607020601 1610 /* AlphaServer 4100 5/533 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607020602 1611 /* AlphaServer 4100 5/533 8MB (2cpu) (rack) */V#define ALPHA$K_AS1607020603 1612 /* AlphaServer 4100 5/533 8MB (3cpu) (rack) */V#define ALPHA$K_AS1607020604 1613 /* AlphaServer 4100 5/533 8MB (4cpu) (rack) */Z#define ALPHA$K_AS1607010601 1614 /* AlphaServer 4100 5/533 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607010602 1615 /* AlphaServer 4100 5/533 8MB (2cpu) (pedestal) */Z#define ALPHA$K_AS1607010603 1616 /* AlphaServer 4100 5/533 8MB (3cpu) (pedestal) */Z#define ALPHA$K_AS1607010604 1617 /* AlphaServer 4100 5/533 8MB (4cpu) (pedestal) */V#define ALPHA$K_AS1607020701 1618 /* AlphaServer 4100 5/600 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607020702 1619 /* AlphaServer 4100 5/600 8MB (2cpu) (rack) */V#define ALPHA$K_AS1607020703 1620 /* AlphaServer 4100 5/600 8MB (3cpu) (rack) */V#define ALPHA$K_AS1607020704 1621 /* AlphaServer 4100 5/600 8MB (4cpu) (rack) */Z#define ALPHA$K_AS1607010701 1622 /* AlphaServer 4100 5/600 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607010702 1623 /* AlphaServer 4100 5/600 8MB (2cpu) (pedestal) */Z#define ALPHA$K_AS1607010703 1624 /* AlphaServer 4100 5/600 8MB (3cpu) (pedestal) */Z#define ALPHA$K_AS1607010704 1625 /* AlphaServer 4100 5/600 8MB (4cpu) (pedestal) */V#define ALPHA$K_AS1607020801 1626 /* AlphaServer 4100 5/666 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607020802 1627 /* AlphaServer 4100 5/666 8MB (2cpu) (rack) */V#define ALPHA$K_AS1607020803 1628 /* AlphaServer 4100 5/666 8MB (3cpu) (rack) */V#define ALPHA$K_AS1607020804 1629 /* AlphaServer 4100 5/666 8MB (4cpu) (rack) */Z#define ALPHA$K_AS1607010801 1630 /* AlphaServer 4100 5/666 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607010802 1631 /* AlphaServer 4100 5/666 8MB (2cpu) (pedestal) */Z#define ALPHA$K_AS1607010803 1632 /* AlphaServer 4100 5/666 8MB (3cpu) (pedestal) */Z#define ALPHA$K_AS1607010804 1633 /* AlphaServer 4100 5/666 8MB (4cpu) (pedestal) */V#define ALPHA$K_AS1607040401 1634 /* AlphaServer 4000 5/466 4MB (1cpu) (rack) */V#define ALPHA$K_AS1607040402 1635 /* AlphaServer 4000 5/466 4MB (2cpu) (rack) */Z#define ALPHA$K_AS1607030401 1636 /* AlphaServer 4000 5/466 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607030402 1637 /* AlphaServer 4000 5/466 4MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607040501 1638 /* AlphaServer 4000 5/533 4MB (1cpu) (rack) */V#define ALPHA$K_AS1607040502 1639 /* AlphaServer 4000 5/533 4MB (2cpu) (rack) */Z#define ALPHA$K_AS1607030501 1640 /* AlphaServer 4000 5/533 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607030502 1641 /* AlphaServer 4000 5/533 4MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607040601 1642 /* AlphaServer 4000 5/533 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607040602 1643 /* AlphaServer 4000 5/533 8MB (2cpu) (rack) */Z#define ALPHA$K_AS1607030601 1644 /* AlphaServer 4000 5/533 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607030602 1645 /* AlphaServer 4000 5/533 8MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607040701 1646 /* AlphaServer 4000 5/600 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607040702 1647 /* AlphaServer 4000 5/600 8MB (2cpu) (rack) */Z#define ALPHA$K_AS1607030701 1648 /* AlphaServer 4000 5/600 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607030702 1649 /* AlphaServer 4000 5/600 8MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607040801 1650 /* AlphaServer 4000 5/666 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607040802 1651 /* AlphaServer 4000 5/666 8MB (2cpu) (rack) */Z#define ALPHA$K_AS1607030801 1652 /* AlphaServer 4000 5/666 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607030802 1653 /* AlphaServer 4000 5/666 8MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607060401 1654 /* AlphaServer 4000 5/466 4MB (1cpu) (rack) */V#define ALPHA$K_AS1607060402 1655 /* AlphaServer 4000 5/466 4MB (2cpu) (rack) */Z#define ALPHA$K_AS1607050401 1656 /* AlphaServer 4000 5/466 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607050402 1657 /* AlphaServer 4000 5/466 4MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607060501 1658 /* AlphaServer 4000 5/533 4MB (1cpu) (rack) */V#define ALPHA$K_AS1607060502 1659 /* AlphaServer 4000 5/533 4MB (2cpu) (rack) */Z#define ALPHA$K_AS1607050501 1660 /* AlphaServer 4000 5/533 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607050502 1661 /* AlphaServer 4000 5/533 4MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607060601 1662 /* AlphaServer 4000 5/533 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607060602 1663 /* AlphaServer 4000 5/533 8MB (2cpu) (rack) */Z#define ALPHA$K_AS1607050601 1664 /* AlphaServer 4000 5/533 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607050602 1665 /* AlphaServer 4000 5/533 8MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607060701 1666 /* AlphaServer 4000 5/600 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607060702 1667 /* AlphaServer 4000 5/600 8MB (2cpu) (rack) */Z#define ALPHA$K_AS1607050701 1668 /* AlphaServer 4000 5/600 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607050702 1669 /* AlphaServer 4000 5/600 8MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607060801 1670 /* AlphaServer 4000 5/666 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607060802 1671 /* AlphaServer 4000 5/666 8MB (2cpu) (rack) */Z#define ALPHA$K_AS1607050801 1672 /* AlphaServer 4000 5/666 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607050802 1673 /* AlphaServer 4000 5/666 8MB (2cpu) (pedestal) */N#define ALPHA$K_AS0C07060001 1674 /* AlphaServer 8200 5/622 (1cpu) */N#define ALPHA$K_AS0C07060002 1674 /* AlphaServer 8200 5/622 (2cpu) */N#define ALPHA$K_AS0C07060003 1674 /* AlphaServer 8200 5/622 (3cpu) */N#define ALPHA$K_AS0C07060004 1674 /* AlphaServer 8200 5/622 (4cpu) */N#define ALPHA$K_AS0C07060005 1674 /* AlphaServer 8200 5/622 (5cpu) */N#define ALPHA$K_AS0C07060006 1674 /* AlphaServer 8200 5/622 (6cpu) */N#define ALPHA$K_AS0C07070001 1680 /* AlphaServer 8400 5/622 (1cpu) */N#define ALPHA$K_AS0C07070002 1681 /* AlphaServer 8400 5/622 (2cpu) */N#define ALPHA$K_AS0C07070003 1682 /* AlphaServer 8400 5/622 (3cpu) */N#define ALPHA$K_AS0C07070004 1683 /* AlphaServer 8400 5/622 (4cpu) */N#define ALPHA$K_AS0C07070005 1684 /* AlphaServer 8400 5/622 (5cpu) */N#define ALPHA$K_AS0C07070006 1685 /* AlphaServer 8400 5/622 (6cpu) */N#define ALPHA$K_AS0C07070007 1686 /* AlphaServer 8400 5/622 (7cpu) */N#define ALPHA$K_AS0C07070008 1687 /* AlphaServer 8400 5/622 (8cpu) */N#define ALPHA$K_AS0C07070009 1688 /* AlphaServer 8400 5/622 (9cpu) */N#define ALPHA$K_AS0C0707000A 1689 /* AlphaServer 8400 5/622 (10cpu) */N#define ALPHA$K_AS0C0707000B 1690 /* AlphaServer 8400 5/622 (11cpu) */N#define ALPHA$K_AS0C0707000C 1691 /* AlphaServer 8400 5/622 (12cpu) */N#define ALPHA$K_AS0C0707000D 1692 /* AlphaServer 8400 5/622 (13cpu) */N#define ALPHA$K_AS0C0707000E 1693 /* AlphaServer 8400 5/622 (14cpu) */N#define ALPHA$K_AS1A07080001 1694 /* AlphaPC 164LX 400, EV56 400 MHz */N#define ALPHA$K_AS1A07090001 1695 /* AlphaPC 164LX 466, EV56 466 MHz */N#define ALPHA$K_AS1A070A0001 1696 /* AlphaPC 164LX 533, EV56 533 MHz */N#define ALPHA$K_AS1A070B0001 1697 /* AlphaPC 164LX 600, EV56 600 MHz */N#define ALPHA$K_AS1A070C0001 1698 /* AlphaPC 164SX 400, EV56 400 MHz */N#define ALPHA$K_AS1A070D0001 1699 /* AlphaPC 164SX 466, EV56 466 MHz */N#define ALPHA$K_AS1A070E0001 1700 /* AlphaPC 164SX 533, EV56 533 MHz */N#define ALPHA$K_AS1A070F0001 1701 /* AlphaPC 164SX 600, EV56 600 MHz */N#define ALPHA$K_AS1E07050001 1702 /* Personal Workstation 566au */N#define ALPHA$K_AS1E07060001 1703 /* Personal Workstation 600au */N#define ALPHA$K_AS1E07070001 1704 /* Personal Workstation 633au */N#define ALPHA$K_AS1E07080001 1705 /* Personal Workstation 666au */N#define ALPHA$K_AS1E07090001 1706 /* Personal Workstation 700au */N#define ALPHA$K_AS1E070A0001 1707  /* Personal Workstation 733au */N#define ALPHA$K_AS1E070B0001 1708 /* Personal Workstation 766au */N#define ALPHA$K_AS1E070C0001 1709 /* Personal Workstation 800au */N#define ALPHA$K_AS1E070D0001 1710 /* Personal Workstation 833au */N#define ALPHA$K_AS1E070E0001 1711 /* Personal Workstation 866au */N#define ALPHA$K_AS1E070F0001 1712 /* Personal Workstation 900au */N#define ALPHA$K_AS1E07100001 1713 /* Personal Workstation 933au */N#define ALPHA$K_AS1E07110001 1714 /* Personal Workstation 966au */N#define ALPHA$K_AS1E07120001 1715 /* Personal Workstation 1000au */N#define ALPHA$K_AS1E07130001 1716 /* Personal Workstation 466au */N#define ALPHA$K_AS1E07140001 1717 /* Personal Workstation 533au */N#define ALPHA$K_AS1E07150001 1718 /* Personal Workstation 600au */N#define ALPHA$K_AS1E07160001 1719 /* Personal Workstation 666au */N#define ALPHA$K_AS1E09140001 1720 /* Personal Workstation 466au */N#define ALPHA$K_AS1E09140101 1721 /* Personal Workstation 550au */V#define ALPHA$K_AS1605080001 1722 /* AlphaServer 1200 5/300 2MB (1cpu) (rack) */V#define ALPHA$K_AS1605080002 1723 /* AlphaServer 1200 5/300 2MB (2cpu) (rack) */Z#define ALPHA$K_AS1605070001 1724 /* AlphaServer 1200 5/300 2MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1605070002 1725 /* AlphaServer 1200 5/300 2MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607080101 1726 /* AlphaServer 1200 5/400 4MB (1cpu) (rack) */V#define ALPHA$K_AS1607080102 1727 /* AlphaServer 1200 5/400 4MB (2cpu) (rack) */Z#define ALPHA$K_AS1607070101 1728 /* AlphaServer 1200 5/400 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607070102 1729 /* AlphaServer 1200 5/400 4MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607080201 1730 /* AlphaServer 1200 5/466 4MB (1cpu) (rack) */V#define ALPHA$K_AS1607080202 1731 /* AlphaServer 1200 5/466 4MB (2cpu) (rack) */Z#define ALPHA$K_AS1607070201 1732 /* AlphaServer 1200 5/466 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607070202 1733 /* AlphaServer 1200 5/466 4MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607080301 1734 /* AlphaServer 1200 5/533 4MB (1cpu) (rack) */V#define ALPHA$K_AS1607080302 1735 /* AlphaServer 1200 5/533 4MB (2cpu) (rack) */Z#define ALPHA$K_AS1607070301 1736 /* AlphaServer 1200 5/533 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607070302 1737 /* AlphaServer 1200 5/533 4MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607080401 1738 /* AlphaServer 1200 5/600 4MB (1cpu) (rack) */V#define ALPHA$K_AS1607080402 1739 /* AlphaServer 1200 5/600 4MB (2cpu) (rack) */Z#define ALPHA$K_AS1607070401 1740 /* AlphaServer 1200 5/600 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607070402 1741 /* AlphaServer 1200 5/600 4MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607080501 1742 /* AlphaServer 1200 5/666 4MB (1cp u) (rack) */V#define ALPHA$K_AS1607080502 1743 /* AlphaServer 1200 5/666 4MB (2cpu) (rack) */Z#define ALPHA$K_AS1607070501 1744 /* AlphaServer 1200 5/666 4MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607070502 1745 /* AlphaServer 1200 5/666 4MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607080601 1746 /* AlphaServer 1200 5/533 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607080602 1747 /* AlphaServer 1200 5/533 8MB (2cpu) (rack) */Z#define ALPHA$K_AS1607070601 1748 /* A lphaServer 1200 5/533 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607070602 1749 /* AlphaServer 1200 5/533 8MB (2cpu) (pedestal) */V#define ALPHA$K_AS1607080701 1750 /* AlphaServer 1200 5/600 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607080702 1751 /* AlphaServer 1200 5/600 8MB (2cpu) (rack) */Z#define ALPHA$K_AS1607070701 1752 /* AlphaServer 1200 5/600 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607070702 1753 /* AlphaServer 1200 5/600 8MB (2cpu) (pedestal) */V#defin e ALPHA$K_AS1607080801 1754 /* AlphaServer 1200 5/666 8MB (1cpu) (rack) */V#define ALPHA$K_AS1607080802 1755 /* AlphaServer 1200 5/666 8MB (2cpu) (rack) */Z#define ALPHA$K_AS1607070801 1756 /* AlphaServer 1200 5/666 8MB (1cpu) (pedestal) */Z#define ALPHA$K_AS1607070802 1757 /* AlphaServer 1200 5/666 8MB (2cpu) (pedestal) */W#define ALPHA$K_AS16070A0101 1758 /* AlphaStation 1200 5/400 4MB (1cpu) (rack) */W#define ALPHA$K_AS16070A0102 1759 /* AlphaStation 1200 5 /400 4MB (2cpu) (rack) */[#define ALPHA$K_AS1607090101 1760 /* AlphaStation 1200 5/400 4MB (1cpu) (pedestal) */[#define ALPHA$K_AS1607090102 1761 /* AlphaStation 1200 5/400 4MB (2cpu) (pedestal) */W#define ALPHA$K_AS16070A0201 1762 /* AlphaStation 1200 5/466 4MB (1cpu) (rack) */W#define ALPHA$K_AS16070A0202 1763 /* AlphaStation 1200 5/466 4MB (2cpu) (rack) */[#define ALPHA$K_AS1607090201 1764 /* AlphaStation 1200 5/466 4MB (1cpu) (pedestal) */[#define ALPHA$K_ AS1607090202 1765 /* AlphaStation 1200 5/466 4MB (2cpu) (pedestal) */W#define ALPHA$K_AS16070A0301 1766 /* AlphaStation 1200 5/533 4MB (1cpu) (rack) */W#define ALPHA$K_AS16070A0302 1767 /* AlphaStation 1200 5/533 4MB (2cpu) (rack) */[#define ALPHA$K_AS1607090301 1768 /* AlphaStation 1200 5/533 4MB (1cpu) (pedestal) */[#define ALPHA$K_AS1607090302 1769 /* AlphaStation 1200 5/533 4MB (2cpu) (pedestal) */W#define ALPHA$K_AS16070A0401 1770 /* AlphaStation 1200 5/600 4MB (1cpu) (rack) */W#define ALPHA$K_AS16070A0402 1771 /* AlphaStation 1200 5/600 4MB (2cpu) (rack) */[#define ALPHA$K_AS1607090401 1772 /* AlphaStation 1200 5/600 4MB (1cpu) (pedestal) */[#define ALPHA$K_AS1607090402 1773 /* AlphaStation 1200 5/600 4MB (2cpu) (pedestal) */W#define ALPHA$K_AS16070A0501 1774 /* AlphaStation 1200 5/666 4MB (1cpu) (rack) */W#define ALPHA$K_AS16070A0502 1775 /* AlphaStation 1200 5/666 4MB (2cpu) (rack) */[#define ALPHA$K_AS1607090501 1776 /* AlphaStation 1200 5/666 4MB (1cpu) (pedestal) */[#define ALPHA$K_AS1607090502 1777 /* AlphaStation 1200 5/666 4MB (2cpu) (pedestal) */W#define ALPHA$K_AS16070A0601 1778 /* AlphaStation 1200 5/533 8MB (1cpu) (rack) */W#define ALPHA$K_AS16070A0602 1779 /* AlphaStation 1200 5/533 8MB (2cpu) (rack) */[#define ALPHA$K_AS1607090601 1780 /* AlphaStation 1200 5/533 8MB (1cpu) (pedestal) */[#define ALPHA$K_AS1607090602 1781 /* AlphaStation 1200 5/533 8MB (2cpu) (pedestal) */W#define ALPHA$K_AS16070A0701 1782 /* AlphaStation 1200 5/600 8MB (1cpu) (rack) */W#define ALPHA$K_AS16070A0702 1783 /* AlphaStation 1200 5/600 8MB (2cpu) (rack) */[#define ALPHA$K_AS1607090701 1784 /* AlphaStation 1200 5/600 8MB (1cpu) (pedestal) */[#define ALPHA$K_AS1607090702 1785 /* AlphaStation 1200 5/600 8MB (2cpu) (pedestal) */W#define ALPHA$K_AS16070A0801 1786 /* AlphaStation 1200 5/666 8MB (1cpu) (rack) */W#define ALPHA$K_AS16070A0802 1787 /* AlphaStation 1200 5/666 8MB (2cpu) (rack) */[#define ALPHA$K_AS1607090801 1788 /* AlphaStation 1200 5/666 8MB (1cpu) (pedestal) */[#define ALPHA$K_AS1607090802 1789 /* AlphaStation 1200 5/666 8MB (2cpu) (pedestal) */N#define ALPHA$K_AS1E07190001 1790 /* Personal Workstation 433au */N#define ALPHA$K_AS1E071A0001 1791 /* Personal Workstation 500au */N#define ALPHA$K_AS1E071B0001 1792 /* Personal Workstation 600au */N#define ALPHA$K_AS0C07080001 1793 /* AlphaServer 8200 5/625 (1cpu) */N#define ALPHA$K_AS0C07080002 1794 /* AlphaServer 8200 5/625 (2cpu) */N#define ALPHA$K_AS0C07080003 1795 /* AlphaServer 8200 5/625 (3cpu) */N#define ALPHA$K_AS0C07080004 1796 /* AlphaServer 8200 5/625 (4cpu) */N#define ALPHA$K_AS0C07080005 1797 /* AlphaServer 8200 5/625 (5cpu) */N#define ALPHA$K_AS0C07080006 1798 /* AlphaServer 8200 5/625 (6cpu) */N#define ALPHA$K_AS0C07090001 1799 /* AlphaServer 8400 5/625 (1cpu) */N#define ALPHA$K_AS0C07090002 1800 /* AlphaServer 8400 5/625 (2cpu) */N#define ALPHA$K_AS0C07090003 1801 /* AlphaServer 8400 5/625 (3cpu) */N#define ALPHA$K_AS0C07090004 1802 /* AlphaServer 8400 5/625 (4cpu) */N#define ALPHA$K_AS0C07090005 1803 /* AlphaServer 8400 5/625 (5cpu) */N#define ALPHA$K_AS0C07090006 1804 /* AlphaServer 8400 5/625 (6cpu) */N#define ALPHA$K_AS0C07090007 1805 /* AlphaServer 8400 5/625 (7cpu) */N#define ALPHA$K_AS0C07090008 1806 /* AlphaServer 8400 5/625 (8cpu) */N#define ALPHA$K_AS0C07090009 1807 /* AlphaServer 8400 5/625 (9cpu) */N#define ALPHA$K_AS0C0709000A 1808 /* AlphaServer 8400 5/625 (10cpu) */N#define ALPHA$K_AS0C0709000B 1809 /* AlphaServer 8400 5/625 (11cpu) */N#define ALPHA$K_AS0C0709000C 1810 /* AlphaServer 8400 5/625 (12cpu) */N#define ALPHA$K_AS0C0709000D 1811 /* AlphaServer 8400 5/625 (13cpu) */N#define ALPHA$K_AS0C0709000E 1812 /* AlphaServer 8400 5/625 (14cpu) */d#define ALPHA$K_AS2208050001 1813 /* AlphaServer ES40 6/500 (1cpu, 10-slot PCI, 8-slot MMB) */N#define ALPHA$K_AS2208050002 1814 /* AlphaServer ES40 6/500 (2cpu) */N#define ALPHA$K_AS2208050003 1815 /* AlphaServer ES40 6/500 (3cpu) */N#define ALPHA$K_AS2208050004 1816 /* AlphaServer ES40 6/500 (4cpu) */d#define ALPHA$K_AS2208050101 1817 /* AlphaServer ES40 6/667 (1cpu, 10-slot PCI, 8-slot MMB) */N#define ALPHA$K_AS2208050102 1818 /* AlphaServer ES40 6/667 (2cpu) */N#define ALPHA$K_AS2208050103 1819 /* AlphaServer ES40 6/667 (3cpu) */N#define ALPHA$K_AS2208050104 1820 /* AlphaServer ES40 6/667 (4cpu) */S#define ALPHA$K_AS2208050201 1821 /* Professional Workstation XP1000 6/500 */T#define ALPHA$K_AS220B090001 1822 /* Professional Workstation XP1000 67/667 */N#define ALPHA$K_AS1E071C0001 1823 /* Personal Workstation 466au */N#define ALPHA$K_AS1E071D0001 1824 /* Personal Workstation 533au */N#define ALPHA$K_AS1E071E0001 1825 /* Personal Workstation 600au */N#define ALPHA$K_AS1E071F0001 1826 /* Personal Workstation 666au */N#define ALPHA$K_AS1E07200001 1827 /* Personal Workstation 700au */N#define ALPHA$K_AS1E07210001 1828 /* Personal Workstation 733au */N#define ALPHA$K_AS1E07220001 1829 /* Personal Workstation 767au */N#define ALPHA$K_AS1E07230001 1830 /* Personal Workstation 800au */N#define ALPHA$K_AS1E07240001 1831 /* Personal Workstation 833au */N#define ALPHA$K_AS1E07250001 1832 /* Personal Workstation 867au */N#define ALPHA$K_AS1E07260001 1833 /* Personal Workstation 900au */N#define ALPHA$K_AS1E07270001 1834 /* Personal Workstation 933au */N#define ALPHA$K_AS1E07280001 1835 /* Personal Workstation 967au */N#define ALPHA$K_AS1E07290001 1836 /* Personal Workstation 1000au */N#define ALPHA$K_AS2508010001 1837 /* SMARTengine Alpha 21264 SBC */N#define ALPHA$K_AS2208060001 1838 /* AlphaServer DS20 6/500 */N#define ALPHA$K_AS2208070001 1839 /* AlphaServer DS10 6/466 */N#define ALPHA$K_AS2208080001 1840 /* AlphaServer DS20E 6/500 */N#define ALPHA$K_AS0C080A0001 1841 /* AlphaServer GS60 6/525 (1cpu) */N#define ALPHA$K_AS0C080A0002 1842 /* AlphaServer GS60 6/525 (2cpu) */N#define ALPHA$K_AS0C080A0003 1843 /* AlphaServer GS60 6/525 (3cpu) */N#define ALPHA$K_AS0C080A0004 1844 /* AlphaServer GS60 6/525 (4cpu) */N#define ALPHA$K_AS0C080A0005 1845 /* AlphaServer GS60 6/525 (5cpu) */N#define ALPHA$K_AS0C080A0006 1846 /* AlphaServer GS60 6/525 (6cpu) */N#define ALPHA$K_AS0C080B0001 1847 /* AlphaServer GS140 6/525 (1cpu) */N#define ALPHA$K_AS0C080B0002 1848 /* AlphaServer GS140 6/525 (2cpu) */N#define ALPHA$K_AS0C080B0003 1849 /* AlphaServer GS140 6/525 (3cpu) */N#define ALPHA$K_AS0C080B0004 1850 /* AlphaServer GS140 6/525 (4cpu) */N#define ALPHA$K_AS0C080B0005 1851 /* AlphaServer GS140 6/525 (5cpu) */N#define ALPHA$K_AS0C080B0006 1852 /* AlphaServer GS140 6/525 (6cpu) */N#define ALPHA$K_AS0C080B0007 1853 /* AlphaServer GS140 6/525 (7cpu) */N#define ALPHA$K_AS0C080B0008 1854 /* AlphaServer GS140 6/525 (8cpu) */N#define ALPHA$K_AS0C080B0009 1855 /* AlphaServer GS140 6/525 (9cpu) */N#define ALPHA$K_AS0C080B000A 1856 /* AlphaServer GS140 6/525 (10cpu) */N#define ALPHA$K_AS0C080B000B 1857 /* AlphaServer GS140 6/525 (11cpu) */N#define ALPHA$K_AS0C080B000C 1858 /* AlphaServer GS140 6/525 (12cpu) */N#define ALPHA$K_AS0C080B000D 1859 /* AlphaServer GS140 6/525 (13cpu) */N#define ALPHA$K_AS0C080B000E 1860 /* AlphaServer GS140 6/525 (14cpu) */c#define ALPHA$K_AS2208050301 1861 /* AlphaServer ES40 6/500 (1cpu, 6-slot PCI, 8-slot MMB) */N#define ALPHA$K_AS2208050302 1862 /* AlphaServer ES40 6/500 (2cpu) */N#define ALPHA$K_AS2208050303 1863 /* AlphaServer ES40 6/500 (3cpu) */N#define ALPHA$K_AS2208050304 1864 /* AlphaServer ES40 6/500 (4cpu) */c#define ALPHA$K_AS2208050401 1865 /* AlphaServer ES40 6/667 (1cpu, 6-slot PCI, 8-slot MMB) */N#define ALPHA$K_AS2208050402 1866 /* AlphaServer ES40 6/667 (2cpu) */N#define ALPHA$K_AS2208050403 1867 /* AlphaServer ES40 6/667 (3cpu) */N#define ALPHA$K_AS2208050404 1868 /* AlphaServer ES40 6/667 (4cpu) */c#define ALPHA$K_AS2208050501 1869 /* AlphaServer ES40 6/500 (1cpu, 6-slot PCI, 4-slot MMB) */N#define ALPHA$K_AS2208050502 1870 /* AlphaServer ES40 6/500 (2cpu) */N#define ALPHA$K_AS2208050503 1871 /* AlphaServer ES40 6/500 (3cpu) */N#define ALPHA$K_AS2208050504 1872 /* AlphaServer ES40 6/500 (4cpu) */c#define ALPHA$K_AS2208050601 1873 /* AlphaServer ES40 6/667 (1cpu, 6-slot PCI, 4-slot MMB) */N#define ALPHA$K_AS2208050602 1874 /* AlphaServer ES40 6/667 (2cpu) */N#define ALPHA$K_AS2208050603 1875 /* AlphaServer ES40 6/667 (3cpu) */N#define ALPHA$K_AS2208050604 1876 /* AlphaServer ES40 6/667 (4cpu) */N#define ALPHA$K_AS2107040001 1877 /* AlphaVME 5/480A, 5/480U */N#define ALPHA$K_AS2107050001 1878 /* AlphaVME 5/320U */N#define ALPHA$K_AS2208070101 1879 /* AlphaStation XP900, D S10, 6/466 */N#define ALPHA$K_AS0C080C0001 1880 /* AlphaServer GS60e 6/525 (1cpu) */N#define ALPHA$K_AS0C080C0002 1881 /* AlphaServer GS60e 6/525 (2cpu) */N#define ALPHA$K_AS0C080C0003 1882 /* AlphaServer GS60e 6/525 (3cpu) */N#define ALPHA$K_AS0C080C0004 1883 /* AlphaServer GS60e 6/525 (4cpu) */N#define ALPHA$K_AS0C080C0005 1884 /* AlphaServer GS60e 6/525 (5cpu) */N#define ALPHA$K_AS0C080C0006 1885 /* AlphaServer GS60e 6/525 (6cpu) */N#define AL!PHA$K_AS0C080C0007 1886 /* AlphaServer GS60e 6/525 (7cpu) */N#define ALPHA$K_AS0C080C0008 1887 /* AlphaServer GS60e 6/525 (8cpu) */N#define ALPHA$K_AS0C0B0D0001 1890 /* AlphaServer GS60 67/700 (1cpu) */N#define ALPHA$K_AS0C0B0D0002 1891 /* AlphaServer GS60 67/700 (2cpu) */N#define ALPHA$K_AS0C0B0D0003 1892 /* AlphaServer GS60 67/700 (3cpu) */N#define ALPHA$K_AS0C0B0D0004 1893 /* AlphaServer GS60 67/700 (4cpu) */N#define ALPHA$K_AS0C0B0D0005 1894 " /* AlphaServer GS60 67/700 (5cpu) */N#define ALPHA$K_AS0C0B0D0006 1895 /* AlphaServer GS60 67/700 (6cpu) */N#define ALPHA$K_AS0C0B0E0001 1896 /* AlphaServer GS140 67/700 (1cpu) */N#define ALPHA$K_AS0C0B0E0002 1897 /* AlphaServer GS140 67/700 (2cpu) */N#define ALPHA$K_AS0C0B0E0003 1898 /* AlphaServer GS140 67/700 (3cpu) */N#define ALPHA$K_AS0C0B0E0004 1899 /* AlphaServer GS140 67/700 (4cpu) */N#define ALPHA$K_AS0C0B0E0005 1900 /* AlphaServer GS140 6#7/700 (5cpu) */N#define ALPHA$K_AS0C0B0E0006 1901 /* AlphaServer GS140 67/700 (6cpu) */N#define ALPHA$K_AS0C0B0E0007 1902 /* AlphaServer GS140 67/700 (7cpu) */N#define ALPHA$K_AS0C0B0E0008 1903 /* AlphaServer GS140 67/700 (8cpu) */N#define ALPHA$K_AS0C0B0E0009 1904 /* AlphaServer GS140 67/700 (9cpu) */N#define ALPHA$K_AS0C0B0E000A 1905 /* AlphaServer GS140 67/700 (10cpu) */N#define ALPHA$K_AS0C0B0E000B 1906 /* AlphaServer GS140 67/700 (11cpu) */N#define $ALPHA$K_AS0C0B0E000C 1907 /* AlphaServer GS140 67/700 (12cpu) */N#define ALPHA$K_AS0C0B0E000D 1908 /* AlphaServer GS140 67/700 (13cpu) */N#define ALPHA$K_AS0C0B0E000E 1909 /* AlphaServer GS140 67/700 (14cpu) */N#define ALPHA$K_AS0C0B0F0001 1910 /* AlphaServer GS60e 67/700 (1cpu) */N#define ALPHA$K_AS0C0B0F0002 1911 /* AlphaServer GS60e 67/700 (2cpu) */N#define ALPHA$K_AS0C0B0F0003 1912 /* AlphaServer GS60e 67/700 (3cpu) */N#define ALPHA$K_AS0C0B0F0004 1913 % /* AlphaServer GS60e 67/700 (4cpu) */N#define ALPHA$K_AS0C0B0F0005 1914 /* AlphaServer GS60e 67/700 (5cpu) */N#define ALPHA$K_AS0C0B0F0006 1915 /* AlphaServer GS60e 67/700 (6cpu) */N#define ALPHA$K_AS0C0B0F0007 1916 /* AlphaServer GS60e 67/700 (7cpu) */N#define ALPHA$K_AS0C0B0F0008 1917 /* AlphaServer GS60e 67/700 (8cpu) */V#define ALPHA$K_AS2208060002 1920 /* AlphaServer DS20 6/500 (2cpu) (pedestal) */R#define ALPHA$K_AS2208080002 1921 /* AlphaServ&er DS20 6/500 (2cpu) (rack) */T#define ALPHA$K_AS220B050001 1822 /* Professional Workstation XP1000 67/750 */d#define ALPHA$K_AS2208050701 1923 /* AlphaServer ES40 6/500 (1cpu, 10-slot PCI, 4-slot MMB) */N#define ALPHA$K_AS2208050702 1924 /* AlphaServer ES40 6/500 (2cpu) */N#define ALPHA$K_AS2208050703 1925 /* AlphaServer ES40 6/500 (3cpu) */N#define ALPHA$K_AS2208050704 1926 /* AlphaServer ES40 6/500 (4cpu) */d#define ALPHA$K_AS2208050801 1927 /* Alp'haServer ES40 6/667 (1cpu, 10-slot PCI, 4-slot MMB) */N#define ALPHA$K_AS2208050802 1928 /* AlphaServer ES40 6/667 (2cpu) */N#define ALPHA$K_AS2208050803 1929 /* AlphaServer ES40 6/667 (3cpu) */N#define ALPHA$K_AS2208050804 1930 /* AlphaServer ES40 6/667 (4cpu) */d#define ALPHA$K_AS2208050901 1931 /* AlphaServer ES40 6/500 (1cpu, 10-slot PCI, 4-slot MMB) */N#define ALPHA$K_AS2208050902 1932 /* AlphaServer ES40 6/500 (2cpu) */N#define ALPHA$K_AS2208050903( 1933 /* AlphaServer ES40 6/500 (3cpu) */N#define ALPHA$K_AS2208050904 1934 /* AlphaServer ES40 6/500 (4cpu) */d#define ALPHA$K_AS2208050A01 1935 /* AlphaServer ES40 6/667 (1cpu, 10-slot PCI, 4-slot MMB) */N#define ALPHA$K_AS2208050A02 1936 /* AlphaServer ES40 6/667 (2cpu) */N#define ALPHA$K_AS2208050A03 1937 /* AlphaServer ES40 6/667 (3cpu) */N#define ALPHA$K_AS2208050A04 1938 /* AlphaServer ES40 6/667 (4cpu) */T#define ALPHA$K_AS220B080001 193)9 /* AlphaServer DS20E 67/667 (1cpu) (rack) */T#define ALPHA$K_AS220B080002 1940 /* AlphaServer DS20E 67/667 (2cpu) (rack) */T#define ALPHA$K_AS2208080101 1941 /* AlphaStation DS20E 6/500 (1cpu) (rack) */T#define ALPHA$K_AS2208080102 1942 /* AlphaStation DS20E 6/500 (2cpu) (rack) */U#define ALPHA$K_AS220B080101 1943 /* AlphaStation DS20E 67/667 (1cpu) (rack) */U#define ALPHA$K_AS220B080102 1944 /* AlphaStation DS20E 67/667 (2cpu) (rack) */g#define ALPHA$K_AS*2208050B01 1945 /* AlphaStation XP4000 6/500 (1cpu) (6-slot PCI, 4-slot MMB) */N#define ALPHA$K_AS2208050B02 1946 /* AlphaStation XP4000 6/500 (2cpu) */N#define ALPHA$K_AS2208050B03 1947 /* AlphaStation XP4000 6/500 (3cpu) */N#define ALPHA$K_AS2208050B04 1948 /* AlphaStation XP4000 6/500 (4cpu) */f#define ALPHA$K_AS220B050101 1949 /* AlphaStation ES40 67/667 (1cpu) (6-slot PCI, 4-slot MMB) */N#define ALPHA$K_AS220B050102 1950 /* AlphaStation ES40 67/667 (2cpu)+ */N#define ALPHA$K_AS220B050103 1951 /* AlphaStation ES40 67/667 (3cpu) */N#define ALPHA$K_AS220B050104 1952 /* AlphaStation ES40 67/667 (4cpu) */h#define ALPHA$K_AS2208050C01 1953 /* AlphaStation XP4000 6/500 (1cpu) (10-slot PCI, 8-slot MMB) */N#define ALPHA$K_AS2208050C02 1954 /* AlphaStation XP4000 6/500 (2cpu) */N#define ALPHA$K_AS2208050C03 1955 /* AlphaStation XP4000 6/500 (3cpu) */N#define ALPHA$K_AS2208050C04 1956 /* AlphaStation XP4000 6/500 (4cpu,) */g#define ALPHA$K_AS220B050201 1957 /* AlphaStation ES40 67/667 (1cpu) (10-slot PCI, 8-slot MMB) */N#define ALPHA$K_AS220B050202 1958 /* AlphaStation ES40 67/667 (2cpu) */N#define ALPHA$K_AS220B050203 1959 /* AlphaStation ES40 67/667 (3cpu) */N#define ALPHA$K_AS220B050204 1960 /* AlphaStation ES40 67/667 (4cpu) */N#define ALPHA$K_AS2208070201 1961 /* AlphaServer DS10L 6/466 */N#define ALPHA$K_AS220B070001 1962 /* AlphaServer DS10L 67/616 - */N#define ALPHA$K_AS220B070101 1962 /* AlphaStation DS10 67/616 */U#define ALPHA$K_AS220D080001 1964 /* AlphaServer DS20E 68A/833 (1cpu) (rack) */U#define ALPHA$K_AS220D080002 1965 /* AlphaServer DS20E 68A/833 (2cpu) (rack) */N#define ALPHA$K_AS230B080000 1966 /* AlphaServer GS40 67/728 */N#define ALPHA$K_AS230B080100 1967 /* AlphaServer GS80 67/728 */N#define ALPHA$K_AS230B080200 1968 /* AlphaServer GS160 67/728 */N#def.ine ALPHA$K_AS230B080300 1969 /* AlphaServer GS320 67/728 */N#define ALPHA$K_AS220B070201 1970 /* AlphaServer DS10 67/616 */R#define ALPHA$K_AS260C010001 1971 /* AlphaServer ES45/3B 68CB/1000 (1cpu) */R#define ALPHA$K_AS260C010002 1972 /* AlphaServer ES45/3B 68CB/1000 (2cpu) */R#define ALPHA$K_AS260C010003 1973 /* AlphaServer ES45/3B 68CB/1000 (3cpu) */R#define ALPHA$K_AS260C010004 1974 /* AlphaServer ES45/3B 68CB/1000 (4cpu) */U#define ALPHA$/K_AS260C010101 1975 /* AlphaServer ES45/2, 2B 68CB/1000 (1cpu) */U#define ALPHA$K_AS260C010102 1976 /* AlphaServer ES45/2, 2B 68CB/1000 (2cpu) */U#define ALPHA$K_AS260C010103 1977 /* AlphaServer ES45/2, 2B 68CB/1000 (3cpu) */U#define ALPHA$K_AS260C010104 1978 /* AlphaServer ES45/2, 2B 68CB/1000 (4cpu) */O#define ALPHA$K_AS260D020002 1979 /* AlphaServer TS202c 68A/933 (2cpu) */O#define ALPHA$K_AS260D030001 1980 /* AlphaServer TS212c 68A/933 (1cpu) */O#def0ine ALPHA$K_AS260D030002 1981 /* AlphaServer TS212c 68A/933 (2cpu) */Y#define ALPHA$K_AS220D080101 1982 /* AlphaServer DS20E 68A/833 (1cpu) (pedestal) */Y#define ALPHA$K_AS220D080102 1983 /* AlphaServer DS20E 68A/833 (2cpu) (pedestal) */[#define ALPHA$K_AS220C050001 1984 /* AlphaStation ES40 68/833 (1cpu) (10-slot PCI) */N#define ALPHA$K_AS220C050002 1985 /* AlphaStation ES40 68/833 (2cpu) */N#define ALPHA$K_AS220C050003 1986 /* AlphaStation ES40 68/833 (31cpu) */N#define ALPHA$K_AS220C050004 1987 /* AlphaStation ES40 68/833 (4cpu) */Z#define ALPHA$K_AS220C050101 1988 /* AlphaStation ES40 68/833 (1cpu) (6-slot PCI) */N#define ALPHA$K_AS220C050102 1989 /* AlphaStation ES40 68/833 (2cpu) */N#define ALPHA$K_AS220C050103 1990 /* AlphaStation ES40 68/833 (3cpu) */N#define ALPHA$K_AS220C050104 1991 /* AlphaStation ES40 68/833 (4cpu) */O#define ALPHA$K_AS260C040101 1992 /* AlphaServer DS25 68CB/1000 (1cpu) */P#d2efine ALPHA$K_AS260C040201 1993 /* AlphaStation DS25 68CB/1000 (1cpu) */O#define ALPHA$K_AS260C040102 1994 /* AlphaServer DS25 68CB/1000 (1cpu) */P#define ALPHA$K_AS260C040202 1995 /* AlphaStation DS25 68CB/1000 (1cpu) */R#define ALPHA$K_AS260C010201 2002 /* AlphaServer ES45/1B 68CB/1000 (1cpu) */R#define ALPHA$K_AS260C010202 2003 /* AlphaServer ES45/1B 68CB/1000 (2cpu) */R#define ALPHA$K_AS260C010203 2004 /* AlphaServer ES45/1B 68CB/1000 (3cpu) */R#define AL3PHA$K_AS260C010204 2005 /* AlphaServer ES45/1B 68CB/1000 (4cpu) */Y#define ALPHA$K_AS220D0C0002 2006 /* AlphaServer DS20L, API CS20, 68A/833 (2cpu) */Q#define ALPHA$K_AS260C020002 2007 /* AlphaServer TS202c 68CB/1250 (2cpu) */[#define ALPHA$K_AS220C050201 2008 /* AlphaStation TS40 68/833 (1cpu) (14-slot PCI) */N#define ALPHA$K_AS220C050202 2009 /* AlphaStation TS40 68/833 (2cpu) */N#define ALPHA$K_AS220C050203 2010 /* AlphaStation TS40 68/833 (3cpu) */N#d4efine ALPHA$K_AS220C050204 2011 /* AlphaStation TS40 68/833 (4cpu) */R#define ALPHA$K_AS260C010301 2013 /* AlphaServer ES45/3B 68CB/1250 (1cpu) */R#define ALPHA$K_AS260C010302 2014 /* AlphaServer ES45/3B 68CB/1250 (2cpu) */R#define ALPHA$K_AS260C010303 2015 /* AlphaServer ES45/3B 68CB/1250 (3cpu) */R#define ALPHA$K_AS260C010304 2016 /* AlphaServer ES45/3B 68CB/1250 (4cpu) */U#define ALPHA$K_AS260C010401 2017 /* AlphaServer ES45/2, 2B 68CB/1250 (1cpu) */U#def5ine ALPHA$K_AS260C010402 2018 /* AlphaServer ES45/2, 2B 68CB/1250 (2cpu) */U#define ALPHA$K_AS260C010403 2019 /* AlphaServer ES45/2, 2B 68CB/1250 (3cpu) */U#define ALPHA$K_AS260C010404 2020 /* AlphaServer ES45/2, 2B 68CB/1250 (4cpu) */R#define ALPHA$K_AS260C010501 2021 /* AlphaServer ES45/1B 68CB/1250 (1cpu) */R#define ALPHA$K_AS260C010502 2022 /* AlphaServer ES45/1B 68CB/1250 (2cpu) */R#define ALPHA$K_AS260C010503 2023 /* AlphaServer ES45/1B 68CB/1250 (3cpu6) */R#define ALPHA$K_AS260C010504 2024 /* AlphaServer ES45/1B 68CB/1250 (4cpu) */N#define ALPHA$K_AS270F010000 2025 /* AlphaServer TS212c Series */N#define ALPHA$K_AS270F020000 2029 /* AlphaServer TS80 */N#define ALPHA$K_AS270F000104 2030 /* AlphaServer ES47 */N#define ALPHA$K_AS270F000208 2031 /* AlphaServer GS80 */O#define ALPHA$K_AS270F000008 2038 /* AlphaServer GS1280 (8cpu capable) */P#define ALPHA$7K_AS270F000010 2039 /* AlphaServer GS1280 (16cpu capable) */P#define ALPHA$K_AS270F000020 2040 /* AlphaServer GS1280 (32cpu capable) */P#define ALPHA$K_AS270F000040 2041 /* AlphaServer GS1280 (64cpu capable) */Q#define ALPHA$K_AS270F000080 2042 /* AlphaServer GS1280 (128cpu capable) */N#define ALPHA$K_AS260C050001 2047 /* AlphaServer DS15 68CB/1000 */N#define ALPHA$K_AS260C050101 2048 /* AlphaStation DS15 68CB/1000 */N#define ALPHA$K_AS260C050201 28049 /* AlphaServer TS15 68CB/1000 */#define ALPHA$K_MAX_SMM 2051#define ALPHA$K_MAX_MODEL 1056#define ALPHA$K_MAX_ALPHA 8191 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ALPHADEF_LOADED */ wwѷ/******* 9*************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $ARGDEF ***/#ifndef __ARGDEF_LOADED#define __ARGDEF_LOADED 1 G#pragma __nostandard /*: This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* ARG$ - The argument descriptors */N/* < */N#define ARG$C_UNKNOWN 0 /* Unspecified or unknown */N#define ARG$C_VALUE 1 /* Passed by value */N#define ARG$C_REF 2 /* Passed by reference */N#define ARG$C_DESC 3 /* Passed by descriptor */#define ARG$K_SIZE 2#define ARG$C_SIZE 2 #ifdef __NEW_STARLETtypedef struct _argdef { __union {N unsigned c =har arg$b_valctl; /*Validation control byte */ __struct {N unsigned arg$v_passmech : 2; /*Passing mechanism */( unsigned arg$v_fill_18_ : 6; } arg$r_valctl_bits;N/* Passing mechanisms */ } arg$r_valctl_overlay;N unsigned char arg$b_bytecnt; /*Remaining byte count */ } ARGDEF; #if !defined(__VAXC)6#define arg$b_valctl arg$r_val >ctl_overlay.arg$b_valctlL#define arg$v_passmech arg$r_valctl_overlay.arg$r_valctl_bits.arg$v_passmech"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct argdef { __union {N unsigned char arg$b_valctl; /*Validation control byte */ __struct {N unsigned arg$v_passmech : 2; /*Passing mechanism */( unsigned arg$v_fill_18_ : 6; } arg$r_valctl_bits;N/* Passing mechanisms ? */ } arg$r_valctl_overlay;N unsigned char arg$b_bytecnt; /*Remaining byte count */ } ; #if !defined(__VAXC)6#define arg$b_valctl arg$r_valctl_overlay.arg$b_valctlL#define arg$v_passmech arg$r_valctl_overlay.arg$r_valctl_bits.arg$v_passmech"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr s@ize pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ARGDEF_LOADED */ ww+G/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC A]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $ARMDEF ***/#ifndef __ARMDEF_LOADED#define __ARMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* BSave 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)#defCine __union union#else#define __union variant_union#endif#endif N/*+ */N/* Access Rights Mask longword definitions */N/*- */#define ARM$M_READ 0x1#define ARM$M_WRITE 0x2#define ARM$M_EXECUTE 0x4#define ARM$M_DELETE 0x8#define ARM$M_CONTROL 0x10#define ARM$M_CREATE 0x4#define ARM$M_LOCK 0x4#defDine ARM$M_PHYSICAL 0x4#define ARM$M_LOGICAL 0x8#define ARM$M_ASSOCIATE 0x1#define ARM$M_SUBMIT 0x2#define ARM$M_MANAGE 0x4 #ifdef __NEW_STARLETtypedef union _armdef { __union { int arm$l_file_access; __struct {N unsigned arm$v_read : 1; /* Read access */N unsigned arm$v_write : 1; /* Write access */N unsigned arm$v_execute : 1; /* Execute access */N E unsigned arm$v_delete : 1; /* Delete access */N unsigned arm$v_control : 1; /* Control access */[ unsigned arm$v_fill : 27; /* [LOADSS]SYSACLSRV depends on this being here! */ } arm$r_fill_48_; } arm$r_fill_47_; __union { int arm$l_volume_access; __struct {# unsigned arm$v_v_1 : 1;# unsigned arm$v_v_2 : 1;N unsigned arm$v_create : 1; /* Create acceFss (volume) */( unsigned arm$v_fill_59_ : 5; } arm$r_fill_50_; } arm$r_fill_49_; __union { int arm$l_rsdm_access; __struct {# unsigned arm$v_r_1 : 1;# unsigned arm$v_r_2 : 1;N unsigned arm$v_lock : 1; /* Lock access (resource domain) */( unsigned arm$v_fill_60_ : 5; } arm$r_fill_52_; } arm$r_fill_51_; __union { int arm$l_device_access; G __struct {# unsigned arm$v_d_1 : 1;# unsigned arm$v_d_2 : 1;N unsigned arm$v_physical : 1; /* Physical I/O access (device) */N unsigned arm$v_logical : 1; /* Logical I/O access (device) */( unsigned arm$v_fill_61_ : 4; } arm$r_fill_54_; } arm$r_fill_53_; __union { int arm$l_ceb_access; __struct {W unsigned arm$v_associate : 1; /* Associate access (common event Hcluster) */( unsigned arm$v_fill_62_ : 7; } arm$r_fill_56_; } arm$r_fill_55_; __union { int arm$l_queue_access; __struct {# unsigned arm$v_q_1 : 1;N unsigned arm$v_submit : 1; /* Submit access (queue) */N unsigned arm$v_manage : 1; /* Manage access (queue) */( unsigned arm$v_fill_63_ : 5; } arm$r_fill_58_; } arm$r_fill_57_; } ARMDEF; I#if !defined(__VAXC);#define arm$v_read arm$r_fill_47_.arm$r_fill_48_.arm$v_read=#define arm$v_write arm$r_fill_47_.arm$r_fill_48_.arm$v_writeA#define arm$v_execute arm$r_fill_47_.arm$r_fill_48_.arm$v_execute?#define arm$v_delete arm$r_fill_47_.arm$r_fill_48_.arm$v_deleteA#define arm$v_control arm$r_fill_47_.arm$r_fill_48_.arm$v_control;#define arm$v_fill arm$r_fill_47_.arm$r_fill_48_.arm$v_fill?#define arm$v_create arm$r_fill_49_.arm$r_fill_50_.arm$v_create;#define arm$v_lock arm$r_f Jill_51_.arm$r_fill_52_.arm$v_lockC#define arm$v_physical arm$r_fill_53_.arm$r_fill_54_.arm$v_physicalA#define arm$v_logical arm$r_fill_53_.arm$r_fill_54_.arm$v_logicalE#define arm$v_associate arm$r_fill_55_.arm$r_fill_56_.arm$v_associate?#define arm$v_submit arm$r_fill_57_.arm$r_fill_58_.arm$v_submit?#define arm$v_manage arm$r_fill_57_.arm$r_fill_58_.arm$v_manage"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union armdef { __union { int arm$l_file_aKccess; __struct {N unsigned arm$v_read : 1; /* Read access */N unsigned arm$v_write : 1; /* Write access */N unsigned arm$v_execute : 1; /* Execute access */N unsigned arm$v_delete : 1; /* Delete access */N unsigned arm$v_control : 1; /* Control access */[ unsigned arm$v_fill : 27; /* [LOADSS]SYSACLSRV depends on thisL being here! */ } arm$r_fill_48_; } arm$r_fill_47_; __union { int arm$l_volume_access; __struct {# unsigned arm$v_v_1 : 1;# unsigned arm$v_v_2 : 1;N unsigned arm$v_create : 1; /* Create access (volume) */( unsigned arm$v_fill_59_ : 5; } arm$r_fill_50_; } arm$r_fill_49_; __union { int arm$l_rsdm_access; __struct {# unsigned arm$v_r M_1 : 1;# unsigned arm$v_r_2 : 1;N unsigned arm$v_lock : 1; /* Lock access (resource domain) */( unsigned arm$v_fill_60_ : 5; } arm$r_fill_52_; } arm$r_fill_51_; __union { int arm$l_device_access; __struct {# unsigned arm$v_d_1 : 1;# unsigned arm$v_d_2 : 1;N unsigned arm$v_physical : 1; /* Physical I/O access (device) */N unsigned arm$v_logical : 1; /* LogicNal I/O access (device) */( unsigned arm$v_fill_61_ : 4; } arm$r_fill_54_; } arm$r_fill_53_; __union { int arm$l_ceb_access; __struct {W unsigned arm$v_associate : 1; /* Associate access (common event cluster) */( unsigned arm$v_fill_62_ : 7; } arm$r_fill_56_; } arm$r_fill_55_; __union { int arm$l_queue_access; __struct {# unsigned arm$v_q_1 : 1;N O unsigned arm$v_submit : 1; /* Submit access (queue) */N unsigned arm$v_manage : 1; /* Manage access (queue) */( unsigned arm$v_fill_63_ : 5; } arm$r_fill_58_; } arm$r_fill_57_; } ; #if !defined(__VAXC);#define arm$v_read arm$r_fill_47_.arm$r_fill_48_.arm$v_read=#define arm$v_write arm$r_fill_47_.arm$r_fill_48_.arm$v_writeA#define arm$v_execute arm$r_fill_47_.arm$r_fill_48_.arm$v_execute?#define arm$v_Pdelete arm$r_fill_47_.arm$r_fill_48_.arm$v_deleteA#define arm$v_control arm$r_fill_47_.arm$r_fill_48_.arm$v_control;#define arm$v_fill arm$r_fill_47_.arm$r_fill_48_.arm$v_fill?#define arm$v_create arm$r_fill_49_.arm$r_fill_50_.arm$v_create;#define arm$v_lock arm$r_fill_51_.arm$r_fill_52_.arm$v_lockC#define arm$v_physical arm$r_fill_53_.arm$r_fill_54_.arm$v_physicalA#define arm$v_logical arm$r_fill_53_.arm$r_fill_54_.arm$v_logicalE#define arm$v_associate arm$r_fill_55_.arm$r_fill_56_.arm$Qv_associate?#define arm$v_submit arm$r_fill_57_.arm$r_fill_58_.arm$v_submit?#define arm$v_manage arm$r_fill_57_.arm$r_fill_58_.arm$v_manage"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __ Rstandard #endif /* __ARMDEF_LOADED */ ww;n/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $ATRDEF ***/ S#ifndef __ATRDEF_LOADED#define __ATRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 Textern "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 P/* ATTRIBUTE LIST DESCRIPTION. THE ATTRIBUTE CONTROL LIST IS USED TO READ AND */Q/* WRITE FILE ATTRUIBUTES. IT CONSISTS OF CONCATENATED ATTRIBUTE CONTROL BLOCKS */N/* TERMINATED BY A SINGLE ZERO LONGWORD. */N/* */O#define ATR$C_UCHAR 3 /* 4 BYTE USER FILE CHARACTERISTICS */N#define ATR$C_RECATTR 4 /* 32 BYTES RECORD ATTRIBUTES */N#define ATR$C_FILNAM 5 /* 6 BYTE RAD-50 FILE NAME */N#define ATR$C_FILTYP 6 V /* 2 BYTE RAD-50 FILE TYPE */N#define ATR$C_FILVER 7 /* 2 BYTE BINARY FILE VERSION */N#define ATR$C_EXPDAT 8 /* 7 BYTE ASCII EXPIRATION DATE */N#define ATR$C_STATBLK 9 /* 32 BYTE STATISTICS BLOCK */N#define ATR$C_HEADER 10 /* 512 BYTE FILE HEADER */N#define ATR$C_BLOCKSIZE 11 /* MAGTAPE BLOCK SIZE */N#define ATR$C_USERLABEL 12 /* USER FILE LABEL W */T#define ATR$C_ASCDATES 13 /* REVISION COUNT THRU EXP DATE IN ASCII */Q#define ATR$C_ALCONTROL 14 /* COMPATIBILITY MODE ALLOCATION DATA */k#define ATR$C_ENDLBLAST 15 /* END OF MAGTAPE LABEL PROCESSING AND SUPPLY AST CONTROL BLOCK */Q#define ATR$C_ASCNAME 16 /* FILE NAME, TYPE & VERSION IN ASCII */N#define ATR$C_CREDATE 17 /* 64 BIT CREATION DATE */N#define ATR$C_REVDATE 18 /* 64 XBIT REVISION DATE */N#define ATR$C_EXPDATE 19 /* 64 BIT EXPIRATION DATE */N#define ATR$C_BAKDATE 20 /* 64 BIT BACKUP DATE */N#define ATR$C_UIC 21 /* 4 BYTE FILE OWNER UIC */N#define ATR$C_FPRO 22 /* 2 BYTE FILE PROTECTION */N#define ATR$C_RPRO 23 /* 2 BYTE RECORD PROTECTION */N#define ATR$C_ACLEVEL 24 /* 1 BYTE FILE ACCESS LEVEL Y */N#define ATR$C_SEMASK 25 /* FILE SECURITY MASK AND LIMIT */N#define ATR$C_UIC_RO 26 /* READ ONLY UIC */N#define ATR$C_DIRSEQ 27 /* DIRECTORY UPDATE SEQUENCE COUNT */N#define ATR$C_BACKLINK 28 /* FILE BACK LINK POINTER */N#define ATR$C_JOURNAL 29 /* JOURNAL CONTROL FLAGS */O#define ATR$C_HDR1_ACC 30 /* ANSI TAPE HEADER 1 ACCESSIBILITY */N/* CHARACTER Z */N#define ATR$C_ADDACLENT 31 /* ADD AN ACCESS CONTROL ENTRY */N#define ATR$C_DELACLENT 32 /* REMOVE AN ACCESS CONTROL ENTRY */N#define ATR$C_MODACLENT 33 /* MODIFY AN ACL ENTRY */N#define ATR$C_FNDACLENT 34 /* LOCATE AN ACL ENTRY */N#define ATR$C_FNDACLTYP 35 /* FIND A SPECIFIC TYPE OF ACE */N#define ATR$C_DELETEACL 36 /*[ DELETE ACL LEAVING PROTECTED */N#define ATR$C_READACL 37 /* READ THE ENTIRE ACL */N#define ATR$C_ACLLENGTH 38 /* RETURN THE LENGTH OF THE ACL */N#define ATR$C_READACE 39 /* READ A SINGLE ACE */N#define ATR$C_RESERVED 40 /* MODIFY RESERVED AREA */Q#define ATR$C_HIGHWATER 41 /* HIGHWATER MARK (USER READ ONLY) */N#define ATR$C_DUMMY_0 42 /* *** AVAILABLE CODE \ */N#define ATR$C_PRIVS_USED 43 /* PRIVILEGES USED TO GAIN ACCESS */N#define ATR$C_MATCHING_ACE 44 /* ACE USED TO GAIN ACCESS (IF ANY) */]#define ATR$C_ACCESS_MODE 45 /* ACCESS MODE FOR FOLLOWING ATTRIBUTE DESCRIPTORS */N#define ATR$C_FILE_SPEC 46 /* CONVERT FID TO FILE-SPEC */S#define ATR$C_CLASS_MASK 47 /* Non-discretionary classification mask */m#define ATR$C_BUFFER_OFFSET 48 /* For magnetic tape only le]ngth of buffer offset of block in file */i#define ATR$C_RU_ACTIVE 49 /* Recoverable facility id number (if non-zero, means file has */N/* active recovery units managed by that facility) */N#define ATR$C_GRANT_ACE 50 /* ACE granting access */N#define ATR$C_NEXT_ACE 51 /* Increment ACE number */N#define ATR$C_DELETE_ALL 52 /* Delete the entire ACL */W#define ATR$C_BACKUP_DONE 53 ^ /* Alter backup info in RMS journaling ACEs */N/* ISO 9660 Descriptors */N#define ATR$C_EFFDATE 54 /* ISO 9660 Backup Date */N#define ATR$C_RCDDATE 55 /* ISO 9660 Recorded Date */K#define ATR$C_VD 56 /* Volume Descriptor */K#define ATR$C_PVD 57 /* Primary Volume Descriptor */N#define ATR$C_SVD 58 /* Supplementa_ry Volume Descriptor */M#define ATR$C_VPD 59 /* Volume Partition Descriptor */O#define ATR$C_VDST 60 /* Volume Descriptor Set Terminator */M#define ATR$C_BOOT 61 /* Boot Record */K#define ATR$C_PTR 62 /* Path Table Record */J#define ATR$C_DIR 63 /* Directory Record */K#define ATR$C_XAR 64 /* Extended Attribute Record */N/* ISO` 9660 Descriptors Fields */N#define ATR$C_VOLUME_ID 65 /* Volume Identifier */N#define ATR$C_VOLUME_FLAGS 66 /* Volume Flags */N#define ATR$C_ESCAPE_SEQUENCES 67 /* Escape Sequences */N#define ATR$C_VOLUME_SET_ID 68 /* Volume Set Identifier */N#define ATR$C_COPYRIGHT_FID 69 /* Copyright File Identifier */N#define ATR$C_ABSTRACT_FID 70 a /* Abstract File Identifier */N#define ATR$C_BIBLIOGRAPHIC_FID 71 /* Bibliographic File Identifier */N#define ATR$C_CACHE_SEQ 72 /* Cache sequence number */N#define ATR$C_FILE_SYSTEM_INFO 73 /* File system structure level */N#define ATR$C_FILE_ATTR_CACHING_POLICY 74 /* F64 caching only */N#define ATR$C_FILE_DATA_CACHING_POLICY 75 /* F64 caching only */N#define ATR$C_CACHING_OPTIONS 76 /* Spiralog/VDC cabching options */N#define ATR$C_POSIX_DATA 77 /* POSIX private data area */N#define ATR$C_ACCDATE 78 /* ODS-5 last access time */N#define ATR$C_ATTDATE 79 /* ODS-5 last attribute mod time */N#define ATR$C_LENGTH_HINT 80 /* ODS-5 file length hint area */V#define ATR$C_EX_RECATTR 81 /* ODS-5 extended RMS attributes - Reserved */N/* to Digital for future use. Must be zero. c*/N#define ATR$C_EXTFLAGS 82 /* PATHWORKS MS-DOS flags */N#define ATR$C_MODDATE 83 /* ODS-5 last data mod time */N#define ATR$C_LINKCOUNT 84 /* ODS-5 (hard) link count */N#define ATR$C_SYMLINK 85 /* ODS-5 symlink data */N/* All new attributes should be */N/* added here before MAX_PLUS1 */N#define ATR$C_MAX_PLUS d1 86 /* Maximum code plus one */#define ATR$C_MAX_CODE 85#define ATR$C_FNDACETYP 35N/* Valid values for ATR$C_CACHING_POLICY */&#define ATR$C_CACHE_POLICY_WRITETHRU 1&#define ATR$C_CACHE_POLICY_WRITEBACK 2$#define ATR$C_CACHE_POLICY_DEFAULT 3N/* ATTRIBUTE MAXIMUM LENGTHS */O#define ATR$S_UCHAR 4 /* 4 BYTE USER FILE CHARACTERISTICS */N#define ATR$S_RECATTR 32 e /* 32 BYTES RECORD ATTRIBUTES */N#define ATR$S_FILNAM 6 /* 6 BYTE RAD-50 FILE NAME */N#define ATR$S_FILTYP 2 /* 2 BYTE RAD-50 FILE TYPE */N#define ATR$S_FILVER 2 /* 2 BYTE BINARY FILE VERSION */N#define ATR$S_EXPDAT 7 /* 7 BYTE ASCII EXPIRATION DATE */N#define ATR$S_STATBLK 32 /* 32 BYTE STATISTICS BLOCK */N#define ATR$S_HEADER 512 /* 512 BYTE FILE HfEADER */N#define ATR$S_BLOCKSIZE 2 /* MAGTAPE BLOCK SIZE */N#define ATR$S_USERLABEL 80 /* USER FILE LABEL */T#define ATR$S_ASCDATES 35 /* REVISION COUNT THRU EXP DATE IN ASCII */Q#define ATR$S_ALCONTROL 14 /* COMPATIBILITY MODE ALLOCATION DATA */k#define ATR$S_ENDLBLAST 4 /* END OF MAGTAPE LABEL PROCESSING AND SUPPLY AST CONTROL BLOCK */N#define ATR$S_ASCNAME 252 /* FgILE NAME, TYPE & VERSION */N#define ATR$S_CREDATE 8 /* 64 BIT CREATION DATE */N#define ATR$S_REVDATE 8 /* 64 BIT REVISION DATE */N#define ATR$S_EXPDATE 8 /* 64 BIT EXPIRATION DATE */N#define ATR$S_BAKDATE 8 /* 64 BIT BACKUP DATE */N#define ATR$S_UIC 4 /* 4 BYTE FILE OWNER UIC */N#define ATR$S_FPRO 2 /* 2 BYTE FILE PROTECTION h */N#define ATR$S_RPRO 2 /* 2 BYTE RECORD PROTECTION */N#define ATR$S_ACLEVEL 1 /* 1 BYTE FILE ACCESS LEVEL */N#define ATR$S_SEMASK 8 /* FILE SECURITY MASK AND LIMIT */N#define ATR$S_UIC_RO 4 /* READ ONLY UIC */N#define ATR$S_DIRSEQ 2 /* DIRECTORY UPDATE SEQUENCE COUNT */N#define ATR$S_BACKLINK 6 /* FILE BACK LINK POINTER */N#define ATR$S_JOiURNAL 1 /* JOURNAL CONTROL FLAGS */O#define ATR$S_HDR1_ACC 1 /* ANSI TAPE HEADER 1 ACCESSIBILITY */N/* CHARACTER */N#define ATR$S_ADDACLENT 255 /* ADD AN ACCESS CONTROL ENTRY */N#define ATR$S_DELACLENT 255 /* REMOVE AN ACCESS CONTROL ENTRY */N#define ATR$S_MODACLENT 255 /* MODIFY AN ACL ENTRY */N#define ATR$S_FNDACLENT 255 j/* LOCATE AN ACL ENTRY */N#define ATR$S_FNDACLTYP 255 /* FIND A SPECIFIC TYPE OF ACE */N#define ATR$S_FNDACETYP 255 /* FIND A SPECIFIC TYPE OF ACE */N#define ATR$S_DELETEACL 255 /* DELETE ACL LEAVING PROTECTED */N#define ATR$S_READACL 512 /* READ THE ENTIRE ACL */N#define ATR$S_ACLLENGTH 4 /* RETURN THE LENGTH OF THE ACL */N#define ATR$S_READACE 255 /* READ A SINGLE ACE k */N#define ATR$S_RESERVED 380 /* MODIFY RESERVED AREA */W#define ATR$S_HIGHWATER 4 /* FILE HIGH WATER MARK (USER READ ONLY) */N#define ATR$S_DUMMY_0 4 /* *** AVAILABLE CODE */N#define ATR$S_PRIVS_USED 4 /* PRIVS USED TO GAIN ACCESS */N#define ATR$S_MATCHING_ACE 255 /* ACE USED TO GAIN ACCESS */]#define ATR$S_ACCESS_MODE 1 /* ACCESS MODE FOR FOLLOWING ATTRIBUTE DESlCRIPTORS */N#define ATR$S_FILE_SPEC 4098 /* CONVERT FID TO FILE-SPEC */S#define ATR$S_CLASS_MASK 20 /* Non-discretionary classification mask */N#define ATR$S_BUFFER_OFFSET 2 /* Buffer offset length field */S#define ATR$S_RU_ACTIVE 1 /* Recoverable facility id if RUs active */N#define ATR$S_GRANT_ACE 255 /* ACE granting access */N#define ATR$S_NEXT_ACE 4 /* Increment ACE number */Nm#define ATR$S_DELETE_ALL 255 /* Delete the entire ACL */V#define ATR$S_BACKUP_DONE 1 /* Alter backup info in RMS journaling ACEs */N/* ISO 9660 Descriptors */N#define ATR$S_EFFDATE 8 /* 64 BIT EFFECTIVE DATE */N#define ATR$S_RCDDATE 8 /* 64 BIT RECORDED DATE */K#define ATR$S_VD 7 /* Volume Descriptor */K#define ATR$S_PVD 13n95 /* Primary Volume Descriptor */N#define ATR$S_SVD 1395 /* Supplementary Volume Descriptor */M#define ATR$S_VPD 88 /* Volume Partition Descriptor */O#define ATR$S_VDST 7 /* Volume Descriptor Set Terminator */M#define ATR$S_BOOT 71 /* Boot Record */K#define ATR$S_PTR 45 /* Path Table Record */J#define ATR$S_DIR 512 /* Direcotory Record */K#define ATR$S_XAR 512 /* Extended Attribute Record */N/* ISO 9660 Descriptors Fields */N#define ATR$S_VOLUME_ID 32 /* Volume Identifier */N#define ATR$S_VOLUME_FLAGS 1 /* Volume Flags */N#define ATR$S_ESCAPE_SEQUENCES 32 /* Escape Sequences */N#define ATR$S_VOLUME_SET_ID 128 /* Volume Set Identifier */Np#define ATR$S_COPYRIGHT_FID 37 /* Copyright File Identifier */N#define ATR$S_ABSTRACT_FID 37 /* Abstract File Identifier */N#define ATR$S_BIBLIOGRAPHIC_FID 37 /* Bibliographic File Identifier */N#define ATR$S_CACHE_SEQ 8 /* Cache sequence number */N#define ATR$S_FILE_SYSTEM_INFO 2 /* file system structure level */N#define ATR$S_FILE_ATTR_CACHING_POLICY 1 /* F64 caching only */N#define ATR$S_FILE_DATA_CAqCHING_POLICY 1 /* F64 caching only */N#define ATR$S_POSIX_DATA 64 /* F64 caching only */N#define ATR$S_CACHING_OPTIONS 4 /* Spiralog/VDC caching options */N#define ATR$S_ACCDATE 8 /* ODS-5 last access time */N#define ATR$S_ATTDATE 8 /* ODS-5 last attribute mod time */N#define ATR$S_LENGTH_HINT 16 /* ODS-5 file length hint area */N#define ATR$S_EX_RECATTR 8 /* ODS-5 ext rended RMS attributes */N#define ATR$S_EXTFLAGS 2 /* PATHWORKS MS-DOS flags */N#define ATR$S_LINKCOUNT 2 /* ODS-5 (hard) link count */N#define ATR$S_MODDATE 8 /* ODS-5 last data mod time */N#define ATR$S_SYMLINK 1024 /* ODS-5 symlink data */ #ifdef __NEW_STARLETtypedef struct _atrdef {N unsigned short int atr$w_size; /* SIZE OF ATTRIBUTE IN BYTES */N unsigned short int atr s$w_type; /* ATTRIBUTE TYPE CODE */N void *atr$l_addr; /* ADDRESS OF ATTRIBUTE TEXT */N/* ATTRIBUTE CODES */ } ATRDEF;#else /* __OLD_STARLET */struct atrdef {N unsigned short int atr$w_size; /* SIZE OF ATTRIBUTE IN BYTES */N unsigned short int atr$w_type; /* ATTRIBUTE TYPE CODE */N void *atr$l_addr; /* ADDRESS OF ATTRIBUTE TE tXT */N/* ATTRIBUTE CODES */ } ;%#endif /* #ifdef __NEW_STARLET */N/* Define fields and constant values for ATR$_CACHING_OPTIONS longword. */N/* These must match [STARLET]FIBDEF.SDL exactly */!#define ATR$M_FILE_ATTRIBUTES 0xF #define ATR$M_FILE_CONTENTS 0xF0#define ATR$C_DEFAULT 0#define ATR$C_WRITETHROUGH 1#define ATR$C_WRITEBEHIND 2#define ATR$C_NOCACHING 3"#define ATR$M_FLUSuH_ON_CLOSE 0xF00#define ATR$C_FLUSH 1#define ATR$C_NOFLUSH 2,#define ATR$M_CACHING_OPTIONS_MBZ 0xFFFFF000 #ifdef __NEW_STARLET+typedef struct _atr_caching_options_flags {' unsigned atr$v_file_attributes : 4;% unsigned atr$v_file_contents : 4;& unsigned atr$v_flush_on_close : 4;, unsigned atr$v_caching_options_mbz : 20; } ATR_CACHING_OPTIONS_FLAGS;#else /* __OLD_STARLET */"struct atr_caching_options_flags {' unsigned atr$v_file_attributes : 4;% unsivgned atr$v_file_contents : 4;& unsigned atr$v_flush_on_close : 4;, unsigned atr$v_caching_options_mbz : 20; } ;%#endif /* #ifdef __NEW_STARLET */N/* Define fields and constant values for ATR$_FILESYSTEM_INFO word. */N/* These must match [LIB]F11DEF.SDL exactly */#define ATR$C_ODS1 1#define ATR$C_ODS2 2#define ATR$C_ODS64 64 #ifdef __NEW_STARLET,typedef struct _atr_filesystem_info_fields {! unsigned char atr$b_strucver;! w unsigned char atr$b_struclev;! } ATR_FILESYSTEM_INFO_FIELDS;#else /* __OLD_STARLET */#struct atr_filesystem_info_fields {! unsigned char atr$b_strucver;! unsigned char atr$b_struclev; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __c xplusplus }#endif#pragma __standard #endif /* __ATRDEF_LOADED */ ww1/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]BASMSG.SDI;1 *//***************************************************************************************************************************** y***//*** MODULE $BASDEF ***/#ifndef __BASDEF_LOADED#define __BASDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 */#endzif #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 N/* { */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:38.97 */N/* */Q/***************************************************************************** *//** * */,/** COPYRIGHT 1978, 2004 BY * */C/** COMPAQ COMPUTER CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LI|CENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NO }TICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/* ~ */N/*++ */K/* FACILITY: DEC BASIC RUN TIME LIBRARY */N/* */N/* ABSTRACT: */N/* */I/* THIS FILE, BASMSG.MSG, CONTAINS THE DEFINITIONS OF THE BASIC */I/* MESSAGES FOR VAX/VMS. THIS FILE IS READ BY THE MESSAGE COMPILER */I/* TO BUILD AN OBJECT FILE CONTAINING THE BASIC MESSAGES. */N/* */N/* ENVIRONMENT: USER MODE - AST REENTRANT */N/* */N/* AUTHOR: RTL DEVELOPMENT, CREATION DATE: 06-MAY-1983 */N/*  */N/* MODIFIED BY: */N/* */N/* NOTE #1: */B/* CHANGES TO THE THIS FILE, IF THEY INVOLVE THE FIRST 300 */B/* MESSAGES DEFINED HERE REQUIRE A CHANGE TO THE */B/* BASRTL_BASMSGNUM.SDL FILE. */B/* THE FIRST 300 MESSAGES HAVE BASIC ERROR NUMBERS ASSOCIATED */B/* WITH THEM. */N/* */N/* NOTE #2: */I/* RUN-TIME RTL CODE WILL "create" A MESSAGE CODE STARTING WITH THE */I/* BASIC MESSAGE NUMBER (BAS$K_XXXX) AND FILLING IN THE STATUS CODE */I/* FIELDS WITH THE BASIC FACILITY NUMBER AND FACILITY SPECIFIC BIT. */N/*  */I/* THIS SCHEME OF BUILDING CONDITION VALUES WORKS FOR ALL MESSAGES UP */I/* THROUGH BAS$K_MAX_ERR (CURRENTLY 300). */N/* */K/* THIS ALLOWS THE RTL TO MAP BASIC ERROR NUMBERS TO VMS CONDITION CODES */I/* (AND VMS CONDITION CODES BACK TO BASIC ERROR NUMBERS). */N/*  */J/* IF A SEVERITY OF A MESSAGE IS CHANGED, THE TABLE IN BASRTL_ERR_MISC */I/* MUST BE UPDATED. */N/* */I/* THERE IS NO WAY TO RELATE THE SEVERITY OF A BASIC MESSAGE TO THE */I/* SEVERITY OF THE CORRISPONDING VMS CONDITION AT RUN TIME SINCE WE */J/* "build" THE VMS CONDITION FROM THE BAS$K_XXXXX BASIC MESSAGE NUMBER. */N/*  */N/* NOTE #3: */I/* THIS FILE LIVES IN THE STARLET FACILITY FOR EVMS BUILDS. THE EVMS */I/* BUILD FOR DEC$BASRTL NEEDS TO CPYSHRLIB BASMSG BEFORE USING IT. */B/* */G/* 1-001 - ORIGINAL. BLS 6-MAY-1983 */N/* 1-002 - CHANGE FACILITY TO BASIC INSTEAD OF BAS. LEB 2-JUN-1983  */N/* 1-003 - NOPE, FACILITY SHOULD HAVE BEEN BAS ALL ALONG. MDL 30-JUN-1983 */\/* 1-004 - CHANGE TEXT OF ERROR 178 AND NAME FROM ERRFILCOR TO EXRMSSHR. MDL 29-AUG-1983 */N/* 1-005 - CHANGE SEVERITY OF PRIUSIFOR. KC 11-JAN-1985. */N/* 1-006 - ADD ILLNETOPE AND ILLTFFOPE. KC 11-JAN-1985. */]/* 1-007 - ADD FORLINPIC (FROM LINE !SL IN PICTURE !AC) AS A TRACEBACK ERROR FOR PICTURES. */I/* KC 15-JAN-1985.  */N/* 1-008 - ADD ILLWAIVAL AND DEADLOCK. KC 23-JUL-1985. */N/* 1-009 - ADD ORIERRWAS AND NOTBASIC. KC 01-SEP-1985. */N/* 1-010 - ADD NEW UNUSED ERRORS SO THERE WILL ROOM TO ADD GRAPHICS ERRORS. */I/* KC 10-SEP-1985 */N/* 1-011 - ADD ECHTYPNOT. KC 18-NOV-1985. */N/* 1-012 - ADD INVTRANUM, ILLPICOPE, ILLCLISTA, TRANOTDIF. KC 26-NOV-1985. */Q/* 1-013 - CHANGE GKSNOTINS TO A SEVERE MESSAGE (FROM FATAL). KC 05-DEC-1985. */N/* 1-014 - ADD COLNOTCON. KC 10-DEC-1985. */N/* 1-015 - ADD MOST GRAPHICS MESSAGES. KC 19-DEC-1985. */O/* 1-016 - NUMBER 271 IS NOT USED. CHANGE WORDING OF 260. KC 08-JAN-1986. */N/* 1-017 - CHANGE "VAX GKS/0b" TO "VAX GKS". KC 09-JAN-1986. */N/* 1-018 - CHANGE TYPO IN DEVNOTOPE. KC 13-JAN-1986. */N/* 1-019 - CHANGE TEXT OF KEYBOARD WAIT EXHAUSTED TO "wait exhausted". */I/* KC 17-FEB-1986. */N/* 1-020 - ADD REMSTRNOT, REMAP'ED STRING NOT STATIC. KC 20-FEB-1986. */N/* 1-021 - PAD ALL THE UNUSED MESSAGES WITH SPACES SO WE CAN PATCH */I/* THEM EASILY FOR V4.5. KC 28-FEB-1986. */N/* 1-022 - ADD NEW GRAPHICS ERROR MESSAGES FOR V4.5. KC 16-APR-1986. */N/* 1-023 - ADD ILLCNTCLA. KC 15-MAY-1986. */N/* 1-024 - ADD ARRTOOSMA, ARRAY TOO SMALL. KC 20-MAY-1986. */N/* 1-025 - CHANGE TEXT OF FROLINOEG. ADD ILLCOLMIX. KC 16-JUN-1986. */N/* 1-026 - ADD ILLDEVNAM. KC 24-JUN-1986. */N/* 1-027 - ADD MESSAGES FOR PROGRAMS W/O LINE NUMBERS. DJM 14-AUG-1986. */N/* 1-028 - CHANGE TEXT FOR PROLOSSOR, ADD LOCPOICAN. DJM 17-SEP-1987. */3/* V03-001 BRIAN J. MCCARTHY 19-MAY-1993 */I/* ADD COMMENTS TO BETTER DESCRIBE HOW THE BASIC  ERROR NUMBERS */I/* AND VMS BASIC CONDITION VALUES. */3/* V03-002 BRIAN J. MCCARTHY 15-JUL-1993 */I/* - ADD NEW MESSAGE FOR GOSUB IN PROGRAMS WITH LINE NUMBERS. */I/* - CHANGE ALL VAX TEXT TO DEC */3/* V03-003 BRIAN J. MCCARTHY 02-SEP-1993 */I/* - CHANGE TITLE TO CONFORM WITH OTHER RTL'S */3/* V03-004 BRIAN J. MCCARTHY 16-SEP-1993 */I/* - UPDATE COMMENTS. */-/* V03-005 KARL PUDER 24-FEB-2000 */I/* - CHANGE DEC BASIC TO ALPHA BASIC IN PROLOSSOR */-/* V03-006 KARL PUDER 17-SEP-2004 */I/* - CHANGE ALPHA BASIC TO BASIC IN PROLOSSOR */N/* */N/*-- */N/*  */N/* BAS FACILITY IS BEING USED FOR DEC$BASRTL FOR UPWARD COMPATABILITY */N/* */N#define BAS$_FACILITY 26 /* */N/* NOTE THAT IF ANYTHING IS CHANGED BETWEEN THIS .BASE 0 STATEMENT AND */N/* THE NEXT .BASE STATEMENT, THE MODULES BASRTL_BASMSGNUM.SDL AND */N/* BASRTL_ERR_MISC.C MUST BE CHECKED TO SEE IF THEY NEED TO UPDATED ALSO. */N/* */N/* THE MESSAGES BETWEEN THE TWO .BASE DIRECTIVES HAVE BASIC MESSAGE NUMBERS */Q/* ASSOCIATED WITH THEM AND THAT MUST BE REFLECTED IN THE BASRTL_BASMSGNUM.SDL */N/* AND BASRTL_ERR_MISC.C MODULES. */N/* */#define BAS$_VAXBAS 1736707#define BAS$_BADDIRDEV 1736714#define BAS$_ILLFILNAM 1736722#define BAS$_ACCDEVUSE 1736730#define BAS$_NO_ROOUSE 1736738#define BAS$_CANFINFIL 1736746#define BAS$_NOTVALDEV 1736754#define BAS$_IO_CHAALR 1736762#define BAS$_DEVNOTAVA 1736770#define BAS$_IO_CHANOT 1736778#define BAS$_PROVIO 1736786#define BAS$_ENDFILDEV 1736794#define BAS$_FATSYSIO_ 1736802#define BAS$_USEDATERR 1736810#define BAS$_DEVHUNWRI 1736818#define BAS$_KEYWAIEXH 1736826#define BAS$_NAMACCNOW 1736834#define BAS$_TOOMANOPE 1736842#define BAS$_ILLSYSUSA 1736850#define BAS$_DISBLOINT 1736858#define BAS$_PACIDSDON 1736866#define BAS$_DISPACNOT 1736874#define BAS$_DISPACLOC 1736882#define BAS$_ILLCLUSIZ 1736890#define BAS$_DISPACPRI 1736898#define BAS$_DISPACNEE 1736906#define BAS$_FATDISPAC 1736914#define BAS$_IO_TO_DET 1736922#define BAS$_PROC__TRA 1736930#define BAS$_CORFILSTR 1736938#define BAS$_DEVNOTFIL 1736946#define BAS$_ILLBYTCOU 1736954#define BAS$_NO_BUFSPA 1736962#define BAS$_ODDADDTRA 1736970#define BAS$_RESINSTRA 1736980#define BAS$_MEMMANVIO 1736988#define BAS$_SP_STAOVE 1736996#define BAS$_DISERRDUR 1737004#define BAS$_MEMPARFAI 1737012#define BAS$_MAGSELERR 1737018#define BAS$_MAGRECLEN 1737026#define BAS$_NONRESRUN 1737034#define BAS$_VIRBUFTOO 1737042#define BAS$_VIRARRDIS 1737050#define BAS$_MATARRTOO 1737058#define BAS$_VIRARROPE 1737066#define BAS$_ILLIO_CHA 1737074#define BAS$_LINTOOLON 1737082#define BAS$_FLOPOIERR 1737090#define BAS$_ARGTOOLAR 1737098#define BAS$_DATFORERR 1737104#define BAS$_INTERR 1737114#define BAS$_ILLNUM 1737122#define BAS$_ILLARGLOG 1737130#define BAS$_IMASQUROO 1737138#define BAS$_SUBOUTRAN 1737146#define BAS$_CANINVMAT 1737154#define BAS$_OUTOF_DAT 1737162#define BAS$_ON_STAOUT 1737170#define BAS$_NOTENODAT 1737178#define BAS$_INTOVEFOR 1737186#define BAS$_DIVBY_ZER 1737194#define BAS$_NO_RUNSYS 1737202#define BAS$_FIEOVEBUF 1737210#define BAS$_NOTRANACC 1737218#define BAS$_ILLMAGUSA 1737226#define BAS$_MISSPEFEA 1737234#define BAS$_ILLSWIUSA 1737242#define BAS$_UNUERR068 1737252#define BAS$_UNUERR069 1737260#define BAS$_UNUERR070 1737268#define BAS$_STANOTFOU 1737276#define BAS$_RETWITGOS 1737284#define BAS$_FNEWITFUN 1737292#define BAS$_UNDFUNCAL 1737300#define BAS$_ILLSYM 1737308#define BAS$_ILLVER 1737316#define BAS$_ILLEXP 1737324#define BAS$_ILLMODMIX 1737332#define BAS$_ILLIF_STA 1737340#define BAS$_ILLCONCLA 1737348#define BAS$_ILLFUNNAM 1737356#define BAS$_ILLDUMVAR 1737364#define BAS$_ILLFN_RED 1737372#define BAS$_ILLLINNUM 1737380#define BAS$_MODERR 1737388#define BAS$_CANCOMSTA 1737394#define BAS$_EXPTOOCOM 1737404#define BAS$_ARGDONMAT 1737412#define BAS$_TOOMANARG 1737420#define BAS$_INCFUNUSA 1737424#define BAS$_ILLDEFNES 1737436#define BAS$_FORWITNEX 1737444#define BAS$_NEXWITFOR 1737452#define BAS$_DEFWITFNE 1737460#define BAS$_FNEWITDEF 1737468#define BAS$_LITSTRNEE 1737476#define BAS$_TOOFEWARG 1737484#define BAS$_SYNERR 1737492#define BAS$_STRIS_NEE 1737500#define BAS$_NUMIS_NEE 1737508#define BAS$_DATTYPERR 1737516#define BAS$_ONEOR_TWO 1737524#define BAS$_PROLOSSOR 1737532#define BAS$_RESNO_ERR 1737540#define BAS$_REDARR 1737546#define BAS$_INCSUBUSE 1737552#define BAS$_ON_STANEE 1737564#define BAS$_ENDOF_STA 1737572#define BAS$_WHA 1737579#define BAS$_BADLINNUM 1737588#define BAS$_NOTENOAVA 1737596#define BAS$_EXEONLFIL 1737604#define BAS$_PLEUSERUN 1737612#define BAS$_CANCON 1737620#define BAS$_FILEXIREN 1737628#define BAS$_PRIUSIFOR 1737634#define BAS$_MATARRWIT 1737644#define BAS$_BADNUMPRI 1737652#define BAS$_ILLIN_IMM 1737660#define BAS$_PRIUSIBUF 1737668#define BAS$_ILLSTA 1737676#define BAS$_ILLFIEVAR 1737684#define BAS$_STO 1737691#define BAS$_MATDIMERR 1737700#define BAS$_WROMATPAC 1737708#define BAS$_MAXMEMEXC 1737716#define BAS$_SCAFACINT 1737724#define BAS$_TAPRECNOT 1737730#define BAS$_TAPBOTDET 1737738#define BAS$_KEYNOTCHA 1737746#define BAS$_NO_CURREC 1737754#define BAS$_RECHASBEE 1737762#define BAS$_ILLUSADEV 1737770#define BAS$_DUPKEYDET 1737778#define BAS$_ILLUSA 1737786#define BAS$_ILLILLACC 1737794#define BAS$_ILLKEYATT 1737802#define BAS$_FILIS_LOC 1737810#define BAS$_INVFILOPT 1737818#define BAS$_INDNOTINI 1737826#define BAS$_ILLOPE 1737834#define BAS$_ILLRECFIL 1737842#define BAS$_BADRECIDE 1737850#define BAS$_INVKEYREF 1737858#define BAS$_KEYSIZTOO 1737866#define BAS$_TAPNOTANS 1737874#define BAS$_RECNUMEXC 1737882#define BAS$_BADRECVAL 1737890#define BAS$_NOTENDFIL 1737898#define BAS$_NO_PRIKEY 1737906#define BAS$_KEYFIEBEY 1737914#define BAS$_ILLRECACC 1737922#define BAS$_RECALREXI 1737930#define BAS$_RECBUCLOC 1737938#define BAS$_RECNOTFOU 1737946#define BAS$_SIZRECINV 1737954#define BAS$_RECFILTOO 1737962#define BAS$_PRIKEYOUT 1737970#define BAS$_KEYLARTHA 1737978#define BAS$_FILATTNOT 1737986#define BAS$_MOVOVEBUF 1737994#define BAS$_CANOPEFIL 1738002#define BAS$_NO_FILNAM 1738010#define BAS$_TERFORFIL 1738018#define BAS$_CANPOSEOF 1738026#define BAS$_NEGFILSTR 1738034#define BAS$_ILLRECFOR 1738042#define BAS$_ILLALLCLA 1738050#define BAS$_UNUERR169 1738060#define BAS$_INDNOTFUL 1738066#define BAS$_RRVNOTFUL 1738074#define BAS$_RECLOCFAI 1738082#define BAS$_INVRFAFIE 1738090#define BAS$_FILEXPDAT 1738098#define BAS$_NODNAMERR 1738106#define BAS$_NEGZERTAB 1738112#define BAS$_TOOMUCDAT 1738120#define BAS$_EXRMSSHR 1738130#define BAS$_UNEFILDAT 1738138#define BAS$_NOSUPFOR 1738146#define BAS$_DECERR 1738154#define BAS$_NETOPEREJ 1738162#define BAS$_REMOVEBUF 1738170#define BAS$_UNAREMVAR 1738180#define BAS$_RECOVEMAP 1738188#define BAS$_IMPERRHAN 1738196#define BAS$_ILLRECLOC 1738204#define BAS$_REQRECSIZ 1738210#define BAS$_TOOLITDAT 1738216#define BAS$_ILLNETOPE 1738226#define BAS$_ILLTFFOPE 1738234#define BAS$_ILLWAIVAL 1738242#define BAS$_DEADLOCK 1738250#define BAS$_NOTBASIC 1738258#define BAS$_DIMOUTRAN 1738266#define BAS$_REMSTRNOT 1738276#define BAS$_ARRTOOSMA 1738282#define BAS$_UNUERR198 1738292#define BAS$_UNUERR199 1738300#define BAS$_UNUERR200 1738308#define BAS$_UNUERR201 1738316#define BAS$_UNUERR202 1738324#define BAS$_UNUERR203 1738332#define BAS$_UNUERR204 1738340#define BAS$_UNUERR205 1738348#define BAS$_UNUERR206 1738356#define BAS$_UNUERR207 1738364#define BAS$_UNUERR208 1738372#define BAS$_UNUERR209 1738380#define BAS$_UNUERR210 1738388#define BAS$_UNUERR211 1738396#define BAS$_UNUERR212 1738404#define BAS$_UNUERR213 1738412#define BAS$_UNUERR214 1738420#define BAS$_UNUERR215 1738428#define BAS$_UNUERR216 1738436#define BAS$_UNUERR217 1738444#define BAS$_UNUERR218 1738452#define BAS$_UNUERR219 1738460#define BAS$_UNUERR220 1738468#define BAS$_UNUERR221 1738476#define BAS$_UNUERR222 1738484#define BAS$_UNUERR223 1738492#define BAS$_UNUERR224 1738500#define BAS$_UNUERR225 1738508#define BAS$_GKSNOTINS 1738514#define BAS$_STRTOOLON 1738522#define BAS$_RECATTNOT 1738530#define BAS$_DIFUSELON 1738540#define BAS$_NO_FIEIMA 1738546#define BAS$_ILLSTRIMA 1738554#define BAS$_NULIMA 1738562#define BAS$_ILLNUMIMA 1738570#define BAS$_NUMIMASTR 1738578#define BAS$_STRIMANUM 1738586#define BAS$_TIMLIMEXC 1738594#define BAS$_FIRARGSEQ 1738602#define BAS$_ARRMUSSAM 1738610#define BAS$_ARRMUSSQU 1738618#define BAS$_CANCHAARR 1738626#define BAS$_FLOOVE 1738634#define BAS$_FLOUND 1738642#define BAS$_CHATO_NON 1738650#define BAS$_EXPERR 1738658#define BAS$_ILLEXIDEF 1738668#define BAS$_ERRTRANEE 1738676#define BAS$_ILLRESSUB 1738684#define BAS$_ILLRETSUB 1738690#define BAS$_ARGOUTBOU 1738698#define BAS$_NOTIMP 1738706#define BAS$_RECSUBCAL 1738714#define BAS$_FILACPFAI 1738722#define BAS$_DIRERR 1738730#define BAS$_UNUERR254 1738740#define BAS$_UNUERR255 1738748#define BAS$_ECHTYPNOT 1738754#define BAS$_ILLTRANUM 1738762#define BAS$_ILLPICOPE 1738770#define BAS$_CLIPONOFF 1738778#define BAS$_TRANOTDIF 1738786#define BAS$_COLNOTCON 1738794#define BAS$_ILLARESTY 1738802#define BAS$_ILLTEXJUS 1738810#define BAS$_ILLTEXPRE 1738818#define BAS$_ILLTEXPAT 1738826#define BAS$_ILLDEVID 1738834#define BAS$_DEVTYPNOT 1738842#define BAS$_DEVNOTOPE 1738850#define BAS$_DEVOUTMET 1738858#define BAS$_DEVINMET 1738866#define BAS$_UNUERR271 1738876#define BAS$_DEVOPEINC 1738882#define BAS$_COONOTNDC 1738890#define BAS$_ILLLINSTY 1738898#define BAS$_ILLLINSIZ 1738906#define BAS$_ILLPOISTY 1738914#define BAS$_ILLTEXRAT 1738922#define BAS$_ILLTEXHEI 1738930#define BAS$_ILLSTYIND 1738938#define BAS$_ILLCOLIND 1738946#define BAS$_NUMCOOINS 1738954#define BAS$_UNINUMNOT 1738962#define BAS$_ILLECHARE 1738970#define BAS$_ILLINIVAL 1738978#define BAS$_ENTPOINOT 1738986#define BAS$_UNKGKSERR 1738994#define BAS$_INVCHASTR 1739002#define BAS$_STRLENZER 1739010#define BAS$_DATOVERF 1739018#define BAS$_ILLCNTCLA 1739026#define BAS$_ILLCOLMIX 1739034#define BAS$_ILLDEVNAM 1739042#define BAS$_USEABOINP 1739050#define BAS$_UNUERR294 1739060#define BAS$_UNUERR295 1739068#define BAS$_UNUERR296 1739076#define BAS$_UNUERR297 1739084#define BAS$_UNUERR298 1739092#define BAS$_UNUERR299 1739100#define BAS$_UNUERR300 1739108N/* */P/* THIS BASE DIRECTIVE IS CAUSING THE MESSAGES BELOW THIS TO BE PLACED AT THE */N/* VERY END (THE LIMIT) OF MESSAGES FOR THIS FACILITY. */Q/* MESSAGES BELOW HERE DO NOT HAVE BASIC MESSAGE NUMBERS ASSOCIATED WITH THEM. */N/* */S/* ADDITIONS OF MESSAGES THAT DO NOT HAVE BASIC MESSAGE NUMBERS ASSOCIATED WITH */O/* THEM CAN BE MADE BY DECREASING THE .BASE DIRECTIVE BY ONE AND ADDING THE */N/* MESSAGE DIRECTLY AFTER THE .BASE DIRECTIVE.  */N/* */P/* ALSO NOTE THAT ANY VALUE BELOW THIS .BASE DIRECTIVE GET TRANSLATED INTO AN */N/* INFORMATIONAL STATUS AT RUN TIME. */N/* */R/* THIS METHOD ALLOWS A MESSAGE THAT MUST HAVE AN ASSOCIATED BASIC ERROR NUMBER */N/* TO BE ADDED WITHOUT CHANGING THE VALUES OF MESSAGES THAT DO NOT REQ UIRE */N/* BASIC ERROR NUMBERS. */N/* */#define BAS$_FROGSBLIN 1769291#define BAS$_FROPIC 1769299#define BAS$_FROMOD 1769307#define BAS$_FROSUB 1769315#define BAS$_FROFUN 1769323#define BAS$_FRODEFMOD 1769331#define BAS$_FRODFSMOD 1769339#define BAS$_FROGSBMOD 1769347#define BAS$_FROOEGMOD 1769355N/*  */#define BAS$_ORIERRWAS 1769363!#define BAS$_GKSACTIVATED 1769372#define BAS$_FROLINPIC 1769379#define BAS$_FORFILUSE 1769387#define BAS$_USEPC_PSL 1769395#define BAS$_FROIOL 1769403#define BAS$_ON_CHAFIL 1769411#define BAS$_FROLINMOD 1769419#define BAS$_FROLINSUB 1769427#define BAS$_FROLINFUN 1769435#define BAS$_FROLINDEF 1769443#define BAS$_FROLINDFS 1769451#define BAS$_FROLINGSB 1769459#define BAS$_FROLINOEG 1769467 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __BASDEF_LOADED */ ww/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// -----------------------------------------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P.  * */P/* * * */P/* * Confidential computer software. Valid license from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. * */P/* * * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty. * */P/* * * */P/* ************************************************************************* *//* ************************** ****************************************************************************************************** */@/* Created: 5-Apr-2012 13:00:54 by OpenVMS SDL EV3-3 */O/* Source: 29-OCT-2003 15:48:39 $1$DGA7304:[STARLET_H.SRC]BREAKDEF.SDL;1 *//* ******************************************************************************************************************************** */  /* .MACRO $BREAKDEF,$GBL */ /* $DEFINI BREAK,$GBL *//* + */)/* BREAK Immediate value definitions *//* *//* - *//* BASE AND OFFSET OF 1 */#define BREAK$C_ARCH_BASE 0#define BREAK$C_ARCH_UNKNOWN 0#define BREAK$C_ARCH_INTDIV 1#define BREAK$C_ARCH_INTOVR 2#define BREAK$C_ARCH_SUBRNG 3 #define BREAK$C_ARCH_NULPTRERR 4#define BREAK$C_ARCH_BADALIGN 5#define BREAK$C_ARCH_DECOVF 6#define BREAK$C_ARCH_DECDIV 7#define BREAK$C_ARCH_PKDEC 8#define BREAK$C_ARCH_DECINV 9 #define BREAK$C_ARCH_PKDECINV 10 #define BREAK$C_ARCH_PPSTKOVF 11#define BREAK$C_ARCH_MAX 262143  #define BREAK$C_APPL_BASE 262144>/* Values in this range produce a signal of SS$_BREAKAPPL */#define BREAK$C_APPL_MAX 524287#define BREAK$C_DBG_BASE 524288"#define BREAK$C_DBG_PAL_BPT 524288&#define BREAK$C_DBG_INSTRUCTION 524289#define BREAK$C_DBG_LINE 524290!#define BREAK$C_DBG_INIBRK 524291A/* Meanings in this range are defined by the debugger in use */#define BREAK$C_DBG_MAX 1048575 #define BREAK$C_SYS_BASE 1048576"#define BREAK$C_SYS_UNUSED 1048576##define BREAK$C_SYS_GENTRAP 1048577$#define BREAK$C_SYS_BUGCHECK 1048578 #define BREAK$C_SYS_HALT 1048579##define BREAK$C_SYS_CHKASTS 1048580#define BREAK$C_SYS_RFI 1048581$#define BREAK$C_SYS_SWIS_LOG 1048582;/* The remainder of codes in this range are OS-defined */#define BREAK$C_SYS_MAX 2097151 /* $DEFEND BREAK,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************* ***********************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $BREAKDEF ***/#ifndef __BREAKDEF_LOADED#define __BREAKDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* BREAK Immediate value definitions */N/*  */N/*- */N/*BASE AND OFFSET OF 1 */#define BREAK$C_ARCH_BASE 0#define BREAK$C_ARCH_UNKNOWN 0#define BREAK$C_ARCH_INTDIV 1#define BREAK$C_ARCH_INTOVR 2#define BREAK$C_ARCH_SUBRNG 3 #define BREAK$C_ARCH_NULPTRERR 4#define BREAK$C_ARCH_BADALIGN 5#define BREAK$C_ARCH_DECOVF 6#define BREAK$C_ARCH_DECDIV 7#define BREAK$C_ARCH_PKDEC 8#define BR EAK$C_ARCH_DECINV 9 #define BREAK$C_ARCH_PKDECINV 10 #define BREAK$C_ARCH_PPSTKOVF 11#define BREAK$C_ARCH_MAX 262143 #define BREAK$C_APPL_BASE 262144N/* Values in this range produce a signal of SS$_BREAKAPPL */#define BREAK$C_APPL_MAX 524287#define BREAK$C_DBG_BASE 524288"#define BREAK$C_DBG_PAL_BPT 524288&#define BREAK$C_DBG_INSTRUCTION 524289#define BREAK$C_DBG_LINE 524290!#define BREAK$C_DBG_INIBRK 524291N/* Meanings in this range are defined by the debugger in use */#define BREAK$C_DBG_MAX 1048575 #define BREAK$C_SYS_BASE 1048576"#define BREAK$C_SYS_UNUSED 1048576##define BREAK$C_SYS_GENTRAP 1048577$#define BREAK$C_SYS_BUGCHECK 1048578 #define BREAK$C_SYS_HALT 1048579##define BREAK$C_SYS_CHKASTS 1048580#define BREAK$C_SYS_RFI 1048581$#define BREAK$C_SYS_SWIS_LOG 1048582N/* The remainder of codes in this range are OS-defined */#define BREAK$C_SYS_MAX 2097151 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __BREAKDEF_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */ww/********************************************************************************************************************************/=/*  Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $BRKDEF ***/#ifndef __BRKDEF_LOADED#define __BRKDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* */N/* Breakthru system service input definitions. */N/*  */N/*- */N#define BRK$C_DEVICE 1 /* device name */N#define BRK$C_USERNAME 2 /* user name */N#define BRK$C_ALLUSERS 3 /* all users */N#define BRK$C_ALLTERMS 4 /* all logged in users */#define BRK$C_MAXSENDTYPE 4N/*  */N/* Requestor ID's, DEC use only (0-31) */N/* */N#define BRK$C_GENERAL 0 /* GENERAL (OR UNSPECIFIED) */N#define BRK$C_PHONE 1 /* PHONE */N#define BRK$C_MAIL 2 /* MAIL */N#define BRK$C_QUEUE 3 /* QUEUE MANAGER */N#define BRK$C_SHUTDOWN 4 /* SYSTEM SHUTDOWN */N#define BRK$C_URGENT 5 /* URGENT MESSAGE */N#define BRK$C_DCL 6 /* DCL (control T) */N#define BRK$C_OPCOM 7 /* OPERATOR MESSAGE */N/* Note that only first 16 are really stored by TTDRIVER now */N#define BRK$C_USER1 32 /* reserved to customer */N#define BRK$C_USER2 33  /* reserved to customer */N#define BRK$C_USER3 34 /* reserved to customer */N#define BRK$C_USER4 35 /* reserved to customer */N#define BRK$C_USER5 36 /* reserved to customer */N#define BRK$C_USER6 37 /* reserved to customer */N#define BRK$C_USER7 38 /* reserved to customer */N#define BRK$C_USER8 39 /* reserved to customer */N#define BRK$C_USER9 40 /* reserved to customer */N#define BRK$C_USER10 41 /* reserved to customer */N#define BRK$C_USER11 42 /* reserved to customer */N#define BRK$C_USER12 43 /* reserved to customer */N#define BRK$C_USER13 44 /* reserved to customer */N#define BRK$C_USER14 45 /* reserved to customer */N#defin e BRK$C_USER15 46 /* reserved to customer */N#define BRK$C_USER16 47 /* reserved to customer */#define BRK$M_SCREEN 0x100#define BRK$M_BOTTOM 0x200#define BRK$M_NOREFRESH 0x400#define BRK$M_CLUSTER 0x800 #ifdef __NEW_STARLETNtypedef struct _flags_input { /* mimics $BRDCSTDEF */N unsigned brk$v_erase_lines : 8; /* number of lines to erase */N unsigned brk$v_screen : 1; /* Do sc reen formatted write */N unsigned brk$v_bottom : 1; /* "screen" message at bottom */N unsigned brk$v_norefresh : 1; /* Refresh an interrupted read */N unsigned brk$v_cluster : 1; /* broadcast to cluster */ unsigned brk$v_fill_64_ : 4; } FLAGS_INPUT;#else /* __OLD_STARLET */Nstruct flags_input { /* mimics $BRDCSTDEF */N unsigned brk$v_erase_lines : 8; /* number of lines to erase  */N unsigned brk$v_screen : 1; /* Do screen formatted write */N unsigned brk$v_bottom : 1; /* "screen" message at bottom */N unsigned brk$v_norefresh : 1; /* Refresh an interrupted read */N unsigned brk$v_cluster : 1; /* broadcast to cluster */ unsigned brk$v_fill_64_ : 4; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __BRKDEF_LOADED */ wwB/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STA RLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $CAPDEF ***/#ifndef __CAPDEF_LOADED#define __CAPDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */#define CAP$K_ALL_USER -1#define CAP$K_ALL_USER_ADD -1#define CAP$K_ALL_CPU_ADD -1 #define CAP$K_ALL_ACTIVE_CPUS -1#define CAP$K_ALL_USER_REMOVE 0#define CAP$K_ALL_CPU_REMOVE 0#define CAP$K_GET_FREE_CAP 0N/* */N/* Constants defining user capability numbers */N/* */#define CAP$M_USER1 0x1#define CAP$M_USER2 0x2#define CAP$M_USER3 0x4#define CAP$M_USER4 0x8#define CAP$M_USER5 0x10#define CAP$M_USER6 0x20#define CAP$M_USER7 0x40#define CAP$M_USER8 0x80#define CAP$M_USER9 0x100#define CAP$M_USER10 0x200#define CAP$M_USER11 0x400#define CAP$M_USER12 0x800#define CAP$M_USER13 0x1000#define CAP$M_USER14 0x2000#define CAP$M_USER15 0x4000#define CAP$M_USER16 0x8000 #ifdef __NEW_STARLETtypedef struct _cap { __union { unsigned int cap$l_cap; __struct {% unsigned cap$v_user1 : 1;% unsigned cap$v_user2 : 1;% unsigned cap$v_user3 : 1;% unsigned cap$v_user4 : 1;% unsigned cap$v_user5 : 1;% unsigned cap$v_user6 : 1;% unsigned cap$v_user7 : 1;% unsigned cap$v_user8 : 1;%  unsigned cap$v_user9 : 1;& unsigned cap$v_user10 : 1;& unsigned cap$v_user11 : 1;& unsigned cap$v_user12 : 1;& unsigned cap$v_user13 : 1;& unsigned cap$v_user14 : 1;& unsigned cap$v_user15 : 1;& unsigned cap$v_user16 : 1;' unsigned cap$v_fill_1 : 16; } cap$r_fill_66_; } cap$r_fill_65_; } CAP; #if !defined(__VAXC)*#define cap$l_cap cap$r_fill_65_.cap$l_cap=#define cap$v_user1 cap$r_fill_65_.cap$r_fill_66_.cap$v_user1=#define cap$v_user2 cap$r_fill_65_.cap$r_fill_66_.cap$v_user2=#define cap$v_user3 cap$r_fill_65_.cap$r_fill_66_.cap$v_user3=#define cap$v_user4 cap$r_fill_65_.cap$r_fill_66_.cap$v_user4=#define cap$v_user5 cap$r_fill_65_.cap$r_fill_66_.cap$v_user5=#define cap$v_user6 cap$r_fill_65_.cap$r_fill_66_.cap$v_user6=#define cap$v_user7 cap$r_fill_65_.cap$r_fill_66_.cap$v_user7=#define cap$v_user8 cap$r_fill_65_.cap$r_fill_66_.cap$v_user8=#define cap$v_user9 cap$r_fill_65_.cap$r_fill_66_.cap$v_user9?#define cap$v_user10 cap$r_fill_65_.cap$r_fill_66_.cap$v_user10?#define cap$v_user11 cap$r_fill_65_.cap$r_fill_66_.cap$v_user11?#define cap$v_user12 cap$r_fill_65_.cap$r_fill_66_.cap$v_user12?#define cap$v_user13 cap$r_fill_65_.cap$r_fill_66_.cap$v_user13?#define cap$v_user14 cap$r_fill_65_.cap$r_fill_66_.cap$v_user14?#define cap$v_user15 cap$r_fill_65_.cap$r_fill_66_.cap$v_user15?#define cap$v_user16 cap$r_fill_65_.cap$r_fill_66_.cap$v_user16"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _cap { __union { unsigned int cap$l_cap; __struct {% unsigned cap$v_user1 : 1;% unsigned cap$v_user2 : 1;% unsigned cap$v_user3 : 1;% unsigned cap$v_user4 : 1;% unsigned cap$v_user5 : 1;% unsigned cap$v_user6 : 1;% unsigned cap$v_user7 : 1;% unsigned cap$v_user8 : 1;% unsigned cap$v_user9 : 1;& unsigned cap$v_user10 : 1;& unsigned cap$v_user11 : 1;& unsigned cap$v_user12 : 1;& unsigned cap$v_user13 : 1;& unsigned cap$v_user14 : 1;& unsigned cap$v_user15 : 1;& unsigned cap$v_user16 : 1;' unsigned cap$v_fill_1 : 16; } cap$r_fill_66_; } cap$r_fill_65_; } cap; #if !defined(__VAXC)*#define cap$l_cap cap$r_fill_65_.cap$l_cap=#define cap$v_user1 cap$r_fill_65_.cap$r_fill_66_.cap$v_user1=#define cap$v_user2 cap$r_fill_65_.cap$r_fill_66_.cap$v_user2=#define cap$v_user3 cap$r_fill_65_.cap$r_fill_66_.cap$v_user3=#define cap$v_user4 cap$r_fill_65_.cap$r_fill_66_.cap$v_user4=#define cap$v_user5 cap$r_fill_65_.cap$r_fill_66_.cap$v_user5=#define cap$v_user6 cap$r_fill_65_.cap$r_fill_66_.cap$v_user6=#define cap$v_user7 cap$r_fill_65_.cap$r_fill_66_.cap$v_user7=#define cap$v_user8 cap$r_fill_65_.cap$r_fill_66_.cap$v_user 8=#define cap$v_user9 cap$r_fill_65_.cap$r_fill_66_.cap$v_user9?#define cap$v_user10 cap$r_fill_65_.cap$r_fill_66_.cap$v_user10?#define cap$v_user11 cap$r_fill_65_.cap$r_fill_66_.cap$v_user11?#define cap$v_user12 cap$r_fill_65_.cap$r_fill_66_.cap$v_user12?#define cap$v_user13 cap$r_fill_65_.cap$r_fill_66_.cap$v_user13?#define cap$v_user14 cap$r_fill_65_.cap$r_fill_66_.cap$v_user14?#define cap$v_user15 cap$r_fill_65_.cap$r_fill_66_.cap$v_user15?#define cap$v_user16 cap$r_fill_65_.cap$r_fill_66_.cap$v_user16"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* Constants defining user CPU numbers */N/* */#define CAP$M_CPU0 0x1#define CAP$M_CPU1 0x2#define CAP$M_CPU2 0x4#define CAP$M_CPU3 0x8#define CAP$M_CPU4 0x10#define CAP$M_CPU5 0x20#define CAP$M_CPU6 0x40#define CAP$M_CPU7 0x80#define CAP$M_CPU8 0x100#define CAP$M_CPU9 0x200#define CAP$M_CPU10 0x400#define CAP$M_CPU11 0x800#define CAP$M_CPU12 0x1000#define CAP$M_CPU13 0x2000#define CAP$M_CPU14 0x4000#define CAP$M_CPU15 0x8000#define CAP$M_CPU16 0x10000#define CAP$M_CPU17 0x20000#define CAP$M_CPU18 0x40000#define CAP$M_CPU19 0x80000#define CAP$M_CPU20 0x100000#define CAP$M_CPU21 0x200000#define CAP$M_CPU22 0x400000#define CAP$M_CPU23 0x800000#define CAP$M_CPU24 0x1000000#define CAP$M_CPU25 0x2000000#define CAP$M_CPU26 0x4000000#define CAP$M_CPU27 0x8000000#define CAP$M_CPU28 0x10000000#define CAP$M_CPU29 0x20000000#define CAP$M_CPU30 0x40000000#define CAP$M_CPU31 0x80000000 #ifdef __NEW_STARLETtypedef struct _cap_cpus { __union {$ unsigned int cap$l_cap_cpus; __struct {$ unsigned cap$v_cpu0 : 1;$ unsigned cap$v_cpu1 : 1;$ unsigned cap$v_cpu2 : 1;$ unsigned cap$v_cpu3 : 1;$ unsigned cap$v_cpu4 : 1;$ unsigned cap$v_cpu5 : 1;$ unsigned cap$v_cpu6 : 1;$ unsigned cap$v_cpu7 : 1;$ unsigned cap$v_cpu8 : 1;$ unsigned cap$v_cpu9 : 1;% unsigned cap$v_cpu10 : 1;% unsigned cap$v_cpu11 : 1;% unsigned cap$v_cpu12 : 1;% unsigned cap$v_cpu13 : 1;% unsigned cap$v_cpu14 : 1;% unsigned cap$v_cpu15 : 1;% unsigned cap$v_cpu16 : 1;% unsigned cap$v_cpu17 : 1;% unsigned cap$v_cpu18 : 1;% unsigned cap$v_cpu19 : 1;% unsigned cap$v_cpu20 : 1;% unsigned cap$v_cpu21 : 1;% unsigned cap$v_cpu22 : 1;% unsigned cap$v_cpu23 : 1;% unsigned cap$v_cpu24 : 1;% unsigned cap$v_cpu25 : 1;% unsigned cap$v_cpu26 : 1;% unsigned cap$v_cpu27 : 1;% unsigned cap$v_cpu28 : 1;%  unsigned cap$v_cpu29 : 1;% unsigned cap$v_cpu30 : 1;% unsigned cap$v_cpu31 : 1; } cap$r_fill_68_; } cap$r_fill_67_; } CAP_CPUS; #if !defined(__VAXC)4#define cap$l_cap_cpus cap$r_fill_67_.cap$l_cap_cpus;#define cap$v_cpu0 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu0;#define cap$v_cpu1 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu1;#define cap$v_cpu2 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu2;#define cap$v_cpu3 cap$r_fill_67_.cap$r_fi ll_68_.cap$v_cpu3;#define cap$v_cpu4 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu4;#define cap$v_cpu5 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu5;#define cap$v_cpu6 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu6;#define cap$v_cpu7 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu7;#define cap$v_cpu8 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu8;#define cap$v_cpu9 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu9=#define cap$v_cpu10 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu10=#define cap$v_cpu11 cap$r_fill_67_.cap$r_fill_68_. cap$v_cpu11=#define cap$v_cpu12 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu12=#define cap$v_cpu13 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu13=#define cap$v_cpu14 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu14=#define cap$v_cpu15 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu15=#define cap$v_cpu16 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu16=#define cap$v_cpu17 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu17=#define cap$v_cpu18 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu18=#define cap$v_cpu19 cap$r_fill_67_.cap$r_fil l_68_.cap$v_cpu19=#define cap$v_cpu20 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu20=#define cap$v_cpu21 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu21=#define cap$v_cpu22 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu22=#define cap$v_cpu23 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu23=#define cap$v_cpu24 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu24=#define cap$v_cpu25 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu25=#define cap$v_cpu26 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu26=#define cap$v_cpu27 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu27=#define cap$v_cpu28 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu28=#define cap$v_cpu29 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu29=#define cap$v_cpu30 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu30=#define cap$v_cpu31 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu31"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _cap_cpus { __union {$ unsigned int cap$l_cap_cpus; __struct {$ unsigned cap$v_cpu0 : 1;$  unsigned cap$v_cpu1 : 1;$ unsigned cap$v_cpu2 : 1;$ unsigned cap$v_cpu3 : 1;$ unsigned cap$v_cpu4 : 1;$ unsigned cap$v_cpu5 : 1;$ unsigned cap$v_cpu6 : 1;$ unsigned cap$v_cpu7 : 1;$ unsigned cap$v_cpu8 : 1;$ unsigned cap$v_cpu9 : 1;% unsigned cap$v_cpu10 : 1;% unsigned cap$v_cpu11 : 1;% unsigned cap$v_cpu12 : 1;% unsigned cap$v_cpu13 : 1;% unsigned cap$v_cpu14 : 1;% unsigned cap$v_cpu15 : 1;% unsigned cap$v_cpu16 : 1;% unsigned cap$v_cpu17 : 1;% unsigned cap$v_cpu18 : 1;% unsigned cap$v_cpu19 : 1;% unsigned cap$v_cpu20 : 1;% unsigned cap$v_cpu21 : 1;% unsigned cap$v_cpu22 : 1;% unsigned cap$v_cpu23 : 1;% unsigned cap$v_cpu24 : 1;% unsigned cap$v_cpu25 : 1;% unsigned cap$v_cpu26 : 1;% unsigned cap$v_cpu27 : 1;% unsigned cap$v_cpu28 : 1;% unsigned cap$v_cpu29 : 1;% unsigned cap$v_cpu30 : 1;% unsigned cap$v_cpu31 : 1; } cap$r_fill_68_; } cap$r_fill_67_; } cap_cpus; #if !defined(__VAXC)4#define cap$l_cap_cpus cap$r_fill_67_.cap$l_cap_cpus;#define cap$v_cpu0 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu0;#define cap$v_cpu1 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu1;#define cap$v_cpu2 cap$r _fill_67_.cap$r_fill_68_.cap$v_cpu2;#define cap$v_cpu3 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu3;#define cap$v_cpu4 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu4;#define cap$v_cpu5 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu5;#define cap$v_cpu6 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu6;#define cap$v_cpu7 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu7;#define cap$v_cpu8 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu8;#define cap$v_cpu9 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu9=#define cap$v_cpu10 cap$r_fill_67_ .cap$r_fill_68_.cap$v_cpu10=#define cap$v_cpu11 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu11=#define cap$v_cpu12 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu12=#define cap$v_cpu13 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu13=#define cap$v_cpu14 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu14=#define cap$v_cpu15 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu15=#define cap$v_cpu16 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu16=#define cap$v_cpu17 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu17=#define cap$v_cpu18 cap$r_fi ll_67_.cap$r_fill_68_.cap$v_cpu18=#define cap$v_cpu19 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu19=#define cap$v_cpu20 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu20=#define cap$v_cpu21 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu21=#define cap$v_cpu22 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu22=#define cap$v_cpu23 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu23=#define cap$v_cpu24 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu24=#define cap$v_cpu25 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu25=#define cap$v_cpu26 ca p$r_fill_67_.cap$r_fill_68_.cap$v_cpu26=#define cap$v_cpu27 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu27=#define cap$v_cpu28 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu28=#define cap$v_cpu29 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu29=#define cap$v_cpu30 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu30=#define cap$v_cpu31 cap$r_fill_67_.cap$r_fill_68_.cap$v_cpu31"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */)#define CAP$M_IMPLICIT_AFFINITY_CLEAR 0x1'#define CAP$M_IMPLIC IT_AFFINITY_SET 0x2'#define CAP$M_IMPLICIT_DEFAULT_ONLY 0x4&#define CAP$M_IMPLICIT_ALL_THREADS 0x8 #ifdef __NEW_STARLETtypedef struct _imp_flags { __struct {T unsigned cap$v_implicit_affinity_clear : 1; /* Shut implicit affinity off */Q unsigned cap$v_implicit_affinity_set : 1; /* Turn implicit affinity on */S unsigned cap$v_implicit_default_only : 1; /* Only system default changed */c unsigned cap$v_implicit_all_threads : 1; /* Change affects all k ernel threads in process */$ unsigned cap$v_fill_69_ : 4; } cap$r_imp_flags; } IMP_FLAGS; #if !defined(__VAXC)S#define cap$v_implicit_affinity_clear cap$r_imp_flags.cap$v_implicit_affinity_clearO#define cap$v_implicit_affinity_set cap$r_imp_flags.cap$v_implicit_affinity_setO#define cap$v_implicit_default_only cap$r_imp_flags.cap$v_implicit_default_onlyM#define cap$v_implicit_all_threads cap$r_imp_flags.cap$v_implicit_all_threads"#endif /* #if !defined(__VAXC) */  #else /* __OLD_STARLET */typedef struct _imp_flags { __struct {T unsigned cap$v_implicit_affinity_clear : 1; /* Shut implicit affinity off */Q unsigned cap$v_implicit_affinity_set : 1; /* Turn implicit affinity on */S unsigned cap$v_implicit_default_only : 1; /* Only system default changed */c unsigned cap$v_implicit_all_threads : 1; /* Change affects all kernel threads in process */$ unsigned cap$v_fill_69_ : 4; } cap$r_imp_flags;  } imp_flags; #if !defined(__VAXC)S#define cap$v_implicit_affinity_clear cap$r_imp_flags.cap$v_implicit_affinity_clearO#define cap$v_implicit_affinity_set cap$r_imp_flags.cap$v_implicit_affinity_setO#define cap$v_implicit_default_only cap$r_imp_flags.cap$v_implicit_default_onlyM#define cap$v_implicit_all_threads cap$r_imp_flags.cap$v_implicit_all_threads"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/*  */N/* Note: the following flags structure must mimic that of [LIB]CPBDEF.SDL */N/* */ #define CAP$M_FLAG_CHECK_CPU 0x1 #define CAP$M_FLAG_PERMANENT 0x2'#define CAP$M_FLAG_CHECK_CPU_ACTIVE 0x8$#define CAP$M_FLAG_DEFAULT_ONLY 0x10#define CAP$M_ALL_THREADS 0x20&#define CAP$M_PURGE_WS_IF_NEW_RAD 0x40 #ifdef __NEW_STARLETtypedef struct _cap_flags { __struct {N unsigned cap$v_flag_check_cpu : 1; /* Check that process can run */N unsigned cap$v_flag_permanent : 1; /* Affect permanent mask */N unsigned cap$v_reserved1 : 1; /* Filler to match $CPBDEF */V unsigned cap$v_flag_check_cpu_active : 1; /* Check all selected CPUs active */O unsigned cap$v_flag_default_only : 1; /* Only system default changed */Z unsigned cap$v_all_threads : 1; /* Change affects all kernel threads in process */h unsigned cap$v_pur ge_ws_if_new_rad : 1; /* If the home RAD was changed, purge the working set */$ unsigned cap$v_fill_70_ : 1; } cap$r_cap_flags; } CAP_FLAGS; #if !defined(__VAXC)A#define cap$v_flag_check_cpu cap$r_cap_flags.cap$v_flag_check_cpuA#define cap$v_flag_permanent cap$r_cap_flags.cap$v_flag_permanentO#define cap$v_flag_check_cpu_active cap$r_cap_flags.cap$v_flag_check_cpu_activeG#define cap$v_flag_default_only cap$r_cap_flags.cap$v_flag_default_only;#define cap$v_all_thread s cap$r_cap_flags.cap$v_all_threadsK#define cap$v_purge_ws_if_new_rad cap$r_cap_flags.cap$v_purge_ws_if_new_rad"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _cap_flags { __struct {N unsigned cap$v_flag_check_cpu : 1; /* Check that process can run */N unsigned cap$v_flag_permanent : 1; /* Affect permanent mask */N unsigned cap$v_reserved1 : 1; /* Filler to match $CPBDEF */V unsigned cap$v_flag_ch eck_cpu_active : 1; /* Check all selected CPUs active */O unsigned cap$v_flag_default_only : 1; /* Only system default changed */Z unsigned cap$v_all_threads : 1; /* Change affects all kernel threads in process */h unsigned cap$v_purge_ws_if_new_rad : 1; /* If the home RAD was changed, purge the working set */$ unsigned cap$v_fill_70_ : 1; } cap$r_cap_flags; } cap_flags; #if !defined(__VAXC)A#define cap$v_flag_check_cpu cap$r_cap_flags.cap$v_flag_ch eck_cpuA#define cap$v_flag_permanent cap$r_cap_flags.cap$v_flag_permanentO#define cap$v_flag_check_cpu_active cap$r_cap_flags.cap$v_flag_check_cpu_activeG#define cap$v_flag_default_only cap$r_cap_flags.cap$v_flag_default_only;#define cap$v_all_threads cap$r_cap_flags.cap$v_all_threadsK#define cap$v_purge_ws_if_new_rad cap$r_cap_flags.cap$v_purge_ws_if_new_rad"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CAPDEF_LOADED */ wwa/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source:  05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $CBODEF ***/#ifndef __CBODEF_LOADED#define __CBODEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* Define Create Buffer Object bits */N/*- */#define CBO$M_RETSVA 0x1#define CBO$M_EXMAXLIM 0x2#define CBO$M_SVA_32 0x4#define CBO$M_NOSVA 0x8#define CBO$M_SYSBUFOBJ 0x10 #ifdef __NEW_STARLET,typedef struct _create_buffer_object_flags {S unsigned cbo$v_retsva : 1; /* (Priv) Return SVA, not PVA, of object */f unsigned cbo$v_exmaxlim : 1; /* (Priv) Bypass MAXBOBMEM check (VMS development use only) */` unsigned cbo$v_sva_32 : 1; /* Allocate SVA from S0 space, $CREATE_BUFOBJ_64 only */N unsigned cbo$v_nosva : 1; /* Do not allocate any system space */T unsigned cbo$v_sysbufobj : 1; /* System buffer object (no process ties) */ unsigned cbo$v_filler : 27;! } CREATE_BUFFER_OBJECT_FLAGS;#else /* __OLD_STARLET */#struct create_buffer_object_flags {S unsigned cbo$v_retsva : 1; /* (Priv) Return SVA, not PVA, of object */f unsigned cbo$v_exmaxlim : 1; /* (Priv) Bypass MAXBOBMEM check (VMS development use only) */` unsigned cbo$v_sva_32 : 1; /* Allocate SVA from S0 space, $CREATE_BUFOBJ_64 only */N unsigned cbo$v_nosva : 1; /* Do not allocate any system space */T unsigned cbo$v_sysbufobj : 1; /* System buffer object (no process ties) */ unsigned cbo$v_filler : 27; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CBODEF_LOADED */ ww/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// -----------------------------------------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * * */P/* * Confidential computer software. Valid license from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* *  * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. * */P/* * * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty.  * */P/* * * */P/* ************************************************************************* *//* ******************************************************************************************************************************** */@/* Created: 5-Apr-2012 13:00:54 by OpenVMS SDL EV3-3 */M/* Source: 02-APR-2004 16:15:25 $1$DGA7304:[STARLET_H.SRC]CHFDEF.SDL;1 *//* ************************** ****************************************************************************************************** */  /* .MACRO $CHFDEF,$GBL */ /* $DEFINI CHF,$GBL *//* */0/* CONDITION HANDLING ARGUMENT LIST OFFSETS */L/* THERE ARE FOUR CONDITIONAL HANDLING STRUCTURES: THE PRIMARY ARGUMENT */L/* LIST, THE SIGNAL AND MECHANISM ARRAYS AND THE ALPHA EXCEPTION RECORD */4/* ALL ARE IDENTIFIED BY THE SAME BLOCK PREFIX. *//* */#define CHF$S_CHFDEF 12K#define CHF$L_SIGARGLST 4  /* ADDRESS OF SIGNAL ARGUMENTS */M#define CHF$L_MCHARGLST 8 /* ADDRESS OF MECHANISM ARGUMENTS */#define CHF$S_CHFDEF1 12I#define CHF$IS_SIG_ARGS 0 /* NUMBER OF SIGNAL ARGUMENTS */:#define CHF$L_SIG_ARGS 0 /* obsolete def */:#define CHF$IS_SIG_NAME 4 /* SIGNAL NAME */:#define CHF$L_SIG_NAME 4 /* obsolete def */M#define CHF$IS_SIG_ARG1 8 /* FIRST SIGNAL SPECIFIC ARGUMENT */:#define CHF$L_SIG_AR G1 8 /* obsolete def */#define CHF$M_FPREGS_VALID 0x1#define CHF$M_FPREGS2_VALID 0x2#define CHF$S_CHFDEF2 592M#define CHF$IS_MCH_ARGS 0 /* NUMBER OF MECHANISM ARGUMENTS */-#define CHF$IS_MCH_FLAGS 4 /* Flags */7#define CHF$R_MCH_FLAGS_BITS 4 /* Flags bits. */E#define CHF$V_FPREGS_VALID 0 /* FP registers stored in MCH. */#define CHF$V_FPREGS2_VALID 1#define CHF$S_MCH_FRAME 8B#define CHF$PH_MCH_FRAME 8 /* ESTABLISHER FRAME  ADDRESS */C#define CHF$IS_MCH_DEPTH 16 /* FRAME DEPTH OF ESTABLISHER */,#define CHF$IH_MCH_DEPTH 16 /* temp */D#define CHF$IS_MCH_RESVD1 20 /* reserved, paired with DEPTH */#define CHF$S_MCH_DADDR 8E#define CHF$PH_MCH_DADDR 24 /* ESTABLISHER HANDLER DATA CELL */#define CHF$S_MCH_ESF_ADDR 8L#define CHF$PH_MCH_ESF_ADDR 32 /* ESTABLISHER EXCEPTION STACK FRAME */#define CHF$S_MCH_SIG_ADDR 8L#define CHF$PH_MCH_SIG_ADDR 40 /* ESTABLISHER EXCEPTION STACK FRAME */#define CHF$S_MCH_RETVAL 8#define CHF$IH_MCH_RETVAL 48#define CHF$S_MCH_SAVR0 8:#define CHF$IH_MCH_SAVR0 48 /* SAVED REGISTER R0 */=#define CHF$IL_MCH_SAVR0_LOW 48 /* LOW ORDER 32 BITS */?#define CHF$IL_MCH_SAVR0_HIGH 52 /* HIGH ORDER 32 BITS */#define CHF$S_MCH_RETVAL2 8#define CHF$IH_MCH_RETVAL2 56#define CHF$S_MCH_SAVR1 8:#define CHF$IH_MCH_SAVR1 56 /* SAVED REGISTER R1 */=#define CHF$IL_MCH_SAVR1_LOW 56 /* LOW ORDER 32 BITS */?#define CHF$IL_MCH_SAVR1_HIGH 60 /* HIGH ORDER 32 BITS */#define CHF$S_MCH_SIG64_ADDR 8A#define CHF$PH_MCH_SIG64_ADDR 64 /* 64-bit sig array ptr */"#define CHF$S_MCH_SAVF32_SAVF127 8$#define CHF$PH_MCH_SAVF32_SAVF127 72!#define CHF$S_MCH_RETVAL_FLOAT 16"#define CHF$FH_MCH_RETVAL_FLOAT 80"#define CHF$S_MCH_RETVAL2_FLOAT 16##define CHF$FH_MCH_RETVAL2_FLOAT 96#define CHF$S_MCH_SAVF2 16#define CHF$FH_MCH_SAVF2 112#define CHF$S_MCH_SAVF3 16#define CHF$FH_MCH_SAVF3 128#define CHF$S_MCH_SAVF4 16#define CHF$FH_MCH_SAVF4 144#define CHF$S_MCH_SAVF5 16#define CHF$FH_MCH_SAVF5 160#define CHF$S_MCH_SAVF12 16#define CHF$FH_MCH_SAVF12 176#define CHF$S_MCH_SAVF13 16#define CHF$FH_MCH_SAVF13 192#define CHF$S_MCH_SAVF14 16#define CHF$FH_MCH_SAVF14 208#define CHF$S_MCH_SAVF15 16#define CHF$FH_MCH_SAVF15 224#define CHF$S_MCH_SAVF16 16#define CHF$FH_MCH_SAVF16 240#define CHF$S_MCH_SAVF17 16#define CHF$FH_MCH_SAVF17 256#define CHF$S_MCH_SAVF18 16#define CHF$FH_MCH_SAVF18 272#define CHF$S_MCH_SAVF19 16#define CHF$FH_MCH_SAVF19 288#define CHF$S_MCH_SAVF20 16#define CHF$FH_MCH_SAVF20 304#define CHF$S_MCH_SAVF21 16#define CHF$FH_MCH_SAVF21 320#define CHF$S_MCH_SAVF22 16#define CHF$FH_MCH_SAVF22 336#define CHF$S_MCH_SAVF23 16#define CHF$FH_MCH_SAVF23 352#define CHF$S_MCH_SAVF24 16#define CHF$FH_MCH_SAVF24 368#define CHF$S_MCH_SAVF25 16#define CHF$FH_MCH_SAVF25 384#define CHF$S_MCH_SAVF26 16#define CHF$FH_MCH_SAVF26 400#define CHF$S_MCH_SAVF27 16#define CHF$FH_MCH_SAVF27 416#define CHF$S_MCH_SAVF28 16#define CHF$FH_MCH_SAVF28 432#define CHF$S_MCH_SAVF29 16#define CHF$FH_MCH_SAVF29 448#define CHF$S_MCH_SAVF30 16#define CHF$FH_MCH_SAVF30 464#define CHF$S_MCH_SAVF31 16#define CHF$FH_MCH_SAVF31 480#define CHF$S_MCH_SAVB1 8#define CHF$IH_MCH_SAVB1 496#define CHF$S_MCH_SAVB2 8#define CHF$IH_MCH_SAVB2 504#define CHF$S_MCH_SAVB3 8#define CHF$IH_MCH_SAVB3 512#define CHF$S_MCH_SAVB4 8#define CHF$IH_MCH_SAVB4 520#define CHF$S_MCH_SAVB5 8#define CHF$IH_MCH_SAVB5 528#define CHF$S_MCH_AR_LC 8#define CHF$IH_MCH_AR_LC 536#define CHF$S_MCH_AR_EC 8#define CHF$IH_MCH_AR_EC 544#define CHF$S_MCH_OSSD 8#define CHF$PH_MCH_OSSD 552#define CHF$S_MCH_INVO_HANDLE 8!#define CHF$Q_MCH_INVO_HANDLE 560#define CHF$S_MCH_UWR_START 8 #define CHF$PH_MCH_UWR_START 568#define CHF$S_MCH_FPSR 8#define CHF$IH_MCH_FPSR 576#define CHF$S_MCH_FPSS 8 #define CHF$IH_MCH_FPSS 584#define CHF$M_CALEXT_CANCEL 0x1#define CHF$M_CALEXT_LAST 0x2I#define CHF$K_CALEXT_LENGTH 16 /* LENGTH OF CATCH-ALL DESC BLOCK */I#define CHF$C_CALEXT_LENGTH 16 /* LENGTH OF CATCH-ALL DESC BLOCK */#define CHF$S_CHFDEF3 16A#define CHF$L_CALEXT_LINK 0 /* CATCH-ALL EXTENSION LINK */J#define CHF$L_CALEXT_ADDRESS 4 /* ADDRESS OF CATCH-ALL EXTENSION *//#define CHF$L_CALEXT_FLAGS 8 /* FLAGS */E#define CHF$V_CALEXT_CANCEL 0 /* REMOVE CATCH-ALL EXTENSION */A#define CHF$V_CALEXT_LAST 1 /* LAST CATCH-ALL EXTENSION */5#define CHF$L_CALEXT_RESERVED 12 /* RESERVED */#define CHF64$S_CHFDEF6 24K#define CHF64$L_SIG_ARGS 0 /* Longword including count & options */G#define CHF64$W_SIG_ARG_COUNT 0 /* Word holding count itself */O#define CHF64$W_SIG_MSG_OPTIONS 2 /* Word containing message options */[#define CHF64$L_SIGNAL64 4 /* 64-bit array tag: overlays sig_name of 32b version */#define CHF64$S_SIG_NAME 85#define CHF64$Q_SIG_NAME 8 /* Signal value */#define CHF64$S_SIG_ARG1 8>#define CHF64$Q_SIG_ARG1 16 /* First signal argument */ /* $DEFEND CHF,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by Op enVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $CHFDEF ***/#ifndef __CHFDEF_LOADED#define __CHFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* CONDITION HANDLING ARGUMENT LIST OFFSETS */N/* THERE ARE FOUR CONDITIONAL HANDLING STRUCTURES: THE PRIMARY ARGUMENT */N/* LIST, THE SIGNAL AND MECHANISM ARRAYS AND THE ALPHA EXCEPTION RECORD */N/* ALL ARE IDENTIFIED BY THE SAME BLOCK PREFIX. */N/* */ #ifdef __NEW_STARLETstruct _chfdef1;struct _chfdef2;struct _chfdef6;#elsestruct chfdef1;struct chfdef2;struct chfdef6;#endif  9#ifdef __cplusplus /* Define structure prototypes */struct _chfdef1;struct _chfdef2; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETtypedef struct _chfdef {_ struct _chfdef1 *chf$l_s igarglst; /*ADDRESS OF SIGNAL ARGUMENTS ~~~ struct chfdef1 ~~~ */O int chfdef$$_fill_1; /* Upper 32 bits of PACKed structure */b struct _chfdef2 *chf$l_mcharglst; /*ADDRESS OF MECHANISM ARGUMENTS ~~~ struct chfdef2 ~~~ */ } CHFDEF;#else /* __OLD_STARLET */struct chfdef {U struct chfdef1 *chf$l_sigarglst; /*ADDRESS OF SIGNAL ARGUMENTS */O int chfdef$$_fill_1; /* Upper 32 bits of PACKed structure */X struct chfdef2 *chf$l_mcharglst; /*ADDRESS OF MECHANISM ARGUMENTS */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _chfdef1 {#pragma __nomember_alignment __union {N int chf$is_sig_args; /*NUMBER OF SIGNAL ARGUMENTS */N int ch f$l_sig_args; /*obsolete def */ } chf$r_sig_args_desc; __union {N int chf$is_sig_name; /*SIGNAL NAME */N int chf$l_sig_name; /*obsolete def */ } chf$r_sig_name_desc; __union {N int chf$is_sig_arg1; /*FIRST SIGNAL SPECIFIC ARGUMENT */N int chf$l_sig_arg1; /*obsolete def */ } chf$r_sig_arg1_desc; } CHFDEF1; #if !defined(__VAXC);#define chf$is_sig_args chf$r_sig_args_desc.chf$is_sig_args9#define chf$l_sig_args chf$r_sig_args_desc.chf$l_sig_args;#define chf$is_sig_name chf$r_sig_name_desc.chf$is_sig_name9#define chf$l_sig_name chf$r_sig_name_desc.chf$l_sig_name;#define chf$is_sig_arg1 chf$r_sig_arg1_desc.chf$is_sig_arg19#define chf$l_sig_arg1 chf$r_sig_arg1_desc.chf$l_sig_arg1"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOB ASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct chfdef1 {#pragma __nomember_alignment __union {N int chf$is_sig_args; /*NUMBER OF SIGNAL ARGUMENTS */N int chf$l_sig_args; /*obsolete def */ } chf$r_sig_args_desc; __union {N int chf$is_sig_name; /*SIGNAL NAME  */N int chf$l_sig_name; /*obsolete def */ } chf$r_sig_name_desc; __union {N int chf$is_sig_arg1; /*FIRST SIGNAL SPECIFIC ARGUMENT */N int chf$l_sig_arg1; /*obsolete def */ } chf$r_sig_arg1_desc; } ; #if !defined(__VAXC);#define chf$is_sig_args chf$r_sig_args_desc.chf$is_sig_args9#define chf$l_sig_args chf$r_sig_args_desc.chf$l_sig_args;#define ch f$is_sig_name chf$r_sig_name_desc.chf$is_sig_name9#define chf$l_sig_name chf$r_sig_name_desc.chf$l_sig_name;#define chf$is_sig_arg1 chf$r_sig_arg1_desc.chf$is_sig_arg19#define chf$l_sig_arg1 chf$r_sig_arg1_desc.chf$l_sig_arg1"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define CHF$M_FPREGS_VALID 0x1#define CHF$M_FPREGS2_VALID 0x2 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ '#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _chfdef2 {#pragma __nomember_alignment __union { __int64 chf$q_mch_args; __struct { int chf$is_mch_args; __union {N int chf$is_mch_flags; /*Flags */N __struct { /*Flags bits. */U unsigned chf$v_fpregs_valid : 1; /*FP registers stored in MCH. */5 unsigned chf$v_fpregs2_valid : 1;0 unsigned chf$v_fill_71_ : 6;+ } chf$r_mch_flags_bits;' } chf$r_mch_flags_desc;# } chf$r_mch_args_desc2; } chf$r_mch_args_desc1; __int64 chf$q_mch_frame; __union { __int64 chf$q_mch_depth;T __struct { /*2 longwords which are part of MCH_DEPTH */N int chf$is_mch_depth; /*FRAME DEPTH OF ESTABLISHER */N int chf$is_mch_resvd1; /*reserved, paired with DEPTH */$ } chf$r_mch_depth_field; } chf$r_mch_depth_desc; __int64 chf$q_mch_daddr; __int64 chf$q_mch_esf_addr; __int64 chf$q_mch_sig_addr; __union { __int64 chf$q_mch_savr0;! __int64 chf$q_mch_retval;" __int64 chf$ih_mch_retval; } chf$r_retval; __union { __int64 chf$q_mch_savr1;" __int64 chf$q_mch_retval 2;# __int64 chf$ih_mch_retval2; } chf$r_retval2;R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *chf$ph_mch_sig64_addr; /*64-bit sig array ptr */#else( unsigned __int64 chf$ph_mch_sig64_addr;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long  /* And set ptr size default to 64-bit pointers */$ void *chf$ph_mch_savf32_savf127;#else, unsigned __int64 chf$ph_mch_savf32_savf127;#endif/ unsigned char chf$fh_mch_retval_float [16];0 unsigned char chf$fh_mch_retval2_float [16];( unsigned char chf$fh_mch_savf2 [16];( unsigned char chf$fh_mch_savf3 [16];( unsigned char chf$fh_mch_savf4 [16];( unsigned char chf$fh_mch_savf5 [16];) unsigned char chf$fh_mch_savf12 [16];) unsigned char chf$fh_mch_savf13 [16]; ) unsigned char chf$fh_mch_savf14 [16];) unsigned char chf$fh_mch_savf15 [16];) unsigned char chf$fh_mch_savf16 [16];) unsigned char chf$fh_mch_savf17 [16];) unsigned char chf$fh_mch_savf18 [16];) unsigned char chf$fh_mch_savf19 [16];) unsigned char chf$fh_mch_savf20 [16];) unsigned char chf$fh_mch_savf21 [16];) unsigned char chf$fh_mch_savf22 [16];) unsigned char chf$fh_mch_savf23 [16];) unsigned char chf$fh_mch_savf24 [16];) unsigned char chf$fh_mch_savf25 [16];) unsigned char chf$fh_mch_savf26 [16];) unsigned char chf$fh_mch_savf27 [16];) unsigned char chf$fh_mch_savf28 [16];) unsigned char chf$fh_mch_savf29 [16];) unsigned char chf$fh_mch_savf30 [16];) unsigned char chf$fh_mch_savf31 [16]; __union {! __int64 chf$ih_mch_savb1;N __int64 chf$q_mch_savb1; /* Obsolete definition */ } chf$r_savb1; __union {! __int64 chf$ih_mch_savb2;N __ int64 chf$q_mch_savb2; /* Obsolete definition */ } chf$r_savb2; __union {! __int64 chf$ih_mch_savb3;N __int64 chf$q_mch_savb3; /* Obsolete definition */ } chf$r_savb3; __union {! __int64 chf$ih_mch_savb4;N __int64 chf$q_mch_savb4; /* Obsolete definition */ } chf$r_savb4; __union {! __int64 chf$ih_mch_savb5;N __int64 chf$q_mch_savb5; /* Obsolete definition */ } chf$r_savb5; __union {! __int64 chf$ih_mch_ar_lc;N __int64 chf$q_mch_ar_lc; /* Obsolete definition */ } chf$r_ar_ec; __int64 chf$ih_mch_ar_ec;R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *chf$ph_mch_ossd;#else" unsigned __int64 chf$ph_mch_ossd;#endif+ unsigned __int64 chf$q_mch_invo_handle;R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *chf$ph_mch_uwr_start;#else' unsigned __int64 chf$ph_mch_uwr_start;#endif% unsigned __int64 chf$ih_mch_fpsr;% unsigned __int64 chf$ih_mch_fpss; } CHFDEF2; #if !defined(__VAXC):#define chf$q_mch_args chf$r_mch_args_desc1.chf$q_mch_argsF#define chf$r_mch_args_desc2 chf$r_mch_args_desc1.chf$r_mch_args_desc2<#define chf$is_mch_args chf$r_mch_args_desc2.chf$is_mch_argsS#define chf$is_mch_flags chf$r_mch_args_desc2.chf$r_mch_flags_desc.chf$is_mch_flags[#define chf$r_mch_flags_bits chf$r_mch_args_desc2.chf$r_mch_flags_desc.chf$r_mch_flags_bitsB#define chf$v_fpregs_valid chf$r_mch_flags_bits.chf$v_fpregs_validD#define chf$v_fpregs2_valid chf$r_mch_flags_bits.chf$v_fpregs2_valid<#define chf$q_mch_depth chf$r_mch_depth_desc.chf$q_mch_depthT#define chf$is_mch_depth chf$r_mch_depth_desc.chf$r_mch_depth_field.chf$is_mch_depthV#define chf$is_mch_resvd1 chf$r_mch_depth_desc.chf$r_mch_depth_field.chf$is_mch_resvd14#define chf$q_mch_savr0 chf$r_retval.chf$q_mch_savr06#define chf$q_mch_retval chf$r_retval.chf$q_mch_retval8#define chf$ih_mch_retval chf$r_retval.chf$ih_mch_retval5#define chf$q_mch_savr1 chf$r_retval2.chf$q_mch_savr19#define chf$q_mch_retval2 chf$r_retval2.chf$q_mch_retval2;#define chf$ih_mch_retval2 chf$r_retval2.chf$ih_mch_retv al25#define chf$ih_mch_savb1 chf$r_savb1.chf$ih_mch_savb13#define chf$q_mch_savb1 chf$r_savb1.chf$q_mch_savb15#define chf$ih_mch_savb2 chf$r_savb2.chf$ih_mch_savb23#define chf$q_mch_savb2 chf$r_savb2.chf$q_mch_savb25#define chf$ih_mch_savb3 chf$r_savb3.chf$ih_mch_savb33#define chf$q_mch_savb3 chf$r_savb3.chf$q_mch_savb35#define chf$ih_mch_savb4 chf$r_savb4.chf$ih_mch_savb43#define chf$q_mch_savb4 chf$r_savb4.chf$q_mch_savb45#define chf$ih_mch_savb5 chf$r_savb5.chf$ih_mch_savb53#define chf$q_mch_savb5 chf$r_savb5.chf$q_mch_savb55#define chf$ih_mch_ar_lc chf$r_ar_ec.chf$ih_mch_ar_lc3#define chf$q_mch_ar_lc chf$r_ar_ec.chf$q_mch_ar_lc"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifstruct chfdef2 {#pragma __nomember_alignment __union { __int64 chf$ q_mch_args; __struct { int chf$is_mch_args; __union {N int chf$is_mch_flags; /*Flags */N __struct { /*Flags bits. */U unsigned chf$v_fpregs_valid : 1; /*FP registers stored in MCH. */5 unsigned chf$v_fpregs2_valid : 1;0 unsigned chf$v_fill_71_ : 6;+ } chf$r_mch_flags_bits;'  } chf$r_mch_flags_desc;# } chf$r_mch_args_desc2; } chf$r_mch_args_desc1; __int64 chf$q_mch_frame; __union { __int64 chf$q_mch_depth;T __struct { /*2 longwords which are part of MCH_DEPTH */N int chf$is_mch_depth; /*FRAME DEPTH OF ESTABLISHER */N int chf$is_mch_resvd1; /*reserved, paired with DEPTH */$ } chf$r_mch_depth_field; } chf$r_mch_depth_desc; __int64 chf$q_mch_daddr; __int64 chf$q_mch_esf_addr; __int64 chf$q_mch_sig_addr; __union { __int64 chf$q_mch_savr0;! __int64 chf$q_mch_retval;" __int64 chf$ih_mch_retval; } chf$r_retval; __union { __int64 chf$q_mch_savr1;" __int64 chf$q_mch_retval2;# __int64 chf$ih_mch_retval2; } chf$r_retval2;N unsigned __int64 chf$ph_mch_sig64_addr; /*64-bit sig array ptr *// unsigned __int64 chf$ph_mch_savf 32_savf127;/ unsigned char chf$fh_mch_retval_float [16];0 unsigned char chf$fh_mch_retval2_float [16];( unsigned char chf$fh_mch_savf2 [16];( unsigned char chf$fh_mch_savf3 [16];( unsigned char chf$fh_mch_savf4 [16];( unsigned char chf$fh_mch_savf5 [16];) unsigned char chf$fh_mch_savf12 [16];) unsigned char chf$fh_mch_savf13 [16];) unsigned char chf$fh_mch_savf14 [16];) unsigned char chf$fh_mch_savf15 [16];) unsigned char chf$fh_mch_savf16 [16];) unsigned char chf$fh_mch_savf17 [16];) unsigned char chf$fh_mch_savf18 [16];) unsigned char chf$fh_mch_savf19 [16];) unsigned char chf$fh_mch_savf20 [16];) unsigned char chf$fh_mch_savf21 [16];) unsigned char chf$fh_mch_savf22 [16];) unsigned char chf$fh_mch_savf23 [16];) unsigned char chf$fh_mch_savf24 [16];) unsigned char chf$fh_mch_savf25 [16];) unsigned char chf$fh_mch_savf26 [16];) unsigned char chf$fh_mch_savf27 [16];) unsigned char chf$fh_mch_savf28 [16];) unsigned char chf$fh_mch_savf29 [16];) unsigned char chf$fh_mch_savf30 [16];) unsigned char chf$fh_mch_savf31 [16]; __union {! __int64 chf$ih_mch_savb1;N __int64 chf$q_mch_savb1; /* Obsolete definition */ } chf$r_savb1; __union {! __int64 chf$ih_mch_savb2;N __int64 chf$q_mch_savb2; /* Obsolete definition */ } chf$r_savb2; __union {! __int64 chf$ih_mch_s avb3;N __int64 chf$q_mch_savb3; /* Obsolete definition */ } chf$r_savb3; __union {! __int64 chf$ih_mch_savb4;N __int64 chf$q_mch_savb4; /* Obsolete definition */ } chf$r_savb4; __union {! __int64 chf$ih_mch_savb5;N __int64 chf$q_mch_savb5; /* Obsolete definition */ } chf$r_savb5; __union {! __int64 chf$ih_mch_ar_lc;N __int64 chf$q_mch_ar_l!c; /* Obsolete definition */ } chf$r_ar_ec; __int64 chf$ih_mch_ar_ec;% unsigned __int64 chf$ph_mch_ossd;+ unsigned int chf$q_mch_invo_handle [2];* unsigned __int64 chf$ph_mch_uwr_start;% unsigned __int64 chf$ih_mch_fpsr;% unsigned __int64 chf$ih_mch_fpss; } ; #if !defined(__VAXC):#define chf$q_mch_args chf$r_mch_args_desc1.chf$q_mch_argsQ#define chf$is_mch_args chf$r_mch_args_desc1.chf$r_mch_args_desc2.chf$is_mch_argsh#define ch"f$is_mch_flags chf$r_mch_args_desc1.chf$r_mch_args_desc2.chf$r_mch_flags_desc.chf$is_mch_flags#define chf$v_fpregs_valid chf$r_mch_args_desc1.chf$r_mch_args_desc2.chf$r_mch_flags_desc.chf$r_mch_flags_bits.chf$v_fpregs_valid#define chf$v_fpregs2_valid chf$r_mch_args_desc1.chf$r_mch_args_desc2.chf$r_mch_flags_desc.chf$r_mch_flags_bits.chf$v_fpregs2_valid<#define chf$q_mch_depth chf$r_mch_depth_desc.chf$q_mch_depthT#define chf$is_mch_depth chf$r_mch_depth_desc.chf$r_mch_depth_field.chf$is_mch_dep #thV#define chf$is_mch_resvd1 chf$r_mch_depth_desc.chf$r_mch_depth_field.chf$is_mch_resvd14#define chf$q_mch_savr0 chf$r_retval.chf$q_mch_savr06#define chf$q_mch_retval chf$r_retval.chf$q_mch_retval8#define chf$ih_mch_retval chf$r_retval.chf$ih_mch_retval5#define chf$q_mch_savr1 chf$r_retval2.chf$q_mch_savr19#define chf$q_mch_retval2 chf$r_retval2.chf$q_mch_retval2;#define chf$ih_mch_retval2 chf$r_retval2.chf$ih_mch_retval25#define chf$ih_mch_savb1 chf$r_savb1.chf$ih_mch_savb13#define chf$ $q_mch_savb1 chf$r_savb1.chf$q_mch_savb15#define chf$ih_mch_savb2 chf$r_savb2.chf$ih_mch_savb23#define chf$q_mch_savb2 chf$r_savb2.chf$q_mch_savb25#define chf$ih_mch_savb3 chf$r_savb3.chf$ih_mch_savb33#define chf$q_mch_savb3 chf$r_savb3.chf$q_mch_savb35#define chf$ih_mch_savb4 chf$r_savb4.chf$ih_mch_savb43#define chf$q_mch_savb4 chf$r_savb4.chf$q_mch_savb45#define chf$ih_mch_savb5 chf$r_savb5.chf$ih_mch_savb53#define chf$q_mch_savb5 chf$r_savb5.chf$q_mch_savb55#define chf$ih_mch_ar_lc % chf$r_ar_ec.chf$ih_mch_ar_lc3#define chf$q_mch_ar_lc chf$r_ar_ec.chf$q_mch_ar_lc"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define CHF$M_CALEXT_CANCEL 0x1#define CHF$M_CALEXT_LAST 0x2N#define CHF$K_CALEXT_LENGTH 16 /*LENGTH OF CATCH-ALL DESC BLOCK */N#define CHF$C_CALEXT_LENGTH 16 /*LENGTH OF CATCH-ALL DESC BLOCK */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4. &0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _chfdef3 {#pragma __nomember_alignmentN int chf$l_calext_link; /*CATCH-ALL EXTENSION LINK */N int chf$l_calext_address; /*ADDRESS OF CATCH-ALL EXTENSION */ __union {N unsigned int chf$l_calext_flags; /*FLAGS */N __struct { /*FLAGS BITS */N ' unsigned chf$v_calext_cancel : 1; /*REMOVE CATCH-ALL EXTENSION */N unsigned chf$v_calext_last : 1; /*LAST CATCH-ALL EXTENSION */( unsigned chf$v_fill_72_ : 6;& } chf$r_calext_flags_bits;" } chf$r_calext_flags_desc;N unsigned int chf$l_calext_reserved; /*RESERVED */ } CHFDEF3; #if !defined(__VAXC)E#define chf$l_calext_flags chf$r_calext_flags_desc.chf$l_calext_flags_#define chf$v_calext_cancel chf$r_calext_fla (gs_desc.chf$r_calext_flags_bits.chf$v_calext_cancel[#define chf$v_calext_last chf$r_calext_flags_desc.chf$r_calext_flags_bits.chf$v_calext_last"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct chfdef3 {#pragma __nomember_alignmentN int chf$l_calext_link; /*CATCH- )ALL EXTENSION LINK */N int chf$l_calext_address; /*ADDRESS OF CATCH-ALL EXTENSION */ __union {N unsigned int chf$l_calext_flags; /*FLAGS */N __struct { /*FLAGS BITS */N unsigned chf$v_calext_cancel : 1; /*REMOVE CATCH-ALL EXTENSION */N unsigned chf$v_calext_last : 1; /*LAST CATCH-ALL EXTENSION */( unsigned chf$v_fill_72_ : 6;& } ch *f$r_calext_flags_bits;" } chf$r_calext_flags_desc;N unsigned int chf$l_calext_reserved; /*RESERVED */ } ; #if !defined(__VAXC)E#define chf$l_calext_flags chf$r_calext_flags_desc.chf$l_calext_flags_#define chf$v_calext_cancel chf$r_calext_flags_desc.chf$r_calext_flags_bits.chf$v_calext_cancel[#define chf$v_calext_last chf$r_calext_flags_desc.chf$r_calext_flags_bits.chf$v_calext_last"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW+_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _chfdef6 {#pragma __nomember_alignment __union {P int chf64$l_sig_args; /* Longword including count & options */ __struct {N short int chf64$w_sig_arg_count; /* Word holding count itself */T short ,int chf64$w_sig_msg_options; /* Word containing message options */ } chf64$r_sig_words;! } chf64$r_sig_args_union;` int chf64$l_signal64; /* 64-bit array tag: overlays sig_name of 32b version */N __int64 chf64$q_sig_name; /* Signal value */N __int64 chf64$q_sig_arg1; /* First signal argument */ } CHFDEF6; #if !defined(__VAXC)@#define chf64$l_sig_args chf64$r_sig_args_union.chf64$l_sig_args\#d -efine chf64$w_sig_arg_count chf64$r_sig_args_union.chf64$r_sig_words.chf64$w_sig_arg_count`#define chf64$w_sig_msg_options chf64$r_sig_args_union.chf64$r_sig_words.chf64$w_sig_msg_options"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifstruct chfdef6 {#pragma __nomember_alignment __ .union {P int chf64$l_sig_args; /* Longword including count & options */ __struct {N short int chf64$w_sig_arg_count; /* Word holding count itself */T short int chf64$w_sig_msg_options; /* Word containing message options */ } chf64$r_sig_words;! } chf64$r_sig_args_union;` int chf64$l_signal64; /* 64-bit array tag: overlays sig_name of 32b version */N int chf64$q_sig_name [2]; /* Signal value / */N int chf64$q_sig_arg1 [2]; /* First signal argument */ } ; #if !defined(__VAXC)@#define chf64$l_sig_args chf64$r_sig_args_union.chf64$l_sig_args\#define chf64$w_sig_arg_count chf64$r_sig_args_union.chf64$r_sig_words.chf64$w_sig_arg_count`#define chf64$w_sig_msg_options chf64$r_sig_args_union.chf64$r_sig_words.chf64$w_sig_msg_options"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLET#def0ine chf$arglist _chfdef!#define chf$signal_array _chfdef1#define chf$mech_array _chfdef2##define chf64$signal_array _chfdef6#define CHF$ARGLIST CHFDEF #define CHF$SIGNAL_ARRAY CHFDEF1#define CHF$MECH_ARRAY CHFDEF2"#define CHF64$SIGNAL_ARRAY CHFDEF6#else#define chf$arglist chfdef #define chf$signal_array chfdef1#define chf$mech_array chfdef2"#define chf64$signal_array chfdef6#endif $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever p1tr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CHFDEF_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */ww$/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 2 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $CHKPNTDEF ***/#ifndef __CHKPNTDEF_LOADED#define __CHKPNTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr3 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_s4truct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*- */N/* */N/* Define flags for calls to create checkpointable processes */N/*+ */!#define CHKPNT$M_AUTO_RESTART 0x1 5#define CHKPNT$M_DEBUG 0x2#define CHKPNT$M_ASYNC 0x4 #ifdef __NEW_STARLETtypedef struct _chkpntdef {N unsigned chkpnt$v_auto_restart : 1; /* auto-restart detached process */N unsigned chkpnt$v_debug : 1; /* merge in DEBUG */N unsigned chkpnt$v_async : 1; /* asynchronous checkpoint process */# unsigned chkpnt$v_fill_73_ : 5; } CHKPNTDEF;#else /* __OLD_STARLET */struct chkpntdef {N unsigned chkpnt$v_auto_restart : 1; /* a 6uto-restart detached process */N unsigned chkpnt$v_debug : 1; /* merge in DEBUG */N unsigned chkpnt$v_async : 1; /* asynchronous checkpoint process */# unsigned chkpnt$v_fill_73_ : 5; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size 7*/#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CHKPNTDEF_LOADED */ wws/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//*********************************************************************************************** 8*********************************//*** MODULE $CHPDEF ***/#ifndef __CHPDEF_LOADED#define __CHPDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 defaul9t 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 N/* : */N/* Item code definition for the $CHKPRO (check protection) system service. */N/* */N#define CHP$_END 0 /* list end */N#define CHP$_ACCESS 1 /* intended access */N#define CHP$_FLAGS 2 /* read / write flags */N#define CHP$_PRIV 3 /* privilege mask ; */N#define CHP$_ACMODE 4 /* accessor access mode */N#define CHP$_ACCLASS 5 /* accessor security classification */N#define CHP$_RIGHTS 6 /* rights list */N#define CHP$_ADD_RIGHTS 7 /* additional rights list segments */N#define CHP$_MODE 8 /* simple access mode */N#define CHP$_MODES 9 /* per action access mode */N#define CH<P$_MIN_CLASS 10 /* minimum security classification */N#define CHP$_MAX_CLASS 11 /* maximum security classification */N#define CHP$_OWNER 12 /* object owner UIC */N#define CHP$_PROT 13 /* protection mask */N#define CHP$_ACL 14 /* access control list segment */N#define CHP$_AUDIT_NAME 15 /* audit names returned */N#define CHP$_ALARM_NAME 16 = /* alarm names returned */N#define CHP$_MATCHED_ACE 17 /* address of matching ACE */P#define CHP$_PRIVUSED 18 /* address of mask of privileges used */U#define CHP$_AUDIT_LIST 19 /* address of supplemental audit item list */N#define CHP$_OBJECT_NAME 20 /* object name descriptor */N#define CHP$_OBJECT_CLASS 21 /* object class name descriptor */N#define CHP$_UIC 22 /* accessor >UIC */P#define CHP$_OBJECT_SPECIFIC 23 /* object specific longword (for OSR) */N/* add new item codes before here */N#define CHP$_MAX_CODE 24 /* highest CHP$ item code */#define CHP$_ADDRIGHTS 7#define CHP$_MINCLASS 10#define CHP$_MAXCLASS 11#define CHP$_AUDITNAME 15#define CHP$_ALARMNAME 16#define CHP$_MATCHEDACE 17#define CHP$_CLASS 5$#define CHP$K_MATCHED_ACE_LENGTH 255#define CHP$K_?ALARM_LENGTH 768#define CHP$K_AUDIT_LENGTH 1560#define CHP$M_SYSPRV 0x1#define CHP$M_BYPASS 0x2#define CHP$M_UPGRADE 0x4#define CHP$M_DOWNGRADE 0x8#define CHP$M_GRPPRV 0x10#define CHP$M_READALL 0x20#define CHP$M_OPER 0x40#define CHP$M_GRPNAM 0x80#define CHP$M_SYSNAM 0x100#define CHP$M_GROUP 0x200#define CHP$M_WORLD 0x400#define CHP$M_PRMCEB 0x800 #define CHP$K_NUMBER_OF_PRIVS 12 #ifdef __NEW_STARLET!typedef struct _privs_used_bits {N unsigned chp$v_sysprv @: 1; /* access via SYSPRV privilege */N unsigned chp$v_bypass : 1; /* access via BYPASS privilege */N unsigned chp$v_upgrade : 1; /* access via UPGRADE privilege */N unsigned chp$v_downgrade : 1; /* access via DOWNGRADE privilege */N unsigned chp$v_grpprv : 1; /* access via GRPPRV privilege */N unsigned chp$v_readall : 1; /* access via READALL privilege */N unsigned chp$v_oper : 1; /* access vi Aa OPER privilege */N unsigned chp$v_grpnam : 1; /* access via GRPNAM privilege */N unsigned chp$v_sysnam : 1; /* access via SYSNAM privilege */N unsigned chp$v_group : 1; /* access via GROUP privilege */N unsigned chp$v_world : 1; /* access via WORLD privilege */N unsigned chp$v_prmceb : 1; /* access via PRMCEB privilege */ unsigned chp$v_fill_74_ : 4; } PRIVS_USED_BITS;#else /* __OLD_SBTARLET */struct privs_used_bits {N unsigned chp$v_sysprv : 1; /* access via SYSPRV privilege */N unsigned chp$v_bypass : 1; /* access via BYPASS privilege */N unsigned chp$v_upgrade : 1; /* access via UPGRADE privilege */N unsigned chp$v_downgrade : 1; /* access via DOWNGRADE privilege */N unsigned chp$v_grpprv : 1; /* access via GRPPRV privilege */N unsigned chp$v_readall : 1; /* access via READALL privilCege */N unsigned chp$v_oper : 1; /* access via OPER privilege */N unsigned chp$v_grpnam : 1; /* access via GRPNAM privilege */N unsigned chp$v_sysnam : 1; /* access via SYSNAM privilege */N unsigned chp$v_group : 1; /* access via GROUP privilege */N unsigned chp$v_world : 1; /* access via WORLD privilege */N unsigned chp$v_prmceb : 1; /* access via PRMCEB privilege */ unsigned cDhp$v_fill_74_ : 4; } ;%#endif /* #ifdef __NEW_STARLET */#define CHP$M_OBSERVE 0x1#define CHP$M_ALTER 0x2#define CHP$M_READ 0x1#define CHP$M_WRITE 0x2#define CHP$M_USEREADALL 0x4#define CHP$M_AUDIT 0x8#define CHP$M_NOFAILAUD 0x10#define CHP$M_NOSUCCAUD 0x20#define CHP$M_DELETE 0x40#define CHP$M_MANDATORY 0x80#define CHP$M_FLUSH 0x100#define CHP$M_CREATE 0x200#define CHP$M_INTERNAL 0x400#define CHP$M_SERVER 0x800 #ifdef __NEW_STARLETtypedef union _fla Eg_bits { __struct {N unsigned chp$v_observe : 1; /* non-discretionary read access */N unsigned chp$v_alter : 1; /* non-discretionary write access */$ unsigned chp$v_fill_75_ : 6; } chp$r_sevms_defs; __struct {N unsigned chp$v_read : 1; /* non-discretionary read access */N unsigned chp$v_write : 1; /* non-discretionary write access */N unsigned chp$v_usereadall : 1; /* READALL privilege applies F */N unsigned chp$v_audit : 1; /* access audit requested */P unsigned chp$v_nofailaud : 1; /* do not perform failed access audit */T unsigned chp$v_nosuccaud : 1; /* do not perform successful access audit */P unsigned chp$v_delete : 1; /* perform audit as delete event type */N unsigned chp$v_mandatory : 1; /* perform mandatory audit */P unsigned chp$v_flush : 1; /* force buffer flush in AUDIT_SERVER */P G unsigned chp$v_create : 1; /* perform audit as create event type */N unsigned chp$v_internal : 1; /* audit on behalf of VMS TCB */T unsigned chp$v_server : 1; /* audit originates in TCB server process */$ unsigned chp$v_fill_76_ : 4; } chp$r_vms_defs; } FLAG_BITS; #if !defined(__VAXC)4#define chp$v_observe chp$r_sevms_defs.chp$v_observe0#define chp$v_alter chp$r_sevms_defs.chp$v_alter,#define chp$v_read chp$r_vms_defs.chp$v_read.#def Hine chp$v_write chp$r_vms_defs.chp$v_write8#define chp$v_usereadall chp$r_vms_defs.chp$v_usereadall.#define chp$v_audit chp$r_vms_defs.chp$v_audit6#define chp$v_nofailaud chp$r_vms_defs.chp$v_nofailaud6#define chp$v_nosuccaud chp$r_vms_defs.chp$v_nosuccaud0#define chp$v_delete chp$r_vms_defs.chp$v_delete6#define chp$v_mandatory chp$r_vms_defs.chp$v_mandatory.#define chp$v_flush chp$r_vms_defs.chp$v_flush0#define chp$v_create chp$r_vms_defs.chp$v_create4#define chp$v_internal chp$r_vms_defs.chIp$v_internal0#define chp$v_server chp$r_vms_defs.chp$v_server"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union flag_bits { __struct {N unsigned chp$v_observe : 1; /* non-discretionary read access */N unsigned chp$v_alter : 1; /* non-discretionary write access */$ unsigned chp$v_fill_75_ : 6; } chp$r_sevms_defs; __struct {N unsigned chp$v_read : 1; /* non-discretionary read access */N J unsigned chp$v_write : 1; /* non-discretionary write access */N unsigned chp$v_usereadall : 1; /* READALL privilege applies */N unsigned chp$v_audit : 1; /* access audit requested */P unsigned chp$v_nofailaud : 1; /* do not perform failed access audit */T unsigned chp$v_nosuccaud : 1; /* do not perform successful access audit */P unsigned chp$v_delete : 1; /* perform audit as delete event type */N unsigned chp$v K_mandatory : 1; /* perform mandatory audit */P unsigned chp$v_flush : 1; /* force buffer flush in AUDIT_SERVER */P unsigned chp$v_create : 1; /* perform audit as create event type */N unsigned chp$v_internal : 1; /* audit on behalf of VMS TCB */T unsigned chp$v_server : 1; /* audit originates in TCB server process */$ unsigned chp$v_fill_76_ : 4; } chp$r_vms_defs; } ; #if !defined(__VAXC)4#define chp$v_ob Lserve chp$r_sevms_defs.chp$v_observe0#define chp$v_alter chp$r_sevms_defs.chp$v_alter,#define chp$v_read chp$r_vms_defs.chp$v_read.#define chp$v_write chp$r_vms_defs.chp$v_write8#define chp$v_usereadall chp$r_vms_defs.chp$v_usereadall.#define chp$v_audit chp$r_vms_defs.chp$v_audit6#define chp$v_nofailaud chp$r_vms_defs.chp$v_nofailaud6#define chp$v_nosuccaud chp$r_vms_defs.chp$v_nosuccaud0#define chp$v_delete chp$r_vms_defs.chp$v_delete6#define chp$v_mandatory chp$r_vms_defs.chp$v_mandatory.M#define chp$v_flush chp$r_vms_defs.chp$v_flush0#define chp$v_create chp$r_vms_defs.chp$v_create4#define chp$v_internal chp$r_vms_defs.chp$v_internal0#define chp$v_server chp$r_vms_defs.chp$v_server"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define CHP$M_NOACCESS 0x1#define CHP$M_REMDUPID 0x2#define CHP$M_INCSYSID 0x4#define CHP$M_INCIMGID 0x8#define CHP$M_DEFPRIV 0x10#define CHP$M_DEFCLASS 0x20 #ifdef __NEW_STARLETtypedef struct _profile_flagNs {P unsigned chp$v_noaccess : 1; /* do not access UAF to build profile */P unsigned chp$v_remdupid : 1; /* remove duplicate system rights IDs */N unsigned chp$v_incsysid : 1; /* include system rights IDs */N unsigned chp$v_incimgid : 1; /* include image rights IDs */P unsigned chp$v_defpriv : 1; /* initialize privs from default mask */P unsigned chp$v_defclass : 1; /* initialize class from default mask */ unsigned O chp$v_fill_77_ : 2; } PROFILE_FLAGS;#else /* __OLD_STARLET */struct profile_flags {P unsigned chp$v_noaccess : 1; /* do not access UAF to build profile */P unsigned chp$v_remdupid : 1; /* remove duplicate system rights IDs */N unsigned chp$v_incsysid : 1; /* include system rights IDs */N unsigned chp$v_incimgid : 1; /* include image rights IDs */P unsigned chp$v_defpriv : 1; /* initialize privs from default mask */PP unsigned chp$v_defclass : 1; /* initialize class from default mask */ unsigned chp$v_fill_77_ : 2; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CHPDEF_LOADED */ wwQK进/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************/!/*** MODULE CIADEF IDENT x-4 ***/#ifndef __CIADEF_LOADED#define __CIADEF_LOADED R1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 ...#definSe __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 #define CIA$K_SCAN 1#define CIA$K_DELETE 2#define CIA$K_SHOW 3#define CIA$K_PERFORMANCE 4 #define CIA$K_ZERO_PERFORMANCE 5#define CIA$K_SCANT_EXTENDED 6#define CIA$K_DELETE_EXTENDED 7#define CIA$K_SHOW_EXTENDED 8#define CIA$K_MAX_CIA_CODE 9##define CIA$K_PERFORMANCE_LENGTH 40 #ifdef __NEW_STARLETtypedef struct _performance {& unsigned int cia$l_total_messages;( unsigned int cia$l_total_exceptions; unsigned int cia$l_shows; unsigned int cia$l_scans; unsigned int cia$l_deletes;# unsigned int cia$l_performance; unsigned int cia$l_audits;( unsigned int cia$l_invalid_messages;! unsiUgned int cia$l_intruders; unsigned int cia$l_suspects; } PERFORMANCE;#else /* __OLD_STARLET */struct performance {& unsigned int cia$l_total_messages;( unsigned int cia$l_total_exceptions; unsigned int cia$l_shows; unsigned int cia$l_scans; unsigned int cia$l_deletes;# unsigned int cia$l_performance; unsigned int cia$l_audits;( unsigned int cia$l_invalid_messages;! unsigned int cia$l_intruders; unsigned int cia$l_suspects; } ;V%#endif /* #ifdef __NEW_STARLET */'#define CIA$K_SOURCE_TERMINAL_LENGTH 64)#define CIA$K_SOURCE_NODE_MAX_LENGTH 1024'#define CIA$K_USER_SPEC_MAX_LENGTH 1058'#define CIA$K_USER_STRING_MAX_LENGTH 32$#define CIA$K_PASSWORD_MAX_LENGTH 32+#define CIA$K_SOURCE_ADDRESS_MAX_LENGTH 128#define CIA$K_SCSNODE_LENGTH 8%#define CIA$K_SCSNODE_REPLY_LENGTH 12!#define CIA$K_USERDATA_LENGTH 256 #ifdef __NEW_STARLET"typedef struct _cia$generic_desc {) unsigned short int cia$w_desc_lengthW;# unsigned short int cia$w_fill1; char cia$t_desc_data; } CIA$GENERIC_DESC;#else /* __OLD_STARLET */struct cia$generic_desc {) unsigned short int cia$w_desc_length;# unsigned short int cia$w_fill1; char cia$t_desc_data; } ;%#endif /* #ifdef __NEW_STARLET */#define CIAEXT$S_PACKET 4 #ifdef __NEW_STARLET"typedef struct _extension_packet {N unsigned short int ciaext$w_type; /* packet type */S unsigned short i Xnt ciaext$w_length; /* packet length NOT including T/L words */#if defined(__VAXC) char ciaext$r_value[];#elseU/* Warning: empty char[] member for ciaext$r_value at end of structure not created */"#endif /* #if defined(__VAXC) */ } EXTENSION_PACKET;#else /* __OLD_STARLET */struct extension_packet {N unsigned short int ciaext$w_type; /* packet type */S unsigned short int ciaext$w_length; /* packet length NOT including T/L words */#if deYfined(__VAXC) char ciaext$r_value[];#elseU/* Warning: empty char[] member for ciaext$r_value at end of structure not created */"#endif /* #if defined(__VAXC) */ } ;%#endif /* #ifdef __NEW_STARLET */#define CIAEXT$_USER_DATA 100#define CIAEXT$_SCSNODE 101!#define CIAEXT$_SCSNODE_REPLY 102#define CIAEXT$_IMAGE_NAME 103##define CIAEXT$_MAX_CIAEXT_CODE 104N#define CIA$_SCSNODE_LIST 200 /* List of nodes for which to act */N#define CIA$_SCSNODE 201 Z /* Single node for SCAN */N#define CIA$_OUTPUT_LIST 202 /* List of nodes records occured on */N#define CIA$_USER_DATA 203 /* Opaque Data. We don't use it. */S#define CIA$_USER_CRITERIAL 204 /* Existing argument passed by item list */T#define CIA$_FAILED_USERNAME 205 /* Existing argument passsed by item list */N#define CIA$_IMAGE_NAME 206 /* Image name performing scan */#define CIA$_MAX_CIA_ITEM 207&#define CIA$K_[IMAGE_NAME_MAX_SIZE 4096 #ifdef __NEW_STARLETtypedef struct _image_name {* unsigned short int cia$w_image_length;* unsigned short int cia$w_image_unused;# char cia$t_image_string [4096]; } IMAGE_NAME;#else /* __OLD_STARLET */struct image_name {* unsigned short int cia$w_image_length;* unsigned short int cia$w_image_unused;# char cia$t_image_string [4096]; } ;%#endif /* #ifdef __NEW_STARLET */ #define CIA$M_IGNORE_RETURN 0x1#define CI\A$M_RESERVED_1 0xFE#define CIA$M_SUSPECTS 0x100#define CIA$M_INTRUDERS 0x200&#define CIA$M_SECONDARY_PASSWORD 0x400#define CIA$M_NOAUDIT 0x800"#define CIA$M_REAL_USERNAME 0x1000#define CIA$M_SHOW_NODE 0x2000#define CIA$M_ITEMLIST 0x4000#define CIA$M_FILL_1 0xFFFF8000#define CIA$K_HEADER_LENGTH 8 #ifdef __NEW_STARLETtypedef struct _header { unsigned int cia$l_context; __union {( unsigned int cia$l_header_flags; __struct {- unsigned] cia$v_ignore_return : 1;* unsigned cia$v_reserved_1 : 7;( unsigned cia$v_suspects : 1;) unsigned cia$v_intruders : 1;2 unsigned cia$v_secondary_password : 1;' unsigned cia$v_noaudit : 1;- unsigned cia$v_real_username : 1;) unsigned cia$v_show_node : 1;( unsigned cia$v_itemlist : 1;' unsigned cia$v_fill_1 : 17; } cia$r_fill_79_; } cia$r_fill_78_; } HEADER; ^#if !defined(__VAXC)<#define cia$l_header_flags cia$r_fill_78_.cia$l_header_flagsM#define cia$v_ignore_return cia$r_fill_78_.cia$r_fill_79_.cia$v_ignore_returnG#define cia$v_reserved_1 cia$r_fill_78_.cia$r_fill_79_.cia$v_reserved_1C#define cia$v_suspects cia$r_fill_78_.cia$r_fill_79_.cia$v_suspectsE#define cia$v_intruders cia$r_fill_78_.cia$r_fill_79_.cia$v_intrudersW#define cia$v_secondary_password cia$r_fill_78_.cia$r_fill_79_.cia$v_secondary_passwordA#define cia$v_noaudit cia$r_fill_7 _8_.cia$r_fill_79_.cia$v_noauditM#define cia$v_real_username cia$r_fill_78_.cia$r_fill_79_.cia$v_real_usernameE#define cia$v_show_node cia$r_fill_78_.cia$r_fill_79_.cia$v_show_nodeC#define cia$v_itemlist cia$r_fill_78_.cia$r_fill_79_.cia$v_itemlist?#define cia$v_fill_1 cia$r_fill_78_.cia$r_fill_79_.cia$v_fill_1"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct header { unsigned int cia$l_context; __union {( unsigned int cia$l_header_flags; ` __struct {- unsigned cia$v_ignore_return : 1;* unsigned cia$v_reserved_1 : 7;( unsigned cia$v_suspects : 1;) unsigned cia$v_intruders : 1;2 unsigned cia$v_secondary_password : 1;' unsigned cia$v_noaudit : 1;- unsigned cia$v_real_username : 1;) unsigned cia$v_show_node : 1;( unsigned cia$v_itemlist : 1;' unsigned cia$v_fill_1 : 17; } cia$r_fill_79_; a } cia$r_fill_78_; } ; #if !defined(__VAXC)<#define cia$l_header_flags cia$r_fill_78_.cia$l_header_flagsM#define cia$v_ignore_return cia$r_fill_78_.cia$r_fill_79_.cia$v_ignore_returnG#define cia$v_reserved_1 cia$r_fill_78_.cia$r_fill_79_.cia$v_reserved_1C#define cia$v_suspects cia$r_fill_78_.cia$r_fill_79_.cia$v_suspectsE#define cia$v_intruders cia$r_fill_78_.cia$r_fill_79_.cia$v_intrudersW#define cia$v_secondary_password cia$r_fill_78_.cia$r_fill_79_.cia$v_secondary_passwordA b#define cia$v_noaudit cia$r_fill_78_.cia$r_fill_79_.cia$v_noauditM#define cia$v_real_username cia$r_fill_78_.cia$r_fill_79_.cia$v_real_usernameE#define cia$v_show_node cia$r_fill_78_.cia$r_fill_79_.cia$v_show_nodeC#define cia$v_itemlist cia$r_fill_78_.cia$r_fill_79_.cia$v_itemlist?#define cia$v_fill_1 cia$r_fill_78_.cia$r_fill_79_.cia$v_fill_1"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */$#define CIA$K_SHOW_INPUT_LENGTH 1062&#define CIA$K_DELETE_INPUT_LENGTcH 1062 #ifdef __NEW_STARLETtypedef struct _contents {$ unsigned short int cia$w_length;$ unsigned short int cia$w_unused; char cia$t_name [1058]; } CONTENTS;#else /* __OLD_STARLET */struct contents {$ unsigned short int cia$w_length;$ unsigned short int cia$w_unused; char cia$t_name [1058]; } ;%#endif /* #ifdef __NEW_STARLET */'#define CIA$K_SCAN_CONTENTS_LENGTH 1386 #ifdef __NEW_STARLETtypedef struct _scan_contents {! unsignded int cia$l_parent_id; unsigned int cia$l_job_type;$ unsigned int cia$l_login_status; __union {( char cia$t_source_terminal [68]; __struct {8 unsigned short int cia$w_source_term_length;. unsigned short int cia$w_unused_1;- char cia$t_source_term_name [64]; } cia$r_fill_81_; } cia$r_fill_80_; __union {$ char cia$t_source_user [36]; __struct {8 unsigned short int cia$w_seource_user_length;. unsigned short int cia$w_unused_2;- char cia$t_source_user_name [32]; } cia$r_fill_83_; } cia$r_fill_82_; __union {( char cia$t_source_address [132]; __struct {8 unsigned short int cia$w_source_addr_length;. unsigned short int cia$w_unused_3;1 char cia$t_source_address_name [128]; } cia$r_fill_85_; } cia$r_fill_84_;& unsigned short int cia$w_unufsed_4; __struct {4 unsigned short int cia$w_failed_user_length;* unsigned short int cia$w_unused_5;) char cia$t_failed_user_name [32]; } cia$r_failed_user; __union {( char cia$t_failed_password [36]; __struct {8 unsigned short int cia$w_failed_pass_length;. unsigned short int cia$w_unused_6;- char cia$t_failed_pass_name [32]; } cia$r_fill_87_; } cia$r_fill_86_; __union { g$ char cia$t_parent_user [36]; __struct {8 unsigned short int cia$w_parent_user_length;. unsigned short int cia$w_unused_7;- char cia$t_parent_user_name [32]; } cia$r_fill_89_; } cia$r_fill_88_; __union {& char cia$t_source_node [1028]; __struct {8 unsigned short int cia$w_source_node_length;. unsigned short int cia$w_unused_8;/ char cia$t_source_node_name [1024] h; } cia$r_fill_91_; } cia$r_fill_90_; } SCAN_CONTENTS; #if !defined(__VAXC)B#define cia$t_source_terminal cia$r_fill_80_.cia$t_source_terminalW#define cia$w_source_term_length cia$r_fill_80_.cia$r_fill_81_.cia$w_source_term_lengthS#define cia$t_source_term_name cia$r_fill_80_.cia$r_fill_81_.cia$t_source_term_name:#define cia$t_source_user cia$r_fill_82_.cia$t_source_userW#define cia$w_source_user_length cia$r_fill_82_.cia$r_fill_83_.cia$w_source_user_lengthSi#define cia$t_source_user_name cia$r_fill_82_.cia$r_fill_83_.cia$t_source_user_name@#define cia$t_source_address cia$r_fill_84_.cia$t_source_addressW#define cia$w_source_addr_length cia$r_fill_84_.cia$r_fill_85_.cia$w_source_addr_lengthY#define cia$t_source_address_name cia$r_fill_84_.cia$r_fill_85_.cia$t_source_address_nameK#define cia$w_failed_user_length cia$r_failed_user.cia$w_failed_user_lengthG#define cia$t_failed_user_name cia$r_failed_user.cia$t_failed_user_nameB#define cia$t_failedj_password cia$r_fill_86_.cia$t_failed_passwordW#define cia$w_failed_pass_length cia$r_fill_86_.cia$r_fill_87_.cia$w_failed_pass_lengthS#define cia$t_failed_pass_name cia$r_fill_86_.cia$r_fill_87_.cia$t_failed_pass_name:#define cia$t_parent_user cia$r_fill_88_.cia$t_parent_userW#define cia$w_parent_user_length cia$r_fill_88_.cia$r_fill_89_.cia$w_parent_user_lengthS#define cia$t_parent_user_name cia$r_fill_88_.cia$r_fill_89_.cia$t_parent_user_name:#define cia$t_source_node cia$r_fill_90_.cia$tk_source_nodeW#define cia$w_source_node_length cia$r_fill_90_.cia$r_fill_91_.cia$w_source_node_lengthS#define cia$t_source_node_name cia$r_fill_90_.cia$r_fill_91_.cia$t_source_node_name"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct scan_contents {! unsigned int cia$l_parent_id; unsigned int cia$l_job_type;$ unsigned int cia$l_login_status; __union {( char cia$t_source_terminal [68]; __struct {8 unsigned short int clia$w_source_term_length;. unsigned short int cia$w_unused_1;- char cia$t_source_term_name [64]; } cia$r_fill_81_; } cia$r_fill_80_; __union {$ char cia$t_source_user [36]; __struct {8 unsigned short int cia$w_source_user_length;. unsigned short int cia$w_unused_2;- char cia$t_source_user_name [32]; } cia$r_fill_83_; } cia$r_fill_82_; __union {( char cia$tm_source_address [132]; __struct {8 unsigned short int cia$w_source_addr_length;. unsigned short int cia$w_unused_3;1 char cia$t_source_address_name [128]; } cia$r_fill_85_; } cia$r_fill_84_;& unsigned short int cia$w_unused_4; __struct {4 unsigned short int cia$w_failed_user_length;* unsigned short int cia$w_unused_5;) char cia$t_failed_user_name [32]; } cia$r_failed_user; __union n {( char cia$t_failed_password [36]; __struct {8 unsigned short int cia$w_failed_pass_length;. unsigned short int cia$w_unused_6;- char cia$t_failed_pass_name [32]; } cia$r_fill_87_; } cia$r_fill_86_; __union {$ char cia$t_parent_user [36]; __struct {8 unsigned short int cia$w_parent_user_length;. unsigned short int cia$w_unused_7;- char cia$t_parent_user_name [3o2]; } cia$r_fill_89_; } cia$r_fill_88_; __union {& char cia$t_source_node [1028]; __struct {8 unsigned short int cia$w_source_node_length;. unsigned short int cia$w_unused_8;/ char cia$t_source_node_name [1024]; } cia$r_fill_91_; } cia$r_fill_90_; } ; #if !defined(__VAXC)B#define cia$t_source_terminal cia$r_fill_80_.cia$t_source_terminalW#define cia$w_source_term_length cia$r_filpl_80_.cia$r_fill_81_.cia$w_source_term_lengthS#define cia$t_source_term_name cia$r_fill_80_.cia$r_fill_81_.cia$t_source_term_name:#define cia$t_source_user cia$r_fill_82_.cia$t_source_userW#define cia$w_source_user_length cia$r_fill_82_.cia$r_fill_83_.cia$w_source_user_lengthS#define cia$t_source_user_name cia$r_fill_82_.cia$r_fill_83_.cia$t_source_user_name@#define cia$t_source_address cia$r_fill_84_.cia$t_source_addressW#define cia$w_source_addr_length cia$r_fill_84_.cia$r_fill_85_.cia$w_sqource_addr_lengthY#define cia$t_source_address_name cia$r_fill_84_.cia$r_fill_85_.cia$t_source_address_nameK#define cia$w_failed_user_length cia$r_failed_user.cia$w_failed_user_lengthG#define cia$t_failed_user_name cia$r_failed_user.cia$t_failed_user_nameB#define cia$t_failed_password cia$r_fill_86_.cia$t_failed_passwordW#define cia$w_failed_pass_length cia$r_fill_86_.cia$r_fill_87_.cia$w_failed_pass_lengthS#define cia$t_failed_pass_name cia$r_fill_86_.cia$r_fill_87_.cia$t_failed_pass_namer:#define cia$t_parent_user cia$r_fill_88_.cia$t_parent_userW#define cia$w_parent_user_length cia$r_fill_88_.cia$r_fill_89_.cia$w_parent_user_lengthS#define cia$t_parent_user_name cia$r_fill_88_.cia$r_fill_89_.cia$t_parent_user_name:#define cia$t_source_node cia$r_fill_90_.cia$t_source_nodeW#define cia$w_source_node_length cia$r_fill_90_.cia$r_fill_91_.cia$w_source_node_lengthS#define cia$t_source_node_name cia$r_fill_90_.cia$r_fill_91_.cia$t_source_node_name"#endif /* #if !defined(__VAXC) s*/ %#endif /* #ifdef __NEW_STARLET */#define CIA$M_INTRUDER 0x1#define CIA$M_SUSPECT 0x2#define CIA$M_NETWORK 0x4#define CIA$M_TERM_USER 0x8#define CIA$M_TERMINAL 0x10#define CIA$M_USERNAME 0x20#define CIA$M_FILL_2 0xFFFFFFC0%#define CIA$K_SHOW_OUTPUT_LENGTH 1086 #ifdef __NEW_STARLETtypedef struct _show_output { unsigned int cia$l_status;( unsigned int cia$l_returned_context;+ unsigned __int64 cia$q_expiration_time; __union {! unsignedt int cia$l_flags; __struct {( unsigned cia$v_intruder : 1;' unsigned cia$v_suspect : 1;' unsigned cia$v_network : 1;) unsigned cia$v_term_user : 1;( unsigned cia$v_terminal : 1;( unsigned cia$v_username : 1;' unsigned cia$v_fill_2 : 26; } cia$r_fill_93_; } cia$r_fill_92_;% unsigned int cia$l_attempt_count; __union {$ char cia$t_user_spec [1062]; __stru uct {6 unsigned short int cia$w_user_spec_length;. unsigned short int cia$w_unused_8;- char cia$t_user_spec_name [1058]; } cia$r_fill_95_; } cia$r_fill_94_; } SHOW_OUTPUT; #if !defined(__VAXC).#define cia$l_flags cia$r_fill_92_.cia$l_flagsC#define cia$v_intruder cia$r_fill_92_.cia$r_fill_93_.cia$v_intruderA#define cia$v_suspect cia$r_fill_92_.cia$r_fill_93_.cia$v_suspectA#define cia$v_network cia$r_fill_92_.cia$r_fill_93_.ci va$v_networkE#define cia$v_term_user cia$r_fill_92_.cia$r_fill_93_.cia$v_term_userC#define cia$v_terminal cia$r_fill_92_.cia$r_fill_93_.cia$v_terminalC#define cia$v_username cia$r_fill_92_.cia$r_fill_93_.cia$v_username6#define cia$t_user_spec cia$r_fill_94_.cia$t_user_specS#define cia$w_user_spec_length cia$r_fill_94_.cia$r_fill_95_.cia$w_user_spec_lengthO#define cia$t_user_spec_name cia$r_fill_94_.cia$r_fill_95_.cia$t_user_spec_name"#endif /* #if !defined(__VAXC) */ #else /* __OwLD_STARLET */struct show_output { unsigned int cia$l_status;( unsigned int cia$l_returned_context;+ unsigned int cia$q_expiration_time [2]; __union {! unsigned int cia$l_flags; __struct {( unsigned cia$v_intruder : 1;' unsigned cia$v_suspect : 1;' unsigned cia$v_network : 1;) unsigned cia$v_term_user : 1;( unsigned cia$v_terminal : 1;( unsigned cia$v_username : 1;' unsignedx cia$v_fill_2 : 26; } cia$r_fill_93_; } cia$r_fill_92_;% unsigned int cia$l_attempt_count; __union {$ char cia$t_user_spec [1062]; __struct {6 unsigned short int cia$w_user_spec_length;. unsigned short int cia$w_unused_8;- char cia$t_user_spec_name [1058]; } cia$r_fill_95_; } cia$r_fill_94_; } ; #if !defined(__VAXC).#define cia$l_flags cia$r_fill_92_.cia$l_flagsC#define cia$yv_intruder cia$r_fill_92_.cia$r_fill_93_.cia$v_intruderA#define cia$v_suspect cia$r_fill_92_.cia$r_fill_93_.cia$v_suspectA#define cia$v_network cia$r_fill_92_.cia$r_fill_93_.cia$v_networkE#define cia$v_term_user cia$r_fill_92_.cia$r_fill_93_.cia$v_term_userC#define cia$v_terminal cia$r_fill_92_.cia$r_fill_93_.cia$v_terminalC#define cia$v_username cia$r_fill_92_.cia$r_fill_93_.cia$v_username6#define cia$t_user_spec cia$r_fill_94_.cia$t_user_specS#define cia$w_user_spec_length cia$r_fill_94z_.cia$r_fill_95_.cia$w_user_spec_lengthO#define cia$t_user_spec_name cia$r_fill_94_.cia$r_fill_95_.cia$t_user_spec_name"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _breakin_block {# unsigned int cia$l_break_flags;# unsigned int cia$l_break_count;& unsigned __int64 cia$q_break_time; } BREAKIN_BLOCK;#else /* __OLD_STARLET */struct breakin_block {# unsigned int cia$l_break_flags;# unsign{ed int cia$l_break_count;& unsigned int cia$q_break_time [2]; } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLET#typedef struct _cia$generic_reply {N unsigned int cia$l_reply_status; /* status of request */ } CIA$GENERIC_REPLY;#else /* __OLD_STARLET */struct cia$generic_reply {N unsigned int cia$l_reply_status; /* status of request */ } ;%#endif /* #ifdef __NEW_STARLET */  $#pragma __member_ali|gnment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CIADEF_LOADED */ wwG/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SD }L EV3-3 */P/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CLI$ROUTINES.SDI;1 *//********************************************************************************************************************************/'/*** MODULE CLI$ROUTINES IDENT X-2 ***/#ifndef __CLI_ROUTINES_LOADED#define __CLI_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINT~ER_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 N/* */N/* Command Language Interpreter (CLI) Routines */N/* */N/* */N/* CLI$DCL_PARSE - Parse DCL command string */N/* */N/* status = CLI$DCL_PARSE ([command_string], table [,param_routine] */B/* [,prompt_routine] [,prompt_string]) */N/* */N/* command_string - Command string to parse */N/* table - Command table  */N/* param_routine - Routine to obtain omitted parameters */N/* prompt_routine - Routine to prompt for input */N/* prompt_string - Prompt string for display */N/* */%#define cli$dcl_parse CLI$DCL_PARSE #ifdef __NEW_STARLETunsigned int cli$dcl_parse( __optional_params );#else /* __OLD_STARLET  */-unsigned int cli$dcl_parse(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* CLI$DISPATCH - Dispatch to action routine */N/* */N/* status = CLI$DISPATCH ([userarg]) */N/* */N/* userarg - Us er argument */N/* */##define cli$dispatch CLI$DISPATCH #ifdef __NEW_STARLETunsigned int cli$dispatch( __optional_params);#else /* __OLD_STARLET */,unsigned int cli$dispatch(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* CLI$GET_VALUE - Get value of entity in command string  */N/* */N/* status = CLI$GET_VALUE (entity_desc, retdesc [, retlength]) */N/* */N/* entity_desc - Entity to retrieve */N/* retdesc - Returned value string */N/* retlength - Length of returned value */N/*  */%#define cli$get_value CLI$GET_VALUE #ifdef __NEW_STARLETunsigned int cli$get_value( void *entity_desc, void *retdesc, __optional_params);#else /* __OLD_STARLET */-unsigned int cli$get_value(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* CLI$PRESENT - Determine presence of entity in command string */N /* */N/* status = CLI$PRESENT (entity_desc) */N/* */N/* entity_desc - Entity to retrieve */N/* */!#define cli$present CLI$PRESENT #ifdef __NEW_STARLETunsigned int cli$present( void *entity_de sc);#else /* __OLD_STARLET */+unsigned int cli$present(__unknown_params);!#endif /* #ifdef __NEW_STARLET */(#define CLI$K_TOKEN_SIZE_TRADITIONAL 255(#define CLI$C_TOKEN_SIZE_TRADITIONAL 255&#define CLI$K_TOKEN_SIZE_EXTENDED 4000&#define CLI$C_TOKEN_SIZE_EXTENDED 4000\#define CLI$K_COMMAND_SIZE_TRADITIONAL 255 /* command size with no continuation character */*#define CLI$C_COMMAND_SIZE_TRADITIONAL 255Z#define CLI$K_COMMAND_SIZE_EXTENDED 4096 /* command size with no continuation character */(#define CLI$C_COMMAND_SIZE_EXTENDED 4096\#define CLI$K_BUFFER_SIZE_TRADITIONAL 1024 /* command size with continuation character(s) */S#define CLI$C_BUFFER_SIZE_TRADITIONAL 1024 /* or from input file */Y#define CLI$K_BUFFER_SIZE_EXTENDED 8192 /* command size with continuation character(s) */P#define CLI$C_BUFFER_SIZE_EXTENDED 8192 /* or from input file */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __CLI_ROUTINES_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC ]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $CLIDEF ***/#ifndef __CLIDEF_LOADED#define __CLIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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)#def ine __union union#else#define __union variant_union#endif#endif N/*++ */N/* */N/* $CLIDEF --- COMMAND LAGUAGE INTERFACE DEFINITIONS */N/* */N/* THIS MODULE DEFINES THE OFFSET VALUES FOR THE DATA STRUCTURES */N/* USED TO COMMUNICATED CO MMAND INFORMATION BETWEEN THE CLI AND */N/* THE UTILITY THAT WAS REQUESTED TO PERFORM THE OPERATION. */N/* */N/*-- */#define CLI$M_DEBUG 0x1#define CLI$M_DBGTRU 0x2#define CLI$M_VERIFY 0x4#define CLI$M_BATCH 0x8#define CLI$M_INDIRECT 0x10#define CLI$M_VFYINP 0x20#define CLI$M_TRMVRBLV 0x300#define CLI$M_DBGEXC P 0x10000 #ifdef __NEW_STARLETtypedef struct _clidef {N unsigned int cli$l_iniargcnt; /* INITIAL ARG COUNT */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endifN void *cli$a_progxfer; /* PROGRAM TRANSFER VECTOR ADDRESS */N void *cli$a_utilserv; /* ADDRESS OF CLI UTILITY SERVICE */N void *cli$a_ imghdadr; /* ADDRESS OF IMAGE HEADER */N void *cli$a_imgfiled; /* ADDRESS OF IMAGE FILE DATA */N unsigned int cli$l_linkflag; /* LINK FLAG LONGWORD */ __union {N unsigned int cli$l_cliflag; /* CLI FLAG LONGWORD */ __struct {N unsigned cli$v_debug : 1; /* DEBUG QUALIFIER SEEN */N unsigned cli$v_dbgtru : 1; /* DEBUG WAS TRUE */N  unsigned cli$v_verify : 1; /* VERIFY IS ON */N unsigned cli$v_batch : 1; /* THIS PROCESS IS A BATCH JOB */P unsigned cli$v_indirect : 1; /* INDIRECT LEVEL NOT EQUAL TO ZERO */N unsigned cli$v_vfyinp : 1; /* UTILITY SHOULD VERFIY INPUT */N unsigned clidef$$_fill_1 : 2; /* ROUND UP TO NEXT BYTE */N unsigned cli$v_trmvrblv : 2; /* TERMINAL VERBOSITY LEVEL */N unsigned clidef$ $_fill_2 : 6; /* ROUND UP TO NEXT BYTE */T unsigned cli$v_dbgexcp : 1; /* DEBUGGER CALLED VIA "DEBUG" EXCEPTION */) unsigned cli$v_fill_100_ : 7;! } cli$r_cliflag_bits;N/* THE FOLLOWING ARGUMENTS ARE OPTIONAL DEPENDING ON INIARGCNT */ } cli$r_cliflag_overlay;S int cli$l_arglist; /* ADDRESS OF APPLICATION ARGUMENT LIST */N/* (USED FOR MERGED IMAGE ARG. PASSING) */N/*  */N/* DEFINE CLI COMMAND INTERFACE REQUEST BLOCK */N/* */ } CLIDEF; #if !defined(__VAXC)9#define cli$l_cliflag cli$r_cliflag_overlay.cli$l_cliflagH#define cli$v_debug cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_debugJ#define cli$v_dbgtru cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_dbgtruJ#define cli$v_verify c li$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_verifyH#define cli$v_batch cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_batchN#define cli$v_indirect cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_indirectJ#define cli$v_vfyinp cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_vfyinpN#define cli$v_trmvrblv cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_trmvrblvL#define cli$v_dbgexcp cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_dbgexcp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARL ET */struct clidef {N unsigned int cli$l_iniargcnt; /* INITIAL ARG COUNT */N void *cli$a_progxfer; /* PROGRAM TRANSFER VECTOR ADDRESS */N void *cli$a_utilserv; /* ADDRESS OF CLI UTILITY SERVICE */N void *cli$a_imghdadr; /* ADDRESS OF IMAGE HEADER */N void *cli$a_imgfiled; /* ADDRESS OF IMAGE FILE DATA */N unsigned int cli$l_linkflag; /* LINK FLAG LONGWORD */ __union {N unsigned int cli$l_cliflag; /* CLI FLAG LONGWORD */ __struct {N unsigned cli$v_debug : 1; /* DEBUG QUALIFIER SEEN */N unsigned cli$v_dbgtru : 1; /* DEBUG WAS TRUE */N unsigned cli$v_verify : 1; /* VERIFY IS ON */N unsigned cli$v_batch : 1; /* THIS PROCESS IS A BATCH JOB */P unsigned cli$v_indirect : 1; /* INDIRECT LEVEL NOT EQUAL  TO ZERO */N unsigned cli$v_vfyinp : 1; /* UTILITY SHOULD VERFIY INPUT */N unsigned clidef$$_fill_1 : 2; /* ROUND UP TO NEXT BYTE */N unsigned cli$v_trmvrblv : 2; /* TERMINAL VERBOSITY LEVEL */N unsigned clidef$$_fill_2 : 6; /* ROUND UP TO NEXT BYTE */T unsigned cli$v_dbgexcp : 1; /* DEBUGGER CALLED VIA "DEBUG" EXCEPTION */) unsigned cli$v_fill_100_ : 7;! } cli$r_cliflag_bits;N/*  THE FOLLOWING ARGUMENTS ARE OPTIONAL DEPENDING ON INIARGCNT */ } cli$r_cliflag_overlay;S int cli$l_arglist; /* ADDRESS OF APPLICATION ARGUMENT LIST */N/* (USED FOR MERGED IMAGE ARG. PASSING) */N/* */N/* DEFINE CLI COMMAND INTERFACE REQUEST BLOCK */N/*  */ } ; #if !defined(__VAXC)9#define cli$l_cliflag cli$r_cliflag_overlay.cli$l_cliflagH#define cli$v_debug cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_debugJ#define cli$v_dbgtru cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_dbgtruJ#define cli$v_verify cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_verifyH#define cli$v_batch cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_batchN#define cli$v_indirect cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_indirectJ#define cli$v_vfyinp cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_vfyinpN#define cli$v_trmvrblv cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_trmvrblvL#define cli$v_dbgexcp cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_dbgexcp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define CLI$M_PARMREQ 0x1#define CLI$M_ABSADR 0x2#define CLI$M_EXPNAM 0x4#define CLI$M_LASTVAL 0x1#define CLI$M_DUMMY 0x2#define CLI$M_PARMPRS 0x1#define CLI$M_CONCATINP 0x2#define CLI$M_MOREINP 0x4#define CLI$M_PARMDEF 0x8#define CLI$M_MOREVALS 0x1#define CLI$M_KEYVALU 0x2N#define CLI$K_REQDESC 28 /* SIZE OF THE STRUCTURE */N#define CLI$C_REQDESC 28 /* SIZE OF THE STRUCTURE */N/* */ #ifdef __NEW_STARLETtypedef struct _clidef1 { __union {N int clidef$$_fill_3; /* DUMMY ARG */ __struct {  __union {N unsigned char cli$b_rqtype; /* TYPE OF REQUEST BEING MADE */ __struct {N unsigned cli$v_subtyp : 4; /* SUB TYPE VIELD */N unsigned cli$v_prityp : 4; /* PRIMARY TYPYE */( } cli$r_rqtype_bits;' } cli$r_rqtype_overlay; __union {N unsigned short int cli$w_servcod; /* CLI SERVICE CODE */ __struct { __union {Y unsigned char cli$b_rqindx; /* OFFSET FOR VALUE KEYWORD INDEX */] unsigned char cli$b_bitnum; /* BIT TO SET IF REQUEST IS SUCESSFUL *// } cli$r_rqindx_overlay; __union {Y unsigned char cli$b_rqflgs; /* INPUT FLAGS CONCERNING REQUEST */# __struct {T unsigned cli$v_parmreq : 1; /* PARAMATER IS REQUIRED */V unsigned cli$v_absadr : 1; /* ALL ADDRESS ARE ABSOLUTE */X unsigned cli$v_expnam : 1; /* RETURN EXPLICIT NAMES ONLY */9 unsigned cli$v_fill_101_ : 5;1 } cli$r_rqflgs_bits0;# __struct {Q unsigned cli$v_lastval : 1; /* LAST VALUE ALLOWED */[ unsigned cli$v_dummy : 1; /* *** SAVE PLACE FOR ABS ADR *** */9 unsigned cli$v_fill_102_ : 6;1 } cli$r_rqflgs_bits1;/ } cli$r_rqflgs_overlay;+ } cli$r_servcod_fields;( } cli$r_servcod_overlay; __union {N unsigned char cli$b_rqstat; /* OUTPUT STATUS FLAGS */ __struct {N unsigned cli$v_parmprs : 1; /* PARAMETER IS PRESENT */S unsigned cli$v_concatinp : 1; /* INPUT CONCATONATION EXISTS */V unsigned cli$v_moreinp : 1; /* ANOTHER SET OF INPUT PARAMETERS */V unsigned cli$v_parmdef : 1; /* PARAMETER WAS DEFAULTED PRESENT */1 unsigned cli$v_fill_103_ : 4;) } cli$r_rqstat_bits0; __struct {Q unsigned cli$v_morevals : 1; /* UNPROCESSED VALUES REMAIN */X unsigned cli$v_keyvalu : 1; /* SUBSEQUENT TOKEN IS VALUE FOR KEY */1 unsigned cli$v_fill_104_ : 6;) } cli$r_rqstat_bits1;' } cli$r_rqstat_overlay;" } cli$r_fill_3_fields; } cli$r_fill_3_overlay;N void *cli$a_erract; /* ADDRESS OF ERROR ACTION ROUTINE */ __union {N unsigned __int64 cli$q_rqdesc; /* QUADWORD REQUEST DESCRIPTOR */ __struct {O unsigned short int cli$w_rqsize; /* RESULTANT SIZE OF PARAME TER */N short int clidef$$_fill_4; /* SPARE WORD IN DESCRIPTOR */ __union {S unsigned int cli$l_rqvalu; /* ACTUAL VALUE IN VALUE CONVERSTION */N void *cli$a_rqaddr; /* ADDRESS OF RESULTANT PARAMETER */' } cli$r_rqvalu_overlay;" } cli$r_rqdesc_fields; } cli$r_rqdesc_overlay;O void *cli$a_prsact; /* PARAMETER PRESENT ACTION ROUTINE */N void *cli$a_absact;  /* PARAMETER ABSENT ACTION ROUTINE */N void *cli$a_qualst; /* ADDRESS OF QUALIFIERS */N/* Define the Descriptor Used by Symbol and Logical-name Callbacks */N/* */ } CLIDEF1; #if !defined(__VAXC)_#define cli$b_rqtype cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$b_rqtypeq#define cli$v_subtyp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$r_rqtype_bits.cli$v_subtypq#define cli$v_prityp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$r_rqtype_bits.cli$v_pritypb#define cli$w_servcod cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$w_servcod#define cli$b_rqindx cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqindx_overlay.cli$b\_rqindx#define cli$b_bitnum cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli $r_rqindx_overlay.cli$b\_bitnum#define cli$b_rqflgs cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$b\_rqflgs#define cli$v_parmreq cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$\r_rqflgs_bits0.cli$v_parmreq#define cli$v_absadr cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r\_rqflgs_bits0.cli$v_absadr#define cli$v_expnam cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r\_rqflgs_bits0.cli$v_expnam#define cli$v_lastval cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$\r_rqflgs_bits1.cli$v_lastval#define cli$v_dummy cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r_\rqflgs_bits1.cli$v_dummy_#define cli$b_rqstat cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$b_rqstatt#define cli$v_parmprs cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_parmprsx#define cli$v_concatinp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_concatinpt#define cli$v_moreinp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_moreinpt#define cli$v_parmdef cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_parmdefv#define cli$v_morevals cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits1.cli$v_morevalst#define cli$v_keyvalu cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits1.cli$v_keyvalu6#define cli$q_rqdesc cli$r_rqdesc_overlay.cli$q_rqdescJ#define cli$w_rqsize cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$w_rqsize_#define cli$l_rqvalu cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$r_rqvalu_overlay.cli$l _rqvalu_#define cli$a_rqaddr cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$r_rqvalu_overlay.cli$a_rqaddr"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct clidef1 { __union {N int clidef$$_fill_3; /* DUMMY ARG */ __struct { __union {N unsigned char cli$b_rqtype; /* TYPE OF REQUEST BEING MADE */ __struct {N unsigned cli$v_subtyp : 4; /* SUB TY PE VIELD */N unsigned cli$v_prityp : 4; /* PRIMARY TYPYE */( } cli$r_rqtype_bits;' } cli$r_rqtype_overlay; __union {N unsigned short int cli$w_servcod; /* CLI SERVICE CODE */ __struct { __union {Y unsigned char cli$b_rqindx; /* OFFSET FOR VALUE KEYWORD INDEX */] unsigned char cli$b_bitnum; /* BIT TO SET IF REQUEST IS SUCESSFUL *// } cli$r_rqindx_overlay; __union {Y unsigned char cli$b_rqflgs; /* INPUT FLAGS CONCERNING REQUEST */# __struct {T unsigned cli$v_parmreq : 1; /* PARAMATER IS REQUIRED */V unsigned cli$v_absadr : 1; /* ALL ADDRESS ARE ABSOLUTE */X unsigned cli$v_expnam : 1; /* RETURN EXPLICIT NAMES ONLY  */9 unsigned cli$v_fill_101_ : 5;1 } cli$r_rqflgs_bits0;# __struct {Q unsigned cli$v_lastval : 1; /* LAST VALUE ALLOWED */[ unsigned cli$v_dummy : 1; /* *** SAVE PLACE FOR ABS ADR *** */9 unsigned cli$v_fill_102_ : 6;1 } cli$r_rqflgs_bits1;/ } cli$r_rqflgs_overlay;+  } cli$r_servcod_fields;( } cli$r_servcod_overlay; __union {N unsigned char cli$b_rqstat; /* OUTPUT STATUS FLAGS */ __struct {N unsigned cli$v_parmprs : 1; /* PARAMETER IS PRESENT */S unsigned cli$v_concatinp : 1; /* INPUT CONCATONATION EXISTS */V unsigned cli$v_moreinp : 1; /* ANOTHER SET OF INPUT PARAMETERS */V unsigned cli$v_parmd ef : 1; /* PARAMETER WAS DEFAULTED PRESENT */1 unsigned cli$v_fill_103_ : 4;) } cli$r_rqstat_bits0; __struct {Q unsigned cli$v_morevals : 1; /* UNPROCESSED VALUES REMAIN */X unsigned cli$v_keyvalu : 1; /* SUBSEQUENT TOKEN IS VALUE FOR KEY */1 unsigned cli$v_fill_104_ : 6;) } cli$r_rqstat_bits1;' } cli$r_rqstat_overlay;" } cli$r_ fill_3_fields; } cli$r_fill_3_overlay;N void *cli$a_erract; /* ADDRESS OF ERROR ACTION ROUTINE */ __union {N unsigned int cli$q_rqdesc [2]; /* QUADWORD REQUEST DESCRIPTOR */ __struct {O unsigned short int cli$w_rqsize; /* RESULTANT SIZE OF PARAMETER */N short int clidef$$_fill_4; /* SPARE WORD IN DESCRIPTOR */ __union {S unsigned int cli$l_rqvalu; /* ACTUAL VALUE IN VALUE CONV ERSTION */N void *cli$a_rqaddr; /* ADDRESS OF RESULTANT PARAMETER */' } cli$r_rqvalu_overlay;" } cli$r_rqdesc_fields; } cli$r_rqdesc_overlay;O void *cli$a_prsact; /* PARAMETER PRESENT ACTION ROUTINE */N void *cli$a_absact; /* PARAMETER ABSENT ACTION ROUTINE */N void *cli$a_qualst; /* ADDRESS OF QUALIFIERS */N/* Define the Descriptor Used by Symbol and Logical-name C allbacks */N/* */ } ; #if !defined(__VAXC)_#define cli$b_rqtype cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$b_rqtypeq#define cli$v_subtyp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$r_rqtype_bits.cli$v_subtypq#define cli$v_prityp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$r_rqtype_bits.cli$v_pritypb#define cli$w_servcod cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$w_servcod#define cli$b_rqindx cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqindx_overlay.cli$b\_rqindx#define cli$b_bitnum cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqindx_overlay.cli$b\_bitnum#define cli$b_rqflgs cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$b\_rqflgs#define cli$v_parmreq cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$\r_rqflgs_bits0.cli$v_parmreq#define cli$v_absadr cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r\_rqflgs_bits0.cli$v_absadr#define cli$v_expnam cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r\_rqflgs_bits0.cli$v_expnam#define cli$v_lastval cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$\r_rqflgs_bits1.cli$v_lastval#define cli$v_dummy cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r_\rqflgs_bits1.cli$v_dummy_#define cli$b_rqstat cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$b_rqstatt#define cli$v_parmprs cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_parmprsx#define cli$v_concatinp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_concatinpt#define cli$v_moreinp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_moreinpt#define cli$v_parmdef cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_parmdefv#define cli$v_morevals cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits1.cli$v_morevalst#define cli$v_keyvalu cl i$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits1.cli$v_keyvalu6#define cli$q_rqdesc cli$r_rqdesc_overlay.cli$q_rqdescJ#define cli$w_rqsize cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$w_rqsize_#define cli$l_rqvalu cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$r_rqvalu_overlay.cli$l_rqvalu_#define cli$a_rqaddr cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$r_rqvalu_overlay.cli$a_rqaddr"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */  #ifdef __NEW_STARLETtypedef struct _clidef2 { char clidef$$_fill_8 [4];N unsigned __int64 cli$q_namdesc; /* Logical name or symbol name */O unsigned __int64 cli$q_valdesc; /* Equivalence name or symbol value */N unsigned __int64 cli$q_tabdesc; /* Name of logical name table */N int cli$l_itmlst; /* Address of item list */N int cli$l_attr; /* Address of attribute longword */N/*  */N/* Define the Descriptor Locations Used for the Old/New */N/* Out-of-Band Character(s) Masks */N/* */ } CLIDEF2;#else /* __OLD_STARLET */struct clidef2 { char clidef$$_fill_8 [4];N unsigned int cli$q_namdesc [2]; /* Logical name or symbol name */O unsigned int cli$q_valdesc [2]; /* Equivalence name or symbol value */N unsigned int cli$q_tabdesc [2]; /* Name of logical name table */N int cli$l_itmlst; /* Address of item list */N int cli$l_attr; /* Address of attribute longword */N/* */N/* Define the Descriptor Locations Used for the Old/New */N/* Out-of-Band Character(s) Masks  */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _clidef3 { char clidef$$_fill_9 [4];N unsigned int cli$l_new_mask; /* Enable/disable mask */N unsigned int cli$l_old_mask; /* Previous enabled values mask */N/* */N/* Define the descriptor  used for ATTACH callback */N/* */ } CLIDEF3;#else /* __OLD_STARLET */struct clidef3 { char clidef$$_fill_9 [4];N unsigned int cli$l_new_mask; /* Enable/disable mask */N unsigned int cli$l_old_mask; /* Previous enabled values mask */N/* */N/* Define the descriptor used fo r ATTACH callback */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _clidef4 { char clidef$$_fill_10 [4];N unsigned int cli$l_pid; /* PID of "destination" process */N/* */N/* Define the descriptor used for SPAWN callback */N/*  */ } CLIDEF4;#else /* __OLD_STARLET */struct clidef4 { char clidef$$_fill_10 [4];N unsigned int cli$l_pid; /* PID of "destination" process */N/* */N/* Define the descriptor used for SPAWN callback */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */#define CLI$M_NOWAIT 0x1#define CLI$M_NOCLISYM 0x2#define CLI$M_NOLOGNAM 0x4#define CLI$M_NOKEYPAD 0x8#define CLI$M_NOTIFY 0x10#define CLI$M_NOCONTROL 0x20#define CLI$M_TRUSTED 0x40#define CLI$M_AUTHPRIV 0x80#define CLI$M_SUBSYSTEM 0x100#define CLI$M_DETACHED 0x200N#define CLI$K_SPAWN_VERSION 1 /* Latest version */N#define CLI$C_SPAWN_VERSION 1 /* Latest version */S#define CLI$K_SRVD ESC 88 /* Length of longest "service" callback */S#define CLI$C_SRVDESC 88 /* Length of longest "service" callback */N/* */ #ifdef __NEW_STARLETtypedef struct _clidef5 { char clidef$$_fill_11 [4]; __union {N unsigned char cli$b_flags; /* Flags (as byte) */N unsigned short int cli$w_flags; /* Flags (as word) */ __struct {T unsigned cli$v_nowait : 1; /* Do not wait for subprocess completion */U unsigned cli$v_noclisym : 1; /* Do not copy CLI symbols to subprocess */W unsigned cli$v_nolognam : 1; /* Do not copy logical names to subprocess */U unsigned cli$v_nokeypad : 1; /* Do not copy keypad state to subprocess */N unsigned cli$v_notify : 1; /* Output notification message */Z unsigned cli$v_nocontrol : 1; /* Do not put CR/LF in front of prompt string */X unsigned cli$v_trusted : 1; /* Allow spawn regardless of UAF CAPTIVE flag */O unsigned cli$v_authpriv : 1; /* Propagate AUTHPRIV to subprocess */Z unsigned cli$v_subsystem : 1; /* Copy protected subsystem IDs to subprocess */N unsigned cli$v_detached : 1; /* Spawn a detached process */) unsigned cli$v_fill_105_ : 6; } cli$r_flags_bits; } cli$r_flags_overlay;N char clidef$$_fill_5 [2]; /* Unused */N unsigned int cli$l_outpid; /* PID of subprocess on return */W int cli$l_lststatus; /* Address to store final subprocess status */N unsigned __int64 cli$q_cmdstr; /* Descriptor of command string */N unsigned __int64 cli$q_input; /* Descriptor of input filespec */N unsigned __int64 cli$q_output; /* Descriptor of output filespec */P unsigned __int64 cli$q_prcnam;  /* Descriptor of name for subprocess */Q int cli$l_astadr; /* Address of termination AST routine */O int cli$l_astprm; /* Address of AST routine parameter */O unsigned char cli$b_efn; /* Event flag to set on termination */N unsigned char cli$b_version; /* Data structure version */N char clidef$$_fill_6 [2]; /* Unused */N unsigned __int64 cli$q_prompt; /* Descriptor of prompt string */N unsigned __int64 cli$q_cli; /* Descriptor of cli name */N unsigned __int64 cli$q_table; /* Descriptor of cli table name */N int cli$l_kt_limit; /* Kernel thread limit */N/* */O/* Define the length of the longest "supervisor-mode service" request block, */N/* so that programs can allocate a fixed amount of space for the block. */ N/* */N/* DEFINE THE PARAMETER QUALIFIER DESCRIPTOR */N/* */ } CLIDEF5; #if !defined(__VAXC)3#define cli$b_flags cli$r_flags_overlay.cli$b_flags3#define cli$w_flags cli$r_flags_overlay.cli$w_flagsF#define cli$v_nowait cli$r_flags_overlay.cli$r_flags_bits.cli$v_nowaitJ#define cli$v_noclisym cli$r_flags_overlay.cli$r_flags_bits.cli$v_noclisymJ#define cli$v_nolognam cli$r_flags_overlay.cli$r_flags_bits.cli$v_nolognamJ#define cli$v_nokeypad cli$r_flags_overlay.cli$r_flags_bits.cli$v_nokeypadF#define cli$v_notify cli$r_flags_overlay.cli$r_flags_bits.cli$v_notifyL#define cli$v_nocontrol cli$r_flags_overlay.cli$r_flags_bits.cli$v_nocontrolH#define cli$v_trusted cli$r_flags_overlay.cli$r_flags_bits.cli$v_trustedJ#define cli$v_authpriv cli$r_flags_overlay.cli$r_flags_bits.cli$v_authprivL#define cli$v_subsys tem cli$r_flags_overlay.cli$r_flags_bits.cli$v_subsystemJ#define cli$v_detached cli$r_flags_overlay.cli$r_flags_bits.cli$v_detached"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct clidef5 { char clidef$$_fill_11 [4]; __union {N unsigned char cli$b_flags; /* Flags (as byte) */N unsigned short int cli$w_flags; /* Flags (as word) */ __struct {T unsigned cli$v_nowait : 1; /* Do not wait for subprocess completion */U unsigned cli$v_noclisym : 1; /* Do not copy CLI symbols to subprocess */W unsigned cli$v_nolognam : 1; /* Do not copy logical names to subprocess */U unsigned cli$v_nokeypad : 1; /* Do not copy keypad state to subprocess */N unsigned cli$v_notify : 1; /* Output notification message */Z unsigned cli$v_nocontrol : 1; /* Do not put CR/LF in front of prompt string */X unsigned cli$v_trusted  : 1; /* Allow spawn regardless of UAF CAPTIVE flag */O unsigned cli$v_authpriv : 1; /* Propagate AUTHPRIV to subprocess */Z unsigned cli$v_subsystem : 1; /* Copy protected subsystem IDs to subprocess */N unsigned cli$v_detached : 1; /* Spawn a detached process */) unsigned cli$v_fill_105_ : 6; } cli$r_flags_bits; } cli$r_flags_overlay;N char clidef$$_fill_5 [2]; /* Unused */N unsigned int cli$l_outpid; /* PID of subprocess on return */W int cli$l_lststatus; /* Address to store final subprocess status */N unsigned int cli$q_cmdstr [2]; /* Descriptor of command string */N unsigned int cli$q_input [2]; /* Descriptor of input filespec */N unsigned int cli$q_output [2]; /* Descriptor of output filespec */P unsigned int cli$q_prcnam [2]; /* Descriptor of name for subprocess */Q int cli$l_astadr; /* Address of termination AST routine */O int cli$l_astprm; /* Address of AST routine parameter */O unsigned char cli$b_efn; /* Event flag to set on termination */N unsigned char cli$b_version; /* Data structure version */N char clidef$$_fill_6 [2]; /* Unused */N unsigned int cli$q_prompt [2]; /* Descriptor of prompt string */N unsigned int cli$q_cli [2];  /* Descriptor of cli name */N unsigned int cli$q_table [2]; /* Descriptor of cli table name */N int cli$l_kt_limit; /* Kernel thread limit */N/* */O/* Define the length of the longest "supervisor-mode service" request block, */N/* so that programs can allocate a fixed amount of space for the block. */N/*  */N/* DEFINE THE PARAMETER QUALIFIER DESCRIPTOR */N/* */ } ; #if !defined(__VAXC)3#define cli$b_flags cli$r_flags_overlay.cli$b_flags3#define cli$w_flags cli$r_flags_overlay.cli$w_flagsF#define cli$v_nowait cli$r_flags_overlay.cli$r_flags_bits.cli$v_nowaitJ#define cli$v_noclisym cli$r_flags_overlay.cli$r_flags_bits.cli$v_noclisymJ#define cli$v_nolognam cli$r_flags_overlay.cli$r_flags_bits.cli$v_nolognamJ#define cli$v_nokeypad cli$r_flags_overlay.cli$r_flags_bits.cli$v_nokeypadF#define cli$v_notify cli$r_flags_overlay.cli$r_flags_bits.cli$v_notifyL#define cli$v_nocontrol cli$r_flags_overlay.cli$r_flags_bits.cli$v_nocontrolH#define cli$v_trusted cli$r_flags_overlay.cli$r_flags_bits.cli$v_trustedJ#define cli$v_authpriv cli$r_flags_overlay.cli$r_flags_bits.cli$v_authprivL#define cli$v_subsystem cli$r_flags_overlay.cli$r_flags_bits.cli$v_subsystemJ#define cli$ v_detached cli$r_flags_overlay.cli$r_flags_bits.cli$v_detached"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define CLI$M_ALLOCCUR 0x1#define CLI$M_QDUSRV 0x2#define CLI$M_QDEXPA 0x4#define CLI$M_QUALTRU 0x1#define CLI$M_QUALEXP 0x2N#define CLI$K_QUALDEF 20 /* SIZE OF FIXED PART OF STRUCTURE */N#define CLI$C_QUALDEF 20 /* SIZE OF FIXED PART OF STRUCTURE */S#define CLI$K_QDBITS 20 /* START OF BIT LISTS(VARI ALBLE LENGTH) */S#define CLI$C_QDBITS 20 /* START OF BIT LISTS(VARIALBLE LENGTH) */ #ifdef __NEW_STARLETtypedef struct _clidef6 {N unsigned char cli$b_qdblksiz; /* SIZE OF THE FINAL BLOCK */N unsigned char cli$b_qdcode; /* ID CODE FOR THE QUALIFIER */ __union {N unsigned char cli$b_qdflgs; /* FLAGS BYTE */ __struct {N unsigned cli$v_alloccur : 1; /* TAKE ACTION ON ALL OCCUR ANCES */N unsigned cli$v_qdusrv : 1; /* USER CONTEX VALUE IS PRESENT */Q unsigned cli$v_qdexpa : 1; /* TAKE ACTION ON EXPLICIT OCCURANCES */) unsigned cli$v_fill_106_ : 5; } cli$r_qdflgs_bits; } cli$r_qdflgs_overlay; __union {N unsigned char cli$b_qdstat; /* QUALIFIER STATUS */ __struct {N unsigned cli$v_qualtru : 1; /* QUALIFIER IS TRUE */N unsigned  cli$v_qualexp : 1; /* QUALIFIER EXPLICITLY STATED */) unsigned cli$v_fill_107_ : 6; } cli$r_qdstat_bits; } cli$r_qdstat_overlay; __union {N unsigned __int64 cli$q_qdvaldesc; /* QUALIFIER VALUE DESCRIPTOR */ __struct {N unsigned short int cli$w_qdvalsiz; /* SIZE OF VALUE */N short int clidef$$_fill_7; /* SPARE WORD */N void *cli$a_qdvaladr; /* ADDRESS OF VA LUE STRING */% } cli$r_qdvaldesc_fields;" } cli$r_qdvaldesc_overlay;N void *cli$a_truact; /* QUALIFIER TRUE ACTION ROUTINE */N void *cli$a_flsact; /* QUALIFIER FALSE ACTION ROUTINE */N unsigned int cli$l_usrval; /* OPTION USER VALUE IF PRESENT */N/* */N/* DEFINE SPACE FOR THE RESULT PARSE WORK AREA */N/*  */ } CLIDEF6; #if !defined(__VAXC)6#define cli$b_qdflgs cli$r_qdflgs_overlay.cli$b_qdflgsL#define cli$v_alloccur cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_alloccurH#define cli$v_qdusrv cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_qdusrvH#define cli$v_qdexpa cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_qdexpa6#define cli$b_qdstat cli$r_qdstat_overlay.cli$b_qdstatJ#define cli$v_qualtru cli$r_qdstat_overlay.cli$r_qds tat_bits.cli$v_qualtruJ#define cli$v_qualexp cli$r_qdstat_overlay.cli$r_qdstat_bits.cli$v_qualexp?#define cli$q_qdvaldesc cli$r_qdvaldesc_overlay.cli$q_qdvaldescT#define cli$w_qdvalsiz cli$r_qdvaldesc_overlay.cli$r_qdvaldesc_fields.cli$w_qdvalsizT#define cli$a_qdvaladr cli$r_qdvaldesc_overlay.cli$r_qdvaldesc_fields.cli$a_qdvaladr"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct clidef6 {N unsigned char cli$b_qdblksiz; /* SIZE OF THE FINAL BLOCK */ N unsigned char cli$b_qdcode; /* ID CODE FOR THE QUALIFIER */ __union {N unsigned char cli$b_qdflgs; /* FLAGS BYTE */ __struct {N unsigned cli$v_alloccur : 1; /* TAKE ACTION ON ALL OCCURANCES */N unsigned cli$v_qdusrv : 1; /* USER CONTEX VALUE IS PRESENT */Q unsigned cli$v_qdexpa : 1; /* TAKE ACTION ON EXPLICIT OCCURANCES */) unsigned cli$v_fill_106_ : 5; } cli$ r_qdflgs_bits; } cli$r_qdflgs_overlay; __union {N unsigned char cli$b_qdstat; /* QUALIFIER STATUS */ __struct {N unsigned cli$v_qualtru : 1; /* QUALIFIER IS TRUE */N unsigned cli$v_qualexp : 1; /* QUALIFIER EXPLICITLY STATED */) unsigned cli$v_fill_107_ : 6; } cli$r_qdstat_bits; } cli$r_qdstat_overlay; __union {N unsigned int cli$q_qdvaldesc [2]; /* QUALI FIER VALUE DESCRIPTOR */ __struct {N unsigned short int cli$w_qdvalsiz; /* SIZE OF VALUE */N short int clidef$$_fill_7; /* SPARE WORD */N void *cli$a_qdvaladr; /* ADDRESS OF VALUE STRING */% } cli$r_qdvaldesc_fields;" } cli$r_qdvaldesc_overlay;N void *cli$a_truact; /* QUALIFIER TRUE ACTION ROUTINE */N void *cli$a_flsact; /* QUALIFIER FALSE  ACTION ROUTINE */N unsigned int cli$l_usrval; /* OPTION USER VALUE IF PRESENT */N/* */N/* DEFINE SPACE FOR THE RESULT PARSE WORK AREA */N/* */ } ; #if !defined(__VAXC)6#define cli$b_qdflgs cli$r_qdflgs_overlay.cli$b_qdflgsL#define cli$v_alloccur cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_alloccurH#define cli$v_qdusrv cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_qdusrvH#define cli$v_qdexpa cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_qdexpa6#define cli$b_qdstat cli$r_qdstat_overlay.cli$b_qdstatJ#define cli$v_qualtru cli$r_qdstat_overlay.cli$r_qdstat_bits.cli$v_qualtruJ#define cli$v_qualexp cli$r_qdstat_overlay.cli$r_qdstat_bits.cli$v_qualexp?#define cli$q_qdvaldesc cli$r_qdvaldesc_overlay.cli$q_qdvaldescT#define cli$w_qdvalsiz cli$r_qdvaldesc_overlay.cli$r_qdvaldesc_fields.cli$w_qd valsizT#define cli$a_qdvaladr cli$r_qdvaldesc_overlay.cli$r_qdvaldesc_fields.cli$a_qdvaladr"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define CLI$K_WORKAREA 128 /* SIZE OF HEADER */N#define CLI$C_WORKAREA 128 /* SIZE OF HEADER */N/* */N#define CLI$K_UTILOPR 0 /* UTILITY OPERATIONS */Q#define CLI$K_INPSPEC 1 /* REQUEST FOR AN INPUT SPECIFICATION */N#define CLI$K_OUTSPEC 2 /* AN OUTPUT FILE SPECIFICATION */N#define CLI$K_PARDONE 3 /* PARAMETER DONE REQUEST */N#define CLI$K_VALCONV 4 /* REQUEST A VALUE CONVERSION */N#define CLI$K_CLINT 5 /* CLINT OPERATIONS */N/* */N#define CLI$K_INITPRS 0  /* REQUEST INITIALIZATION OF PARSE */N#define CLI$K_GETCMD 1 /* GET COMMAND BUFFER LIMITS */N#define CLI$K_GETQUAL 2 /* OPTAIN STATE OF QUALIFIERS */N#define CLI$K_GETOPT 3 /* DECODE COMMAND OPTION */N#define CLI$K_GETLINE 4 /* GET COMMAND LINE */N/* */N/* THE CLISERV REQUEST TYPE APPEARS HERE, INSTEAD OF WITH THE OTHER REQUEST */N/* TYPES, BECAUSE IT HAS NO SUBFUNCTIONS ASSOCIATED WITH IT, AND BECAUSE A */N/* DAY 1 CODING ERROR CAUSES DCL TO EXPECT THAT THIS REQUEST NUMBER WILL */N/* APPEAR IN THE SUBFUNCTION BITS. THIS MEANS THAT NO UTILITY OPERATION */N/* CAN BE DEFINED WITH THE SUBFUNCTION NUMBER 5. */N/* */N#define CLI$K_CLISERV 5 /* REQUEST A SERVICE FROM THE CLI */N/*  */N#define CLI$K_INPUT1 16 /* PRIMARY INPUT */N#define CLI$K_INPUT2 17 /* SECONDARY INPUT */N#define CLI$K_INPUT3 18 /* THIRD, */N#define CLI$K_INPUT4 19 /* ETC,ETC,ETC */N/* */N#define CLI$K_OUTPUT1 32  /* FIRST OUTPUT */N#define CLI$K_OUTPUT2 33 /* SECOND OUTPUT */N#define CLI$K_OUTPUT3 34 /* THIRD,- */N#define CLI$K_OUTPUT4 35 /* ETC,ETC,ETC */N/* */N#define CLI$K_ENDPRM1 48 /* COMPLETED PARAMETER SET 1 */N#define CLI$K_ENDPRM2 49 /* COMPLETED PARAMETER SET 2 */N#define CLI$K_ENDPRM3 50 /* COMPLETED PARAMETER SET 3 */N#define CLI$K_ENDPRM4 51 /* COMPLETED PARAMETER SET 4 */N/* */N#define CLI$K_NUMERVAL 64 /* NUMBERIC VALUE */N#define CLI$K_ASCIIVAL 65 /* ASCII VALUE */N#define CLI$K_KEYWORD 66 /* KEYWORD VALUE */N#define CLI$K_KEYVAL 67 /* KEYWORD WITH VALUE */N#define CLI$K_FILSPEC 68 /* VALUE IS A FILESPEC */N/* */N#define CLI$K_PRESENT 80 /* DETERMINE IF ENTITY IS PRESENT */N#define CLI$K_GETVALUE 81 /* GET VALUE OF ENTITY */N#define CLI$K_ENDPARSE 82 /* CLEAN UP AFTER PARSING COMMAND */N#define CLI$K_DCLPARSE 83  /* PARSE USER COMMAND LINE */N#define CLI$K_DISPATCH 84 /* DISPATCH TO ACTION ROUTINE */N#define CLI$K_NEXTQUAL 85 /* PROCESS NEXT QUALIFIER */N/* */ #ifdef __NEW_STARLETtypedef union _clidef7 {N unsigned int cli$l_workarea [32]; /* ALLOCATE 32 LONG WORDS */N/* DEFINE CLI UTILITY REQUEST CODES */N/*  */N/* CODES ARE 8 BITS, CONSISTING OF 2 4 BIT FIELDS */N/* THE LEAST 4 BITS ARE SUBFUCTION DEFINITONS */N/* AND THE MOST SIGNIFICANT 4 BITS ARE REQUEST TYPE */N/* */N/* DEFINE REQUEST TYPE CODES */N/* DEFINE COMPLETE CODES FOR UTILITY OPERATIONS */N/* */N/* DEFINE COMPLETE CODES FOR INPUT SPECIFICATIONS */N/* */N/* DEFINE COMPLETE CODES FOR OUTPUT SPECIFICATIONS */N/* */N/* DEFINE CODES FOR RESULT PARSE PARAMETER COMPLETION  */N/* */N/* DEFINE CODES FOR VALUE CONVERSION REQUESTS */N/* */N/* DEFINE COMPLETE CODES FOR UTILITY OPERATIONS */N/* */N/* DEFINE SET CODE SET REQUEST BLOCK */N/*  */ } CLIDEF7;#else /* __OLD_STARLET */union clidef7 {N unsigned int cli$l_workarea [32]; /* ALLOCATE 32 LONG WORDS */N/* DEFINE CLI UTILITY REQUEST CODES */N/* */N/* CODES ARE 8 BITS, CONSISTING OF 2 4 BIT FIELDS */N/* THE LEAST 4 BITS ARE SUBFUCTION DEFINITONS */N/* AND THE MOST SIGNIFICANT 4 BITS ARE REQUEST TYPE */N/* */N/* DEFINE REQUEST TYPE CODES */N/* DEFINE COMPLETE CODES FOR UTILITY OPERATIONS */N/* */N/* DEFINE COMPLETE CODES FOR INPUT SPECIFICATIONS  */N/* */N/* DEFINE COMPLETE CODES FOR OUTPUT SPECIFICATIONS */N/* */N/* DEFINE CODES FOR RESULT PARSE PARAMETER COMPLETION */N/* */N/* DEFINE CODES FOR VALUE CONVERSION REQUESTS */N/*  */N/* DEFINE COMPLETE CODES FOR UTILITY OPERATIONS */N/* */N/* DEFINE SET CODE SET REQUEST BLOCK */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _clidef8 { char clidef$ $_fill_12 [4];N unsigned int cli$l_codeset; /* CODE SET VALUE */ } CLIDEF8;#else /* __OLD_STARLET */struct clidef8 { char clidef$$_fill_12 [4];N unsigned int cli$l_codeset; /* CODE SET VALUE */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CLIDEF_LOADED */ wwKY›/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CLIMSGDEF.SDI;1 *//*********************************************************** *********************************************************************//*** MODULE $CLIMSGDEF ***/#ifndef __CLIMSGDEF_LOADED#define __CLIMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:57:58.94 */N/* */N/* */J/* VERSION: 'X-12' */N/* */O/* ************************************************************************* */O/* * * */O/* * COPYRIGHT 1978 - 2011 HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P. * */O/* * * */O/* * CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM HP AND/OR * */O/* * ITS SUBSIDIARIES REQUIRED FOR POSSESSION, USE, OR COPYING. * */O/* *  * */O/* * CONSISTENT WITH FAR 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE, * */O/* * COMPUTER SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL * */O/* * ITEMS ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD * */O/* * COMMERCIAL LICENSE. * */O/* * * */O/* * NEITHER HP NOR ANY OF ITS SUBSIDIARIES SHALL BE LIABLE FOR TECHNICAL * */O/* * OR EDITORIAL ERRORS OR OMISSIONS CONTAINED HEREIN. THE INFORMATION * */O/* * IN THIS DOCUMENT IS PROVIDED "as is" WITHOUT WARRANTY OF ANY KIND AND * */O/* * IS SUBJECT TO CHANGE WITHOUT NOTICE. THE WARRANTIES FOR HP PRODUCTS * */O/* * ARE SET FORTH IN THE EXPRESS LIMITED WARRANTY STATEMENTS ACCOMPANYING * */O/* * SUCH PRODUCTS. NOTHING HEREIN SHOULD BE CONSTRUED AS CONSTITUTING AN * */O/* * ADDITIONAL WARRANTY.  * */O/* * * */O/* ************************************************************************* */N/* */N/* MODIFIED BY: */N/* */N/* X-12 GAK060811 ASHOKA KOTRESHA 08-JUN-2011 */N/* ADDED A NEW MESSAGE ILLFILEVER TO SIGNAL ERROR WHEN THE */N/* LEXICAL FUNCTION F$FILE_ATTRIBUTES IS PASSED A FILE */N/* NAME WITH VERSION NUMBER SPECIFIED EXPLICITLY. */N/* */6/* X-11 SS111808 SHAHINA SHAIK 18-NOV-2008 */B/* ADDED A NEW MESSAGE DEFOVF16 TO SIGNAL WHEN PARSING LIMIT */B/* OF PN VALUES TO COMMAND PROCEDURE EXCEEDS A LIMIT OF 16 */B/* WHEN 4TH BIT OF DCL_CTLFLAGS IS SET. */N/* */9/* X-10 NYK578 NITIN Y. KARKHANIS 8-MAR-1996 */B/* ADD UNSUPITEM WARNING MESSAGE; USED WHEN AN UNSUPPORTED */B/* ITEM CODE IS SUPPLIED TO THE F$GETXXI LEXICAL FUNCTIONS. */N/* */4/* X-9 STEVE T. LEE 06-FEB-1996 */B/* UPDATE MESSAGES FOR DCL PIPE. */N/* */B/* X-8 STL0200 STEVE T. LEE 30-AUG-1995 */C/* ADD NEW MESSAGES FOR DCL PIPE. *//* */:/* X-7 DCP DAVID C. PASTERCHIK 25-AUG-1994 */B/* CLARIFY TEXT OF GBLNDF MESSAGE (V6 QAR 00787). */N/* */4/* X-6 RAB  RICHARD A. BISHOP 21-OCT-1993 */B/* REVERSE ORDER OF PREVIOUS CHANGE TO MATCH V1.5 */B/* REQUIRES CORRESPONDING FIX ON VAX */&/* */7/* X-5 DBM0010 DAVID B. MILLER 13-SEP-1993 */3/* ALIGN REVISION NUMBER WITH CMS. */./* CORAL PARITY - ADD INVNOD. *//* */7/* X01-003 TH THOMAS J. HOEY 22-JUL-1993 */*/* COMPLETE BLADE MERGE. */ 6/* X-15 RNM0119 RUSS MURRAY 10-OCT-1990 */9/* MAKE IVPROT MESSAGE TEXT MORE GENERIC. *//* */=/* X01-002 DBM0001 DAVID B. MILLER 23-NOV-1992 */"/* ADD CMDSEG2. *//* */9/* V01-001 DAG DARYL A. GLEASON 1-APR-1992 */F/* EVMS QAR 1872: CHANGE IVPROT TO BE IN SYNCH WITH VAX. *//* */6/* X-3 RAB RICHARD A. BISHOP 29-JAN-1992 */@/* MERGE INTO ALPHA THE POST-V5.4 CHANGES IN VMS. */G/* SINCE THERE HAVE BEEN NO CHANGES IN THE ALPHA VERSION */H/* OF THIS FILE SINCE V5.4 (OTHER THAN AUDIT TRAIL), WHAT */D/* FOLLOWS IS THE AUDIT TRAIL FROM THE VMS MASTERPACK. *//* */O/* =============================================================== */N/* */:/* X-7 CRB0239 COLIN R. BLAKE 18-DEC-1991 11:38:24.76 */B/* THIS IS THE C2 VERSION BEING INSERTED INTO MAINLINE. */N/* */9/* X-6A1 FAK001 FORREST A. KENNEY 23-SEP-1991 */C/* MERGE C2 CHANGES INTO BLADE. MAKE MODULE IDENT AND REVISION */B/* HISTORY AGREE WITH CMS AFTER THE MASTER PACK CLEANUP. */N/* */I/* T-2 LBB LEE BARTON 22-MAY-1991 */H/* PICK UP PHOENIX CHANGE: */N/* */:/* X-18 TNF0094 TODD FLOLO 23 FEB 1991 */B/* ADD MESSAGE FOR SET PREFIX. */N/* */;/* X-14 RNM0109 RUSS MURRAY 25-MAY-1990 */D/* ADD MSNGENDS TO FLAG MISSING ENDSUBROUTINES ON A FORWARD SCAN */B/* FOR A CALL TARGET. */N/* */F/* INCLUDE THE TARGET LABEL NAME IN THE USCALL MESSAGE, AND CHANGE */B/* THE TEXT OF THE MESSAGE TO INDICATE THE LABEL COULD BE */B/* INACCESSIBLE. */N/* */;/* X-13 RNM0102 RUSS MURRAY 28-FEB-1989 */B/* ADD NOREADCP ERROR MESSAGE TO FLAG FILES */B/* NOT OPENED FOR READ ACCESS. */N/* */;/* X-12 RNM0090 RUSS MURRAY 11-OCT-1989 */B/* ADD THE CURRENT DISK FILE NAME (IF ONE EXISTS) TO */B/* THE MISSPELL INFORMATIONAL MESSAGE. */N/* */;/* X-11 RNM0086 RUSS MURRAY 20-SEP-1989 */B/* SUPPORT FOR COMMAND VERB/QUALIFIER SPELLING */B/* CHECKS: ADD MISSPELL INFORMATIONAL MESSAGE FOR */B/* COMMAND VERB/QUALIFIER MISSPELLINGS. */N/* */:/* X-10 TNF0056 TODD FLOLO 6-FEB-1989 */B/* ADD MESSAGE FOR DISABLED RUN & MCR COMMAND */N/*  */9/* X-9 TNF0053 TODD FLOLO 2-DEC-1988 */B/* ADD MESSAGES FOR CAPTIVE & DISIMAGE ACCOUNTS */N/* */9/* X-8 TNF0047 TODD FLOLO 06-OCT-1988 */B/* ADD NEW MESSAGES FOR CONTEXT SYMBOL PROCESSING. */N/* */=/* X-7 HWS0263 HAROLD SCHULTZ 08-DEC-1986 */B/* ADD INVIFNEST ERROR MESSAGE FOR IF-THEN-ELSE */B/* CONSTRUCTS. */N/* */=/* X-6 HWS0188 HAROLD SCHULTZ 03-OCT-1985 */B/* ADD USCALL AND USGOSUB ERROR MESSAGES. */N/* */=/* X-5 HWS0178 HAROLD SCHULTZ 09-SEP-1985 */B/* CHANGE THE INVCALL AND STKOVF ERROR MESSAGES. */B/* ADD INVGOSUB AND GOSUBMAX. */N/* */=/* X-4 HWS0168 HAROLD SCHULTZ 04-SEP-1985 */B/* ADD INVDEF AND INVCALL */N/* */=/* X-3 HWS0161 HAROLD SCHULTZ 19-AUG-1985 */B/* ADD PERMSYM AND GBLNDF  */N/* */A/* V04-002 HWS0130 HAROLD SCHULLZ 29-MAY-1985 */B/* ADD INVOUTSPE */N/* */A/* V04-001 HWS0117 HAROLD SCHULTZ 09-MAR-1985 */B/* ADD ATTRMBX */N/*  */N/*--- */N/* */N/* DEFINE CLI RELATED STATUS VALUES */N/* */#define CLI$_FACILITY 3#define CLI$_ABVERB 229384#define CLI$_ABKEYW 229392#define CLI$_BUFOVF 229400#define CLI$_COMPLX 229408#define CLI$_DEFOVF 229416#define CLI$_DIRECT 229424#define CLI$_EXPSYN 229432N#define CLI$_IMCHNG 229440 /* NOT USED BY DCL NOR BY MCR */#define CLI$_INSFPRM 229448#define CLI$_IVCHAR 229456N#define CLI$_DEFOVF16 229464 /* SS111808 */#define CLI$_IVKEYW 229472#define CLI$_IVOPER 229480#define CLI$_IVPROT 229488#define CLI$_IVQLOC 229496#define CLI$_IVSYMB 229504#define CLI$_IVVALU 229512#define CLI$_IVVERB 229520#define CLI$_MAXPARM 229528N#define CLI$_NOATFIL 229536 /* NOT USED BY DCL NOR BY MCR */#define CLI$_NOCCAT 229544#define CLI$_NOCOMD 229552#define CLI$_NOKEYW 229560#define CLI$_NOLIST 229568#define CLI$_NOQUAL 229576#define CLI$_NOVALU 229584#define CLI$_NOTNEG 229592#define CLI$_NULFIL 229600#define CLI$_NUMBER 229608#define CLI$_ONCOMD 229616#define CLI$_ONERR 229624#define CLI$_ONLEVL 229632#define CLI$_ONOVF 229640#define CLI$_PARMDEL 229648#define CLI$_RSLOVF 229656#define CLI$_SKPDAT 229664#define CLI$_STKOVF 229672#define CLI$_SYMDEL 229680#define CLI$_SYMOVF 229688#define CLI$_UNDSYM 229696#define CLI$_USGOTO 229704#define CLI$_VALREQ 229712#define CLI$_ONEVAL 229720#define CLI$_OVRFLW 229728N#define CLI$_UNPROQUAL 229736 /* OLD CLI INTERFACE STATUS */N#define CLI$_UNPROPARM 229744 /* OLD CLI INTERFACE STATUS */N#define CLI$_INVKEY 229752 /* OLD MCR STATUS GOING AWAY SOON */N#define CLI$_INVRSP 229760 /* NOT USED BY DCL NOR BY MCR */#define CLI$_UNDFIL 229768N#define CLI$_FILOPN 229776 /* NOT USED BY DCL NOR BY MCR */N#define CLI$_BADRET 229784 /* NOT USED BY DCL NOR BY MCR */#define CLI$_ABSYMD 229792#define CLI$_INVUIC 229800N#define CLI$_BADTEXT 229808 /* NOT USED BY DCL NOR BY MCR */#define CLI$_ABFNAM 229816#define CLI$_IVFNAM 229824N#define CLI$_BLKOVRFLOW 229832 /* NOT USED BY  DCL NOR BY MCR */N#define CLI$_BLKUNDFLOW 229840 /* NOT USED BY DCL NOR BY MCR */N#define CLI$_BADBLK 229848 /* NOT USED BY DCL NOR BY MCR */#define CLI$_NOLBLS 229856N#define CLI$_NOCHANGE 229864 /* MCR-ONLY STATUS */N#define CLI$_ABSENT 229872 /* NEW CLI INTERFACE STATUS */N#define CLI$_NEGATED 229880 /* NEW CLI INTERFACE STATUS */#define CLI$_INVFILSPE 229888N#define CLI$_INVLOGF IL 229896 /* NOT USED BY DCL NOR BY MCR */#define CLI$_NOTHEN 229904#define CLI$_SYMTOOLNG 229912N#define CLI$_ASTDCL 229920 /* GOES AWAY IN V4 */#define CLI$_INVRANGE 229928N#define CLI$_LOCNEG 229936 /* NEW CLI INTERFACE STATUS */#define CLI$_CMDNOTFND 229944#define CLI$_IVQUAL 229952#define CLI$_CMDSEG 229960#define CLI$_NOTIFY 229968#define CLI$_CONFLICT 229976#define CLI$_UNDKEY 229984#define CLI$_ARGREQ 22 9992#define CLI$_SYMLNG 230000#define CLI$_SYMABR 230008#define CLI$_IVKEYNAM 230016#define CLI$_NOPAREN 230024#define CLI$_IVATIME 230032#define CLI$_IVDTIME 230040#define CLI$_TKNOVF 230048N#define CLI$_CMDFILERR 230056 /* MCR-ONLY STATUS */#define CLI$_INVOUTSPE 230064#define CLI$_PERMSYM 230072#define CLI$_GBLNDF 230080#define CLI$_INVGOSUB 230088#define CLI$_GOSUBMAX 230096#define CLI$_USCALL 230104#define CLI$_USGOSUB 230112#define  CLI$_FRZNCTX 230120#define CLI$_NOTCTX 230128#define CLI$_INVCTXTYP 230136#define CLI$_CMDSEG2 230144#define CLI$_INVNOD 230152#define CLI$_NULLPIPE 230160#define CLI$_INVNULLCMD 230168#define CLI$_WRGSUBSHSYN 230176#define CLI$_UNTERMSUBSH 230184#define CLI$_DUPREDSYN 230192#define CLI$_INCREDSYN 230200#define CLI$_INVREDSYN 230208#define CLI$_INVCONCHAR 230216"#define CLI$_CMDNOTALLINPIP 230224"#define CLI$_LBLNOTALLINPIP 230232!#define CLI$_TOOMANYPIPCMD 230240N #define CLI$_UNSUPITEM 230248 /* */N/* DEFINE CLI RELATED "ERROR" LEVEL ERROR CODES */I/* BEGIN ERROR CODE 2048 FROM WARNING TO */I/* LEAVE ROOM FOR 256 WARNINGS. */N/* */N#define CLI$_CONFQUAL 231426 /* OLD CLI INTERFACE STATUS */N#define CLI$_INVQUAL 231434   /* OLD CLI INTERFACE STATUS */N#define CLI$_REQPRMABS 231442 /* OLD CLI INTERFACE STATUS */N#define CLI$_INVQUALNUM 231450 /* OLD CLI INTERFACE STATUS */N#define CLI$_INVREQTYP 231458 /* USED BY CALL BACKS */N#define CLI$_NOVALUE 231466 /* OLD CLI INTERFACE STATUS */N#define CLI$_VALCNVERR 231474 /* OLD CLI INTERFACE STATUS */N#define CLI$_ILLVAL 231482 /* USED BY CALL BACK S */N#define CLI$_NOOPTPRS 231490 /* OLD CLI INTERFACE STATUS */N#define CLI$_CREQUEJOB 231498 /* NOT USED BY DCL NOR BY MCR */N#define CLI$_SUBMITERR 231506 /* NOT USED BY DCL NOR BY MCR */N#define CLI$_DEVALSPL 231514 /* NOT USED BY DCL NOR BY MCR */N#define CLI$_DEVNOTSPL 231522 /* NOT USED BY DCL NOR BY MCR */N#define CLI$_IVDEVTYPE 231530 /* MCR-ONLY STATUS */N#define CLI$_IMGFNF 231538 /* MCR-ONLY STATUS */N#define CLI$_DEVNOTFOR 231546 /* NOT USED BY DCL NOR BY MCR */N#define CLI$_PWDNOTVAL 231554 /* SET PASSWORD STATUS */N#define CLI$_PWDNOTVER 231562 /* SET PASSWORD STATUS */N#define CLI$_PWDLOCKED 231570 /* SET PASSWORD STATUS */N#define CLI$_NOTFR 231578 /* IMAGE ACTIVATION ERROR - PART 2 */N#define CLI$_PWDSYNTAX 231586  /* SET PASSWORD STATUS */N#define CLI$_IMGNAME 231594 /* IMAGE ACTIVATION ERROR - PART 2 */N#define CLI$_IMAGEFNF 231602 /* IMAGE ACTIVATION ERROR - PART 2 */N#define CLI$_BADSTRLVL 231610 /* NOT USED BY DCL NOR BY MCR */#define CLI$_REFUSED 231618N#define CLI$_BADCTLMSK 231626 /* USED BY CALL BACKS */#define CLI$_INVRFM 231634N#define CLI$_NOCLINT 231642 /* MCR-ONLY STATUS */N#define CLI$_NOSPAWN 231650 /* MCR-ONLY STATUS */#define CLI$_SPWNIO 231658#define CLI$_TRMMBX 231666#define CLI$_STRTOOLNG 231674N#define CLI$_CMDGONE 231682 /* MCR-ONLY STATUS */#define CLI$_NOCMDPROC 231690#define CLI$_INVROUT 231698#define CLI$_OLDTAB 231706#define CLI$_INVTAB 231714#define CLI$_NOTDISCON 231722#define CLI$_ENTNF 231730#define CLI$_ATTRMBX 231738#define CLI$_INVCALL 231746#define CLI$_INVIFNE ST 231754#define CLI$_CAPTINT 231762#define CLI$_CAPTINQ 231770#define CLI$_NOFORCMD 231778#define CLI$_NORUNMCR 231786#define CLI$_NOREADCP 231794#define CLI$_INVPREFIX 231802#define CLI$_CAPTSPAWN 231810#define CLI$_ILLFILEVER 231818N/* */N/* DEFINE INFORMATIONAL MESSAGES. */N/* */#define CLI$_DEFKEY 253379#define CLI$_DELKEY 253387#define CLI$_SETKEY 253395N#define CLI$_SPARE1 253403 /* NOT CURRENTLY USED */#define CLI$_ALLOC 253411#define CLI$_SUPERSEDE 253419N#define CLI$_INSPRIV 253427 /* MCR-ONLY STATUS */N#define CLI$_NODIRCHG 253435 /* MCR-ONLY STATUS */#define CLI$_IGNQUAL 253443#define CLI$_TABEXIST 253451#define CLI$_TABSUPER 253459#define CLI$_TABNOTFND 253467#define CLI$_DELSYM 253475#define CLI$_SYMTRUNC 253483#define CLI$_KEYCNV 253491#define CLI$_INVDEF 253499#define CLI$_MISSPELL 253507#define CLI$_MSNGENDS 253515N/* */N/* DEFINE SUCCESSFUL MESSAGES */N/* */#define CLI$_SPAWNED 261377#define CLI$_ATTACHED 261385#define CLI$_RETURNED 261393N#define CLI$_PRESENT 261401 /* NEW CLI INTERFACE STATUS */N#define CLI$_DEFAULTED 261409 /* NEW CLI INTERFACE STATUS */N#define CLI$_CONCAT 261417 /* NEW CLI INTERFACE STATUS */N#define CLI$_LOCPRES 261425 /* NEW CLI INTERFACE STATUS */N#define CLI$_COMMA 261433 /* NEW CLI INTERFACE STATUS */N#define CLI$_OKTAB 261441 /* CDU CONVERSION ROUTINE STATUS */N#define CLI$_UPGTAB 261449  /* CDU CONVERSION ROUTINE STATUS */N#define CLI$_PROC_ID 262129 /* NOT USED BY DCL NOR BY MCR */N#define CLI$_QUEJOBCRE 262137 /* NOT USED BY DCL NOR BY MCR */#define CLI$_NORMAL 196609 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pra gma __standard #endif /* __CLIMSGDEF_LOADED */ ww›/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $CLI SERVDEF ***/#ifndef __CLISERVDEF_LOADED#define __CLISERVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* DEFINE CLI SERVICE REQUEST CODES */N/* */N/* DEFINE CLI SERVICE CODES */N#define CLI$K_PAUSE 1 /* PAUSE THE IMAGE */Q#define CLI$K_DEFLOCAL 2 /* DEFINE A SYMBOL IN THE LOCAL TABLE */R#define CLI$K_DEFGLOBAL 3 /* DEFINE A SYMBOL IN THE GLOBAL TABLE */R#define CLI$K_CHAIN 4 /* PASS AN IMAGE TO RUN AFTER THIS ONE */S#define CLI$K_COMMAND 5 /* PASS A COMMAND LINE TO LATER EXECUTE */N#define CLI$K_CREALOG 6 /* DEFINE A PROCESS LOGICAL NAME */N#define CLI$K_DELELOG 7 /* DELETE A PROCESS LOGICAL NAME */O#define CLI$K_DISACTRLY 8 /* DISABLE DCL CONTROL Y PROCESSING */N#define CLI$K_ENABCTRLY 9 /* ENABLE DCL CONTROL Y PROCESSING */N#define CLI$K_GETSYM 10  /* RETURN VALUE OF A SYMBOL */N#define CLI$K_DELELCL 11 /* DELETE A LOCAL SYMBOL */N#define CLI$K_DELEGBL 12 /* DELETE A GLOBAL SYMBOL */O#define CLI$K_DISAOOB 13 /* DISABLE OUT-OF-BAND CHARACTER(S) */Q#define CLI$K_ENABOOB 14 /* RE-ENABLE OUT-OF-BAND CHARACTER(S) */N#define CLI$K_SPAWN 15 /* SPAWN A SUBPROCESS */N#define CLI$K_ATTACH 16 /* ATTACH TO A PROCESS */a#define CLI$K_LIBDEFLOCAL 17 /* DEFINE A SYMBOL IN LOCAL TABLE USING LIB$SET_SYMBOL */b#define CLI$K_LIBDEFGLOBAL 18 /* DEFINE A SYMBOL IN GLOBAL TABLE USING LIB$SET_SYMBOL */U#define CLI$K_LIBGETSYM 19 /* GET A SYMBOL VALUE USING LIB$GET_SYMBOL */U#define CLI$K_LIBDELELCL 20 /* DELETE A SYMBOL USING LIB$DELETE_SYMBOL */\#define CLI$K_LIBDELEGBL 21 /* DELETE A GLOBAL SYMBOL USING LIB$DELETE_SYMBOL */N#define CLI$K_SETCODESET 22 /* SET CODE SET */N/* */N/* Define local/global symbol flag returned by GETSYM */N/* */N#define CLI$K_LOCAL_SYM 1 /* Local symbol */N#define CLI$K_GLOBAL_SYM 2 /* Global symbol */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CLISERVDEF_LOADED */ wwCÛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV 3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $CLIVERBDEF ***/#ifndef __CLIVERBDEF_LOADED#define __CLIVERBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __stru!ct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* DEFINE GENERIC CODES FOR VERBS */N/* */N/* DEFINE VERB QENERIC CODES */N#define CLI$K_VERB_ALL"O 1 /* ALLOCATE */N#define CLI$K_VERB_ANAL 2 /* ANALIZE */N#define CLI$K_VERB_ASSI 3 /* ASSIGN */N#define CLI$K_VERB_BASI 4 /* BASIC */N#define CLI$K_VERB_BLIS 5 /* BLISS */N#define CLI$K_VERB_COBO 6 /* COBOL */N#define CLI$K_VERB_CONT 7 /* CONTI#NUE */N#define CLI$K_VERB_COPY 8 /* COPY */N#define CLI$K_VERB_CREA 9 /* CREATE */N#define CLI$K_VERB_DATA 10 /* DATA */N#define CLI$K_VERB_DEAL 11 /* DEALLOCATE */N#define CLI$K_VERB_DEAS 12 /* DEASSIGN */N#define CLI$K_VERB_DEBU 13 /* DEBUG $ */N#define CLI$K_VERB_DEFI 14 /* DEFINE */N#define CLI$K_VERB_DELE 15 /* DELETE */N#define CLI$K_VERB_DEPO 16 /* DEPOSIT */N#define CLI$K_VERB_DIFF 17 /* DIFFERENCE COMMAND */N#define CLI$K_VERB_DIRE 18 /* DIRECTORY */N#define CLI$K_VERB_DISM 19 /* DISMOUNT */N#define CLI$K_VERB_E%DIT 20 /* EDIT */N#define CLI$K_VERB_EOD 21 /* EOD */N#define CLI$K_VERB_EXAM 22 /* EXAMINE */N#define CLI$K_VERB_EXIT 23 /* EXIT */N#define CLI$K_VERB_FORT 24 /* FORTRAN */N#define CLI$K_VERB_GOTO 25 /* GOTO */N#define CLI$K_VERB_HELP 26 /* HEL&P */N#define CLI$K_VERB_IF 27 /* IF */N#define CLI$K_VERB_INIT 28 /* INITIALIZE */N#define CLI$K_VERB_INQU 29 /* INQUIRE */N#define CLI$K_VERB_LINK 30 /* LINK */N#define CLI$K_VERB_LOGO 31 /* LOGOUT */N#define CLI$K_VERB_MACR 32 /* MACRO ' */N#define CLI$K_VERB_MCR 33 /* MCR */N#define CLI$K_VERB_ON 34 /* ON */N#define CLI$K_VERB_PRIN 35 /* PRINT */N#define CLI$K_VERB_RUN 36 /* RUN */N#define CLI$K_VERB_SET 37 /* SET */N#define CLI$K_VERB_SHOW 38 /* SHOW */N#define CLI$K_VERB(_STAR 39 /* START */N#define CLI$K_VERB_STOP 40 /* STOP */N#define CLI$K_VERB_SUBM 41 /* SUBMIT */N#define CLI$K_VERB_TYPE 42 /* TYPE */N#define CLI$K_VERB_MOUN 43 /* MOUNT */N#define CLI$K_VERB_PATC 44 /* PATCH */N#define CLI$K_VERB_REPL 45 /* R)EPLAY */N#define CLI$K_VERB_UNLO 46 /* UNLOCK */N#define CLI$K_VERB_APPE 47 /* APPEND COMMAND */N#define CLI$K_VERB_DUMP 48 /* DUMP */N#define CLI$K_VERB_PURG 49 /* PURGE */N#define CLI$K_VERB_RENA 50 /* RENAME */N#define CLI$K_VERB_CANC 51 /* CANCEL * */N#define CLI$K_VERB_LIBR 52 /* LIBRARY */N#define CLI$K_VERB_SORT 53 /* SORT */N#define CLI$K_VERB_REQU 54 /* REQUEST */N#define CLI$K_VERB_SYNC 55 /* SYNCRONIZE */N#define CLI$K_VERB_CORA 56 /* CORAL */N#define CLI$K_VERB_PASC 57 /* PASCAL */N#define CLI$K_VE+RB_PLI 58 /* PL/1 */N#define CLI$K_VERB_MESS 59 /* MESSAGE */N/* DEFINE VERB QENERIC CODES */N#define CLI$K_VERB_FORE 255 /* FOREIGN COMMAND */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-define,d required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CLIVERBDEF_LOADED */ wwjÛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//*************************************************************************** -*****************************************************//*** MODULE $CLSDEF ***/#ifndef __CLSDEF_LOADED#define __CLSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ / */N/* */N/* Security classification block. Contains secrecy and integrity */N/* level and categories for non-discretionary (mandatory) access controls. */N/* */N/*- */N#define CLS$S_CLSDEF_TLVRNG 4 /* P 0reserve previous size symbol */ #ifdef __NEW_STARLETNtypedef struct _cls_tlvrng { /* Range specifier field references */N unsigned short int cls$w_range_low; /* Range low limit */N unsigned short int cls$w_range_high; /* Range high limit */ } CLS_TLVRNG;#else /* __OLD_STARLET */Ntypedef struct _cls_tlvrng { /* Range specifier field references */N unsigned short int cls$w_range_low; /* Range low limit 1 */N unsigned short int cls$w_range_high; /* Range high limit */ } cls_tlvrng;%#endif /* #ifdef __NEW_STARLET */N#define CLS$K_END 0 /* List terminator */N#define CLS$K_SC_ENUMERATE 1 /* Secrecy category enumerated list */N#define CLS$K_SC_RANGE 2 /* Secrecy category range list */N#define CLS$K_SC_MASK 3 /* Secrecy category bitmask */P#define CLS$K_IC_ENUMERATE 17 2 /* Integrity category enumerated list */N#define CLS$K_IC_RANGE 18 /* Integirty category range list */N#define CLS$K_IC_MASK 19 /* Integrity category bitmask */N#define CLS$K_VOID 255 /* Voided entry */N#define CLS$S_CLSDEF_TLV 8 /* Preserve previous size symbol */ #ifdef __NEW_STARLETNtypedef union _cls_tlv { /* TLV entry field references */ __struct {N unsigned c3har cls$b_tag; /* Format code */Q __union { /* Field length, intrepretation format */N/* dependent: */N unsigned char cls$b_count; /* # entries in an enumerated list */N/* # range pairs in a range list */N/* # longwords following voided entry */N unsigned char cls$b_mask_siz 4e; /* # longwords in a bitmask */ } cls$b_length;N __union { /* Value set. */ __struct {\ unsigned short int cls$w_catlst [1]; /* Vector of enumerated cat. */" } cls$r_catlsttlv; __struct {% short int cls$w_rsvd;T unsigned int cls$l_rnglst [1]; /* Vector of high:low word */N/* range pairs 5 */" } cls$r_rnglsttlv; __struct {N unsigned short int cls$w_base; /* Bias value */N unsigned int cls$l_mask [1]; /* <32 * MASK_SIZE> bit mask */ } cls$r_msktlv; __struct {2 unsigned short int cls$w_rsvd [3]; } cls$r_endtlv; __struct {N unsigned short int cls$w_void [1]; /* words */ 6 } cls$r_voidtlv; } cls$r_value_set; } cls$r_tlv; } CLS_TLV; #if !defined(__VAXC)%#define cls$b_tag cls$r_tlv.cls$b_tag+#define cls$b_length cls$r_tlv.cls$b_length,#define cls$b_count cls$b_length.cls$b_count4#define cls$b_mask_size cls$b_length.cls$b_mask_size1#define cls$r_value_set cls$r_tlv.cls$r_value_setA#define cls$w_catlst cls$r_value_set.cls$r_catlsttlv.cls$w_catlstA#define cls$l_rnglst cls$r_value_set.cls$r_rnglsttlv.cls$l_rnglst:#d 7efine cls$w_base cls$r_value_set.cls$r_msktlv.cls$w_base:#define cls$l_mask cls$r_value_set.cls$r_msktlv.cls$l_mask;#define cls$w_void cls$r_value_set.cls$r_voidtlv.cls$w_void"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */Ntypedef union _cls_tlv { /* TLV entry field references */ __struct {N unsigned char cls$b_tag; /* Format code */Q __union { /* Field length, intrepretation form8at */N/* dependent: */N unsigned char cls$b_count; /* # entries in an enumerated list */N/* # range pairs in a range list */N/* # longwords following voided entry */N unsigned char cls$b_mask_size; /* # longwords in a bitmask */ } cls$b_length;N __union { /* Value set. 9 */ __struct {\ unsigned short int cls$w_catlst [1]; /* Vector of enumerated cat. */" } cls$r_catlsttlv; __struct {% short int cls$w_rsvd;T unsigned int cls$l_rnglst [1]; /* Vector of high:low word */N/* range pairs */" } cls$r_rnglsttlv; __struct {N unsigned short int cls$w_bas:e; /* Bias value */N unsigned int cls$l_mask [1]; /* <32 * MASK_SIZE> bit mask */ } cls$r_msktlv; __struct {2 unsigned short int cls$w_rsvd [3]; } cls$r_endtlv; __struct {N unsigned short int cls$w_void [1]; /* words */ } cls$r_voidtlv; } cls$r_value_set; } cls$r_tlv; } cls_tlv; #if !defined(__VAXC)%#define ;cls$b_tag cls$r_tlv.cls$b_tag6#define cls$b_count cls$r_tlv.cls$b_length.cls$b_count>#define cls$b_mask_size cls$r_tlv.cls$b_length.cls$b_mask_sizeK#define cls$w_catlst cls$r_tlv.cls$r_value_set.cls$r_catlsttlv.cls$w_catlstK#define cls$l_rnglst cls$r_tlv.cls$r_value_set.cls$r_rnglsttlv.cls$l_rnglstD#define cls$w_base cls$r_tlv.cls$r_value_set.cls$r_msktlv.cls$w_baseD#define cls$l_mask cls$r_tlv.cls$r_value_set.cls$r_msktlv.cls$l_maskE#define cls$w_void cls$r_tlv.cls$r_value_set.cls$r_voidtlv <.cls$w_void"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define CLS$K_MIN_SEC_LEV 0 /* Minimum secrecy level */N#define CLS$K_MIN_INT_LEV 0 /* Minimum integrity level */N#define CLS$K_MAX_SEC_LEV 255 /* Maximum secrecy level */N#define CLS$K_MAX_INT_LEV 255 /* Maximum integrity level */N#define CLS$K_MIN_SEC_CAT 1 /* Minimum secrecy category */N#define CLS$=K_MIN_INT_CAT 1 /* Minimum integrity category */Q#define CLS$K_MAX_SEC_CAT 65536 /* Maximum supported secrecy category */S#define CLS$K_MAX_INT_CAT 65536 /* Maximum supported integrity category */N#define CLS$K_MAX_SEC_CAT_S64I64 64 /* Maximum type 0 secrecy category */P#define CLS$K_MAX_INT_CAT_S64I64 64 /* Maximum type 0 integrity category */N#define CLS$K_MAX_SEC_CAT_S128 128 /* Maximum type 1 secrecy category */N#define CLS$K_MAX_SEC_CAT_>DYN_CAT 65536 /* Maximum type 2 secrecy category */P#define CLS$K_MAX_INT_CAT_DYN_CAT 65536 /* Maximum type 2 integrity category */N#define CLS$K_TYP_S64I64 0 /* Type 0 class block identifier */N#define CLS$K_TYP_S128 1 /* Type 1 class block identifier */N#define CLS$K_TYP_DYN_CAT 2 /* Type 2 class blook identifier */N#define CLS$K_LENGTH_HDR 4 /* Size of common header */N#define CLS$K_LENGTH_S64I64 20 /* Size o ?f type 0 class block */N#define CLS$K_LENGTH_S128 20 /* Size of type 1 class block */N#define CLS$K_LENGTH_DYN_CAT 4 /* Size of type 2 class block */N/* fixed portion */O#define CLS$S_CLSDEF 20 /* Preserve previous size definition */N#define CLS$K_LENGTH 20 /* length of structure */ #ifdef __NEW_STARLETtypedef union _cls { __struct {N @unsigned char cls$b_sec_lev; /* Secrecy level */N unsigned char cls$b_int_lev; /* Integrity level */N unsigned char cls$b_type; /* Class block type */N/* Class block type identifiers */O unsigned char cls$b_tlvlst_size; /* Size in longwords of TLV list in */N/* a type 2 class block. */P __union { A /* Type dependent overlays/extensions */N/* */N/* Usage of the ..._S64I64 and ..._S128 symbolic name forms is preferred. */N/* Previous name forms have been retained for backwards compatibility only. */N/* */N __struct { /* Type 0 class block fields */S unsigned __int64 cls$q_sec_cat_s64i64; /B* Secrecy category mask */U unsigned __int64 cls$q_int_cat_s64i64; /* Integrity category mask */& } cls$r_clsdef_s64i64;N __struct { /* Type 1 class block fields */Q unsigned int cls$o_sec_cat_s128 [4]; /* Secrecy category mask */$ } cls$r_clsdef_s128;N __struct { /* Type 2 class block fields */N unsigned int cls$l_tlvlst [1]; /* Tag-Length-ValueC_set list */' } cls$r_clsdef_dyn_cat;N/* */m/* The following definitions have been superseded and are being retained for backwards compatibility only. */N/* Usage of the ..._S64I64 and ..._S128 symbolic names is preferred. */N/* */N __struct { /* Type 0 class block fields */y unDsigned __int64 cls$q_sec_cat_0; /* Secrecy category mask - Usage of CLS$Q_SEC_CAT_S64I64 preferred */z unsigned __int64 cls$q_int_cat_0; /* Integrity category mask - Usage of CLS$Q_INT_CAT_S64I64 preferred */! } cls$r_clsdef_0;N __struct { /* Type 1 class block fields */v unsigned int cls$o_sec_cat_1 [4]; /* Secrecy category mask - Usage of CLS$O_SEC_CAT_S128 preferred */! } cls$r_clsdef_1; E } cls$r_clsdef_x; } cls$r_sevms_defs;N/* */m/* The following definitions have been superseded and are being retained for backwards compatibility only. */N/* Usage of the ..._S64I64 and ..._S128 symbolic names is preferred. */N/* */ __struct {_ unsigned char cls$b_secur_lev; /* Security level - Usage of CLS$B_SECF_LEV preferred */` unsigned char cls$b_integ_lev; /* Integrity level - Usage of CLS$B_INT_LEV preferred */N short int cls$w_fill_1; /* Reserved */ unsigned __int64 cls$q_secur_cat; /* Security category mask - Usage of CLS$Q_SEC_CAT_S64I64/CLS$O_SEC_CAT_S128 preferred */q unsigned __int64 cls$q_integ_cat; /* Integrity category mask - Usage of CLS$Q_INT_CAT_S64I64 preferred */ } cls$r_vms_defs;N/* G */O/* The CLS$S_CLSDEF definition is provided for backwards compatibility only. */l/* Usage of the CLS$K_LENGTH_S64I64, CLS$K_LENGTH_S128 and CLS$K_LENGTH_DYN_CAT definitions is preferred. */N/* */ } CLS; #if !defined(__VAXC)4#define cls$b_sec_lev cls$r_sevms_defs.cls$b_sec_lev4#define cls$b_int_lev cls$r_sevms_defs.cls$b_int_lev.#define cls$b_type cls$r_sevms_defs.clHs$b_type<#define cls$b_tlvlst_size cls$r_sevms_defs.cls$b_tlvlst_sizee#define cls$q_sec_cat_s64i64 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_s64i64.cls$q_sec_cat_s64i64e#define cls$q_int_cat_s64i64 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_s64i64.cls$q_int_cat_s64i64_#define cls$o_sec_cat_s128 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_s128.cls$o_sec_cat_s128V#define cls$l_tlvlst cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_dyn_cat.cls$l_tlvlstV#define cls$q_sec_cat_0 cls$r_sevms_defs I.cls$r_clsdef_x.cls$r_clsdef_0.cls$q_sec_cat_0V#define cls$q_int_cat_0 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_0.cls$q_int_cat_0V#define cls$o_sec_cat_1 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_1.cls$o_sec_cat_16#define cls$b_secur_lev cls$r_vms_defs.cls$b_secur_lev6#define cls$b_integ_lev cls$r_vms_defs.cls$b_integ_lev6#define cls$q_secur_cat cls$r_vms_defs.cls$q_secur_cat6#define cls$q_integ_cat cls$r_vms_defs.cls$q_integ_cat"#endif /* #if !defined(__VAXC) */ #else /* __OLD J_STARLET */typedef union _cls { __struct {N unsigned char cls$b_sec_lev; /* Secrecy level */N unsigned char cls$b_int_lev; /* Integrity level */N unsigned char cls$b_type; /* Class block type */N/* Class block type identifiers */O unsigned char cls$b_tlvlst_size; /* Size in longwords of TLV list in */N/* a type 2 class block. K */P __union { /* Type dependent overlays/extensions */N/* */N/* Usage of the ..._S64I64 and ..._S128 symbolic name forms is preferred. */N/* Previous name forms have been retained for backwards compatibility only. */N/* */N __struct { /* Type 0 class block fields L */S unsigned int cls$q_sec_cat_s64i64 [2]; /* Secrecy category mask */U unsigned int cls$q_int_cat_s64i64 [2]; /* Integrity category mask */& } cls$r_clsdef_s64i64;N __struct { /* Type 1 class block fields */Q unsigned int cls$o_sec_cat_s128 [4]; /* Secrecy category mask */$ } cls$r_clsdef_s128;N __struct { /* Type 2 class block fields */N M unsigned int cls$l_tlvlst [1]; /* Tag-Length-Value_set list */' } cls$r_clsdef_dyn_cat;N/* */m/* The following definitions have been superseded and are being retained for backwards compatibility only. */N/* Usage of the ..._S64I64 and ..._S128 symbolic names is preferred. */N/* */N __struct { N /* Type 0 class block fields */y unsigned int cls$q_sec_cat_0 [2]; /* Secrecy category mask - Usage of CLS$Q_SEC_CAT_S64I64 preferred */z unsigned int cls$q_int_cat_0 [2]; /* Integrity category mask - Usage of CLS$Q_INT_CAT_S64I64 preferred */! } cls$r_clsdef_0;N __struct { /* Type 1 class block fields */v unsigned int cls$o_sec_cat_1 [4]; /* Secrecy category mask - Usage of CLS$O_SEC_C OAT_S128 preferred */! } cls$r_clsdef_1; } cls$r_clsdef_x; } cls$r_sevms_defs;N/* */m/* The following definitions have been superseded and are being retained for backwards compatibility only. */N/* Usage of the ..._S64I64 and ..._S128 symbolic names is preferred. */N/* */ __struct {_ unsignedP char cls$b_secur_lev; /* Security level - Usage of CLS$B_SEC_LEV preferred */` unsigned char cls$b_integ_lev; /* Integrity level - Usage of CLS$B_INT_LEV preferred */N short int cls$w_fill_1; /* Reserved */ unsigned int cls$q_secur_cat [2]; /* Security category mask - Usage of CLS$Q_SEC_CAT_S64I64/CLS$O_SEC_CAT_S128 preferred */q unsigned int cls$q_integ_cat [2]; /* Integrity category mask - Usage of CLS$Q_INT_CAT_S64I64 preferred * Q/ } cls$r_vms_defs;N/* */O/* The CLS$S_CLSDEF definition is provided for backwards compatibility only. */l/* Usage of the CLS$K_LENGTH_S64I64, CLS$K_LENGTH_S128 and CLS$K_LENGTH_DYN_CAT definitions is preferred. */N/* */ } cls; #if !defined(__VAXC)4#define cls$b_sec_lev cls$r_sevms_defs.cls$b_sec_lev4#define cls$b_int_lev cls$r_seRvms_defs.cls$b_int_lev.#define cls$b_type cls$r_sevms_defs.cls$b_type<#define cls$b_tlvlst_size cls$r_sevms_defs.cls$b_tlvlst_sizee#define cls$q_sec_cat_s64i64 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_s64i64.cls$q_sec_cat_s64i64e#define cls$q_int_cat_s64i64 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_s64i64.cls$q_int_cat_s64i64_#define cls$o_sec_cat_s128 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_s128.cls$o_sec_cat_s128V#define cls$l_tlvlst cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_Sdyn_cat.cls$l_tlvlstV#define cls$q_sec_cat_0 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_0.cls$q_sec_cat_0V#define cls$q_int_cat_0 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_0.cls$q_int_cat_0V#define cls$o_sec_cat_1 cls$r_sevms_defs.cls$r_clsdef_x.cls$r_clsdef_1.cls$o_sec_cat_16#define cls$b_secur_lev cls$r_vms_defs.cls$b_secur_lev6#define cls$b_integ_lev cls$r_vms_defs.cls$b_integ_lev6#define cls$q_secur_cat cls$r_vms_defs.cls$q_secur_cat6#define cls$q_integ_cat cls$r_vms_defs.cls$q_integ_c Tat"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* $CHANGE_CLASS, PARSE_CLASS, FORMAT_CLASS system service item codes */N/* */N#define CLS$_SECSTR 1 /* Textual secrecy/security string */N#define CLS$_INTSTR 2 /* Textual integrity string */N#define CLS$_CLSBLK 3 U /* Simple classification block */N#define CLS$_MINCLSBLK 4 /* Minimum classification block */N#define CLS$_MAXCLSBLK 5 /* Maximum classification block */P#define CLS$_WIDTH 6 /* Width of display for $FORMAT_CLASS */O#define CLS$_TRMDSC 7 /* Line terminator for $FORMAT_CLASS */N#define CLS$_INDENT 8 /* Line indenting for $FORMAT_CLASS */N#define CLS$_OLDCLSBLK 9 /* PVrevious classification block */N#define CLS$_OLDMINCLS 10 /* Previous minimum class block */N#define CLS$_OLDMAXCLS 11 /* Previous maximum class block */e#define CLS$_TRANQUIL 12 /* Override tranquility checks - Usage reserved to Digital */N#define CLS$_FLAGS 13 /* Formatting control flags */N/* ADD ITEM-CODES BEFORE THIS COMMENT */#define CLS$_MIN_ITEM_CODE 1#define CLS$_MAXW_ITEM_CODE 13#define CLS$M_COMPRESS 0x1#define CLS$M_EXPAND 0x2 #ifdef __NEW_STARLETtypedef union _fill_108_ {N unsigned int cls$l_flags; /* $FORMAT_CLASS control flags */ __struct {N unsigned cls$v_compress : 1; /* Compress category range strings */N unsigned cls$v_expand : 1; /* Expande category range strings */% unsigned cls$v_fill_110_ : 6; } cls$r_fill_109_; } FILL_108_; #if !defined(__VAXC)5#define cls$ Xv_compress cls$r_fill_109_.cls$v_compress1#define cls$v_expand cls$r_fill_109_.cls$v_expand"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef union _fill_108_ {N unsigned int cls$l_flags; /* $FORMAT_CLASS control flags */ __struct {N unsigned cls$v_compress : 1; /* Compress category range strings */N unsigned cls$v_expand : 1; /* Expande category range strings */% unsigned cls$v_fill_110_ : 6; } clYs$r_fill_109_; } fill_108_; #if !defined(__VAXC)5#define cls$v_compress cls$r_fill_109_.cls$v_compress1#define cls$v_expand cls$r_fill_109_.cls$v_expand"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus Z}#endif#pragma __standard #endif /* __CLSDEF_LOADED */ wwě/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** [ MODULE $CLUEVTDEF ***/#ifndef __CLUEVTDEF_LOADED#define __CLUEVTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N#define CLUEVTHNDL$K_LENGTH 8 /* Length of block. ] */N#define CLUEVTHNDL$C_LENGTH 8 /* Length of block. */ #ifdef __NEW_STARLETtypedef struct _cluevthndl {* unsigned int cluevthndl$l_cluacb_addr;& unsigned int cluevthndl$l_seq_num; } CLUEVTHNDL;#else /* __OLD_STARLET */typedef struct _cluevthndl {* unsigned int cluevthndl$l_cluacb_addr;& unsigned int cluevthndl$l_seq_num; } cluevthndl;%#endif /* #ifdef __NEW_STARLET */ #ifndef __NEW_STARLET#define CLUEVTHNDL clu^evthndl#endif#define CLUEVT$C_ADD 1#define CLUEVT$C_REMOVE 2 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CLUEVTDEF_LOADED */ ww{?ś/******************************************************************************* _*************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */K/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CMA$DEF.SDI;1 *//********************************************************************************************************************************/(/*** MODULE CMA$DEF IDENT V3.15-001 ***/#ifndef __CMA_DEF_LOADED#define __CMA_DEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragm`a __member_alignment __save#pragma __nomember_alignmentR#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 ..a.#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 N/* */N/* FACILITY: */N/* */bN/* Common Multithread Architecture (CMA) services */N/* */N/* ABSTRACT: */N/* */N/* External definitions for CMA services */N/* */N/* AUTHORS: c */N/* */N/* Dave Butenhof (-Original) */I/* Paul Curtin (-Generic/SDL) */N/* */N/* CREATION DATE: */N/* d */N/* 2 November 1988 (-Original) */I/* 7 September 1990 (-Generic/SDL) */N/* */N/* MODIFIED BY: */N/* */I/* Dave Butenhof */I/* Paul eCurtin */I/* Gerald Feldman */I/* Brian Keane */I/* Webb Scales */N/* */ #ifndef CMA_DEF_INCLUDE#define CMA_DEF_INCLUDE#pragma nostandard #ifdef __cplusplus extern "C" {#endifN/* f */N/* Define a symbol which client code can test to determine whether the */N/* underlying threads package is DECthreads or not. This is especially */N/* important to clients of the Pthreads interface who may want to use */N/* certain DECthreads extensions, such as the global lock and non-real-time */N/* scheduling policies, on the DECthreads platform while maintaining */N/* portability to a "vanilla" ptghreads implementation. */N/* */ #define _DECTHREADS_ 1  Y#if defined(vms) || defined(__vms) || defined (VMS) || defined(__VMS) || defined(__vms__)Z# if defined (__decc) || defined (__DECC) || (defined (__cplusplus) && defined (__DECCXX))# pragma __extern_model __save(# pragma __extern_model __strict_refdef# endif5# include /* configuration symbols */#else9# includhe /* configuration symbols */#endif/*1 * The implementation makes these basic decisions */#if _CMA_OS_ != _CMA__VMS# include # include #endif/*; * For the VMS cma$ interface, suppress the EXC_ exceptions */ !#if !defined(_EXC_NO_EXCEPTIONS_)#define _EXC_NO_EXCEPTIONS_#endif#if _CMA_OS_ == _CMA__VMS=# include /* Bring in exception services */#elseA# include /* Bring in exceptioin services */#endif:#if (_CMA_OSIMPL_ == _CMA__OS_OSF) && _CMA_REENTRANT_CLIB_# ifndef _REENTRANT># error "Please compile module including cma.h with -threads"# endif#endif #ifndef __0# if !defined(__STDC__) && !defined(__cplusplus)# define __(__args__) ()# else# define __(__args__) __args__# endif#endif#ifdef __NEW_STARLETtypedef int CMA$T_INTEGER;#else /* __OLD_STARLET */typedef int cma$t_integer;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_SjTARLET#typedef unsigned int CMA$T_BOOLEAN;#else /* __OLD_STARLET */#typedef unsigned int cma$t_boolean;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLET#typedef unsigned int CMA$T_NATURAL;#else /* __OLD_STARLET */#typedef unsigned int cma$t_natural;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef float CMA$T_INTERVAL;#else /* __OLD_STARLET */typedef float cma$t_interval;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLkETtypedef int CMA$T_KEY;#else /* __OLD_STARLET */typedef int cma$t_key;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLETtypedef int CMA$T_STATUS;#else /* __OLD_STARLET */typedef int cma$t_status;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLETtypedef int CMA$T_PRIORITY;#else /* __OLD_STARLET */typedef int cma$t_priority;%#endif /* #ifdef __NEW_STARLET */ #if _CMA_VOID_#ifdef __NEW_STARLETtypedef void *CMA$T_ADDRESS;#elsletypedef void *cma$t_address;#endif#else#ifdef __NEW_STARLETtypedef char *CMA$T_ADDRESS;#else /* __OLD_STARLET */typedef char *cma$t_address;%#endif /* #ifdef __NEW_STARLET */ #endif#define CMA$C_PRIO_FIFO_MIN 16#define CMA$C_PRIO_FIFO_MID 24#define CMA$C_PRIO_FIFO_MAX 31#define CMA$C_PRIO_RR_MIN 16#define CMA$C_PRIO_RR_MID 24#define CMA$C_PRIO_RR_MAX 31 #define CMA$C_PRIO_THROUGH_MIN 8!#define CMA$C_PRIO_THROUGH_MID 12!#define CMA$C_PRIO_THROUGH_MAX 1 m5#define CMA$C_PRIO_BACK_MIN 0#define CMA$C_PRIO_BACK_MID 4#define CMA$C_PRIO_BACK_MAX 7 #define CMA$C_PRIO_ADA_LOW_MIN 0 #define CMA$C_PRIO_ADA_LOW_MID 4 #define CMA$C_PRIO_ADA_LOW_MAX 7 #define CMA$C_PRIO_ADA_RTB_MIN 0 #define CMA$C_PRIO_ADA_RTB_MID 4 #define CMA$C_PRIO_ADA_RTB_MAX 7N/* */N/* The implementation of the date_time type should match the "native */P/* time" of the platform: that allows cliennts to use the full set of platform */N/* time operations, rather than just "get_expiration", to compute and */N/* test timed waits. */N/* */N/* This section assumes the platform is either "VMS" or "UNIX-ish". Others */N/* will require changes. */N/* o */ #if _CMA_OS_ == _CMA__VMS #ifdef __NEW_STARLET!typedef struct _cma$t_date_time { unsigned int low; unsigned int high; } CMA$T_DATE_TIME;#else /* __OLD_STARLET */!typedef struct _cma$t_date_time { unsigned int low; unsigned int high; } cma$t_date_time;%#endif /* #ifdef __NEW_STARLET */ #else(typedef struct timeval cma$t_date_time;#endifN/* */N/* Spample decisions for what handles shall be */N/* */ #ifdef __NEW_STARLETtypedef struct _cma$t_handle { CMA$T_NATURAL handle_field1; CMA$T_NATURAL handle_field2; } CMA$T_HANDLE;#else /* __OLD_STARLET */typedef struct _cma$t_handle { cma$t_natural handle_field1; cma$t_natural handle_field2; } cma$t_handle;%#endif /* #ifdef __NEW_STARLET */#define qCMA$C_HANDLE_SIZE 8 ?#if (_CMA_COMPILER_ == _CMA__CFRONT) && (_CMA_OS_ == _CMA__VMS)/*L * The following declaration is a hack to support CFRONT (C++ preprocessor);G * without an actual instance, the struct definition isn't written out.= * Creates problems for VAX C when it compiles CFRONT output. */.static struct CMA_T_HANDLE cxxl_unused_handle;#endif'#define cma$thread_get_unique(handle) \= (((unsigned int)((cma$t_thread *)handle)->handle_field2))N/* r */N/* Sample decision for a one-time initialization control block and its */N/* initialization macro. */N/* */N/* */ #ifdef __NEW_STARLETtypedef struct _cma$t_once { CMA$T_INTEGER once_field1; CMA$T_INTEGER once_field2; CMA$T_INsTEGER once_field3; } CMA$T_ONCE;#else /* __OLD_STARLET */typedef struct _cma$t_once { cma$t_integer once_field1; cma$t_integer once_field2; cma$t_integer once_field3; } cma$t_once;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Sample decision for a variable to save the current alert state. */N/* */ #ifdtef __NEW_STARLET#typedef struct _cma$t_alert_state { CMA$T_INTEGER state1; CMA$T_INTEGER state2; } CMA$T_ALERT_STATE;#else /* __OLD_STARLET */#typedef struct _cma$t_alert_state { cma$t_integer state1; cma$t_integer state2; } cma$t_alert_state;%#endif /* #ifdef __NEW_STARLET */N/* */N/* The following are the portable CMA definitions */N/* u */N/* */N/* Operations on threads */N/* */#ifdef __NEW_STARLET-typedef CMA$T_ADDRESS (*CMA$T_START_ROUTINE)( void *arg);#else /* __OLD_STARLET *//typedef cma$t_address (*cma$t_start_routine)();%#endif /* #ifdef __NEW_STARLET * v/N/* */N/* Constants */N/* */#define CMA$C_FALSE 0#define CMA$C_TRUE 1#define CMA$C_NULL_PTR 0N/* */N/* Objects */N/* w */  #ifdef __NEW_STARLET!typedef CMA$T_HANDLE CMA$T_MUTEX; typedef CMA$T_HANDLE CMA$T_ATTR;"typedef CMA$T_HANDLE CMA$T_THREAD; typedef CMA$T_HANDLE CMA$T_COND;$typedef CMA$T_HANDLE CMA$T_STACK_NP;#else /* __OLD_STARLET */!typedef cma$t_handle cma$t_mutex; typedef cma$t_handle cma$t_attr;"typedef cma$t_handle cma$t_thread; typedef cma$t_handle cma$t_cond;$typedef cma$t_handle cma$t_stack_np;&#endif /* #ifdef __NEW_STARLET x*//* * Predefined null handle */#ifdef __NEW_STARLET%_CMA_IMPORT_ CMA$T_HANDLE cma$c_null;#else /* __OLD_STARLET */%_CMA_IMPORT_ cma$t_handle cma$c_null;&#endif /* #ifdef __NEW_STARLET */   /*3 * Declare a one time initialization control block. *+ * static cma$t_once block = cma$once_init; */!#define cma$once_init {0, 0, 0}/* * Exit status constants */#ifdef __NEW_STARLET!typedef enum _CMA$T_EXIT_STATUS { cma$c_null_thread = -1, y cma$c_term_error = 0, cma$c_term_normal = 1, cma$c_term_alert = 2 } CMA$T_EXIT_STATUS;#else!typedef enum _CMA$T_EXIT_STATUS { cma$c_null_thread = -1, cma$c_term_error = 0, cma$c_term_normal = 1, cma$c_term_alert = 2 } cma$t_exit_status;#endif/*! * Schedule inheritance constants */#ifdef __NEW_STARLET#typedef enum _CMA$T_SCHED_INHERIT { cma$c_sched_inherit = 0, cma$c_sched_use_default = 1 } CMA$T_SCHED_IzNHERIT;#else#typedef enum _CMA$T_SCHED_INHERIT { cma$c_sched_inherit = 0, cma$c_sched_use_default = 1 } cma$t_sched_inherit;#endif/* * Schedule policy constants */#ifdef __NEW_STARLET"typedef enum _CMA$T_SCHED_POLICY { cma$c_sched_fifo = 0, cma$c_sched_rr = 1, cma$c_sched_throughput = 2, cma$c_sched_background = 3, cma$c_sched_ada_low = 4, cma$c_sched_idle = 5" } CMA$T_SCHED_POLICY; #else"typedef enum _CMA$T_{SCHED_POLICY { cma$c_sched_fifo = 0, cma$c_sched_rr = 1, cma$c_sched_throughput = 2, cma$c_sched_background = 3, cma$c_sched_ada_low = 4, cma$c_sched_idle = 5" } cma$t_sched_policy; #endif/*9 * cma$c_sched_default and cma$c_sched_other definitions */2#define cma$c_sched_default cma$c_sched_throughput-#define cma$c_sched_other cma$c_sched_default/* * Mutex types */#ifdef __NEW_STARLET typedef enum _CMA$T_MUTEX_KIND { cma$c_|mutex_fast = 0, cma$c_mutex_recursive = 1, cma$c_mutex_nonrecursive = 21 } CMA$T_MUTEX_KIND;#else typedef enum _CMA$T_MUTEX_KIND { cma$c_mutex_fast = 0, cma$c_mutex_recursive = 1, cma$c_mutex_nonrecursive = 21 } cma$t_mutex_kind;#endif N/* */N/* Sample decision for error codes */N/* } */N/* Values used are "VMS status codes" in decimal. These */N/* must remain in synch with the "message file" MESSAGE_VMS.MSG */N/* Note: these values cannot be altered after they have shipped in */N/* some CMA release. Octal boundaries are shown on the decimal */N/* values. GAF 6/1/92 Coordinated definitions with exc_handling.h */N/* ~ */#define CMA$_EXCEPTION 4227084#define CMA$_EXCCOP 4227092#define CMA$_UNINITEXC 4227100#define CMA$_UNKSTATUS 4228100#define CMA$_EXCCOPLOS 4228108#define CMA$_ILLADDR 12#define CMA$_EXQUOTA 28#define CMA$_INSFMEM 292#define CMA$_NOPRIV 36#define CMA$_NORMAL 1#define CMA$_ILLINSTR 1084#define CMA$_RESADDR 1100#define CMA$_PRIVINST 1084#define CMA$_RESOPER 1108#define CMA$_SIGTRAP 1044#define CMA$_SIGIOT 44#define CMA$_SIGEMT 1068#define CMA$_ARITHERR 1164#define CMA$_SIGSYS 20#define CMA$_SIGPIPE 628#define CMA$_EXCPU 8364#define CMA$_EXFILSIZ 1004#define CMA$_INTOVF 1148#define CMA$_INTDIV 1156#define CMA$_FLTOVF 1164#define CMA$_FLTDIV 1172#define CMA$_FLTUND 1180#define CMA$_DECOVF 1188#define CMA$_SUBRNG 1196#define CMA$_ACCVIO 12#define CMA$_SIGILL 1084#define CMA$_SIGFPE 1164#define CMA$_SIGBUS 1084#define CMA$_SIGSEGV 1084#define CMA$_SIGXCPU 8364#define CMA$_SIGXFSZ 1004#define CMA$_ALERTED 4227460#define CMA$_ASSERTION 4227468#define CMA$_BADPARAM 4227476#define CMA$_BUGCHECK 4227484 #define CMA$_EXIT_THREAD 4227492#define CMA$_EXISTENCE 4227500#define CMA$_IN_USE 4227508#define CMA$_USE_ERROR 4227516#define CMA$_WRONGMUTEX 4227524#define CMA$_STACKOVF 554#define CMA$_NOSTACKMEM 4227540 #define CMA$_NOTCMASTACK 4227548#define CMA$_TIMED_OUT 4227556#define CMA$_UNIMP 4227564#define CMA$_INIALRPRO 4227572!#define CMA$_DEFER_Q_FUL L 4227580"#define CMA$_SIGNAL_Q_FULL 4227588"#define CMA$_ALERT_NESTING 4227596N/* */N/* EXCEPTION TYPE DEFINITIONS */N/* */#ifdef __NEW_STARLET typedef char *CMA$EXC_ADDRESS_T;#else /* __OLD_STARLET */ typedef char *cma$exc_address_t;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLET typedef int CMA$EXC_KIND_T;#else /* __OLD_STARLET */typedef int cma$exc_kind_t;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLETtypedef int CMA$EXC_INT_T;#else /* __OLD_STARLET */typedef int cma$exc_int_t;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Internal contents of an exception object. */N/*  */ #ifdef __NEW_STARLET!typedef struct _cma$t_exception { CMA$EXC_KIND_T exc_kind; CMA$EXC_ADDRESS_T exc_info;% CMA$EXC_ADDRESS_T exc_filler [6]; } CMA$T_EXCEPTION;#else /* __OLD_STARLET */!typedef struct _cma$t_exception { cma$exc_kind_t exc_kind; cma$exc_address_t exc_info;% cma$exc_address_t exc_filler [6]; } cma$t_exception;%#endif /* #ifdef __NEW_STARLET */  #ifdef __NEW_STARLET-_CMA_IMPORT_ CMA$T_EXCEPTION cma $e_uninitexc;+_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_illaddr;+_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_exquota;+_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_insfmem;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_nopriv;,_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_illinstr;+_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_resaddr;,_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_privinst;+_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_resoper;+_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_SIGTRAP;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_SIGIOT;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e _SIGEMT;,_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_aritherr;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_SIGSYS;+_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_SIGPIPE;)_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_excpu;,_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_exfilsiz;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_intovf;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_intdiv;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_fltovf;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_fltdiv;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_fltund;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_decovf;*_CMA_I MPORT_ CMA$T_EXCEPTION cma$e_subrng;+_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_alerted;-_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_assertion;,_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_badparam;,_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_bugcheck;/_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_exit_thread;-_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_existence;*_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_in_use;-_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_use_error;._CMA_IMPORT_ CMA$T_EXCEPTION cma$e_wrongmutex;,_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_stackovf; ._CMA_IMPORT_ CMA$T_EXCEPTION cma$e_nostackmem;/_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_notcmastack;)_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_unimp;-_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_inialrpro;0_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_defer_q_full;1_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_signal_q_full;1_CMA_IMPORT_ CMA$T_EXCEPTION cma$e_alert_nesting;#else-_CMA_IMPORT_ cma$t_exception cma$e_uninitexc;+_CMA_IMPORT_ cma$t_exception cma$e_illaddr;+_CMA_IMPORT_ cma$t_exception cma$e_exquota;+_CMA_IMPORT_  cma$t_exception cma$e_insfmem;*_CMA_IMPORT_ cma$t_exception cma$e_nopriv;,_CMA_IMPORT_ cma$t_exception cma$e_illinstr;+_CMA_IMPORT_ cma$t_exception cma$e_resaddr;,_CMA_IMPORT_ cma$t_exception cma$e_privinst;+_CMA_IMPORT_ cma$t_exception cma$e_resoper;+_CMA_IMPORT_ cma$t_exception cma$e_SIGTRAP;*_CMA_IMPORT_ cma$t_exception cma$e_SIGIOT;*_CMA_IMPORT_ cma$t_exception cma$e_SIGEMT;,_CMA_IMPORT_ cma$t_exception cma$e_aritherr;*_CMA_IMPORT_ cma$t_exception cma$e_SIGSYS;+_CMA_IMPORT_ cma$t_e xception cma$e_SIGPIPE;)_CMA_IMPORT_ cma$t_exception cma$e_excpu;,_CMA_IMPORT_ cma$t_exception cma$e_exfilsiz;*_CMA_IMPORT_ cma$t_exception cma$e_intovf;*_CMA_IMPORT_ cma$t_exception cma$e_intdiv;*_CMA_IMPORT_ cma$t_exception cma$e_fltovf;*_CMA_IMPORT_ cma$t_exception cma$e_fltdiv;*_CMA_IMPORT_ cma$t_exception cma$e_fltund;*_CMA_IMPORT_ cma$t_exception cma$e_decovf;*_CMA_IMPORT_ cma$t_exception cma$e_subrng;+_CMA_IMPORT_ cma$t_exception cma$e_alerted;-_CMA_IMPORT_ cma$t_exception cma$e_a ssertion;,_CMA_IMPORT_ cma$t_exception cma$e_badparam;,_CMA_IMPORT_ cma$t_exception cma$e_bugcheck;/_CMA_IMPORT_ cma$t_exception cma$e_exit_thread;-_CMA_IMPORT_ cma$t_exception cma$e_existence;*_CMA_IMPORT_ cma$t_exception cma$e_in_use;-_CMA_IMPORT_ cma$t_exception cma$e_use_error;._CMA_IMPORT_ cma$t_exception cma$e_wrongmutex;,_CMA_IMPORT_ cma$t_exception cma$e_stackovf;._CMA_IMPORT_ cma$t_exception cma$e_nostackmem;/_CMA_IMPORT_ cma$t_exception cma$e_notcmastack;)_CMA_IMPORT_ cma$t_e xception cma$e_unimp;-_CMA_IMPORT_ cma$t_exception cma$e_inialrpro;0_CMA_IMPORT_ cma$t_exception cma$e_defer_q_full;1_CMA_IMPORT_ cma$t_exception cma$e_signal_q_full;1_CMA_IMPORT_ cma$t_exception cma$e_alert_nesting;#endif  N/* */N/* Operations on Handles */N/* */N/*  */L/* The value of a handle can be assigned the value of another handle. */N/* */-#define cma$handle_assign CMA$HANDLE_ASSIGN #ifdef __NEW_STARLETvoid cma$handle_assign( CMA$T_HANDLE *handle1, CMA$T_HANDLE *handle2);#else /* __OLD_STARLET */)void cma$handle_assign(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */L/* The value of a handle can be assigned the value of another handle. */N/* */+#define cma$handle_equal CMA$HANDLE_EQUAL #ifdef __NEW_STARLETCMA$T_BOOLEAN cma$handle_equal( CMA$T_HANDLE *handle1, CMA$T_HANDLE *handle2);#else /* __OLD_STARLET */1cma$t_boolean cma$handle_equal(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* An attributes object is created to specify the attributes of other CMA */N/* objects that will be created. */N/* */)#define cma$attr_create CMA$ATTR_CREATE #ifdef __NEW_STARLETvoid cma$attr_create( CMA$T_ATTR *new_att, CMA$T_ATTR *attr);#else /* __OLD_STARLET */'void cma$attr_create(__unknown_params);!#e ndif /* #ifdef __NEW_STARLET */N/* */N/* An attributes object can be deleted when it is no longer needed. */N/* */)#define cma$attr_delete CMA$ATTR_DELETE #ifdef __NEW_STARLETvoid cma$attr_delete( CMA$T_ATTR *attr);#else /* __OLD_STARLET */'void cma$attr_delete(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* The following procedures can be used to control thread creation, */N/* termination and deletion. */N/* */N/* */P/* To create a thread object and runnable thread, a routine must be specified */N/* as the new thread's start routi ne. An argument may be passed to this */P/* routine, as an untyped address; an untyped address may also be returned as */O/* the routine's value. An attributes object may be used to specify details */N/* about the kind of thread being created. */N/* */-#define cma$thread_create CMA$THREAD_CREATE #ifdef __NEW_STARLETvoid cma$thread_create( CMA$T_THREAD *new_thread, CMA$T_A TTR *attr, int (*start_routine)(void), CMA$T_ADDRESS *arg);#else /* __OLD_STARLET */)void cma$thread_create(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* A thread object may be "detached" to specify that the return value and */N/* completion status will not be requested. */N/* */-#define cma $thread_detach CMA$THREAD_DETACH #ifdef __NEW_STARLETvoid cma$thread_detach( CMA$T_THREAD *thread);#else /* __OLD_STARLET */)void cma$thread_detach(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* A thread may terminate it's own execution. */N/* */5#define cma$thread_exit_error CMA$THREAD_E XIT_ERROR#ifdef __NEW_STARLET!void cma$thread_exit_error(void);#else /* __OLD_STARLET */!void cma$thread_exit_error(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Exit a thread normally. */N/* */7#define cma$thread_exit_normal CMA$THREAD_EXIT_NORMAL #ifdef __NEW_STARLETvoid cma$thr ead_exit_normal( CMA$T_ADDRESS *result);#else /* __OLD_STARLET */.void cma$thread_exit_normal(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* A thread can await termination of another thread and retrieve the return */N/* value and completion status of the thread. */N/* */)#define cma$thread_join CMA$THREAD_JOIN #ifdef __NEW_STARLETvoid cma$thread_join( CMA$T_THREAD *thread, CMA$T_EXIT_STATUS *exit_status, CMA$T_ADDRESS *result);#else /* __OLD_STARLET */'void cma$thread_join(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Operations to define thread creation attributes */N/* */N/*  */N/* Set or obtain the default thread priority. */N/* */5#define cma$attr_set_priority CMA$ATTR_SET_PRIORITY #ifdef __NEW_STARLETvoid cma$attr_set_priority( CMA$T_ATTR *attr, CMA$T_PRIORITY *priority);#else /* __OLD_STARLET */-void cma$attr_set_priority(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* Obtain thread priority from attributes object. */N/* */5#define cma$attr_get_priority CMA$ATTR_GET_PRIORITY #ifdef __NEW_STARLETvoid cma$attr_get_priority( CMA$T_ATTR *attr, CMA$T_PRIORITY *priority);#else /* __OLD_STARLET */-void cma$attr_get_priority(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Set or obtain the default scheduling algorithm. */N/* *//#define cma$attr_set_sched CMA$ATTR_SET_SCHED #ifdef __NEW_STARLETvoid cma$attr_set_sched( CMA$T_ATTR *attr, CMA$T_SCHED_POLICY *policy);#else /* __OLD_STARLET */*void cma$attr_set_sched(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N /* */N/* Get thread scheduling algorithm from attributes object. */N/* *//#define cma$attr_get_sched CMA$ATTR_GET_SCHED #ifdef __NEW_STARLETvoid cma$attr_get_sched( CMA$T_ATTR *attr, CMA$T_SCHED_POLICY *policy);#else /* __OLD_STARLET */*void cma$attr_get_sched(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */P/* Set or obtain whether a thread will use the default scheduling attributes, */N/* or inherit them from the creating thread. */N/* */?#define cma$attr_set_inherit_sched CMA$ATTR_SET_INHERIT_SCHED #ifdef __NEW_STARLET void cma$attr_set_inherit_sched( CMA$T_ATTR *attr, CMA$T_SCHED_INHERIT *setting);#else /*  __OLD_STARLET */2void cma$attr_set_inherit_sched(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Obtain default scheduling attributes. */N/* */?#define cma$attr_get_inherit_sched CMA$ATTR_GET_INHERIT_SCHED #ifdef __NEW_STARLET void cma$attr_get_inherit_sched( CMA$T_ATTR *attr, CMA$T_SCHED _INHERIT *setting);#else /* __OLD_STARLET */2void cma$attr_get_inherit_sched(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Set the default stack size */N/* */7#define cma$attr_set_stacksize CMA$ATTR_SET_STACKSIZE #ifdef __NEW_STARLETvoid cma$attr_set_stacksize( CMA$T_ATTR *a ttr, CMA$T_NATURAL *stacksize);#else /* __OLD_STARLET */.void cma$attr_set_stacksize(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Obtain the default stack size. */N/* */7#define cma$attr_get_stacksize CMA$ATTR_GET_STACKSIZE #ifdef __NEW_STARLETvoid cma$attr_get_stacksize( CMA $T_ATTR *attr, CMA$T_NATURAL *stacksize);#else /* __OLD_STARLET */.void cma$attr_get_stacksize(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Set the default guard size */N/* */7#define cma$attr_set_guardsize CMA$ATTR_SET_GUARDSIZE #ifdef __NEW_STARLETvoid cma$attr_set_guards ize( CMA$T_ATTR *attr, CMA$T_NATURAL *guardsize);#else /* __OLD_STARLET */.void cma$attr_set_guardsize(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Obtain the default guard size */N/* */7#define cma$attr_get_guardsize CMA$ATTR_GET_GUARDSIZE #ifdef __NEW_STARLETvoid cma$attr_ get_guardsize( CMA$T_ATTR *attr, CMA$T_NATURAL *guardsize);#else /* __OLD_STARLET */.void cma$attr_get_guardsize(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Thread Scheduling Operations */N/* */N/* */N/* The c urrent user_assigned priority of a thread can be changed. */N/* */9#define cma$thread_set_priority CMA$THREAD_SET_PRIORITY #ifdef __NEW_STARLETvoid cma$thread_set_priority( CMA$T_THREAD *thread, CMA$T_PRIORITY *priority);#else /* __OLD_STARLET *//void cma$thread_set_priority(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */O/* The current user_assigned scheduler algorithm of a thread can be changed. */N/* */3#define cma$thread_set_sched CMA$THREAD_SET_SCHED #ifdef __NEW_STARLETvoid cma$thread_set_sched( CMA$T_THREAD *thread, CMA$T_SCHED_POLICY *policy);#else /* __OLD_STARLET */,void cma$thread_set_sched(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */O/* A thread may tell the scheduler that its processor can be made available. */N/* */#define cma$yield CMA$YIELD#ifdef __NEW_STARLETvoid cma$yield(void);#else /* __OLD_STARLET */void cma$yield(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* A thread may enter a wait state for a specifed period of time. */N/* */#define cma$delay CMA$DELAY #ifdef __NEW_STARLETvoid cma$delay( CMA$T_INTERVAL interval);#else /* __OLD_STARLET */!void cma$delay(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Thread Information Operations */N/*  */N/* */N/* A thread may obtain a copy of its own thread handle. */N/* */1#define cma$thread_get_self CMA$THREAD_GET_SELF #ifdef __NEW_STARLETvoid cma$thread_get_self( CMA$T_THREAD *thread);#else /* __OLD_STARLET */+void cma$thread_get_self(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* The current user_assigned priority of a thread can be read. */N/* */9#define cma$thread_get_priority CMA$THREAD_GET_PRIORITY #ifdef __NEW_STARLETvoid cma$thread_get_priority( CMA$T_THREAD *thread, CMA$T_PRIORITY *priority);#else /* __OLD_STARLET *//void cma$thread_get_priority(__unknown_params);!#endif /* #ifdef _ _NEW_STARLET */N/* */N/* The current user_assigned scheduler algorithm of a thread can be read. */N/* */3#define cma$thread_get_sched CMA$THREAD_GET_SCHED #ifdef __NEW_STARLETvoid cma$thread_get_sched( CMA$T_THREAD *thread, CMA$T_SCHED_POLICY *policy);#else /* __OLD_STARLET */,void cma$thread_get_sched(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Operations on Mutexes */N/* */N/* */N/* Set whether mutex locks can nest. */N/* */9 #define cma$attr_set_mutex_kind CMA$ATTR_SET_MUTEX_KIND #ifdef __NEW_STARLETvoid cma$attr_set_mutex_kind( CMA$T_ATTR *attr, CMA$T_MUTEX_KIND *nest);#else /* __OLD_STARLET *//void cma$attr_set_mutex_kind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Obtain whether mutex locks can nest. */N/*  */9#define cma$attr_get_mutex_kind CMA$ATTR_GET_MUTEX_KIND #ifdef __NEW_STARLETvoid cma$attr_get_mutex_kind( CMA$T_ATTR *attr, CMA$T_MUTEX_KIND *nest);#else /* __OLD_STARLET *//void cma$attr_get_mutex_kind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* The following routines create, delete, lock and unlock mutexes. */N/*  */+#define cma$mutex_create CMA$MUTEX_CREATE #ifdef __NEW_STARLETvoid cma$mutex_create( CMA$T_MUTEX *new_mutex, CMA$T_ATTR *attr);#else /* __OLD_STARLET */(void cma$mutex_create(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Delete a mutex. */N/*  */+#define cma$mutex_delete CMA$MUTEX_DELETE #ifdef __NEW_STARLETvoid cma$mutex_delete( CMA$T_MUTEX *mutex);#else /* __OLD_STARLET */(void cma$mutex_delete(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Lock a mutex. */N/* */'#define cma$mutex_lock CMA$MUTEX_LOCK #ifdef __NEW_STARLETvoid cma$mutex_lock( CMA$T_MUTEX *mutex);#else /* __OLD_STARLET */&void cma$mutex_lock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Try to lock a mutex. */N/* *//#define cma$mutex_try_lock CMA$MUTEX_TRY_LOCK #ifdef __NEW_STARLET! CMA$T_BOOLEAN cma$mutex_try_lock( CMA$T_MUTEX *mutex);#else /* __OLD_STARLET */3cma$t_boolean cma$mutex_try_lock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Unlock a mutex. */N/* */+#define cma$mutex_unlock CMA$MUTEX_UNLOCK #ifdef __NEW_STARLETvoid cma$mutex_u nlock( CMA$T_MUTEX *mutex);#else /* __OLD_STARLET */(void cma$mutex_unlock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Lock Global mutex. */N/* */)#define cma$lock_global CMA$LOCK_GLOBAL#ifdef __NEW_STARLETvoid cma$lock_global(void);#else /* __OLD_STARLET */void  cma$lock_global(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Unlock Global mutex. */N/* */-#define cma$unlock_global CMA$UNLOCK_GLOBAL#ifdef __NEW_STARLETvoid cma$unlock_global(void);#else /* __OLD_STARLET */void cma$unlock_global(void);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* A thread can create and delete condition variables. */N/* */)#define cma$cond_create CMA$COND_CREATE #ifdef __NEW_STARLETvoid cma$cond_create( CMA$T_COND *new_condition, CMA$T_ATTR *attr);#else /* __OLD_STARLET */'void cma$cond_create(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* Delete a condition variable. */N/* */)#define cma$cond_delete CMA$COND_DELETE #ifdef __NEW_STARLETvoid cma$cond_delete( CMA$T_COND *condition);#else /* __OLD_STARLET */'void cma$cond_delete(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* A thread can signal to and broadcast on a condition variable. */N/* *//#define cma$cond_broadcast CMA$COND_BROADCAST #ifdef __NEW_STARLETvoid cma$cond_broadcast( CMA$T_COND *condition);#else /* __OLD_STARLET */*void cma$cond_broadcast(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Signal a condition variable. */N/* */)#define cma$cond_signal CMA$COND_SIGNAL #ifdef __NEW_STARLETvoid cma$cond_signal( CMA$T_COND *condition);#else /* __OLD_STARLET */'void cma$cond_signal(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Interupt signal a condition variable.  */N/* */1#define cma$cond_signal_int CMA$COND_SIGNAL_INT #ifdef __NEW_STARLETvoid cma$cond_signal_int( CMA$T_COND *condition);#else /* __OLD_STARLET */+void cma$cond_signal_int(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* A thread can wait for a condition variable to be signalled or broadcast. */N/* */%#define cma$cond_wait CMA$COND_WAIT #ifdef __NEW_STARLETvoid cma$cond_wait( CMA$T_COND *condition, CMA$T_MUTEX *mutex);#else /* __OLD_STARLET */%void cma$cond_wait(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Operations for timed waiting */N/*  */N/* */N/* A thread can perform a timed wait on a condition variable. */N/* */1#define cma$cond_timed_wait CMA$COND_TIMED_WAIT #ifdef __NEW_STARLET!CMA$T_STATUS cma$cond_timed_wait( CMA$T_COND *condition, CMA$T_MUTEX *mutex, CMA$T_DATE_TIME *expiration);#else /* _ _OLD_STARLET */3cma$t_status cma$cond_timed_wait(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */O/* A thread may perform some operations on absolute date-time and intervals. */N/* */9#define cma$time_get_expiration CMA$TIME_GET_EXPIRATION #ifdef __NEW_STARLETvoid cma$time_get_expiration( CMA$T_DATE_TIME *expiration, CMA$T _INTERVAL interval);#else /* __OLD_STARLET *//void cma$time_get_expiration(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Operations for CMA and client initialization. */N/* */N/* */N/* Initialize the CMA facility.  */N/* */#define cma$init CMA$INIT#ifdef __NEW_STARLETvoid cma$init(void);#else /* __OLD_STARLET */void cma$init(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* A thread can declare a one-time initialization routine. The address of */N/* the init block and routine are passed as parameters. */N/* */#ifdef __NEW_STARLET)typedef void (*CMA$T_INIT_ROUTINE)(void);#else /* __OLD_STARLET */%typedef void (*cma$t_init_routine)();%#endif /* #ifdef __NEW_STARLET */N/* */N/* Once routine */N/* */#define cma$once CMA$ONCE #ifdef __NEW_STARLETvoid cma$once( CMA$T_ADDRESS *init_block,# CMA$T_INIT_ROUTINE *init_routine);#else /* __OLD_STARLET */ void cma$once(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Operations for per-thread context */N/* */#ifdef __NEW_STARLET!typedef void (*CMA$T_DESTRUCTOR)( void *ctx_value);#else /* __OLD_STARLET */#typedef void (*cma$t_destructor)();%#endif /* #ifdef __NEW_STARLET */N/* */N/* A unique per-thread context key can be obtained for the process */N/* */'#define cma$key_create CMA$KEY_CREATE #ifdef __NEW_STARLETvoid cma$key_create( CMA$T_KEY *key, C MA$T_ATTR *attr, CMA$T_DESTRUCTOR *destructor);#else /* __OLD_STARLET */&void cma$key_create(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* A thread can set a per-thread context value identified by a key. */N/* */1#define cma$key_set_context CMA$KEY_SET_CONTEXT #ifdef __NEW_STARLETvoid cma$key_set_context( CMA $T_KEY *key, CMA$T_ADDRESS *context_value);#else /* __OLD_STARLET */+void cma$key_set_context(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* A thread can retrieve a per-thread context value identified by a key. */N/* */1#define cma$key_get_context CMA$KEY_GET_CONTEXT #ifdef __NEW_STARLETvoid cma$key_get_context( C MA$T_KEY *key, CMA$T_ADDRESS *context_value);#else /* __OLD_STARLET */+void cma$key_get_context(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Operations for alerts. */N/* */N/* */N/* The current thread can request that a thread terminate it's execution. */N/* */+#define cma$thread_alert CMA$THREAD_ALERT #ifdef __NEW_STARLETvoid cma$thread_alert( CMA$T_THREAD *thread);#else /* __OLD_STARLET */(void cma$thread_alert(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* The current thread can poll for alert delivery.  */N/* */'#define cma$alert_test CMA$ALERT_TEST#ifdef __NEW_STARLETvoid cma$alert_test(void);#else /* __OLD_STARLET */void cma$alert_test(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Control alert delivery state. */N/*  */;#define cma$alert_disable_asynch CMA$ALERT_DISABLE_ASYNCH #ifdef __NEW_STARLETvoid cma$alert_disable_asynch( CMA$T_ALERT_STATE *priority);#else /* __OLD_STARLET */0void cma$alert_disable_asynch(__unknown_params);!#endif /* #ifdef __NEW_STARLET */=#define cma$alert_disable_general CMA$ALERT_DISABLE_GENERAL #ifdef __NEW_STARLETvoid cma$alert_disable_general( CMA$T_ALERT_STATE *priority);#else /* __OLD_STARLET */1void cma$alert_disable_general(__unknown_params);!#endif /* #ifdef __NEW_STARLET */9#define cma$alert_enable_asynch CMA$ALERT_ENABLE_ASYNCH#ifdef __NEW_STARLET#void cma$alert_enable_asynch(void);#else /* __OLD_STARLET */#void cma$alert_enable_asynch(void);!#endif /* #ifdef __NEW_STARLET */;#define cma$alert_enable_general CMA$ALERT_ENABLE_GENERAL #ifdef __NEW_STARLETvoid cma$alert_enable_general( CMA$T_ALERT_STATE *priority);#else /* __OLD_STARLET */0void cma$alert_enable_general(__unknown_params);!#endif / * #ifdef __NEW_STARLET */-#define cma$alert_restore CMA$ALERT_RESTORE #ifdef __NEW_STARLETvoid cma$alert_restore( CMA$T_ALERT_STATE *priority);#else /* __OLD_STARLET */)void cma$alert_restore(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Operations on stacks */N/* */ #ifdef __NEW_STARLET)typedef void (*CMA$T_CALL_ROUTINE)(void);#else /* __OLD_STARLET */%typedef void (*cma$t_call_routine)();%#endif /* #ifdef __NEW_STARLET */N/* */N/* Assign a stack to a thread */N/* */1#define cma$stack_assign_np CMA$STACK_ASSIGN_NP #ifdef __NEW_STARLETvoid cma $stack_assign_np( CMA$T_STACK_NP *stack, CMA$T_THREAD *thread);#else /* __OLD_STARLET */+void cma$stack_assign_np(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Call a routine on a new stack */N/* */=#define cma$stack_call_routine_np CMA$STACK_CALL_ROUTINE_NP #ifdef __NEW_STA RLETvoid cma$stack_call_routine_np( CMA$T_STACK_NP *stack, CMA$T_CALL_ROUTINE *routine, CMA$T_ADDRESS *arg, CMA$T_ADDRESS *result);#else /* __OLD_STARLET */1void cma$stack_call_routine_np(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Check stack limit */N/* */;#def ine cma$stack_check_limit_np CMA$STACK_CHECK_LIMIT_NP #ifdef __NEW_STARLET'CMA$T_BOOLEAN cma$stack_check_limit_np( CMA$T_INTEGER *size);#else /* __OLD_STARLET */9cma$t_boolean cma$stack_check_limit_np(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Create a new stack */N/*  */1#define cma$stack_create_np CMA$STACK_CREATE_NP #ifdef __NEW_STARLETvoid cma$stack_create_np( CMA$T_STACK_NP *stack, CMA$T_ATTR *attr);#else /* __OLD_STARLET */+void cma$stack_create_np(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Delete a stack */N/*  */1#define cma$stack_delete_np CMA$STACK_DELETE_NP #ifdef __NEW_STARLETvoid cma$stack_delete_np( CMA$T_STACK_NP *stack);#else /* __OLD_STARLET */+void cma$stack_delete_np(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* CMA Debug entry point */N/* */#define cma$debug CMA$DEBUG#ifdef __NEW_STARLETvoid cma$debug(void);#else /* __OLD_STARLET */void cma$debug(void);!#endif /* #ifdef __NEW_STARLET */ !#define cma$sigwait CMA$SIGWAIT #ifdef __NEW_STARLETCMA$T_INTEGER cma$sigwait( CMA$T_ADDRESS *wset);#else /* __OLD_STARLET */,cma$t_integer cma$sigwait(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/************************************************************************** */N/*  */N/* The following are the portable CMA High-Level Library definitions */N/* */N/************************************************************************** */N/* */N/* Operations on attributes objects */N/* */  #ifdef __NEW_STARLET$typedef CMA$T_HANDLE CMA$LIB_T_ATTR;#else /* __OLD_STARLET */$typedef cma$t_handle cma$lib_t_attr;&#endif /* #ifdef __NEW_STARLET */ N/* */N/* An attributes object is created to specify the attributes of other CMA */N/* objects that will be created. */N/* */ 1#define cma$lib_attr_create CMA$LIB_ATTR_CREATE #ifdef __NEW_STARLETvoid cma$lib_attr_create( CMA$LIB_T_ATTR *new_attr, CMA$LIB_T_ATTR *attr);#else /* __OLD_STARLET */+void cma$lib_attr_create(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* An attributes object can be deleted when it is no longer needed. */N/*  */1#define cma$lib_attr_delete CMA$LIB_ATTR_DELETE #ifdef __NEW_STARLETvoid cma$lib_attr_delete( CMA$LIB_T_ATTR *attr);#else /* __OLD_STARLET */+void cma$lib_attr_delete(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Operations on queues */N/* */  #ifdef __NEW_STARLET%typedef CMA$T_HANDLE CMA$LIB_T_QUEUE;#else /* __OLD_STARLET */%typedef cma$t_handle cma$lib_t_queue;&#endif /* #ifdef __NEW_STARLET */ 3#define cma$lib_queue_create CMA$LIB_QUEUE_CREATE #ifdef __NEW_STARLETvoid cma$lib_queue_create( CMA$LIB_T_QUEUE *new_queue, CMA$LIB_T_ATTR *att);#else /* __OLD_STARLET */,void cma$lib_queue_create(__unknown_params);!#endif /* #ifdef __NEW_STARLET */3#define cma$lib_queue_delete CMA$LIB_QUEUE_DELETE #ifdef __NEW_STARLETvoid cma$lib_queue_delete( CMA$LIB_T_QUEUE *queue);#else /* __OLD_STARLET */,void cma$lib_queue_delete(__unknown_params);!#endif /* #ifdef __NEW_STARLET */5#define cma$lib_queue_dequeue CMA$LIB_QUEUE_DEQUEUE #ifdef __NEW_STARLETvoid cma$lib_queue_dequeue( CMA$LIB_T_QUEUE *queue, CMA$T_ADDRESS *element);#else /* __OLD_STARLET */-void cma$lib_queue_dequeue(__unknown_params);!#endif /* #ifdef __NEW_STARLET */5#define cma$lib_queue_enqueue CMA$LIB_QUEUE_ENQUEUE #ifdef __NEW_STARLETvoid cma$lib_queue_enqueue( CMA$LIB_T_QUEUE *queue, CMA$T_ADDRESS element);#else /* __OLD_STARLET */-void cma$lib_queue_enqueue(__unknown_params);!#endif /* #ifdef __NEW_STARLET */E#define cma$lib_queue_try_enqueue_int CMA$LIB_QUEUE_TRY_ENQUEUE_INT #ifdef __NEW_STARLET,CMA$T_BOOLEAN cma$lib_queue_try_enqueue_int( CMA$LIB_T_QUEUE *queue, CMA$T_ADDRESS element);#else /* __OLD_STARLET */>cma$t_boolean cma$lib_queue_try_enqueue_int(__unknown_params);!#endif /* #ifdef __NEW_STARLET */5#define cma$lib_queue_requeue CMA$LIB_QUEUE_REQUEUE #ifdef __NEW_STARLETvoid cma$lib_queue_requeue( CMA$LIB_T_QUEUE *queue, CMA$T_ADDRESS element);#else /* __OLD_STARLET */-void cma$lib_queue_requeue(__unknown_params);!#endif /* #ifdef __NEW_STARLET */=#define cma$lib_queue_try_dequeue CMA$LIB_QUEUE_TRY_DEQUEUE #ifdef __NEW_STARLET(CMA$T_BOOLEAN cma$lib_queue_try_dequeue( CMA$LIB_T_QUEUE *queue, CMA$T_ADDRESS *element);#else /* __OLD_STARLET */:cma$t_boolean cma$lib_queue_try_dequeue(__unknown_params);!#endif /* #ifdef __NEW_STARLET */=#define cma$lib_queue_try_enqueue CMA$LIB_QUEUE_TRY_ENQUEUE #ifdef __NEW_STARLET(CMA$T_BOOLEAN cma$lib_queue_try_enqueue( CMA$LIB_T_QUEUE *queue, CMA$T_ADDRESS element);#else /* __OLD_STARLET */:cma$t_boolean cma$lib_queue_try_enqueue(__unknown_params);!#endif /* #ifdef __NEW_STARLET */=#define cma$lib_queue_try_requeue CMA$LIB_QUEUE_TRY_REQUEUE #i fdef __NEW_STARLET(CMA$T_BOOLEAN cma$lib_queue_try_requeue( CMA$LIB_T_QUEUE *queue, CMA$T_ADDRESS element);#else /* __OLD_STARLET */:cma$t_boolean cma$lib_queue_try_requeue(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Set or obtain the default queue size */N/* */?#define cma$lib_attr_get_queuesize CMA$LIB_ATTR_GET_QUEUESIZE #ifdef __NEW_STARLET void cma$lib_attr_get_queuesize( CMA$LIB_T_ATTR *attr, CMA$T_NATURAL *queuesize);#else /* __OLD_STARLET */2void cma$lib_attr_get_queuesize(__unknown_params);!#endif /* #ifdef __NEW_STARLET */?#define cma$lib_attr_set_queuesize CMA$LIB_ATTR_SET_QUEUESIZE #ifdef __NEW_STARLET void cma$lib_attr_set_queuesize( CMA$LIB_T_ATTR *attr, CMA$T_NATURAL queuesize);#else /* __OLD_STARLET */2void cma$lib_attr_set_queuesize(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #if _CMA_OS_ == _CMA__VMSI# if (_CMA_COMPILER_ == _CMA__DECC) || (_CMA_COMPILER_ == _CMA__DECCPLUS)O# pragma __extern_model __restore /* set prior to inclusion of cma_config.h */# endif#endif0#pragma standard /* set at top of this file */#ifdef __cplusplus }#endif#endif $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CMA_DEF_LOADED */ ww)ƛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//*********************** *********************************************************************************************************//*** MODULE $CMBDEF ***/#ifndef __CMBDEF_LOADED#define __CMBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* $CREMBX FLAGS bit definitions */N/*- */#define CMB$M_READONLY 0x1#define CMB$M_WRITEONLY 0x2 #ifdef __NEW_STARLETtypedef union _cmbdef { __struct {] unsigned cmb$v_readonly : 1; /* Channel to be assigned to mailbox is READ ONLY. */^ unsigned cmb$v_writeonly : 1; /* Channel to be assigned to mailbox is WRITE ONLY. */# unsigned cmb$v_fill_0 : 30; } cmb$r_cmbdef_bits; } CMBDEF; #if !defined(__VAXC)7#define cmb$v_readonly cmb$r_cmbdef_bits.cmb$v_readonly9#define cmb$v_writeonly cmb$r_cmbdef_bits.cmb$v_writeonly"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union cmbdef { __struct {] unsigned cmb$v_readonly : 1; /* Channel to be assigned to mailbox is READ ONLY. */^ unsigned cmb$v_writeonly : 1; /* Channel to be assigned to mailbox is WRITE ONLY. */# unsigned cmb$v_fill_0 : 30; } cmb$r_cmbdef_bits; } ; #if !defined(__VAXC)7#define cmb$v_readonly cmb$r_cmbdef_bits.cmb$v_readonly9#define cmb$v_writeonly cmb$r_cmbdef_bits.cmb$v_writeonly"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CMBDEF_LOADED */ wwPƛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H .SRC]COBMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $COBDEF ***/#ifndef __COBDEF_LOADED#define __COBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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)#def ine __union union#else#define __union variant_union#endif#endif N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:39.18 */N/* */N/* FILE: COBMSG.MSG EDIT: HR 04-NOV-2000 */N/* */N/*  */N/* */N/* COPYRIGHT 2000 COMPAQ COMPUTER CORPORATION */N/* */N/* COMPAQ REGISTERED IN U.S. PATENT AND TRADEMARK OFFICE. */N/* */N/* CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM COMPAQ REQUIRED */N/* FOR POSSESSION, USE OR COPYING. CONSISTENT WITH FAR 12.211 AND 12.212, */N/* COMMERCIAL COMPUTER SOFTWARE, COMPUTER SOFTWARE DOCUMENTATION, AND */O/* TECHNICAL DATA FOR COMMERCIAL ITEMS ARE LICENSED TO THE U.S. GOVERNMENT */N/* UNDER VENDOR'S STANDARD COMMERCIAL LICENSE. */N/* */N/*  */N/* */N/* */N/* EDIT HISTORY: */:/* X-12 HR HOWARD RUTIEZER 04-NOV-2000 */N/* ADD RESDETCON, OVFDETCON, UNDDETCON. */S/* FROM EDIT HISTORY OF COB_MSG.SRC, ABOUT NOV-1999 - SZYMANSKI. */N/* BRANDING CHANGES. */N/* */7/* X-11 LNG LOUIS GROSS 21-JAN-1998 */B/* ADDED MESSAGES FOR DIGITAL COBOL */N/* */0/* X-10 LNG LOUIS GROSS 29-JUN-1995 */N/* */B/* ADDED MESSAGES FOR DEC COBOL.  */4/* X-9 CKJ CATHY KIMMEL JOLY 14-SEP-1994 */N/* */B/* ADDED MESSAGE FOR DEC COBOL. */N/* */4/* X-8 CKJ CATHY KIMMEL JOLY 11-JUL-1994 */N/* */B/* ADDED MESSAGES FOR DEC COBOL. */N/* */4/* X-7 CKJ CATHY KIMMEL JOLY 03-MAR-1994 */N/* */B/* ADDED MESSAGE FOR DEC COBOL. */N/* */4/* X-6 CKJ CATHY KIMMEL JOLY 28-JAN-1994 */N/* */B/* CHANGED MESSAGE TEXT FOR DEC COBOL. */N/* */4/* X-5 CKJ CATHY KIMMEL JOLY 15-DEC-1993 */N/* */B/* ADD MORE ISAM MESSAGES FOR DEC COBOL. */N/* */4/* X-4 CKJ CATHY KIMMEL JOLY 10-NOV-1993 */N/*  */B/* ADD NOISAM MESSAGE FOR DEC COBOL. */N/* */N/* */,/* X-3 KC KEN COWAN 1-APR-1993 */N/* */B/* MERGE DEC$COBMSG.MSG INTO COBMSG.MSG. TRANSLATED VAX */B/* COBOL PROGRAMS AND NATIVE DEC COBOL PROGRAMS NOW */B/* SHARE THE SAME MESSAGE SOURCE FILE, THOUGH THEY USE */B/* SOME DIFFERENT MESSAGE CODES. */N/* */N/* */4/* X-2 RAB RICHARD A. BISHOP 19-MAY-1992 */B/* MERGE ANOTHER CHANGE (RANDOMBOUNDS) FROM BLADE. */N/*  */I/* OLD AUDIT TRAIL.... */N/* */4/* X-3 RAB RICHARD A. BISHOP 29-JAN-1992 */B/* MERGE INTO ALPHA THE POST-V5.4 CHANGES IN VMS. */B/* SINCE THERE HAVE BEEN NO CHANGES IN THE ALPHA VERSION */B/* OF THIS FILE SINCE V5.4 (OTHER THAN AUDIT TRAIL), WHAT */B/* FOLLOWS IS THE AUDIT TRAIL FROM THE VMS MASTERPACK. */N/* */I/* =============================================================== */N/* */P/* 2-001 - CONVERT TO MESSAGE UTILITY SOURCE FORMAT. ADAPTED FROM COBMSG.MDL */I/* VERSION 1-019. SBL 22-APR-1981 */N/* 2-002 - USE COB$ FACILITY FOR COB$_NORMAL. SBL 27-APR-1981 */O/* 2-003 - COPIED CHANGES MADE TO COBMSG.MDL TO THIS MSG FILE. THE MESSAGES */I/* ADDED INCLUDE COB$_LSTHNDUSE, COB$_LSTHNDLDB, AND COB$_EXPDBOVER. */I/* LB 7-MAY-81. */G/* 2-004 - ADDED COB$_KEYNOTMAT. PDG 24-JUL-81. */G/* 2-005 - ADDED .TITLE PDG 26-JUL-81. */G/* 2-006 - ADDED COB$_UNLUNOFIL AND COB$_RECNOTLOC. PDG 7-AUG-81. */N/* 2-007 - UPDATED COPYRIGHT DATE AND FIXED SPELLING ERROR. LB 9-AUG-81. */N/* 2-008 - ADDED COB$_UNLNO_CUR. LB 29-OCT-81. */N/* 2-009 - CHANGED COB$_GOTNO_ALT TO BE COB$_GOTO_ALT. THIS HAD BEEN IN */I/* ERROR IN THIS FILE AS WELL AS IN COBERROR. LB 1-APR-82. */N/* 2-010 - CHANGE TITLE TO COB$MSGDEF. SBL 28-AUG-1982 */N/* 2-011 - ADDED COB$_ERRDURPOS FOR COB$POS_ERASE AND COB$_REAMP_D_R */3/* FOR COB$IOEXCEPTION. LGB 6-SEP-83 */@/* ADDED COB$_INVDEFVAL FOR COB$ACCEPT LGB 3-OCT-83 */N/* 2-012 - ADDED NUMEROUS CODES FOR COBOL V4.0 SUPPORT FOR COB$IOEXCEPTION. */I/* DJM 17-NOV-86 */P/* 2-013 - CHANGED MESSAGE AND SEVERITY FOR COB$_INTDIVZER AND COB$_UNDEF_EXP */I/* AS THE PROGRAM IS ALLOWED TO CONTINUE WITH THE NEW STANDARD. */I/* ALSO - ADD MESSAGE COB$_DIVBYZER. DJM 27-APR-1987 */N/* 2-014 - REMOVE REFERENCE TO ISAM. DJM 30-DEC-1987 */N/* 2-015 - ADD MULFILERR FOR COB$MFT. DJM 28-MAR-1988. */N/* 2-016 - ADD COB$NOTIMP. MDL 23-OCT-1989 */N/* 2-017 - ADD CODES FOR COBOL V5 INTRINSIC FUNCTIONS. KC 14-NOV-1991. */N/* 2-018 - ADD RANDOM BOUNDS. KC 24-JAN-1992. */N/* */N/*+ */N/* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */N/* */I/* COB$_ABCMNOXYZ */N/* */O/* IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */Q/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR */N/* MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS.  */N/* */N/* */N/* MACRO-32 PROGRAMMING: */N/* */N/* THE MACRO CALL: */N/* */I/* $COBDEF  */N/* */N/* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */N/* THE RUN-TIME LIBRARY DECLARES THESE SYMBOLS AS EXTERNAL; */N/* THE MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER. */N/*- */N/*  */N/* */=/* ; NOTE: ERROR CODES MUST NOT OVERLAP SUCCESS CODES!!! */#define COB$_FACILITY 25#define COB$_NORMAL 1671169N/* COBOL V4 SUPPORT, NEXT 2 MESSAGES */#define COB$_READUPKEY 1671177#define COB$_RECNOTSIZ 1671185#define COB$_GOTO_ALT 1671236#define COB$_RECACTPER 1671244#define COB$_NESERRPER 1671252#define COB$_TIMOVELON 1671260#def ine COB$_OCCDEPOVE 1671268#define COB$_SUBOVELON 1671276#define COB$_ERRDURSOR 1671284#define COB$_UNEINSCON 1671292#define COB$_CALFAI 1671300#define COB$_INVLINVAL 16713084/* ***** NO_USEPRO MUST BE THE FIRST ERROR */4/* ***** MESSAGE ASSOCIATED WITH */4/* ***** COB$IOEXCEPTION. IT IS USED AS */4/* ***** THE BASE OF AN ENCODING ALGORITHM. */N/* */#define COB$_NO_USEPRO 1671316#define COB$_ERRON_FIL 1671324#define COB$_OPTMISOPE 1671332#define COB$_FILALRLOC 1671340#define COB$_FILALROPE 1671348#define COB$_FILCLOLOC 1671356#define COB$_NO_SPACE 1671364#define COB$_FILNOTFOU 1671372#define COB$_OPTMISCLO 1671380#define COB$_FILALRCLO 1671388#define COB$_NO_NEXLOG 1671396#define COB$_OPTMISREA 1671404#define COB$_NO_NEXVAL 1671412#define COB$_RECLOCREA 1671420#define COB$_RECLOC_OK 1671428#define COB$_REAUNOFIL 1671436#define COB$_REAINCOPE 1671444#define COB$_WRIBEYBOU 1671452#define COB$_WRIUNOFIL 1671460#define COB$_WRIINCOPE 1671468#define COB$_REWNO_R_S 1671476#define COB$_REWUNOFIL 1671484#define COB$_REWINCOPE 1671492#define COB$_RECNOTEXI 1671500#define COB$_OPTMISSTA 1671508#define COB$_RECLOCSTA 1671516#define COB$_STAUNOFIL 1671524#define COB$_STAINCOPE 1671532#define COB$_RECLOCWRI 1671540#define COB$_RECLOCDEL 1671548#define COB$_DELNO_R_S 1671556#define COB$_DELUNOFIL 1671564#define COB$_DELINCOPE 1671572#define COB$_RECLOCREW 1671580#define COB$_WRIDUPKEY 1671588#define COB$_WRICREDUP 1671596#define COB$_WRINOTASC 1671604#define COB$_WRIDUPALT 1671612#define COB$_REWCREDUP 1671620#define COB$_PRIKEYCHA 1671628#define COB$_REWDISDUP 1671636#define COB$_WRIDISDUP 1671644#define COB$_REASMAMIN 1671652#define COB$_EOFON_ACC 1671660#define COB$_ERRDURACC 1671668#define COB$_DISMORMAX 1671676#define COB$_INTEXPOVE 1671684#define COB$_INTEXPUND 1671692#define COB$_INTRESOPE 1671700N#define COB$_NO_MES_00 1671708 /* PLACE HOLDER. WAS INTDIVZER */#define COB$_INVDECDIG 1671716N#define COB$_NO_MES_01 1671724 /* PLACE HOLDER. WAS UNDEF_EXP */#define COB$_WRISMAMIN 1671732#define COB$_REWSMAMIN 1671740#define COB$_NAMNOTLIN 1671748#define COB$_INVCHANAM 1671756#define COB$_ORGNOTMAT 1671764#define COB$_CANFAIL 1671772#define COB$_INVARG 1671780#define COB$_FAIGET_VM 1671788#define COB$_FAIFREEVM 1671796#define COB$_ERRDURDIS 1671804#define COB$_USE_EXIT 1671812#define COB$_RECACTUSE 1671820#define COB$_FATINTERR 1671828#define COB$_FAIGET_EF 1671836#define COB$_SETEXTFAI 1671844#define COB$_INVDECDAT 1671852#define COB$_LSTHNDUSE 1671860#define COB$_LSTHNDLDB 1671868#define COB$_EXPDBOVER 1671876#define COB$_KEYNOTMAT 1671884#define COB$_UNLUNOFIL 1671892#define COB$_RECNOTLOC 1671900#define COB$_UNLNO_CUR 1671908#define COB$_REAMP_D_R 1671916#define COB$_ERRDURPOS 1671924 #define COB$_INVDEFVAL 1671932N/* COBOL V4 SUPPORT, NEXT 10 MESSAGES */#define COB$_REARECTOB 1671940#define COB$_WRIRECTOB 1671948#define COB$_DEVNOTAPL 1671956#define COB$_INVRECSIZ 1671964#define COB$_RECSIZEXC 1671972#define COB$_INVRECTYP 1671980#define COB$_INVBLKFAC 1671988#define COB$_CONCODSET 1671996#define COB$_COLSEQKEY 1672004#define COB$_CONPADCHR 1672012N/*EDIT 2-013  */#define COB$_MULFILERR 1672020N/*EDIT 2-016 */#define COB$_NOTIMP 1672028N/*EDIT 2-017, COBOL V5.0 SUPPORT */"#define COB$_INTDATEBOUNDS 1672036!#define COB$_INTDAYBOUNDS 1672044!#define COB$_DAYINTBOUNDS 1672052"#define COB$_DATEINTBOUNDS 1672060#define COB$_FACTBOUNDS 1672068!#define COB$_NUMVALARGINV 1672076!#define COB$_LOWERLENZERO 1672084!#define COB$_UPPERLENZERO 1672092##define COB$_REVERSELENZERO 1672100"#define COB$_ANNUITYBOUNDS 1672108#define COB$_CHARBOUNDS 1672116#define COB$_MODBOUNDS 1672124"#define COB$_PRESVALBOUNDS 1672132#define COB$_REMBOUNDS 1672140!#define COB$_RANDOMBOUNDS 1672148#define COB$_INTDIVZER 1679170#define COB$_DIVBY_ZER 1679178#define COB$_UNDEF_EXP 1679186N/* */N/* */N/* THIS FILE IS AUTOMATICALLY GENERATED. DO NOT EDIT IT BY HAND. */N/* INSTEAD CHANGE COB_MSG.SRC AND RERUN THE MESSAGE CONVERT UTILITY */N/* */N/* NOTE: THIS FILE GETS CHECKED INTO [STARLET] FACILITY */I/* IT DOES NOT GO INTO [DEC$COBRTL]. */N/* */N/*  */N/* */N/* VAX COBOL USES 0-499, 1000 ONWARD */#define COB$_INFO 1675171#define COB$_VERSION 1675179#define COB$_BUG_CHECK 1675188#define COB$_INVDATE 1675196#define COB$_NOTCOBSPE 1675204#define COB$_INVARGCOB 1675212#define COB$_SUCCESS 1675217!#define COB$_DUPLICATE_OK 1675227!#define COB$_RECORD_SHORT 1675235 #define COB$_RECORD_LONG 1675244#define COB$_CREATED 1675251#define COB$_NOT_REEL 1675259!#define COB$_EOF_DETECTED 1675268!#define COB$_EOF_OPTIONAL 1675276##define COB$_ALREADY_AT_EOF 1675284##define COB$_READ_TOO_LARGE 1675292 #define COB$_KEY_CHANGED 1675300"#define COB$_DUPLICATE_KEY 1675308%#define COB$_RECORD_NOT_FOUND 1675316"#define COB$_KEY_TOO_LARGE 1675324$#define COB$_PERMANENT_ERROR 1675332#define COB$_BOUNDARY 1675340##define COB$_FILE_NOT_FOUND 1675348(#define COB$_IO_NOT_MASS_STORAGE 1675356%#define COB$_NOT_MASS_STORAGE 1675364!#define COB$_CLOSE_LOCKED 1675372 #define COB$_FILE_ATTRIB 1675380!#define COB$_ALREADY_OPEN 1675388#define COB$_NOT_OPEN 1675396#define COB$_NO_CURRENT 1675404!#define COB$_REWRITE_SIZE 1675412#define COB$_WRITE_SIZE 1675420##define COB$_NO_NEXT_RECORD 1675428#define COB$_NOT_INPUT 1675436#define COB$_NOT_OUTPUT 1675444#define COB$_NOT_IO 1675452#define COB$_LOCKED_OK 1675460 #define COB$_FILE_LOCKED 1675468"#define COB$_LOCKED_FAILED 1675476%#define COB$_DEVICE_FULL_OPEN 1675484 #define COB$_CLOSE_ERROR 1675492N/* NOTIMP SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */#define COB$_FAILURE 1675500"#define COB$_END_OF_VOLUME 1675508&#define COB$_NOT_END_OF_VOLUME 1675516#define COB$_NO_LOCKING 1675524 #define COB$_INVALID_KEY 1675532 #define COB$_END_OF_PAGE 1675540%#define COB$_CONVERSION_ERROR 1675548#define COB$_SCR_NORMAL 1675553"#define COB$_SCR_BUG_CHECK 1675564#define COB$_SCR_ERROR 1675570#define COB$_SCR_EOF 1675579#define COB$_SCR_CVTERR 1675586 #define COB$_SCR_CVT_OFW 1675594#define COB$_SCR_NOTTY 1675602#define COB$_SCR_INVKEY 1675610#define COB$_SCR_INVDAT 1675618#define COB$_SCR_FULL 1675626!#define COB$_SCR_NOT_FULL 1675634!#define COB$_SCR_REQUIRED 1675642 #define COB$_SCR_INVLINE 1675650#define COB$_SCR_INVCOL 1675658#define COB$_SCR_HEIGHT 1675667#define COB$_SCR_WIDTH 1675675 #define COB$_SCR_NOCOLOR 1675683N/* DIVBY_ZER SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* UNDEF_EXP SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* INVDECDAT SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* GOTO_ALT SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* RECACTPER SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* NESERRPER SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* TIMOVELON  SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* RECACTUSE SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* SUBOVELON SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* INTDATEBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* INTDAYBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* DAYINTBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* DATEINTBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* FACTBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* NUMVALARGINV SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* LOWERLENZERO SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* UPPERLENZERO SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* REVERSELENZERO SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* ANNUITYBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* CHARBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* MODBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* PRESVALBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* REMBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */#define COB$_INSVIRMEM 1675692$#define COB$_STRING_OVERFLOW 1675700"#define COB$_INVALID_FNAME 1675708 #define COB$_SWITCH_FAIL 1675716##define COB$_INVALID_SWITCH 1675724#def ine COB$_NOT_LOCKED 1675732##define COB$_NOT_LOCKED_REL 1675740!#define COB$_SIZE_CHANGED 1675748 #define COB$_CALL_FAILED 1675756"#define COB$_CANCEL_FAILED 1675764##define COB$_INVALID_RECORD 1675772!#define COB$_USE_EXECUTED 1675780%#define COB$_FILE_NOT_PRESENT 1675788"#define COB$_UNLOCK_FAILED 1675796$#define COB$_RECORD_KEY_ZERO 1675804"#define COB$_DISPLAY_ERROR 1675812!#define COB$_ACCEPT_ERROR 1675820#define COB$_OPEN_ERROR 1675828#define COB$_READ_ERROR 1675836 #def ine COB$_WRITE_ERROR 1675844"#define COB$_REWRITE_ERROR 1675852!#define COB$_DELETE_ERROR 1675860 #define COB$_START_ERROR 1675868!#define COB$_UNLOCK_ERROR 1675876#define COB$_SORT_ERROR 1675884$#define COB$_KEY_MATCH_ERROR 1675892$#define COB$_KEY_COUNT_ERROR 1675900$#define COB$_INVALID_FOOTING 1675908#define COB$_PAGE_SIZE 1675916%#define COB$_ACCEPT_CVT_ERROR 1675924#define COB$_OPEN_MFT 1675932 #define COB$_DEVICE_FULL 1675940$#define COB$_RECORD_EXCEEDED 1675948$#define CO B$_DEVICE_FULL_KEY 1675956#define COB$_SUBSCRIPT 1675964!#define COB$_MFT_POSITION 1675972#define COB$_NOISAM 1675980%#define COB$_ISAM_KEY_OVERLAP 1675988!#define COB$_ISAM_BADFILE 1675996N/* RANDOMBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */#define COB$_ORDLENONE 1676004#define COB$_INVTERM 1676012#define COB$_INVTERMDB 1676020#define COB$_INVARGMTH 1676028 #define COB$_ISAM_BADKEY 1676036#define COB$_NOEXTFH 1676044)#define COB$_ENCINA_UNKNOWN_ERROR  1676052#define COB$_FCNTLERR 1676060#define COB$_LOCKERR 1676068#define COB$_NOMOREL 1676076 #define COB$_ISAM_INVKEY 1676084!#define COB$_INVALID_TAPE 1676092#define COB$_TAPE_ERROR 1676100!#define COB$_TAPE_SUPPORT 1676108!#define COB$_CORRECT_TAPE 1676115#define COB$_NEXT_TAPE 1676123 #define COB$_TAPE_PROMPT 1676131"#define COB$_TAPE_SEQUENCE 1676138 #define COB$_END_OF_TAPE 1676148#define COB$_TAPE_ABORT 1676156 #define COB$_TAPE_DEVICE 1676163#define COB$_TAPE_ENTER 1676171 #define COB$_TAPE_IN_USE 1676180 #define COB$_TAPE_WRLOCK 1676188!#define COB$_TAPE_OFFLINE 1676194#define COB$_INVLOCK 1676204!#define COB$_NOALPHAUPROG 1676210 #define COB$_BUFTOOSMALL 1676218!#define COB$_COM_BUGCHECK 1676226#define COB$_ILLPICT 1676234#define COB$_BIGAPIC 1676242#define COB$_BIGNPIC 1676250#define COB$_BIGANPIC 1676258#define COB$_BIGANEPIC 1676266#define COB$_BIGNEPIC 1676274#define COB$_PICLENEXT 1676282#define COB$_PICLONG 1676290#define COB$_PICREPEAT 1676298#define COB$_PIC1ONLY 1676306#define COB$_PICPAREN 1676314#define COB$_RT_FLOAT 1676322#define COB$_PICMUTEX1 1676330#define COB$_PICMUTEX2 1676338#define COB$_PICMUTEX3 1676346#define COB$_PICMUTEX4 1676354#define COB$_ARGLIMIT 1676362N/* INTDIVZER SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* INTEXPOVE SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */N/* INTEXPUND SHARED WITH VAX COBOL MESSAGES IN COB MSG.MSG */N/* INTRESOPE SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG */#define COB$_BADVERS_S 1676372#define COB$_BADVERS_I 1676379%#define COB$_FILE_LOCKED_PERM 1676388#define COB$_INVFUNCARG 1676396#define COB$_RESDETCON 1676402#define COB$_OVFDETCON 1676410#define COB$_UNDDETCON 1676418 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __COBDEF_LOADED */ ww+ƛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */Q/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CONV$ROUTINES.SDI;1 *//*************************************************** *****************************************************************************/(/*** MODULE CONV$ROUTINES IDENT X-1 ***/#ifndef __CONV_ROUTINES_LOADED #define __CONV_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 va riant_union#endif#endif N/* */N/* Convert (CONV) Routines */N/* */N/* */N/* CONV$CONVERT - Initiate conversion */N/*  */N/* status = CONV$CONVERT ([status_block_address] [,flags]) */N/* */N/* status_block_address - Array of longwords into which will be written */N/* statistics about the conversion. The first */C/* element contains the number of following elements */N/* flags - Flags to control the conversion */N/*  */##define conv$convert CONV$CONVERT #ifdef __NEW_STARLETunsigned int conv$convert( __optional_params );#else /* __OLD_STARLET */,unsigned int conv$convert(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* CONV$PASS_FILES - Specify conversion files */N/*  */N/* status = CONV$PASS_FILES (input_filespec, output_filespec */B/* [,fdl_filespec] [,exception_filespec] */;/* [,flags]) */N/* */N/* input_filespec - File to be converted */N/* output_filespec - Destination file */N/* fdl_filespec - File containing FDL for conversion */N/* exception_filespec - File to contain exception records */N/* flags - Flags controlling conversion */)#define conv$pass_files CONV$PASS_FILES #ifdef __NEW_STARLETunsigned int conv$pass_files( void *input_file_spec, void *output_file_spec, __optional_params );#else /* __OLD_STARLET *//unsigned int conv$pass_files(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* CONV$PASS_OPTIONS - Specify processing options */N/* */N/* status = CONV$PASS_OPTIONS ([parameter_list_address] [,flags]) */N/* */N/* parameter_list_address - Array specifying convert options */N/* flags - Flags contr olling conversion */N/* */-#define conv$pass_options CONV$PASS_OPTIONS #ifdef __NEW_STARLETunsigned int conv$pass_options( __optional_params );#else /* __OLD_STARLET */1unsigned int conv$pass_options(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* CONV$RECLAIM - CONVERT/RECLAIM  */N/* */N/* status - CONV$RECLAIM (input_filespec [,statistics_blk]) */N/* */N/* input_filespec - File to be converted */N/* statistics_blk - Array to receive statistics; first longword specifies */I/* number of statistics */N/*  */##define conv$reclaim CONV$RECLAIM #ifdef __NEW_STARLETunsigned int conv$reclaim( void *input_filespec, __optional_params);#else /* __OLD_STARLET */,unsigned int conv$reclaim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard ##endif /* __CONV_ROUTINES_LOADED */ wwK;Ǜ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */K/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CONVDEF.SDI;1 *//******************************************************* *************************************************************************/#/*** MODULE $CONVDEF IDENT X-4 ***/#ifndef __CONVDEF_LOADED#define __CONVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #define CONV$M_SIGNAL 0x1#define CONV$M_FDL_STRING 0x2 #ifdef __NEW_STARLETtypedef union _convdef { short int conv$w_convdef; __struct {# unsigned conv$v_signal : 1;' unsigned conv$v_fdl_string : 1;$ unsigned conv$v_fill_0_ : 6; } conv$r_convdef_bits; } CONVDEF; #if !defined(__VAXC)7#define conv$v_signal conv$r_convdef_bits.conv$v_signal?#define conv$v_fdl_string conv$r_convdef_bits.conv$v_fdl_string"#endif /* #if! !defined(__VAXC) */ #else /* __OLD_STARLET */union convdef { short int conv$w_convdef; __struct {# unsigned conv$v_signal : 1;' unsigned conv$v_fdl_string : 1;$ unsigned conv$v_fill_0_ : 6; } conv$r_convdef_bits; } ; #if !defined(__VAXC)7#define conv$v_signal conv$r_convdef_bits.conv$v_signal?#define conv$v_fdl_string conv$r_convdef_bits.conv$v_fdl_string"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STA"RLET */#define CONV$K_OPTIONS_COUNT 0#define CONV$K_CREATE 1#define CONV$K_SHARE 2#define CONV$K_FAST 3#define CONV$K_MERGE 4#define CONV$K_APPEND 5#define CONV$K_SORT 6#define CONV$K_WORK_FILES 7#define CONV$K_KEY 8#define CONV$K_PAD 9#define CONV$K_PAD_CHARACTER 10#define CONV$K_TRUNCATE 11#define CONV$K_EXIT 12#define CONV$K_FIXED_CONTROL 13#define CONV$K_FILL_BUCKETS 14#define CONV$K_READ_CHECK 15#define CONV$K_WRITE_CHECK 16#define CONV$K_FDL 17#def#ine CONV$K_EXCEPTION 18#define CONV$K_PROLOGUE 19!#define CONV$K_IGNORE_PROLOGUE 20#define CONV$K_SECONDARY 21#define CONV$K_MAX_OPTIONS 21#define CONV$C_MAX_OPTIONS 21#define CONV$S_OPTIONS 88 #ifdef __NEW_STARLETtypedef struct _conv$options {& unsigned int conv$l_options_count; unsigned int conv$l_create; unsigned int conv$l_share; unsigned int conv$l_fast; unsigned int conv$l_merge; unsigned int conv$l_append; unsigned int conv$l_sort;#$ unsigned int conv$l_work_files; unsigned int conv$l_key; unsigned int conv$l_pad;& unsigned int conv$l_pad_character;! unsigned int conv$l_truncate; unsigned int conv$l_exit;& unsigned int conv$l_fixed_control;% unsigned int conv$l_fill_buckets;# unsigned int conv$l_read_check;$ unsigned int conv$l_write_check; unsigned int conv$l_fdl;" unsigned int conv$l_exception;! unsigned int conv$l_prologue;( unsigned int conv$l_ignore_prologue;"% unsigned int conv$l_secondary; } CONV$OPTIONS;#else /* __OLD_STARLET */struct conv$options {& unsigned int conv$l_options_count; unsigned int conv$l_create; unsigned int conv$l_share; unsigned int conv$l_fast; unsigned int conv$l_merge; unsigned int conv$l_append; unsigned int conv$l_sort;# unsigned int conv$l_work_files; unsigned int conv$l_key; unsigned int conv$l_pad;& unsigned int conv$l_pad_character;! unsigned int c&onv$l_truncate; unsigned int conv$l_exit;& unsigned int conv$l_fixed_control;% unsigned int conv$l_fill_buckets;# unsigned int conv$l_read_check;$ unsigned int conv$l_write_check; unsigned int conv$l_fdl;" unsigned int conv$l_exception;! unsigned int conv$l_prologue;( unsigned int conv$l_ignore_prologue;" unsigned int conv$l_secondary; } ;%#endif /* #ifdef __NEW_STARLET */!#define CONV$K_STATISTICS_COUNT 0#define CONV$K_FILE_COUNT 1#def'ine CONV$K_RECORD_COUNT 2#define CONV$K_EXCEPT_COUNT 3#define CONV$K_VALID_COUNT 4#define CONV$K_MAX_STATISTICS 4#define CONV$C_MAX_STATISTICS 4#define CONV$S_STATISTICS 20#define CONV$K_KEY_NUMBER 5#define CONV$K_REC_OUT 6#define CONV$K_NODES 7#define CONV$K_WRK_ALQ 8#define CONV$K_INI_RUNS 9#define CONV$K_MRG_ORDER 10#define CONV$K_MRG_PASSES 11 #define CONV$K_SORT_DIO_COUNT 12 #define CONV$K_SORT_BIO_COUNT 13##define CONV$K_SORT_ELAPSED_TIME 14#define CONV$K_SOR(T_CPU_TIME 16#define CONV$K_SORT_PF_COUNT 18 #define CONV$K_LOAD_DIO_COUNT 19 #define CONV$K_LOAD_BIO_COUNT 20##define CONV$K_LOAD_ELAPSED_TIME 21#define CONV$K_LOAD_CPU_TIME 23#define CONV$K_LOAD_PF_COUNT 25 #define CONV$K_EXT_STATISTICS 25 #define CONV$C_EXT_STATISTICS 25!#define CONV$S_EXT_STATISTICS 104 #ifdef __NEW_STARLET!typedef struct _conv$statistics {) unsigned int conv$l_statistics_count;# unsigned int conv$l_file_count;% unsigned int conv$l_record_cou)nt;% unsigned int conv$l_except_count;$ unsigned int conv$l_valid_count;# unsigned int conv$l_key_number; unsigned int conv$l_rec_out; unsigned int conv$l_nodes; unsigned int conv$l_wrk_alq;! unsigned int conv$l_ini_runs;" unsigned int conv$l_mrg_order;# unsigned int conv$l_mrg_passes;' unsigned int conv$l_sort_dio_count;' unsigned int conv$l_sort_bio_count;. unsigned __int64 conv$q_sort_elapsed_time;* unsigned __int64 conv$q_sort_cpu_time;*& unsigned int conv$l_sort_pf_count;' unsigned int conv$l_load_dio_count;' unsigned int conv$l_load_bio_count;. unsigned __int64 conv$q_load_elapsed_time;* unsigned __int64 conv$q_load_cpu_time;& unsigned int conv$l_load_pf_count; } CONV$STATISTICS;#else /* __OLD_STARLET */struct conv$statistics {) unsigned int conv$l_statistics_count;# unsigned int conv$l_file_count;% unsigned int conv$l_record_count;% unsigned int conv$l_except_count;$ +unsigned int conv$l_valid_count;# unsigned int conv$l_key_number; unsigned int conv$l_rec_out; unsigned int conv$l_nodes; unsigned int conv$l_wrk_alq;! unsigned int conv$l_ini_runs;" unsigned int conv$l_mrg_order;# unsigned int conv$l_mrg_passes;' unsigned int conv$l_sort_dio_count;' unsigned int conv$l_sort_bio_count;. unsigned int conv$q_sort_elapsed_time [2];* unsigned int conv$q_sort_cpu_time [2];& unsigned int conv$l_sort_pf_count;' unsi,gned int conv$l_load_dio_count;' unsigned int conv$l_load_bio_count;. unsigned int conv$q_load_elapsed_time [2];* unsigned int conv$q_load_cpu_time [2];& unsigned int conv$l_load_pf_count; } ;%#endif /* #ifdef __NEW_STARLET */!#define RECL$K_STATISTICS_COUNT 0#define RECL$K_SCAN_COUNT 1#define RECL$K_DATA_COUNT 2#define RECL$K_INDEX_COUNT 3#define RECL$K_TOTAL_COUNT 4#define RECL$K_MAX_STATISTICS 4#define RECL$C_MAX_STATISTICS 4#define RECL$S_STATISTIC-S 20 #ifdef __NEW_STARLET!typedef struct _recl$statistics {) unsigned int recl$l_statistics_count;# unsigned int recl$l_scan_count;# unsigned int recl$l_data_count;$ unsigned int recl$l_index_count;$ unsigned int recl$l_total_count; } RECL$STATISTICS;#else /* __OLD_STARLET */struct recl$statistics {) unsigned int recl$l_statistics_count;# unsigned int recl$l_scan_count;# unsigned int recl$l_data_count;$ unsigned int recl$l_index_count;$ . unsigned int recl$l_total_count; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CONVDEF_LOADED */ wwǛ/***************************************************************** /***************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */K/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CONVMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $CONVMSGDEF ***/#ifndef __CONVMSGDEF_LOADED#define __CONVMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features *0/!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __optional1_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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:40.98 */N/* 2 */N/************************************************************************** */N/** * */N/** COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION, 1978, 1980, 1982, 1984, * *//** 1991,1992 * */N/** ALL RIGHTS RESERVED. * */N/** UNPUBLISHED RIGHTS RESERVED UNDER THE COPYRIGHT LAWS OF THE UNITED * */N/** STATES. 3 * */N/** * */N/** THE SOFTWARE CONTAINED ON THIS MEDIA IS PROPRIETARY TO AND EMBODIES * */N/** THE CONFIDENTIAL TECHNOLOGY OF DIGITAL EQUIPMENT CORPORATION. * */N/** POSSESSION, USE, DUPLICATION OR DISSEMINATION OF THE SOFTWARE AND * */N/** MEDIA IS AUTHORIZED ONLY PURSUANT TO A VALID WRITTEN LICENSE FROM * */N/** DIGITAL EQUIPMENT CORPORATION. * */N/** 4 * */N/** RESTRICTED RIGHTS LEGEND USE, DUPLICATION, OR DISCLOSURE BY THE U.S. * */N/** GOVERNMENT IS SUBJECT TO RESTRICTIONS AS SET FORTH IN SUBPARAGRAPH * */N/** (C)(1)(II) OF DFARS 252.227-7013, OR IN FAR 52.227-19, AS APPLICABLE. * */N/** * */N/************************************************************************** */N/* 5 */N/*++ */N/* */K/* FACILITY: VAX-11 CONVERT */N/* */N/* ENVIRONMENT: */N/* 6 */B/* VAX/VMS OPERATING SYSTEM */N/* */N/* ABSTRACT: */B/* CONVERT AND CONVERT/RECLAIM ERROR MESSAGES */N/* */N/* */A/* AUTHOR: KEITH B THOMPSON CR7EATION DATE: AUGUST-1980 */N/* */N/* */N/* MODIFIED BY: */N/* */3/* X-4 BP026 BOB PREMOVICH 29-MAY-1998 */B/* CREATE LITERAL MESSAGE VALUES FOR THE MESSAGES THAT */B/* WERE UTILIZING THE $SH8R_MSGDEF MACRO. THIS IS TO */B/* FACILITATE THE MOVE OF THE MESSAGES TO THE STARLET */B/* FACILITY. */N/* */4/* X-3 CW002 CHRIS WHITAKER 26-AUG-1992 */B/* MERGE IN AMBER CHANGES. */N/* */7/* X-2 SBL1003 STEVEN B. LIONEL 13-DEC-1991 9 */B/* SET MACRO NAME TO $CONVMSGDEF */N/* */:/* X-2 RMM0004 RICHARD M. MARSHALL 9-AUG-1991 */B/* PORTED TO ALPHA. CORRECTED MORE SPELLING. */N/* */8/* V03-005 RAS0318 RON SCHAEFER 27-JUN-1984 */B/* FIX SPELLINGS AND TEXT OF MESSAGES. */N/* : */</* V03-004 KBT0468 KEITH B. THOMPSON 21-JAN-1983 */B/* CHANGE THE TEXT OF RSZ */N/* */</* V03-003 KBT0438 KEITH B. THOMPSON 30-DEC-1982 */B/* CHANGE THE TEXT OF CREA_ERR */N/* */</* V03-002 KBT0394; KEITH B. THOMPSON 29-OCT-1982 */B/* CHANGE THE MESSGAE TEXT OF PROERR TO INCLUDE VBN AND */B/* MAKE THE SIGNED VALUES UNSIGNED. */N/* */:/* V03-001 KBT0039 KEITH THOMPSON 3-APR-1982 */B/* CHANGE THE EXCEPTION MESSAGES TO INFO */N/* */N/***** < */#define CONVERT$_FACILITY 178[#define CONV$_CREATEDSTM 11670267 /* /FAO=1 */N#define CONV$_INSVIRMEM 11670258 /* */N#define CONV$_OPENERR 11670410 /* /FAO=1 */P#define CONV$_OPENIN 11669658 /* /FAO=1 */Q#define CONV$_OPENOUT 11669666 /* /FAO=1 */N#define CONV=$_READERR 11669682 /* /FAO=1 */N#define CONV$_WRITEERR 11669714 /* /FAO=1 */P#define CONV$_CLOSEIN 11669586 /* /FAO=1 */Q#define CONV$_CLOSEOUT 11669594 /* /FAO=1 */N#define CONV$_BADLOGIC 11669794 /* */N#define CONV$_NOWILD 11669802 /* */T#define CONV$_VALERR 11669994 > /* */N#define CONV$_CONFQUAL 11670242 /* */#define CONV$_FAO_MAX 2#define CONV$_NI 11698187#define CONV$_PAD 11698195#define CONV$_RMS 11698203#define CONV$_RTL 11698211#define CONV$_RTS 11698219#define CONV$_VFC 11698227#define CONV$_DUP 11698235#define CONV$_KEY 11698243#define CONV$_REX 11698251#define CONV$_RSK 11698259#define CONV$_RSZ 11698267#define CONV$_SEQ 11698275#define CO ?NV$_BADBLK 11698282#define CONV$_CREA_ERR 11698290N#define CONV$_DELPRI 11698298 /*UNUSED IN V4 */#define CONV$_EXTN_ERR 11698306#define CONV$_FATALEXC 11698314#define CONV$_BADSORT 11698322#define CONV$_FILLIM 11698330#define CONV$_IDX_LIM 11698338#define CONV$_ILL_KEY 11698346 #define CONV$_ILL_VALUE 11698354 #define CONV$_INP_FILES 11698362N#define CONV$_KEYREF 11698370 /*UNUSED IN V4 */#define CONV$_LOADIDX 1169@8378#define CONV$_NARG 11698386#define CONV$_NOKEY 11698394#define CONV$_NOTIDX 11698402#define CONV$_NOTSEQ 11698410#define CONV$_ORDER 11698418#define CONV$_OPENEXC 11698426#define CONV$_PROERR 11698434#define CONV$_PROL_WRT 11698442#define CONV$_UDF_BKS 11698450#define CONV$_UDF_BLK 11698458#define CONV$_INVBKT 11698466#define CONV$_PLV 11698474 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Ab#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CONVMSGDEF_LOADED */ wwLț/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 */ B/********************************************************************************************************************************//*** MODULE $CPUIDEF ***/#ifndef __CPUIDEF_LOADED#define __CPUIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previouslCy-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 unionD#else#define __union variant_union#endif#endif N#define CPUI$K_TICKS 1 /* Get CPU's tick info */N/*+ */N/* CPUI Flags Definitions */N/*- */#define CPUI$M_SEARCH 0x1"#define CPUI$M_RESERVED 0xFFFFFFFE #ifdef __NEW_STARLETtypedef struct _cpui_flags { E__union {" unsigned int cpui$l_flags; __struct {T unsigned cpui$v_search : 1; /* If CPU not active, search for next CPU */T unsigned cpui$v_reserved : 31; /* No other flags defined at this time */' } cpui$r_cpuidef_flag_bits; } cpui$r_cpuidef_union; } CPUI_FLAGS; #if !defined(__VAXC)6#define cpui$l_flags cpui$r_cpuidef_union.cpui$l_flagsQ#define cpui$v_search cpui$r_cpuidef_union.cpui$r_cpuidef_flag_bits.cpui$v_searchU#d Fefine cpui$v_reserved cpui$r_cpuidef_union.cpui$r_cpuidef_flag_bits.cpui$v_reserved"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _cpui_flags { __union {" unsigned int cpui$l_flags; __struct {T unsigned cpui$v_search : 1; /* If CPU not active, search for next CPU */T unsigned cpui$v_reserved : 31; /* No other flags defined at this time */' } cpui$r_cpuidef_flag_bits; } cpui$r_cpuidef_union G; } cpui_flags; #if !defined(__VAXC)6#define cpui$l_flags cpui$r_cpuidef_union.cpui$l_flagsQ#define cpui$v_search cpui$r_cpuidef_union.cpui$r_cpuidef_flag_bits.cpui$v_searchU#define cpui$v_reserved cpui$r_cpuidef_union.cpui$r_cpuidef_flag_bits.cpui$v_reserved"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define CPUI$K_KERNEL_TICKS_INDEX 0 /* 0 - kernel mode */N#define CPUI$K_EXEC_TICKS_INDEX 1 /* 1 - exec mode H */N#define CPUI$K_SUPER_TICKS_INDEX 2 /* 2 - super mode */N#define CPUI$K_USER_TICKS_INDEX 3 /* 3 - user mode */N#define CPUI$K_INT_TICKS_INDEX 4 /* 4 - interrupt */N#define CPUI$K_MPSYNCH_TICKS_INDEX 5 /* 5 - mpsynch */N#define CPUI$K_IDLE_TICKS_INDEX 6 /* 6 - idle */N#define CPUI$K_TICKS_ENTRIES 7 /* 7 - Total number of entries */ $#pragma __Imember_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CPUIDEF_LOADED */ wwۚț/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 b Jy OpenVMS SDL EV3-3 */L/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]LIBCQDEF.SDI;1 *//********************************************************************************************************************************//*** MODULE $CQUALDEF ***/#ifndef __CQUALDEF_LOADED#define __CQUALDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* KDefined 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#definLe __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif #define UTIL$M_CQF_CONFIRM 0x1#define UTIL$M_CQF_EXCLUDE 0x2#define UTIL$M_CQF_BEFORE 0x4#define UTIL$M_CQF_SINCE 0x8#define UTIL$M_CQF_CREATED 0x10 #define UTIL$M_CQF_MODIFIED 0x20#define UTIL$M_CQF_EXPIRED 0x40#define UTIL$M_CQF_BACKUP 0x80 #define UTIL$M_CQF_BYOWNER 0x100!#define UTIL$M_CQF_ACCESSED 0x200##def Mine UTIL$M_CQF_ATTRIBUTES 0x400$#define UTIL$M_CQF_UPDATE_DATA 0x800(#define UTIL$M_CQF_SYMLINK_SEARCH 0x1000(#define UTIL$M_CQF_SYMLINK_TARGET 0x2000 #ifdef __NEW_STARLETtypedef struct _cfquals { __union { __struct {N unsigned util$v_cqf_confirm : 1; /* */N unsigned util$v_cqf_exclude : 1; /* */N unsigned util$v_cqf_before : 1; /* */N unsignNed util$v_cqf_since : 1; /* */N unsigned util$v_cqf_created : 1; /* */N unsigned util$v_cqf_modified : 1; /* */N unsigned util$v_cqf_expired : 1; /* */N unsigned util$v_cqf_backup : 1; /* */N unsigned util$v_cqf_byowner : 1; /* */N unsigned util$v_cqf_accessed : 1 O; /* */N unsigned util$v_cqf_attributes : 1; /* */N unsigned util$v_cqf_update_data : 1; /* */N unsigned util$v_cqf_symlink_search : 1; /* */N unsigned util$v_cqf_symlink_target : 1; /* */) unsigned util$v_qf_fill : 18;% } util$l_qualifier_flags; __struct {. unsigned util$v_cqf_assigned : 1 P4;0 unsigned util$v_cqf_unassigned : 18;! } util$r_qf_overlay2; } util$r_flags_overlay; } CFQUALS; #if !defined(__VAXC)J#define util$l_qualifier_flags util$r_flags_overlay.util$l_qualifier_flagsD#define util$v_cqf_confirm util$l_qualifier_flags.util$v_cqf_confirmD#define util$v_cqf_exclude util$l_qualifier_flags.util$v_cqf_excludeB#define util$v_cqf_before util$l_qualifier_flags.util$v_cqf_before@#define util$v_cqf_since util$l_qualifier_flags.util$v_cQqf_sinceD#define util$v_cqf_created util$l_qualifier_flags.util$v_cqf_createdF#define util$v_cqf_modified util$l_qualifier_flags.util$v_cqf_modifiedD#define util$v_cqf_expired util$l_qualifier_flags.util$v_cqf_expiredB#define util$v_cqf_backup util$l_qualifier_flags.util$v_cqf_backupD#define util$v_cqf_byowner util$l_qualifier_flags.util$v_cqf_byownerF#define util$v_cqf_accessed util$l_qualifier_flags.util$v_cqf_accessedJ#define util$v_cqf_attributes util$l_qualifier_flags.util$v_cqf_attributes RL#define util$v_cqf_update_data util$l_qualifier_flags.util$v_cqf_update_dataR#define util$v_cqf_symlink_search util$l_qualifier_flags.util$v_cqf_symlink_searchR#define util$v_cqf_symlink_target util$l_qualifier_flags.util$v_cqf_symlink_targetB#define util$r_qf_overlay2 util$r_flags_overlay.util$r_qf_overlay2B#define util$v_cqf_assigned util$r_qf_overlay2.util$v_cqf_assignedF#define util$v_cqf_unassigned util$r_qf_overlay2.util$v_cqf_unassigned"#endif /* #if !defined(__VAXC) */ #else S/* __OLD_STARLET */struct cfquals { __union { __struct {N unsigned util$v_cqf_confirm : 1; /* */N unsigned util$v_cqf_exclude : 1; /* */N unsigned util$v_cqf_before : 1; /* */N unsigned util$v_cqf_since : 1; /* */N unsigned util$v_cqf_created : 1; /* */N unsigned util$v_Tcqf_modified : 1; /* */N unsigned util$v_cqf_expired : 1; /* */N unsigned util$v_cqf_backup : 1; /* */N unsigned util$v_cqf_byowner : 1; /* */N unsigned util$v_cqf_accessed : 1; /* */N unsigned util$v_cqf_attributes : 1; /* */N unsigned util$v_cqf_update_data : 1; /* U */N unsigned util$v_cqf_symlink_search : 1; /* */N unsigned util$v_cqf_symlink_target : 1; /* */) unsigned util$v_qf_fill : 18;% } util$l_qualifier_flags; __struct {. unsigned util$v_cqf_assigned : 14;0 unsigned util$v_cqf_unassigned : 18;! } util$r_qf_overlay2; } util$r_flags_overlay; } ; #if !defined(__VAXC)Y#define utVil$v_cqf_confirm util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_confirmY#define util$v_cqf_exclude util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_excludeW#define util$v_cqf_before util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_beforeU#define util$v_cqf_since util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_sinceY#define util$v_cqf_created util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_created[#define util$v_cqf_modified util$r_flags_overlay.util$l_qualifWier_flags.util$v_cqf_modifiedY#define util$v_cqf_expired util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_expiredW#define util$v_cqf_backup util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_backupY#define util$v_cqf_byowner util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_byowner[#define util$v_cqf_accessed util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_accessed_#define util$v_cqf_attributes util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_attributesa#define Xutil$v_cqf_update_data util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_update_datag#define util$v_cqf_symlink_search util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_symlink_searchg#define util$v_cqf_symlink_target util$r_flags_overlay.util$l_qualifier_flags.util$v_cqf_symlink_targetW#define util$v_cqf_assigned util$r_flags_overlay.util$r_qf_overlay2.util$v_cqf_assigned[#define util$v_cqf_unassigned util$r_flags_overlay.util$r_qf_overlay2.util$v_cqf_unassigned"#endif /* #if !de Yfined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* define prompt parameter values */N/* */ #define UTIL$K_CQF_UNSPECIFIED 0#define UTIL$K_CQF_SHORT 1#define UTIL$K_CQF_LONG 2#define UTIL$K_CQF_CONDENSED 1#define UTIL$K_CQF_EXPANDED 2#define UTIL$K_CQF_MAX_FORM 2N/* Z */N/* Flag values output argument */N/* */N#define UTIL$K_SEARCH_SYMLINK_DEFAULT 0 /* use process default */N#define UTIL$K_SEARCH_SYMLINK_NONE 1 /* use no symlinks */N#define UTIL$K_SEARCH_SYMLINK_ALL 2 /* use symlinks always */N#define UTIL$K_SEARCH_SYMLINK_NOELLIPS 3 /* [use symlinks except in ellipsis */'#define UTIL$M_CQF_SYMLINK_NOTARGET 0x4 #ifdef __NEW_STARLETtypedef struct _cfvals { __union { int util$l_flag_values; __struct {N unsigned util$v_cqf_symlink_mode : 2; /* */T/* NOTE: Symlink search mode encodings are coordinated across $JPIDEF, $LIBCQDEF, */N/* $LIBFILDEF, $PPROPDEF, and $NAMLDEF. */N unsigned util$v_cqf_symlink_notarget : 1; /* \ */( unsigned util$v_fill_2_ : 5; } util$r_fill_1_; } util$r_fill_0_; } CFVALS; #if !defined(__VAXC)<#define util$l_flag_values util$r_fill_0_.util$l_flag_valuesU#define util$v_cqf_symlink_mode util$r_fill_0_.util$r_fill_1_.util$v_cqf_symlink_mode]#define util$v_cqf_symlink_notarget util$r_fill_0_.util$r_fill_1_.util$v_cqf_symlink_notarget"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct cfvals { ]__union { int util$l_flag_values; __struct {N unsigned util$v_cqf_symlink_mode : 2; /* */T/* NOTE: Symlink search mode encodings are coordinated across $JPIDEF, $LIBCQDEF, */N/* $LIBFILDEF, $PPROPDEF, and $NAMLDEF. */N unsigned util$v_cqf_symlink_notarget : 1; /* */( unsigned util$v_fill_2_ : 5; } util$r_fill_1_; } util$r_fill_0_; } ; ^ #if !defined(__VAXC)<#define util$l_flag_values util$r_fill_0_.util$l_flag_valuesU#define util$v_cqf_symlink_mode util$r_fill_0_.util$r_fill_1_.util$v_cqf_symlink_mode]#define util$v_cqf_symlink_notarget util$r_fill_0_.util$r_fill_1_.util$v_cqf_symlink_notarget"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* TO BE REMOVED _ */#define LIB$M_CQF_CONFIRM 0x1#define LIB$M_CQF_EXCLUDE 0x2#define LIB$M_CQF_BEFORE 0x4#define LIB$M_CQF_SINCE 0x8#define LIB$M_CQF_CREATED 0x10#define LIB$M_CQF_MODIFIED 0x20#define LIB$M_CQF_EXPIRED 0x40#define LIB$M_CQF_BACKUP 0x80#define LIB$M_CQF_BYOWNER 0x100 #ifdef __NEW_STARLETtypedef struct _cquals { __union { __struct {N unsigned lib$v_cqf_confirm : 1; /* */N unsigned lib$v_cqf_exclude : 1`; /* */N unsigned lib$v_cqf_before : 1; /* */N unsigned lib$v_cqf_since : 1; /* */N unsigned lib$v_cqf_created : 1; /* */N unsigned lib$v_cqf_modified : 1; /* */N unsigned lib$v_cqf_expired : 1; /* */N unsigned lib$v_cqf_backup : 1; /* a */N unsigned lib$v_cqf_byowner : 1; /* */( unsigned lib$v_qf_fill : 23;$ } lib$l_qualifier_flags; __struct {, unsigned lib$v_cqf_assigned : 9;/ unsigned lib$v_cqf_unassigned : 23; } lib$r_qf_overlay2; } lib$r_flags_overlay; } CQUALS; #if !defined(__VAXC)G#define lib$l_qualifier_flags lib$r_flags_overlay.lib$l_qualifier_flagsA#define lib$v_cqf_confirm lib$l_qu balifier_flags.lib$v_cqf_confirmA#define lib$v_cqf_exclude lib$l_qualifier_flags.lib$v_cqf_exclude?#define lib$v_cqf_before lib$l_qualifier_flags.lib$v_cqf_before=#define lib$v_cqf_since lib$l_qualifier_flags.lib$v_cqf_sinceA#define lib$v_cqf_created lib$l_qualifier_flags.lib$v_cqf_createdC#define lib$v_cqf_modified lib$l_qualifier_flags.lib$v_cqf_modifiedA#define lib$v_cqf_expired lib$l_qualifier_flags.lib$v_cqf_expired?#define lib$v_cqf_backup lib$l_qualifier_flags.lib$v_cqf_backupA#d cefine lib$v_cqf_byowner lib$l_qualifier_flags.lib$v_cqf_byowner?#define lib$r_qf_overlay2 lib$r_flags_overlay.lib$r_qf_overlay2?#define lib$v_cqf_assigned lib$r_qf_overlay2.lib$v_cqf_assignedC#define lib$v_cqf_unassigned lib$r_qf_overlay2.lib$v_cqf_unassigned"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct cquals { __union { __struct {N unsigned lib$v_cqf_confirm : 1; /* */N unsigned lib$v_cqfd_exclude : 1; /* */N unsigned lib$v_cqf_before : 1; /* */N unsigned lib$v_cqf_since : 1; /* */N unsigned lib$v_cqf_created : 1; /* */N unsigned lib$v_cqf_modified : 1; /* */N unsigned lib$v_cqf_expired : 1; /* */N unsigned lib$v_cqf_backup : 1; /* e */N unsigned lib$v_cqf_byowner : 1; /* */( unsigned lib$v_qf_fill : 23;$ } lib$l_qualifier_flags; __struct {, unsigned lib$v_cqf_assigned : 9;/ unsigned lib$v_cqf_unassigned : 23; } lib$r_qf_overlay2; } lib$r_flags_overlay; } ; #if !defined(__VAXC)U#define lib$v_cqf_confirm lib$r_flags_overlay.lib$l_qualifier_flags.lib$v_cqf_confirmU#define lib$v_fcqf_exclude lib$r_flags_overlay.lib$l_qualifier_flags.lib$v_cqf_excludeS#define lib$v_cqf_before lib$r_flags_overlay.lib$l_qualifier_flags.lib$v_cqf_beforeQ#define lib$v_cqf_since lib$r_flags_overlay.lib$l_qualifier_flags.lib$v_cqf_sinceU#define lib$v_cqf_created lib$r_flags_overlay.lib$l_qualifier_flags.lib$v_cqf_createdW#define lib$v_cqf_modified lib$r_flags_overlay.lib$l_qualifier_flags.lib$v_cqf_modifiedU#define lib$v_cqf_expired lib$r_flags_overlay.lib$l_qualifier_flags.lib$v_cqf_expire gdS#define lib$v_cqf_backup lib$r_flags_overlay.lib$l_qualifier_flags.lib$v_cqf_backupU#define lib$v_cqf_byowner lib$r_flags_overlay.lib$l_qualifier_flags.lib$v_cqf_byownerS#define lib$v_cqf_assigned lib$r_flags_overlay.lib$r_qf_overlay2.lib$v_cqf_assignedW#define lib$v_cqf_unassigned lib$r_flags_overlay.lib$r_qf_overlay2.lib$v_cqf_unassigned"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE h /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CQUALDEF_LOADED */ wwț/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:0 i0:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $CRDEF ***/#ifndef __CRDEF_LOADED#define __CRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __requiredj_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 k#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* CARD READER STATUS BITS */N/*- */#define CR$M_TMODE 0xFN#define CR$K_T026 0 /*026 PUNCH CODE TRANSLATION */N#define CR$K_T029 1 /*029 PUNCH CODE l TRANSLATION */ #ifdef __NEW_STARLETtypedef union _crdef { __struct {N unsigned cr$v_tmode : 4; /* TRANSLATION MODE */$ unsigned cr$v_fill_111_ : 4; } cr$r_crdef_bits;N/* */N/* TRANSLATION MODE DEFINITIONS */N/* */N/* m */ } CRDEF; #if !defined(__VAXC)-#define cr$v_tmode cr$r_crdef_bits.cr$v_tmode"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ union crdef { __struct {N unsigned cr$v_tmode : 4; /* TRANSLATION MODE */$ unsigned cr$v_fill_111_ : 4; } cr$r_crdef_bits;N/* */N/* TRANSLATION MODE DEFINITIONS n */N/* */N/* */ } ; #if !defined(__VAXC)-#define cr$v_tmode cr$r_crdef_bits.cr$v_tmode"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __orequired_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CRDEF_LOADED */ ww+^ɛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]LBRUSR.SDI;1 *//***************** p***************************************************************************************************************//*** MODULE $CREDEF ***/#ifndef __CREDEF_LOADED#define __CREDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined required ptrq 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 __un rion variant_union#endif#endif N/* */N/* Create options table */N/* */N#define CRE$C_VMSV2 2 /* VMS version V04-000 format */N#define CRE$C_VMSV3 3 /* VMS version 3 format */T#define CRE$C_VMSV4 4 /* VMS version 4 format fo sr an ELF files. */T#define CRE$C_VMSV5 5 /* VMS version 5 format for an ELF files. */T#define CRE$C_VMSV6 6 /* VMS version 6 format for an ELF files. */#define CRE$M_NOCASECMP 0x1#define CRE$M_NOCASENTR 0x2#define CRE$M_UPCASNTRY 0x4X#define CRE$C_HLPCASING 6 /* Treat upper casing as it is for HELP libs */Z#define CRE$C_OBJCASING 3 /* Treat upper casing as it is for OBJECT libs */b#define CRE$C_MACTXTCAS 0 /* t Treat upper casing as it is for MACRO and TEXT libs */N#define CRE$K_LENGTH 80 /* */N#define CRE$C_LENGTH 80 /* */ #ifdef __NEW_STARLETtypedef struct _credef {N unsigned int cre$l_type; /* Type of library */N/* (library types defined in $LBRDEF) */N unsigned int cre$l_keylen; /* Length of keys in library u*/N unsigned int cre$l_alloc; /* Initial file allocation */N unsigned int cre$l_idxmax; /* Maximum number of indices */T unsigned int cre$l_uhdmax; /* Size of additional module header data */V unsigned int cre$l_entall; /* Number of index entries to pre-allocate */` unsigned int cre$l_luhmax; /* Number of library update history records to store */P unsigned int cre$l_vertyp; /* Version type of library to vcreate */ __union {N unsigned int cre$l_idxopt; /* Index options */ __struct {P unsigned cre$v_nocasecmp : 1; /* Do not upper case the match key */p unsigned cre$v_nocasentr : 1; /* Do not upper case the index key when comparing with a match key */k unsigned cre$v_upcasntry : 1; /* Upper case the index key when entering it into the library */' unsigned cre$v_fill_4_ : 5; } cre$r_idxopt_bwits; } cre$r_idxopt_overlay;N int credef$$_fill_1 [11]; /* Reserved 11 longwords */ } CREDEF; #if !defined(__VAXC)6#define cre$l_idxopt cre$r_idxopt_overlay.cre$l_idxopt@#define cre$r_idxopt_bits cre$r_idxopt_overlay.cre$r_idxopt_bits9#define cre$v_nocasecmp cre$r_idxopt_bits.cre$v_nocasecmp9#define cre$v_nocasentr cre$r_idxopt_bits.cre$v_nocasentr9#define cre$v_upcasntry cre$r_idxopt_bits.cre$v_upcasntry"#endif /* #if !defined(__VAXC) */ #exlse /* __OLD_STARLET */struct credef {N unsigned int cre$l_type; /* Type of library */N/* (library types defined in $LBRDEF) */N unsigned int cre$l_keylen; /* Length of keys in library */N unsigned int cre$l_alloc; /* Initial file allocation */N unsigned int cre$l_idxmax; /* Maximum number of indices */T unsigned int cre$l_uhdmax; /* Size of additio ynal module header data */V unsigned int cre$l_entall; /* Number of index entries to pre-allocate */` unsigned int cre$l_luhmax; /* Number of library update history records to store */P unsigned int cre$l_vertyp; /* Version type of library to create */ __union {N unsigned int cre$l_idxopt; /* Index options */ __struct {P unsigned cre$v_nocasecmp : 1; /* Do not upper case the match key */p z unsigned cre$v_nocasentr : 1; /* Do not upper case the index key when comparing with a match key */k unsigned cre$v_upcasntry : 1; /* Upper case the index key when entering it into the library */' unsigned cre$v_fill_4_ : 5; } cre$r_idxopt_bits; } cre$r_idxopt_overlay;N int credef$$_fill_1 [11]; /* Reserved 11 longwords */ } ; #if !defined(__VAXC)6#define cre$l_idxopt cre$r_idxopt_overlay.cre$l_idxoptN#define cr {e$v_nocasecmp cre$r_idxopt_overlay.cre$r_idxopt_bits.cre$v_nocasecmpN#define cre$v_nocasentr cre$r_idxopt_overlay.cre$r_idxopt_bits.cre$v_nocasentrN#define cre$v_upcasntry cre$r_idxopt_overlay.cre$r_idxopt_bits.cre$v_upcasntry"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-|defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CREDEF_LOADED */ wwʛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */G/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CRF.SDI;1 *//******************************************************************************* }*************************************************//*** MODULE $CRFDEF ***/#ifndef __CRFDEF_LOADED#define __CRFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*  */N/* CRF$INSRTREF ARGUMENT LIST */N/* */ #ifdef __NEW_STARLETtypedef struct _crfdef {N int crfdef$$_fill_1; /* ARGUMENT COUNT */N unsigned int crf$l_ir_ctltbl; /* CRF CONTROL TABLE ADR */N unsigned int crf$l_ir_keyadr; /* KEY ADDRESS */N unsigned int crf$l_ir_refadr; /* REFERENCE INDICATOR ADR */N unsigned short int crf$w_ir_reflag; /* REFERENCE INDICATOR FLAGS */N char crfdef$$_fill_2 [2]; /* UNUSED */N unsigned char crf$b_ir_defind; /* DEFINITION INDICATOR */N char crfdef$$_fill_3 [3]; /* UNUSED */ } CRFDEF;#else /* __OLD_STARLET */struct crfdef {N int crfdef$$_fill_1;  /* ARGUMENT COUNT */N unsigned int crf$l_ir_ctltbl; /* CRF CONTROL TABLE ADR */N unsigned int crf$l_ir_keyadr; /* KEY ADDRESS */N unsigned int crf$l_ir_refadr; /* REFERENCE INDICATOR ADR */N unsigned short int crf$w_ir_reflag; /* REFERENCE INDICATOR FLAGS */N char crfdef$$_fill_2 [2]; /* UNUSED */N unsigned char crf$b_ir_defind; /* DEFINITION INDICATO R */N char crfdef$$_fill_3 [3]; /* UNUSED */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* CRF$INSRTKEY ARGUMENT LIST */N/* */ #ifdef __NEW_STARLETtypedef struct _crfdef1 {N int crfdef$$_fill_4; /* ARGUMENT COUNT  */N unsigned int crf$l_ik_ctltbl; /* CRF CONTROL TABLE ADR */N unsigned int crf$l_ik_keyadr; /* ADDRESS OF KEY */N unsigned int crf$l_ik_valadr; /* ADDRESS OF VALUE */N unsigned short int crf$w_ik_valflg; /* VALUE FLAGS */N char crfdef$$_fill_5 [2]; /* UNUSED */ } CRFDEF1;#else /* __OLD_STARLET */struct crfdef1 {N int crfdef$$_fill_4;  /* ARGUMENT COUNT */N unsigned int crf$l_ik_ctltbl; /* CRF CONTROL TABLE ADR */N unsigned int crf$l_ik_keyadr; /* ADDRESS OF KEY */N unsigned int crf$l_ik_valadr; /* ADDRESS OF VALUE */N unsigned short int crf$w_ik_valflg; /* VALUE FLAGS */N char crfdef$$_fill_5 [2]; /* UNUSED */ } ;%#endif /* #ifdef __NEW_STARLET */N /* */N/* CRF$OUT ARGUMENT LIST */N/* */ #ifdef __NEW_STARLETtypedef struct _crfdef2 {N int crfdef$$_fill_6; /* ARGUMENT COUNT */N unsigned int crf$l_ou_ctltbl; /* CRF CONTROL TABLE ADR */N unsigned int crf$l_ou_linwid; /* OUTPUT LINE WIDTH */N unsigned char crf$b_ou_pag1; /* ! LINES/PAGE 1 */N char crfdef$$_fill_7 [3]; /* UNUSED */N unsigned char crf$b_ou_sucpag; /* ! LINES/SUCCESSIVE PAGES */N char crfdef$$_fill_8 [3]; /* UNUSED */N unsigned char crf$b_ou_prtind; /* REF PRINT INDICATOR */N char crfdef$$_fill_9 [3]; /* UNUSED */ N unsigned char crf$b_ou_savind; /* SAVE INDICATOR */ } CRFDEF2;#else /* __OLD_STARLET */struct crfdef2 {N int crfdef$$_fill_6; /* ARGUMENT COUNT */N unsigned int crf$l_ou_ctltbl; /* CRF CONTROL TABLE ADR */N unsigned int crf$l_ou_linwid; /* OUTPUT LINE WIDTH */N unsigned char crf$b_ou_pag1; /* ! LINES/PAGE 1 */N char crfdef$$_fill_7 [3];  /* UNUSED */N unsigned char crf$b_ou_sucpag; /* ! LINES/SUCCESSIVE PAGES */N char crfdef$$_fill_8 [3]; /* UNUSED */N unsigned char crf$b_ou_prtind; /* REF PRINT INDICATOR */N char crfdef$$_fill_9 [3]; /* UNUSED */N unsigned char crf$b_ou_savind; /* SAVE INDICATOR */ } ;%#endif /* #ifdef __NEW_STARLET */N/*  */N/* CRF CONTROL TABLE OFFSETS */N/* */#define CRF$M_MULDEF 0x1 #ifdef __NEW_STARLETtypedef struct _crfdef3 {N unsigned int crf$l_hasht; /* HASH TABLE ADDRESS */N unsigned int crf$l_lastkey; /* LAST KEY LOOKED AT ADDRESS */ __union {N unsigned char cr f$b_keytype; /* TYPE OF KEY IN TABLE */ __struct {Y unsigned crf$v_binary : 1; /* OBSOLETE FIELD. RETAINED FOR COMPATIBLILTY */' unsigned crf$v_fill_2_ : 7;! } crf$r_keytype_bits; } crf$r_keytype_overlay; __union {N unsigned char crf$b_flags; /* MISC. FLAGS FOR FUTURE EXPANSION */ __struct {N unsigned crf$v_muldef : 1; /* Multi-Definers */' unsigned crf$v _fill_3_ : 7; } crf$r_fill_1_; } crf$r_fill_0_;N unsigned short int crf$w_errsts; /* SECONDARY ERROR STATUS CODE */S unsigned int crf$l_entries; /* NUMBER OF ENTRIES IN CROSS REFERENCE */N unsigned int crf$l_dynmem [2]; /* LISTHEAD OF DYNAMIC MEMORY */S unsigned int crf$l_maxblk; /* SIZE (IN BYTES) OF BLOCK TO ALLOCATE */S unsigned int crf$l_memexp; /* SIZE (IN PAGES) OF BLOCK TO ALLOCATE */N unsigned short int crf$w_ctltabver; /* VERSION OF CONTROL TABLE */V unsigned char crf$b_valtype; /* SYMBOL VALUE DATA TYPE (Ver 1 and later) */Z unsigned char crf$b_reftype; /* SYMBOL REFERENCE DATA TYPE (Ver 1 and later) */N int crfdef$$_fill_10 [7]; /* SPARES */N unsigned int crf$l_error; /* ERROR ROUTINE ADDRESS */N unsigned int crf$l_output; /* OUTPUT ROUTINE ADDRESS */N unsigned int crf$l _k1fmtbl; /* KEY1 FIELD FORMAT TBL ADR */N unsigned int crf$l_k2fmtbl; /* KEY2 FIELD FORMAT TBL ADR */N unsigned int crf$l_v1fmtbl; /* VAL1 FIELD FORMAT TBL ADR */N unsigned int crf$l_v2fmtbl; /* VAL2 FIELD FORMAT TBL ADR */N unsigned int crf$l_r1fmtbl; /* REF1 FIELD FORMAT TBL ADR */N unsigned int crf$l_r2fmtbl; /* REF2 FIELD FORMAT TBL ADR */ } CRFDEF3; #if !defined(__VAXC)9#defin e crf$b_keytype crf$r_keytype_overlay.crf$b_keytypeC#define crf$r_keytype_bits crf$r_keytype_overlay.crf$r_keytype_bits4#define crf$v_binary crf$r_keytype_bits.crf$v_binary-#define crf$b_flags crf$r_fill_0_.crf$b_flags=#define crf$v_muldef crf$r_fill_0_.crf$r_fill_1_.crf$v_muldef"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct crfdef3 {N unsigned int crf$l_hasht; /* HASH TABLE ADDRESS */N unsigned int crf$l_lastkey; /* LAS T KEY LOOKED AT ADDRESS */ __union {N unsigned char crf$b_keytype; /* TYPE OF KEY IN TABLE */ __struct {Y unsigned crf$v_binary : 1; /* OBSOLETE FIELD. RETAINED FOR COMPATIBLILTY */' unsigned crf$v_fill_2_ : 7;! } crf$r_keytype_bits; } crf$r_keytype_overlay; __union {N unsigned char crf$b_flags; /* MISC. FLAGS FOR FUTURE EXPANSION */ __struct {N unsigned crf$v_mulde f : 1; /* Multi-Definers */' unsigned crf$v_fill_3_ : 7; } crf$r_fill_1_; } crf$r_fill_0_;N unsigned short int crf$w_errsts; /* SECONDARY ERROR STATUS CODE */S unsigned int crf$l_entries; /* NUMBER OF ENTRIES IN CROSS REFERENCE */N unsigned int crf$l_dynmem [2]; /* LISTHEAD OF DYNAMIC MEMORY */S unsigned int crf$l_maxblk; /* SIZE (IN BYTES) OF BLOCK TO ALLOCATE */S unsigned int crf$l_memexp; /* SIZE (IN PAGES) OF BLOCK TO ALLOCATE */N unsigned short int crf$w_ctltabver; /* VERSION OF CONTROL TABLE */V unsigned char crf$b_valtype; /* SYMBOL VALUE DATA TYPE (Ver 1 and later) */Z unsigned char crf$b_reftype; /* SYMBOL REFERENCE DATA TYPE (Ver 1 and later) */N int crfdef$$_fill_10 [7]; /* SPARES */N unsigned int crf$l_error; /* ERROR ROUTINE ADDRESS */N unsigned int crf$l_output; /* OUTPUT ROUTINE ADDRESS */N unsigned int crf$l_k1fmtbl; /* KEY1 FIELD FORMAT TBL ADR */N unsigned int crf$l_k2fmtbl; /* KEY2 FIELD FORMAT TBL ADR */N unsigned int crf$l_v1fmtbl; /* VAL1 FIELD FORMAT TBL ADR */N unsigned int crf$l_v2fmtbl; /* VAL2 FIELD FORMAT TBL ADR */N unsigned int crf$l_r1fmtbl; /* REF1 FIELD FORMAT TBL ADR */N unsigned int crf$l_r2fmtbl; /* REF2 FIELD FORMAT TBL ADR */ } ; #if !defined(__VAXC)9#define crf$b_keytype crf$r_keytype_overlay.crf$b_keytypeJ#define crf$v_binary crf$r_keytype_overlay.crf$r_keytype_bits.crf$v_binary-#define crf$b_flags crf$r_fill_0_.crf$b_flags=#define crf$v_muldef crf$r_fill_0_.crf$r_fill_1_.crf$v_muldef"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CRFDEF_LOADED */ ww ˛/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CRFERRMSG.SDI;1  *//********************************************************************************************************************************//*** MODULE $CRFMSG ***/#ifndef __CRFMSG_LOADED#define __CRFMSG_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 unio n#else#define __union variant_union#endif#endif N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:40.30 */N/* */N/* */N/* */J/* VERSION: 'V04-004'  */N/* */N/* */N/* COPYRIGHT 1978-2004 HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P. */N/* */N/* RESTRICTED RIGHTS LEGEND */N/*  */N/* USE, DUPLICATION OR DISCLOSURE BY THE U.S. GOVERNMENT IS SUBJECT TO */N/* RESTRICTIONS AS SET FORTH IN SUBPARAGRAPH (C)(1)(II) OF THE RIGHTS */N/* IN TECHNICAL DATA AND COMPUTER SOFTWARE CLAUSE IN DFARS 252.227-7013. */N/* */N/* HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P */N/* 3000 HANOVER STREET */N/* PALO ALTO, CA 94304 */N/* U.S.A. */N/* */N/* RIGHTS FOR NON-DOD U.S. GOVERNMENT DEPARTMENTS AND AGENCIES ARE AS */N/* SET FORTH IN FAR 52.227-19(C)(1,2). */N/* UNDER VENDOR'S STANDARD COMMERCIAL LICENSE. */N/*  */N/* */N/* RETURN STATUS CODES FOR CROSS REFERENCE PROGRAM */N/* */N/* MODIFIED BY: */N/* */B/* V04-004 TMS0569 TODD SCHOELLER 27-DEC-2004 */B/* ADD NOFOOTNOTES. */N/* */B/* V04-003 TMS0567 TODD SCHOELLER 6-OCT-2004 */B/* ADD MULDEFFMT FOR MULTI-DEFINER SUPPORT */N/* */B/* V04-002 TMS0532 TODD SCHOELLER 16-OCT-2003 */B/* ADD CROPPING FOR CROPPING/FOOTNOTING SUPPORT. */N/*  */B/* V04-001 TMS0294 TODD SCHOELLER 4-NOV-1994 */B/* ADD ARGCOUNT FOR ARGUMENT COUNT CHECKING. */N/* */A/* V02-002 BLS0156 BENN SCHREIBER 1-MAR-1982 */B/* REMOVE UNUSED MESSAGES */N/* */ A/* V02-001 BLS0123 BENN SCHREIBER 19-DEC-1981 */B/* CHANGE TEXT OF FAOFAIL */N/* */N/* */@/* SUCCESS CODES (SEVERITY LEVEL 1) */N/* */#define CREF$_FACILITY 101#define CRF$_SUCCESS 6651905#def ine CRF$_KEYPRVENTR 6651913#define CRF$_KEY1STENTR 6651921#define CRF$_REFPRVENTR 6651929#define CRF$_UNUSERR 6651937#define CRF$_CROP 6651945N/* */E/* SEVERE ERROR CODES (SEVERITY LEVEL 2) */N/* */#define CRF$_UNUERR1 6651986#define CRF$_UNUERR2 6651994#define CRF$_UNUERR3 6652002#define CRF$_UNUERR4 6652010#define CRF$_UNUERR5 6652018#define CRF$_UNUERR6 6652026#define CRF$_UNUERR7 6652034#define CRF$_NO_OUTRTN 6652042#define CRF$_LINELNG 6652050#define CRF$_FAOFAIL 6652058#define CRF$_UNUERR8 6652066#define CRF$_BADTYPE 6652074#define CRF$_ARGCOUNT 6652082#define CRF$_MULDEFFMT 6652090 #define CRF$_NOFOOTNOTES 6652098 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CRFMSG_LOADED */ ww+˛/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//***************************************** ***************************************************************************************/!/*** MODULE CSHDEF IDENT X-1 ***/#ifndef __CSHDEF_LOADED#define __CSHDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_un ion#endif#endif N/* $SCHED function codes */N#define CSH$_READ_ALL 23 /* Read data on all processes */N#define CSH$_READ_NEW 24 /* Read data on new processes */N#define CSH$_SET_CLASS 25 /* Place process(es) into class(es) */#define CSH$_RES1 26#define CSH$_RES2 27#define CSH$_RES3 28#define CSH$_RES4 29N#define CSH$_SET_NEW 30 /* Define this process as "new"  */N#define CSH$_SET_TIMEOUT 31 /* Set deadman timer */#define CSH$_RES5 32#define CSH$_RES6 33#define CSH$_RES7 34#define CSH$_RES8 35N#define CSH$_READ_QUANT 36 /* Read per-class quanta remaining */N#define CSH$_SET_QUANT 37 /* Define per-class quanta */#define CSH$_RES9 38#define CSH$_RESA 39#define CSH$_RESB 40#define CSH$_RESC 41N#define CSH$_SET_ATTN_AST 42 /* Establish attention AST */#d efine CSH$_RSED 43#define CSH$_RESE 44#define CSH$_RESF 45#define CSH$_RES0 46N#define CSH$_CLEAR_ATTN_AST 47 /* Clear attention AST */#define CSH$_MAX_SCHED_FUNC 48N/* AST reason mask */N#define CSH$V_NEW_PROC 1 /* Possible new process */N/* CSHC -- Class ScHeduler Class block */N/*  */N/* Used to communicate from user to system, defining process/class mapping */#define CSHC$K_LENGTH 8#define CSHC$C_LENGTH 8 #ifdef __NEW_STARLETtypedef struct _cshc {N unsigned int cshc$l_epid; /* EPID of target process */O short int cshc$w_class; /* Class number, 0-N, %X'FFFF' means */N/* `Take out of class scheduling' */N unsigned short int cshc$w_windfall; /* Windfall ticks to grant  */ } CSHC;#else /* __OLD_STARLET */typedef struct _cshc {N unsigned int cshc$l_epid; /* EPID of target process */O short int cshc$w_class; /* Class number, 0-N, %X'FFFF' means */N/* `Take out of class scheduling' */N unsigned short int cshc$w_windfall; /* Windfall ticks to grant */ } cshc;%#endif /* #ifdef __NEW_STARLET */N/* CSHP -- Class ScHeduler data block for Processe s */N/* */N/* Used to communicate from system to user, showing various characteristics */N/* of processes. */#define CSHP$K_LENGTH 24#define CSHP$C_LENGTH 24 #ifdef __NEW_STARLETtypedef struct _cshp {N unsigned int cshp$l_status; /* Copy of PCB$L_STS */N unsigned short int cshp$w_pix; /* Process ind ex slot */N char cshp$b_pri; /* Current priority (internal) */N char cshp$b_prib; /* Current base priority (internal) */N unsigned int cshp$l_epid; /* The official PID */N char cshp$t_account [8]; /* Account string from PCB */N unsigned int cshp$l_cputim; /* CPU time charged */ } CSHP;#else /* __OLD_STARLET */typedef struct _cshp {N unsigned int cshp$l_status; /* Copy of PCB$L_STS */N unsigned short int cshp$w_pix; /* Process index slot */N char cshp$b_pri; /* Current priority (internal) */N char cshp$b_prib; /* Current base priority (internal) */N unsigned int cshp$l_epid; /* The official PID */N char cshp$t_account [8]; /* Account string from PCB */N unsigned int cshp$l_cputim;  /* CPU time charged */ } cshp;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CSHDEF_LOADED */ wwK̛/******************************************************* *************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $CSTDEF ***/#ifndef __CSTDEF_LOADED#define __CSTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* */N/* Constants defining single-transition operations  */N/* */#define CST$K_CPU_STOP 1#define CST$K_CPU_MIGRATE 2#define CST$K_CPU_START 3#define CST$K_CPU_ASSIGN 4#define CST$K_CPU_DEASSIGN 5#define CST$K_CPU_FAILOVER 6#define CST$K_CPU_POWER_OFF 7#define CST$K_CPU_POWER_ON 8N/* */N/* Constants defining multiple operation masks. The starting */N/* position of these  values must be in the upper word to save */N/* space for future single-operation codes */N/* */#define CST$M_RESERVED1 0xFF#define CST$M_CPU_STOP 0x100#define CST$M_CPU_MIGRATE 0x200#define CST$M_CPU_START 0x400#define CST$M_CPU_ASSIGN 0x800!#define CST$M_CPU_DEASSIGN 0x1000!#define CST$M_CPU_FAILOVER 0x2000"#define CST$M_CPU_POWER_OFF 0x4000!#define CST$M_CPU_POWER_ON 0x8000 #ifdef __NEW_STARLETtypedef struct _cst_mask { __struct {% unsigned cst$v_reserved1 : 8;$ unsigned cst$v_cpu_stop : 1;' unsigned cst$v_cpu_migrate : 1;% unsigned cst$v_cpu_start : 1;& unsigned cst$v_cpu_assign : 1;( unsigned cst$v_cpu_deassign : 1;( unsigned cst$v_cpu_failover : 1;) unsigned cst$v_cpu_power_off : 1;( unsigned cst$v_cpu_power_on : 1; } cst$r_cst_mask; } CST_MASK; #if !defined(__VAXC)6#define cst$v_reserved1 cst$r_cst_mask.cst$v_reserved14#define cst$v_cpu_stop cst$r_cst_mask.cst$v_cpu_stop:#define cst$v_cpu_migrate cst$r_cst_mask.cst$v_cpu_migrate6#define cst$v_cpu_start cst$r_cst_mask.cst$v_cpu_start8#define cst$v_cpu_assign cst$r_cst_mask.cst$v_cpu_assign<#define cst$v_cpu_deassign cst$r_cst_mask.cst$v_cpu_deassign<#define cst$v_cpu_failover cst$r_cst_mask.cst$v_cpu_failover>#define cst$v_cpu_power_off cst$r_cst_mask.cst$v_cpu_power_off<#define cst$v_cpu_power_on cst$r_cst_mask.cst$v_cpu_power_on"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _cst_mask { __struct {% unsigned cst$v_reserved1 : 8;$ unsigned cst$v_cpu_stop : 1;' unsigned cst$v_cpu_migrate : 1;% unsigned cst$v_cpu_start : 1;& unsigned cst$v_cpu_assign : 1;( unsigned cst$v_cpu_deassign : 1;( unsigned cst$v_cpu_failover : 1;) unsigned cst$v_cpu_power_off : 1;( unsigned cst$v_cpu_power_on : 1; } cst$r_cst_mask; } cst_mask; #if !defined(__VAXC)6#define cst$v_reserved1 cst$r_cst_mask.cst$v_reserved14#define cst$v_cpu_stop cst$r_cst_mask.cst$v_cpu_stop:#define cst$v_cpu_migrate cst$r_cst_mask.cst$v_cpu_migrate6#define cst$v_cpu_start cst$r_cst_mask.cst$v_cpu_start8#define cst$v_cpu_assign cst$r_cst_mask.cst$v_cpu_assign<#define cst$v_cpu_deassign cst$r_cst_mask.cst$v_cpu_deassign<#define cst$v_cpu_failover cst$r_cst_mask.cst$v_cpu_fa ilover>#define cst$v_cpu_power_off cst$r_cst_mask.cst$v_cpu_power_off<#define cst$v_cpu_power_on cst$r_cst_mask.cst$v_cpu_power_on"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* Constants defining target software nodes for reassignment */N/* */#define CST$K_PARTITION -1#define CST$K_COMMUNITY -2#define CST$K_HARD_PARTITION -3#define CST$K_SW_ROOT -4N/* */N/* Constants defining CPU types */N/* */#define CST$K_ANY_OWNED_CPU -1#define CST$K_ANY_ACTIVE_CPU -2 #define CST$K_ANY_STOPPED_CPU -3 #define CST$K_ANY_UNOWNED_CPU -4N/*  */N/* Constants defining flag parameter characteristics */N/* */*#define CST$M_CPU_DEFAULT_CAPABILITIES 0x1##define CST$M_CPU_ALLOW_ORPHANS 0x2!#define CST$M_CPU_DECONFIGURE 0x4 #ifdef __NEW_STARLETtypedef struct _cst_flags { __struct {4 unsigned cst$v_cpu_default_capabilities : 1;- unsigned cst$v_cpu_allow_orphans : 1;+ unsigned cst$v_cpu_deconfigure : 1;% unsigned cst$v_fill_112_ : 5; } cst$r_cst_flags; } CST_FLAGS; #if !defined(__VAXC)U#define cst$v_cpu_default_capabilities cst$r_cst_flags.cst$v_cpu_default_capabilitiesG#define cst$v_cpu_allow_orphans cst$r_cst_flags.cst$v_cpu_allow_orphansC#define cst$v_cpu_deconfigure cst$r_cst_flags.cst$v_cpu_deconfigure"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _cst_flags { __struct {4 unsigned cst$v_cpu_default_capabilities : 1;- unsigned cst$v_cpu_allow_orphans : 1;+ unsigned cst$v_cpu_deconfigure : 1;% unsigned cst$v_fill_112_ : 5; } cst$r_cst_flags; } cst_flags; #if !defined(__VAXC)U#define cst$v_cpu_default_capabilities cst$r_cst_flags.cst$v_cpu_default_capabilitiesG#define cst$v_cpu_allow_orphans cst$r_cst_flags.cst$v_cpu_allow_orphansC#define cst$v_cpu_deconfigure cst$r_cst_flags.cst$v_cpu_deconfigure"#endif /* #if !defined(__VAXC) */ %#endif  /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CSTDEF_LOADED */ wwU͛/*************************************************************************************************************************** *****/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CVT$ROUTINES.SDI;1 *//********************************************************************************************************************************//*** MODULE cvt$routines ***/#ifndef __CVT_ROUTINES_LOADED#define __CVT_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 O/*************************************************************************** */O/* */O/* Copyright (c) 1993,1994 */O/* by DIGITAL Equipment Corporation, Maynard, Mass. */O/* */O/* This software is furnished under a license and may be used and copied */O/* only in accordance with the terms of such license and with the */O/* inclusion of the above copyright notice. This software or any other */O/* copies thereof may not be provided or otherwise made available to any */O/* other person. No title to and ownership of the software is hereby */O/* transferred. */O/* */O/* The information in this software is subject to change without notice */O/* and should not be construed as a commitment by DIGITAL Equipment */O/* Corporation. */O/*  */O/* DIGITAL assumes no responsibility for the use or reliability of its */O/* software on equipment which is not supplied by DIGITAL. */O/* */O/*************************************************************************** */N/* CVT$CONVERT_FLOAT */N/*  */N/* Convert floating point data types. */N/* */N/* The CVT$CONVERT_FLOAT converts floating point data types to other */N/* supported floating point data types. */N/* */-#define cvt$convert_float CVT$CONVERT_FLOAT #ifdef __NEW_STARLETunsigned int cvt$convert_float( unsigned int *input_value, unsigned int input_type_code, unsigned int *output_value, unsigned int output_type_code, unsigned int options);#else /* __OLD_STARLET */1unsigned int cvt$convert_float(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#define cvt$ftof CVT$FTOF #ifdef __NEW_STARLET int cvt$ftof( unsigned int *input_value, int input_type_code, unsigned int *output_value, int output_type_code, int options);#else /* __OLD_STARLET */int cvt$ftof(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __CVT_ROUTINES_LOADED */ ww+@Λ/*********************************************************************************** *********************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CVTDEF.SDI;1 *//********************************************************************************************************************************//*** MODULE $cvtdef ***/#ifndef __CVTDEF_LOADED#define __CVTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N#define CVT$K_VAX_F 0 /* VAX F Floating point data */N#define CVT$K_VAX_D 1 /* VAX D Floating point data */N#define CVT$K_VAX_G 2 /* VAX G Floating point data */N#define CVT$K_VAX_H 3 /* VAX H Floating point data */N#define CVT$K_IEEE_S 4 /* IEEE S Floating point data */N#define CVT$K_IEEE_T 5 /* IEEE T Floating point data */N#define CVT$K_IBM_LONG 6 /* IBM Long Floating point data */N#define CVT$K_IBM_SHORT 7 /* IBM Short Floating point data */N#define CVT$K_CRAY 8 /* Cray Floating point data */N#define CVT$K_IEEE_X 9 /* IEEE X Floating point data */N#define CVT$K_BIG_ENDIAN_IEEE_S 10 /* IEEE S Floating point data */N#define CVT$K_BIG_ENDIAN_IEEE_T 11 /* IEEE S Floating point data */N#define CVT$K_BIG_ENDIAN_IEEE_X 12 /* IEEE S Floating point data */#define CVT$K_CRAY_SINGLE 8N/* */N/* Function Return Status Values: */N/*  */#define CVT$K_NORMAL 0$#define CVT$M_INVALID_INPUT_TYPE 0x1%#define CVT$M_INVALID_OUTPUT_TYPE 0x2 #define CVT$M_INVALID_OPTION 0x4!#define CVT$M_RESULT_INFINITE 0x8&#define CVT$M_RESULT_DENORMALIZED 0x10(#define CVT$M_RESULT_OVERFLOW_RANGE 0x20)#define CVT$M_RESULT_UNDERFLOW_RANGE 0x40&#define CVT$M_RESULT_UNNORMALIZED 0x80"#define CVT$M_RESULT_INVALID 0x100##define CVT$M_RESULT_OVERFLOW 0x200$#define CVT$M_RESULT_UNDERFLOW 0x400"#define CVT$M_RESULT_INEXACT 0x800 #ifdef __NEW_STARLET%typedef struct _cvt$r_return_status {* unsigned cvt$v_invalid_input_type : 1;+ unsigned cvt$v_invalid_output_type : 1;& unsigned cvt$v_invalid_option : 1;' unsigned cvt$v_result_infinite : 1;+ unsigned cvt$v_result_denormalized : 1;- unsigned cvt$v_result_overflow_range : 1;. unsigned cvt$v_result_underflow_range : 1;+ unsigned cvt$v_result_unnormalized : 1;& unsigned cvt$v_result_invalid : 1;' unsigned cvt$v_result_overflow : 1;( unsigned cvt$v_result_underflow : 1;& unsigned cvt$v_result_inexact : 1; unsigned cvt$v_fill_0_ : 4; } CVT$R_RETURN_STATUS;#else /* __OLD_STARLET */struct cvt$r_return_status {* unsigned cvt$v_invalid_input_type : 1;+ unsigned cvt$v_invalid_output_type : 1;& unsigned cvt$v_invalid_option : 1;' unsigned cvt$v_result_infinite : 1;+ unsigned cvt$v_result_denormalized : 1;- unsigned cvt$v_result_overflow_range : 1;. unsigned c vt$v_result_underflow_range : 1;+ unsigned cvt$v_result_unnormalized : 1;& unsigned cvt$v_result_invalid : 1;' unsigned cvt$v_result_overflow : 1;( unsigned cvt$v_result_underflow : 1;& unsigned cvt$v_result_inexact : 1; unsigned cvt$v_fill_0_ : 4; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Conversion Options: */N/*  */"#define CVT$M_ROUND_TO_NEAREST 0x1#define CVT$M_TRUNCATE 0x2#define CVT$M_ROUND_TO_POS 0x4#define CVT$M_ROUND_TO_NEG 0x8#define CVT$M_VAX_ROUNDING 0x10#define CVT$M_BIG_ENDIAN 0x20 #define CVT$M_ERR_UNDERFLOW 0x40(#define CVT$M_FORCE_INVALID_TO_ZERO 0x80(#define CVT$M_FORCE_DENORM_TO_ZERO 0x100*#define CVT$M_FORCE_INF_TO_MAX_FLOAT 0x200,#define CVT$M_FORCE_ALL_SPECIAL_VALUES 0x400-#define CVT$M_ALLOW_OVRFLW_RANGE_VALUES 0x 800.#define CVT$M_ALLOW_UDRFLW_RANGE_VALUES 0x1000.#define CVT$M_ALLOW_UNNORMALIZED_VALUES 0x2000#define CVT$M_REPORT_ALL 0x4000#define CVT$M_SPARE2 0xFFFF8000 #ifdef __NEW_STARLET*typedef struct _cvt$r_conversion_options {N/* */N/* Rounding Mode Options: */N/* */( unsigned cvt$v_round_t o_nearest : 1; unsigned cvt$v_truncate : 1;$ unsigned cvt$v_round_to_pos : 1;$ unsigned cvt$v_round_to_neg : 1;$ unsigned cvt$v_vax_rounding : 1;N/* */N/* Options exclusive to CVT$CONVERT_FLOAT */N/* */" unsigned cvt$v_big_endian : 1;% unsigned cvt$v_err_underflow : 1;N/*  */N/* Forcing Results Options: */N/* */- unsigned cvt$v_force_invalid_to_zero : 1;, unsigned cvt$v_force_denorm_to_zero : 1;. unsigned cvt$v_force_inf_to_max_float : 1;0 unsigned cvt$v_force_all_special_values : 1;N/* */N/* Allowing Special Results Options: */N/* */1 unsigned cvt$v_allow_ovrflw_range_values : 1;1 unsigned cvt$v_allow_udrflw_range_values : 1;1 unsigned cvt$v_allow_unnormalized_values : 1;N/* */N/* Status Selection Options: */N/*  */" unsigned cvt$v_report_all : 1;N/* */N/* Everything else. */N/* */ unsigned cvt$v_spare2 : 17; } CVT$R_CONVERSION_OPTIONS;#else /* __OLD_STARLET */!struct cvt$r_conversion_options {N/*  */N/* Rounding Mode Options: */N/* */( unsigned cvt$v_round_to_nearest : 1; unsigned cvt$v_truncate : 1;$ unsigned cvt$v_round_to_pos : 1;$ unsigned cvt$v_round_to_neg : 1;$ unsigned cvt$v_vax_rounding : 1;N/* */N/* Options exclusive to CVT$CONVERT_FLOAT  */N/* */" unsigned cvt$v_big_endian : 1;% unsigned cvt$v_err_underflow : 1;N/* */N/* Forcing Results Options: */N/* */- unsigned cvt$v_force_invalid_to_zero : 1;, unsigned cvt$v_force_denorm_to_zero : 1;. unsigned cvt$v_force_inf_to_max_float : 1;0 unsigned cvt$v_force_all_special_values : 1;N/* */N/* Allowing Special Results Options: */N/* */1 unsigned cvt$v_allow_ovrflw_range_values : 1;1 unsigned cvt$v_allow_udrflw_range_values : 1;1 unsigned cvt$v_allow_unnormalized_values : 1;N/*  */N/* Status Selection Options: */N/* */" unsigned cvt$v_report_all : 1;N/* */N/* Everything else. */N/* */ unsigned cvt$v_spare2 : 17; } ;%#endif /* #ifdef __NEW_STARLET */&#define CVT$M_ALT_ROUND_TO_NEAREST 0x1#define CVT$M_ROUND_TO_ZERO 0x2"#define CVT$M_ALT_ROUND_TO_POS 0x4"#define CVT$M_ALT_ROUND_TO_NEG 0x8"#define CVT$M_BIASED_ROUNDING 0x10#define CVT$M_SPARE3 0xFFFFFFE0 #ifdef __NEW_STARLET.typedef struct _cvt$r_alt_conversion_options {N/* */N/* Rounding Mode Options:  */N/* */, unsigned cvt$v_alt_round_to_nearest : 1;% unsigned cvt$v_round_to_zero : 1;( unsigned cvt$v_alt_round_to_pos : 1;( unsigned cvt$v_alt_round_to_neg : 1;' unsigned cvt$v_biased_rounding : 1; unsigned cvt$v_spare3 : 27;# } CVT$R_ALT_CONVERSION_OPTIONS;#else /* __OLD_STARLET */%struct cvt$r_alt_conversion_options {N/*  */N/* Rounding Mode Options: */N/* */, unsigned cvt$v_alt_round_to_nearest : 1;% unsigned cvt$v_round_to_zero : 1;( unsigned cvt$v_alt_round_to_pos : 1;( unsigned cvt$v_alt_round_to_neg : 1;' unsigned cvt$v_biased_rounding : 1; unsigned cvt$v_spare3 : 27; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CVTDEF_LOADED */ ww[Λ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46  by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $CVTFNMDEF ***/#ifndef __CVTFNMDEF_LOADED#define __CVTFNMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* String characteristic flags for SYS$CVT_FILENAME */N/* */#define CVTFNM$M_WORD_CHARS 0x1"#define CVTFNM$M_NO_DELIMITERS 0x2!#define CVTFNM$M_FORCE _UPCASE 0x4 #ifdef __NEW_STARLETtypedef struct _inoutflags {N unsigned cvtfnm$v_word_chars : 1; /* characters are word-width */[ unsigned cvtfnm$v_no_delimiters : 1; /* string does/should contain no fnm delimiters */O unsigned cvtfnm$v_force_upcase : 1; /* do upcasing (ACPQIO-to-RMS onoly) */! unsigned cvtfnm$$_fill1 : 29; } INOUTFLAGS;#else /* __OLD_STARLET */struct inoutflags {N unsigned cvtfnm$v_word_chars : 1; /* characters are word-width  */[ unsigned cvtfnm$v_no_delimiters : 1; /* string does/should contain no fnm delimiters */O unsigned cvtfnm$v_force_upcase : 1; /* do upcasing (ACPQIO-to-RMS onoly) */! unsigned cvtfnm$$_fill1 : 29; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Control codes for SYS$CVT_FILENAME */N/*  */ #define CVTFNM$C_RMS_TO_ACPQIO 1 #define CVTFNM$C_ACPQIO_TO_RMS 2 #define CVTFNM$K_RMS_TO_ACPQIO 1 #define CVTFNM$K_ACPQIO_TO_RMS 2  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CVTFNMDEF_LOADED */ ww{ϛ/*** *****************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]CVTMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $CVTMSG ***/#ifndef __CVTMSG_LOADED#define __CVTMSG_LOADED 1 G#pragma __nostandard  /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:39.86 */N/*  */N/* */Q/***************************************************************************** */Q/** * */Q/** COPYRIGHT (C) 1991 * */Q/** BY DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS. * */Q/**  * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */Q/** TRANSFERRED.  * */Q/** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */Q/** CORPORATION. * */Q/** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */Q/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * */Q/** * */Q/***************************************************************************** */Q/*============================================================================ */N/* */A/* FILE: CVTMSG.MSG  */N/* */D/* VERSION: 1-001 */N/* */E/* FACILITY: CVTRTL - VMS CONVERSION RUN TIME LIBRARY */N/* */E/* ABSTRACT: MESSAGE DEFINITIONS FOR THE CVT FACILITY. */N/*  */C/* AUTHOR: JEFFREY S. YOUNG */N/* */I/* CREATION DATE: 25-JUN-1991 */N/* */N/* MODIFICATION HISTORY: */Q/* -------------------------------------------------------------------------- */H/* 1-001 25-JUN-1991 JSY ORIGINAL VERSION. */N/* */Q/*============================================================================ */Q/*============================================================================ */N/* */N/* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */N/* */I/* CVT$_ABCMNOXYZ */N/* */O/* IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */Q/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR */N/* MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS. */N/*  */P/* THE NAMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD APPEAR */N/* IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION. */N/* */Q/*============================================================================ */N/* */#define CVT$_FACILITY 1530#define CVT$_NORMAL 100302857 #define CVT$_INPCONERR 100302866 #define CVT$_INVINPTYP 100302874#define CVT$_INVOPT 100302882 #define CVT$_INVOUTTYP 100302890#define CVT$_INVVAL 100302898#define CVT$_NEGINF 100302906 #define CVT$_OUTCONERR 100302914#define CVT$_OVERFLOW 100302922#define CVT$_POSINF 100302930 #define CVT$_UNDERFLOW 100302938 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __CVTMSG_LOADED */ wwxϛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//*********************************** *********************************************************************************************//*** MODULE $DCDEF ***/#ifndef __DCDEF_LOADED#define __DCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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#e ndif#endif N/* */N/* DEVICE ADAPTER, CLASS, AND TYPE DEFINITIONS */N/* */N/* */N/* DEFINE ADAPTER TYPES */N/* When adding a new adapter type, make sure a corresponding entry is added */R/* to the ADP_TBL_UP and ADP_TBL_DWN tables in any affected [SYSLOA]ERRSUB*.MAR */N/* modules. */N/* */P/**************************************************************************** */N/* FURTHERMORE, when altering the list of AT$_ symbols, you MUST update the */N/* module [MANAGE]SMIIOGEN-UTILS.C. */P/**************************************************************************** */N/*DEFINE ADAPTER TYPES */N#define AT$_MBA 0 /* MASSBUS ADAPTER */N#define AT$_UBA 1 /* UNIBUS ADAPTER */N#define AT$_DR 2 /* DR32 ADAPTER */N#define AT$_MPM 3 /* MULTI-PORT MEMORY */N#define AT$_CI 4 /* CI BUS  */N#define AT$_NULL 5 /* NULL (SOFTWARE) ADAPTER */N#define AT$_BDA 6 /* BI DISK ADAPTER(KDB50) */N#define AT$_DMB32 7 /* DMB32 ADAPTER */N#define AT$_DRB32 8 /* DRB32 ADAPTER */N#define AT$_BVP 9 /* BVP GENERIC ADAPTER */N#define AT$_BVP_SSP 10 /* BVP STORAGE SYSTEMS PORT */ N#define AT$_BVP_NIP 11 /* BVP NI PORT */N#define AT$_KA410 12 /* VAXstar system */N#define AT$_KA420 12 /* PVAX/CVAXstar system */N#define AT$_GENBI 13 /* Generic BI device */N#define AT$_NBI 14 /* NBIB on BI. */#define AT$_DISK9 15#define AT$_XBI 16#define AT$_TERM9 17#define AT$_TAPE9 18#define AT$_PRTR9 19#define AT$_SFUN9 20#define AT$_USER9 21#define AT$_MBUSIO 22#define AT$_MBUSGFX 23#define AT$_KA640 24#define AT$_XWATCH 25#define AT$_XBI_PLUS_XMI 26#define AT$_XBI_PLUS_BI 27#define AT$_XJA 28#define AT$_HSX50 29#define AT$_KDM70 29#define AT$_NI 30#define AT$_KA43 31#define AT$_SJA 32#define AT$_GENXMI 33#define AT$_KA440 34#define AT$_KA46 34#define AT$_KA520 35#define AT$_XSA 36#define AT$_XZA 37#define AT$_XZA_SCSI 37#define AT$_VME 38#define AT$_IOP 39#define AT$_LAMB 40#define AT$_KA49 41#define AT$_TC 42#define AT$_X1303 43#define AT$_XMI 44#define AT$_FBUS 45#define AT$_COREIO 46#define AT$_KA0202 47#define AT$_KA0202_LBUS 48#define AT$_KA0302 49#define AT$_KA0402 50#define AT$_TURBO_SCSI 51#define AT$_CIMNA 52#define AT$_XZA_DSSI 53#define AT$_DEMNA 54#define AT$_FFA 55#define AT$_KA0602 56#define AT$_EISA 57#define AT$_VTI_COMBO 58#define AT$_KA0702 64#define AT$_TC_MULTI_NI 65#define AT$_AHA_1742A 66#define AT$_KA0902 67#define AT$_PCI 68#define AT$_KA0802 69 #define AT$_MULTIFUNCTION_PCI 70#define AT$_ISA 71#define AT$_XBUS 72#define AT$_KA0C05 73#define AT$_KA0E04 74#define AT$_KA0D02 75#define AT$_THIRDPARTY0 76#define AT$_THIRDPARTY1 77#define AT$_THIRDPARTY2 78#define AT$_THIRDPARTY3 79#define AT$_THIRDPARTY4 80#define AT$_THIRDPARTY5 81#define AT$_THIRDPARTY6 82#define AT$_THIRDPARTY7 83 #define AT$_MULTIFUNCTION_ISA 84#define AT$_KA0F05 85#define AT$_LMCP 86#define AT$_TIOP 87#define AT$_ITIOP 88#define AT$_KA1102 89#define AT$_KA1504 90#define AT$_HPC 91#define AT$_PCMCIA 92#define AT$_KA1402 93#define AT$_KA0905 94#define AT$_KA1802 95#define AT$_KA1805 96#define AT$_MEMCHAN 97#define AT$_KA1B02 98#define AT$_KA1B05 99#define AT$_KA1A05 100#define AT$_KA1605 101#define AT$_MC_BUS 102#define AT$_KA1105 103#define AT$_KA1702 104#define AT$_KA1E07 105#define AT$_KA2005 106#define AT$_KA2405 107#define AT$_KA2208 108#define AT$_KA2508 109#define AT$_KA2308 110#define AT$_WFQBB 111#define AT$_WFIOP 112#define AT$_WFPCA 113#define AT$_KA2608 114#define AT$_KA270F 115#define AT$_IO7 116#define AT$_I2000 117 #define AT$_ACPI_IA64_PLTFRM 118!#define AT$_ACPI_IA64_CONTAIN 119 #define AT$_ACPI_IA64_SYSBUS 120!#define AT$_ACPI_IA64_BUSLESS 121#define AT$_ACPI_IA64_IOC 122#define AT$_PCIE 123N/*  */N/* DEFINE DEVICE CLASSES */N/* */N/*DEFINE DEVICE CLASSES */N#define DC$_ANY 0 /* ANY */N/* NOTE: This "special" device class */N/* is only used by [SYS]SYSGETDVI.MAR for  */N/* item code validation. It should not be */N/* used for anything else, especially for */N/* device creation by driver writers! */N#define DC$_DISK 1 /* DISK */N#define DC$_TAPE 2 /* TAPES */P#define DC$_SCOM 32 /* SYNCHRONOUS COMMUNICATIONS DEVICES */N#define DC$_CARD 65 /* CARD READER */N#define DC$_TERM 66 /* TERMINAL */N#define DC$_LP 67 /* LINE PRINTER */N#define DC$_WORKSTATION 70 /* WORKSTATIONS */N#define DC$_REALTIME 96 /* REAL-TIME */N#define DC$_DECVOICE 97 /* DECVOICE products */N#define DC$_AUDIO 98  /* General audio */N#define DC$_VIDEO 99 /* General video */N#define DC$_BUS 128 /* BUSES, E.G, CI */N#define DC$_MAILBOX 160 /* MAILBOX */N#define DC$_REMCSL_STORAGE 170 /* REMOTE CONSOLE STORAGE */N#define DC$_MISC 200 /* MISCELLANEOUS DEVICES */N/*  */N/* DEFINE DEVICE TYPES */N/* */N/* */N/* DISK DEVICES */N/* */N#define DT$_RK06 1 /*RK06 DISK */N#define DT$_RK07 2 /*RK07 DISK */N#define DT$_RP04 3 /*RP04 DISK */N#define DT$_RP05 4 /*RP05 DISK */N#define DT$_RP06 5 /*RP06 DISK */N#define DT$_RM03 6 /*RM03 DISK */N#define DT$_RP07 7 /*RP07 DISK */N#define DT$_RP07HT 8  /*RP07 DISK WITH HEAD/TRACK */N#define DT$_RL01 9 /*RL01 DISK */N#define DT$_RL02 10 /*RL02 DISK */N#define DT$_RX02 11 /*RX02 DISK */N#define DT$_RX04 12 /*RX04 DISK */N#define DT$_RM80 13 /*RM80 DISK */N#define DT$_TU58 14 /*TU58  */N#define DT$_RM05 15 /*RM05 DISK */N#define DT$_RX01 16 /*RX01 DISK */N#define DT$_ML11 17 /*ML11 disk */N#define DT$_RB02 18 /*R02 ON RB730 */N#define DT$_RB80 19 /*R80 ON RB730 */N#define DT$_RA80 20 /*R80 ON INTELLIGENT CONTROLLER */N#define DT$_RA81 21 /*R81 ON INTELLIGENT CONTROLLER */N#define DT$_RA60 22 /*PINON ON INTELLIGENT CONTROLLER */N#define DT$_RZ01 23 /*AZTEC REMOVABLE (Old name) */N#define DT$_RC25 23 /*AZTEC REMOVABLE (New name) */N#define DT$_RZF01 24 /*AZTEC FIXED (Old name) */N#define DT$_RCF25 24 /*AZTEC FIXED (New name) */N#define DT$_RD51 25  /*RD51 FIXED DISK DRIVE */N#define DT$_RX50 26 /*RX50 FLOPPY DISK DRIVE */N#define DT$_RD52 27 /*RD52 FIXED DISK DRIVE */N#define DT$_RD53 28 /*RD53 FIXED DISK DRIVE */N#define DT$_RD26 29 /*RD26 FIXED DISK DRIVE */N#define DT$_RA82 30 /*RA82 FIXED DISK DRIVE */N#define DT$_RD31 31 /*RD31 FIXED DISK DRIVE */N#define DT$_RD54 32 /*RD54 FIXED DISK DRIVE */N#define DT$_CRX50 33 /*Console RX50 */N#define DT$_RRD50 34 /*RRD50 */N#define DT$_GENERIC_DU 35 /*Brand X Disk */N#define DT$_RX33 36 /*RX33 DISKETTE DRIVE */N#define DT$_RX18 37 /*RX18 */#define DT$_RA70 38#define DT$_RA90 39#define DT$_RD32 40#define DT$_DISK9 41#define DT$_RX35 42#define DT$_RF30 43#define DT$_RF70 44#define DT$_RF71 44#define DT$_RD33 45#define DT$_ESE20 46#define DT$_TU56 47#define DT$_RZ22 48#define DT$_RZ23 49#define DT$_RZ24 50#define DT$_RZ55 51#define DT$_RRD40S 52#define DT$_RRD40 53#define DT$_GENERIC_DK 54#define DT$_RX23 55#define DT$_RF31 56#define DT$_RF72 57#define DT$_RAM_DISK 58#define DT$_RZ25 59#define DT$_RZ56 60#define DT$_RZ57 61#define DT$_RX23S 62#define DT$_RX33S 63#define DT$_RA92 64#define DT$_SSTRIPE 65#define DT$_RZ23L 66#define DT$_RX26 67#define DT$_RZ57I 68#define DT$_RZ31 69#define DT$_RZ58 70#define DT$_SCSI_MO 71#define DT$_RWZ01 71#define DT$_RRD42 72#define DT$_CD_LOADER_1 73#define DT$_ESE25 74#define DT$_RFH31 75#define DT$_RFH72 76#define DT$_RF73 77#define DT$_RFH73 78#define DT$_RA72 79#define DT$_RA71 80#def ine DT$_RAH72 80#define DT$_RF32 81#define DT$_RF35 81#define DT$_RFH32 82#define DT$_RFH35 82#define DT$_RFF31 83#define DT$_RF31F 83#define DT$_RZ72 84#define DT$_RZ73 85#define DT$_RZ35 86#define DT$_RZ24L 87#define DT$_RZ25L 88#define DT$_RZ55L 89#define DT$_RZ56L 90#define DT$_RZ57L 91#define DT$_RA73 92#define DT$_RZ26 93#define DT$_RZ36 94#define DT$_RZ74 95#define DT$_ESE52 96#define DT$_ESE56 97#define DT$_ESE58 98#define DT$_RZ27 99#def ine DT$_RZ37 100#define DT$_RZ34L 101#define DT$_RZ35L 102#define DT$_RZ36L 103#define DT$_RZ38 104#define DT$_RZ75 105#define DT$_RZ59 106#define DT$_RZ13 107#define DT$_RZ14 108#define DT$_RZ15 109#define DT$_RZ16 110#define DT$_RZ17 111#define DT$_RZ18 112#define DT$_EZ51 113#define DT$_EZ52 114#define DT$_EZ53 115#define DT$_EZ54 116#define DT$_EZ58 117#define DT$_EF51 118#define DT$_EF52 119#define DT$_EF53 120#define DT$_EF54 121#define DT$_EF58 122 #define DT$_RF36 123#define DT$_RF37 124#define DT$_RF74 125#define DT$_RF75 126#define DT$_HSZ10 127#define DT$_RZ28 128#define DT$_GENERIC_RX 180N#define DT$_FD1 129 /*FOREIGN DISK TYPE 1 */N#define DT$_FD2 130 /*FOREIGN DISK TYPE 2 */N#define DT$_FD3 131 /*FOREIGN DISK TYPE 3 */N#define DT$_FD4 132 /*FOREIGN DISK TYPE 4 */N#define DT$_FD5 133  /*FOREIGN DISK TYPE 5 */N#define DT$_FD6 134 /*FOREIGN DISK TYPE 6 */N#define DT$_FD7 135 /*FOREIGN DISK TYPE 7 */N#define DT$_FD8 136 /*FOREIGN DISK TYPE 8 */#define DT$_RZ29 137#define DT$_RZ26L 138#define DT$_RRD43 139#define DT$_RRD44 140#define DT$_HSX00 141#define DT$_HSX01 142#define DT$_RZ26B 143#define DT$_RZ27B 144#define DT$_RZ28B  145#define DT$_RZ29B 146#define DT$_RZ73B 147#define DT$_RZ74B 148#define DT$_RZ75B 149#define DT$_RWZ21 150#define DT$_RZ27L 151#define DT$_HSZ20 152#define DT$_HSZ40 153#define DT$_HSZ15 154#define DT$_RZ26M 155#define DT$_RW504 156#define DT$_RW510 157#define DT$_RW514 158#define DT$_RW516 159#define DT$_RWZ52 160#define DT$_RWZ53 161#define DT$_RWZ54 162#define DT$_RWZ31 163#define DT$_EZ31 164#define DT$_EZ32 165#define DT$_EZ33 166#define DT$_EZ34 167#define DT$_EZ35 168#define DT$_EZ31L 169#define DT$_EZ32L 170#define DT$_EZ33L 171#define DT$_RZ28L 172#define DT$_RWZ51 173#define DT$_EZ56R 174#define DT$_RAID0 175#define DT$_RAID5 176 #define DT$_CONSOLE_CALLBACK 177#define DT$_FILES_64 178#define DT$_SWXCR 179#define DT$_SNAPPY_DISK 180#define DT$_SNAPPY_POOL 181#define DT$_USB_CB_DISK 182N/* */N/* TAPE DEVICES  */N/* */N#define DT$_TE16 1 /*TE16 MAGTAPE */N#define DT$_TU45 2 /*TU45 MAGTAPE */N#define DT$_TU77 3 /*TU77 MAGTAPE */N#define DT$_TS11 4 /*TS11 MAGTAPE */N#define DT$_TU78 5 /*TU78 MAGTAPE */N#define DT$_TA78 6 /*TA78 MAGTAPE */N#define DT$_TU80 7 /*TU80 MAGTAPE */N#define DT$_TU81 8 /*TU81 MAGTAPE */#define DT$_TA81 9N#define DT$_TK50 10 /*TK50 CARTRIDGE TAPE */N#define DT$_MR_TU70 11 /*TU70 STC TAPE (DX20) */N#define DT$_MR_TU72 12 /*TU72 STC  TAPE */N#define DT$_MW_TSU05 13 /*TSU05 TAPE (CSS) */N#define DT$_MW_TSV05 14 /*TSV05 TAPE (CSS) */N#define DT$_TK70 15 /*TK70 CARTRIDGE TAPE */#define DT$_RV20 16#define DT$_RV80 16N#define DT$_TK60 17 /*TK60 CARTRIDGE TAPE */N#define DT$_GENERIC_TU 18 /*Brand X Tape */N#define DT$_TA79 19  /*TA79 */#define DT$_TAPE9 20#define DT$_TA90 21#define DT$_TF30 22#define DT$_TF85 22#define DT$_TF70 23#define DT$_RV60 24#define DT$_TZ30 25#define DT$_TM32 26#define DT$_TZX0 27#define DT$_TSZ05 27#define DT$_GENERIC_MK 28#define DT$_TK50S 29#define DT$_TZ30S 30#define DT$_TK70L 31#define DT$_TLZ04 32#define DT$_TZK10 33#define DT$_TSZ07 34#define DT$_TSZ08 35#define DT$_TA90E 36#define DT$_TZK11 37#define DT$_TZ85 38#define DT$_TZ86 39#define DT$_TZ87 40#define DT$_TZ857 41#define DT$_EXABYTE 42#define DT$_TAPE_LOADER_1 43#define DT$_TA91 44#define DT$_TLZ06 45#define DT$_TA85 46#define DT$_TKZ60 47#define DT$_TLZ6 48#define DT$_TZ867 49#define DT$_TZ877 50#define DT$_TAD85 51#define DT$_TF86 52#define DT$_TKZ09 53#define DT$_TA86 54#define DT$_TA87 55#define DT$_TD34 56#define DT$_TD44 57#define DT$_HST00 58#define DT$_HST01 59#define DT$_TLZ07 60#define DT$_TLZ7 61#define DT$_TZ88 62#define DT$_TZ885 63#define DT$_TZ887 64#define DT$_TZ89 65#define DT$_TZ895 66#define DT$_TZ897 67#define DT$_TZ875 68#define DT$_TL810 69#define DT$_TL820 70#define DT$_TZ865 71N/* */N/* TERMINAL DEVICE TYPES */N/* */N/* new definitions for terminal types should be placed in $ttdef only */N/* this table remains around for compatibility only */N/* */N/* **** MATCHES $TTDEF ***** */N#define DT$_TTYUNKN 0 /* UNKNOWN TERMINAL */N#define DT$_VT05 1 /* VT05 */N#define DT$_FT1 16 /* FOREIGN T ERMINAL TYPES */#define DT$_FT2 17#define DT$_FT3 18#define DT$_FT4 19#define DT$_FT5 20#define DT$_FT6 21#define DT$_FT7 22N#define DT$_FT8 23 /* END OF FOREIGN TYPES */N/* RESERVE REST UP TO 32 FOR EXTENSIONS */N#define DT$_LAX 32 /* LA TYPE TERMINAL */N#define DT$_LA36 32 /* LA36 */#define DT$_LA120 33N#define DT$_VT5X 64 /* VT5X TYPE */N#define DT$_VT52 64 /* VT52 */N#define DT$_VT55 65 /* VT55 */N#define DT$_TQ_BTS 4 /* TQ_BTS */N#define DT$_TEK401X 10 /* TEK401X series */N#define DT$_VT100 96 /* VT100 */#define DT$_VK100 2#define DT$_VT173 3#define DT$_LA34 34#define DT$_LA38 35#define DT$_LA12 36#define DT$_LA24 37#define DT$_LA100 37#define DT$_LQP02 38#define DT$_VT101 97#define DT$_VT102 98#define DT$_VT105 99#define DT$_VT125 100#define DT$_VT131 101#define DT$_VT132 102N#define DT$_DZ11 66 /* DZ11 CONTROLLER */N#define DT$_DZ32 67 /* DZ32 CONTROLLER */N#define DT$_DZ730 68 /* DZ730 (COMBO) CONTROLLER  */N#define DT$_DMZ32 69 /* DMZ32 CONTROLLER */N#define DT$_DHV 70 /* DHV CONTROLLER */N#define DT$_DHU 71 /* DHU CONTROLLER */N#define DT$_SLU 72 /* Onboard Serial Line Unit */N#define DT$_TERM9 73 /*Terminal on 009 */N#define DT$_LAT 74 /* LAT terminals */N/*  */N/* Terminal WORKSTATIONS */N/* */N#define DT$_VS100 1 /* VAXstation 100 */N#define DT$_VS125 2 /* VAXstation 125 */N#define DT$_VL_VS8200 3 /* VAXstation 8200 (Lynx) */N#define DT$_VD 4 /* VAX station Vir. Device */#define DT$_DECW_OUTPUT 5#define DT$_DECW_INPUT 6#define DT$_DECW_PSEUDO 7N/* */N/* SYNCHRONOUS COMMUNICATIONS DEVICE TYPES */N/* */N#define DT$_DMC11 1 /* DMC11 */N#define DT$_DMR11 2 /* DMR11  */O#define DT$_XK_3271 3 /* DUP-11 FOR 3271 PROTOCOL EMULATOR */N#define DT$_XJ_2780 4 /* DUP-11 FOR 2780 " " */N#define DT$_NW_X25 5 /* X25 PROTOCOL EMULATOR */N#define DT$_NV_X29 6 /* X29 " " */N#define DT$_SB_ISB11 7 /* ISB-11 DEC dataway */N#define DT$_MX_MUX200 8 /* MUX-200 PROTOCOL EMULATOR */N#define DT$_DMP11 9 /* DMP11 */N#define DT$_DMF32 10 /* DMF32 */N#define DT$_XV_3271 11 /* DV-11 3271 PROTOCOL EMULATOR */N#define DT$_CI 12 /* CI - Computer Interconnect */N#define DT$_NI 13 /* NI - Network Interconnect */N#define DT$_UNA11 14 /* UNIBUS to NI adapter */N#define DT$_DEUNA 14 /* UNIBUS to NI adapter */N#define DT$_YN_X25 15 /* KMS11 X.25 P. E. */N#define DT$_YO_X25 16 /* " " " */N#define DT$_YP_ADCCP 17 /* " ADCCP P.E. */N#define DT$_YQ_3271 18 /* " " " */N#define DT$_YR_DDCMP 19 /* " DDCMP */N#define DT$_YS_SDLC 20 /* " SDLC  */N#define DT$_UK_KTC32 21 /* " KTC32 */N#define DT$_DEQNA 22 /* Q-BUS to NI adapter */N#define DT$_DMV11 23 /* DMV11 */N#define DT$_ES_LANCE 24 /* SCORPIO to NI adapter */N#define DT$_DELUA 25 /* LSI version of DEUNA */N#define DT$_NQ_3271 26 /* DHCF */N#define DT$_ DMB32 27 /* DMB32 (BICombo) */R#define DT$_YI_KMS11K 28 /* not a product, used by field service */N#define DT$_ET_DEBNT 29 /* DEBNT (DEBNA grandpa) */N#define DT$_ET_DEBNA 29 /* DEBNA (BI-NI adapter) */N#define DT$_SJ_DSV11 30 /* DSV11 Q-BUS sync adapter */N#define DT$_SL_DSB32 31 /* DSB32 BI sync adaptor */N#define DT$_ZS_DST32 32 ! /* DST32, X25 */N#define DT$_XQ_DELQA 33 /* DELQA - Q-BUS to NI adaptor */N#define DT$_ET_DEBNI 34 /* DEBNI (BI-NI adapter) */N#define DT$_EZ_SGEC 35 /* SGEC CVAX to ethernet chip */#define DT$_EX_DEMNA 36#define DT$_DIV32 37#define DT$_XQ_DEQTA 38#define DT$_FT_NI 39#define DT$_EP_LANCE 40#define DT$_KWV32 41#define DT$_SM_DSF32 42#define DT$_FX_DEMFA 43P#define DT$_SF_DSF32 44 " /* FT unit for DSF32 CIRRUS sync comm */N#define DT$_SE_DUP11 45 /* SEDRIVER common DUP11 sync comm */N#define DT$_SE_DPV11 46 /* SEDRIVER common DPV11 sync comm */N#define DT$_ZT_DSW 47 /* Generic DSW sync com */N#define DT$_FC_DEFZA 48 /* Turbochannel to FDDI */N#define DT$_EC_PMAD 49 /* Turbochannel to Ethernet */N#define DT$_EZ_TGEC 50 /* TGEC #ethernet chip */N#define DT$_EA_DEANA 51 /* Futurebus to Ethernet */N#define DT$_EY_NITC2 52 /* Turbochannel to Ethernet */N#define DT$_ER_DE422 53 /* EISA bus to Ethernet */N#define DT$_ER_DE200 54 /* ISA bus to Ethernet */P#define DT$_EW_TULIP 55 /* Integral PCI bus to TULIP Ethernet */N#define DT$_FA_DEFAA 56 /* Futurebus to FDDI $ */N#define DT$_FC_DEFTA 57 /* Turbochannel to FDDI */N#define DT$_FQ_DEFQA 58 /* Q-bus to FDDI */N#define DT$_FR_DEFEA 59 /* EISA bus to FDDI */N#define DT$_FW_DEFPA 60 /* PCI bus to FDDI */N#define DT$_IC_DETRA 61 /* Turbochannel to Token Ring */N#define DT$_IQ_DEQRA 62 /* Q-bus to Token Ring */N#define DT$_IR_DW3%00 63 /* EISA bus to Token Ring */N#define DT$_ZR_SCC 64 /* SCC on AXP workstations */N#define DT$_ZY_DSYT1 65 /* Turbo channel sync interface */N#define DT$_ZE_DNSES 66 /* EISA sync interface */N#define DT$_ER_DE425 67 /* EISA bus to TULIP Ethernet */N#define DT$_EW_DE435 68 /* PCI bus to TULIP Ethernet */N#define DT$_ER_DE205 69 /* I&SA bus to LEMAC Ethernet */N#define DT$_HC_OTTO 70 /* Turbochannel to ATM */N#define DT$_ZS_PBXDI 71 /* ISA sync comms card */N#define DT$_EL_ELAN 72 /* Emulated CSMACD LAN for ATM */N#define DT$_HW_OTTO 73 /* PCI to ATM */N#define DT$_EO_3C598 74 /* PCMCIA to Ethernet */N#define DT$_IW_TC4048 75 /* PCI to TokenRing ' */N#define DT$_EW_DE450 76 /* PCI to DC21040 Ethernet */N#define DT$_EW_DE500 77 /* PCI to DC21140 Ethernet */N#define DT$_CL_CLIP 78 /* Classical IP over ATM */N#define DT$_ZW_PBXDP 79 /* PCI sync comms card */N#define DT$_HW_METEOR 80 /* PCI-ATM ATMworks 351 */N#define DT$_ER_DE305 81 /* ISA bus to Ethernet */N#define DT$_EW_D(EGPA 82 /* PCI to Gigabit Ethernet (DEGPA) */N#define DT$_IW_RACORE 83 /* PCI to TokenRing (Racore) */N#define DT$_EB_SMLAN 84 /* Shared Memory (Galaxy) */N#define DT$_EI_82558 85 /* PCI to Fast Ethernet (82558) */N#define DT$_EI_82559 86 /* PCI to Fast Ethernet (82559) */N#define DT$_HW_HE622 87 /* PCI to ATM (HE622) */N#define DT$_HW_HE155 88 /*) PCI to ATM (HE155) */N#define DT$_EW_BCM5703 89 /* PCI/PCIX to GBE (Broadcom 5703) */N#define DT$_EW_BCM5704 90 /* PCI/PCIX to GBE (Broadcom 5704) */N#define DT$_EW_XFRAME 91 /* PCI/PCIX 10 GBE (S2io) */N#define DT$_EW_BCM5701 92 /* PCI/PCIX to GBE (Broadcom 5701) */N#define DT$_LL_LLAN 93 /* Logical LAN (failover) */N#define DT$_EG_ELP_FC 94 /* Emulex LP Fibre Channel * */N#define DT$_EG_Q_FC 95 /* Qlogic Fibre Channel */N#define DT$_EI_82540 96 /* Intel Gigabit (8254x) */N#define DT$_VL_VLAN 97 /* VLAN */N#define DT$_EW_BCM5715 98 /* PCIE to GBE (Broadcom 5715) */N#define DT$_EI_AVIO 99 /* HPVM AVIO LAN Device */N#define DT$_ER_BCM57711 100 /* PCIX 10 GBE (Broadcom 57711-LOM) */N#define DT$_EW+_BCM57711 101 /* PCIX 10 GBE (Broadcom 57711) */N/* */N/* LINE PRINTER AND CARD READER DEVICE TYPES */N/* */N#define DT$_LP11 1 /* LP11 */N#define DT$_LA11 2 /* LA11 */N#define DT$_LA180 3 ,/* LA180 */N#define DT$_LC_DMF32 4 /* DMF32 */N#define DT$_LI_DMB32 5 /* DMB32 */N#define DT$_PRTR9 6 /*Printer on 009 */N#define DT$_SCSI_SCANNER_1 7 /* SCSI Scanner */N#define DT$_PC_PRINTER 8 /*PC Printer */N#define DT$_CR11 1 /* CR11 CARD READER - */N/* */N/* MAILBOX DEVICE TYPES */N/* */N#define DT$_MBX 1 /* LOCAL MEMORY MAILBOX */N#define DT$_SHRMBX 2 /* SHARED MEMORY MAILBOX */N#define DT$_NULL 3 /* The NULL DEVICE */N#define DT$_.PIPE 4 /* PIPE DEVICE */N/* */N/* REMOTE CONSOLE STORAGE DEVICE TYPES */N/* */N#define DT$_DAP_DEVICE 1 /* DAP-ACCESSED DEVICE */N/* */N/* REALTIME DEVICE TYPES / */N/* */N#define DT$_LPA11 1 /* LPA-11 */N#define DT$_DR780 2 /* DR780 */N#define DT$_DR750 3 /* DR750 */N#define DT$_DR11W 4 /* DR11W */N#define DT$_PCL11R 5 /* PCL11 RECEIVER (CSS) 0 */N#define DT$_PCL11T 6 /* PCL11 TRANSMTTER (CSS) */N#define DT$_DR11C 7 /* DR11C PARALLEL INTERFACE */N#define DT$_BS_DT07 8 /* UNIBUS SWITCH */U#define DT$_XP_PCL11B 9 /* PCL-11B (DECNET and NONDECNET mode CSS) */N#define DT$_IX_IEX11 10 /* IEEE-488 to UNIBUS INTERFACE */N#define DT$_FP_FEPCM 11 /* FEPCM CSS frontend processor */N#d1efine DT$_TK_FCM 12 /* FEPCM CSS frontend processor */N#define DT$_XI_DR11C 13 /* PARALLEL INTERFACE ON DMF-32 */N#define DT$_XA_DRV11WA 14 /* DMA Parallel Interface */N#define DT$_DRB32 15 /* DRB32 (or MFA) */N#define DT$_HX_DRQ3B 16 /* DRQ3B PARALLEL INTERFACE */N/* */N/* DECVOICE DEVICES 2 */N/* */N#define DT$_DECVOICE 1 /* VQ- DECVOICE class driver */N#define DT$_DTC04 2 /* VX DECvoice 1 M7132 port driver */O#define DT$_DTC05 3 /* VM Decvoice III M3135 port driver */O#define DT$_DTCN5 4 /* VN Decvoice III M3136 port driver */N/* 3 */N/* AUDIO DEVICES */N/* */N#define DT$_AMD79C30A 1 /* AMD79C30A on VLC/PMARIAH */Z#define DT$_CMI8738 2 /* CMI8738 sound chip bearing HP Part no AD317A */N/* */N/* BUS CLASS DEVICES 4 */N/* */N#define DT$_CI780 1 /* CI780 */N#define DT$_CI750 2 /* CI750 */N#define DT$_UQPORT 3 /* UQPORT is generic UDA */N#define DT$_UDA50 3 /* UDA50 */N#define DT$_UDA50A 4 /* UDA50A */N#define DT5$_LESI 5 /* Low end storage */N#define DT$_TU81P 6 /* TU81 port */N#define DT$_RDRX 7 /* RDRX port */N#define DT$_TK50P 8 /* TK50 port */N#define DT$_RUX50P 9 /* RUX50 port */N#define DT$_RC26P 10 /* RC26P port */N#define DT$_QDA50 11 6 /* KDA50 port (old name) */N#define DT$_KDA50 11 /* KDA50 port */N#define DT$_BDA50 12 /* KDB50 port (old name) */N#define DT$_KDB50 12 /* KDB50 port (alias BDA50) */N#define DT$_RRD50P 13 /* RRD50 port */N#define DT$_QDA25 14 /* KDA25 port (old name) */N#define DT$_KDA25 14 /* KDA25 port 7 */N#define DT$_BCI750 15 /* BI-CI750 port */N#define DT$_BCA 16 /* BI-CI port */N#define DT$_RQDX3 17 /* RQDX3 port */N#define DT$_NISCA 18 /* NI-SCA port */N#define DT$_AIO 19 /* BVP SSP port */N#define DT$_KFBTA 19 /* BVP SSP port */N#define 8DT$_AIE 20 /* BVP multi-port */N#define DT$_DEBNT 20 /* BVP multi-port */#define DT$_BSA 21#define DT$_KSB50 21N#define DT$_TK70P 22 /* TK70 port */#define DT$_RV20P 23#define DT$_RV80P 23N#define DT$_TK60P 24 /* TK60 port */#define DT$_SII 25#define DT$_KFSQSA 26#define DT$_KFQSA 26#define DT$_SHAC 27#define DT$_CIXCD 289#define DT$_N5380 29#define DT$_SCSII 30#define DT$_HSX50 31#define DT$_KDM70 31#define DT$_TM32P 32#define DT$_TK7LP 33#define DT$_SWIFT 34#define DT$_N53C94 35#define DT$_KFMSA 36#define DT$_SCSI_XTENDR 37#define DT$_FT_TRACE_RAM 38#define DT$_XVIB 39#define DT$_XZA_SCSI 40#define DT$_XZA_DSSI 41#define DT$_N710_SCSI 42#define DT$_N710_DSSI 43#define DT$_AHA1742A 44#define DT$_TZA_SCSI 45#define DT$_N810_SCSI 46#define DT$_CIPCA 47#define DT$_ISP1020 :48#define DT$_MC_SPUR 49#define DT$_PZA_SCSI 50N#define DT$_MCSCA 51 /* MC-SCA port pmdriver */N#define DT$_SMCI 52 /* SMCI port (pbdriver) */#define DT$_KZPCM_SCSI 53#define DT$_SYM896_SCSI 54#define DT$_FCP_SCSI 55#define DT$_LP7000_FC 56#define DT$_SYM895_SCSI 57#define DT$_KZPCA_SCSI 58#define DT$_ADAPTEC7892_SCSI 59#define DT$_ADAPTEC7895_SCSI 60#define DT$_ADAPTEC7897_SCSI 61#define DT$_ADAPTEC7899_SC;SI 62#define DT$_CISS 63#define DT$_ISP23XX_FC 64#define DT$_LSI1010_SCSI 65#define DT$_LSI1030_SCSI 66#define DT$_ISP24XX_FC 67#define DT$_LSI106X_SAS 68#define DT$_SW_ISCSI 69#define DT$_LP8000_FC 70#define DT$_LP9000_FC 71#define DT$_LP9802_FC 72#define DT$_LP10000_FC 73#define DT$_LP11002_FC 74#define DT$_ISP243X_FC 75#define DT$_EP2422_FC 76#define DT$_ISP253X_FC 77#define DT$_GSP 78#define DT$_ICH10_AHCI 79N/* < */N/* MISCELLANEOUS DEVICES */N/* */N#define DT$_DN11 1 /* AUTODIALER */N#define DT$_PV 2 /* Pseudo keyboard */#define DT$_SFUN9 3#define DT$_USER9 4#define DT$_GENERIC_SCSI 5#define DT$_DMA_520 6#define DT$_T3270 7#define DT$_IPMI 9#define DT=$_ACPI_SE 10 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DCDEF_LOADED */ ww;Л/********************************************************************************************************************************/=/* Creat >ed: 5-Apr-2012 13:00:43 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]DCX$ROUTINES.SDI;1 *//********************************************************************************************************************************/'/*** MODULE DCX$ROUTINES IDENT X-1 ***/#ifndef __DCX_ROUTINES_LOADED#define __DCX_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nome?mber_alignmentR#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 !defin@ed(__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 N/*--------------------------------------------------------------- */N/* */N/* Data Compression/Expansion (DCX) Routines */N/* A */N/* */N/* DCX$ANALYZE_DATA - Analyze a data record */N/* */N/* status = DCX$ANALYZE_DATA (context, record) */N/* */N/* context - Context value returned by DCX$ANALYZE_INIT B */N/* record - Record to be analyzed */+#define dcx$analyze_data DCX$ANALYZE_DATA #ifdef __NEW_STARLETunsigned int dcx$analyze_data( unsigned int *context, void *record);#else /* __OLD_STARLET */0unsigned int dcx$analyze_data(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* DCX$ANALYZE_DONE - Complete analysis C */N/* */N/* status = DCX$ANALYZE_DONE (context) */N/* */N/* context - Context value returned by DCX$ANALYZE_INIT */+#define dcx$analyze_done DCX$ANALYZE_DONE #ifdef __NEW_STARLETunsigned int dcx$analyze_done( unsigned int *context);#else /* __OLD_STARLET */0unsigned int dcx$anaDlyze_done(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* DCX$ANALYZE_INIT - Initialize context for analysis */N/* */N/* status = DCX$ANALYZE_INIT (context [,item_code, item_value]) */N/* */N/* context - Receives context value f Eor data stream */N/* item_code - Specifies information to be used during analysis */N/* item_value - Value of information item */N/* [Note - successive pairs of item_code and item_value can be passed */N/* in the argument list] */N/* */+#define dcx$analyze_init DCX$ANALYZE_INIT #ifdef __NEW_STA FRLETunsigned int dcx$analyze_init( unsigned int *context, __optional_params );#else /* __OLD_STARLET */0unsigned int dcx$analyze_init(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* DCX$COMPRESS_DATA - Compress a data record */N/* */N/* status = DCX$COMPRESS_DATA (context, in_rec, out_rec, out_lGength) */N/* */N/* context - Value returned by DCX$COMPRESS_INIT */N/* in_rec - Data record to be compressed */N/* out_rec - Receives compressed record */N/* out_length - Receives length of compressed record */N/* */-#define H dcx$compress_data DCX$COMPRESS_DATA #ifdef __NEW_STARLETunsigned int dcx$compress_data( unsigned int *context, void *in_rec, void *out_rec, __optional_params);#else /* __OLD_STARLET */1unsigned int dcx$compress_data(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* DCX$COMPRESS_DONE - Delete context for compression */N/* I */N/* status = DCX$COMPRESS_DONE (context) */N/* */N/* context - Value returned by DCX$COMPRESS_INIT */N/* */-#define dcx$compress_done DCX$COMPRESS_DONE #ifdef __NEW_STARLETunsigned int dcx$compress_done( unsigned int *context);#else /* __OLD_STARL JET */1unsigned int dcx$compress_done(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* DCX$COMPRESS_INIT - Initialize context for compression */N/* */N/* status = DCX$COMPRESS_INIT (context, map) */N/* */N/* contex Kt - Context value for this data stream */N/* map - Map value returned by DCX$MAKE_MAP */N/* */-#define dcx$compress_init DCX$COMPRESS_INIT #ifdef __NEW_STARLETunsigned int dcx$compress_init( unsigned int *context, void *map);#else /* __OLD_STARLET */1unsigned int dcx$compress_init(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* L */N/* DCX$EXPAND_DATA - Expand a compressed data record */N/* */N/* status = DCX$EXPAND_DATA (context, in_rec, out_rec [,out_length]) */N/* */N/* context - Value returned by DCX$EXPAND_INIT */N/* in_rec - Data record to be expManded */N/* out_rec - Receives expanded data record */N/* out_length - Receives length of expanded record */N/* */)#define dcx$expand_data DCX$EXPAND_DATA #ifdef __NEW_STARLETunsigned int dcx$expand_data( unsigned int *context, void *in_rec, void *out_rec, __optional_params);#else /* __OLD_STARLET *//unsigned intN dcx$expand_data(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* DCX$EXPAND_DONE - Delete context for expansion */N/* */N/* status = DCX$EXPAND_DONE (context) */N/* */N/* context - Value returned by ODCX$EXPAND_INIT */N/* */)#define dcx$expand_done DCX$EXPAND_DONE #ifdef __NEW_STARLETunsigned int dcx$expand_done( unsigned int *context);#else /* __OLD_STARLET *//unsigned int dcx$expand_done(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* DCX$EXPAND_INIT - Initialize context for expansion P */N/* */N/* status = DCX$EXPAND_INIT (context, map) */N/* */N/* context - Receives context value identifying data stream */N/* map - Map value returned by DCX$MAKE_MAP */N/* */)#d Qefine dcx$expand_init DCX$EXPAND_INIT #ifdef __NEW_STARLETunsigned int dcx$expand_init( unsigned int *context, void *map);#else /* __OLD_STARLET *//unsigned int dcx$expand_init(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* DCX$MAKE_MAP - Compute compression/expansion map */N/* */N/* status = RDCX$MAKE_MAP (context, map_addr [, map_size]) */N/* */N/* context - Value returned by DCX$ANALYZE_INIT */N/* map_addr - Receives address of allocated map data */N/* map_size - Receives size of allocated map data */N/* */##define dcx$make_map DCX$MAKE_MAPS #ifdef __NEW_STARLETunsigned int dcx$make_map( unsigned int *context, void *map_addr, __optional_params);#else /* __OLD_STARLET */,unsigned int dcx$make_map(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragm Ta __standard "#endif /* __DCX_ROUTINES_LOADED */ ww[&ћ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $DDT UMDEF ***/#ifndef __DDTMDEF_LOADED#define __DDTMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __cplVusplus 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 N/* */N/* Tran Wsaction Manager services structure definitions */N/* */#ifdef __NEW_STARLET/typedef unsigned int DDTM$X_TRANSACTION_ID [4];#else /* __OLD_STARLET *//typedef unsigned int ddtm$x_transaction_id [4];%#endif /* #ifdef __NEW_STARLET */G /* Transaction Id type */#ifdef __NEW_STARLET.typedef unsigned int DDTM$X_UTC_DATE_TIME [4];#else /* __O XLD_STARLET */.typedef unsigned int ddtm$x_utc_date_time [4];%#endif /* #ifdef __NEW_STARLET */G /* UTC type */N#define DDTM$S_TID 16 /* Size of a transaction id */N/* */N/* System services modifier flags */N/* */#define YDDTM$M_SYNC 0x1#define DDTM$M_NONDEFAULT 0x2#define DDTM$M_PROCESS 0x4#define DDTM$M_VOLATILE 0x8#define DDTM$M_RUNDOWN 0x10#define DDTM$M_CANCEL 0x20#define DDTM$M_FULL_STATE 0x40$#define DDTM$M_BRANCH_UNSYNCHED 0x80 #define DDTM$M_COORDINATOR 0x100#define DDTM$M_NOWAIT 0x200 #define DDTM$M_FINAL_STATE 0x400#define DDTM$M_LATE 0x80000000 #ifdef __NEW_STARLETtypedef struct _ddtm$r_flags {N unsigned ddtm$v_sync : 1; /* Synchronous status requested */N Z unsigned ddtm$v_nondefault : 1; /* Not the default transaction */N unsigned ddtm$v_process : 1; /* Process-permanent RM */N unsigned ddtm$v_volatile : 1; /* volatile-only state */N unsigned ddtm$v_rundown : 1; /* forget all RMs */N unsigned ddtm$v_cancel : 1; /* Cancel GET operation */N unsigned ddtm$v_full_state : 1; /* Full state information */N unsigned ddtm$v_branch_u [nsynched : 1; /* Don't need to sync branch */N unsigned ddtm$v_coordinator : 1; /* Join Coordinating RM */N unsigned ddtm$v_nowait : 1; /* Don't wait for termination */N unsigned ddtm$v_final_state : 1; /* Get final transaction outcome */N unsigned ddtm$v_fill_1 : 20; /* Fill out to a longword */N unsigned ddtm$v_late : 1; /* Phase one branch or join */ } DDTM$R_FLAGS;#else /* __OLD_STARLET */\struct ddtm$r_flags {N unsigned ddtm$v_sync : 1; /* Synchronous status requested */N unsigned ddtm$v_nondefault : 1; /* Not the default transaction */N unsigned ddtm$v_process : 1; /* Process-permanent RM */N unsigned ddtm$v_volatile : 1; /* volatile-only state */N unsigned ddtm$v_rundown : 1; /* forget all RMs */N unsigned ddtm$v_cancel : 1; /* Cancel GET operation */N ] unsigned ddtm$v_full_state : 1; /* Full state information */N unsigned ddtm$v_branch_unsynched : 1; /* Don't need to sync branch */N unsigned ddtm$v_coordinator : 1; /* Join Coordinating RM */N unsigned ddtm$v_nowait : 1; /* Don't wait for termination */N unsigned ddtm$v_final_state : 1; /* Get final transaction outcome */N unsigned ddtm$v_fill_1 : 20; /* Fill out to a longword */N unsigned ddtm$v_late : 1 ^; /* Phase one branch or join */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Resource manager event request options */N/* */#define DDTM$M_EV_PREPARE 0x1#define DDTM$M_EV_ABORT 0x2#define DDTM$M_EV_COMMIT 0x4##define DDTM$M_EV_DEFAULT_TRANS 0x8"#define DDTM$M_EV_TRANS_START 0x10 _ #ifdef __NEW_STARLET#typedef struct _ddtm$r_event_mask {N unsigned ddtm$v_ev_prepare : 1; /* Vote request required */N unsigned ddtm$v_ev_abort : 1; /* Abort notificiation */N unsigned ddtm$v_ev_commit : 1; /* Commit notificiation */N unsigned ddtm$v_ev_default_trans : 1; /* New default TID */N unsigned ddtm$v_ev_trans_start : 1; /* Request transaction start events */N unsigned ddtm$v_fill_2 : 27; `/* Fill out to a longword */ } DDTM$R_EVENT_MASK;#else /* __OLD_STARLET */struct ddtm$r_event_mask {N unsigned ddtm$v_ev_prepare : 1; /* Vote request required */N unsigned ddtm$v_ev_abort : 1; /* Abort notificiation */N unsigned ddtm$v_ev_commit : 1; /* Commit notificiation */N unsigned ddtm$v_ev_default_trans : 1; /* New default TID */N unsigned ddtm$v_ev_trans_start : 1; /* Request transacti aon start events */N unsigned ddtm$v_fill_2 : 27; /* Fill out to a longword */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* $TRANS_EVENT system service event types */N/* */N#define DDTM$K_TX_PREPARE 1 /* Prepare transaction request */N#define DDTM$K_TX_COMMIT 2 b /* Commit transaction order */N#define DDTM$K_TX_ABORT 3 /* Abort transaction order */N#define DDTM$K_TX_RECOVER_COMMIT 4 /* Commit order on recovery */N#define DDTM$K_TX_RECOVER_ABORT 5 /* Abort order on recovery */N/* */N/* Resource manager event report types */N/* c */N#define DDTM$K_PREPARE 1 /* Prepare operation */N#define DDTM$K_COMMIT 2 /* Commit operation */N#define DDTM$K_ABORT 3 /* Abort operation */N#define DDTM$K_ONE_PHASE_COMMIT 4 /* One-phase commit */N#define DDTM$K_DEFAULT_CLEARED 5 /* Tid no longer default */N#define DDTM$K_DEFAULT_SET 6 /* Tid now process default */N#define dDDTM$K_STARTED_DEFAULT 7 /* New process default transaction */N#define DDTM$K_STARTED_NONDEFAULT 8 /* New nondefault transaction */N#define DDTM$K_RECOVER_COMMITTED 9 /* Transaction committed */N#define DDTM$K_RECOVER_ERROR 10 /* Error during recovery */N#define DDTM$K_RECOVER_INDOUBT 11 /* Transaction is indoubt */N#define DDTM$K_RECOVER_RESOLVE 12 /* RM resposible for resolution */N/* e */N/* Transaction report structure (DECdtm V1.0) */N/* */ #ifdef __NEW_STARLETNtypedef struct _ddtm$r_astdef { /* Transaction event AST parameter */N unsigned int ddtm$l_arglen; /* Structure length */N void *ddtm$a_tid; /* Transaction id */N unsigned int ddtm$l_part_id; f /* Participant identifier */N unsigned int ddtm$l_rm_ctx; /* RM event ASTPRM */N unsigned int ddtm$l_optype; /* Operation type */N unsigned int ddtm$l_reason; /* Abort extended reason code */N unsigned int ddtm$o_utc_cmt_time [4]; /* Reserved to Digital */N unsigned int ddtm$o_utc_latest [4]; /* Reserved to Digital */ } DDTM$R_ASTDEF;#else /* __OLD_STARLET */Nstructg ddtm$r_astdef { /* Transaction event AST parameter */N unsigned int ddtm$l_arglen; /* Structure length */N void *ddtm$a_tid; /* Transaction id */N unsigned int ddtm$l_part_id; /* Participant identifier */N unsigned int ddtm$l_rm_ctx; /* RM event ASTPRM */N unsigned int ddtm$l_optype; /* Operation type */N unsigned int ddtm$l_reason; h /* Abort extended reason code */N unsigned int ddtm$o_utc_cmt_time [4]; /* Reserved to Digital */N unsigned int ddtm$o_utc_latest [4]; /* Reserved to Digital */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Transaction report structure */N/* */ #ifdief __NEW_STARLET"typedef struct _ddtm$r_reportdef {N unsigned int ddtm$l_report_len; /* Structure length */N void *ddtm$a_tid_ptr; /* Transaction id */N unsigned int ddtm$l_report_id; /* Report identifier */N unsigned int ddtm$l_rm_context; /* RM event ASTPRM */N unsigned int ddtm$l_event_type; /* Event report type */N unsigned int ddtm$l_abort_reason; /* Abort ext jended reason code */N unsigned int ddtm$o_commit_time [4]; /* Reserved to Digital */N unsigned int ddtm$o_latest_time [4]; /* Reserved to Digital */N unsigned __int64 ddtm$q_tx_class; /* Transaction class descriptor */N unsigned __int64 ddtm$q_part_name; /* RM Instance descriptor */ } DDTM$R_REPORTDEF;#else /* __OLD_STARLET */struct ddtm$r_reportdef {N unsigned int ddtm$l_report_len; /* Structure length k */N void *ddtm$a_tid_ptr; /* Transaction id */N unsigned int ddtm$l_report_id; /* Report identifier */N unsigned int ddtm$l_rm_context; /* RM event ASTPRM */N unsigned int ddtm$l_event_type; /* Event report type */N unsigned int ddtm$l_abort_reason; /* Abort extended reason code */N unsigned int ddtm$o_commit_time [4]; /* Reserved to Digital */N unsigned int d ldtm$o_latest_time [4]; /* Reserved to Digital */N unsigned int ddtm$q_tx_class [2]; /* Transaction class descriptor */N unsigned int ddtm$q_part_name [2]; /* RM Instance descriptor */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif m#ifdef __cplusplus }#endif#pragma __standard #endif /* __DDTMDEF_LOADED */ wwћ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */K/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]DDTMMSG.SDI;1 *//*************************************************************************************************************** n*****************//*** MODULE $DDTMMSGDEF ***/#ifndef __DDTMMSGDEF_LOADED#define __DDTMMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 too 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 N/* p */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:56:44.98 */N/* */H/* .TITLE DDTMMSGDEF -- DECDTM SERVICES EXTENDED REASON CODES */N/* */N/************************************************************************** */N/** q * */N/** COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION, 1991, 1993 * */N/** ALL RIGHTS RESERVED. * */N/** UNPUBLISHED RIGHTS RESERVED UNDER THE COPYRIGHT LAWS OF THE UNITED * */N/** STATES. * */N/** * */N/** THE SOFTWARE CONTAINED ON THIS MEDIA IS PROPRIETARY TO AND EMBODIES * */N/** THE CONFIDrENTIAL TECHNOLOGY OF DIGITAL EQUIPMENT CORPORATION. * */N/** POSSESSION, USE, DUPLICATION OR DISSEMINATION OF THE SOFTWARE AND * */N/** MEDIA IS AUTHORIZED ONLY PURSUANT TO A VALID WRITTEN LICENSE FROM * */N/** DIGITAL EQUIPMENT CORPORATION. * */N/** * */N/** RESTRICTED RIGHTS LEGEND USE, DUPLICATION, OR DISCLOSURE BY THE U.S. * */N/** GOVERNMENT IS SUBJECT TO RESTRICTIOsNS AS SET FORTH IN SUBPARAGRAPH * */N/** (C)(1)(II) OF DFARS 252.227-7013, OR IN FAR 52.227-19, AS APPLICABLE. * */N/** * */N/************************************************************************** */N/* */N/*++ */N/* FACILITY: DDTM t */N/* */N/* ABSTRACT: */N/* */M/* THIS MODULE DEFINES THE EXTENDED TRANSACTION ABORT REASON CODES FOR THE */I/* DECDTM TRANSACTION MANAGER. */N/* */N/* ENVIRONMENT: u */I/* VMS V5.4 OR LATER. */N/* */;/* AUTHOR: JAMES E JOHNSON CREATION DATE: 27-FEB-1990 */N/* */N/* MODIFIED BY: */N/* v */2/* A-4 KJP KEVIN PLAYFORD 15-SEP-1993 */B/* UPDATED ALPHA VERSION OF DECDTM MESSAGES TO REFLECT MESSAGE */B/* TEXT AS FOUND IN HELP MESSAGE TEXT. */N/* */2/* A-3 KJP KEVIN PLAYFORD 23-AUG-1993 */B/* UPDATED ALPHA VERSION OF DECDTM MESSAGES TO DECDTM V1.2 */B/* FUNCTIONALITY. */N/* w */B/* *** VAX CHANGES PICKED UP FOR ALPHA */N/* */./* X-6 RM RUDI MARTIN 9-AUG-1993 */;/* UPDATE SYNCH_FAIL AND ORPHAN_BRANCH MESSAGES TO */;/* CORRESPOND TO THEIR HELP/MESSAGE TEXT. */N/* */2/* A-2 KJP KEVIN PLAYFORD 20-JUL-1993 */B/* UPDATExD ALPHA VERSION OF DECDTM MESSAGES TO DECDTM V1.2 */B/* FUNCTIONALITY. */N/* */B/* *** VAX CHANGES PICKED UP FOR ALPHA */N/* */./* X-5 RM RUDI MARTIN 25-FEB-1993 */;/* ADD XA ERROR CODES. */N/* y */1/* X-4 CW CHRIS WHITAKER 26-FEB-1991 */;/* MODIFY WORDING ON SOME MESSAGES TO CONFORM TO */;/* FUNCTIONAL SPECIFICATION OF DECDTM V1.2. */N/* */5/* X-3 CW1023 CHRIS WHITAKER 21-MAY-1990 */B/* ADD RESERVED CODE AS FIRST MESSAGE. */N/* */7/* X-2 JzEJ0599 JAMES E JOHNSON 23-APR-1990 */B/* ADD LOG_FAIL, SYNC_FAIL, AND ORPHAN_BRANCH */N/* */N/*-- */#define DDTM$_FACILITY 1187N#define DDTM$_UNKNOWN 0 /* NO EXTENDED CODE PROVIDED */N/* ERROR CODES: */N/* { */#define DDTM$_RESERVED 77824002#define DDTM$_TIMEOUT 77824010##define DDTM$_PART_TIMEOUT 77824018#define DDTM$_SEG_FAIL 77824026 #define DDTM$_COMM_FAIL 77824034#define DDTM$_VETOED 77824042#define DDTM$_ABORTED 77824050$#define DDTM$_SERIALIZATION 77824058"#define DDTM$_PART_SERIAL 77824066 #define DDTM$_INTEGRITY 77824074#define DDTM$_LOG_FAIL 77824082 #define DDTM$_SYNC_FAIL 77824090$#define DDTM$_ORPHAN_BRANCH 77824098#define DDTM$_|DEADLOCK 77824106 #define DDTM$_PROTERROR 77824114#define DDTM$_ROLLBACK 77824122 #define DDTM$_TRANSIENT 77824130 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DDTMMSGDEF_LOADED */ wwқ/*************************** }*****************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $DELPRCSYMDEF ***/#ifndef __DELPRCSYMDEF_LOADED#define __DELPRCSYMDEF_LOADED 1 G#pragma __nostandard ~/* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* */N/* $DELPRCSYMDEF - $DELPRC symbol definitions */N/* */N/*- */ #define DELPRC$M_EXIT 0x4#define DELPRC$M_NOEXIT 0x8 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef st ruct _delprcflags {#pragma __nomember_alignmentZ unsigned delprc$v_mode : 2; /* Access mode to start exit functionality with */N unsigned delprc$v_exit : 1; /* Enable exit functionality */N unsigned delprc$v_noexit : 1; /* Do not enable exit functionality */" unsigned delprc$$_fill_1 : 28; } DELPRCFLAGS;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _delprcflags {#pragma __nomember_alignmentZ unsigned delprc$v_mode : 2; /* Access mode to start exit functionality with */N unsigned delprc$v_exit : 1; /* Enable exit functionality */N unsigned delprc$v_noexit : 1; /* Do not enable exit functionality */" unsigned delprc$$_fill_1 : 28; } delprcflags;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __DELPRCSYMDEF_LOADED */ ww^қ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $DEVDEF ***/#ifndef __DEVDEF_LOADED#define __DEVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* THE FOLLOWING BITS DEFINE THE DEVICE CHARACTERISTICS FOR */N/* BOTH THE UCBS AND RMS. */N/* */#define DEV$M_REC 0x1#define DEV$M_CCL 0x2#define DEV$M_TRM 0x4#define DEV$M_DIR 0x8#define DEV$M_SDI 0x10#define DEV$M_SQD 0x20#define DEV$M_SPL 0x40#define DEV$M_OPR 0x80#define DEV$M_RCT 0x100#define DEV$M_QSVD 0x200#define DEV$M_QSVBL 0x400##define DEV$M_MPDEV_SECONDARY 0x800!#define DEV$M_MPDEV_MEMBER 0x1000#define DEV$M_NET 0x2000#define DEV$M_FOD 0x4000#define DEV$M_DUA 0x8000#define DEV$M_SHR 0x10000#define DEV$M_GEN 0x20000#define DEV$M_AVL 0x40000#define DEV$M_MNT 0x80000#define DEV$M_MBX 0x100000#define DEV$M_DMT 0x200000#define DEV$M_ELG 0x400000#define DEV$M_ALL 0x800000#define DEV$M_FOR 0x1000000#define DEV$M_SWL 0x2000000#define DEV$M_IDV 0x4000000#define DEV$M_ODV 0x8000000#define DEV$M_RND 0x10000000#define DEV$M_RTM 0x20000000#define DEV$M_RCK 0x40000000#define DEV$M_WCK 0x80000000#define DEV$M_CLU 0x1#define DEV$M_DET 0x2#define DEV$M_RTT 0x4#define DEV$M_CDP 0x8#define DEV$M_2P 0x10#define DEV$M_MSCP 0x20#define DEV$M_SSM 0x40#define DEV$M_SRV 0x80#define DEV$M_RED 0x100#define DEV$M_NNM 0x200#define DEV$M_WBC 0x400#define DEV$M_WTC 0x800#define DEV$M_HOC 0x1000#define DEV$M_LOC 0x2000#define DEV$M_DFS 0x4000#define DEV$M_DAP 0x8000#define DEV$M_NLT 0x10000#define DEV$M_SEX 0x20000#define DEV$M_SHD 0x40000#define DEV$M_VRT 0x80000#define DEV$M_LDR 0x100000#define DEV$M_NOLB 0x200000#define DEV$M_NOCLU 0x400000#define DEV$M_VMEM 0x800000#define DEV$M_SCSI 0x1000000#define DEV$M_WLG 0x2000000#define DEV$M_NOFE 0x4000000#define DEV$M_FILL_2 0x8000000#define DEV$M_CRAMIO 0x10000000#define DEV$M_DTN 0x20000000#define DEV$M_FILL_3 0x40000000!#define DEV$M_POOL_MBR 0x80000000 #ifdef __NEW_STARLETtypedef union _devdef { __struct {N unsigned dev$v_rec : 1; /* DEVICE RECORD ORIENTED */N unsigned dev$v_ccl : 1; /* CARRIAGE CONTROL DEVICE */N unsigned dev$v_trm : 1;  /* DEVICE IS A TERMINAL */N unsigned dev$v_dir : 1; /* DEVICE IS DIRECTORY STRUCTURED */T unsigned dev$v_sdi : 1; /* DEVICE IS SINGLE DIRECTORY STRUCTURED */_ unsigned dev$v_sqd : 1; /* SEQUENTIAL BLOCK-ORIENTED DEVICE (I.E., MAGTAPE) */N unsigned dev$v_spl : 1; /* DEVICE BEING SPOOLED */N unsigned dev$v_opr : 1; /* DEVICE IS AN OPERATOR */X unsigned dev$v_rct : 1; /* DISK CONTAINS RCT (DEC STANDARD 166 DISK) */R unsigned dev$v_qsvd : 1; /* Client device is served by QIOserver */T unsigned dev$v_qsvbl : 1; /* Server device is servable by QIOserver */] unsigned dev$v_mpdev_secondary : 1; /* Indicates secondary unit in a multipath set */Q unsigned dev$v_mpdev_member : 1; /* Device is part of a multipath set. */N unsigned dev$v_net : 1; /* NETWORK DEVICE */X unsigned dev$v_fod : 1; /* FILES-ORIENTED DEVICE (I.E., DISK AND MT) */N unsigned dev$v_dua : 1; /* DEVICE IS DUAL PORTED */N unsigned dev$v_shr : 1; /* DEVICE SHAREABLE */N unsigned dev$v_gen : 1; /* DEVICE IS A GENERIC DEVICE */N unsigned dev$v_avl : 1; /* DEVICE AVAILABLE FOR USE */N unsigned dev$v_mnt : 1; /* DEVICE IS MOUNTED */N unsigned dev$v_mbx : 1; /* DEVICE IS A MAILBOX */N unsigned dev$v_dmt : 1; /* DEVICE MARKED FOR DISMOUNT */O unsigned dev$v_elg : 1; /* DEVICE HAS ERROR LOGGING ENABLED */N unsigned dev$v_all : 1; /* DEVICE IS ALLOCATED */d unsigned dev$v_for : 1; /* DEVICE IS MOUNTED FOREIGN (I.E., NON-FILE STRUCTURED) */N unsigned dev$v_swl : 1; /* DEVICE IS SOFTWARE WRITE LOCKED */P unsigned dev$v_idv : 1; /* D EVICE CAPABLE OF PROVIDING INPUT */Q unsigned dev$v_odv : 1; /* DEVICE CAPABLE OF PROVIDING OUTPUT */N unsigned dev$v_rnd : 1; /* DEVICE ALLOWS RANDOM ACCESS */N unsigned dev$v_rtm : 1; /* DEVICE IS REALTIME IN NATURE */O unsigned dev$v_rck : 1; /* DEVICE HAS READ CHECKING ENABLED */P unsigned dev$v_wck : 1; /* DEVICE HAS WRITE CHECKING ENABLED */ } dev$r_devdef_bits0; __struct {N unsigned dev$v_clu : 1; /* DEVICE IS AVAILABLE CLUSTER-WIDE */N unsigned dev$v_det : 1; /* DEVICE IS DETACHED TERMINAL */V unsigned dev$v_rtt : 1; /* DEVICE HAS REMOTE TERMINAL UCB EXTENSION */N unsigned dev$v_cdp : 1; /* DUAL PATH DEVICE WITH 2 UCBs */P unsigned dev$v_2p : 1; /* TWO PATHS ARE KNOWN TO THIS DEVICE */W unsigned dev$v_mscp : 1; /* DEVICE ACCESSED USING MSCP (disk or tape) */] unsigned dev$v_ssm : 1; /* this bit was set for Phase I (controller-based) */N/* shadowing only. This bit is not set for */N/* Phase II (host-based) shadowing; Phase II */N/* sets the SHD bit (see below). */R unsigned dev$v_srv : 1; /* DEVICE IS SERVED VIA THE MSCP SERVER */N unsigned dev$v_red : 1; /* DEVICE IS redirected terminal */N unsigned dev$v_nnm : 1; /* DEVICE HAS "node$" PREFIX */P unsigned dev$v_wbc : 1; /* DEVICE SUPPORTS WRITE-BACK CACHING */S unsigned dev$v_wtc : 1; /* DEVICE SUPPORTS WRITE-THROUGH CACHING */N unsigned dev$v_hoc : 1; /* DEVICE SUPPORTS HOST CACHING */c unsigned dev$v_loc : 1; /* DEVICE ACCESSIBLE VIA LOCAL (NON-EMULATED) CONTROLLER */N unsigned dev$v_dfs : 1; /* DEVICE IS DFS-SERVED */N unsigned dev$v_dap : 1; /* DEVICE IS DAP ACCESSED */` unsigned dev$v_nlt : 1; /* DEVICE IS NOT-LAST-TRACK (I.E. IT HAS NO BAD BLOCK */N/* INFORMATION ON ITS LAST TRACK) */_ unsigned dev$v_sex : 1; /* DEVICE (tape) SUPPORTS SERIOUS EXCEPTION HANDLING */[ unsigned dev$v_shd : 1; /* DEVICE IS A MEMBER OF A HOST BASED SHADOW SET */Q unsigned dev$v_vrt : 1; /* DEVICE IS A SHADOW SET VIRTUAL UNIT */N unsigned dev$v_ldr : 1; /* LOADER PRESENT (TAPES) */[ unsigned dev$v_nolb : 1; /* DEVICE IGNORES SERVER LOAD BALANCING REQUESTS */Y unsigned dev$v_noclu : 1; /* DEVICE WILL NEVER BE AVAILABLE CLUSTER-WIDE */Q unsigned dev$v_vmem : 1; /* Virtual member of a constituent set */N unsigned dev$v_scsi : 1; /* DEVICE IS A SCSI DEVICE */f unsigned dev$v_wlg : 1; /* DEVICE HAS MSCP Based (Phase I) WRITE LOGGING CAPABILITY */Q unsigned dev$v_nofe : 1; /* DEVICE DOESN'T SUPPORT FORCED ERROR */X unsigned dev$v_fill_2 : 1; /* Reserved for: Allocation in progress (MME) */N unsigned dev$v_cramio : 1; /* Performs Mailbox I/O */W unsigned dev$v_dtn : 1; /* Device has DDR Device Type Name available */" unsigned dev$v_fill_3 : 1;N unsigned dev$v_pool_mbr : 1; /* Unit is bound to a storage pool */ } dev$r_devdef_bits1; } DEVDEF; #if !defined(__VAXC).#define dev$v_rec dev$r_devdef_bits0.dev$v_rec.#define dev$v_ccl dev$r_devdef_bits0.dev$v_ccl.#define dev$v_trm dev$r_devdef_bits0.dev$v_trm.#define dev$v_dir dev$r_devdef_bits0.dev$v_dir.#define dev$v_sdi dev$r_devdef_bits0.dev$v_sdi.#define dev$v_sqd dev$r_devdef_bits0.dev$v_sqd.#define dev$v_spl dev$r_devdef_bits0.dev$v_spl.#define dev$v_opr dev$r_devdef_bits0.dev$v_opr.#define dev$v_rct dev$r_devdef_bits0.dev$v_rct0#define dev$v_qsvd dev$r_devdef_bits0.dev$v_qsvd2#define dev$v_qsvbl dev$r_devdef_bits0.dev$v_qsvblF#define dev$v_mpdev_secondary dev$r_devdef_bits0.dev$v_mpdev_secondary@#define dev$v_mpdev_member dev$r_devdef_bits0.dev$v_mpdev_member.#define dev$v_net dev$r_devdef_bits0.dev$v_net.#define dev$v_fod dev$r_devdef_bits0.dev$v_fod.#define dev$v_dua dev$r_devdef_bits0.dev$v_dua.#define dev$v_shr dev$r_devdef_bits0.dev$v_shr.#define dev$v_gen dev$r_devdef_bits0.dev$v_gen.#define dev$v_avl dev$r_devdef_bit s0.dev$v_avl.#define dev$v_mnt dev$r_devdef_bits0.dev$v_mnt.#define dev$v_mbx dev$r_devdef_bits0.dev$v_mbx.#define dev$v_dmt dev$r_devdef_bits0.dev$v_dmt.#define dev$v_elg dev$r_devdef_bits0.dev$v_elg.#define dev$v_all dev$r_devdef_bits0.dev$v_all.#define dev$v_for dev$r_devdef_bits0.dev$v_for.#define dev$v_swl dev$r_devdef_bits0.dev$v_swl.#define dev$v_idv dev$r_devdef_bits0.dev$v_idv.#define dev$v_odv dev$r_devdef_bits0.dev$v_odv.#define dev$v_rnd dev$r_devdef_bits0.dev$v_rnd.#define dev$ v_rtm dev$r_devdef_bits0.dev$v_rtm.#define dev$v_rck dev$r_devdef_bits0.dev$v_rck.#define dev$v_wck dev$r_devdef_bits0.dev$v_wck.#define dev$v_clu dev$r_devdef_bits1.dev$v_clu.#define dev$v_det dev$r_devdef_bits1.dev$v_det.#define dev$v_rtt dev$r_devdef_bits1.dev$v_rtt.#define dev$v_cdp dev$r_devdef_bits1.dev$v_cdp,#define dev$v_2p dev$r_devdef_bits1.dev$v_2p0#define dev$v_mscp dev$r_devdef_bits1.dev$v_mscp.#define dev$v_ssm dev$r_devdef_bits1.dev$v_ssm.#define dev$v_srv dev$r_devdef_bits1.d ev$v_srv.#define dev$v_red dev$r_devdef_bits1.dev$v_red.#define dev$v_nnm dev$r_devdef_bits1.dev$v_nnm.#define dev$v_wbc dev$r_devdef_bits1.dev$v_wbc.#define dev$v_wtc dev$r_devdef_bits1.dev$v_wtc.#define dev$v_hoc dev$r_devdef_bits1.dev$v_hoc.#define dev$v_loc dev$r_devdef_bits1.dev$v_loc.#define dev$v_dfs dev$r_devdef_bits1.dev$v_dfs.#define dev$v_dap dev$r_devdef_bits1.dev$v_dap.#define dev$v_nlt dev$r_devdef_bits1.dev$v_nlt.#define dev$v_sex dev$r_devdef_bits1.dev$v_sex.#define dev$v_sh d dev$r_devdef_bits1.dev$v_shd.#define dev$v_vrt dev$r_devdef_bits1.dev$v_vrt.#define dev$v_ldr dev$r_devdef_bits1.dev$v_ldr0#define dev$v_nolb dev$r_devdef_bits1.dev$v_nolb2#define dev$v_noclu dev$r_devdef_bits1.dev$v_noclu0#define dev$v_vmem dev$r_devdef_bits1.dev$v_vmem0#define dev$v_scsi dev$r_devdef_bits1.dev$v_scsi.#define dev$v_wlg dev$r_devdef_bits1.dev$v_wlg0#define dev$v_nofe dev$r_devdef_bits1.dev$v_nofe4#define dev$v_fill_2 dev$r_devdef_bits1.dev$v_fill_24#define dev$v_cramio dev $r_devdef_bits1.dev$v_cramio.#define dev$v_dtn dev$r_devdef_bits1.dev$v_dtn8#define dev$v_pool_mbr dev$r_devdef_bits1.dev$v_pool_mbr"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union devdef { __struct {N unsigned dev$v_rec : 1; /* DEVICE RECORD ORIENTED */N unsigned dev$v_ccl : 1; /* CARRIAGE CONTROL DEVICE */N unsigned dev$v_trm : 1; /* DEVICE IS A TERMINAL */N unsigned dev$v_dir : 1; /* DEVICE IS DIRECTORY STRUCTURED */T unsigned dev$v_sdi : 1; /* DEVICE IS SINGLE DIRECTORY STRUCTURED */_ unsigned dev$v_sqd : 1; /* SEQUENTIAL BLOCK-ORIENTED DEVICE (I.E., MAGTAPE) */N unsigned dev$v_spl : 1; /* DEVICE BEING SPOOLED */N unsigned dev$v_opr : 1; /* DEVICE IS AN OPERATOR */X unsigned dev$v_rct : 1; /* DISK CONTAINS RCT (DEC STANDARD 166 DISK) */R unsigned dev$v_qsvd : 1; /* Client device is served by QIOserver */T unsigned dev$v_qsvbl : 1; /* Server device is servable by QIOserver */] unsigned dev$v_mpdev_secondary : 1; /* Indicates secondary unit in a multipath set */Q unsigned dev$v_mpdev_member : 1; /* Device is part of a multipath set. */N unsigned dev$v_net : 1; /* NETWORK DEVICE */X unsigned dev$v_fod : 1; /* FILES-ORIENTED DEVICE (I.E., DISK AND MT) */N  unsigned dev$v_dua : 1; /* DEVICE IS DUAL PORTED */N unsigned dev$v_shr : 1; /* DEVICE SHAREABLE */N unsigned dev$v_gen : 1; /* DEVICE IS A GENERIC DEVICE */N unsigned dev$v_avl : 1; /* DEVICE AVAILABLE FOR USE */N unsigned dev$v_mnt : 1; /* DEVICE IS MOUNTED */N unsigned dev$v_mbx : 1; /* DEVICE IS A MAILBOX */N unsigned dev$v_dmt : 1; /* DEVICE MARKED FOR DISMOUNT */O unsigned dev$v_elg : 1; /* DEVICE HAS ERROR LOGGING ENABLED */N unsigned dev$v_all : 1; /* DEVICE IS ALLOCATED */d unsigned dev$v_for : 1; /* DEVICE IS MOUNTED FOREIGN (I.E., NON-FILE STRUCTURED) */N unsigned dev$v_swl : 1; /* DEVICE IS SOFTWARE WRITE LOCKED */P unsigned dev$v_idv : 1; /* DEVICE CAPABLE OF PROVIDING INPUT */Q unsigned dev$v_odv : 1; /* DEVICE CAPABLE OF PROVIDING OUTPUT */N unsigned dev$v_rnd : 1; /* DEVICE ALLOWS RANDOM ACCESS */N unsigned dev$v_rtm : 1; /* DEVICE IS REALTIME IN NATURE */O unsigned dev$v_rck : 1; /* DEVICE HAS READ CHECKING ENABLED */P unsigned dev$v_wck : 1; /* DEVICE HAS WRITE CHECKING ENABLED */ } dev$r_devdef_bits0; __struct {N unsigned dev$v_clu : 1; /* DEVICE IS AVAILABLE CLUSTER-WIDE */N unsigned dev$v_det : 1; /* DEVICE IS DETACHED TERMINAL */V unsigned dev$v_rtt : 1; /* DEVICE HAS REMOTE TERMINAL UCB EXTENSION */N unsigned dev$v_cdp : 1; /* DUAL PATH DEVICE WITH 2 UCBs */P unsigned dev$v_2p : 1; /* TWO PATHS ARE KNOWN TO THIS DEVICE */W unsigned dev$v_mscp : 1; /* DEVICE ACCESSED USING MSCP (disk or tape) */] unsigned dev$v_ssm : 1; /* this bit was set for Phase I (controller-based) */N/* shadowing only. This bit is not set for */N/* Phase II (host-based) shadowing; Phase II */N/* sets the SHD bit (see below). */R unsigned dev$v_srv : 1; /* DEVICE IS SERVED VIA THE MSCP SERVER */N unsigned dev$v_red : 1; /* DEVICE IS redirected terminal */N unsigned dev$v_nnm : 1; /* DEVICE HAS "node$" PREFIX */P unsigned dev$v_wbc : 1; /* DEVICE SUPPORTS WRITE-BACK CACHING */S unsigned dev$v_wtc : 1; /* DEVICE SUPPORTS WRITE-THROUGH CACHING */N unsigned dev$v_hoc : 1; /* DEVICE SUPPORTS HOST CACHING */c unsigned dev$v_loc : 1; /* DEVICE ACCESSIBLE VIA LOCAL (NON-EMULATED) CONTROLLER */N unsigned dev$v_dfs : 1; /* DEVICE IS DFS-SERVED */N unsigned dev$v_dap : 1; /* DEVICE IS DAP ACCESSED */`  unsigned dev$v_nlt : 1; /* DEVICE IS NOT-LAST-TRACK (I.E. IT HAS NO BAD BLOCK */N/* INFORMATION ON ITS LAST TRACK) */_ unsigned dev$v_sex : 1; /* DEVICE (tape) SUPPORTS SERIOUS EXCEPTION HANDLING */[ unsigned dev$v_shd : 1; /* DEVICE IS A MEMBER OF A HOST BASED SHADOW SET */Q unsigned dev$v_vrt : 1; /* DEVICE IS A SHADOW SET VIRTUAL UNIT */N unsigned dev$v_ldr : 1; /* LOADER PRESENT (TAPES) */[ unsigned dev$v_nolb : 1; /* DEVICE IGNORES SERVER LOAD BALANCING REQUESTS */Y unsigned dev$v_noclu : 1; /* DEVICE WILL NEVER BE AVAILABLE CLUSTER-WIDE */Q unsigned dev$v_vmem : 1; /* Virtual member of a constituent set */N unsigned dev$v_scsi : 1; /* DEVICE IS A SCSI DEVICE */f unsigned dev$v_wlg : 1; /* DEVICE HAS MSCP Based (Phase I) WRITE LOGGING CAPABILITY */Q unsigned dev$v_nofe : 1; /* DEVICE DOESN'T SUPPORT FORCED ERROR */X unsigned dev$v_fill_2 : 1; /* Reserved for: Allocation in progress (MME) */N unsigned dev$v_cramio : 1; /* Performs Mailbox I/O */W unsigned dev$v_dtn : 1; /* Device has DDR Device Type Name available */" unsigned dev$v_fill_3 : 1;N unsigned dev$v_pool_mbr : 1; /* Unit is bound to a storage pool */ } dev$r_devdef_bits1; } ; #if !defined(__VAXC).#defin e dev$v_rec dev$r_devdef_bits0.dev$v_rec.#define dev$v_ccl dev$r_devdef_bits0.dev$v_ccl.#define dev$v_trm dev$r_devdef_bits0.dev$v_trm.#define dev$v_dir dev$r_devdef_bits0.dev$v_dir.#define dev$v_sdi dev$r_devdef_bits0.dev$v_sdi.#define dev$v_sqd dev$r_devdef_bits0.dev$v_sqd.#define dev$v_spl dev$r_devdef_bits0.dev$v_spl.#define dev$v_opr dev$r_devdef_bits0.dev$v_opr.#define dev$v_rct dev$r_devdef_bits0.dev$v_rct0#define dev$v_qsvd dev$r_devdef_bits0.dev$v_qsvd2#define dev$v_qsvbl dev$r_devd ef_bits0.dev$v_qsvblF#define dev$v_mpdev_secondary dev$r_devdef_bits0.dev$v_mpdev_secondary@#define dev$v_mpdev_member dev$r_devdef_bits0.dev$v_mpdev_member.#define dev$v_net dev$r_devdef_bits0.dev$v_net.#define dev$v_fod dev$r_devdef_bits0.dev$v_fod.#define dev$v_dua dev$r_devdef_bits0.dev$v_dua.#define dev$v_shr dev$r_devdef_bits0.dev$v_shr.#define dev$v_gen dev$r_devdef_bits0.dev$v_gen.#define dev$v_avl dev$r_devdef_bits0.dev$v_avl.#define dev$v_mnt dev$r_devdef_bits0.dev$v_mnt.#define de v$v_mbx dev$r_devdef_bits0.dev$v_mbx.#define dev$v_dmt dev$r_devdef_bits0.dev$v_dmt.#define dev$v_elg dev$r_devdef_bits0.dev$v_elg.#define dev$v_all dev$r_devdef_bits0.dev$v_all.#define dev$v_for dev$r_devdef_bits0.dev$v_for.#define dev$v_swl dev$r_devdef_bits0.dev$v_swl.#define dev$v_idv dev$r_devdef_bits0.dev$v_idv.#define dev$v_odv dev$r_devdef_bits0.dev$v_odv.#define dev$v_rnd dev$r_devdef_bits0.dev$v_rnd.#define dev$v_rtm dev$r_devdef_bits0.dev$v_rtm.#define dev$v_rck dev$r_devdef_bits0 .dev$v_rck.#define dev$v_wck dev$r_devdef_bits0.dev$v_wck.#define dev$v_clu dev$r_devdef_bits1.dev$v_clu.#define dev$v_det dev$r_devdef_bits1.dev$v_det.#define dev$v_rtt dev$r_devdef_bits1.dev$v_rtt.#define dev$v_cdp dev$r_devdef_bits1.dev$v_cdp,#define dev$v_2p dev$r_devdef_bits1.dev$v_2p0#define dev$v_mscp dev$r_devdef_bits1.dev$v_mscp.#define dev$v_ssm dev$r_devdef_bits1.dev$v_ssm.#define dev$v_srv dev$r_devdef_bits1.dev$v_srv.#define dev$v_red dev$r_devdef_bits1.dev$v_red.#define dev$v_ nnm dev$r_devdef_bits1.dev$v_nnm.#define dev$v_wbc dev$r_devdef_bits1.dev$v_wbc.#define dev$v_wtc dev$r_devdef_bits1.dev$v_wtc.#define dev$v_hoc dev$r_devdef_bits1.dev$v_hoc.#define dev$v_loc dev$r_devdef_bits1.dev$v_loc.#define dev$v_dfs dev$r_devdef_bits1.dev$v_dfs.#define dev$v_dap dev$r_devdef_bits1.dev$v_dap.#define dev$v_nlt dev$r_devdef_bits1.dev$v_nlt.#define dev$v_sex dev$r_devdef_bits1.dev$v_sex.#define dev$v_shd dev$r_devdef_bits1.dev$v_shd.#define dev$v_vrt dev$r_devdef_bits1.dev $v_vrt.#define dev$v_ldr dev$r_devdef_bits1.dev$v_ldr0#define dev$v_nolb dev$r_devdef_bits1.dev$v_nolb2#define dev$v_noclu dev$r_devdef_bits1.dev$v_noclu0#define dev$v_vmem dev$r_devdef_bits1.dev$v_vmem0#define dev$v_scsi dev$r_devdef_bits1.dev$v_scsi.#define dev$v_wlg dev$r_devdef_bits1.dev$v_wlg0#define dev$v_nofe dev$r_devdef_bits1.dev$v_nofe4#define dev$v_fill_2 dev$r_devdef_bits1.dev$v_fill_24#define dev$v_cramio dev$r_devdef_bits1.dev$v_cramio.#define dev$v_dtn dev$r_devdef_bits1.dev$v_dtn8#define dev$v_pool_mbr dev$r_devdef_bits1.dev$v_pool_mbr"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DEVDEF_LOADED */ wwқ/********* ***********************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $DIBDEF ***/#ifndef __DIBDEF_LOADED#define __DIBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* DEVICE INFORMATION BLOCK DEFINITIONS */N/*-  */N#define DIB$K_LENGTH 116 /*LENGTH OF TOTAL BUFFER */N#define DIB$C_LENGTH 116 /*LENGTH OF TOTAL BUFFER */ #ifdef __NEW_STARLETtypedef struct _dibdef {N unsigned int dib$l_devchar; /*DEVICE CHARACTERISTICS */N unsigned char dib$b_devclass; /*DEVICE CLASS */N unsigned char dib$b_devtype; /*DEVICE TYPE */N unsigned short int dib$w_devbufsiz; /*DEVICE BUFFER SIZE */ __union {N unsigned int dib$l_devdepend; /*DEVICE DEPENDENT INFORMATION */ __struct {N unsigned char dib$b_sectors; /*(DISK ONLY) SECTORS PER TRACK */N unsigned char dib$b_tracks; /* " TRACKS PER CYLINDER */N unsigned short int dib$w_cylinders; /* " NUMBER OF CYLINDERS */% } dib$r_devdepend_fields;" } dib$r_devdepend_overlay;N unsigned short int dib$w_unit; /*DEVICE UNIT NUMBER */R unsigned short int dib$w_devnamoff; /*OFFSET TO DEVICE NAME COUNTED STRING */Q unsigned int dib$l_pid; /*DEVICE OWNER PROCESS IDENTIFICATION */S unsigned int dib$l_ownuic; /*DEVICE OWNER USER IDENTIFICATION CODE */N unsigned short int dib$w_vprot; /*DEVICE PROTECTION MASK */N unsigned short int dib$w_errcnt; /*DEVICE ERROR COUNT */N  unsigned int dib$l_opcnt; /*DEVICE OPERATIONS COUNT */S unsigned short int dib$w_volnamoff; /*OFFSET TO VOLUME LABEL COUNTED STRING */N unsigned short int dib$w_recsiz; /*BLOCKED RECORD SIZE */Q char dib$t_devname [76]; /*SPACE FOR DEVNAME AND LABEL (64+12) */N unsigned int dib$l_maxblock; /*DISK VOLUME SIZE IN BLOCKS */ } DIBDEF; #if !defined(__VAXC)?#define dib$l_devdepend dib$r_devdepend_overlay.dib$l_ devdependR#define dib$b_sectors dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$b_sectorsP#define dib$b_tracks dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$b_tracksV#define dib$w_cylinders dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$w_cylinders"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct dibdef {N unsigned int dib$l_devchar; /*DEVICE CHARACTERISTICS */N unsigned char dib$b_devclass; /*DEVICE CLASS  */N unsigned char dib$b_devtype; /*DEVICE TYPE */N unsigned short int dib$w_devbufsiz; /*DEVICE BUFFER SIZE */ __union {N unsigned int dib$l_devdepend; /*DEVICE DEPENDENT INFORMATION */ __struct {N unsigned char dib$b_sectors; /*(DISK ONLY) SECTORS PER TRACK */N unsigned char dib$b_tracks; /* " TRACKS PER CYLINDER */N unsigned short int dib$w_cylinders; /* " NUMBER OF CYLINDERS */% } dib$r_devdepend_fields;" } dib$r_devdepend_overlay;N unsigned short int dib$w_unit; /*DEVICE UNIT NUMBER */R unsigned short int dib$w_devnamoff; /*OFFSET TO DEVICE NAME COUNTED STRING */Q unsigned int dib$l_pid; /*DEVICE OWNER PROCESS IDENTIFICATION */S unsigned int dib$l_ownuic; /*DEVICE OWNER USER IDENTIFICATION CODE */N unsigned short int dib$w_vprot; /*DEVICE PROTECTION MASK  */N unsigned short int dib$w_errcnt; /*DEVICE ERROR COUNT */N unsigned int dib$l_opcnt; /*DEVICE OPERATIONS COUNT */S unsigned short int dib$w_volnamoff; /*OFFSET TO VOLUME LABEL COUNTED STRING */N unsigned short int dib$w_recsiz; /*BLOCKED RECORD SIZE */Q char dib$t_devname [76]; /*SPACE FOR DEVNAME AND LABEL (64+12) */N unsigned int dib$l_maxblock; /*DISK VOLUME SIZE IN BLOCKS */ } ;  #if !defined(__VAXC)?#define dib$l_devdepend dib$r_devdepend_overlay.dib$l_devdependR#define dib$b_sectors dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$b_sectorsP#define dib$b_tracks dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$b_tracksV#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 __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DIBDEF_LOADED */ ww+"ӛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DG A7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $DIRENTDEF ***/#ifndef __DIRENTDEF_LOADED#define __DIRENTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #define DIRENT$K_NAME 1#define DIRENT$K_VERSION 2 #ifdef __NEW_STARLETtypedef struct _dirent { short int dirent$iw_size; short int dirent$iw_type; } DIRENT;#else /* __OLD_STARLET */typedef struct _dirent { short int dirent$iw_size; short int dirent$iw_type; } dirent;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _dirent_nam {! short int dirent_nam$iw_size;! short int dirent_nam$iw_type;* short int dirent_nam$iw_version_limit;! short int dirent_nam$iw_fill;" int dirent_nam$il_name_length; char dirent_nam$t_name [1]; } DIRENT_NAM;#else /* __OLD_STARLET */typedef struct _dirent_nam {! short int dirent_nam$iw_size;! short int dirent_nam$iw_type;* short int dirent_nam$iw_version_limit;! short int dirent_nam$iw_fill;" int dirent_nam$il_name_length; char dirent_nam$t_name [1]; } dirent_nam;%#endif /* #ifdef __NEW_STARLET */#define DIRENT$K_FILE 1#define DIRENT$K_DIRECTORY 2 #ifdef __NEW_STARLETtypedef struct _dirent_ver {! short int dirent_ver$iw_size;! short int dirent_ver$iw_type;$ short int dirent_ver$iw_version;% short int dirent_ver$iw_obj_type;! short int dirent_ver$iw_fill; __union {1 unsigned short int dirent_ver$iw_fid [3]; __struct {5 unsi gned short int dirent_ver$iw_fid_num;5 unsigned short int dirent_ver$iw_fid_seq; __union {9 unsigned short int dirent_ver$iw_fid_rvn; __struct {8 unsigned char dirent_ver$ib_fid_rvn;8 unsigned char dirent_ver$ib_fid_nmx;2 } dirent_ver$r_fid_rvn_fields;/ } dirent_ver$r_fid_rvn_overlay;& } dirent_ver$r_fid_fields;# } dirent_ver$r_fid_overlay; } DIRENT_VER; #if !defined(__VAXC)D#define dirent_ver$iw_fid dirent_ver$r_fid_overlay.dirent_ver$iw_fidd#define dirent_ver$iw_fid_num dirent_ver$r_fid_overlay.dirent_ver$r_fid_fields.dirent_ver$iw_fid_numd#define dirent_ver$iw_fid_seq dirent_ver$r_fid_overlay.dirent_ver$r_fid_fields.dirent_ver$iw_fid_seq#define dirent_ver$iw_fid_rvn dirent_ver$r_fid_overlay.dirent_ver$r_fid_fields.dirent_ver$r_fid_rvn_overlay.dirent_ver$iw_fid_rvn#define dirent_ver$ib_fid_rvn dirent_ver$r_fid_overlay .dirent_ver$r_fid_fields.dirent_ver$r_fid_rvn_overlay.dirent_ver$r_fid_rvn_fi\elds.dirent_ver$ib_fid_rvn#define dirent_ver$ib_fid_nmx dirent_ver$r_fid_overlay.dirent_ver$r_fid_fields.dirent_ver$r_fid_rvn_overlay.dirent_ver$r_fid_rvn_fi\elds.dirent_ver$ib_fid_nmx"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _dirent_ver {! short int dirent_ver$iw_size;! short int dirent_ver$iw_type;$ short int dirent_ver$iw_version;% short int dirent_ver $iw_obj_type;! short int dirent_ver$iw_fill; __union {1 unsigned short int dirent_ver$iw_fid [3]; __struct {5 unsigned short int dirent_ver$iw_fid_num;5 unsigned short int dirent_ver$iw_fid_seq; __union {9 unsigned short int dirent_ver$iw_fid_rvn; __struct {8 unsigned char dirent_ver$ib_fid_rvn;8 unsigned char dirent_ver$ib_fid_nmx;2 } dirent_ver$r_fid_rvn_fields;/ } dirent_ver$r_fid_rvn_overlay;& } dirent_ver$r_fid_fields;# } dirent_ver$r_fid_overlay; } dirent_ver; #if !defined(__VAXC)D#define dirent_ver$iw_fid dirent_ver$r_fid_overlay.dirent_ver$iw_fidd#define dirent_ver$iw_fid_num dirent_ver$r_fid_overlay.dirent_ver$r_fid_fields.dirent_ver$iw_fid_numd#define dirent_ver$iw_fid_seq dirent_ver$r_fid_overlay.dirent_ver$r_fid_fields.dirent_ver$iw_fid_seq#define dirent_ver$iw_fid_rvn dirent_ver$r_fid_overlay.dirent_ver$r_fid_fields.dirent_ver$r_fid_rvn_overlay.dirent_ver$iw_fid_rvn#define dirent_ver$ib_fid_rvn dirent_ver$r_fid_overlay.dirent_ver$r_fid_fields.dirent_ver$r_fid_rvn_overlay.dirent_ver$r_fid_rvn_fi\elds.dirent_ver$ib_fid_rvn#define dirent_ver$ib_fid_nmx dirent_ver$r_fid_overlay.dirent_ver$r_fid_fields.dirent_ver$r_fid_rvn_overlay.dirent_ver$r_fid_rvn_fi\elds.dirent_ver$ib_fid_nmx"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DIRENTDEF_LOADED */ wwKpӛ/********************************************************************************************************************************/=/* Created: 5-A pr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $DMTDEF ***/#ifndef __DMTDEF_LOADED#define __DMTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* FLAG BITS FOR THE $DISMOU (DISMOUNT) SYSTEM SERVICE. */N/* */#define DMT$M_NOUNLOAD 0x1#define DMT$M_UNIT 0x2#define DMT$M_ABORT 0x4#define DMT$M_CLUSTER 0x8#define DMT$M_UNLOAD 0x10#define DMT$M_OVR_CHECKS 0x20#define DMT$M_CHECK_ONLY 0x40#define DMT$M_REMOTE 0x80%#define DMT$M_MINICOPY_REQUIRED 0x100%#define DMT$M_MINICOPY_OPTIONAL 0x200#define DMT$M_FORCE 0x400 #ifdef __NEW_STARLETtypedef union _dmtdef { __struct {S unsigned dmt$v_nounload : 1; /* DO NOT UNLOAD (SPIN DOWN) THE VOLUME */Q unsigned dmt$v_unit : 1; /* DISMOUNT ONLY THE SPECIFIED VOLUME */I unsigned dmt$v_abort : 1; /* FORCED DISMOUNT */N unsigned dmt$v_cluster : 1; /* CLUSTER-WIDE DISMOUNT */U unsigned dmt$v_unload : 1; /* EXPLICIT UNLOAD (OVERRIDE UCB$x_UNLOAD) */N unsigned dmt$v_ovr_checks : 1; /* OVERRIDE OPEN FILE CHECKS */X unsigned dmt$v_check_only : 1; /* CHECK ONLY FOR OPEN FILES - DON'T DISMOUNT */e unsigned dmt$v_remote : 1; /* CURRENT DISMOUNTER IS REMOTE WITH RESPECT TO ORIGINATOR */N  unsigned dmt$v_minicopy_required : 1; /* BITMAP REQUIRED */N unsigned dmt$v_minicopy_optional : 1; /* BITMAP OPTIONAL */N unsigned dmt$v_force : 1; /* FORCE dismount of SSM */% unsigned dmt$v_fill_113_ : 5; } dmt$r_dmtdef_bits; } DMTDEF; #if !defined(__VAXC)7#define dmt$v_nounload dmt$r_dmtdef_bits.dmt$v_nounload/#define dmt$v_unit dmt$r_dmtdef_bits.dmt$v_unit1#define dmt$v_abort dmt$r_dmtdef_bits.dmt$v_ab ort5#define dmt$v_cluster dmt$r_dmtdef_bits.dmt$v_cluster3#define dmt$v_unload dmt$r_dmtdef_bits.dmt$v_unload;#define dmt$v_ovr_checks dmt$r_dmtdef_bits.dmt$v_ovr_checks;#define dmt$v_check_only dmt$r_dmtdef_bits.dmt$v_check_only3#define dmt$v_remote dmt$r_dmtdef_bits.dmt$v_remoteI#define dmt$v_minicopy_required dmt$r_dmtdef_bits.dmt$v_minicopy_requiredI#define dmt$v_minicopy_optional dmt$r_dmtdef_bits.dmt$v_minicopy_optional1#define dmt$v_force dmt$r_dmtdef_bits.dmt$v_force"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union dmtdef { __struct {S unsigned dmt$v_nounload : 1; /* DO NOT UNLOAD (SPIN DOWN) THE VOLUME */Q unsigned dmt$v_unit : 1; /* DISMOUNT ONLY THE SPECIFIED VOLUME */I unsigned dmt$v_abort : 1; /* FORCED DISMOUNT */N unsigned dmt$v_cluster : 1; /* CLUSTER-WIDE DISMOUNT */U unsigned dmt$v_unload : 1; /* EXPLICIT UNLOAD (OVERRIDE UCB$x_UNLOAD) */N unsigned dmt$v_ovr_checks : 1; /* OVERRIDE OPEN FILE CHECKS */X unsigned dmt$v_check_only : 1; /* CHECK ONLY FOR OPEN FILES - DON'T DISMOUNT */e unsigned dmt$v_remote : 1; /* CURRENT DISMOUNTER IS REMOTE WITH RESPECT TO ORIGINATOR */N unsigned dmt$v_minicopy_required : 1; /* BITMAP REQUIRED */N unsigned dmt$v_minicopy_optional : 1; /* BITMAP OPTIONAL */N unsigned dmt$v_force : 1; /* FORCE dismount of SSM  */% unsigned dmt$v_fill_113_ : 5; } dmt$r_dmtdef_bits; } ; #if !defined(__VAXC)7#define dmt$v_nounload dmt$r_dmtdef_bits.dmt$v_nounload/#define dmt$v_unit dmt$r_dmtdef_bits.dmt$v_unit1#define dmt$v_abort dmt$r_dmtdef_bits.dmt$v_abort5#define dmt$v_cluster dmt$r_dmtdef_bits.dmt$v_cluster3#define dmt$v_unload dmt$r_dmtdef_bits.dmt$v_unload;#define dmt$v_ovr_checks dmt$r_dmtdef_bits.dmt$v_ovr_checks;#define dmt$v_check_only dmt$r_dmtdef_bits.dmt$v_check _only3#define dmt$v_remote dmt$r_dmtdef_bits.dmt$v_remoteI#define dmt$v_minicopy_required dmt$r_dmtdef_bits.dmt$v_minicopy_requiredI#define dmt$v_minicopy_optional dmt$r_dmtdef_bits.dmt$v_minicopy_optional1#define dmt$v_force dmt$r_dmtdef_bits.dmt$v_force"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DMTDEF_LOADED */ wwkӛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//************************************* *******************************************************************************************//*** MODULE $DPSDEF ***/#ifndef __DPSDEF_LOADED#define __DPSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* */N/* Get Device path information */N/* */N/* **** NOTE **** */N/* */N/*  New items must always be added at the END of the list so that */N/* users will not have to rebuild. */N/* */N/*- */W#define DPS$_MP_PATHNAME 1 /* Device path name */N/* */L/**** ADD NEW ITEM-CODES IMMEDIATELY BEFORE THIS COMMENT ***** */N/* */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DPSDEF_LOADED */ ww{ӛ/***************** ***************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SRMDEF.SDI;1 *//********************************************************************************************************************************//*** MODULE $DSCDEF ***/#ifndef __DSCDEF_LOADED#define __DSCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* Define Procedure argument data types */N/* The following encoding is used for atomic data elements: */N/* Mnemonic Code Description */S#define DSC$K_DTYPE_Z 0 /* Unspecified. The calling program has */Z#define DSC64$K_DTYPE_Z 0 /* specified no data type/* the called */N/* procedure should assume the argument is of */N/* the correct type. */U#define DSC$K_DTYPE_BU 2 /* Byte Logical. 8-bit unsigned quantity. */#define DSC64$K_DTYPE_BU 2V#define DSC$K_DTYPE_WU 3 /* Word Logical. 16-bit unsigned quantity. */#define DSC64$K_DTYPE_WU 3P#define DSC$K_DTYPE_LU 4 /* Longword Logical. 32-bit unsigned */N#define DSC64$K_DTYPE_LU 4 /* quantity. */P#define DSC$K_DTYPE_QU 5 /* Quadword Logical. 64-bit unsigned */N#define DSC64$K_DTYPE_QU 5 /* quantity. */Q#define DSC$K_DTYPE_OU 25 /* Octaword Logical. 128-bit unsigned */N#define DSC64$K_DTYPE_OU 25 /* quantity. */X#define DSC$K_DTYPE_B 6 /* Byte Integer. 8-bit signed 2's-complement */N#define DSC64$K_DTYPE_B 6 /* integer. */Y#define DSC$K_DTYPE_W 7 /* Word Integer. 16-bit signed 2's-complement */N#define DSC64$K_DTYPE_W 7 /* integer. */N#define DSC$K_DTYPE_L 8 /* Longword Integer. 32-bit signed */N#define DSC64$K_DTYPE_L 8 /* 2's-complement integer. */N#define DSC$K_DTYPE_Q 9 /* Quadword Integer. 64-bit signed */N#define DSC64$K_DTYPE_Q 9 /* 2's-complement integer. */O#define DSC$K_DTYPE_O 26 /* Octaword Integer. 128-bit signed */N#define DSC64$K_DTYPE_O 26 /* 2's-complement integer. */b#define DSC$K_DTYPE_F 10 /* F_floating. 32-bit F_floating quantity representing */N#define DSC64$K_DTYPE_F 10 /* a single-precision number. */b#define DSC$K_DTYPE_D 11 /* D_floating. 64-bit D_floating quantity representing */N#define DSC64$K_DTYPE_D 11 /* a double-precision number. */b#define DSC$K_DTYPE_G 27 /* G_floating. 64-bit G_floating quantity representing */N#define DSC64$K_DTYPE_G 27 /* a double-precision number. */c#define DSC$K_DTYPE_H 28 /* H_floating. 128-bit H_floating quantity representing */N#define DSC64$K_DTYPE_H 28 /* a quadruple-precision number. */]#define DSC$K_DTYPE_FC 12 /* F_floating complex. Ordered pair of F_floating */`#define DSC64$K_DTYPE_FC 12 /* quantities representing a single-precision complex */N/* number. The lower addressed quantity is the */N/* real part, the higher addressed quantity is the */N/* imaginary part.  */]#define DSC$K_DTYPE_DC 13 /* D_floating complex. Ordered pair of D_floating */`#define DSC64$K_DTYPE_DC 13 /* quantities representing a double-precision complex */N/* number. The lower addressed quantity is the */N/* real part, the higher addressed quantity is the */N/* imaginary part. */]#define DSC$K_DTYPE_GC 29 /* G_floating complex. Ordered pair of G_floating */`#define DSC64$K_DTYPE_GC 29 /* quantities representing a double-precision complex */N/* number. The lower addressed quantity is the */N/* real part, the higher addressed quantity is the */N/* imaginary part. */]#define DSC$K_DTYPE_HC 30 /* H_floating complex. Ordered pair of H_floating */c#define DSC64$K_DTYPE_HC 30 /* quantities representing a quadruple-precision complex */N/* number. The lower addressed quantity is the */N/* real part, the higher addressed quantity is the */N/* imaginary part. */i#define DSC$K_DTYPE_FS 52 /* IEEE floating basic single S. 32-bit quantity representing */N#define DSC64$K_DTYPE_FS 52 /* a single-precision number. */i#define DSC$K_DTYPE_FT 53 /* IEEE floating basic double T. 64-bit quantity representing */N#define DSC64$K_DTYPE_FT 53 /* a double-precision number. */o#define DSC$K_DTYPE_FSC 54 /* IEEE floating basic single S complex. Ordered pair of S_floating */`#define DSC64$K_DTYPE_FSC 54 /* quantities representing a single-precision complex */N/* number. The lower addressed quantity is the */N/* real part, the higher addressed quantity is the */N/* imaginary part. */o#define DSC$K_DTYPE_FTC 55 /* IEEE floating basic double T complex. Ordered pair of T_floating */`#define DSC64$K_DTYPE_FTC 55 /* quantities representing a double-precision complex */N/* number. The lower addressed quantity is the */N/* real part, the higher addressed quantity is the  */N/* imaginary part. */m#define DSC$K_DTYPE_FX 57 /* IEEE floating basic quadruple X. 128-bit quantity representing */N#define DSC64$K_DTYPE_FX 57 /* an extended-precision number. */r#define DSC$K_DTYPE_FXC 58 /* IEEE floating basic quadruple X complex. Ordered pair of X_floating */c#define DSC64$K_DTYPE_FXC 58 /* quantities representing an extended-precision complex */N/* number. The lower addressed quantity is the */N/* real part, the higher addressed quantity is the */N/* imaginary part. */[#define DSC$K_DTYPE_CIT 31 /* COBOL Intermediate Temporary. Floating point */W#define DSC64$K_DTYPE_CIT 31 /* datum with an 18 digit normalized decimal */N/* fraction and a 2 digit decimal exponent. The  */N/* fraction is represented as a packed decimal */N/* number. The exponent is represented as a */N/* 16-bit 2's complement integer. */N/* The following string types are ordinarily described by a string */N/* descriptor. The data type codes below occur in those descriptors: */]#define DSC$K_DTYPE_T 14 /* Character-coded text. A single 8-bit character */V#def ine DSC64$K_DTYPE_T 14 /* (atomic data type) or a sequence of 0 to */N/* 2**16-1 8-bit characters (string data type). */V#define DSC$K_DTYPE_VT 37 /* Varying Character-coded Text Data Type. */#define DSC64$K_DTYPE_VT 37N#define DSC$K_DTYPE_T2 38 /* 16-bit Text (Asian workstations) */#define DSC64$K_DTYPE_T2 38N#define DSC$K_DTYPE_NU 15 /* Numeric string, unsigned. */#define DSC64$K_DTYPE_NU 15R#def ine DSC$K_DTYPE_NL 16 /* Numeric string, left separate sign. */#define DSC64$K_DTYPE_NL 16U#define DSC$K_DTYPE_NLO 17 /* Numeric string, left overpunched sign. */#define DSC64$K_DTYPE_NLO 17S#define DSC$K_DTYPE_NR 18 /* Numeric string, right separate sign. */#define DSC64$K_DTYPE_NR 18V#define DSC$K_DTYPE_NRO 19 /* Numeric string, right overpunched sign. */#define DSC64$K_DTYPE_NRO 19N#define DSC$K_DTYPE_NZ 20 /* N umeric string, zoned sign. */#define DSC64$K_DTYPE_NZ 20N#define DSC$K_DTYPE_P 21 /* Packed decimal string. */#define DSC64$K_DTYPE_P 21N#define DSC$K_DTYPE_V 1 /* Bit. An aligned bit string. */#define DSC64$K_DTYPE_V 1N#define DSC$K_DTYPE_VU 34 /* Bit Unaligned. */#define DSC64$K_DTYPE_VU 34N/* The following encodings are used for miscellaneous data types: */N#define DSC$K_DTYPE_ZI 22  /* Sequence of instructions. */#define DSC64$K_DTYPE_ZI 22N#define DSC$K_DTYPE_ZEM 23 /* Procedure entry mask. */#define DSC64$K_DTYPE_ZEM 23]#define DSC$K_DTYPE_DSC 24 /* Descriptor. This data type allows a descriptor */[#define DSC64$K_DTYPE_DSC 24 /* to be an argument data type, thereby allowing */N/* the use of levels of descriptors. */[#define DSC$K_DTYPE_BPV 32 /* Bound Procedure Value. A two longword entity */^#define DSC64$K_DTYPE_BPV 32 /* in which the first longword contains the address */N/* of a procedure entry mask and the second longword */N/* contains the environment value. The environmeent */N/* value is determined in a language specific */N/* fashion when the original Bound Procedure Value */N/* is generated. When the bound procedure is  */N/* invoked, the calling program loads the second */N/* longword into R1. This data type can be passed */N/* using the immediate value mechanism when the */N/* environment value is not needed. In this case */N/* the argument list entry contains the address of */N/* the procedure entry mask and the second longword  */N/* is omitted. */N#define DSC$K_DTYPE_BLV 33 /* Bound label value. */#define DSC64$K_DTYPE_BLV 33N#define DSC$K_DTYPE_ADT 35 /* Absolute Date and Time */#define DSC64$K_DTYPE_ADT 35U/* K DTYPE_???,36 /* DTYPE code 36 is reserved for future definition */N/* The following types are used by the VAX/VMS Debug Facility: \FOR */N/* INTERNAL DOCUMENTATION ONLY . For details, see VAX/VMS Debug Facility */N/* Documentation.\ */N#define DSC$K_DTYPE_CAD 178 /* Address calculation command */#define DSC64$K_DTYPE_CAD 178N#define DSC$K_DTYPE_ENT 179 /* Entry global definition */#define DSC64$K_DTYPE_ENT 179N#define DSC$K_DTYPE_GBL 180 /* Global symbol definition */#define DSC64$K_DTYPE_GBL 180N#define DSC$K_DTYPE_EPT 181 /* Entry point to routine. */#define DSC64$K_DTYPE_EPT 181V#define DSC$K_DTYPE_R11 182 /* Line number relative to R11 correlation */N#define DSC64$K_DTYPE_R11 182 /* table. */N#define DSC$K_DTYPE_FLD 183 /* BLISS FIELD name. */#define DSC64$K_DTYPE_FLD 183N#define DSC$K_DTYPE_PCT 184 /* PSECT information. */#define DSC64$K_DTYPE_PCT 184S#define DSC$K_DTYPE_DPC 185 /*  PC correlation table for FORTRAN IV+ */#define DSC64$K_DTYPE_DPC 185N#define DSC$K_DTYPE_LBL 186 /* LITERAL or LABEL */#define DSC64$K_DTYPE_LBL 186U#define DSC$K_DTYPE_SLB 187 /* Label in non-assembly language modules */#define DSC64$K_DTYPE_SLB 187N#define DSC$K_DTYPE_MOD 188 /* Beginning of new module */#define DSC64$K_DTYPE_MOD 188N#define DSC$K_DTYPE_EOM 189 /* End of module */#defin e DSC64$K_DTYPE_EOM 189N#define DSC$K_DTYPE_RTN 190 /* Beginning of new routine */#define DSC64$K_DTYPE_RTN 190N#define DSC$K_DTYPE_EOR 191 /* End of routine */#define DSC64$K_DTYPE_EOR 191N/* The following type codes are RESERVED for future use: */N/* 37-177 RESERVED to DEC */N/* 192-255 RESERVED to CSS and customers */N/*  */N/* A uniform descriptor mechanism is defined for use by all procedures */N/* which conform to this standard. Descriptors are uniformly typed and */N/* the mechanism is extensible. As new varieties of descriptor become */N/* necessary, they will be added to this catalogue. */N/* Note: */N/*  */N/* All fields represent unsigned quantities unless explicitly stated */N/* otherwise. */N/* */N/* 32-bit Descriptor Prototype */N/* */N/* Each class of 32-bit descriptor consists of at least 2 longwords in */N/* the following format: */N/* */N/* +-------+-------+---------------+ */N/* | CLASS | DTYPE | LENGTH | :Descriptor */N/* +-------+-------+---------------+ */N/* | POINTER | */N/* +-------------------------------+ */N/* */N/* DSC$W_LENGTH A one-word field specific to the descriptor */N/* <0,15:0> class/* typically a 16-bit (unsigned) length. */N/* */N/* DSC$B_DTYPE A one-byte atomic data type code */N/* <0,23:16>  */N/* */N/* DSC$B_CLASS A one-byte descriptor class code (see below) */N/* <0,31:24> */N/* */N/* DSC$A_POINTER A longword pointing to the first byte of the */N/* <1,31:0> data element described.  */N/* */N/* 64-bit Descriptor Prototype */I/* */N/* Each class of 64-bit descriptor consists of at least 3 aligned */N/* quadwords in the following format: */N/* */N/* +-------+-------+---------------+ */N/* | CLASS | DTYPE | MBO (=1) | :Descriptor */N/* +-------+-------+---------------+ */N/* | MBMO (=-1) | */N/* +-------------------------------+ */N/* | | : 8 */N/* +- LENGTH -+  */N/* | | */N/* +-------------------------------+ */N/* | | : 16 */N/* +- POINTER -+ */N/* | | */N/* +-------------------------------+  */N/* */N/* DSC64$W_MBO A one-word field which must contain the value 1. */N/* <0,15:0> */N/* */N/* DSC64$B_DTYPE A one-byte atomic data type code */N/* <0,23:16> */N/*  */N/* DSC64$B_CLASS A one-byte descriptor class code (see below) */N/* <0,31:24> */N/* */N/* DSC$L_MBMO A longword field which must contain the value -1. */N/* <1,31:0> */N/*  */N/* DSC64$Q_LENGTH A quadword containing the length of the */N/* <2,63:0> data element described. */N/* */N/* DSC64$PQ_POINTER A quadword pointing to the first byte of the */N/* <4,63:0> data element described. */N/*  */N/* Define the descriptor class codes */N/* */N#define DSC$K_CLASS_Z 0 /* Unspecified */N#define DSC64$K_CLASS_Z 0 /* Unspecified */N#define DSC$K_CLASS_S 1 /* Scalar, String Descriptor */N#define DSC64$K_CLASS_S 1 /* Scalar, String Descriptor */N#define DSC$K_CLASS_D 2 /* Dynamic String Descriptor */N#define DSC64$K_CLASS_D 2 /* Dynamic String Descriptor */N#define DSC$K_CLASS_V 3 /* Reserved for use by Digital */N#define DSC64$K_CLASS_V 3 /* Reserved for use by Digital */N#define DSC$K_CLASS_A 4 /* Array Descriptor */N#define DSC64$K_CLASS_A 4 /* Array Descriptor */N#define DSC$K_CLASS_P 5  /* Procedure Descriptor */N#define DSC64$K_CLASS_P 5 /* Procedure Descriptor */O#define DSC$K_CLASS_PI 6 /* Procedure Incarnation Descriptor */O#define DSC64$K_CLASS_PI 6 /* Procedure Incarnation Descriptor */N#define DSC$K_CLASS_J 7 /* Reserved for use by Digital */N#define DSC64$K_CLASS_J 7 /* Reserved for use by Digital */N#define DSC$K_CLASS_JI 8 /* Obsolete  */O#define DSC$K_CLASS_SD 9 /* Decimal Scalar String Descriptor */O#define DSC64$K_CLASS_SD 9 /* Decimal Scalar String Descriptor */N#define DSC$K_CLASS_NCA 10 /* Non-contiguous Array Descriptor */N#define DSC64$K_CLASS_NCA 10 /* Non-contiguous Array Descriptor */N#define DSC$K_CLASS_VS 11 /* Varying String Descriptor */N#define DSC64$K_CLASS_VS 11 /* Varying String Descriptor */N#define DSC$K_CLASS_VSA 12 /* Varying String Array Descriptor */N#define DSC64$K_CLASS_VSA 12 /* Varying String Array Descriptor */N#define DSC$K_CLASS_UBS 13 /* Unaligned Bit String Descriptor */N#define DSC64$K_CLASS_UBS 13 /* Unaligned Bit String Descriptor */N#define DSC$K_CLASS_UBA 14 /* Unaligned Bit Array Descriptor */N#define DSC64$K_CLASS_UBA 14 /* Unaligned Bit Array Descriptor */N#define DSC$K_CLASS_SB 15  /* String with Bounds Descriptor */N#define DSC64$K_CLASS_SB 15 /* String with Bounds Descriptor */Z#define DSC$K_CLASS_UBSB 16 /* Unaligned Bit String with Bounds Descriptor */Z#define DSC64$K_CLASS_UBSB 16 /* Unaligned Bit String with Bounds Descriptor */N/* */N/* The following descriptor class is FOR INTERNAL USE ONLY by the VAX */N/* Common Run-Time Library and Debugger. This descriptor is not passed */N/* between separately compiled modules. For further information, see */N/* VAX-11 BASIC Description of Generated Code, Software Document */N/* Retrieval Number JBS-79-004. */N#define DSC$K_CLASS_BFA 191 /* BASIC File Array Descriptor */N/* Descriptor classes 17-190 are RESERVED to DEC. Classes */N/* 192 through 255 are RESERVED to CSS and customers.  */N/* */N/* Array Descriptor (DSC$K_CLASS_A) */N/* */N/* An array descriptor consists of 3 contiguous blocks. The first block */N/* contains the descriptor prototype information and is part of every */N/* array descriptor. The second and third blocks are optional. If the */N/* third block is present then so is the second. */N/* */N/* A complete 32-bit array descriptor has the form: */N/* */N/* +-------+-------+---------------+ */N/* | 4 | DTYPE | LENGTH | :Descriptor */N/* +-------+-------+-- -------------+ */N/* | POINTER | */N/* +-------+-------+---------------+ */N/* | DIMCT | AFLAGS|DIGITS | SCALE | Block 1 - Prototype */N/* +-------+-------+---------------+ */N/* | ARSIZE | */N/* +-------------------------------+   */N/* */N/* +-------------------------------+ */N/* | A0 | */N/* +-------------------------------+ */N/* | M1 | */N/* +-------------------------------+ */N /* | ... | Block 2 - Multipliers */N/* +-------------------------------+ */N/* | M(n-1) | */N/* +-------------------------------+ */N/* | Mn | */N/* +-------------------------------+ */N/*   */N/* +-------------------------------+ */N/* | L1 | */N/* +-------------------------------+ */N/* | U1 | */N/* +-------------------------------+ */N/* | ... |  Block 3 - Bounds */N/* +-------------------------------+ */N/* | Ln | */N/* +-------------------------------+ */N/* | Un | */N/* +-------------------------------+ */N/* */N/* Block 1 of a 64-bit array descriptor has the following */N/* form. Blocks 2 and 3 have the same form as above, */N/* EXCEPT that the entries are QUADWORDS rather than */N/* longwords. */N/* */N/* +-------+-------+---------------+ */N/* | 4 | DTYPE | MBO | :Descriptor */N/* +-------+-------+---------------+ */N/* | MBMO | */N/* +-------+-------+---------------+ */N/* | | : 8 */N/* +- LENGTH -+ */N/* | |  */N/* +-------------------------------+ */N/* | | : 16 */N/* +- POINTER -+ */N/* | | */N/* +-------------------------------+ */N/* | DIMCT | AFLAGS|DIGITS | SCALE | : 24 */N/* +-------+-------+---------------+ */N/* | MBZ | */N/* +-------+-------+---------------+ */N/* | | : 32 */N/* +- ARSIZE -+ */N/* | | */N/* +-------------------------------+ */N/* */N/* */N/* Define descriptor fields. 32-bit versions are defined first, followed */N/* by the 64-bit equivalents. */N/* */N/* \The following three fields are only valid fo r descriptor */N/* class DSC$K_CLASS_BFA (see above). \ */ #ifdef __NEW_STARLETCtypedef struct _dscdef { /* WARNING: aggregate has origin of -12 */; /* WARNING: aggregate element "dsc$a_handle" ignored *// /* WARNING: aggregate element "" ignored *// /* WARNING: aggregate element "" ignored *// /* WARNING: aggregate element "" ignored *// /* WARNING: aggregate element "" ignored */< /* WARNING: aggregate element "d sc$l_byteoff" ignored *// /* WARNING: aggregate element "" ignored *// /* WARNING: aggregate element "" ignored *// /* WARNING: aggregate element "" ignored */< /* WARNING: aggregate element "dsc$l_logunit" ignored */N/* which the file containing the array has */N/* been opened. This is set by the creator of the */N/* descriptor before first referencing the array. */N/*  */N/* End of BASIC File Array specific descriptor fields. The remaining */N/* fields are common to all array descriptors. */N/* */N/* */b unsigned short int dsc$w_length; /* A one-word field specifiec to the descriptor class; */N/* typically a 16-bit (unsigned) l ength. */ } DSCDEF;#else /* __OLD_STARLET */:struct dscdef { /* WARNING: aggregate has origin of -12 */] int dsc$a_handle; /* The address of a vector of data concerning the */N/* current state of processing of the array. This */N/* is set to zero by the creator of the */N/* descriptor, and maintained thereafter by the */N/* BASIC file array processing functions. */[ unsigned int dsc$l_byteoff; /* Byte offset in the file of element 0,0,...,0 */N/* of the array. This need not be within the */N/* array, or even within the file if the array */N/* does not have zero origin. */Y unsigned int dsc$l_logunit; /* The logical unit number (BASIC channel) on */N/* which the file containing the array has */N/* been opened. This is set by the creator of the */N/* descriptor before first referencing the array. */N/* */N/* End of BASIC File Array specific descriptor fields. The remaining */N/* fields are common to all array descriptors. */N/*  */N/* */b unsigned short int dsc$w_length; /* A one-word field specifiec to the descriptor class; */N/* typically a 16-bit (unsigned) length. */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _dscdef1 {a unsigned short int dsc$w_maxstrlen; /* Max length of the BODY field of the varying string */N/* in bytes in the range 0 to 2**16-1. */N/* (Classes VS, VSA) */N unsigned char dsc$b_dtype; /* A one-byte atomic data type code */N/* Symbols used in this filed have form: DSC$K_DTYPE_t */N/* where t is the data type mnemonic from above */N/* and agrees with methodology manual. */\ unsigned char dsc$b_class; /* A one-byte descriptor class code (see above). */N/* Symbols used in this field have form: DSC$K_CLASS_f */N/* where f is the argument form mnemonic from above */N/* and agrees with the methodology manual. */` void *dsc$a_pointer; /* An address pointing to the first byte of the data */N/* element described. */ } DSCDEF1;#else  /* __OLD_STARLET */struct dscdef1 {a unsigned short int dsc$w_maxstrlen; /* Max length of the BODY field of the varying string */N/* in bytes in the range 0 to 2**16-1. */N/* (Classes VS, VSA) */N unsigned char dsc$b_dtype; /* A one-byte atomic data type code */N/* Symbols used in this filed have form: DSC$K_DTYPE_t */N/* where t is the data type mnemonic from above */N/* and agrees with methodology manual. */\ unsigned char dsc$b_class; /* A one-byte descriptor class code (see above). */N/* Symbols used in this field have form: DSC$K_CLASS_f */N/* where f is the argument form mnemonic from above */N/* and agrees with the methodology manual. */` int dsc$a_pointer; /* An address pointing to the first byte of the data */N/* element described. */ } ;%#endif /* #ifdef __NEW_STARLET */W#define DSC$K_Z_BLN 8 /* Block length in bytes for Z class descr. */W#define DSC$C_Z_BLN 8 /* Block length in bytes for Z class descr. */W#define DSC$K_S_BLN 8 /* Block length in bytes for S class descr. */W#define DSC$C_S_BLN 8 /* Block length in bytes for S class descr. */W#define DSC$K_D_BLN 8 /* Block length in bytes for D class descr. */W#define DSC$C_D_BLN 8 /* Block length in bytes for D class descr. */W#define DSC$K_P_BLN 8 /* Block length in bytes for P class descr. */W#define DSC$C_P_BLN 8 /* Block length in bytes for P class descr. */W#define DSC$K_J_BLN 8 /* Block length in bytes for J class descr. */W#define DSC$C_J_BLN 8  /* Block length in bytes for J class descr. */X#define DSC$K_VS_BLN 8 /* Block length in bytes for VS class descr. */X#define DSC$C_VS_BLN 8 /* Block length in bytes for VS class descr. */ #ifdef __NEW_STARLETtypedef struct _dscdef2 { char dscdef$$_fill_3 [4];d void *dsc$a_base; /* Base of address relative to which the signed relative */N/* bit position, POS, is used to locate the bit string. */ !N/* (Classes UBS, UBA and UBSB) */ } DSCDEF2;#else /* __OLD_STARLET */struct dscdef2 { char dscdef$$_fill_3 [4];d int dsc$a_base; /* Base of address relative to which the signed relative */N/* bit position, POS, is used to locate the bit string. */N/* (Classes UBS, UBA and UBSB) */ } ;%#endif /* #ifdef __NEW_STARLET */N/*+ " */N/* End of common definitions for all descriptors. */N/*- */Y#define DSC$K_UBS_BLN 12 /* Block length in bytes for UBS class descr. */Y#define DSC$C_UBS_BLN 12 /* Block length in bytes for UBS class descr. */ #ifdef __NEW_STARLETtypedef struct _dscdef3 { char dscdef$$_fill_4 [8];T int ds#c$l_pos; /* Signed longword relative bit position */N/* with respect to BASE of the first bit */N/* of unaligned bit string */N/* WARNING!! Do not use this symbol to reference */N/* class UBA descriptors! The DSC$L_POS in that */N/* descriptor is at a variable location after the */N/* bounds and multiplier block $s. */ } DSCDEF3;#else /* __OLD_STARLET */struct dscdef3 { char dscdef$$_fill_4 [8];T int dsc$l_pos; /* Signed longword relative bit position */N/* with respect to BASE of the first bit */N/* of unaligned bit string */N/* WARNING!! Do not use this symbol to reference */N/* class UBA descriptors! The D %SC$L_POS in that */N/* descriptor is at a variable location after the */N/* bounds and multiplier blocks. */ } ;%#endif /* #ifdef __NEW_STARLET */N/*+ */N/* *Obsolete* Varying type descriptor definition */N/* This form should not be used. */N/*- & */ #ifdef __NEW_STARLETtypedef struct _dscdef4 { char dscdef$$_fill_5 [8];N unsigned short int dsc$w_maxlen; /* An unsigned word specifying the */N/* maximum length of the data item */N/* (i.e., the space allocated) */N short int dscdef$$_fill_1; /* reserved word */ } DSCDEF4;#else /* ' __OLD_STARLET */struct dscdef4 { char dscdef$$_fill_5 [8];N unsigned short int dsc$w_maxlen; /* An unsigned word specifying the */N/* maximum length of the data item */N/* (i.e., the space allocated) */N short int dscdef$$_fill_1; /* reserved word */ } ;%#endif /* #ifdef __NEW_STARLET */N/*+ ( */N/* Array Descriptor definitions */N/*- */X#define DSC$K_SD_BLN 12 /* Block length in bytes for SD class descr. */X#define DSC$C_SD_BLN 12 /* Block length in bytes for SD class descr. */ #ifdef __NEW_STARLETtypedef struct _dscdef5 { char dscdef_64$$_fill_6 [8];\ char dsc$b_scale; /* Signed power of ten m)ultiplier to convert the */N/* internal form to external form. For example, */N/* if internal number is 123 and scale is +1, */N/* then the represented external number is 1230. */V unsigned char dsc$b_digits; /* If non-zero, unsigned number of decimal */N/* digits in the external representation. If */N/* zero, the number of digits can be computed * */N/* based on DSC$W_LENGTH. */ __union {N unsigned char dsc$b_aflags; /* Array flag bits. */ __struct {N unsigned dscdef$$_fill_2 : 4; /* reserved to Digital */W unsigned dsc$v_fl_redim : 1; /* If set, the array can be redimensioned; */N/* i.e., DSC$A_A0, DSC$L_Mi, DSC$L_Li, and */N/* DSC$L_Ui may be changed. The redimensioned+ */N/* array cannot exceed the size allocated to */N/* the array (i.e. DSC$L_ARSIZE). */V unsigned dsc$v_fl_column : 1; /* If set, the elements of the array are */N/* stored by columns (FORTRAN)> Otherwise */N/* the elements are stored by rows. */Z unsigned dsc$v_fl_coeff : 1; /* If set, the multipli,cative coefficients in */N/* Block 2 are present. */Z unsigned dsc$v_fl_bounds : 1; /* If set, the bounds information in Block 3 */N/* is present. */ } dsc$r_aflags_bits; } dsc$r_aflags_overlay;N unsigned char dsc$b_dimct; /* Number of dimensions */\ unsigned int dsc$l_arsize; /* Total size of array (in bytes unles -s DTYPE is */N/* EQUL DSC$K_DTYPE_V or DSC$K_DTYPE_P). */T void *dsc$a_a0; /* Address of element A(0,0,...,0). This */N/* need not be within the actual array/* it */N/* is the same as DSC$A_POINTER for 0-origin */N/* arrays. */ } DSCDEF5; #if !defined(__VAXC)6#define dsc$b_aflags dsc$r_aflags_overlay. .dsc$b_aflagsL#define dsc$v_fl_redim dsc$r_aflags_overlay.dsc$r_aflags_bits.dsc$v_fl_redimN#define dsc$v_fl_column dsc$r_aflags_overlay.dsc$r_aflags_bits.dsc$v_fl_columnL#define dsc$v_fl_coeff dsc$r_aflags_overlay.dsc$r_aflags_bits.dsc$v_fl_coeffN#define dsc$v_fl_bounds dsc$r_aflags_overlay.dsc$r_aflags_bits.dsc$v_fl_bounds"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct dscdef5 { char dscdef_64$$_fill_6 [8];\ char dsc$b_scale; /* Signed po/wer of ten multiplier to convert the */N/* internal form to external form. For example, */N/* if internal number is 123 and scale is +1, */N/* then the represented external number is 1230. */V unsigned char dsc$b_digits; /* If non-zero, unsigned number of decimal */N/* digits in the external representation. If */N/* zero, the number of digits can be computed 0 */N/* based on DSC$W_LENGTH. */ __union {N unsigned char dsc$b_aflags; /* Array flag bits. */ __struct {N unsigned dscdef$$_fill_2 : 4; /* reserved to Digital */W unsigned dsc$v_fl_redim : 1; /* If set, the array can be redimensioned; */N/* i.e., DSC$A_A0, DSC$L_Mi, DSC$L_Li, and */N/* DSC$L_Ui may be changed. The r1edimensioned */N/* array cannot exceed the size allocated to */N/* the array (i.e. DSC$L_ARSIZE). */V unsigned dsc$v_fl_column : 1; /* If set, the elements of the array are */N/* stored by columns (FORTRAN)> Otherwise */N/* the elements are stored by rows. */Z unsigned dsc$v_fl_coeff : 1; /* If set, 2the multiplicative coefficients in */N/* Block 2 are present. */Z unsigned dsc$v_fl_bounds : 1; /* If set, the bounds information in Block 3 */N/* is present. */ } dsc$r_aflags_bits; } dsc$r_aflags_overlay;N unsigned char dsc$b_dimct; /* Number of dimensions */\ unsigned int dsc$l_arsize; /* Total size of array (in 3 bytes unless DTYPE is */N/* EQUL DSC$K_DTYPE_V or DSC$K_DTYPE_P). */T int dsc$a_a0; /* Address of element A(0,0,...,0). This */N/* need not be within the actual array/* it */N/* is the same as DSC$A_POINTER for 0-origin */N/* arrays. */ } ; #if !defined(__VAXC)6#define dsc$b_aflags dsc$r_aflags_ov 4erlay.dsc$b_aflagsL#define dsc$v_fl_redim dsc$r_aflags_overlay.dsc$r_aflags_bits.dsc$v_fl_redimN#define dsc$v_fl_column dsc$r_aflags_overlay.dsc$r_aflags_bits.dsc$v_fl_columnL#define dsc$v_fl_coeff dsc$r_aflags_overlay.dsc$r_aflags_bits.dsc$v_fl_coeffN#define dsc$v_fl_bounds dsc$r_aflags_overlay.dsc$r_aflags_bits.dsc$v_fl_bounds"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _dscdef6 { char dscdef$$_fill_7 [16];\ 5int dsc$l_v0; /* Signed bit offset of element A(0,0,...0) with */N/* respect to BASE. (Class UBA) */N/* The following two fields have meaning only if the array is of */N/* class DSC$K_CLASS_NCA (Non-contiguous array). */V unsigned int dsc$l_s1; /* Stride of the first dimension, i.e. the */N/* difference between the addresses of */N/* succe 6ssive elements of the first dimension. */N unsigned int dsc$l_s2; /* Stride of the second dimension. */ } DSCDEF6;#else /* __OLD_STARLET */struct dscdef6 { char dscdef$$_fill_7 [16];\ int dsc$l_v0; /* Signed bit offset of element A(0,0,...0) with */N/* respect to BASE. (Class UBA) */N/* The following two fields have meaning only if the array is of */N/* 7 class DSC$K_CLASS_NCA (Non-contiguous array). */V unsigned int dsc$l_s1; /* Stride of the first dimension, i.e. the */N/* difference between the addresses of */N/* successive elements of the first dimension. */N unsigned int dsc$l_s2; /* Stride of the second dimension. */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _dscdef7 8{ char dscdef$$_fill_8 [20];R unsigned int dsc$l_m1; /* Addressing coefficient M1 = U1-L1+1 */R unsigned int dsc$l_m2; /* Addressing coefficient M2 = U2-L2+1 */ } DSCDEF7;#else /* __OLD_STARLET */struct dscdef7 { char dscdef$$_fill_8 [20];R unsigned int dsc$l_m1; /* Addressing coefficient M1 = U1-L1+1 */R unsigned int dsc$l_m2; /* Addressing coefficient M2 = U2-L2+1 */ } ;%#endif /* #ifdef __NEW9_STARLET */N/*+ */N/* Procedure Incarnation descriptor (DSC$K_CLASS_PI) and */N/* Label Incarnation descriptor (DSC$K_CLASS_JI). */N/*- */X#define DSC$K_PI_BLN 12 /* Block length in bytes for PI class descr. */X#define DSC$C_PI_BLN 12 /* Block length in bytes for PI class desc :r. */X#define DSC$K_JI_BLN 12 /* block length in bytes for JI class descr. */X#define DSC$C_JI_BLN 12 /* block length in bytes for JI class descr. */ #ifdef __NEW_STARLETtypedef struct _dscdef8 { char dscdef$$_fill_9 [8];N void *dsc$a_frame; /* Address of frame */ } DSCDEF8;#else /* __OLD_STARLET */struct dscdef8 { char dscdef$$_fill_9 [8];N int dsc$a_frame; /* Address of ;frame */ } ;%#endif /* #ifdef __NEW_STARLET */N/*+ */N/* String with Bounds descriptor (DSC$K_CLASS_SB). */N/*- */ #ifdef __NEW_STARLETtypedef struct _dscdef9 { char dscdef$$_fill_10 [8];S int dsc$l_sb_l1; /* Signed lower bound of first dimension */S int dsc$l_sb_u <1; /* Signed upper bound of first dimension */ } DSCDEF9;#else /* __OLD_STARLET */struct dscdef9 { char dscdef$$_fill_10 [8];S int dsc$l_sb_l1; /* Signed lower bound of first dimension */S int dsc$l_sb_u1; /* Signed upper bound of first dimension */ } ;%#endif /* #ifdef __NEW_STARLET */N/*+ */N/* Unaligned Bit String with Bounds de =scriptor (DSC$K_CLASS_UBSB). */N/*- */ #ifdef __NEW_STARLETtypedef struct _dscdef10 { char dscdef$$_fill_11 [12];S int dsc$l_ubsb_l1; /* Signed lower bound of first dimension */S int dsc$l_ubsb_u1; /* Signed upper bound of first dimension */ } DSCDEF10;#else /* __OLD_STARLET */struct dscdef10 { char dscdef$$_fill_11 [12];S int dsc$l_ubsb_l>1; /* Signed lower bound of first dimension */S int dsc$l_ubsb_u1; /* Signed upper bound of first dimension */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* 64-bit versions of the descriptors defined above. These are expected */N/* to be quadword aligned. */N/*- ? */  #ifdef __NEW_STARLETtypedef struct _dscdef64 {Z char dscdef_64$$_fill_1 [8]; /* No 64-bit versions of handle/byteoff/logunit */N unsigned __int64 dsc64$q_length; /* 64-bit LENGTH field */ } DSCDEF64;#else /* __OLD_STARLET */struct dscdef64 {Z char dscdef_64$$_fill_1 [8]; /* No 64-bit versions of handle/byteoff/logunit */N unsigned int dsc64$q_length [2]; /* 64-bit LENGTH field */ } ;%#endif @ /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _dscdef1_64 {X unsigned short int dsc64$w_mbo; /* 32-bit LENGTH field is MBO in 64-bit descs */N unsigned char dsc64$b_dtype; /* Identical to 32-bit form */N unsigned char dsc64$b_class; /* Identical to 32-bit form */Z int dsc64$l_mbmo; /* 32-bit POINTER field is MBMO in 64-bit descs */N unsigned __int64 dsc64$q_maxstrlen; /* 64-bit MAXSTRLEN field A*/R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *dsc64$pq_pointer; /* 64-bit pointer field */#else# unsigned __int64 dsc64$pq_pointer;#endif } DSCDEF1_64;#else /* __OLD_STARLET */struct dscdef1_64 {X unsigned short int dsc64$w_mbo; /* 32-bit LENGTH field is MBO in 64-bit descs */N unsigned char dsc64$b_dtBype; /* Identical to 32-bit form */N unsigned char dsc64$b_class; /* Identical to 32-bit form */Z int dsc64$l_mbmo; /* 32-bit POINTER field is MBMO in 64-bit descs */N unsigned int dsc64$q_maxstrlen [2]; /* 64-bit MAXSTRLEN field */N unsigned __int64 dsc64$pq_pointer; /* 64-bit pointer field */ } ;%#endif /* #ifdef __NEW_STARLET */^#define DSC64$K_Z_BLN 24 /* Block length in bytes for 64-Cbit Z class descr. */^#define DSC64$C_Z_BLN 24 /* Block length in bytes for 64-bit Z class descr. */^#define DSC64$K_S_BLN 24 /* Block length in bytes for 64-bit S class descr. */^#define DSC64$C_S_BLN 24 /* Block length in bytes for 64-bit S class descr. */^#define DSC64$K_D_BLN 24 /* Block length in bytes for 64-bit D class descr. */^#define DSC64$C_D_BLN 24 /* Block length in bytes for 64-bit D class descr. */^#dDefine DSC64$K_P_BLN 24 /* Block length in bytes for 64-bit P class descr. */^#define DSC64$C_P_BLN 24 /* Block length in bytes for 64-bit P class descr. */^#define DSC64$K_J_BLN 24 /* Block length in bytes for 64-bit J class descr. */^#define DSC64$C_J_BLN 24 /* Block length in bytes for 64-bit J class descr. */_#define DSC64$K_VS_BLN 24 /* Block length in bytes for 64-bit VS class descr. */_#define DSC64$C_VS_BLN 24 E /* Block length in bytes for 64-bit VS class descr. */ #ifdef __NEW_STARLETtypedef struct _dscdef2_64 {! char dscdef_64$$_fill_3 [16];R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *dsc64$pq_base; /* 64-bit BASE field */#else unsigned __int64 dsc64$pq_base;#endif } DSCDEF2_64;#else /* __O FLD_STARLET */struct dscdef2_64 {! char dscdef_64$$_fill_3 [16];N unsigned __int64 dsc64$pq_base; /* 64-bit BASE field */ } ;%#endif /* #ifdef __NEW_STARLET */N/*+ */N/* End of common definitions for all descriptors. */N/*- */`#define DSC64$K_UBS_BLN 32 /* Block length in bytGes for 64-bit UBS class descr. */`#define DSC64$C_UBS_BLN 32 /* Block length in bytes for 64-bit UBS class descr. */ #ifdef __NEW_STARLETtypedef struct _dscdef3_64 {! char dscdef_64$$_fill_4 [24];N __int64 dsc64$q_pos; /* 64-bit POS field */ } DSCDEF3_64;#else /* __OLD_STARLET */struct dscdef3_64 {! char dscdef_64$$_fill_4 [24];N int dsc64$q_pos [2]; /* 64-bit POS field */ } ;% H#endif /* #ifdef __NEW_STARLET */N/* */N/* 64-bit version of the array descriptor */N/* */_#define DSC64$K_SD_BLN 32 /* Block length in bytes for 64-bit SD class descr. */_#define DSC64$C_SD_BLN 32 /* Block length in bytes for 64-bit SD class descr. */ #ifdef __NEW_STARLETtype Idef struct _dscdef5_64 {! char dscdef_64$$_fill_6 [24];N char dsc64$b_scale; /* 64-bit descriptor SCALE */N unsigned char dsc64$b_digits; /* 64-bit descriptor DIGITS */N __union { /* */N unsigned char dsc64$b_aflags; /* 64-bit descriptor AFLAGS */ __struct {, unsigned dscdef_64$$_fill_2 : 4;* unsigned dsc64$v_fl_redim : 1;+ Junsigned dsc64$v_fl_column : 1;* unsigned dsc64$v_fl_coeff : 1;+ unsigned dsc64$v_fl_bounds : 1;" } dsc64$r_aflags_bits;! } dsc64$r_aflags_overlay;N unsigned char dsc64$b_dimct; /* 64-bit descriptor DIMCT */N unsigned int dsc64$l_mbz; /* MBZ field for quad alignment. */N unsigned __int64 dsc64$q_arsize; /* 64-bit descriptor ARSIZE */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas Ksupported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *dsc64$pq_a0; /* 64-bit descriptor A0 */#else unsigned __int64 dsc64$pq_a0;#endif } DSCDEF5_64; #if !defined(__VAXC)<#define dsc64$b_aflags dsc64$r_aflags_overlay.dsc64$b_aflagsT#define dsc64$v_fl_redim dsc64$r_aflags_overlay.dsc64$r_aflags_bits.dsc64$v_fl_redimV#define dsc64$v_fl_column dsc64$r_aflags_overlay.dsc64$r_aflags_bits.dsc64$v_f Ll_columnT#define dsc64$v_fl_coeff dsc64$r_aflags_overlay.dsc64$r_aflags_bits.dsc64$v_fl_coeffV#define dsc64$v_fl_bounds dsc64$r_aflags_overlay.dsc64$r_aflags_bits.dsc64$v_fl_bounds"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct dscdef5_64 {! char dscdef_64$$_fill_6 [24];N char dsc64$b_scale; /* 64-bit descriptor SCALE */N unsigned char dsc64$b_digits; /* 64-bit descriptor DIGITS */N __union { M /* */N unsigned char dsc64$b_aflags; /* 64-bit descriptor AFLAGS */ __struct {, unsigned dscdef_64$$_fill_2 : 4;* unsigned dsc64$v_fl_redim : 1;+ unsigned dsc64$v_fl_column : 1;* unsigned dsc64$v_fl_coeff : 1;+ unsigned dsc64$v_fl_bounds : 1;" } dsc64$r_aflags_bits;! } dsc64$r_aflags_overlay;N unsigned char dsc64$b_dimct; /* 64-bit descript Nor DIMCT */N unsigned int dsc64$l_mbz; /* MBZ field for quad alignment. */N unsigned int dsc64$q_arsize [2]; /* 64-bit descriptor ARSIZE */N unsigned __int64 dsc64$pq_a0; /* 64-bit descriptor A0 */ } ; #if !defined(__VAXC)<#define dsc64$b_aflags dsc64$r_aflags_overlay.dsc64$b_aflagsT#define dsc64$v_fl_redim dsc64$r_aflags_overlay.dsc64$r_aflags_bits.dsc64$v_fl_redimV#define dsc64$v_fl_column dsc64$r_aflags_overlay.dsc64$r_afl Oags_bits.dsc64$v_fl_columnT#define dsc64$v_fl_coeff dsc64$r_aflags_overlay.dsc64$r_aflags_bits.dsc64$v_fl_coeffV#define dsc64$v_fl_bounds dsc64$r_aflags_overlay.dsc64$r_aflags_bits.dsc64$v_fl_bounds"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _dscdef6_64 {! char dscdef_64$$_fill_7 [40];N __int64 dsc64$q_v0; /* 64-bit descriptor V0 */N unsigned __int64 dsc64$q_s1; /* Stride of P the first dimension */N unsigned __int64 dsc64$q_s2; /* Stride of the second dimension. */ } DSCDEF6_64;#else /* __OLD_STARLET */struct dscdef6_64 {! char dscdef_64$$_fill_7 [40];N int dsc64$q_v0 [2]; /* 64-bit descriptor V0 */N unsigned int dsc64$q_s1 [2]; /* Stride of the first dimension */N unsigned int dsc64$q_s2 [2]; /* Stride of the second dimension. */ } ;%#endif /* #ifdef __NEW_STARLET */ Q #ifdef __NEW_STARLETtypedef struct _dscdef7_64 {! char dscdef_64$$_fill_8 [48];R unsigned __int64 dsc64$q_m1; /* Addressing coefficient M1 = U1-L1+1 */R unsigned __int64 dsc64$q_m2; /* Addressing coefficient M2 = U2-L2+1 */ } DSCDEF7_64;#else /* __OLD_STARLET */struct dscdef7_64 {! char dscdef_64$$_fill_8 [48];R unsigned int dsc64$q_m1 [2]; /* Addressing coefficient M1 = U1-L1+1 */R unsigned int dsc64$q_m2 [2]; /* Address Ring coefficient M2 = U2-L2+1 */ } ;%#endif /* #ifdef __NEW_STARLET */_#define DSC64$K_PI_BLN 32 /* Block length in bytes for 64-bit PI class descr. */_#define DSC64$C_PI_BLN 32 /* Block length in bytes for 64-bit PI class descr. */_#define DSC64$K_JI_BLN 32 /* block length in bytes for 64-bit JI class descr. */_#define DSC64$C_JI_BLN 32 /* block length in bytes for 64-bit JI class descr. */ #ifdef __NEW_STARLETtype Sdef struct _dscdef8_64 {! char dscdef_64$$_fill_9 [24];R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *dsc64$pq_frame; /* Address of frame */#else! unsigned __int64 dsc64$pq_frame;#endif } DSCDEF8_64;#else /* __OLD_STARLET */struct dscdef8_64 {! char dscdef_64$$_fill_9 [24];N unsigned __int64 dsc64T$pq_frame; /* Address of frame */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _dscdef9_64 {" char dscdef_64$$_fill_10 [24];S __int64 dsc64$q_sb_l1; /* Signed lower bound of first dimension */S __int64 dsc64$q_sb_u1; /* Signed upper bound of first dimension */ } DSCDEF9_64;#else /* __OLD_STARLET */struct dscdef9_64 {" char dscdef_64$$_fill_10 [24];S int dsc64$q_sb_l1 [2]; U /* Signed lower bound of first dimension */S int dsc64$q_sb_u1 [2]; /* Signed upper bound of first dimension */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _dscdef10_64 {" char dscdef_64$$_fill_11 [32];S __int64 dsc64$q_ubsb_l1; /* Signed lower bound of first dimension */S __int64 dsc64$q_ubsb_u1; /* Signed upper bound of first dimension */ } DSCDEF10_64;#else /* __OLD_STARLET V */struct dscdef10_64 {" char dscdef_64$$_fill_11 [32];S int dsc64$q_ubsb_l1 [2]; /* Signed lower bound of first dimension */S int dsc64$q_ubsb_u1 [2]; /* Signed upper bound of first dimension */ } ;%#endif /* #ifdef __NEW_STARLET */  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptrW size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DSCDEF_LOADED */ ww˨ԛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]DSTDEF.SDI;1 *//************************************************************************************************* X*******************************//*** MODULE $DSTDEF ***/#ifndef __DSTDEF_LOADED#define __DSTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 Yto 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 N/* Use a K to indicate constant Z */N#define DST$K_LOCOMMAND 0 /* Low value for range checking */N#define DST$K_STA_R00 0 /* Stack contents of R0 */N#define DST$K_STA_R01 1 /* Stack contents of R1 */N#define DST$K_STA_R02 2 /* Stack contents of R2 */N#define DST$K_STA_R03 3 /* Stack contents of R3 */N#define DST$K_STA_R04 4 /* Stack contents of R4 [ */N#define DST$K_STA_R05 5 /* Stack contents of R5 */N#define DST$K_STA_R06 6 /* Stack contents of R6 */N#define DST$K_STA_R07 7 /* Stack contents of R7 */N#define DST$K_STA_R08 8 /* Stack contents of R8 */N#define DST$K_STA_R09 9 /* Stack contents of R9 */N#define DST$K_STA_R10 10 /* Stack contents of R10 */N#define DST$\K_STA_R11 11 /* Stack contents of R11 */N#define DST$K_STA_R12 12 /* Stack contents of R12 (AP) */N#define DST$K_STA_R13 13 /* Stack contents of R13 (FP) */N#define DST$K_STA_R14 14 /* Stack contents of R14 (SP) */N#define DST$K_STA_R15 15 /* Stack contents of R15 (PC) */N#define DST$K_STA_IMM_B 16 /* Stack contents of byte operand */N/* sign extending to longword ] */N#define DST$K_STA_IMM_W 17 /* Stack contents of word operand */N/* sign extending to longword */Q#define DST$K_STA_IMM_L 18 /* Stack contents of longword operand */N#define DST$K_OPR_ADD 19 /* Pop two operands, add , */N/* stack longword result */S#define DST$K_STA_REP_B 20 /* Pop top item and ^stack sign extended */N/* byte at that address */S#define DST$K_STA_REP_W 21 /* Pop top item and stack sign extended */N/* word at that address */Q#define DST$K_STA_REP_L 22 /* Pop top item and stack longword at */N/* that address */Q#define DST$K_OPR_STOP 23 /* Terminate command string. L _ongword */N/* at top of stack contains address */N/* of data item. */N#define DST$K_HICOMMAND 23 /* Hi value for range checking */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus ` }#endif#pragma __standard #endif /* __DSTDEF_LOADED */ wwԛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************/ a/*** MODULE $DTIDEF ***/#ifndef __DTIDEF_LOADED#define __DTIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 */#endifb #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 N/* c */N/* DTI flag definitions */N/* */N/* Item list definitions */N#define DTI$_ENDITEM 0 /* End of item list code */N#define DTI$_TRANSACTION_INFORMATION 1 /* Active transaction list */N#define DTI$_CURRENT_TID 2 /* Current transaction identifier */N#define DTI$_MEMBEdRSHIP_COUNT 3 /* # members still in transaction */N#define DTI$_BRANCH_COUNT 4 /* # branches still in transaction */N#define DTI$_ROOT_NODE_NAME 5 /* Root node */N#define DTI$_STARTING_TIME 6 /* Transaction start time */#define DTI$K_MAX_ITEM_CODE 6N/* Transaction states */#define DTI$K_NULL 0N#define DTI$K_STARTING 1 /* Starting state e */N#define DTI$K_ACTIVE 2 /* Active state */N#define DTI$K_ONE_P_COMMITTING 3 /* Committing (one-phase) */N#define DTI$K_PREPARING 4 /* Preparing state */N#define DTI$K_PREPARED 5 /* Prepared state */N#define DTI$K_COMMITTING 6 /* Committing state */N#define DTI$K_COMMITTED 7 /* Committed state */N#define DTI$K_ONfE_P_COMMITTED 8 /* Committed (one-phase) */N#define DTI$K_ABORTING 9 /* Aborting state */N#define DTI$K_ABORTED 10 /* Aborted or forgotten state */P#define DTI$K_IN_DOUBT 11 /* Transaction has prepared and RM is */N/* coordinator; resolution must come */N/* from external entity */N/* SET item codes g */N#define DTI$K_ILLEGAL 0 /* Make code 0 illegal */N#define DTI$K_DELETE_TRANSACTION 1 /* Delete transaction */N#define DTI$K_DELETE_RM_NAME 2 /* Delete resource manager */N#define DTI$K_MODIFY_STATE 3 /* Modify transaction state */N#define DTI$K_DELETE_BRANCH_NODE 4 /* Delete branch node */T#define DTI$K_SET_CURRENT_TID 5 /* Set the current transachtion identifier */#define DTI$K_MAX_SET_CODE 5!#define DTI$M_SEARCH_STARTING 0x1#define DTI$M_SEARCH_ACTIVE 0x2%#define DTI$M_SEARCH_1P_COMITTING 0x4"#define DTI$M_SEARCH_PREPARING 0x8"#define DTI$M_SEARCH_PREPARED 0x10$#define DTI$M_SEARCH_COMMITTING 0x20##define DTI$M_SEARCH_COMMITTED 0x40&#define DTI$M_SEARCH_1P_COMMITTED 0x80##define DTI$M_SEARCH_ABORTING 0x100"#define DTI$M_SEARCH_ABORTED 0x200N#define DTI$_ENDSEARCH 0 /* End of search list */N#defiine DTI$_SEARCH_AS_NODE 1 /* Search as node */S#define DTI$_SEARCH_CURRENT_TID 2 /* Search current transaction identifier */N#define DTI$_SEARCH_TID 3 /* Search transaction identifier */N#define DTI$_SEARCH_RM_NAME 4 /* Search resource manager */N#define DTI$_SEARCH_BRANCH_NAME 5 /* Search branch node names */N#define DTI$_SEARCH_STATE 6 /* Search state */N#define DTI$_SEARCH_RESO jLVED_STATE 7 /* Search resolved state */#define DTI$K_MAX_SEARCH_CODE 7 #ifdef __NEW_STARLETNtypedef struct _dtisearchdef { /* Search list codes */N unsigned dti$v_search_starting : 1; /* Starting state */N unsigned dti$v_search_active : 1; /* Active state */N unsigned dti$v_search_1p_comitting : 1; /* 1P Committing state */N unsigned dti$v_search_preparing : 1; /* Preparing state k */N unsigned dti$v_search_prepared : 1; /* Prepared state */N unsigned dti$v_search_committing : 1; /* Committing state */N unsigned dti$v_search_committed : 1; /* Committed state */N unsigned dti$v_search_1p_committed : 1; /* 1P Committed state */N unsigned dti$v_search_aborting : 1; /* Aborting state */N unsigned dti$v_search_aborted : 1; /* Aborted state */N/* Search item l list definitions */! unsigned dti$v_fill_114_ : 6; } DTISEARCHDEF;#else /* __OLD_STARLET */Nstruct dtisearchdef { /* Search list codes */N unsigned dti$v_search_starting : 1; /* Starting state */N unsigned dti$v_search_active : 1; /* Active state */N unsigned dti$v_search_1p_comitting : 1; /* 1P Committing state */N unsigned dti$v_search_preparming : 1; /* Preparing state */N unsigned dti$v_search_prepared : 1; /* Prepared state */N unsigned dti$v_search_committing : 1; /* Committing state */N unsigned dti$v_search_committed : 1; /* Committed state */N unsigned dti$v_search_1p_committed : 1; /* 1P Committed state */N unsigned dti$v_search_aborting : 1; /* Aborting state */N unsigned dti$v_search_aborted : 1; /* Aborted state n */N/* Search item list definitions */! unsigned dti$v_fill_114_ : 6; } ;%#endif /* #ifdef __NEW_STARLET */#define DTI$M_UPDATE 0x1#define DTI$M_LOCAL_RM 0x2W#define DTI$S_TRANSACTION_INFORMATION 84 /* length of transaction information record */ #ifdef __NEW_STARLETXtypedef struct _dtirecdef { /* Transaction information record definitions */ __union {N unsigned short int dti$w_flags; /* o Modifier flags */ __struct {V unsigned dti$v_update : 1; /* Delete resource manager from transaction */R unsigned dti$v_local_rm : 1; /* Participant type (1 = RM, 0 = node) */) unsigned dti$v_fill_117_ : 6; } dti$r_fill_116_; } dti$r_fill_115_;N unsigned char dti$b_state; /* Transaction state */N unsigned char dti$b_part_name_len; /* Length of participant name */N char d pti$t_part_name [32]; /* Participant name */N char dti$t_part_log_id [16]; /* Participant log id */N char dti$t_tid [16]; /* Transaction ID */N unsigned int dti$o_utc_commit_time [4]; /* UTC commit time */ } DTIRECDEF; #if !defined(__VAXC)/#define dti$w_flags dti$r_fill_115_.dti$w_flagsA#define dti$v_update dti$r_fill_115_.dti$r_fill_116_.dti$v_updateE#define dti$v_local_rm dti$r_fill_ q115_.dti$r_fill_116_.dti$v_local_rm"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */Xstruct dtirecdef { /* Transaction information record definitions */ __union {N unsigned short int dti$w_flags; /* Modifier flags */ __struct {V unsigned dti$v_update : 1; /* Delete resource manager from transaction */R unsigned dti$v_local_rm : 1; /* Participant type (1 = RM, 0 = node) */) unsi rgned dti$v_fill_117_ : 6; } dti$r_fill_116_; } dti$r_fill_115_;N unsigned char dti$b_state; /* Transaction state */N unsigned char dti$b_part_name_len; /* Length of participant name */N char dti$t_part_name [32]; /* Participant name */N char dti$t_part_log_id [16]; /* Participant log id */N char dti$t_tid [16]; /* Transaction ID */N unsigned int dsti$o_utc_commit_time [4]; /* UTC commit time */ } ; #if !defined(__VAXC)/#define dti$w_flags dti$r_fill_115_.dti$w_flagsA#define dti$v_update dti$r_fill_115_.dti$r_fill_116_.dti$v_updateE#define dti$v_local_rm dti$r_fill_115_.dti$r_fill_116_.dti$v_local_rm"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __retquired_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DTIDEF_LOADED */ ww՛/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]DTK$ROUTINES.SDI;1 *//************* u*******************************************************************************************************************//*** MODULE dtk$routines ***/#ifndef __DTK_ROUTINES_LOADED#define __DTK_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previouslvy-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 w#else#define __union variant_union#endif#endif P/**************************************************************************** *//* * */4/* COPYRIGHT (c) 1988 BY * */D/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */&/* ALL RIGHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH TH xE * */P/* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */P/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */&/* TRANSFERRED. * *//* * */P/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. y * *//* * */P/* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * *//* * */P/**************************************************************************** */N/* DTK$ANSWER_PHONE */N/* */N/* Wait for Phone to Ring and z Answer */N/* */N/* The Wait for Phone to Ring and Answer routine */N/* waits for the phone connected to the DECtalk device to ring */N/* and then answers it. */N/* */+#define dtk$answer_phone DTK$ANSWER_PHONE #ifdef _ {_NEW_STARLETunsigned int dtk$answer_phone( unsigned int *voice_id, __optional_params );#else /* __OLD_STARLET */0unsigned int dtk$answer_phone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$CHECK_HDWR_STATUS */N/* */N/* Check Hardware Status */N/* | */S/* The Check Hardware Status routine checks the DECtalk hardware for hardware */N/* malfunctions. */N/* */5#define dtk$check_hdwr_status DTK$CHECK_HDWR_STATUS #ifdef __NEW_STARLET#unsigned int dtk$check_hdwr_status( unsigned int *voice_id, unsigned int *hdwr_status);#else /* __OLD_STARLET */5unsigned int dtk$check_hdwr_st}atus(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$DIAL_PHONE */N/* */N/* Dial the Telephone */N/* */T/* The Dial the Telephone routine dials the specified number on the telephone. */N/* ~ */'#define dtk$dial_phone DTK$DIAL_PHONE #ifdef __NEW_STARLETunsigned int dtk$dial_phone( unsigned int *voice_id, void *phone_number, __optional_params );#else /* __OLD_STARLET */.unsigned int dtk$dial_phone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$HANGUP_PHONE */N/* */N/* Hang Up the Ph one */N/* */N/* The Hang Up the Phone routine speaks an optional message and */N/* then hangs up the phone. */N/* */+#define dtk$hangup_phone DTK$HANGUP_PHONE #ifdef __NEW_STARLETunsigned int dtk$hangup_phone( unsigned int *voice_i d, __optional_params);#else /* __OLD_STARLET */0unsigned int dtk$hangup_phone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$INITIALIZE */N/* */N/* Initialize DECtalk */N/* */f/* The Initialize DECtalk routine initializes a DECtalk device and returns the device's assigned */N/* voice identifier. */N/* */'#define dtk$initialize DTK$INITIALIZE #ifdef __NEW_STARLETunsigned int dtk$initialize( unsigned int *voice_id, void *output_device, __optional_params);#else /* __OLD_STARLET */.unsigned int dtk$initialize(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$LOAD_DICTIONARY */N/* */N/* Load a Word into the DECtalk Dictionary */N/* */N/* The Load a Word into the DECtalk Dictionary routine */N/* loads a phonemic definition of a word into the DECtalk */N/* dictionary.  */N/* */1#define dtk$load_dictionary DTK$LOAD_DICTIONARY #ifdef __NEW_STARLET!unsigned int dtk$load_dictionary( unsigned int *voice_id, void *text, void *substitution);#else /* __OLD_STARLET */3unsigned int dtk$load_dictionary(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$READ_KEYSTROKE */N/* */N/* Read a Key Entered on the Keypad */N/* */N/* The Read a Key Entered on the Keypad routine */N/* reads a key entered on the phone keypad. */N/* *//#define dtk$read_keystroke  DTK$READ_KEYSTROKE #ifdef __NEW_STARLET unsigned int dtk$read_keystroke( unsigned int *voice_id, int *key_code, __optional_params );#else /* __OLD_STARLET */2unsigned int dtk$read_keystroke(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$READ_STRING */N/* */N/* Read a Series of Keys Entered on the Keypad */ N/* */N/* The Read a Series of Keys Entered on the Keypad routine reads a */N/* series of keys entered on the phone keypad. */N/* */)#define dtk$read_string DTK$READ_STRING #ifdef __NEW_STARLETunsigned int dtk$read_string( unsigned int *voice_id, void *resultant_string, __optional_params );#else /* __OLD_STARLET *//unsigned int dtk$read_string(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$RETURN_LAST_INDEX */N/* */N/* Return Last Index Spoken */N/* */N/* The Return Last Index Spoken routine returns the last index spoken. */N/* */5#define dtk$return_last_index DTK$RETURN_LAST_INDEX #ifdef __NEW_STARLET#unsigned int dtk$return_last_index( unsigned int *voice_id, int *p_index);#else /* __OLD_STARLET */5unsigned int dtk$return_last_index(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SPELL_TEXT */N/*  */N/* Spell Text */N/* */N/* The Spell Text routine causes DECtalk to pronounce each letter of */N/* the specified text. */N/* */'#define dtk$spell_text DTK$SPELL_TEXT #ifdef __NEW_STARLETunsigned int dtk $spell_text( unsigned int *voice_id, void *text, __optional_params);#else /* __OLD_STARLET */.unsigned int dtk$spell_text(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SPEAK_FILE */N/* */N/* Speak the Text in a Specified File */N/* */ N/* The Speak the Text in a Specified File routine */N/* speaks the text contained in the specified file. */N/* */'#define dtk$speak_file DTK$SPEAK_FILE #ifdef __NEW_STARLETunsigned int dtk$speak_file( unsigned int *voice_id, void *filespec, __optional_params);#else /* __OLD_STARLET */.unsigned int dtk$speak_file(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SPEAK_PHONEMIC_TEXT */N/* */N/* Speak the Specified Phonemic Text */N/* */N/* The Speak the Specified Phonemic Text routine */N/* sends the specified phonemic text to the DECtalk device */N/* to be sp oken. */N/* */9#define dtk$speak_phonemic_text DTK$SPEAK_PHONEMIC_TEXT #ifdef __NEW_STARLET%unsigned int dtk$speak_phonemic_text( unsigned int *voice_id, void *text, __optional_params);#else /* __OLD_STARLET */7unsigned int dtk$speak_phonemic_text(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SPEAK_TEXT  */N/* */N/* Speak the Specified Text */N/* */N/* The Speak the Specified Text routine */N/* sends the specified text to the DECtalk device */N/* to be spoken. */N/* */'#define dtk$speak_text DTK$SPEAK_TEXT #ifdef __NEW_STARLETunsigned int dtk$speak_text( unsigned int *voice_id, void *text, __optional_params);#else /* __OLD_STARLET */.unsigned int dtk$speak_text(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SET_INDEX */N/*  */N/* Insert an Index at the Current Position */N/* */N/* The Insert an Index at the Current Position routine */N/* inserts an index into the current output stream. */N/* */%#define dtk$set_index DTK$SET_INDEX #ifdef __NEW_STARLETunsigned int dtk$set_index(  unsigned int *voice_id, int *p_index);#else /* __OLD_STARLET */-unsigned int dtk$set_index(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SET_KEYPAD_MODE */N/* */N/* Turn the Phone Keypad On and Off */N/* */N/* The Turn the Phone Keypa d On and Off routine turns recognition */N/* of the telephone keypad on or off. */N/* */1#define dtk$set_keypad_mode DTK$SET_KEYPAD_MODE #ifdef __NEW_STARLET!unsigned int dtk$set_keypad_mode( unsigned int *voice_id, unsigned int *keypad_mode);#else /* __OLD_STARLET */3unsigned int dtk$set_keypad_mode(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SET_LOGGING_MODE */N/* */T/* Set the Logging Mode for the Video Terminal Connected to the DECtalk Device */N/* */N/* The Set the Logging Mode for the Video Terminal */N/* Connected to the DECtalk Device routine */N/* controls the information that is displayed on the video */N/* terminal while the DECtalk device is functioning. */N/* */3#define dtk$set_logging_mode DTK$SET_LOGGING_MODE #ifdef __NEW_STARLET"unsigned int dtk$set_logging_mode( unsigned int *voice_id, __optional_params );#else /* __OLD_STARLET */4unsigned int dtk$set_logging_mode(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SET_MODE */N/* */N/* Set the Mode for the DECtalk Terminal */N/* */N/* The Set the Mode for the DECtalk Terminal routine */N/* sets or resets the mode settings of the DECtalk terminal. */N/*  */##define dtk$set_mode DTK$SET_MODE #ifdef __NEW_STARLETunsigned int dtk$set_mode( unsigned int *voice_id, __optional_params );#else /* __OLD_STARLET */,unsigned int dtk$set_mode(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SET_SPEECH_MODE */N/* */N/* Turn Speech Mode On and Off  */N/* */N/* The Turn Speech Mode On and Off routine */N/* either starts or stops the DECtalk device's speech. */N/* */1#define dtk$set_speech_mode DTK$SET_SPEECH_MODE #ifdef __NEW_STARLET!unsigned int dtk$set_speech_mode( unsigned int *voice_id, unsigned in t *new_mode, __optional_params);#else /* __OLD_STARLET */3unsigned int dtk$set_speech_mode(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SET_TERMINAL_MODE */N/* */N/* Set the Mode for the Video Terminal Connected to the DECtalk Device */N/* */N/* The Set the Mode for the V ideo Terminal */N/* Connected to the DECtalk Device routine */N/* controls the attributes of the video terminal connected */N/* to the DECtalk device. */N/* */5#define dtk$set_terminal_mode DTK$SET_TERMINAL_MODE #ifdef __NEW_STARLET#unsigned int dtk$set_terminal_mode( unsigned int *voi ce_id, __optional_params );#else /* __OLD_STARLET */5unsigned int dtk$set_terminal_mode(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$SET_VOICE */N/* */N/* Set Voice Characteristics */N/* */N/* The Set Voice Characterist ics routine */N/* changes the DECtalk voice characteristics to match those */N/* specified. */N/* */%#define dtk$set_voice DTK$SET_VOICE #ifdef __NEW_STARLETunsigned int dtk$set_voice( unsigned int *voice_id, __optional_params );#else /* __OLD_STARLET */-unsigned int dtk$set_voice(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* DTK$TERMINATE */N/* */N/* Terminate DECtalk */N/* */S/* The Terminate DECtalk routine terminates the use of an initialized DECtalk */N/* device.  */N/* */%#define dtk$terminate DTK$TERMINATE #ifdef __NEW_STARLETunsigned int dtk$terminate( unsigned int *voice_id);#else /* __OLD_STARLET */-unsigned int dtk$terminate(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore  /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __DTK_ROUTINES_LOADED */ ww+՛/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]DTKDEF.SDI;1 *//******************************************* *************************************************************************************//*** MODULE $DTKDEF ***/#ifndef __DTKDEF_LOADED#define __DTKDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* Definitions for RTL DECtalk Management */N/* */I/* Phone keypad keys. */N/* */#define DTK$K_TRM_ZERO 48#define DTK$K_TRM_ONE 49#define DTK$K_TRM_TWO 50#define DTK$K_TRM_THREE 51#define DTK$K_TRM_FOUR 52#define DTK$K_TRM_FIVE 53#define DTK$K_TRM_SIX 54#define DTK$K_TRM_SEVEN 55#define DTK$K_TRM_EIGHT 56#define DTK$K_TRM_NINE 57#define DTK$K_TRM_A 65#define DTK$K_TRM_B 66#define DTK$K_TRM_C 67#define DTK$K_TRM_D 68 #define DTK$K_TRM_NUMBER_SIGN 35#define DTK$K_TRM_ASTERISK 42N/* Conditions */N#define DTK$K_TRM_CANCELLED 508 /* I/O cancelled */N#define DTK$K_TRM_TIMEOUT 509 /* Timeout period expired */N#defin e DTK$K_TRM_BUFFER_FULL 510 /* Buffer is full */N#define DTK$K_TRM_UNKNOWN 511 /* Unknown terminator */N/* */I/* Self-test constants. */N/* */#define DTK$K_TEST_POWER 1#define DTK$K_TEST_HDATA 2#define DTK$K_TEST_HCONTROL 3#define DTK$K_TEST_DATA 4 #define DTK$K_TEST_SPEAK 5N/* */I/* Phone dialing constants. */N/* */#define DTK$K_DIAL_TONE 0#define DTK$K_DIAL_PULSE 1N/* */I/* DECtalk types. */N/*  */#define DTK$K_DTC_UNKNOWN 0#define DTK$K_DTC_01 1#define DTK$K_DTC_03 2N/* */I/* Keypad modes. */N/* */#define DTK$K_KEYPAD_OFF 0#define DTK$K_KEYPAD_ON 1#define DTK$K_KEYPAD_AUTO 2N/*  */I/* Voices. */N/* */#define DTK$K_VOICE_MALE 0#define DTK$K_VOICE_FEMALE 1#define DTK$K_VOICE_CHILD 2#define DTK$K_VOICE_DEEP_MALE 3!#define DTK$K_VOICE_DEEP_FEMALE 4 #define DTK$K_VOICE_OLDER_MALE 5"#define DTK$K_VOICE_LIGHT_FEMALE 6N/* */I/* Speaking modes.  */N/* */#define DTK$K_SPEAK 0#define DTK$K_STOP 1#define DTK$K_HALT 2N/* */I/* Return modes. */N/* */S#define DTK$K_IMMED 0 /* Return immedately after sending text. */`#define DTK$K_WAIT 1 /* Wait until text is completely spoken be returning. */a#define DTK$K_STATUS 2 /* Wait for text to be spoken and return phone status. */N/* */N/* DEFINE BIT MASKS AND VALUES FOR MODE ATTRIBUTES */N/* */#define DTK$M_SQUARE 0x1#define DTK$M_ASCII 0x2#define DTK$M_MINUS 0x4#define DTK$M_EUROPE 0x8#define DTK$M_SPELL 0x10N#define DTK$M_NORMAL 0 /* no bits set */N#define DTK$K_SQUARE 0 /* Mode square bitvector index */N#define DTK$K_ASCII 1 /* asky mode */O#define DTK$K_MINUS 2 /* Say dash as minus bitvector index */N#define DTK$K_EUROPE 3 /* European type numbers */N#define DTK$K_SPELL 4 /* Spell all words */#define DTK$M_HOST 0x1#define DTK$M_SPEAK_ALL 0x2#define DTK$M_EDITED 0x4#define DTK$M_HARD 0x8#define DTK$M_SETUP 0x10#define DTK$M_FILTER 0x20N#define DTK$K_HOST 0 /* Send all chars typed to host. */N#define DTK$K_SPEAK_ALL 1 /* Speak all chars typed. */N#define DTK$K_EDITED 2 /* Line edit all chars typed. */O#define DTK$K_HARD 3 /* Do lo cal echo in hardcopy format. */V#define DTK$K_SETUP 4 /* Speak all chars displayed in setup mode. */T#define DTK$K_FILTER 5 /* Don't send DECtalk specific sequences. */#define DTK$M_TEXT 0x1#define DTK$M_PHONEME 0x2#define DTK$M_RAWHOST 0x4#define DTK$M_INHOST 0x8#define DTK$M_OUTHOST 0x10#define DTK$M_ERROR 0x20#define DTK$M_TRACE 0x40#define DTK$M_DEBUG 0x80N#define DTK$K_TEXT 0 /* Log ASCII text. */N#define DTK$K_PHONEME 1 /* Log phonemic text. */O#define DTK$K_RAWHOST 2 /* Log all chars without inspection. */N#define DTK$K_INHOST 3 /* Log text read from host. */N#define DTK$K_OUTHOST 4 /* Log text sent to host. */N#define DTK$K_ERROR 5 /* Log error messages. */N#define DTK$K_TRACE 6 /* Log sequences symbolically */N#define DTK$K_DEBUG 7  /* Reserved */ #ifdef __NEW_STARLETtypedef union _dtkdef {N/* */I/* DEFINE BITS, MASKS, AND FIELDS FOR THE CONTROL MODES. */N/* */ __struct {N unsigned dtk$v_square : 1; /* Set mode square on */N unsigned dtk$v_ascii : 1; /* asky mode  */N unsigned dtk$v_minus : 1; /* Say dash as minus */N unsigned dtk$v_europe : 1; /* Europe */N unsigned dtk$v_spell : 1; /* Spell all words */# unsigned dtk$v_fill_0_ : 3; } dtk$r_dtkmode_bits; __struct {N unsigned dtk$v_host : 1; /* Send all chars typed to host. */N unsigned dtk$v_speak_all : 1; /* Speak all chars typed. */N unsigned dtk$v_edited : 1; /* Line edit all chars typed. */O unsigned dtk$v_hard : 1; /* Do local echo in hardcopy format. */V unsigned dtk$v_setup : 1; /* Speak all chars displayed in setup mode. */T unsigned dtk$v_filter : 1; /* Don't send DECtalk specific sequences. */# unsigned dtk$v_fill_1_ : 2; } dtk$r_dtkterm_bits; __struct {N unsigned dtk$v_text : 1; /* Log ASCII text. */N unsigned dtk$v_phoneme : 1; /* Log phonemic text. */O unsigned dtk$v_rawhost : 1; /* Log all chars without inspection. */N unsigned dtk$v_inhost : 1; /* Log text read from host. */N unsigned dtk$v_outhost : 1; /* Log text sent to host. */N unsigned dtk$v_error : 1; /* Log error messages. */N unsigned dtk$v_trace : 1; /* Log sequences symbolically */N unsigned dtk$v_debug : 1;  /* Reserved */ } dtk$r_dtklog_bits; } DTKDEF; #if !defined(__VAXC)4#define dtk$v_square dtk$r_dtkmode_bits.dtk$v_square2#define dtk$v_ascii dtk$r_dtkmode_bits.dtk$v_ascii2#define dtk$v_minus dtk$r_dtkmode_bits.dtk$v_minus4#define dtk$v_europe dtk$r_dtkmode_bits.dtk$v_europe2#define dtk$v_spell dtk$r_dtkmode_bits.dtk$v_spell0#define dtk$v_host dtk$r_dtkterm_bits.dtk$v_host:#define dtk$v_speak_all dtk$r_dtkterm_bits.dtk$v_speak_all4#define dtk$v_ edited dtk$r_dtkterm_bits.dtk$v_edited0#define dtk$v_hard dtk$r_dtkterm_bits.dtk$v_hard2#define dtk$v_setup dtk$r_dtkterm_bits.dtk$v_setup4#define dtk$v_filter dtk$r_dtkterm_bits.dtk$v_filter/#define dtk$v_text dtk$r_dtklog_bits.dtk$v_text5#define dtk$v_phoneme dtk$r_dtklog_bits.dtk$v_phoneme5#define dtk$v_rawhost dtk$r_dtklog_bits.dtk$v_rawhost3#define dtk$v_inhost dtk$r_dtklog_bits.dtk$v_inhost5#define dtk$v_outhost dtk$r_dtklog_bits.dtk$v_outhost1#define dtk$v_error dtk$r_dtklog_bits. dtk$v_error1#define dtk$v_trace dtk$r_dtklog_bits.dtk$v_trace1#define dtk$v_debug dtk$r_dtklog_bits.dtk$v_debug"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union dtkdef {N/* */I/* DEFINE BITS, MASKS, AND FIELDS FOR THE CONTROL MODES. */N/* */ __struct {N unsigned dtk$v_square : 1; /* Set  mode square on */N unsigned dtk$v_ascii : 1; /* asky mode */N unsigned dtk$v_minus : 1; /* Say dash as minus */N unsigned dtk$v_europe : 1; /* Europe */N unsigned dtk$v_spell : 1; /* Spell all words */# unsigned dtk$v_fill_0_ : 3; } dtk$r_dtkmode_bits; __struct {N unsigned dtk$v_host : 1; /* Send all chars typed to host. */N unsigned dtk$v_speak_all : 1; /* Speak all chars typed. */N unsigned dtk$v_edited : 1; /* Line edit all chars typed. */O unsigned dtk$v_hard : 1; /* Do local echo in hardcopy format. */V unsigned dtk$v_setup : 1; /* Speak all chars displayed in setup mode. */T unsigned dtk$v_filter : 1; /* Don't send DECtalk specific sequences. */# unsigned dtk$v_fill_1_ : 2; } dtk$r_dtkterm_bits; __struct {N unsigned dtk$v_text : 1; /* Log ASCII text. */N unsigned dtk$v_phoneme : 1; /* Log phonemic text. */O unsigned dtk$v_rawhost : 1; /* Log all chars without inspection. */N unsigned dtk$v_inhost : 1; /* Log text read from host. */N unsigned dtk$v_outhost : 1; /* Log text sent to host. */N unsigned dtk$v_error : 1; /* Log error messages. */N un signed dtk$v_trace : 1; /* Log sequences symbolically */N unsigned dtk$v_debug : 1; /* Reserved */ } dtk$r_dtklog_bits; } ; #if !defined(__VAXC)4#define dtk$v_square dtk$r_dtkmode_bits.dtk$v_square2#define dtk$v_ascii dtk$r_dtkmode_bits.dtk$v_ascii2#define dtk$v_minus dtk$r_dtkmode_bits.dtk$v_minus4#define dtk$v_europe dtk$r_dtkmode_bits.dtk$v_europe2#define dtk$v_spell dtk$r_dtkmode_bits.dtk$v_spell0#define dtk$v_host dtk$r_d tkterm_bits.dtk$v_host:#define dtk$v_speak_all dtk$r_dtkterm_bits.dtk$v_speak_all4#define dtk$v_edited dtk$r_dtkterm_bits.dtk$v_edited0#define dtk$v_hard dtk$r_dtkterm_bits.dtk$v_hard2#define dtk$v_setup dtk$r_dtkterm_bits.dtk$v_setup4#define dtk$v_filter dtk$r_dtkterm_bits.dtk$v_filter/#define dtk$v_text dtk$r_dtklog_bits.dtk$v_text5#define dtk$v_phoneme dtk$r_dtklog_bits.dtk$v_phoneme5#define dtk$v_rawhost dtk$r_dtklog_bits.dtk$v_rawhost3#define dtk$v_inhost dtk$r_dtklog_bits.dtk$v_inhos t5#define dtk$v_outhost dtk$r_dtklog_bits.dtk$v_outhost1#define dtk$v_error dtk$r_dtklog_bits.dtk$v_error1#define dtk$v_trace dtk$r_dtklog_bits.dtk$v_trace1#define dtk$v_debug dtk$r_dtklog_bits.dtk$v_debug"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DTKDEF_LOADED */ ww[֛/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]DTKMSG.SDI;1 *//******************************************************************************************* *************************************//*** MODULE $DTKMSG ***/#ifndef __DTKMSG_LOADED#define __DTKMSG_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*  */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:39.94 */N/* */N/* FILE: DTKMSG.MSG EDIT: TS1004 */N/* */Q/***************************************************************************** *//** * */M/** COPYRIGHT (C) 1978, 1980, 1982, 1984, 1985, 1986, 1987, 1988 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABL E TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/* */N/* */N/* 1-004 ADD DSR STATUS MESSAGES. TS 29-AUG-1986 */N/* 1-003 ADD /MACRO=$DTKMSG FOR STARLETSD. TS 30-JUL-1986 */N/* 1-002 ADD DTK$_TLKINUSE. TS 10-APR-1986 */N/* 1-001 ORIGINAL. TS 6-AUG-1985 */N/*- */N/*+ */N/* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */N/* */I/* DTK$_ABCMNOXYZ  */N/* */O/* IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */Q/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR */N/* MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS. */N/* */P/* THE NAMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD APPEAR */N/* IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION. */N/* */N/* MACRO-32 PROGRAMMING: */N/* */N/* THE MACROS CALL: */N/* */I/* $DTKDEF  */N/* */N/* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */N/* THE RUN-TIME LIBRARY DECLARES THESE SYMBOLS AS EXTERNAL; */N/* THE MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER. */N/* */N/*-  */N/* TEMPLATE FOR DOCUMENTING MESSAGES. */N/* EACH EXPLANATION FOLLOWS THE MESSAGE IT APPLIES TO AND */N/* IS FOLLOWED BY A BLANK LINE. */N/* BE SURE NOT TO USE THE SEQUENCE "++" AFTER A "!" IN REGULAR COMMENTS */N/* AS THIS SEQUENCE BEGINS A DOCUMENTATION SEQUENCE AND CAN BE */N/* SEARCHED FOR IF AND WHEN THE PROCESS OF EXTRACTING THE  */N/* DOCUMENTATION BECOMES AUTOMATED. */N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: X */N/* USER ACTION: Y */N/*-- */;/* ; SET LH TO 4 19 (DECIMAL). */#define DTK$_FACILITY 419#define DTK$_NORMAL 27492353N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: NORMAL SUCCESSFUL COMPLETION. */N/* USER ACTION: NONE */N/*-- */#define DTK$_VOIALREXI 27492369N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: A USER TRIED TO CREATE A NEW VOICE_ID FOR A DECTALK */B/* DEVICE, WHEN ONE ALREADY EXISTS. THIS IS NORMAL IN */B/* A MODULAR ENVIRONMENT. THE EXISTING VOICE ID */B/* IS RETURNED. */N/* USER ACTION: NONE. MAKE SURE YOU DON'T DELETE A VOICE_ID */B/* THAT YOU ACTUALLY DIDN'T CREATE. */N/*-- */#define DTK$_NOT_A_TRM 27492377N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THIS IS AN INFORMATIONAL MESSAGE TELLING YOU THAT */B/* THE OUTPUT DEVICE IS NOT A TERMINAL.  */N/* USER ACTION: NONE. */N/*-- */N/*+ */H/* NOTE:: DO NOT ADD ANY ADDITIONAL SUCCESS MESSAGES HERE. */B/* ADD THEM BELOW AFTER THE REMAINING .SUCCESS MESSAGES. */N/*- */#define DTK$_BUSY 27492387N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THE ROUTINE DTK$DIAL_PHONE WAS CALLED TO DIAL A PHONE */B/* NUMBER AND THE LINE WAS BUSY. */N/* USER ACTION: TRY CALLING AGAIN. */N/*-- */#define DTK$_NOANSWER 27492395N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THE ROUTINE DTK$DIAL_PHONE WAS CALLED TO DIAL A PHONE */B/* NUMBER AND NO ONE ANSWERED THE CALL. */N/* USER ACTION: TRY CALLING AGAIN. */N/*-- */#define DTK$_NODIATONE 27492403N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THE ROUTINE DTK$DIAL_PHONE WAS CALLED TO DIAL A PHONE */B/* NUMBER AND NO DIAL TONE WAS DETECTED ON THE */B/* PHONE LINE. */N/* USER ACTION: CORRECT THE TELEPHONE LINE PROBLEM AND CALL AGAIN. */N/*--  */#define DTK$_OFFHOOK 27492411N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THIS IS AN INFORMATIONAL MESSAGE TELLING YOU THAT */B/* THE PHONE IS OFFHOOK (A CALL IS ACTIVE). */N/* USER ACTION: NONE. */N/*--  */#define DTK$_ONHOOK 27492419N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THIS IS AN INFORMATIONAL MESSAGE TELLING YOU THAT */B/* THE PHONE IS ONHOOK (NO CALL IS ACTIVE). */N/* USER ACTION: NONE. */N/*--  */#define DTK$_TIMEOUT 27492427N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THIS IS AN INFORMATIONAL MESSAGE TELLING YOU THAT */B/* THE OUTPUT DEVICE HAS TIMED OUT. */N/* USER ACTION: NONE. */N/*-- */#define DTK$_WINK 27492435N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: A WINK (POSSIBLE TIMEOUT) WAS DETECTED ON THE */B/* PHONE LINE. THE CALLER MAY HAVE HUNG UP THE PHONE. */N/* USER ACTION: NONE. */N/*-- */#define DTK$_COMFAIL 27492443N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: A COMMUNICATIONS MALFUNCTION HAS OCCURRED SINCE THE */B/* DECTALK UNIT WAS TURNED ON. */N/* USER ACTION: CHECK THE DECTALK HARDWARE. */N/*-- */#define DTK$_INPBUFOVR 27492451N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: AN INPUT BUFFER OVERFLOW MALFUNCTION HAS OCCURRED SINCE */B/* THE DECTALK UNIT WAS TURNED ON. */N/* USER ACTION: CHECK THE DECTALK HARDWARE. */N/*-- */#define DTK$_NVROPRFAI 27492 459N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: A NVR OPERATION FAILURE HAS OCCURRED SINCE */B/* THE DECTALK UNIT WAS TURNED ON. */N/* USER ACTION: CHECK THE DECTALK HARDWARE. */N/*-- */#define DTK$_ERRPHOTRA 27492467N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: A PHONEMIC TRANSCRIPTION MALFUNCTION HAS OCCURRED SINCE */B/* THE DECTALK UNIT WAS TURNED ON. */N/* USER ACTION: CHECK THE DECTALK HARDWARE. */N/*-- */#define DTK$_CONSEQERR 27492475N/*++  */K/* FACILITY: DTK */N/* EXPLANATION: A DECTALK PRIVATE CONTROL SEQUENCE MALFUNCTION HAS */B/* OCCURRED SINCE THE DECTALK UNIT WAS TURNED ON. */N/* USER ACTION: CHECK THE DECTALK HARDWARE. */N/*-- */#define DTK$_DECTSTFAI 27492483N/*++  */K/* FACILITY: DTK */N/* EXPLANATION: A LOCAL SELF-TEST MALFUNCTION HAS OCCURRED SINCE */B/* THE DECTALK UNIT WAS TURNED ON. */N/* USER ACTION: CHECK THE DECTALK HARDWARE. */N/*-- */#define DTK$_FATERRLIB 27492868N/*++  */K/* FACILITY: DTK */N/* EXPLANATION: AN INTERNAL ERROR HAS OCCURED WITHIN DTK. */N/* USER ACTION: SUBMIT AN SPR DESCRIBING THE PROBLEM. */N/*-- */#define DTK$_FILTOOLON 27492876N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THE LENGTH OF THE SPECIFIED STRING */B/* WAS TOO LONG. */N/* USER ACTION: CORRECT YOUR PROGRAM SO THAT IT REQUESTS A FILE */B/* NAME OF 255 CHARACTERS OR LESS. */N/*-- */#define DTK$_INVARG 27492884N/*++  */K/* FACILITY: DTK */N/* EXPLANATION: THE VALUE OF SOME ARGUMENT IS NOT IN THE CORRECT RANGE. */N/* USER ACTION: EXAMINE EACH ARGUMENT. DETERMINE WHICH ONE IS */B/* OUT OF RANGE AND CORRECT YOUR PROGRAM. */N/*-- */#define DTK$_INVMODE 27492892N/*++  */K/* FACILITY: DTK */N/* EXPLANATION: THE VALUE OF THE MODE ARGUMENT IS NOT IN THE */B/* CORRECT RANGE. */N/* USER ACTION: EXAMINE THE ARGUMENT. DETERMINE WHAT IS */B/* OUT OF RANGE AND CORRECT YOUR PROGRAM. */N/*-- */#define DTK$_INVVOI_ID 27492900N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: AN INVALID VOICE-ID WAS SPECIFIED. */N/* USER ACTION: CHECK THAT YOU ARE PASSING THE VOICE ID BY REFERENCE */B/* NOT BY VALUE. ENSURE THAT THE VOICE ID WAS */B/* PREVIOUSLY SET UP BY A CALL TO DTK$INITIALIZE. */N/*--  */#define DTK$_NOROOM 27492908N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THERE IS NO ROOM LEFT IN THE DICTIONARY FOR THIS */B/* DEFINITION. */N/* USER ACTION: CORRECT YOUR PROGRAM SO THAT IT REQUESTS FEWER */B/* DICTIONARY ENTRIES OR SO THAT EACH ENTRY IS SMALLER. */N/*-- */#define DTK$_NOTIMP 27492916N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: YOU TRIED TO USE A FEATURE THAT IS NOT IMPLEMENTED */B/* IN THIS VERSION OF DTK$. */N/* USER ACTION: GET THE APPROPRIATE VERSION OF DTK$.  */N/*-- */#define DTK$_PROTOOLON 27492924N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THE LENGTH OF A PROMPT STRING EXCEEDED 512 CHARACTERS. */N/* USER ACTION: SHORTEN THE PROMPT TO 512 CHARACTERS OR LESS. */N/*--  */#define DTK$_STRTERESC 27492932N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: AN DTK OUTPUT ROUTINE WAS PASSED AN ESCAPE SEQUENCE */B/* EMBEDDED IN THE OUTPUT STRING. */N/* USER ACTION: CHECK YOUR OUTPUT STRING TO DETERMINE WHAT ESCAPE */B/* SEQUENCE WAS BEING PASSED. IF YOU NEED THE ACTION */B/* PROVIDED BY THIS ESCAPE SEQUENCE, THERE IS MOST */B/* LIKELY A DTK ROUTINE THAT PROVIDES THAT FUNCTIONALITY. */N/*-- */#define DTK$_TOOLONG 27492940N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THE LENGTH OF THE SPECIFIED STRING WAS TOO LONG. */N/* USER ACTION: CORRECT YOUR PROGRAM SO THAT IT REQUESTS A PHONE NUMBER */B/* OR DICTIONARY SUBSTITUTION OF 255 CHARACTERS OR LESS. */N/*-- */#define DTK$_UNKESCSEQ 27492948N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: A DTK INPUT ROUTINE WAS PASSED AN ESCAPE SEQUENCE */B/* THAT IT WAS UNABLE TO UNDERSTAND. */N/* USER ACTION: ???? */N/*-- */#define DTK$_UNKREPLY 27492956N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: A DTK INPUT ROUTINE WAS PASSED AN ESCAPE SEQUENCE */B/* THAT IT COULD NOT PARSE CORRECTLY. */N/* USER ACTION: ???? */N/*-- */#define DTK$_WRONUMARG 27492964N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: A DTK ROUTINE WAS CALLED WITH TOO FEW ARGUMENTS */B/* (LESS THAN THE NUMBER OF REQUIRED ARGUMENTS) */B/* OR TOO MANY ARGUMENTS. */N/* USER ACTION: CORRECT THE CODE TO CALL THE ROUTINE WITH */B/* THE PROPER NUMBER OF ARGUMENTS. */N/*-- */#define DTK$_TLKINUSE 27492972N/*++ */K/* FACILITY: DTK  */N/* EXPLANATION: A DTK ROUTINE WAS CALLED FROM AN AST ROUTINE */B/* THAT INTERRUPTED A DTK ROUTINE WITH THE SAME */B/* VOICE_ID. */N/* USER ACTION: CORRECT THE CODE TO CALL THE ROUTINE WITH */B/* THE PROPER SYNCHRONIZATION. */N/*-- */#define DTK$_NOTLCLTRM 27492980N/*++  */K/* FACILITY: DTK */N/* EXPLANATION: THE OUTPUT DEVICE IS NOT A TERMINAL ON THE */B/* LOCAL VMS NODE. */N/* USER ACTION: SPECIFY A LOCAL TERMINAL DEVICE. */N/*-- */#define DTK$_NOMALFUN1 27494401N/*++  */K/* FACILITY: DTK */N/* EXPLANATION: THIS IS AN INFORMATIONAL MESSAGE TELLING YOU THAT */B/* NO MALFUNCTIONS HAVE OCCURRED SINCE THE DECTALK */B/* UNIT WAS TURNED ON. THIS IS THE FIRST REPLY. */N/* USER ACTION: NONE. */N/*--  */#define DTK$_NOMALFUN2 27494409N/*++ */K/* FACILITY: DTK */N/* EXPLANATION: THIS IS AN INFORMATIONAL MESSAGE TELLING YOU THAT */B/* NO MALFUNCTIONS HAVE OCCURRED SINCE THE DECTALK */B/* UNIT WAS TURNED ON. THIS IS THE SECOND OR LATER REPLY. */N/* USER ACTION: NONE. */N/*--  */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DTKMSG_LOADED */ ww{V֛/************************************************************************************* *******************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $DVIDEF ***/#ifndef __DVIDEF_LOADED#define __DVIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* */N/* Get Device and Volume Information Data Identifier Definitions */N/*  */N/* **** NOTE **** */N/* */N/* New items must always be added at the END of the list so that */N/* users will not have to rebuild. */N/* */N/*-  */W#define DVI$_DEVCHAR 2 /* Device characteristics - VALUE - 4 bytes */N#define DVI$_DEVCLASS 4 /* Device class - VALUE - 1 byte */N#define DVI$_DEVTYPE 6 /* Device type - VALUE - 1 byte */S#define DVI$_DEVBUFSIZ 8 /* Device buffer size - VALUE - 2 bytes */]#define DVI$_DEVDEPEND 10 /* Device dependent information - VALUE - 4 bytes */N#define DVI$_UNIT 12  /* Unit number - VALUE - 4 bytes */g#define DVI$_PID 14 /* Process identification of device owner - VALUE - 4 bytes */T#define DVI$_OWNUIC 16 /* UIC of device owner - VALUE - 4 bytes */W#define DVI$_VPROT 18 /* Volume protection mask - VALUE - 2 bytes */N#define DVI$_ERRCNT 20 /* Error count - VALUE - 2 bytes */P#define DVI$_OPCNT 22 /* Operation count - VALUE - 4 bytes */T#define DVI$_RECSIZ 24 /* Blocked record size - VALUE - 2 bytes */n#define DVI$_MAXBLOCK 26 /* Number of logical blocks on the volume (disk) - VALUE - 4 bytes */a#define DVI$_DEVDEPEND2 28 /* Additional device dependent data - VALUE - 4 bytes */]#define DVI$_REFCNT 30 /* Reference count of processes - VALUE - 2 bytes */N#define DVI$_DEVNAM 32 /* Device name - STRING - 64 bytes */N#define DVI$_VOLNAM 34 /* Volume name - STRING - 12 bytes */b#define DVI$_SECTORS 36 /* Number of sectors per track (disk) - VALUE - 1 byte */d#define DVI$_TRACKS 38 /* Number of tracks per cylinder (disk) - VALUE - 1 byte */i#define DVI$_CYLINDERS 40 /* Number of cylinders on the volume (disk) - VALUE - 2 bytes */k#define DVI$_FREEBLOCKS 42 /* Number of free blocks on the volume (disk) - VALUE - 4 bytes */V#define DVI$_LOGVOLNAM 44 /* Logical volume name - STRING - 64 bytes */j#define DVI$_VOLNUMBER 46 /* Number of this volume in volume set (disk) - VALUE - 4 byte */e#define DVI$_VOLCOUNT 48 /* Count of volumes in volume set (disk) - VALUE - 4 byte */r#define DVI$_ROOTDEVNAM 50 /* Device name of root volume in volume set (disk) - STRING - 64 bytes */r#define DVI$_NEXTDEVNAM 52 /* Device name of next volume in volume set (disk) - STRING - 64 bytes */Y#define DVI$_TRANSCNT 54  /* Volume Transaction Count - VALUE - 2 bytes */N#define DVI$_MOUNTCNT 56 /* Mount count - VALUE - 2 bytes */[#define DVI$_CLUSTER 58 /* Volume Cluster Size (disk) - VALUE - 2 bytes */_#define DVI$_MAXFILES 60 /* Maximum Files on Volume (disk) - VALUE - 4 bytes */\#define DVI$_SERIALNUM 62 /* Volume Serial Number (disk) - VALUE - 4 bytes */O#define DVI$_ACPPID 64 /* ACP Process ID - VALUE - 4 bytes */N#define DVI$_ACPTYPE 66 /* ACP type code - VALUE - 1 byte */]#define DVI$_CONCEALED 68 /* Device is a concealed device - BOOLEAN - 1 byte */N/* */N/** THE FOLLOWING CODES ARE THE INDIVIDUAL BITS OF THE DEVCHAR LONGWORD */N/* */N#define DVI$_REC 70 /* DEVICE RECORD ORIENTED */N#define DVI$_CCL 72 /* CARRIAGE CONTROL DEVICE */N#define DVI$_TRM 74 /* DEVICE IS A TERMINAL */N#define DVI$_DIR 76 /* DEVICE IS DIRECTORY STRUCTURED */T#define DVI$_SDI 78 /* DEVICE IS SINGLE DIRECTORY STRUCTURED */_#define DVI$_SQD 80 /* SEQUENTIAL BLOCK-ORIENTED DEVICE (I.E., MAGTAPE) */N#define DVI$_SPL 82 /* DEVICE BEING SPOOLED */N#define DVI$_OPR 84 /* DEVICE IS AN OPERATOR */X#define DVI$_RCT 86 /* DISK CONTAINS RCT (DEC STANDARD 166 DISK) */N#define DVI$_NET 88 /* NETWORK DEVICE */X#define DVI$_FOD 90 /* FILES-ORIENTED DEVICE (I.E., DISK AND MT) */N#define DVI$_DUA 92 /* DEVICE IS DUAL PORTED */N#define DVI$_SHR 94 /* DEVICE SHAREABLE */N#define DVI$_GEN 96 /* DEVICE IS A GENERIC DEVICE */N#define DVI$_AVL 98 /* DEVICE AVAILABLE FOR USE */N#define DVI$_MNT 100 /* DEVICE IS MOUNTED */N#define DVI$_MBX 102 /* DEVICE IS A MAILBOX */N#define DVI$_DMT 104 /* DEVICE MARKED FOR DISMOUNT */O#define DVI$_ELG 106 /* DEVICE HAS ERROR LOGGING ENABLED */N#define DVI$_ALL 108 /* DEVICE IS ALLOCATED */d#define DVI$_FOR 110 /* DEVICE IS MOUNTED FOREIGN (I.E., NON-FILE STRUCTURED) */N#define DVI$_SWL 112 /* DEVICE IS SOFTWARE WRITE LOCKED */P#define DVI$_IDV 114 /* DEVICE CAPABLE OF PROVIDING INPUT */Q#define DVI$_ODV 116 /* DEVICE CAPABLE OF PROVIDING OUTPUT */N#define DVI$_RND 118 /* DEVICE ALLOWS RANDOM ACCESS */N#define DVI$_RTM 120  /* DEVICE IS REALTIME IN NATURE */O#define DVI$_RCK 122 /* DEVICE HAS READ CHECKING ENABLED */P#define DVI$_WCK 124 /* DEVICE HAS WRITE CHECKING ENABLED */N/* */N/** THE FOLLOWING CODES ARE THE INDIVIDUAL BITS OF THE DEVDEPEND LONGWORD */N/** (AS DEFINED FOR TERMINALS: TTDEF IN STARDEFQZ.SDL) */N/*  */#define DVI$_TT_PASSALL 126#define DVI$_TT_NOECHO 128#define DVI$_TT_NOTYPEAHD 130#define DVI$_TT_ESCAPE 132#define DVI$_TT_HOSTSYNC 134#define DVI$_TT_TTSYNC 136#define DVI$_TT_SCRIPT 138#define DVI$_TT_LOWER 140#define DVI$_TT_MECHTAB 142#define DVI$_TT_WRAP 144#define DVI$_TT_CRFILL 146#define DVI$_TT_LFFILL 148#define DVI$_TT_SCOPE 150#define DVI$_TT_REMOTE 152#define DVI$_TT_EIGHTBIT 154#define DVI$_TT_MBXDSABL 156#define DVI$_TT_NOBRDCST 1 58#define DVI$_TT_READSYNC 160#define DVI$_TT_MECHFORM 162#define DVI$_TT_HALFDUP 164#define DVI$_TT_MODEM 166#define DVI$_TT_OPER 168#define DVI$_TT_PAGE 170N/* */N/** THE FOLLOWING CODES ARE THE INDIVIDUAL BITS OF THE DEVDEPEND2 LONGWORD */N/** (AS DEFINED FOR TERMINALS: TT2DEF IN STARDEFQZ.SDL) */N/* */#define DVI$_TT_LOCALECHO 172#define DVI$_TT_AUTOBAUD 174#define DVI$_TT_HANGUP 176#define DVI$_TT_MODHANGUP 178#define DVI$_TT_BRDCSTMBX 180#define DVI$_TT_DMA 182#define DVI$_TT_ALTYPEAHD 184#define DVI$_TT_SETSPEED 186N#define DVI$_TT_DCL_MAILBX 188 /* TEMP DEFINITIONS FOR DCL SPAWN */#define DVI$_TT_EDITING 190#define DVI$_TT_INSERT 192#define DVI$_TT_FALLBACK 194#define DVI$_TT_DIALUP 196#define DVI$_TT_SECURE 198#define DVI$_TT_DISCONNECT 200#define DVI$_TT_PASTHRU 202#define DVI$_TT_SIXEL 204#define DVI$_TT_DRCS 206#define DVI$_TT_PRINTER 208#define DVI$_TT_APP_KEYPAD 210#define DVI$_TT_SYSPWD 212#define DVI$_TT_ANSICRT 214#define DVI$_TT_REGIS 216#define DVI$_TT_BLOCK 218#define DVI$_TT_AVO 220#define DVI$_TT_EDIT 222#define DVI$_TT_DECCRT 224N/* */N/** THE FOLLOWING CODES ARE REGULAR ITEMS */N/*  */N#define DVI$_STS 226 /* STATUS LONGWORD */N#define DVI$_DEVSTS 228 /* DEVICE STATUS WORD */g#define DVI$_DEVCHAR2 230 /* Second device characteristics longword - VALUE - 4 bytes */N#define DVI$_FULLDEVNAM 232 /* Fully qualified device name */N#define DVI$_LOCKID 234 /* Device lock id - VALUE - 4 bytes */N#define DVI$_ALLDEVNAM 236 /* Allocation class + device name */N#define DVI$_VOLSETMEM 238 /* Volume set member */N#define DVI$_DEVLOCKNAM 240 /* Device lock name */N/* */O/** THE FOLLOWING CODES SUPPORT FEATURES OF DUAL-PATH AND SHADOW-SET DEVICES */N/* */N#define DVI$_ALLOCLASS 242 /* Allocat ion class of host(s) */N#define DVI$_ALT_HOST_AVAIL 244 /* Alternate host is active */Q#define DVI$_ALT_HOST_NAME 246 /* Name of host serving alternate path */N#define DVI$_ALT_HOST_TYPE 248 /* Type of alternate host */N#define DVI$_HOST_AVAIL 250 /* Primary host is active */N#define DVI$_HOST_COUNT 252 /* Number of paths to the device */S#define DVI$_HOST_NAME 254 /* Name of host serving the prim ary path */r#define DVI$_HOST_TYPE 256 /* Type of primary host (today one of "V785", "V780", "V750" or "HS50") */S#define DVI$_REMOTE_DEVICE 258 /* Device is not connected to local node */N#define DVI$_SERVED_DEVICE 260 /* Device is served to the cluster */N#define DVI$_SHDW_CATCHUP_COPYING 262 /* Catch-up copy is in progress */^#define DVI$_SHDW_MASTER 264 /* Device is "virtual" master device for shadow set */b#define DVI$_SHDW_MASTER_NAME 266  /* Name of the "virtual" master device for a shadow set */^#define DVI$_SHDW_MEMBER 268 /* Device is one of the volumes making a shadow set */N#define DVI$_SHDW_MERGE_COPYING 270 /* Merge copy is in progress */S#define DVI$_SHDW_NEXT_MBR_NAME 272 /* Name of the next device in shadow set */N/* */N/** THE FOLLOWING CODES ARE REGULAR ITEMS */N/*  */_#define DVI$_TT_PHYDEVNAM 274 /* Terminal physical device name - STRING - 64 bytes */^#define DVI$_TT_DECCRT2 276 /* DEC_CRT level 2 part of devdepend2 longword for */N/* terminals. */f#define DVI$_MEDIA_NAME 278 /* Decoded media name from UCB$L_MEDIA_ID field (ie. RK07 ) */d#define DVI$_MEDIA_TYPE 280 /* Decoded media type from UCB$L_MEDIA_ID field (ie. DM ) */U#define DVI$_MEDIA_ID 282 /* NONdecoded media id from UCB$L_MEDIA_ID */N/* */]#define DVI$_SHDW_FAILED_MEMBER 284 /* Member unit has been failed out from shadow set */W#define DVI$_MSCP_UNIT_NUMBER 286 /* MSCP unit number of device (internal hash */N/* value, not useful for customers or applications) */X#define DVI$_DISPLAY_DEVNAM 288  /* A displayable device name, useful for user */N/* displays but not for $ASSIGN */[#define DVI$_TT_ACCPORNAM 290 /* Name of local port on remote system. Counted */N/* string in remote native format, ie: LAT, X.29 */N#define DVI$_DEVDEPEND3 292 /* Device dependent longword 3 */N#define DVI$_TT_MULTISESSION 294 /* Multi-session terminal */N#define DVI$_TT_DECCRT3 296  /* VT3xx series terminal */N#define DVI$_SET_HOST_TERMINAL 298 /* SET HOST session terminal */N#define DVI$_DFS_ACCESS 300 /* DFS client access point device */W#define DVI$_DAPDEVNAM 302 /* DAP device name, used to store the remote */N/* name string of a device that is accessed via */N/* the DAP protocol (without DECnet), such as */N/* certain console disks.  */N#define DVI$_TT_DECCRT4 304 /* VT4xx series terminal */P#define DVI$_TT_CHARSET 306 /* Terminal character set information */N/* */N/** The following codes are the individual bits of the TT_CHARSET longword */N/** in the terminal UCB (as defined in TTCDEF) */N/* */ N#define DVI$_TT_CS_KANA 308 /* Support Kana character set */N#define DVI$_TT_CS_KANJI 310 /* Support Kanji character set */N#define DVI$_TT_CS_HANZI 312 /* Support Hanzi character set */N#define DVI$_TT_CS_HANGUL 314 /* Support Hangul character set */N#define DVI$_TT_CS_HANYU 316 /* Support Hanyu character set */N#define DVI$_TT_CS_THAI 318 /* Support Thai character set */N/*  */N/** THE FOLLOWING CODES ARE REGULAR ITEMS */N/* */N#define DVI$_DEVDEPEND4 320 /* Device dependent longword 4 */N#define DVI$_DEVICE_TYPE_NAME 322 /* DDR Device type name */P#define DVI$_TT_ASIAN_MODE 324 /* Asian terminal I/O characteristics */N#define DVI$_PREFERRED_CPU 326 /* Retur n CPU affinity of device */N#define DVI$_TT_DECCRT5 328 /* VT5xx series terminal */[#define DVI$_TT_ANSI_COLOR 330 /* Terminal supports ANSI color escape sequences */O#define DVI$_MT3_SUPPORTED 332 /* Tape UCB owned by an MTD enhanced */N/* driver? (longword) */N#define DVI$_MT3_DENSITY 334 /* Tape density. (longword) */N#define DVI$_DRIVER_IMAGE_NAME 336 /* Driver image na me -- STRING */N#define DVI$_CLIENT_DEVICE 338 /* Client device flag -- BOOLEAN */O#define DVI$_FC_PORT_NAME 340 /* Fibre Channel Port Name -- STRING */O#define DVI$_FC_NODE_NAME 342 /* Fibre Channel Node Name -- STRING */Z#define DVI$_WWID 344 /* SCSI Fibre Channel Device (Disk, Tape, etc.) */N/* World Wide Identifier -- STRING */O#define DVI$_VOLCHAR 346 /* Volume Characteristics (1 6 bytes) */[#define DVI$_HBVS_MASTER_MEMBER 348 /* This device is master member of of shadow set */X#define DVI$_MULTIPATH 350 /* this device is a member of a multipath set */S#define DVI$_MPDEV_CURRENT_PATH 352 /* the current path of the multipath set */N#define DVI$_VOLSIZE 354 /* the current logical volume size */N#define DVI$_EXPSIZE 356 /* the growth limit of the volume */N#define DVI$_QLEN 358 /* the queue length on the device */^#define DVI$_SHDW_SITE 360 /* the shadowing site-specific value for the device */Z#define DVI$_SHDW_MBR_COUNT 362 /* the number of full members in a virtual unit */U#define DVI$_SHDW_DEVICE_COUNT 364 /* the number of members in a virtual unit */N#define DVI$_SHDW_MBR_READ_COST 366 /* the read cost for a member */[#define DVI$_SHDW_READ_SOURCE 368 /* the name of the member from which reads occur */N#define DVI$_SHDW_TIMEOUT 370  /* the timeout value for the device */N#define DVI$_DVI_UNUSED_1 372 /* Had been shdw_start_delay */N#define DVI$_SHDW_GENERATION 374 /* the generation number */]#define DVI$_SHDW_STATUS 376 /* the status of either the member or virtual unit */R#define DVI$_SHDW_MBR_COPY_DONE 378 /* the percent done of a copy operation */X#define DVI$_SHDW_MBR_MERGE_DONE 380 /* the percent done of a full merge operation */Z#define DVI$_SHDW_MINIMERGE_ENABLE 382 /* is this virtual unit enabled for mini-merge? */N#define DVI$_DVI_UNUSED_2 384 /* had been shdw_minimerge_capable */V#define DVI$_SHDW_COPIER_NODE 386 /* the node on which the copy is being done */f#define DVI$_SHDW_MASTER_MBR 388 /* the device that is the master member of the virtual unit */k#define DVI$_MPDEV_AUTO_PATH_SW_CNT 390 /* number of times the device switched paths due to an I/O error */#define DVI$_MPDEV_MAN_PATH_SW_CNT 392 /* number of times the dev ice switched paths due to $SET DEVICE /PATH= /SWITCH */N#define DVI$_WRITETHRU_CACHE_ENABLED 394 /* vcb$v_writethru */N#define DVI$_NOCACHE_ON_VOLUME 396 /* vcb$v_nocache */N#define DVI$_MOUNTVER_ELIGIBLE 398 /* vcb$v_mountver */N#define DVI$_ERASE_ON_DELETE 400 /* vcb$v_erase */N#define DVI$_NOHIGHWATER 402 /* vcb$v_nohighwater */N#define DVI$_NOSHARE_MOUNTED 404 /* vcb$v_noshare */N#define DVI$_CLUSLOCK 406 /* vcb$v_cluslock */N#define DVI$_ODS2_SUBSET0 408 /* vcb$v_subset0 */N#define DVI$_PROT_SUBSYSTEM_ENABLED 410 /* vcb$v_subsystem */N#define DVI$_ODS5 412 /* vcb$v_struc_ods5 */N#define DVI$_ACCESSTIMES_RECORDED 414 /* vcb$v_accesstimes */N#define DVI$_HARDLINKS_SUPPORTED 416 /* vcb$v_hardlinks  */X#define DVI$_SCSI_DEVICE_FIRMWARE_REV 418 /* firmware revision level for SCSI devices */R#define DVI$_TOTAL_PATH_COUNT 420 /* number of configured multipath paths */Q#define DVI$_AVAILABLE_PATH_COUNT 422 /* number of working and enabled paths */N#define DVI$_VOLUME_EXTEND_QUANTITY 424 /* default volume extend quantity */N#define DVI$_MOUNT_TIME 426 /* time the volume was mounted */N#define DVI$_VOLUME_MOUNT_SYS 428 /* vcb$v_system  */N#define DVI$_VOLUME_MOUNT_GROUP 430 /* vcb$v_group */N#define DVI$_PATH_AVAILABLE 432 /* */N#define DVI$_PATH_USER_DISABLED 434 /* */N#define DVI$_PATH_NOT_RESPONDING 436 /* sud$v_not_responding */N#define DVI$_PATH_POLL_ENABLED 438 /* */N#define DVI$_MVSUPMSG 440 /* sud$v_mvsupmsg_auto */$#define DVI$_PATH_SWIT  CH_TO_TIME 442&#define DVI$_PATH_SWITCH_FROM_TIME 444!#define DVI$_ERROR_RESET_TIME 446##define DVI$_DEVICE_MAX_IO_SIZE 448"#define DVI$_VOLUME_RETAIN_MAX 450"#define DVI$_VOLUME_RETAIN_MIN 452N#define DVI$_PREFERRED_CPU_BITMAP 454 /* Bitmap indicating Fast Path CPU */&#define DVI$_MAILBOX_INITIAL_QUOTA 456%#define DVI$_MAILBOX_BUFFER_QUOTA 458#define DVI$_VOLUME_WINDOW 460'#define DVI$_VOLUME_SPOOLED_DEV_CNT 462)#define DVI$_VOLUME_PENDING_WRITE_ERR 464#define DVI$_LAN_SPEED 466 #define DVI$_LAN_LINK_UP 468(#define DVI$_LAN_DEFAULT_MAC_ADDRESS 470 #define DVI$_LAN_MAC_ADDRESS 472 #define DVI$_LAN_FULL_DUPLEX 474'#define DVI$_LAN_ALL_MULTICAST_MODE 476%#define DVI$_LAN_PROMISCUOUS_MODE 478)#define DVI$_LAN_JUMBO_FRAMES_ENABLED 480$#define DVI$_LAN_AUTONEG_ENABLED 482"#define DVI$_LAN_PROTOCOL_TYPE 484"#define DVI$_LAN_PROTOCOL_NAME 486%#define DVI$_LAN_LINK_STATE_VALID 488$#define DVI$_FC_HBA_FIRMWARE_REV 490#define DVI$_ADAPTER_IDENT 492!#define DVI$_MOUNT  CNT_CLUSTER 494&#define DVI$_SHDW_HBMM_RESET_COUNT 496%#define DVI$_SHDW_HBMM_RESET_TIME 498N#define DVI$_SPECIAL_FILES 500 /* vcb$v_special_files */N#define DVI$_NOXFCCACHE_ON_VOLUME 502 /* vcb$v_noxfccache */N#define DVI$_XFC_DEPOSING 504 /* vcb$v_xfc_deposing */N#define DVI$_SSD_USAGE_REMAINING 506 /* for SSD disk */N#define DVI$_SSD_LIFE_REMAINING 508 /* for SSD disk */N/*  */L/**** ADD NEW ITEM-CODES IMMEDIATELY BEFORE THIS COMMENT ***** */N/* */N/* */N/* Define flag bits in the item code. */N/* */#define DVI$M_SECONDARY 0x1#defin  e DVI$M_NOREDIRECT 0x8000 #ifdef __NEW_STARLETtypedef struct _dvidef {R unsigned dvi$v_secondary : 1; /* Use secondary device characteristics */N unsigned dvi$v_item_code : 14; /* Space for item code */N/* Define additional flags here, subtracting the space out of the */N/* above item code. (The item code must contain all the unused bits */N/* for proper validation in the service.) */P unsigned dvi$v_nor  edirect : 1; /* Don't redirect to virtual terminal */ } DVIDEF;#else /* __OLD_STARLET */struct dvidef {R unsigned dvi$v_secondary : 1; /* Use secondary device characteristics */N unsigned dvi$v_item_code : 14; /* Space for item code */N/* Define additional flags here, subtracting the space out of the */N/* above item code. (The item code must contain all the unused bits */N/* for proper validation in the service.)  */P unsigned dvi$v_noredirect : 1; /* Don't redirect to virtual terminal */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Define flag bits in the volume characteristics item code. */N/* */#define DVI$M_VOL_READDIR 0xFf#define DVI$C_READDIR_NONE 0 /* directory cannot be read (scan with  repeated IO$_ACCESS) */N#define DVI$C_READDIR_VIO 1 /* read directory via IO$_READVBLK */N#define DVI$C_READDIR_IO 2 /* read directory via IO$_READDIR */N#define DVI$C_READDIR_ACP 3 /* read directory via IO$_ACPCNTRL */"#define DVI$M_VOL_LENGTH_HINT 0x10##define DVI$M_VOL_CACHING_ATTR 0x20"#define DVI$M_VOL_ACCESS_DATE 0x40#define DVI$M_VOL_HARDLINK 0x80$#define DVI$M_VOL_SET_SECURITY 0x100##define DVI$M_VOL_FID_TO_NAME 0x200(#define DVI$M_VOL_OD S1_STYLE_PURGE 0x400'#define DVI$M_VOL_SHARED_TRUNCATE 0x800&#define DVI$M_VOL_WRITE_BARRIER 0x1000##define DVI$M_VOL_DIRSEQ_QIO 0x2000#define DVI$M_VOL_EFS 0x4000#define DVI$M_VOL_UCS2 0x8000&#define DVI$M_VOL_CASE_VARIANT 0x10000!#define DVI$M_VOL_MODDATE 0x20000&#define DVI$M_VOL_SPECIAL_FILE 0x40000#define DVI$M_VOL_SSIO 0x80000)#define DVI$M_VOL_LOOKUP_SPECIAL 0x100000 #ifdef __NEW_STARLETtypedef struct _dvivoldef { __union {! char dvi$b_vol_char [16];  __struct {V unsigned dvi$v_vol_readdir : 4; /* Read/scan a directory (4 bit field): */N unsigned dvi$v_vol_length_hint : 1; /* file length hint */s unsigned dvi$v_vol_caching_attr : 1; /* support 'caching attribute' (contents, atttribute, on_close) */N unsigned dvi$v_vol_access_date : 1; /* access date */N unsigned dvi$v_vol_hardlink : 1; /* hardlink */Z unsigned dvi$v_vol_set_secur ity : 1; /* set volume security profile support */a unsigned dvi$v_vol_fid_to_name : 1; /* ATR$C_FILE_SPEC attribute (lib$fid_to_name) */Z unsigned dvi$v_vol_ods1_style_purge : 1; /* post ODS1 style purge operation */l unsigned dvi$v_vol_shared_truncate : 1; /* Support truncate when open shared (Spiralog only?) */d unsigned dvi$v_vol_write_barrier : 1; /* Support IO$M_WRITE_BARRIER (vs IO$M_BARRIER) */N unsigned dvi$v_vol_dirseq_qio : 1; /*  read/arm DIRSEQ by QIO */N unsigned dvi$v_vol_efs : 1; /* extended file specification */N unsigned dvi$v_vol_ucs2 : 1; /* ucs2 file names */N unsigned dvi$v_vol_case_variant : 1; /* case variant names */` unsigned dvi$v_vol_moddate : 1; /* support for modification date (ATR$C_MODDATE). */n unsigned dvi$v_vol_special_file : 1; /* special file support including symbolic links (SYMLINK) */S unsigned dvi$v ! _vol_ssio : 1; /* support for shared stream I/O (SSIO) */j unsigned dvi$v_vol_lookup_special : 1; /* support for special file detection in file lookup */) unsigned dvi$v_fill_118_ : 3;$ } dvi$r_vol_char_fields; } dvi$r_dvivol_overlay; } DVIVOLDEF; #if !defined(__VAXC)V#define dvi$v_vol_readdir dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_readdir^#define dvi$v_vol_length_hint dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_length_" hint`#define dvi$v_vol_caching_attr dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_caching_attr^#define dvi$v_vol_access_date dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_access_dateX#define dvi$v_vol_hardlink dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_hardlink`#define dvi$v_vol_set_security dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_set_security^#define dvi$v_vol_fid_to_name dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_fid_to_nameh#define dvi$v_vol_ods1# _style_purge dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_ods1_style_purgef#define dvi$v_vol_shared_truncate dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_shared_truncateb#define dvi$v_vol_write_barrier dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_write_barrier\#define dvi$v_vol_dirseq_qio dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_dirseq_qioN#define dvi$v_vol_efs dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_efsP#define dvi$v_vol_ucs2 dvi$r_dvivol_overlay.$ dvi$r_vol_char_fields.dvi$v_vol_ucs2`#define dvi$v_vol_case_variant dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_case_variantV#define dvi$v_vol_moddate dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_moddate`#define dvi$v_vol_special_file dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_special_fileP#define dvi$v_vol_ssio dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_ssiod#define dvi$v_vol_lookup_special dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_lookup_special" % #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct dvivoldef { __union {! char dvi$b_vol_char [16]; __struct {V unsigned dvi$v_vol_readdir : 4; /* Read/scan a directory (4 bit field): */N unsigned dvi$v_vol_length_hint : 1; /* file length hint */s unsigned dvi$v_vol_caching_attr : 1; /* support 'caching attribute' (contents, atttribute, on_close) */N unsigned dvi$v_vol_access_date : 1; /* acc& ess date */N unsigned dvi$v_vol_hardlink : 1; /* hardlink */Z unsigned dvi$v_vol_set_security : 1; /* set volume security profile support */a unsigned dvi$v_vol_fid_to_name : 1; /* ATR$C_FILE_SPEC attribute (lib$fid_to_name) */Z unsigned dvi$v_vol_ods1_style_purge : 1; /* post ODS1 style purge operation */l unsigned dvi$v_vol_shared_truncate : 1; /* Support truncate when open shared (Spiralog only?) */d ' unsigned dvi$v_vol_write_barrier : 1; /* Support IO$M_WRITE_BARRIER (vs IO$M_BARRIER) */N unsigned dvi$v_vol_dirseq_qio : 1; /* read/arm DIRSEQ by QIO */N unsigned dvi$v_vol_efs : 1; /* extended file specification */N unsigned dvi$v_vol_ucs2 : 1; /* ucs2 file names */N unsigned dvi$v_vol_case_variant : 1; /* case variant names */` unsigned dvi$v_vol_moddate : 1; /* support for modification date (ATR$C_MODDAT ( E). */n unsigned dvi$v_vol_special_file : 1; /* special file support including symbolic links (SYMLINK) */S unsigned dvi$v_vol_ssio : 1; /* support for shared stream I/O (SSIO) */j unsigned dvi$v_vol_lookup_special : 1; /* support for special file detection in file lookup */) unsigned dvi$v_fill_118_ : 3;$ } dvi$r_vol_char_fields; } dvi$r_dvivol_overlay; } ; #if !defined(__VAXC)V#define dvi$v_vol_readdir dvi$r_dvivol_o) verlay.dvi$r_vol_char_fields.dvi$v_vol_readdir^#define dvi$v_vol_length_hint dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_length_hint`#define dvi$v_vol_caching_attr dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_caching_attr^#define dvi$v_vol_access_date dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_access_dateX#define dvi$v_vol_hardlink dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_hardlink`#define dvi$v_vol_set_security dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$* v_vol_set_security^#define dvi$v_vol_fid_to_name dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_fid_to_nameh#define dvi$v_vol_ods1_style_purge dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_ods1_style_purgef#define dvi$v_vol_shared_truncate dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_shared_truncateb#define dvi$v_vol_write_barrier dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_write_barrier\#define dvi$v_vol_dirseq_qio dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vo+ l_dirseq_qioN#define dvi$v_vol_efs dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_efsP#define dvi$v_vol_ucs2 dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_ucs2`#define dvi$v_vol_case_variant dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_case_variantV#define dvi$v_vol_moddate dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_moddate`#define dvi$v_vol_special_file dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_special_fileP#define dvi$v_vol_ssio dvi$r_dvivol_overlay.dv , i$r_vol_char_fields.dvi$v_vol_ssiod#define dvi$v_vol_lookup_special dvi$r_dvivol_overlay.dvi$r_vol_char_fields.dvi$v_vol_lookup_special"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* Constant form of name for past compatibility. */N/* */#define DVI$C_SECONDARY 1N/* - */N/* The following ACP type codes are formally defined in $AQBDEF */N/* These synonyms are available to user programs and they are */N/* guaranteed to be consistent by ASSUME's in SYSGETDVI. Additions */N/* to the ACP type codes in $AQBDEF should be reflected here and */N/* in the ASSUMES in SYSGETDVI. */N/* . */N/* If you add ACP codes here, you must also update the ACP_TYPES */N/* text translation table embedded over in [lib]liblexica.bli. */N/* */N#define DVI$C_ACP_F11V1 1 /* FILES-11 STRUCTURE LEVEL 1 */N#define DVI$C_ACP_F11V2 2 /* FILES-11 STRUCTURE LEVEL 2 */N#define DVI$C_ACP_MTA 3 /* MAGTAPE / */N#define DVI$C_ACP_NET 4 /* NETWORKS */N#define DVI$C_ACP_REM 5 /* REMOTE I/O */N#define DVI$C_ACP_HBS 6 /* HOST BASED SHADOWING */O#define DVI$C_ACP_F11V3 7 /* Files-11 presentation of ISO 9660 */R#define DVI$C_ACP_F11V4 8 /* Files-11 presentation of High Sierra */N#define DVI$C_ACP_F64 9 /* Files 64 support for Dollar */Q#define DVI$0 C_ACP_UCX 10 /* ACP for TCP/IP Services for OpenVMS */N#define DVI$C_ACP_F11V5 11 /* FILES-11 STRUCTURE LEVEL 5 */N#define DVI$C_ACP_F11V6 12 /* FILES-11 STRUCTURE LEVEL 6 */N#define DVI$C_ACP_HBVS 13 /* Host Based Volume Shadowing SCP */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previousl1 y-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DVIDEF_LOADED */ ww֛/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//*********************************************************************** 2 *********************************************************//*** MODULE $DVSDEF ***/#ifndef __DVSDEF_LOADED#define __DVSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 /*3 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 N/*+ 4 */N/* */N/* Device Scan Data Identifier Definitions */N/* */N/* **** NOTE **** */N/* */I/* New items must always be added at t 5 he END of the list so that */I/* users will not have to rebuild. */N/* */N/*- */\#define DVS$_DEVCLASS 1 /* Device class - VALUE - 4 bytes (only one used) */[#define DVS$_DEVTYPE 2 /* Device type - VALUE - 4 bytes (only one used) */ $#pragma __member_alignment __restoreR#ifd6 ef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __DVSDEF_LOADED */ ww@כ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */P/* S 7 ource: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]EDT$ROUTINES.SDI;1 *//********************************************************************************************************************************/'/*** MODULE EDT$ROUTINES IDENT X-1 ***/#ifndef __EDT_ROUTINES_LOADED#define __EDT_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined 8 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 __stru9 ct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* EDT Editor (EDT) Routines */N/* */N/* */N/* EDT$EDIT - Edit a f: ile */N/* */P/* status = EDT$EDIT (in_file [,out_file] [,com_file] [,jou_file] [,options] */N/* [,fileio] [,workio] [,xlate] ) */N/* */N/* in_file - Input file specification */N/* out_file - Output file specification ; */N/* com_file - Startup command file specification */N/* jou_file - Journal file specification */N/* options - Options for edit operation */N/* fileio - Bound procedure value for file I/O routine */N/* workio - Bound procedure value for work I/O routine */N/* xlate - Bound procedure value for XLATE routine < */N/* */#define edt$edit EDT$EDIT #ifdef __NEW_STARLETunsigned int edt$edit( void *in_file, __optional_params );#else /* __OLD_STARLET */(unsigned int edt$edit(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the pre= viously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __EDT_ROUTINES_LOADED */ wwכ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//*************************************************************** > *****************************************************************//*** MODULE $EEOMDEF ***/#ifndef __EEOMDEF_LOADED#define __EEOMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* @ */N/* EVAX End of module record (EEOM) */N/* */N#define EEOM$C_SUCCESS 0 /*Successful (no errors) */N#define EEOM$C_WARNING 1 /*Warnings issued */N#define EEOM$C_ERROR 2 /*Errors detected */N#define EEOM$C_ABORT 3 A /*Abort the link */N#define EEOM$K_EOMMIN 10 /*Min length of EOM record */N#define EEOM$C_EOMMIN 10 /*Min length of EOM record */U#define EEOM$K_EOMMX1 10 /*Length of EOM record w/o transfer flags */U#define EEOM$C_EOMMX1 10 /*Length of EOM record w/o transfer flags */#define EEOM$M_WKTFR 0x1N#define EEOM$K_EOMMAX 24 /*Maximum length of EOM record */N#define EEOM$C B _EOMMAX 24 /*Maximum length of EOM record */ #ifdef __NEW_STARLETtypedef struct _eeomdef {N unsigned short int eeom$w_rectyp; /*Record type (OBJ$C_EOM) */N unsigned short int eeom$w_size; /*size of this EEMOD */^ unsigned int eeom$l_total_lps; /*Number of conditional linkage pairs - max-index/2 */N unsigned short int eeom$w_comcod; /*Compiler completion code */N/*Values C */ __union {N unsigned char eeom$b_tfrflg; /*Transfer address flags */ __struct {N unsigned eeom$v_wktfr : 1; /*Transfer address is weak */) unsigned eeom$v_fill_22_ : 7;! } eeom$r_tfrflg_bits; } eeom$r_tfrflg_overlay;N unsigned char eeom$b_temp; /*pad to align PSINDX */N unsigned int eeom$l_psindx; /*P-sect of transfer address */ D __union {N unsigned __int64 eeom$q_tfradr; /*Transfer address */N unsigned int eeom$l_tfradr; /*Transfer address */ } eeom$r_tfradr_overlay; } EEOMDEF; #if !defined(__VAXC)9#define eeom$b_tfrflg eeom$r_tfrflg_overlay.eeom$b_tfrflgJ#define eeom$v_wktfr eeom$r_tfrflg_overlay.eeom$r_tfrflg_bits.eeom$v_wktfr9#define eeom$q_tfradr eeom$r_tfradr_overlay.eeom$q_tfradr9#define eeom$l_tfradr eeom$r_tfradr_overlay.eeom$l_tfradr"#e E ndif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct eeomdef {N unsigned short int eeom$w_rectyp; /*Record type (OBJ$C_EOM) */N unsigned short int eeom$w_size; /*size of this EEMOD */^ unsigned int eeom$l_total_lps; /*Number of conditional linkage pairs - max-index/2 */N unsigned short int eeom$w_comcod; /*Compiler completion code */N/*Values */ F __union {N unsigned char eeom$b_tfrflg; /*Transfer address flags */ __struct {N unsigned eeom$v_wktfr : 1; /*Transfer address is weak */) unsigned eeom$v_fill_22_ : 7;! } eeom$r_tfrflg_bits; } eeom$r_tfrflg_overlay;N unsigned char eeom$b_temp; /*pad to align PSINDX */N unsigned int eeom$l_psindx; /*P-sect of transfer address */ __union {N unsigned int G eeom$q_tfradr [2]; /*Transfer address */N unsigned int eeom$l_tfradr; /*Transfer address */ } eeom$r_tfradr_overlay; } ; #if !defined(__VAXC)9#define eeom$b_tfrflg eeom$r_tfrflg_overlay.eeom$b_tfrflgJ#define eeom$v_wktfr eeom$r_tfrflg_overlay.eeom$r_tfrflg_bits.eeom$v_wktfr9#define eeom$q_tfradr eeom$r_tfradr_overlay.eeom$q_tfradr9#define eeom$l_tfradr eeom$r_tfradr_overlay.eeom$l_tfradr"#endif /* #if !defined(__VAXC) */ %H #endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EEOMDEF_LOADED */ ww+؛/*************************************************************************************************************** I *****************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $EFNDEF ***/#ifndef __EFNDEF_LOADED#define __EFNDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomembJ er_alignmentR#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 !definedK (__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 N#define EFN$C_ENF 128 /* Event No Flag (no stored state) */N#define EFN$C_CTX 129 /* Wait for context */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */L b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EFNDEF_LOADED */ wwKR؛/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//***** M ***************************************************************************************************************************//*** MODULE $EGPSDEF ***/#ifndef __EGPSDEF_LOADED#define __EGPSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defineN d 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#elseO #define __union variant_union#endif#endif N/* */N/* EVAX GSD entry - P-section definition */N/* */#define EGPS$M_PIC 0x1#define EGPS$M_LIB 0x2#define EGPS$M_OVR 0x4#define EGPS$M_REL 0x8#define EGPS$M_GBL 0x10#define EGPS$M_SHR 0x20#define EGPS$M_EXE 0x40#define EGPS$M_RD 0x80#define EGPS$MP _WRT 0x100#define EGPS$M_VEC 0x200#define EGPS$M_NOMOD 0x400#define EGPS$M_COM 0x800!#define EGPS$M_ALLOC_64BIT 0x1000#define EGPS$K_NAME 12#define EGPS$C_NAME 12 #ifdef __NEW_STARLETtypedef struct _egpsdef { __union {N unsigned short int egps$w_gsdtyp; /*Typ field */ __struct {' short int egpsdef$$_fill_1;# } egps$r_gsdtyp_fields; } egps$r_gsdtyp_overlay;N unsigned short int egps$w_size; /*si Q ze of this EGPS */N unsigned char egps$b_align; /*P-sect alignment */N unsigned char egps$b_temp; /*pad for aligning */ __union {N unsigned short int egps$w_flags; /*P-sect flags */ __struct {N unsigned egps$v_pic : 1; /*Position independent */N unsigned egps$v_lib : 1; /*From a shareable image */N unsigned egps$v_ovr R : 1; /*Overlaid memory allocation */N unsigned egps$v_rel : 1; /*Relocatable */N unsigned egps$v_gbl : 1; /*Global scope */N unsigned egps$v_shr : 1; /*Shareable */N unsigned egps$v_exe : 1; /*Executable */N unsigned egps$v_rd : 1; /*Readable */N unsigned egps$v_wrt : 1; /*Writeable S */N unsigned egps$v_vec : 1; /*Vector psect */N unsigned egps$v_nomod : 1; /*Not stored into */N unsigned egps$v_com : 1; /*Associated with COMM sym */N unsigned egps$v_alloc_64bit : 1; /*Load in 64-bit space */) unsigned egps$v_fill_23_ : 3; } egps$r_flags_bits; } egps$r_flags_overlay;N unsigned int egps$l_alloc; /*Length of T this contribution */N unsigned char egps$b_namlng; /*Length of p-sect name */N char egps$t_name [31]; /*Name field */ } EGPSDEF; #if !defined(__VAXC)9#define egps$w_gsdtyp egps$r_gsdtyp_overlay.egps$w_gsdtyp6#define egps$w_flags egps$r_flags_overlay.egps$w_flagsD#define egps$v_pic egps$r_flags_overlay.egps$r_flags_bits.egps$v_picD#define egps$v_lib egps$r_flags_overlay.egps$r_flags_bits.egps$v_libD#define egps$v_ovr eU gps$r_flags_overlay.egps$r_flags_bits.egps$v_ovrD#define egps$v_rel egps$r_flags_overlay.egps$r_flags_bits.egps$v_relD#define egps$v_gbl egps$r_flags_overlay.egps$r_flags_bits.egps$v_gblD#define egps$v_shr egps$r_flags_overlay.egps$r_flags_bits.egps$v_shrD#define egps$v_exe egps$r_flags_overlay.egps$r_flags_bits.egps$v_exeB#define egps$v_rd egps$r_flags_overlay.egps$r_flags_bits.egps$v_rdD#define egps$v_wrt egps$r_flags_overlay.egps$r_flags_bits.egps$v_wrtD#define egps$v_vec egps$r_flags_overla V y.egps$r_flags_bits.egps$v_vecH#define egps$v_nomod egps$r_flags_overlay.egps$r_flags_bits.egps$v_nomodD#define egps$v_com egps$r_flags_overlay.egps$r_flags_bits.egps$v_comT#define egps$v_alloc_64bit egps$r_flags_overlay.egps$r_flags_bits.egps$v_alloc_64bit"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct egpsdef { __union {N unsigned short int egps$w_gsdtyp; /*Typ field */ __struct {' short int egpsdef$$_fill W _1;# } egps$r_gsdtyp_fields; } egps$r_gsdtyp_overlay;N unsigned short int egps$w_size; /*size of this EGPS */N unsigned char egps$b_align; /*P-sect alignment */N unsigned char egps$b_temp; /*pad for aligning */ __union {N unsigned short int egps$w_flags; /*P-sect flags */ __struct {N unsigned egps$v_pic : 1; /*Position independent X */N unsigned egps$v_lib : 1; /*From a shareable image */N unsigned egps$v_ovr : 1; /*Overlaid memory allocation */N unsigned egps$v_rel : 1; /*Relocatable */N unsigned egps$v_gbl : 1; /*Global scope */N unsigned egps$v_shr : 1; /*Shareable */N unsigned egps$v_exe : 1; /*Executable */N unsiY gned egps$v_rd : 1; /*Readable */N unsigned egps$v_wrt : 1; /*Writeable */N unsigned egps$v_vec : 1; /*Vector psect */N unsigned egps$v_nomod : 1; /*Not stored into */N unsigned egps$v_com : 1; /*Associated with COMM sym */N unsigned egps$v_alloc_64bit : 1; /*Load in 64-bit space */) unsigned egps$v_fill_23_ : 3; Z } egps$r_flags_bits; } egps$r_flags_overlay;N unsigned int egps$l_alloc; /*Length of this contribution */N unsigned char egps$b_namlng; /*Length of p-sect name */N char egps$t_name [31]; /*Name field */ } ; #if !defined(__VAXC)9#define egps$w_gsdtyp egps$r_gsdtyp_overlay.egps$w_gsdtyp6#define egps$w_flags egps$r_flags_overlay.egps$w_flagsD#define egps$v_pic egps$r_flags_overlay.egps[ $r_flags_bits.egps$v_picD#define egps$v_lib egps$r_flags_overlay.egps$r_flags_bits.egps$v_libD#define egps$v_ovr egps$r_flags_overlay.egps$r_flags_bits.egps$v_ovrD#define egps$v_rel egps$r_flags_overlay.egps$r_flags_bits.egps$v_relD#define egps$v_gbl egps$r_flags_overlay.egps$r_flags_bits.egps$v_gblD#define egps$v_shr egps$r_flags_overlay.egps$r_flags_bits.egps$v_shrD#define egps$v_exe egps$r_flags_overlay.egps$r_flags_bits.egps$v_exeB#define egps$v_rd egps$r_flags_overlay.egps$r_flags_bits.egp \ s$v_rdD#define egps$v_wrt egps$r_flags_overlay.egps$r_flags_bits.egps$v_wrtD#define egps$v_vec egps$r_flags_overlay.egps$r_flags_bits.egps$v_vecH#define egps$v_nomod egps$r_flags_overlay.egps$r_flags_bits.egps$v_nomodD#define egps$v_com egps$r_flags_overlay.egps$r_flags_bits.egps$v_comT#define egps$v_alloc_64bit egps$r_flags_overlay.egps$r_flags_bits.egps$v_alloc_64bit"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* ] */N/* EVAX GSD entry - 64-Bit P-section definition */N/* */#define EGPS64$M_PIC 0x1#define EGPS64$M_LIB 0x2#define EGPS64$M_OVR 0x4#define EGPS64$M_REL 0x8#define EGPS64$M_GBL 0x10#define EGPS64$M_SHR 0x20#define EGPS64$M_EXE 0x40#define EGPS64$M_RD 0x80#define EGPS64$M_WRT 0x100#define EGPS64$M_VEC 0x200#define EGPS64$M_NOMOD 0x400#define EGPS64^ $M_COM 0x800##define EGPS64$M_ALLOC_64BIT 0x1000#define EGPS64$K_NAME 16#define EGPS64$C_NAME 16 #ifdef __NEW_STARLETtypedef struct _egps64def { __union {N unsigned short int egps64$w_gsdtyp; /*Typ field */ __struct {) short int egps64def$$_fill_1;% } egps64$r_gsdtyp_fields;" } egps64$r_gsdtyp_overlay;N unsigned short int egps64$w_size; /*size of this EGPS */N unsigned char egps64$b_a _ lign; /*P-sect alignment */N unsigned char egps64$b_temp; /*pad for aligning */ __union {N unsigned short int egps64$w_flags; /*P-sect flags */ __struct {N unsigned egps64$v_pic : 1; /*Position independent */N unsigned egps64$v_lib : 1; /*From a shareable image */N unsigned egps64$v_ovr : 1; /*Overlaid memory allocation */N unsi` gned egps64$v_rel : 1; /*Relocatable */N unsigned egps64$v_gbl : 1; /*Global scope */N unsigned egps64$v_shr : 1; /*Shareable */N unsigned egps64$v_exe : 1; /*Executable */N unsigned egps64$v_rd : 1; /*Readable */N unsigned egps64$v_wrt : 1; /*Writeable */N unsigned egps64$v_vec : 1; /* a Vector psect */N unsigned egps64$v_nomod : 1; /*Not stored into */N unsigned egps64$v_com : 1; /*Associated with COMM sym */N unsigned egps64$v_alloc_64bit : 1; /*Load in 64-bit space */+ unsigned egps64$v_fill_24_ : 3;" } egps64$r_flags_bits;! } egps64$r_flags_overlay; __union {N unsigned __int64 egps64$q_alloc; /*Length of this contribution */N unsign b ed int egps64$l_alloc; /* Low Longword */! } egps64$r_alloc_overlay;N unsigned char egps64$b_namlng; /*Length of p-sect name */N char egps64$t_name [31]; /*Name field */ } EGPS64DEF; #if !defined(__VAXC)?#define egps64$w_gsdtyp egps64$r_gsdtyp_overlay.egps64$w_gsdtyp<#define egps64$w_flags egps64$r_flags_overlay.egps64$w_flagsL#define egps64$v_pic egps64$r_flags_overlay.egps64$r_flags_bits.egps64$vc _picL#define egps64$v_lib egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_libL#define egps64$v_ovr egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_ovrL#define egps64$v_rel egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_relL#define egps64$v_gbl egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_gblL#define egps64$v_shr egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_shrL#define egps64$v_exe egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_exeJ#define egps64$v_rd egps64$r_flad gs_overlay.egps64$r_flags_bits.egps64$v_rdL#define egps64$v_wrt egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_wrtL#define egps64$v_vec egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_vecP#define egps64$v_nomod egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_nomodL#define egps64$v_com egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_com\#define egps64$v_alloc_64bit egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_alloc_64bit<#define egps64$q_alloc egps64$r_alloc_overlay.egps64e $q_alloc<#define egps64$l_alloc egps64$r_alloc_overlay.egps64$l_alloc"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct egps64def { __union {N unsigned short int egps64$w_gsdtyp; /*Typ field */ __struct {) short int egps64def$$_fill_1;% } egps64$r_gsdtyp_fields;" } egps64$r_gsdtyp_overlay;N unsigned short int egps64$w_size; /*size of this EGPS */N unsigned char egps64 f $b_align; /*P-sect alignment */N unsigned char egps64$b_temp; /*pad for aligning */ __union {N unsigned short int egps64$w_flags; /*P-sect flags */ __struct {N unsigned egps64$v_pic : 1; /*Position independent */N unsigned egps64$v_lib : 1; /*From a shareable image */N unsigned egps64$v_ovr : 1; /*Overlaid memory allocation */N g unsigned egps64$v_rel : 1; /*Relocatable */N unsigned egps64$v_gbl : 1; /*Global scope */N unsigned egps64$v_shr : 1; /*Shareable */N unsigned egps64$v_exe : 1; /*Executable */N unsigned egps64$v_rd : 1; /*Readable */N unsigned egps64$v_wrt : 1; /*Writeable */N unsigned egps64$v_vec : 1; h /*Vector psect */N unsigned egps64$v_nomod : 1; /*Not stored into */N unsigned egps64$v_com : 1; /*Associated with COMM sym */N unsigned egps64$v_alloc_64bit : 1; /*Load in 64-bit space */+ unsigned egps64$v_fill_24_ : 3;" } egps64$r_flags_bits;! } egps64$r_flags_overlay; __union {N unsigned int egps64$q_alloc [2]; /*Length of this contribution */N un i signed int egps64$l_alloc; /* Low Longword */! } egps64$r_alloc_overlay;N unsigned char egps64$b_namlng; /*Length of p-sect name */N char egps64$t_name [31]; /*Name field */ } ; #if !defined(__VAXC)?#define egps64$w_gsdtyp egps64$r_gsdtyp_overlay.egps64$w_gsdtyp<#define egps64$w_flags egps64$r_flags_overlay.egps64$w_flagsL#define egps64$v_pic egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_picj L#define egps64$v_lib egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_libL#define egps64$v_ovr egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_ovrL#define egps64$v_rel egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_relL#define egps64$v_gbl egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_gblL#define egps64$v_shr egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_shrL#define egps64$v_exe egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_exeJ#define egps64$v_rd egps64$r_flags_ok verlay.egps64$r_flags_bits.egps64$v_rdL#define egps64$v_wrt egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_wrtL#define egps64$v_vec egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_vecP#define egps64$v_nomod egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_nomodL#define egps64$v_com egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_com\#define egps64$v_alloc_64bit egps64$r_flags_overlay.egps64$r_flags_bits.egps64$v_alloc_64bit<#define egps64$q_alloc egps64$r_alloc_overlay.egps64$q_al lloc<#define egps64$l_alloc egps64$r_alloc_overlay.egps64$l_alloc"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EGPSDEF_LOADED */ ww{؛/*** m *****************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $EGSDEF ***/#ifndef __EGSDEF_LOADED#define __EGSDEF_LOADED 1 G#pragma __nostandard n /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 ...#elso e#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 N/* */N/* EVAX Global symbol definition record (EGSD) */N/* p */N#define EGSD$K_ENTRIES 2 /*Offset to first entry in record */N#define EGSD$C_ENTRIES 2 /*Offset to first entry in record */N#define EGSD$C_PSC 0 /*Psect definition */N#define EGSD$C_SYM 1 /*Symbol specification */N#define EGSD$C_IDC 2 /*Random entity check */N#define EGSD$C_SPSC 5 /*Sharq eable image psect definition */T#define EGSD$C_SYMV 6 /*Vectored (dual-valued) versions of SYM, */N#define EGSD$C_SYMM 7 /*Masked versions of SYM, */N#define EGSD$C_SYMG 8 /*EGST - gst version of SYM */N#define EGSD$C_PSC64 9 /*Psect with 64-bit length */\#define EGSD$C_SPSC64 10 /*Shareable image psect definition w/64b len/base */N#define EGSD$C_MAXRECTYP 10 /*Maximum en r try type defined */ #ifdef __NEW_STARLETtypedef struct _egsdef {N unsigned short int egsd$w_rectyp; /*Record type (OBJ$C_GSD) */N unsigned short int egsd$w_recsiz; /*Size of theis EVAX EGSD */R unsigned int egsd$l_alignlw; /*Insure that subrecords are QW aligned */Q unsigned short int egsd$w_gsdtyp; /*Type of entry (first byte of entry) */N unsigned short int egsd$w_gsdsiz; /*Size of this entry */ } EGSDEF;#e s lse /* __OLD_STARLET */struct egsdef {N unsigned short int egsd$w_rectyp; /*Record type (OBJ$C_GSD) */N unsigned short int egsd$w_recsiz; /*Size of theis EVAX EGSD */R unsigned int egsd$l_alignlw; /*Insure that subrecords are QW aligned */Q unsigned short int egsd$w_gsdtyp; /*Type of entry (first byte of entry) */N unsigned short int egsd$w_gsdsiz; /*Size of this entry */ } ;%#endif /* #ifdef __NEW_STARLET */t $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EGSDEF_LOADED */ wwٛ/********************************************************************************************************************************/=/* Created: 5-Apr-201 u 2 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $EGSTDEF ***/#ifndef __EGSTDEF_LOADED#define __EGSTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE v /* 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#elsew #define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */T/* EVAX Universal Symbol Definition - used by the linker instead of ESDF$ records */R/* when building the global symbol table. The def and univ. bits should always */N/* be set for these records. */x N/* */#define EGST$K_NAME 37#define EGST$C_NAME 37 #ifdef __NEW_STARLETtypedef struct _egstdef { __union {N unsigned short int egst$w_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {' short int egstdef$$_fill_1;# } egst$r_gsdtyp_fields; } egst$r_gsdtyp_overlay;N unsigned short int egst$w_size; /*size of this EGST */N unsign y ed char egst$b_datyp; /*Maps over GSY$B_DATYP */N unsigned char egst$b_temp; /*pad for alignment */N unsigned short int egst$w_flags; /*Maps over GSY$W_FLAGS */ __union {& unsigned __int64 egst$q_value;" unsigned int egst$l_value; } egst$r_val_overlay; __union {% unsigned __int64 egst$q_lp_1;! unsigned int egst$l_lp_1; } egst$r_lp1_overlay; __union {% unsi z gned __int64 egst$q_lp_2;! unsigned int egst$l_lp_2; } egst$r_lp2_overlay;N unsigned int egst$l_psindx; /*Owning psect number */N unsigned char egst$b_namlng; /*Length of name */N char egst$t_name [31]; /*Symbol name */ } EGSTDEF; #if !defined(__VAXC)9#define egst$w_gsdtyp egst$r_gsdtyp_overlay.egst$w_gsdtyp4#define egst$q_value egst$r_val_overlay.egst$q_value4#define egst$l{ _value egst$r_val_overlay.egst$l_value2#define egst$q_lp_1 egst$r_lp1_overlay.egst$q_lp_12#define egst$l_lp_1 egst$r_lp1_overlay.egst$l_lp_12#define egst$q_lp_2 egst$r_lp2_overlay.egst$q_lp_22#define egst$l_lp_2 egst$r_lp2_overlay.egst$l_lp_2"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct egstdef { __union {N unsigned short int egst$w_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {' short int egstdef$$_fill_1;# | } egst$r_gsdtyp_fields; } egst$r_gsdtyp_overlay;N unsigned short int egst$w_size; /*size of this EGST */N unsigned char egst$b_datyp; /*Maps over GSY$B_DATYP */N unsigned char egst$b_temp; /*pad for alignment */N unsigned short int egst$w_flags; /*Maps over GSY$W_FLAGS */ __union {& unsigned int egst$q_value [2];" unsigned int egst$l_value; } egst$r_val_overlay;}  __union {% unsigned int egst$q_lp_1 [2];! unsigned int egst$l_lp_1; } egst$r_lp1_overlay; __union {% unsigned int egst$q_lp_2 [2];! unsigned int egst$l_lp_2; } egst$r_lp2_overlay;N unsigned int egst$l_psindx; /*Owning psect number */N unsigned char egst$b_namlng; /*Length of name */N char egst$t_name [31]; /*Symbol name */ } ; #i ~ f !defined(__VAXC)9#define egst$w_gsdtyp egst$r_gsdtyp_overlay.egst$w_gsdtyp4#define egst$q_value egst$r_val_overlay.egst$q_value4#define egst$l_value egst$r_val_overlay.egst$l_value2#define egst$q_lp_1 egst$r_lp1_overlay.egst$q_lp_12#define egst$l_lp_1 egst$r_lp1_overlay.egst$l_lp_12#define egst$q_lp_2 egst$r_lp2_overlay.egst$q_lp_22#define egst$l_lp_2 egst$r_lp2_overlay.egst$l_lp_2"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EGSTDEF_LOADED */ wwcٛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV 3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $EGSYDEF ***/#ifndef __EGSYDEF_LOADED#define __EGSYDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr s ize 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_str uct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* EVAX GSD entry - Symbol definition */N/* */N/* common to definitions, references, and entry */N/* point definitions.  */N/* */#define EGSY$M_WEAK 0x1#define EGSY$M_DEF 0x2#define EGSY$M_UNI 0x4#define EGSY$M_REL 0x8#define EGSY$M_COMM 0x10#define EGSY$M_VECEP 0x20#define EGSY$M_NORM 0x40#define EGSY$M_QUAD_VAL 0x80 #ifdef __NEW_STARLETtypedef struct _egsydef { __union {N unsigned short int egsy$w_gsdtyp; /*Type field */ __struct {" char egsydef$$_fill_1;# } egsy$r_gsdtyp_fields; } egsy$r_gsdtyp_overlay;N unsigned short int egsy$w_size; /*size of this EGSY */N unsigned char egsy$b_datyp; /*Symbol data type */N unsigned char egsy$b_temp; /*pad for alignment */ __union {N unsigned short int egsy$w_flags; /*Symbol flags */ __struct {N unsigned egsy$v_weak : 1; /* Weak symbol */N unsigned egsy$v_def : 1; /*Definition */N unsigned egsy$v_uni : 1; /*Universal */N unsigned egsy$v_rel : 1; /*Relocatable */N unsigned egsy$v_comm : 1; /*C common globaldef */N unsigned egsy$v_vecep : 1; /*Vectored Entry Point */N unsigned egsy$v_norm : 1; /*Normal Procedure(FD) */N unsigned egsy$v_quad_val : 1; /*Value is quadword */ } egsy$r_flags_bits; } egsy$r_flags_overlay; } EGSYDEF; #if !defined(__VAXC)9#define egsy$w_gsdtyp egsy$r_gsdtyp_overlay.egsy$w_gsdtyp6#define egsy$w_flags egsy$r_flags_overlay.egsy$w_flagsF#define egsy$v_weak egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_weakD#define egsy$v_def egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_defD#define egsy$v_uni egsy$r_flags_overlay.egsy$r _flags_bits.egsy$v_uniD#define egsy$v_rel egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_relF#define egsy$v_comm egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_commH#define egsy$v_vecep egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_vecepF#define egsy$v_norm egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_normN#define egsy$v_quad_val egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_quad_val"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct egsydef { __union {N unsigned short int egsy$w_gsdtyp; /*Type field */ __struct {" char egsydef$$_fill_1;# } egsy$r_gsdtyp_fields; } egsy$r_gsdtyp_overlay;N unsigned short int egsy$w_size; /*size of this EGSY */N unsigned char egsy$b_datyp; /*Symbol data type */N unsigned char egsy$b_temp; /*pad for alignment */ __union {N unsigned short int egsy$w_flags; /*Symbo l flags */ __struct {N unsigned egsy$v_weak : 1; /*Weak symbol */N unsigned egsy$v_def : 1; /*Definition */N unsigned egsy$v_uni : 1; /*Universal */N unsigned egsy$v_rel : 1; /*Relocatable */N unsigned egsy$v_comm : 1; /*C common globaldef */N unsigned egsy$v_vecep : 1; /*Vectored E ntry Point */N unsigned egsy$v_norm : 1; /*Normal Procedure(FD) */N unsigned egsy$v_quad_val : 1; /*Value is quadword */ } egsy$r_flags_bits; } egsy$r_flags_overlay; } ; #if !defined(__VAXC)9#define egsy$w_gsdtyp egsy$r_gsdtyp_overlay.egsy$w_gsdtyp6#define egsy$w_flags egsy$r_flags_overlay.egsy$w_flagsF#define egsy$v_weak egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_weakD#define egsy$v_def egsy$r_ flags_overlay.egsy$r_flags_bits.egsy$v_defD#define egsy$v_uni egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_uniD#define egsy$v_rel egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_relF#define egsy$v_comm egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_commH#define egsy$v_vecep egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_vecepF#define egsy$v_norm egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_normN#define egsy$v_quad_val egsy$r_flags_overlay.egsy$r_flags_bits.egsy$v_quad_val"#endif /* #if !defined( __VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EGSYDEF_LOADED */ wwٛ/*********************************************************************************************** *********************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $EIDCDEF ***/#ifndef __EIDCDEF_LOADED#define __EIDCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#p ragma __nomember_alignmentR#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 N/* */N/* EVAX IDC - Random entity ident consistency check */N/* */#define EIDC$C_LEQ 0#define EIDC$C_EQUAL 1 #ifdef __NEW_STARLETtypedef struct _eidcdef {N unsigned short int eidc$w_gsdtyp; /*Type field */N unsigned short int eidc$w_size; /*size of this EIDCDEF */ __union {N unsigned int eidc$l_flags; /*Flags */ __struct {Z unsigned eidc$v_binident : 1; /*Ident is binary longword rather than ASCIC */\ unsigned eidc$v_idmatch : 2; /*Field for ident match c ontrol if binary ident */S unsigned eidc$v_errsev : 3; /*Error severity (default is warning-0) */) unsigned eidc$v_fill_27_ : 2; } eidc$r_flags_bits;N/*Match control values */ } eidc$r_flags_overlay; __union {N unsigned char eidc$b_namlng; /*Length of entity name */ __struct {" char eidcdef$$_fill_1;N/* Followed by entity name  */N/* Followed by byte of length of name of object */N/* Followed by the object name */N/* Followed by */N/* byte of ident length */N/* ident string (length = string length) */N/* or */N/* ident binary value (length = 4) */# } eidc$r_namlng_fields; } eidc$r_namlng_overlay; } EIDCDEF; #if !defined(__VAXC)6#define eidc$l_flags eidc$r_flags_overlay.eidc$l_flagsN#define eidc$v_binident eidc$r_flags_overlay.eidc$r_flags_bits.eidc$v_binidentL#define eidc$v_idmatch eidc$r_flags_overlay.eidc$r_flags_bits.eidc$v_idmatchJ#define eidc$v_errsev eidc$r_flags_overlay.eidc$r_flags_bits.eidc$v_errsev9#define eidc$b _namlng eidc$r_namlng_overlay.eidc$b_namlng"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct eidcdef {N unsigned short int eidc$w_gsdtyp; /*Type field */N unsigned short int eidc$w_size; /*size of this EIDCDEF */ __union {N unsigned int eidc$l_flags; /*Flags */ __struct {Z unsigned eidc$v_binident : 1; /*Ident is binary longword rather than ASCIC */\ unsigned eidc$v_idmatch : 2; /*Field for ident match control if binary ident */S unsigned eidc$v_errsev : 3; /*Error severity (default is warning-0) */) unsigned eidc$v_fill_27_ : 2; } eidc$r_flags_bits;N/*Match control values */ } eidc$r_flags_overlay; __union {N unsigned char eidc$b_namlng; /*Length of entity name */ __struct {" char eidcdef$$_fill_1;N/* Followed by entity name */N/* Followed by byte of length of name of object */N/* Followed by the object name */N/* Followed by */N/* byte of ident length */N/* ident string (length = string length) */N/* or */N/* ident binary value (length = 4) */# } eidc$r_namlng_fields; } eidc$r_namlng_overlay; } ; #if !defined(__VAXC)6#define eidc$l_flags eidc$r_flags_overlay.eidc$l_flagsN#define eidc$v_binident eidc$r_flags_overlay.eidc$r_flags_bits.eidc$v_binidentL#define eidc$v_idmatch eidc$r_flags_overlay.eidc$r_flags_bits.eidc$v_idmatchJ#define eidc$v_errsev eidc$r_f lags_overlay.eidc$r_flags_bits.eidc$v_errsev9#define eidc$b_namlng eidc$r_namlng_overlay.eidc$b_namlng"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EIDCDEF_LOADED */ ww 'ڛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************/#/*** MODULE ELFDATYP IDENT X-4 ***/#ifndef __ELFDATYP_LOADED #define __ELFDATYP_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #ifdef __NEW_STARLETR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __requir ed_pointer_size __long /* And set ptr size default to 64-bit pointers */typedef void *ELF64_ADDR;#else% typedef unsigned __int64 ELF64_ADDR;#endif#else /* __OLD_STARLET */$typedef unsigned __int64 elf64_addr;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLET#typedef unsigned __int64 ELF64_OFF;#else /* __OLD_STARLET */#typedef unsigned int elf64_off [2];%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLET&typedef unsigned short int ELF64_HALF;#els e /* __OLD_STARLET */&typedef unsigned short int elf64_half;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLET typedef unsigned int ELF64_WORD;#else /* __OLD_STARLET */ typedef unsigned int elf64_word;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLETtypedef int ELF64_SWORD;#else /* __OLD_STARLET */typedef int elf64_sword;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLET%typedef unsigned __int64 ELF64_XWORD;#else /* __OLD_STARLET * /%typedef unsigned int elf64_xword [2];%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLETtypedef __int64 ELF64_SXWORD;#else /* __OLD_STARLET */typedef int elf64_sxword [2];%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLET#typedef unsigned int ELF64_SECTION;#else /* __OLD_STARLET */#typedef unsigned int elf64_section;%#endif /* #ifdef __NEW_STARLET */#ifdef __NEW_STARLET"typedef unsigned int ELF64_SYMNDX;#else /* __OLD_STARLET */"type def unsigned int elf64_symndx;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _subsys_majmin {& unsigned short int ver$w_minor_id;& unsigned short int ver$w_major_id; } SUBSYS_MAJMIN;#else /* __OLD_STARLET */typedef struct _subsys_majmin {& unsigned short int ver$w_minor_id;& unsigned short int ver$w_major_id; } subsys_majmin;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _sysver_majmin {!  unsigned ver$v_minor_id : 24; unsigned ver$v_major_id : 8; } SYSVER_MAJMIN;#else /* __OLD_STARLET */typedef struct _sysver_majmin {! unsigned ver$v_minor_id : 24; unsigned ver$v_major_id : 8; } sysver_majmin;%#endif /* #ifdef __NEW_STARLET */#define LNKG_DESC1$M_TYPE 0x1!#define LNKG_DESC1$M_NOTUSED0 0x2#define LNKG_DESC1$M_GP 0x4!#define LNKG_DESC1$M_NOTUSED1 0x8#define LNKG_DESC1$M_R2 0x30#define LNKG_DESC1$M_R3 0xC0#define LNKG_DESC1$M_R4 0x 300#define LNKG_DESC1$M_R5 0xC00#define LNKG_DESC1$M_R6 0x3000#define LNKG_DESC1$M_R7 0xC000#define LNKG_DESC1$M_R8 0x30000#define LNKG_DESC1$M_R9 0xC0000!#define LNKG_DESC1$M_R10 0x300000!#define LNKG_DESC1$M_R11 0xC00000"#define LNKG_DESC1$M_R12 0x3000000"#define LNKG_DESC1$M_R13 0xC000000##define LNKG_DESC1$M_R14 0x30000000##define LNKG_DESC1$M_R15 0xC0000000$#define LNKG_DESC1$M_R16 0x300000000$#define LNKG_DESC1$M_R17 0xC00000000%#define LNKG_DESC1$M_R18 0x3000000000% #define LNKG_DESC1$M_R19 0xC000000000&#define LNKG_DESC1$M_R20 0x30000000000&#define LNKG_DESC1$M_R21 0xC0000000000'#define LNKG_DESC1$M_R22 0x300000000000'#define LNKG_DESC1$M_R23 0xC00000000000(#define LNKG_DESC1$M_R24 0x3000000000000'#define LNKG_DESC1$M_AI 0x4000000000000.#define LNKG_DESC1$M_NOTUSED25 0x8000000000000)#define LNKG_DESC1$M_R26 0x30000000000000)#define LNKG_DESC1$M_R27 0xC0000000000000*#define LNKG_DESC1$M_R28 0x300000000000000*#define LNKG_DESC1$M_R29 0xC0000000000 0000+#define LNKG_DESC1$M_R30 0x3000000000000000+#define LNKG_DESC1$M_R31 0xC000000000000000#define LNKG_DESC1$K_SIZE 8#define LNKG_DESC1$C_SIZE 8 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif typedef struct _vms_lnkg_desc1 {#pragma __nomember_alignment# unsigned lnkg_desc1$v_type : 1;' unsigned lnkg_desc1$v_notu sed0 : 1;! unsigned lnkg_desc1$v_gp : 1;' unsigned lnkg_desc1$v_notused1 : 1;! unsigned lnkg_desc1$v_r2 : 2;! unsigned lnkg_desc1$v_r3 : 2;! unsigned lnkg_desc1$v_r4 : 2;! unsigned lnkg_desc1$v_r5 : 2;! unsigned lnkg_desc1$v_r6 : 2;! unsigned lnkg_desc1$v_r7 : 2;! unsigned lnkg_desc1$v_r8 : 2;! unsigned lnkg_desc1$v_r9 : 2;" unsigned lnkg_desc1$v_r10 : 2;" unsigned lnkg_desc1$v_r11 : 2;" unsigned lnkg_desc1$v_r12 : 2;" unsigned lnkg_de sc1$v_r13 : 2;" unsigned lnkg_desc1$v_r14 : 2;" unsigned lnkg_desc1$v_r15 : 2;" unsigned lnkg_desc1$v_r16 : 2;" unsigned lnkg_desc1$v_r17 : 2;" unsigned lnkg_desc1$v_r18 : 2;" unsigned lnkg_desc1$v_r19 : 2;" unsigned lnkg_desc1$v_r20 : 2;" unsigned lnkg_desc1$v_r21 : 2;" unsigned lnkg_desc1$v_r22 : 2;" unsigned lnkg_desc1$v_r23 : 2;" unsigned lnkg_desc1$v_r24 : 2;! unsigned lnkg_desc1$v_ai : 1;( unsigned lnkg_desc1$v_notused25 : 1;" unsigned lnk g_desc1$v_r26 : 2;" unsigned lnkg_desc1$v_r27 : 2;" unsigned lnkg_desc1$v_r28 : 2;" unsigned lnkg_desc1$v_r29 : 2;" unsigned lnkg_desc1$v_r30 : 2;" unsigned lnkg_desc1$v_r31 : 2; } VMS_LNKG_DESC1;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif typedef struct _vms_lnkg_desc1 {#pragma __nomember_alignme nt# unsigned lnkg_desc1$v_type : 1;' unsigned lnkg_desc1$v_notused0 : 1;! unsigned lnkg_desc1$v_gp : 1;' unsigned lnkg_desc1$v_notused1 : 1;! unsigned lnkg_desc1$v_r2 : 2;! unsigned lnkg_desc1$v_r3 : 2;! unsigned lnkg_desc1$v_r4 : 2;! unsigned lnkg_desc1$v_r5 : 2;! unsigned lnkg_desc1$v_r6 : 2;! unsigned lnkg_desc1$v_r7 : 2;! unsigned lnkg_desc1$v_r8 : 2;! unsigned lnkg_desc1$v_r9 : 2;" unsigned lnkg_desc1$v_r10 : 2;" unsigned lnkg_de sc1$v_r11 : 2;" unsigned lnkg_desc1$v_r12 : 2;" unsigned lnkg_desc1$v_r13 : 2;" unsigned lnkg_desc1$v_r14 : 2;" unsigned lnkg_desc1$v_r15 : 2;" unsigned lnkg_desc1$v_r16 : 2;" unsigned lnkg_desc1$v_r17 : 2;" unsigned lnkg_desc1$v_r18 : 2;" unsigned lnkg_desc1$v_r19 : 2;" unsigned lnkg_desc1$v_r20 : 2;" unsigned lnkg_desc1$v_r21 : 2;" unsigned lnkg_desc1$v_r22 : 2;" unsigned lnkg_desc1$v_r23 : 2;" unsigned lnkg_desc1$v_r24 : 2;! unsigned lnkg_desc 1$v_ai : 1;( unsigned lnkg_desc1$v_notused25 : 1;" unsigned lnkg_desc1$v_r26 : 2;" unsigned lnkg_desc1$v_r27 : 2;" unsigned lnkg_desc1$v_r28 : 2;" unsigned lnkg_desc1$v_r29 : 2;" unsigned lnkg_desc1$v_r30 : 2;" unsigned lnkg_desc1$v_r31 : 2; } vms_lnkg_desc1;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore  /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ELFDATYP_LOADED */ ww+uڛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************* ***********************************************************************************/"/*** MODULE ELFDEF IDENT X-39 ***/#ifndef __ELFDEF_LOADED#define __ELFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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  #if !defined __NEW_STARLET #define __NEW_STARLET 1#endifR#define SHDR$M_SHF_MASKOS 0xffffffff0ff00000 /* SDL CONSTANT won't do 64 bit */b#define SHDR$M_SHF_MASKPROC 0xfffffffff0000000 /* too big for struct bitfield def (32bit limit) */K#include /* VMS-style (all uppercase) elf data type defs.*/b#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __long /*  And set ptr size default to 64-bit pointers */! typedef void * Elf64_Addr; #else& typedef unsigned __int64 Elf64_Addr;#endif#typedef unsigned __int64 Elf64_Off;$typedef unsigned short Elf64_Half;$typedef unsigned __int32 Elf64_Word;%typedef __int32 Elf64_Sword;%typedef unsigned __int64 Elf64_Xword;&typedef __int64 Elf64_Sxword;'typedef unsigned __int32 Elf64_Section;&typedef unsigned __int32 Elf64_Symndx;#define EHDR$K_EI_NIDENT 16#define EHDR$SC_EF_V MS_COMCOD 0 #define EHDR$M_EF_VMS_COMCOD 0x3!#define EHDR$SC_EF_VMS_LINKAGES 2"#define EHDR$M_EF_VMS_LINKAGES 0x4#define EHDR$M_EF_FILL_1 0x8 #define EHDR$SC_EF_IA_64_ABI64 4"#define EHDR$M_EF_IA_64_ABI64 0x10$#define EHDR$SC_EF_IA_64_REDUCEDFP 5&#define EHDR$M_EF_IA_64_REDUCEDFP 0x20"#define EHDR$SC_EF_IA_64_CONS_GP 6$#define EHDR$M_EF_IA_64_CONS_GP 0x40'#define EHDR$SC_EF_IA_64_NOFD_CONS_GP 7)#define EHDR$M_EF_IA_64_NOFD_CONS_GP 0x80##define EHDR$SC_EF_IA_64_ABSOLUTE 8&#define EH DR$M_EF_IA_64_ABSOLUTE 0x100!#define EHDR$M_EF_FILL_2 0xFFFE00 #define EHDR$SC_EF_IA_64_ARCH 24'#define EHDR$M_EF_IA_64_ARCH 0xFF000000#define EHDR$SC_EF_IA_64_LOOS 0 #define EHDR$M_EF_IA_64_LOOS 0xF #define EHDR$M_EF_FILL_1A 0xFFF0 #define EHDR$SC_EF_IA_64_HIOS 16%#define EHDR$M_EF_IA_64_HIOS 0xFF0000#define ELF64_EHDR$K_E_SIZE 64#define ELF64_EHDR$C_E_SIZE 64%#define ELF64_EHDR$S_VMS_OBJECT_V1 64$#define ELF64_EHDR$S_VMS_IMAGE_V1 72 #ifdef __NEW_STARLETc#if !defined(__NOBAS EALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_ehdr {#pragma __nomember_alignment __union {* unsigned char ehdr$t_e_ident [16]; __struct {) unsigned char ehdr$b_ei_mag0;) unsigned char ehdr$b_ei_mag1;) unsigned char ehdr$b_ei_mag2;) unsigned char ehdr$b_ei_mag3;* unsign ed char ehdr$b_ei_class;) unsigned char ehdr$b_ei_data;, unsigned char ehdr$b_ei_version;* unsigned char ehdr$b_ei_osabi;/ unsigned char ehdr$b_ei_abiversion;, unsigned char ehdr$b_ei_pad [7]; } ehdr$r_bytes; } ehdr$r_ident; ELF64_HALF ehdr$w_e_type; ELF64_HALF ehdr$w_e_machine; ELF64_WORD ehdr$l_e_version; ELF64_ADDR ehdr$pq_e_entry; ELF64_OFF ehdr$q_e_phoff; ELF64_OFF ehdr$q_e_shoff ; __union {" ELF64_WORD ehdr$l_e_flags; __struct {. unsigned ehdr$v_ef_vms_comcod : 2;0 unsigned ehdr$v_ef_vms_linkages : 1;* unsigned ehdr$v_ef_fill_1 : 1;/ unsigned ehdr$v_ef_ia_64_abi64 : 1;3 unsigned ehdr$v_ef_ia_64_reducedfp : 1;1 unsigned ehdr$v_ef_ia_64_cons_gp : 1;6 unsigned ehdr$v_ef_ia_64_nofd_cons_gp : 1;2 unsigned ehdr$v_ef_ia_64_absolute : 1;+ unsigned e hdr$v_ef_fill_2 : 15;. unsigned ehdr$v_ef_ia_64_arch : 8;! } ehdr$r_model_masks; __struct {. unsigned ehdr$v_ef_ia_64_loos : 4;, unsigned ehdr$v_ef_fill_1a : 12;. unsigned ehdr$v_ef_ia_64_hios : 8;! } ehdr$r_os_specific; } ehdr$r_flags_overlay; ELF64_HALF ehdr$w_e_ehsize;" ELF64_HALF ehdr$w_e_phentsize; ELF64_HALF ehdr$w_e_phnum;" ELF64_HALF ehdr$w_e_shentsize; ELF64_HALF ehdr$w_e_sh num;! ELF64_HALF ehdr$w_e_shstrndx;( ELF64_XWORD ehdr$q_e_vms_needed_cnt; } ELF64_EHDR; #if !defined(__VAXC)2#define ehdr$t_e_ident ehdr$r_ident.ehdr$t_e_ident?#define ehdr$b_ei_mag0 ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_mag0?#define ehdr$b_ei_mag1 ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_mag1?#define ehdr$b_ei_mag2 ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_mag2?#define ehdr$b_ei_mag3 ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_mag3A#define ehdr$b_ei_class ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_ class?#define ehdr$b_ei_data ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_dataE#define ehdr$b_ei_version ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_versionA#define ehdr$b_ei_osabi ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_osabiK#define ehdr$b_ei_abiversion ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_abiversion=#define ehdr$b_ei_pad ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_pad:#define ehdr$l_e_flags ehdr$r_flags_overlay.ehdr$l_e_flagsY#define ehdr$v_ef_vms_comcod ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_vms_comcod ]#define ehdr$v_ef_vms_linkages ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_vms_linkagesQ#define ehdr$v_ef_fill_1 ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_fill_1[#define ehdr$v_ef_ia_64_abi64 ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_abi64c#define ehdr$v_ef_ia_64_reducedfp ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_reducedfp_#define ehdr$v_ef_ia_64_cons_gp ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_cons_gpi#define ehdr$v_ef_ia_64_nofd_c ons_gp ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_nofd_cons_gpa#define ehdr$v_ef_ia_64_absolute ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_absoluteQ#define ehdr$v_ef_fill_2 ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_fill_2Y#define ehdr$v_ef_ia_64_arch ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_archY#define ehdr$v_ef_ia_64_loos ehdr$r_flags_overlay.ehdr$r_os_specific.ehdr$v_ef_ia_64_loosS#define ehdr$v_ef_fill_1a ehdr$r_flags_overlay.ehdr$r_os_spe cific.ehdr$v_ef_fill_1aY#define ehdr$v_ef_ia_64_hios ehdr$r_flags_overlay.ehdr$r_os_specific.ehdr$v_ef_ia_64_hios"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_ehdr {#pragma __nomember_alignment __union {* unsigned char ehdr$t_e_ident [16]; __struct {) unsigned char ehdr$b_ei_mag0;) unsigned char ehdr$b_ei_mag1;) unsigned char ehdr$b_ei_mag2;) unsigned char ehdr$b_ei_mag3;* unsigned char ehdr$b_ei_class;) unsigned char ehdr$b_ei_data;, unsigned char ehdr$b_ei_version;* unsigned char ehdr$b_ei_osabi;/ unsigned char ehdr$b_ei_abiversion;, unsigned char ehdr$b_ei_pad [7]; } ehdr$r_bytes; }  ehdr$r_ident; elf64_half ehdr$w_e_type; elf64_half ehdr$w_e_machine; elf64_word ehdr$l_e_version; elf64_addr ehdr$pq_e_entry; elf64_off ehdr$q_e_phoff; elf64_off ehdr$q_e_shoff; __union {" elf64_word ehdr$l_e_flags; __struct {. unsigned ehdr$v_ef_vms_comcod : 2;0 unsigned ehdr$v_ef_vms_linkages : 1;* unsigned ehdr$v_ef_fill_1 : 1;/ unsigned ehdr$v_ef_ia_64_abi64 : 1;3 unsigned ehdr$ v_ef_ia_64_reducedfp : 1;1 unsigned ehdr$v_ef_ia_64_cons_gp : 1;6 unsigned ehdr$v_ef_ia_64_nofd_cons_gp : 1;2 unsigned ehdr$v_ef_ia_64_absolute : 1;+ unsigned ehdr$v_ef_fill_2 : 15;. unsigned ehdr$v_ef_ia_64_arch : 8;! } ehdr$r_model_masks; __struct {. unsigned ehdr$v_ef_ia_64_loos : 4;, unsigned ehdr$v_ef_fill_1a : 12;. unsigned ehdr$v_ef_ia_64_hios : 8;! } ehdr$r_os_ specific; } ehdr$r_flags_overlay; elf64_half ehdr$w_e_ehsize;" elf64_half ehdr$w_e_phentsize; elf64_half ehdr$w_e_phnum;" elf64_half ehdr$w_e_shentsize; elf64_half ehdr$w_e_shnum;! elf64_half ehdr$w_e_shstrndx;( elf64_xword ehdr$q_e_vms_needed_cnt; } elf64_ehdr; #if !defined(__VAXC)2#define ehdr$t_e_ident ehdr$r_ident.ehdr$t_e_ident?#define ehdr$b_ei_mag0 ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_mag0?#define ehdr$b_ei_mag1 ehdr$r_ident.ehdr$r_bytes .ehdr$b_ei_mag1?#define ehdr$b_ei_mag2 ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_mag2?#define ehdr$b_ei_mag3 ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_mag3A#define ehdr$b_ei_class ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_class?#define ehdr$b_ei_data ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_dataE#define ehdr$b_ei_version ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_versionA#define ehdr$b_ei_osabi ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_osabiK#define ehdr$b_ei_abiversion ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_abiversion=#def ine ehdr$b_ei_pad ehdr$r_ident.ehdr$r_bytes.ehdr$b_ei_pad:#define ehdr$l_e_flags ehdr$r_flags_overlay.ehdr$l_e_flagsY#define ehdr$v_ef_vms_comcod ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_vms_comcod]#define ehdr$v_ef_vms_linkages ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_vms_linkagesQ#define ehdr$v_ef_fill_1 ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_fill_1[#define ehdr$v_ef_ia_64_abi64 ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_abi64c#define ehdr$v_ef_ia _64_reducedfp ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_reducedfp_#define ehdr$v_ef_ia_64_cons_gp ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_cons_gpi#define ehdr$v_ef_ia_64_nofd_cons_gp ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_nofd_cons_gpa#define ehdr$v_ef_ia_64_absolute ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_absoluteQ#define ehdr$v_ef_fill_2 ehdr$r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_fill_2Y#define ehdr$v_ef_ia_64_arch ehdr$ r_flags_overlay.ehdr$r_model_masks.ehdr$v_ef_ia_64_archY#define ehdr$v_ef_ia_64_loos ehdr$r_flags_overlay.ehdr$r_os_specific.ehdr$v_ef_ia_64_loosS#define ehdr$v_ef_fill_1a ehdr$r_flags_overlay.ehdr$r_os_specific.ehdr$v_ef_fill_1aY#define ehdr$v_ef_ia_64_hios ehdr$r_flags_overlay.ehdr$r_os_specific.ehdr$v_ef_ia_64_hios"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define EHDR$K_EI_MAG0 0#define EHDR$K_EI_MAG1 1#define EHDR$K_EI_MAG2 2#define EHDR$K_EI_MA G3 3#define EHDR$K_EI_CLASS 4#define EHDR$K_EI_DATA 5#define EHDR$K_EI_VERSION 6#define EHDR$K_EI_OSABI 7#define EHDR$K_EI_ABIVERSION 8#define EHDR$K_EI_PAD 9#define EHDR$K_ELFMAG0 127#define EHDR$K_ELFMAG1 69#define EHDR$K_ELFMAG2 76#define EHDR$K_ELFMAG3 70#define EHDR$K_ELFCLASSNONE 0#define EHDR$K_ELFCLASS32 1#define EHDR$K_ELFCLASS64 2#define EHDR$K_ELFDATANONE 0#define EHDR$K_ELFDATA2LSB 1#define EHDR$K_ELFDATA2MSB 2#define EHDR$K_ELFOSABI_NONE 0"#def ine EHDR$K_ELFOSABI_OPENVMS 13'#define EHDR$K_ELFABIVERSION_VMS_CURR 2&#define EHDR$K_ELFABIVERSION_VMS_OBJ 2&#define EHDR$K_ELFABIVERSION_VMS_IMG 2#define EHDR$K_ET_NONE 0#define EHDR$K_ET_REL 1#define EHDR$K_ET_EXEC 2#define EHDR$K_ET_DYN 3#define EHDR$K_ET_CORE 4#define EHDR$K_ET_LOOS 65024#define EHDR$K_ET_HIOS 65279#define EHDR$K_ET_LOPROC 65280#define EHDR$K_ET_HIPROC 65535$#define EHDR$K_ET_VMS_LINK_STB 65024#define EHDR$K_ET_VMS_DSF 65025#define EHDR$K_EM_NONE 0 #define EHDR$K_EM_IA_64 50#define IIHA$K_VMSXFER_SIZE 48#define IIHA$C_VMSXFER_SIZE 48 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endif"typedef struct _transfer_address {#pragma __nomember_alignment ELF64_WORD iiha$l_size; ELF64_WORD iiha$l_spare; __union {& ELF64_ADDR iiha$ar_tfradr [5]; __struct {' ELF64_ADDR iiha$pq_tfradr1;' ELF64_ADDR iiha$pq_tfradr2;' ELF64_ADDR iiha$pq_tfradr3;' ELF64_ADDR iiha$pq_tfradr4;' ELF64_ADDR iiha$pq_tfradr5; } iiha$r_tfrnamed; } iiha$r_tfr_overlay; } TRANSFER_ADDRESS; #if !defined(__VAXC)8#define iiha$ar_tfradr iiha$r_tfr_overlay.iiha$ar_tfradrJ#define iiha$pq_tfradr1 iiha$r_tfr_overlay.iiha$r_tfrnamed.iiha$pq_tfradr1J#define iiha$pq_tfradr2 iiha$r_tfr_overl ay.iiha$r_tfrnamed.iiha$pq_tfradr2J#define iiha$pq_tfradr3 iiha$r_tfr_overlay.iiha$r_tfrnamed.iiha$pq_tfradr3J#define iiha$pq_tfradr4 iiha$r_tfr_overlay.iiha$r_tfrnamed.iiha$pq_tfradr4J#define iiha$pq_tfradr5 iiha$r_tfr_overlay.iiha$r_tfrnamed.iiha$pq_tfradr5"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember _alignment#endif"typedef struct _transfer_address {#pragma __nomember_alignment elf64_word iiha$l_size; elf64_word iiha$l_spare; __union {& elf64_addr iiha$ar_tfradr [5]; __struct {' elf64_addr iiha$pq_tfradr1;' elf64_addr iiha$pq_tfradr2;' elf64_addr iiha$pq_tfradr3;' elf64_addr iiha$pq_tfradr4;' elf64_addr iiha$pq_tfradr5; } iiha$r_tfrnamed; } iiha$r_tfr_overlay; } tr ansfer_address; #if !defined(__VAXC)8#define iiha$ar_tfradr iiha$r_tfr_overlay.iiha$ar_tfradrJ#define iiha$pq_tfradr1 iiha$r_tfr_overlay.iiha$r_tfrnamed.iiha$pq_tfradr1J#define iiha$pq_tfradr2 iiha$r_tfr_overlay.iiha$r_tfrnamed.iiha$pq_tfradr2J#define iiha$pq_tfradr3 iiha$r_tfr_overlay.iiha$r_tfrnamed.iiha$pq_tfradr3J#define iiha$pq_tfradr4 iiha$r_tfr_overlay.iiha$r_tfrnamed.iiha$pq_tfradr4J#define iiha$pq_tfradr5 iiha$r_tfr_overlay.iiha$r_tfrnamed.iiha$pq_tfradr5"#endif /* #if !defined( __VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define IIHA$C_INIT 1#define IIHA$C_MAIN 2#define IIHA$C_EXE_INIT 3#define EHDR$K_EV_NONE 0#define EHDR$K_EV_CURRENT 1##define EHDR$K_VMS_COMCOD_SUCCESS 0##define EHDR$K_VMS_COMCOD_WARNING 1!#define EHDR$K_VMS_COMCOD_ERROR 2!#define EHDR$K_VMS_COMCOD_ABORT 3'#define EHDR$K_EF_IA_64_MASKOS 16711695%#define EHDR$K_EF_IA_64_ARCHVERSION 1#define SHDR$SC_SHF_WRITE 0#define SHDR$M_SHF_WRITE 0x1#define SHDR$SC_SHF_ALLOC 1 #define SHDR$M_SHF_ALLOC 0x2#define SHDR$SC_SHF_EXECINSTR 2 #define SHDR$M_SHF_EXECINSTR 0x4$#define SHDR$M_SHF_F64_BITFILL_1 0x8#define SHDR$SC_SHF_MERGE 4#define SHDR$M_SHF_MERGE 0x10#define SHDR$SC_SHF_STRINGS 5#define SHDR$M_SHF_STRINGS 0x20#define SHDR$SC_SHF_INFO_LINK 6!#define SHDR$M_SHF_INFO_LINK 0x40 #define SHDR$SC_SHF_LINK_ORDER 7"#define SHDR$M_SHF_LINK_ORDER 0x80&#define SHDR$SC_SHF_OS_NONCONFORMING 8)#define SHDR$M_SHF_OS_NONCONFORMING 0x100#define SHDR$SC_ SHF_GROUP 9#define SHDR$M_SHF_GROUP 0x200#define SHDR$SC_SHF_TLS 10#define SHDR$M_SHF_TLS 0x400*#define SHDR$M_SHF_F64_BITFILL_2 0xFFFF800"#define SHDR$SC_SHF_IA_64_SHORT 28)#define SHDR$M_SHF_IA_64_SHORT 0x10000000$#define SHDR$SC_SHF_IA_64_NORECOV 29+#define SHDR$M_SHF_IA_64_NORECOV 0x20000000+#define SHDR$M_SHF_F64_BITFILL_3 0xC0000000!#define SHDR$SC_SHF_VMS_GLOBAL 32)#define SHDR$M_SHF_VMS_GLOBAL 0x100000000##define SHDR$SC_SHF_VMS_OVERLAID 33+#define SHDR$M_SHF_VMS_OVERLAI D 0x200000000!#define SHDR$SC_SHF_VMS_SHARED 34)#define SHDR$M_SHF_VMS_SHARED 0x400000000!#define SHDR$SC_SHF_VMS_VECTOR 35)#define SHDR$M_SHF_VMS_VECTOR 0x800000000&#define SHDR$SC_SHF_VMS_ALLOC_64BIT 36/#define SHDR$M_SHF_VMS_ALLOC_64BIT 0x1000000000$#define SHDR$SC_SHF_VMS_PROTECTED 37-#define SHDR$M_SHF_VMS_PROTECTED 0x20000000003#define SHDR$M_SHF_F64_BITFILL_4 0xFFFFFFC000000000'#define SHDR$M_SHF_F64_OSFILL_1 0xFFFFF #define SHDR$SC_SHF_MASK_LOOS 20&#define SHDR$M_SHF_MASK_ LOOS 0xFF00000*#define SHDR$M_SHF_F64_OSFILL_2 0xF0000000 #define SHDR$SC_SHF_MASK_HIOS 32/#define SHDR$M_SHF_MASK_HIOS 0xFFFFFFFF00000000+#define SHDR$M_SHF_F64_PROCFILL_1 0xFFFFFFF!#define SHDR$SC_SHF_MASKLOPROC 28(#define SHDR$M_SHF_MASKLOPROC 0xF0000000!#define SHDR$SC_SHF_MASKHIPROC 320#define SHDR$M_SHF_MASKHIPROC 0xFFFFFFFF00000000#define ELF64_SHDR$K_SH_SIZE 64#define ELF64_SHDR$C_SH_SIZE 64 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cpluspl us) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_shdr {#pragma __nomember_alignment ELF64_WORD shdr$l_sh_name; ELF64_WORD shdr$l_sh_type; __union {$ ELF64_XWORD shdr$q_sh_flags; __struct {* unsigned shdr$v_shf_write : 1;* unsigned shdr$v_shf_alloc : 1;. unsigned shdr$v_shf_execinstr : 1;2 unsigned shdr$v_shf_f64_bi tfill_1 : 1;* unsigned shdr$v_shf_merge : 1;, unsigned shdr$v_shf_strings : 1;. unsigned shdr$v_shf_info_link : 1;/ unsigned shdr$v_shf_link_order : 1;5 unsigned shdr$v_shf_os_nonconforming : 1;* unsigned shdr$v_shf_group : 1;( unsigned shdr$v_shf_tls : 1;3 unsigned shdr$v_shf_f64_bitfill_2 : 17;0 unsigned shdr$v_shf_ia_64_short : 1;2 unsigned shdr$v_shf_ia_64_norecov : 1;2 unsigned shdr$v_shf_f64_bitfill_3 : 2;/ unsigned shdr$v_shf_vms_global : 1;1 unsigned shdr$v_shf_vms_overlaid : 1;/ unsigned shdr$v_shf_vms_shared : 1;/ unsigned shdr$v_shf_vms_vector : 1;4 unsigned shdr$v_shf_vms_alloc_64bit : 1;2 unsigned shdr$v_shf_vms_protected : 1;3 unsigned shdr$v_shf_f64_bitfill_4 : 26;" } shdr$r_flags64_bits; __struct {2 unsigned shdr$v_shf_f64_osfi ll_1 : 20;. unsigned shdr$v_shf_mask_loos : 8;1 unsigned shdr$v_shf_f64_osfill_2 : 4;/ unsigned shdr$v_shf_mask_hios : 32;$ } shdr$r_flags64_osmask; __struct {4 unsigned shdr$v_shf_f64_procfill_1 : 28;/ unsigned shdr$v_shf_maskloproc : 4;0 unsigned shdr$v_shf_maskhiproc : 32;& } shdr$r_flags64_procmask; } shdr$r_flags_overlay; ELF64_ADDR shdr$pq_sh_addr; ELF64_OFF shdr$q_s h_offset; ELF64_XWORD shdr$q_sh_size; ELF64_WORD shdr$l_sh_link; ELF64_WORD shdr$l_sh_info;$ ELF64_XWORD shdr$q_sh_addralign;" ELF64_XWORD shdr$q_sh_entsize; } ELF64_SHDR; #if !defined(__VAXC)<#define shdr$q_sh_flags shdr$r_flags_overlay.shdr$q_sh_flagsR#define shdr$v_shf_write shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_writeR#define shdr$v_shf_alloc shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_allocZ#define shdr$v_shf_execinstr shdr$r_flags_over lay.shdr$r_flags64_bits.shdr$v_shf_execinstrb#define shdr$v_shf_f64_bitfill_1 shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_f64_bitfill_1R#define shdr$v_shf_merge shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_mergeV#define shdr$v_shf_strings shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_stringsZ#define shdr$v_shf_info_link shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_info_link\#define shdr$v_shf_link_order shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_link_orderh#d efine shdr$v_shf_os_nonconforming shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_os_nonconformingR#define shdr$v_shf_group shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_groupN#define shdr$v_shf_tls shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_tlsb#define shdr$v_shf_f64_bitfill_2 shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_f64_bitfill_2^#define shdr$v_shf_ia_64_short shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_ia_64_shortb#define shdr$v_shf_ia_64_norecov shdr$r_fl ags_overlay.shdr$r_flags64_bits.shdr$v_shf_ia_64_norecovb#define shdr$v_shf_f64_bitfill_3 shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_f64_bitfill_3\#define shdr$v_shf_vms_global shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_global`#define shdr$v_shf_vms_overlaid shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_overlaid\#define shdr$v_shf_vms_shared shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_shared\#define shdr$v_shf_vms_vector shdr$r_flags_overlay.shdr$r_flag s64_bits.shdr$v_shf_vms_vectorf#define shdr$v_shf_vms_alloc_64bit shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_alloc_64bitb#define shdr$v_shf_vms_protected shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_protectedb#define shdr$v_shf_f64_bitfill_4 shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_f64_bitfill_4b#define shdr$v_shf_f64_osfill_1 shdr$r_flags_overlay.shdr$r_flags64_osmask.shdr$v_shf_f64_osfill_1\#define shdr$v_shf_mask_loos shdr$r_flags_overlay.shdr$r_flags64_osmas k.shdr$v_shf_mask_loosb#define shdr$v_shf_f64_osfill_2 shdr$r_flags_overlay.shdr$r_flags64_osmask.shdr$v_shf_f64_osfill_2\#define shdr$v_shf_mask_hios shdr$r_flags_overlay.shdr$r_flags64_osmask.shdr$v_shf_mask_hiosh#define shdr$v_shf_f64_procfill_1 shdr$r_flags_overlay.shdr$r_flags64_procmask.shdr$v_shf_f64_procfill_1`#define shdr$v_shf_maskloproc shdr$r_flags_overlay.shdr$r_flags64_procmask.shdr$v_shf_maskloproc`#define shdr$v_shf_maskhiproc shdr$r_flags_overlay.shdr$r_flags64_procmask.shdr$v_sh f_maskhiproc"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_shdr {#pragma __nomember_alignment elf64_word shdr$l_sh_name; elf64_word shdr$l_sh_type; __union {$ elf64_xword shdr$q_sh_flags; __struct {* unsigned shdr$v_sh f_write : 1;* unsigned shdr$v_shf_alloc : 1;. unsigned shdr$v_shf_execinstr : 1;2 unsigned shdr$v_shf_f64_bitfill_1 : 1;* unsigned shdr$v_shf_merge : 1;, unsigned shdr$v_shf_strings : 1;. unsigned shdr$v_shf_info_link : 1;/ unsigned shdr$v_shf_link_order : 1;5 unsigned shdr$v_shf_os_nonconforming : 1;* unsigned shdr$v_shf_group : 1;( unsigned shdr$v_shf_tls : 1;3 unsign ed shdr$v_shf_f64_bitfill_2 : 17;0 unsigned shdr$v_shf_ia_64_short : 1;2 unsigned shdr$v_shf_ia_64_norecov : 1;2 unsigned shdr$v_shf_f64_bitfill_3 : 2;/ unsigned shdr$v_shf_vms_global : 1;1 unsigned shdr$v_shf_vms_overlaid : 1;/ unsigned shdr$v_shf_vms_shared : 1;/ unsigned shdr$v_shf_vms_vector : 1;4 unsigned shdr$v_shf_vms_alloc_64bit : 1;2 unsigned shdr$v_shf_vms_protected : 1;3 unsigned shdr$v_shf_f64_bitfill_4 : 26;" } shdr$r_flags64_bits; __struct {2 unsigned shdr$v_shf_f64_osfill_1 : 20;. unsigned shdr$v_shf_mask_loos : 8;1 unsigned shdr$v_shf_f64_osfill_2 : 4;/ unsigned shdr$v_shf_mask_hios : 32;$ } shdr$r_flags64_osmask; __struct {4 unsigned shdr$v_shf_f64_procfill_1 : 28;/ unsigned shdr$v_shf_maskloproc : 4;0 unsigned shdr$v_shf_mask hiproc : 32;& } shdr$r_flags64_procmask; } shdr$r_flags_overlay; elf64_addr shdr$pq_sh_addr; elf64_off shdr$q_sh_offset; elf64_xword shdr$q_sh_size; elf64_word shdr$l_sh_link; elf64_word shdr$l_sh_info;$ elf64_xword shdr$q_sh_addralign;" elf64_xword shdr$q_sh_entsize; } elf64_shdr; #if !defined(__VAXC)<#define shdr$q_sh_flags shdr$r_flags_overlay.shdr$q_sh_flagsR#define shdr$v_shf_write shdr$r_flags_overlay.shdr$r_flags64_bits.shdr $v_shf_writeR#define shdr$v_shf_alloc shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_allocZ#define shdr$v_shf_execinstr shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_execinstrb#define shdr$v_shf_f64_bitfill_1 shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_f64_bitfill_1R#define shdr$v_shf_merge shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_mergeV#define shdr$v_shf_strings shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_stringsZ#define shdr$v_shf_info_link shdr$r_flags_ov erlay.shdr$r_flags64_bits.shdr$v_shf_info_link\#define shdr$v_shf_link_order shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_link_orderh#define shdr$v_shf_os_nonconforming shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_os_nonconformingR#define shdr$v_shf_group shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_groupN#define shdr$v_shf_tls shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_tlsb#define shdr$v_shf_f64_bitfill_2 shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_f64_bitfi ll_2^#define shdr$v_shf_ia_64_short shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_ia_64_shortb#define shdr$v_shf_ia_64_norecov shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_ia_64_norecovb#define shdr$v_shf_f64_bitfill_3 shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_f64_bitfill_3\#define shdr$v_shf_vms_global shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_global`#define shdr$v_shf_vms_overlaid shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_overlaid\#define shdr $v_shf_vms_shared shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_shared\#define shdr$v_shf_vms_vector shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_vectorf#define shdr$v_shf_vms_alloc_64bit shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_alloc_64bitb#define shdr$v_shf_vms_protected shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_vms_protectedb#define shdr$v_shf_f64_bitfill_4 shdr$r_flags_overlay.shdr$r_flags64_bits.shdr$v_shf_f64_bitfill_4b#define shdr$v_shf_f64_osf ill_1 shdr$r_flags_overlay.shdr$r_flags64_osmask.shdr$v_shf_f64_osfill_1\#define shdr$v_shf_mask_loos shdr$r_flags_overlay.shdr$r_flags64_osmask.shdr$v_shf_mask_loosb#define shdr$v_shf_f64_osfill_2 shdr$r_flags_overlay.shdr$r_flags64_osmask.shdr$v_shf_f64_osfill_2\#define shdr$v_shf_mask_hios shdr$r_flags_overlay.shdr$r_flags64_osmask.shdr$v_shf_mask_hiosh#define shdr$v_shf_f64_procfill_1 shdr$r_flags_overlay.shdr$r_flags64_procmask.shdr$v_shf_f64_procfill_1`#define shdr$v_shf_maskloproc shdr$r_f lags_overlay.shdr$r_flags64_procmask.shdr$v_shf_maskloproc`#define shdr$v_shf_maskhiproc shdr$r_flags_overlay.shdr$r_flags64_procmask.shdr$v_shf_maskhiproc"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define SHDR$K_SHN_UNDEF 0"#define SHDR$K_SHN_LORESERVE 65280#define SHDR$K_SHN_LOPROC 65280#define SHDR$K_SHN_HIPROC 65311#define SHDR$K_SHN_LOOS 65312##define SHDR$K_SHN_VMS_SYMVEC 65312#define SHDR$K_SHN_HIOS 65343#define SHDR$K_SHN_ABS 65521#def ine SHDR$K_SHN_COMMON 65522#define SHDR$K_SHN_XINDEX 65535"#define SHDR$K_SHN_HIRESERVE 65535#define SHDR$K_SHT_NULL 0#define SHDR$K_SHT_PROGBITS 1#define SHDR$K_SHT_SYMTAB 2#define SHDR$K_SHT_STRTAB 3#define SHDR$K_SHT_RELA 4#define SHDR$K_SHT_HASH 5#define SHDR$K_SHT_DYNAMIC 6#define SHDR$K_SHT_NOTE 7#define SHDR$K_SHT_NOBITS 8#define SHDR$K_SHT_REL 9#define SHDR$K_SHT_SHLIB 10#define SHDR$K_SHT_DYNSYM 11#define SHDR$K_SHT_UNUSED_12 12#define SHDR$K_SHT_UNU SED_13 13 #define SHDR$K_SHT_INIT_ARRAY 14 #define SHDR$K_SHT_FINI_ARRAY 15##define SHDR$K_SHT_PREINIT_ARRAY 16#define SHDR$K_SHT_GROUP 17"#define SHDR$K_SHT_SYMTAB_SHNDX 18#define GRPSEC$M_COMDAT_FLAG 1"#define SHDR$K_SHT_LOOS 1610612736"#define SHDR$K_SHT_HIOS 1879048191$#define SHDR$K_SHT_LOPROC 1879048192$#define SHDR$K_SHT_HIPROC 2147483647%#define SHDR$K_SHT_LOUSER -2147483648#define SHDR$K_SHT_HIUSER -1'#define SHDR$K_SHT_VMS_TRACE 16106127360#define SHDR$K_SHT_VMS_TIE_SIG NATURES 1610612737'#define SHDR$K_SHT_VMS_DEBUG 1610612738+#define SHDR$K_SHT_VMS_DEBUG_STR 1610612739*#define SHDR$K_SHT_VMS_LINKAGES 1610612740/#define SHDR$K_SHT_VMS_SYMBOL_VECTOR 1610612741'#define SHDR$K_SHT_VMS_FIXUP 16106127422#define SHDR$K_SHT_VMS_DISPLAY_NAME_INF 1610612743+#define SHDR$K_SHT_IA_64_LOPSREG 2013265920+#define SHDR$K_SHT_IA_64_HIPSREG 2147483647'#define SHDR$K_SHT_IA_64_EXT 1879048192*#define SHDR$K_SHT_IA_64_UNWIND 18790481931#define SHDR$K_SHT_IA_64_PRIORIT Y_INIT 2030043136#define VMSSIG$$K_SIZE 8#define VMSSIG$$C_SIZE 8 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _vmssigentry {#pragma __nomember_alignment" ELF64_WORD vmssig$l_se_symbol;" ELF64_WORD vmssig$l_se_offset; } VMSSIGENTRY;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPO RT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _vmssigentry {#pragma __nomember_alignment" elf64_word vmssig$l_se_symbol;" elf64_word vmssig$l_se_offset; } vmssigentry;%#endif /* #ifdef __NEW_STARLET */#define UNWIND$K_SIZE 24#define UNWIND$C_SIZE 24 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using  pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endif$typedef struct _ia_64_unwind_entry {#pragma __nomember_alignment" ELF64_ADDR unwind$pq_ue_start; ELF64_ADDR unwind$pq_ue_end;! ELF64_ADDR unwind$pq_ue_info; } IA_64_UNWIND_ENTRY;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragm a __nomember_alignment#endif$typedef struct _ia_64_unwind_entry {#pragma __nomember_alignment" elf64_addr unwind$pq_ue_start; elf64_addr unwind$pq_ue_end;! elf64_addr unwind$pq_ue_info; } ia_64_unwind_entry;%#endif /* #ifdef __NEW_STARLET */#define ELF64_NHDR$K_NH_SIZE 24#define ELF64_NHDR$C_NH_SIZE 24 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadw ord#else#pragma __nomember_alignment#endiftypedef struct _elf64_nhdr {#pragma __nomember_alignment! ELF64_XWORD nhdr$q_nh_namesz;! ELF64_XWORD nhdr$q_nh_descsz; ELF64_XWORD nhdr$q_nh_type; } ELF64_NHDR;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_nhdr {#pragma __nomemb er_alignment! elf64_xword nhdr$q_nh_namesz;! elf64_xword nhdr$q_nh_descsz; elf64_xword nhdr$q_nh_type; } elf64_nhdr;%#endif /* #ifdef __NEW_STARLET */#define ELF64_MHDR$K_MH_SIZE 34#define ELF64_MHDR$C_MH_SIZE 34 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_mhdr {#pragma __no member_alignment- unsigned char mhdr$b_mh_create_date [17];, unsigned char mhdr$b_mh_patch_date [17];) unsigned char mhdr$b_mh_name_version; char mhdr$b_fill_119_ [5]; } ELF64_MHDR;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_mhdr {#pragma __nomember_alignment- unsigned cha r mhdr$b_mh_create_date [17];, unsigned char mhdr$b_mh_patch_date [17];) unsigned char mhdr$b_mh_name_version; char mhdr$b_fill_119_ [5]; } elf64_mhdr;%#endif /* #ifdef __NEW_STARLET */"#define ELF64_ORIGDYN$K_MAJOR_ID 1"#define ELF64_ORIGDYN$K_MINOR_ID 3 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftype def struct _elf64_origdyn {#pragma __nomember_alignment$ unsigned int origdyn$l_major_id;$ unsigned int origdyn$l_minor_id;1 unsigned __int64 origdyn$q_manipulation_date;* unsigned __int64 origdyn$q_link_flags;% unsigned int origdyn$l_elf_flags;" unsigned int origdyn$l_filler;& unsigned char origdyn$b_imgid [1];! char origdyn$b_fill_120_ [7]; } ELF64_ORIGDYN;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* I f using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_origdyn {#pragma __nomember_alignment$ unsigned int origdyn$l_major_id;$ unsigned int origdyn$l_minor_id;1 unsigned int origdyn$q_manipulation_date [2];* unsigned int origdyn$q_link_flags [2];% unsigned int origdyn$l_elf_flags;" unsigned int origdyn$l_filler;& unsigned char origdyn$b_imgid [1];! char origdyn$b_fill_120_ [7] ; } elf64_origdyn;%#endif /* #ifdef __NEW_STARLET */#define NHDR$K_NT_VMS_MHD 1#define NHDR$K_NT_VMS_LNM 2#define NHDR$K_NT_VMS_SRC 3#define NHDR$K_NT_VMS_TITLE 4#define NHDR$K_NT_VMS_EIDC 5#define NHDR$K_NT_VMS_FPMODE 6"#define NHDR$K_NT_VMS_LINKTIME 101 #define NHDR$K_NT_VMS_IMGNAM 102#define NHDR$K_NT_VMS_IMGID 103 #define NHDR$K_NT_VMS_LINKID 104 #define NHDR$K_NT_VMS_IMGBID 105 #define NHDR$K_NT_VMS_GSTNAM 106"#define NHDR$K_NT_VMS_ORIG_DYN 107##define NHDR$K _NT_VMS_PATCHTIME 108 -/* VMS_EIDC manipulation macros and values */.#define VMS_EIDC_ERRSEV(f) (((f) & 0x38) >> 3)%#define VMS_EIDC_FLAGS(e) ((e) << 3)(#define NHDR$K_VMS_EIDC_ERRSEV_WARNING 0(#define NHDR$K_VMS_EIDC_ERRSEV_SUCCESS 1&#define NHDR$K_VMS_EIDC_ERRSEV_ERROR 2'#define NHDR$K_VMS_EIDC_ERRSEV_SEVERE 4#define ELF64_SYM$K_ST_SIZE 24#define ELF64_SYM$C_ST_SIZE 24 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V 4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_sym {#pragma __nomember_alignment ELF64_WORD symtab$l_st_name;# unsigned char symtab$b_st_info;$ unsigned char symtab$b_st_other;! ELF64_HALF symtab$w_st_shndx;" ELF64_ADDR symtab$pq_st_value;! ELF64_XWORD symtab$q_st_size; } ELF64_SYM;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If usin g pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_sym {#pragma __nomember_alignment elf64_word symtab$l_st_name;# unsigned char symtab$b_st_info;$ unsigned char symtab$b_st_other;! elf64_half symtab$w_st_shndx;" elf64_addr symtab$pq_st_value;! elf64_xword symtab$q_st_size; } elf64_sym;%#endif /* #ifdef __NEW_STARLET */#define SYMTAB$K_STB_LOCAL 0#define SYMTAB$K_STB_GLO BAL 1#define SYMTAB$K_STB_WEAK 2#define SYMTAB$K_STB_LOOS 10 #define SYMTAB$K_STB_VMS_WEAK 11"#define SYMTAB$K_STB_VMS_SYSTEM 12#define SYMTAB$K_STB_HIOS 12#define SYMTAB$K_STB_LOPROC 13#define SYMTAB$K_STB_HIPROC 15#define SYMTAB$K_STT_NOTYPE 0#define SYMTAB$K_STT_OBJECT 1#define SYMTAB$K_STT_FUNC 2#define SYMTAB$K_STT_SECTION 3#define SYMTAB$K_STT_FILE 4#define SYMTAB$K_STT_COMMON 5#define SYMTAB$K_STT_TLS 6#define SYMTAB$K_STT_LOOS 10#define SYMTAB$K_STT_HIOS 12 #define SYMTAB$K_STT_LOPROC 13#define SYMTAB$K_STT_HIPROC 15#define SYMTAB$K_STV_DEFAULT 0#define SYMTAB$K_STV_INTERNAL 1#define SYMTAB$K_STV_HIDDEN 2 #define SYMTAB$K_STV_PROTECTED 3 #define SYMTAB$K_STV_UNIVERSAL 3%#define SYMTAB$K_VMS_STO_VISIBILITY 3%#define SYMTAB$K_VMS_STO_FUNC_TYPE 48$#define SYMTAB$K_VMS_STO_LINKAGE 192$#define SYMTAB$K_VMS_SFT_CODE_ADDR 0##define SYMTAB$K_VMS_SFT_SYMV_IDX 1#define SYMTAB$K_VMS_SFT_FD 2"#define SYMTAB$K_VMS_SFT_RESERVE 3!#define SYMT AB$K_VMS_STL_IGNORE 0##define SYMTAB$K_VMS_STL_RESERVED 1#define SYMTAB$K_VMS_STL_STD 2#define SYMTAB$K_VMS_STL_LNK 3 #define ELF64_RELA64$K_R_SIZE 24 #define ELF64_RELA64$C_R_SIZE 24 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _elf64_rela64 {#pragma __nomember_alignment ELF64_ADDR rela$pq_r_offset; __union {" ELF64_XWORD rela$q_r_info; __struct {% ELF64_WORD rela$l_r_type;$ ELF64_WORD rela$l_r_sym; } rela$r_symtyp; } rela$r_info_olay;! ELF64_SXWORD rela$q_r_addend; } ELF64_RELA64; #if !defined(__VAXC)4#define rela$q_r_info rela$r_info_olay.rela$q_r_infoB#define rela$l_r_type rela$r_info_olay.rela$r_symtyp.rela$l_r_type@#define rela$l_r_sym rela$r_info_olay.rela$r_symtyp.rela$l_r_sym"#endif /* #if !define d(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _elf64_rela64 {#pragma __nomember_alignment elf64_addr rela$pq_r_offset; __union {" elf64_xword rela$q_r_info; __struct {% elf64_word rela$l_r_type;$ elf64_word rela$l_r_sym; } rela $r_symtyp; } rela$r_info_olay;! elf64_sxword rela$q_r_addend; } elf64_rela64; #if !defined(__VAXC)4#define rela$q_r_info rela$r_info_olay.rela$q_r_infoB#define rela$l_r_type rela$r_info_olay.rela$r_symtyp.rela$l_r_type@#define rela$l_r_sym rela$r_info_olay.rela$r_symtyp.rela$l_r_sym"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ /*?** C Macros to manipulate st_other symbol table visibility info*/C#define VMS_ST_VISIBILITY(o) (( o) & SYMTAB$K_VMS_STO_VISIBILITY)I#define VMS_ST_FUNC_TYPE(o) (((o) & SYMTAB$K_VMS_STO_FUNC_TYPE) >> 4)G#define VMS_ST_LINKAGE(o) (((o) & SYMTAB$K_VMS_STO_LINKAGE) >> 6)##define VMS_ST_OTHER(v, f, l) ( \- ( (v) & SYMTAB$K_VMS_STO_VISIBILITY) + \2 ( ((f) << 4) & SYMTAB$K_VMS_STO_FUNC_TYPE) + \. ( ((l) << 6) & SYMTAB$K_VMS_STO_LINKAGE) )/*6** C Macros to manipulate symbol table relocation info*/'#define ELF64_ST_BIND(BnD) ((BnD) >> 4)(#define ELF64_ST_TYPE(TyP) ( (TyP) & 0xF)<#define ELF64_ST_INFO(BnD,TyP) (((BnD) << 4) + ((TyP) &0xF))*#define ELF64_ST_VISIBILITY(o) ((o) & 0x3)/*M** C Macros to manipulate Elf64_Rela relocation info. The low 32 bits are theK** relo type, and the upper 32 bits are relo's index into the symbol table.*/9#define ELF64_R_SYM64(SymI) ((Elf64_Xword)((SymI) >> 32))/#define ELF64_R_TYPE64(TyP) ((Elf64_Word)(TyP))V#define ELF64_R_INFO64(SymI,TyP) ((((Elf64_Xword)(SymI)) << 32) + ((Elf64_Word)(TyP)))/*;** C macros for ma nipulated exception/unwind flags fields. */8#define UNW_LENGTH(x) ((x) & UNWIND$M_UNW_LENGTH)?#define UNW_FLAG_EHANDLER(x) ((x) & UNWIND$M_UNW_FLAG_EHANDLER)?#define UNW_FLAG_UHANDLER(x) ((x) & UNWIND$M_UNW_FLAG_UHANDLER)5#define UNW_FLAG_OSMASK UNWIND$M_UNW_FLAG_OSMASK1#define UNW_FLAG_MASK UNWIND$M_UNW_FLAG_MASK5#define UNW_VER(x) ((x) & UNWIND$M_UNW_VER);#define UNW_IVMS_MODE(x) ((x) & UNWIND$M_UNW_IVMS_MODE)1#define EXCEPTION_MODE_MASK OSSD$M_EXCEPTI ON_MODE7#define UNWIND_DESCRIPTOR_VERSION UNWIND$K_DESC_VERSION&#define ABI_UNIX UNWIND$K_P10_ABI_UNIX&#define ABI_HPUX UNWIND$K_P10_ABI_HPUX$#define ABI_WNT UNWIND$K_P10_ABI_WNT$#define ABI_VMS UNWIND$K_P10_ABI_VMS#define RELA$K_R_IA_64_NONE 0#define RELA$K_R_IA_64_IMM14 33#define RELA$K_R_IA_64_IMM22 34#define RELA$K_R_IA_64_IMM64 35"#define RELA$K_R_IA_64_DIR32MSB 36"#define RELA$K_R_IA_64_DIR32LSB 37"#define RELA$K_R_IA_64_DIR64MSB 38"#define RELA$K_R_IA_64_DIR64LSB 39!#def ine RELA$K_R_IA_64_GPREL22 42"#define RELA$K_R_IA_64_GPREL64I 43$#define RELA$K_R_IA_64_GPREL32MSB 44$#define RELA$K_R_IA_64_GPREL32LSB 45$#define RELA$K_R_IA_64_GPREL64MSB 46$#define RELA$K_R_IA_64_GPREL64LSB 47!#define RELA$K_R_IA_64_LTOFF22 50"#define RELA$K_R_IA_64_LTOFF64I 51"#define RELA$K_R_IA_64_PLTOFF22 58##define RELA$K_R_IA_64_PLTOFF64I 59%#define RELA$K_R_IA_64_PLTOFF64MSB 62%#define RELA$K_R_IA_64_PLTOFF64LSB 63!#define RELA$K_R_IA_64_FPTR64I 67##define RELA$K_R_IA_64_F PTR32MSB 68##define RELA$K_R_IA_64_FPTR32LSB 69##define RELA$K_R_IA_64_FPTR64MSB 70##define RELA$K_R_IA_64_FPTR64LSB 71"#define RELA$K_R_IA_64_PCREL60B 72"#define RELA$K_R_IA_64_PCREL21B 73"#define RELA$K_R_IA_64_PCREL21M 74"#define RELA$K_R_IA_64_PCREL21F 75$#define RELA$K_R_IA_64_PCREL32MSB 76$#define RELA$K_R_IA_64_PCREL32LSB 77$#define RELA$K_R_IA_64_PCREL64MSB 78$#define RELA$K_R_IA_64_PCREL64LSB 79&#define RELA$K_R_IA_64_LTOFF_FPTR22 82'#define RELA$K_R_IA_64_LTOFF_FPTR64I 83) #define RELA$K_R_IA_64_LTOFF_FPTR32MSB 84)#define RELA$K_R_IA_64_LTOFF_FPTR32LSB 85)#define RELA$K_R_IA_64_LTOFF_FPTR64MSB 86)#define RELA$K_R_IA_64_LTOFF_FPTR64LSB 87%#define RELA$K_R_IA_64_SEGREL32MSB 92%#define RELA$K_R_IA_64_SEGREL32LSB 93%#define RELA$K_R_IA_64_SEGREL64MSB 94%#define RELA$K_R_IA_64_SEGREL64LSB 95&#define RELA$K_R_IA_64_SECREL32MSB 100&#define RELA$K_R_IA_64_SECREL32LSB 101&#define RELA$K_R_IA_64_SECREL64MSB 102&#define RELA$K_R_IA_64_SECREL64LSB 103##define RE LA$K_R_IA_64_REL32MSB 108##define RELA$K_R_IA_64_REL32LSB 109##define RELA$K_R_IA_64_REL64MSB 110##define RELA$K_R_IA_64_REL64LSB 111##define RELA$K_R_IA_64_LTV32MSB 116##define RELA$K_R_IA_64_LTV32LSB 117##define RELA$K_R_IA_64_LTV64MSB 118##define RELA$K_R_IA_64_LTV64LSB 119$#define RELA$K_R_IA_64_PCREL21BI 121"#define RELA$K_R_IA_64_PCREL22 122##define RELA$K_R_IA_64_PCREL64I 123"#define RELA$K_R_IA_64_IPLTMSB 128"#define RELA$K_R_IA_64_IPLTLSB 129#define RELA$K_R_IA_64_COPY  132#define RELA$K_R_IA_64_SUB 133##define RELA$K_R_IA_64_LTOFF22X 134!#define RELA$K_R_IA_64_LDXMOV 135"#define RELA$K_R_IA_64_TPREL14 145"#define RELA$K_R_IA_64_TPREL22 146##define RELA$K_R_IA_64_TPREL64I 147%#define RELA$K_R_IA_64_TPREL64MSB 150%#define RELA$K_R_IA_64_TPREL64LSB 151%#define RELA$K_R_IA_64_LTOFF_TP22 154&#define RELA$K_R_IA_64_DTPMOD64MSB 166&#define RELA$K_R_IA_64_DTPMOD64LSB 167)#define RELA$K_R_IA_64_LTOFF_DTPMOD22 170##define RELA$K_R_IA_64_DTPREL14 177##d  efine RELA$K_R_IA_64_DTPREL22 178$#define RELA$K_R_IA_64_DTPREL64I 179&#define RELA$K_R_IA_64_DTPREL32MSB 180&#define RELA$K_R_IA_64_DTPREL32LSB 181&#define RELA$K_R_IA_64_DTPREL64MSB 182&#define RELA$K_R_IA_64_DTPREL64LSB 183)#define RELA$K_R_IA_64_LTOFF_DTPREL22 186&#define RELA$K_R_IA_64_LOOS 1879048192#define RELA$K_R_IA_64_HIOS -1&#define RELA$K_R_IA_64_DIR8 1879048192*#define RELA$K_R_IA_64_DIR16LSB 1879048193.#define RELA$K_R_IA_64_VMS_CALL_SIG 18790481942#define RELA$K_R_IA_64_V  MS_EXECLET_FUNC 18790481952#define RELA$K_R_IA_64_VMS_EXECLET_DATA 1879048196*#define RELA$K_R_IA_64_VMS_FIX8 1879048197+#define RELA$K_R_IA_64_VMS_FIX16 1879048198+#define RELA$K_R_IA_64_VMS_FIX32 1879048199+#define RELA$K_R_IA_64_VMS_FIX64 1879048200+#define RELA$K_R_IA_64_VMS_FIXFD 1879048201.#define RELA$K_R_IA_64_VMS_ACC_LOAD 1879048202-#define RELA$K_R_IA_64_VMS_ACC_ADD 1879048203-#define RELA$K_R_IA_64_VMS_ACC_SUB 1879048204-#define RELA$K_R_IA_64_VMS_ACC_MUL 1879048205-#defin  e RELA$K_R_IA_64_VMS_ACC_DIV 1879048206-#define RELA$K_R_IA_64_VMS_ACC_AND 1879048207-#define RELA$K_R_IA_64_VMS_ACC_IOR 1879048208-#define RELA$K_R_IA_64_VMS_ACC_EOR 1879048209-#define RELA$K_R_IA_64_VMS_ACC_ASH 1879048210.#define RELA$K_R_IA_64_VMS_ACC_STO8 18790482122#define RELA$K_R_IA_64_VMS_ACC_STO16LSB 18790482132#define RELA$K_R_IA_64_VMS_ACC_STO32LSB 18790482142#define RELA$K_R_IA_64_VMS_ACC_STO64LSB 1879048215I/* Display Name Info (dni) - aka Demangler info - entries  */I/* Internally some more structures and names are used. However, a */I/* developer should only use the types Elf64_vms_dni32 and */I/* Elf64_vms_dni64, both contain all necessary fields. In C notation */I/* all the necesary 32 bit fields are: */B/* dni32$l_dni_format */B/* dni32$l_fmt1_info[i].fmt1$l_dni_demangler */B/* dni32$l_fmt1_info[i].fmt1$l_dni_symbol  */B/* dni32$l_fmt1_info[i].fmt1$l_dni_data */B/* dni32$l_fmt2_info[i].fmt2$l_dni_symbol */B/* dni32$l_fmt2_info[i].fmt2$l_dni_data */B/* dni32$l_fmt3.fmt3$l_dni_demangler */B/* dni32$l_fmt4.fmt4$l_dni_demangler */B/* dni32$l_fmt4_info[i].fmt4$l_dni_symbol */B/* dni32$l_fmt4_info[i].fmt4$l_dni_data */ typedef int Dema  nglerRoutine (0 char *result_string, int *result_string_length,3 const char *elf_name, const char *demangler_data);#define DNI$_SUCCESS 1R#define DNI$_NORMAL 1 /* demangled string is in result buffer */N#define DNI$_ERROR 2 /* error in demangling */ #define DNI$_ALTERNATE_SUCCESS 9X#define DNI$_SAME 9 /* demangled string identical to input string */N/* Data representations (0,4,8) */N#define DNI$_DATA_ULEB 0 /* ULEBs (see DWARF spec) */N#define DNI$_DATA_WORD 4 /* ELF64_Word, VMS Longword */N#define DNI$_DATA_XWORD 8 /* ELF64_Xword, VMS Quadword */N/* DNI formats (1, ..., 4) */#define DNI$_FMT1 1#define DNI$_FMT2 2#define DNI$_FMT3 3#define DNI$_FMT4 4N/* */N/* 32 bit va riants */N/* */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni32_fmt1 {#pragma __nomember_alignment$ ELF64_WORD fmt1$l_dni_demangler;! ELF64_WORD fmt1$l_dni_symbol;  ELF64_WORD fmt1$l_dni_data; } ELF64_VMS_DNI32_FMT1;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni32_fmt1 {#pragma __nomember_alignment$ elf64_word fmt1$l_dni_demangler;! elf64_word fmt1$l_dni_symbol; elf64_word fmt1$l_dni_data; } elf64_vms_dni32_fmt1;%#endif  /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni32_fmt2 {#pragma __nomember_alignment! ELF64_WORD fmt2$l_dni_symbol; ELF64_WORD fmt2$l_dni_data; } ELF64_VMS_DNI32_FMT2;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cpluspl us) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni32_fmt2 {#pragma __nomember_alignment! elf64_word fmt2$l_dni_symbol; elf64_word fmt2$l_dni_data; } elf64_vms_dni32_fmt2;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longw ord#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni32_fmt3 {#pragma __nomember_alignment$ ELF64_WORD fmt3$l_dni_demangler; } ELF64_VMS_DNI32_FMT3;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni32_fmt3 {#pragma __nomember_alignment$ elf64_word fmt3$l_dn i_demangler; } elf64_vms_dni32_fmt3;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni32_fmt4 {#pragma __nomember_alignment$ ELF64_WORD fmt4$l_dni_demangler; } ELF64_VMS_DNI32_FMT4;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT)  && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni32_fmt4 {#pragma __nomember_alignment$ elf64_word fmt4$l_dni_demangler; } elf64_vms_dni32_fmt4;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#els e#pragma __nomember_alignment#endif*typedef struct _elf64_vms_dni32_fmt4_sub {#pragma __nomember_alignment! ELF64_WORD fmt4$l_dni_symbol; ELF64_WORD fmt4$l_dni_data; } ELF64_VMS_DNI32_FMT4_SUB;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif*typedef struct _elf64_vms_dni32_fmt4_sub {#pragma __nomember_a lignment! elf64_word fmt4$l_dni_symbol; elf64_word fmt4$l_dni_data; } elf64_vms_dni32_fmt4_sub;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif!typedef struct _elf64_vms_dni32 {#pragma __nomember_alignment" ELF64_WORD dni32$l_dni_format; __union { __struct  {7 ELF64_VMS_DNI32_FMT1 dni32$l_fmt1_info [1]; } dni32$r_format_l1; __struct {7 ELF64_VMS_DNI32_FMT2 dni32$l_fmt2_info [1]; } dni32$r_format_l2; __struct {. ELF64_VMS_DNI32_FMT3 dni32$l_fmt3; } dni32$r_format_l3; __struct {. ELF64_VMS_DNI32_FMT4 dni32$l_fmt4;; ELF64_VMS_DNI32_FMT4_SUB dni32$l_fmt4_info [1]; } dni32$r_format_l4; } dni32$r_entry32;   } ELF64_VMS_DNI32; #if !defined(__VAXC);#define dni32$r_format_l1 dni32$r_entry32.dni32$r_format_l1=#define dni32$l_fmt1_info dni32$r_format_l1.dni32$l_fmt1_info;#define dni32$r_format_l2 dni32$r_entry32.dni32$r_format_l2=#define dni32$l_fmt2_info dni32$r_format_l2.dni32$l_fmt2_info;#define dni32$r_format_l3 dni32$r_entry32.dni32$r_format_l33#define dni32$l_fmt3 dni32$r_format_l3.dni32$l_fmt3;#define dni32$r_format_l4 dni32$r_entry32.dni32$r_format_l43#define dni32$l_fmt4 dni 32$r_format_l4.dni32$l_fmt4=#define dni32$l_fmt4_info dni32$r_format_l4.dni32$l_fmt4_info"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif!typedef struct _elf64_vms_dni32 {#pragma __nomember_alignment" elf64_word dni32$l_dni_format; __union { __struct {7  elf64_vms_dni32_fmt1 dni32$l_fmt1_info [1]; } dni32$r_format_l1; __struct {7 elf64_vms_dni32_fmt2 dni32$l_fmt2_info [1]; } dni32$r_format_l2; __struct {. elf64_vms_dni32_fmt3 dni32$l_fmt3; } dni32$r_format_l3; __struct {. elf64_vms_dni32_fmt4 dni32$l_fmt4;; elf64_vms_dni32_fmt4_sub dni32$l_fmt4_info [1]; } dni32$r_format_l4; } dni32$r_entry32; } elf64_  vms_dni32; #if !defined(__VAXC)M#define dni32$l_fmt1_info dni32$r_entry32.dni32$r_format_l1.dni32$l_fmt1_infoM#define dni32$l_fmt2_info dni32$r_entry32.dni32$r_format_l2.dni32$l_fmt2_infoC#define dni32$l_fmt3 dni32$r_entry32.dni32$r_format_l3.dni32$l_fmt3C#define dni32$l_fmt4 dni32$r_entry32.dni32$r_format_l4.dni32$l_fmt4M#define dni32$l_fmt4_info dni32$r_entry32.dni32$r_format_l4.dni32$l_fmt4_info"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/*  */N/* 64 bit variants */N/* */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni64_fmt1 {#pragma __nomember _alignment% ELF64_XWORD fmt1$q_dni_demangler;" ELF64_XWORD fmt1$q_dni_symbol; ELF64_XWORD fmt1$q_dni_data; } ELF64_VMS_DNI64_FMT1;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni64_fmt1 {#pragma __nomember_alignment% elf64_xword fmt1$q_dni_demangler;" elf64_xword fmt1$q _dni_symbol; elf64_xword fmt1$q_dni_data; } elf64_vms_dni64_fmt1;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni64_fmt2 {#pragma __nomember_alignment" ELF64_XWORD fmt2$q_dni_symbol; ELF64_XWORD fmt2$q_dni_data; } ELF64_VMS_DNI64_FMT2;#e lse /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni64_fmt2 {#pragma __nomember_alignment" elf64_xword fmt2$q_dni_symbol; elf64_xword fmt2$q_dni_data; } elf64_vms_dni64_fmt2;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(_ _cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni64_fmt3 {#pragma __nomember_alignment% ELF64_XWORD fmt3$q_dni_demangler; } ELF64_VMS_DNI64_FMT3;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&type def struct _elf64_vms_dni64_fmt3 {#pragma __nomember_alignment% elf64_xword fmt3$q_dni_demangler; } elf64_vms_dni64_fmt3;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni64_fmt4 {#pragma __nomember_alignment% ELF64_XWORD fmt4$q_dni_demangler;  } ELF64_VMS_DNI64_FMT4;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif&typedef struct _elf64_vms_dni64_fmt4 {#pragma __nomember_alignment% elf64_xword fmt4$q_dni_demangler; } elf64_vms_dni64_fmt4;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__c plusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif*typedef struct _elf64_vms_dni64_fmt4_sub {#pragma __nomember_alignment" ELF64_XWORD fmt4$q_dni_symbol; ELF64_XWORD fmt4$q_dni_data; } ELF64_VMS_DNI64_FMT4_SUB;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragm a __nomember_alignment#endif*typedef struct _elf64_vms_dni64_fmt4_sub {#pragma __nomember_alignment" elf64_xword fmt4$q_dni_symbol; elf64_xword fmt4$q_dni_data; } elf64_vms_dni64_fmt4_sub;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif!typedef struct _elf64_vms_dni64 {#pra! gma __nomember_alignment# ELF64_XWORD dni64$q_dni_format; __union { __struct {7 ELF64_VMS_DNI64_FMT1 dni64$q_fmt1_info [1]; } dni64$r_format_q1; __struct {7 ELF64_VMS_DNI64_FMT2 dni64$q_fmt2_info [1]; } dni64$r_format_q2; __struct {. ELF64_VMS_DNI64_FMT3 dni64$q_fmt3; } dni64$r_format_q3; __struct {. ELF64_VMS_DNI64_FMT4 dni64$q_fmt4;; ELF64_VMS_DN " I64_FMT4_SUB dni64$q_fmt4_info [1]; } dni64$r_format_q4; } dni64$r_entry64; } ELF64_VMS_DNI64; #if !defined(__VAXC);#define dni64$r_format_q1 dni64$r_entry64.dni64$r_format_q1=#define dni64$q_fmt1_info dni64$r_format_q1.dni64$q_fmt1_info;#define dni64$r_format_q2 dni64$r_entry64.dni64$r_format_q2=#define dni64$q_fmt2_info dni64$r_format_q2.dni64$q_fmt2_info;#define dni64$r_format_q3 dni64$r_entry64.dni64$r_format_q33#define dni64$q_fmt3 dni64$r_format_q3.dni# 64$q_fmt3;#define dni64$r_format_q4 dni64$r_entry64.dni64$r_format_q43#define dni64$q_fmt4 dni64$r_format_q4.dni64$q_fmt4=#define dni64$q_fmt4_info dni64$r_format_q4.dni64$q_fmt4_info"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endif!typedef struct _elf64_vms_dni64 {#pragma __nomemb$ er_alignment# elf64_xword dni64$q_dni_format; __union { __struct {7 elf64_vms_dni64_fmt1 dni64$q_fmt1_info [1]; } dni64$r_format_q1; __struct {7 elf64_vms_dni64_fmt2 dni64$q_fmt2_info [1]; } dni64$r_format_q2; __struct {. elf64_vms_dni64_fmt3 dni64$q_fmt3; } dni64$r_format_q3; __struct {. elf64_vms_dni64_fmt4 dni64$q_fmt4;; elf64_vms_dni64_fmt4_sub % dni64$q_fmt4_info [1]; } dni64$r_format_q4; } dni64$r_entry64; } elf64_vms_dni64; #if !defined(__VAXC)M#define dni64$q_fmt1_info dni64$r_entry64.dni64$r_format_q1.dni64$q_fmt1_infoM#define dni64$q_fmt2_info dni64$r_entry64.dni64$r_format_q2.dni64$q_fmt2_infoC#define dni64$q_fmt3 dni64$r_entry64.dni64$r_format_q3.dni64$q_fmt3C#define dni64$q_fmt4 dni64$r_entry64.dni64$r_format_q4.dni64$q_fmt4M#define dni64$q_fmt4_info dni64$r_entry64.dni64$r_format_q4.dni64$q_& fmt4_info"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define PHDR$SC_PF_X 0#define PHDR$M_PF_X 0x1#define PHDR$SC_PF_W 1#define PHDR$M_PF_W 0x2#define PHDR$SC_PF_R 2#define PHDR$M_PF_R 0x4$#define PHDR$M_PF_FILL_3TO19 0xFFFF8&#define PHDR$SC_PF_VMS_NOWRIT_RELOC 20+#define PHDR$M_PF_VMS_NOWRIT_RELOC 0x100000%#define PHDR$SC_PF_VMS_INITIALCODE 21*#define PHDR$M_PF_VMS_INITIALCODE 0x200000"#define PHDR$SC_PF_VMS_RESIDENT 22'#define PHDR$M_PF_VM' S_RESIDENT 0x400000 #define PHDR$SC_PF_VMS_VECTOR 23%#define PHDR$M_PF_VMS_VECTOR 0x800000!#define PHDR$SC_PF_VMS_PROTECT 24'#define PHDR$M_PF_VMS_PROTECT 0x1000000&#define PHDR$SC_PF_VMS_NOWRIT_FIXUP 25,#define PHDR$M_PF_VMS_NOWRIT_FIXUP 0x2000000#define PHDR$SC_PF_VMS_SHORT 26%#define PHDR$M_PF_VMS_SHORT 0x4000000 #define PHDR$SC_PF_VMS_SHARED 27&#define PHDR$M_PF_VMS_SHARED 0x8000000##define PHDR$SC_PF_IA_64_NORECOV 31*#define PHDR$M_PF_IA_64_NORECOV 0x80000000#define PHDR$M_F( ILL_1 0xFFFFF#define PHDR$SC_PF_MASKOS 20"#define PHDR$M_PF_MASKOS 0xFF00000#define PHDR$SC_PF_MASKPROC 28%#define PHDR$M_PF_MASKPROC 0xF0000000#define ELF64_PHDR$K_SIZE 56#define ELF64_PHDR$C_SIZE 56 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_phdr {#pragma __nomember_alignment ELF64_WORD p ) hdr$l_p_type; __union {" ELF64_WORD phdr$l_p_flags; __struct {% unsigned phdr$v_pf_x : 1;% unsigned phdr$v_pf_w : 1;% unsigned phdr$v_pf_r : 1;/ unsigned phdr$v_pf_fill_3to19 : 17;4 unsigned phdr$v_pf_vms_nowrit_reloc : 1;3 unsigned phdr$v_pf_vms_initialcode : 1;0 unsigned phdr$v_pf_vms_resident : 1;. unsigned phdr$v_pf_vms_vector : 1;/ unsigned phdr$v_pf_vms_prote * ct : 1;4 unsigned phdr$v_pf_vms_nowrit_fixup : 1;- unsigned phdr$v_pf_vms_short : 1;. unsigned phdr$v_pf_vms_shared : 1;/ unsigned phdr$v_pf_fill_24to30 : 3;1 unsigned phdr$v_pf_ia_64_norecov : 1; } phdr$r_flagbits; __struct {( unsigned phdr$v_fill_1 : 20;* unsigned phdr$v_pf_maskos : 8;, unsigned phdr$v_pf_maskproc : 4; } phdr$r_flagmasks; } phdr$r_flags;+  ELF64_OFF phdr$q_p_offset; ELF64_ADDR phdr$pq_p_vaddr; ELF64_ADDR phdr$pq_p_paddr; ELF64_XWORD phdr$q_p_filesz; ELF64_XWORD phdr$q_p_memsz; ELF64_XWORD phdr$q_p_align; } ELF64_PHDR; #if !defined(__VAXC)2#define phdr$l_p_flags phdr$r_flags.phdr$l_p_flags<#define phdr$v_pf_x phdr$r_flags.phdr$r_flagbits.phdr$v_pf_x<#define phdr$v_pf_w phdr$r_flags.phdr$r_flagbits.phdr$v_pf_w<#define phdr$v_pf_r phdr$r_flags.phdr$r_flagbits.phdr$v_pf_rN#define phdr$v_pf_, fill_3to19 phdr$r_flags.phdr$r_flagbits.phdr$v_pf_fill_3to19Z#define phdr$v_pf_vms_nowrit_reloc phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_nowrit_relocX#define phdr$v_pf_vms_initialcode phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_initialcodeR#define phdr$v_pf_vms_resident phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_residentN#define phdr$v_pf_vms_vector phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_vectorP#define phdr$v_pf_vms_protect phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_protectZ#define phdr$v_p- f_vms_nowrit_fixup phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_nowrit_fixupL#define phdr$v_pf_vms_short phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_shortN#define phdr$v_pf_vms_shared phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_sharedP#define phdr$v_pf_fill_24to30 phdr$r_flags.phdr$r_flagbits.phdr$v_pf_fill_24to30T#define phdr$v_pf_ia_64_norecov phdr$r_flags.phdr$r_flagbits.phdr$v_pf_ia_64_norecovA#define phdr$v_fill_1 phdr$r_flags.phdr$r_flagmasks.phdr$v_fill_1G#define phdr$v_pf_maskos phdr$r_flag. s.phdr$r_flagmasks.phdr$v_pf_maskosK#define phdr$v_pf_maskproc phdr$r_flags.phdr$r_flagmasks.phdr$v_pf_maskproc"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_phdr {#pragma __nomember_alignment elf64_word phdr$l_p_type; __union {" elf64_word p / hdr$l_p_flags; __struct {% unsigned phdr$v_pf_x : 1;% unsigned phdr$v_pf_w : 1;% unsigned phdr$v_pf_r : 1;/ unsigned phdr$v_pf_fill_3to19 : 17;4 unsigned phdr$v_pf_vms_nowrit_reloc : 1;3 unsigned phdr$v_pf_vms_initialcode : 1;0 unsigned phdr$v_pf_vms_resident : 1;. unsigned phdr$v_pf_vms_vector : 1;/ unsigned phdr$v_pf_vms_protect : 1;4 unsigned phdr$v_pf_vms_nowrit_0 fixup : 1;- unsigned phdr$v_pf_vms_short : 1;. unsigned phdr$v_pf_vms_shared : 1;/ unsigned phdr$v_pf_fill_24to30 : 3;1 unsigned phdr$v_pf_ia_64_norecov : 1; } phdr$r_flagbits; __struct {( unsigned phdr$v_fill_1 : 20;* unsigned phdr$v_pf_maskos : 8;, unsigned phdr$v_pf_maskproc : 4; } phdr$r_flagmasks; } phdr$r_flags; elf64_off phdr$q_p_offset; elf64_addr phd 1 r$pq_p_vaddr; elf64_addr phdr$pq_p_paddr; elf64_xword phdr$q_p_filesz; elf64_xword phdr$q_p_memsz; elf64_xword phdr$q_p_align; } elf64_phdr; #if !defined(__VAXC)2#define phdr$l_p_flags phdr$r_flags.phdr$l_p_flags<#define phdr$v_pf_x phdr$r_flags.phdr$r_flagbits.phdr$v_pf_x<#define phdr$v_pf_w phdr$r_flags.phdr$r_flagbits.phdr$v_pf_w<#define phdr$v_pf_r phdr$r_flags.phdr$r_flagbits.phdr$v_pf_rN#define phdr$v_pf_fill_3to19 phdr$r_flags.phdr$r_flagbits.phdr$v_pf_fi2 ll_3to19Z#define phdr$v_pf_vms_nowrit_reloc phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_nowrit_relocX#define phdr$v_pf_vms_initialcode phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_initialcodeR#define phdr$v_pf_vms_resident phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_residentN#define phdr$v_pf_vms_vector phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_vectorP#define phdr$v_pf_vms_protect phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_protectZ#define phdr$v_pf_vms_nowrit_fixup phdr$r_flags.phdr$r_flagbits.phdr3 $v_pf_vms_nowrit_fixupL#define phdr$v_pf_vms_short phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_shortN#define phdr$v_pf_vms_shared phdr$r_flags.phdr$r_flagbits.phdr$v_pf_vms_sharedP#define phdr$v_pf_fill_24to30 phdr$r_flags.phdr$r_flagbits.phdr$v_pf_fill_24to30T#define phdr$v_pf_ia_64_norecov phdr$r_flags.phdr$r_flagbits.phdr$v_pf_ia_64_norecovA#define phdr$v_fill_1 phdr$r_flags.phdr$r_flagmasks.phdr$v_fill_1G#define phdr$v_pf_maskos phdr$r_flags.phdr$r_flagmasks.phdr$v_pf_maskosK#define phdr$v4 _pf_maskproc phdr$r_flags.phdr$r_flagmasks.phdr$v_pf_maskproc"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define PHDR$K_PT_NULL 0#define PHDR$K_PT_LOAD 1#define PHDR$K_PT_DYNAMIC 2#define PHDR$K_PT_INTERP 3#define PHDR$K_PT_NOTE 4#define PHDR$K_PT_SHLIB 5#define PHDR$K_PT_PHDR 6#define PHDR$K_PT_TLS 7!#define PHDR$K_PT_LOOS 1610612736!#define PHDR$K_PT_HIOS 1879048191##define PHDR$K_PT_LOPROC 1879048192##define PHDR$K_PT_HIPROC 2147483647 5 (#define DYNSEG$SC_DT_VMS_LF_CALL_DEBUG 0)#define DYNSEG$M_DT_VMS_LF_CALL_DEBUG 0x1&#define DYNSEG$SC_DT_VMS_LF_NOP0BUFS 1'#define DYNSEG$M_DT_VMS_LF_NOP0BUFS 0x2%#define DYNSEG$SC_DT_VMS_LF_P0IMAGE 2&#define DYNSEG$M_DT_VMS_LF_P0IMAGE 0x4'#define DYNSEG$SC_DT_VMS_LF_MKTHREADS 3(#define DYNSEG$M_DT_VMS_LF_MKTHREADS 0x8%#define DYNSEG$SC_DT_VMS_LF_UPCALLS 4'#define DYNSEG$M_DT_VMS_LF_UPCALLS 0x10$#define DYNSEG$SC_DT_VMS_LF_IMGSTA 5&#define DYNSEG$M_DT_VMS_LF_IMGSTA 0x20(#define DYNS 6 EG$SC_DT_VMS_LF_INITIALIZE 6*#define DYNSEG$M_DT_VMS_LF_INITIALIZE 0x40"#define DYNSEG$SC_DT_VMS_LF_MAIN 7$#define DYNSEG$M_DT_VMS_LF_MAIN 0x80$#define DYNSEG$SC_DT_VMS_LF_UNUSED 8'#define DYNSEG$M_DT_VMS_LF_UNUSED 0x100&#define DYNSEG$SC_DT_VMS_LF_EXE_INIT 9)#define DYNSEG$M_DT_VMS_LF_EXE_INIT 0x200)#define DYNSEG$SC_DT_VMS_LF_TBK_IN_IMG 10+#define DYNSEG$M_DT_VMS_LF_TBK_IN_IMG 0x400)#define DYNSEG$SC_DT_VMS_LF_DBG_IN_IMG 11+#define DYNSEG$M_DT_VMS_LF_DBG_IN_IMG 0x800)#define DYNSEG7 $SC_DT_VMS_LF_TBK_IN_DSF 12,#define DYNSEG$M_DT_VMS_LF_TBK_IN_DSF 0x1000)#define DYNSEG$SC_DT_VMS_LF_DBG_IN_DSF 13,#define DYNSEG$M_DT_VMS_LF_DBG_IN_DSF 0x2000)#define DYNSEG$SC_DT_VMS_LF_SIGNATURES 14,#define DYNSEG$M_DT_VMS_LF_SIGNATURES 0x4000*#define DYNSEG$SC_DT_VMS_LF_REL_SEG_OFF 15-#define DYNSEG$M_DT_VMS_LF_REL_SEG_OFF 0x8000(#define DYNSEG$SC_DT_VMS_LF_SSI_INCAP 16,#define DYNSEG$M_DT_VMS_LF_SSI_INCAP 0x10000#define DYNSEG$K_SIZE 16#define DYNSEG$C_SIZE 16 #ifdef __NEW_S8 TARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _elf64_dyn {#pragma __nomember_alignment ELF64_SXWORD dynseg$q_d_tag; __union {# ELF64_XWORD dynseg$q_d_val;# ELF64_ADDR dynseg$pq_d_ptr; __struct {7 unsigned dynseg$v_dt_vms_lf_call_debug : 1;5 unsigned dynseg$v_dt_vms_lf_no 9 p0bufs : 1;4 unsigned dynseg$v_dt_vms_lf_p0image : 1;6 unsigned dynseg$v_dt_vms_lf_mkthreads : 1;4 unsigned dynseg$v_dt_vms_lf_upcalls : 1;3 unsigned dynseg$v_dt_vms_lf_imgsta : 1;7 unsigned dynseg$v_dt_vms_lf_initialize : 1;1 unsigned dynseg$v_dt_vms_lf_main : 1;3 unsigned dynseg$v_dt_vms_lf_unused : 1;5 unsigned dynseg$v_dt_vms_lf_exe_init : 1;7 unsigned dynseg$v_dt_vms_lf_tbk_in_img : 1: ;7 unsigned dynseg$v_dt_vms_lf_dbg_in_img : 1;7 unsigned dynseg$v_dt_vms_lf_tbk_in_dsf : 1;7 unsigned dynseg$v_dt_vms_lf_dbg_in_dsf : 1;7 unsigned dynseg$v_dt_vms_lf_signatures : 1;8 unsigned dynseg$v_dt_vms_lf_rel_seg_off : 1;6 unsigned dynseg$v_dt_vms_lf_ssi_incap : 1;, unsigned dynseg$v_fill_121_ : 7;& } dynseg$r_d_vms_lnkflags; } dynseg$r_d_un; } ELF64_DYN; #if !defined(__VAXC)3; #define dynseg$q_d_val dynseg$r_d_un.dynseg$q_d_val5#define dynseg$pq_d_ptr dynseg$r_d_un.dynseg$pq_d_ptri#define dynseg$v_dt_vms_lf_call_debug dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_call_debuge#define dynseg$v_dt_vms_lf_nop0bufs dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_nop0bufsc#define dynseg$v_dt_vms_lf_p0image dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_p0imageg#define dynseg$v_dt_vms_lf_mkthreads dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$< v_dt_vms_lf_mkthreadsc#define dynseg$v_dt_vms_lf_upcalls dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_upcallsa#define dynseg$v_dt_vms_lf_imgsta dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_imgstai#define dynseg$v_dt_vms_lf_initialize dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_initialize]#define dynseg$v_dt_vms_lf_main dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_maine#define dynseg$v_dt_vms_lf_exe_init dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dy= nseg$v_dt_vms_lf_exe_initi#define dynseg$v_dt_vms_lf_tbk_in_img dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_tbk_in_imgi#define dynseg$v_dt_vms_lf_dbg_in_img dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_dbg_in_imgi#define dynseg$v_dt_vms_lf_tbk_in_dsf dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_tbk_in_dsfi#define dynseg$v_dt_vms_lf_dbg_in_dsf dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_dbg_in_dsfi#define dynseg$v_dt_vms_lf_signatures dynseg$r > _d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_signaturesk#define dynseg$v_dt_vms_lf_rel_seg_off dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_rel_seg_offg#define dynseg$v_dt_vms_lf_ssi_incap dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_ssi_incap"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pra? gma __nomember_alignment#endiftypedef struct _elf64_dyn {#pragma __nomember_alignment elf64_sxword dynseg$q_d_tag; __union {# elf64_xword dynseg$q_d_val;# elf64_addr dynseg$pq_d_ptr; __struct {7 unsigned dynseg$v_dt_vms_lf_call_debug : 1;5 unsigned dynseg$v_dt_vms_lf_nop0bufs : 1;4 unsigned dynseg$v_dt_vms_lf_p0image : 1;6 unsigned dynseg$v_dt_vms_lf_mkthreads : 1;4 unsigned dynseg$v_dt_vms_lf_ @ upcalls : 1;3 unsigned dynseg$v_dt_vms_lf_imgsta : 1;7 unsigned dynseg$v_dt_vms_lf_initialize : 1;1 unsigned dynseg$v_dt_vms_lf_main : 1;3 unsigned dynseg$v_dt_vms_lf_unused : 1;5 unsigned dynseg$v_dt_vms_lf_exe_init : 1;7 unsigned dynseg$v_dt_vms_lf_tbk_in_img : 1;7 unsigned dynseg$v_dt_vms_lf_dbg_in_img : 1;7 unsigned dynseg$v_dt_vms_lf_tbk_in_dsf : 1;7 unsigned dynseg$v_dt_vms_lf_dbg_ A in_dsf : 1;7 unsigned dynseg$v_dt_vms_lf_signatures : 1;8 unsigned dynseg$v_dt_vms_lf_rel_seg_off : 1;6 unsigned dynseg$v_dt_vms_lf_ssi_incap : 1;, unsigned dynseg$v_fill_121_ : 7;& } dynseg$r_d_vms_lnkflags; } dynseg$r_d_un; } elf64_dyn; #if !defined(__VAXC)3#define dynseg$q_d_val dynseg$r_d_un.dynseg$q_d_val5#define dynseg$pq_d_ptr dynseg$r_d_un.dynseg$pq_d_ptri#define dynseg$v_dt_vms_lf_call_debug dynseg$r_d_un.dyB nseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_call_debuge#define dynseg$v_dt_vms_lf_nop0bufs dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_nop0bufsc#define dynseg$v_dt_vms_lf_p0image dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_p0imageg#define dynseg$v_dt_vms_lf_mkthreads dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_mkthreadsc#define dynseg$v_dt_vms_lf_upcalls dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_upcallsa#define dynseg$v_dt_vms_lf_imgsta dynsC eg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_imgstai#define dynseg$v_dt_vms_lf_initialize dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_initialize]#define dynseg$v_dt_vms_lf_main dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_maine#define dynseg$v_dt_vms_lf_exe_init dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_exe_initi#define dynseg$v_dt_vms_lf_tbk_in_img dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_tbk_in_imgi#define dynseg$v_dt_vms_lf_dD bg_in_img dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_dbg_in_imgi#define dynseg$v_dt_vms_lf_tbk_in_dsf dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_tbk_in_dsfi#define dynseg$v_dt_vms_lf_dbg_in_dsf dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_dbg_in_dsfi#define dynseg$v_dt_vms_lf_signatures dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_signaturesk#define dynseg$v_dt_vms_lf_rel_seg_off dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_rel_se E g_offg#define dynseg$v_dt_vms_lf_ssi_incap dynseg$r_d_un.dynseg$r_d_vms_lnkflags.dynseg$v_dt_vms_lf_ssi_incap"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define DYNSEG$K_DT_NULL 0#define DYNSEG$K_DT_NEEDED 1#define DYNSEG$K_DT_STRSZ 100#define DYNSEG$K_DT_IA_64_PLT_RESERVE 1879048192##define DYNSEG$K_DT_LOOS 1610612749*#define DYNSEG$K_DT_VMS_SUBTYPE 1610612749/#define DYNSEG$K_DT_VMS_DTLOOSPLUS_1 1610612750+#define DYNSEG$K_DT_VMS_IMGIOCNT 161061275 F 1/#define DYNSEG$K_DT_VMS_DTLOOSPLUS_3 1610612752/#define DYNSEG$K_DT_VMS_DTLOOSPLUS_4 1610612753/#define DYNSEG$K_DT_VMS_DTLOOSPLUS_5 1610612754/#define DYNSEG$K_DT_VMS_DTLOOSPLUS_6 1610612755/#define DYNSEG$K_DT_VMS_DTLOOSPLUS_7 1610612756+#define DYNSEG$K_DT_VMS_LNKFLAGS 1610612757/#define DYNSEG$K_DT_VMS_DTLOOSPLUS_9 16106127582#define DYNSEG$K_DT_VMS_VIR_MEM_BLK_SIZ 16106127590#define DYNSEG$K_DT_VMS_DTLOOSPLUS_11 1610612760(#define DYNSEG$K_DT_VMS_IDENT 16106127610#define DYNS G EG$K_DT_VMS_DTLOOSPLUS_13 16106127620#define DYNSEG$K_DT_VMS_DTLOOSPLUS_14 16106127630#define DYNSEG$K_DT_VMS_DTLOOSPLUS_15 1610612764/#define DYNSEG$K_DT_VMS_NEEDED_IDENT 16106127650#define DYNSEG$K_DT_VMS_DTLOOSPLUS_17 1610612766/#define DYNSEG$K_DT_VMS_IMG_RELA_CNT 16106127670#define DYNSEG$K_DT_VMS_DTLOOSPLUS_19 1610612768/#define DYNSEG$K_DT_VMS_SEG_RELA_CNT 16106127690#define DYNSEG$K_DT_VMS_DTLOOSPLUS_21 16106127701#define DYNSEG$K_DT_VMS_FIXUP_RELA_CNT 16106127710#define DYNSEG$K H _DT_VMS_DTLOOSPLUS_23 1610612772/#define DYNSEG$K_DT_VMS_FIXUP_NEEDED 16106127730#define DYNSEG$K_DT_VMS_DTLOOSPLUS_25 1610612774-#define DYNSEG$K_DT_VMS_SYMVEC_CNT 16106127750#define DYNSEG$K_DT_VMS_DTLOOSPLUS_27 16106127760#define DYNSEG$K_DT_VMS_DTLOOSPLUS_28 16106127770#define DYNSEG$K_DT_VMS_DTLOOSPLUS_29 1610612778)#define DYNSEG$K_DT_VMS_XLATED 16106127790#define DYNSEG$K_DT_VMS_DTLOOSPLUS_31 1610612780,#define DYNSEG$K_DT_VMS_STACKSIZE 16106127810#define DYNSEG$K_DT_VMS_DTLOOSPLUS I _33 1610612782+#define DYNSEG$K_DT_VMS_UNWINDSZ 16106127830#define DYNSEG$K_DT_VMS_DTLOOSPLUS_35 16106127840#define DYNSEG$K_DT_VMS_UNWIND_CODSEG 16106127850#define DYNSEG$K_DT_VMS_DTLOOSPLUS_37 16106127861#define DYNSEG$K_DT_VMS_UNWIND_INFOSEG 16106127870#define DYNSEG$K_DT_VMS_DTLOOSPLUS_39 1610612788+#define DYNSEG$K_DT_VMS_LINKTIME 16106127890#define DYNSEG$K_DT_VMS_DTLOOSPLUS_41 1610612790)#define DYNSEG$K_DT_VMS_SEG_NO 16106127910#define DYNSEG$K_DT_VMS_DTLOOSPLUS_43 16106127920#d J efine DYNSEG$K_DT_VMS_SYMVEC_OFFSET 16106127930#define DYNSEG$K_DT_VMS_DTLOOSPLUS_45 1610612794-#define DYNSEG$K_DT_VMS_SYMVEC_SEG 16106127950#define DYNSEG$K_DT_VMS_DTLOOSPLUS_47 16106127960#define DYNSEG$K_DT_VMS_UNWIND_OFFSET 16106127970#define DYNSEG$K_DT_VMS_DTLOOSPLUS_49 1610612798-#define DYNSEG$K_DT_VMS_UNWIND_SEG 16106127990#define DYNSEG$K_DT_VMS_DTLOOSPLUS_51 16106128000#define DYNSEG$K_DT_VMS_STRTAB_OFFSET 16106128010#define DYNSEG$K_DT_VMS_DTLOOSPLUS_53 16106128020#define DYNS K EG$K_DT_VMS_SYSVER_OFFSET 16106128030#define DYNSEG$K_DT_VMS_DTLOOSPLUS_55 1610612804/#define DYNSEG$K_DT_VMS_IMG_RELA_OFF 16106128050#define DYNSEG$K_DT_VMS_DTLOOSPLUS_57 1610612806/#define DYNSEG$K_DT_VMS_SEG_RELA_OFF 16106128070#define DYNSEG$K_DT_VMS_DTLOOSPLUS_59 16106128081#define DYNSEG$K_DT_VMS_FIXUP_RELA_OFF 16106128090#define DYNSEG$K_DT_VMS_DTLOOSPLUS_61 16106128100#define DYNSEG$K_DT_VMS_PLTGOT_OFFSET 16106128110#define DYNSEG$K_DT_VMS_DTLOOSPLUS_63 1610612812-#define DYNSEG$KL _DT_VMS_PLTGOT_SEG 16106128130#define DYNSEG$K_DT_VMS_DTLOOSPLUS_65 1610612814)#define DYNSEG$K_DT_VMS_FPMODE 1610612815%#define DYNSEG$K_DT_VMS_SUBTYPE_CLI 1 #ifdef __NEW_STARLETtypedef struct _vms_ident {! unsigned int identl_minor_id;' unsigned short int identw_major_id; unsigned char identb_match; unsigned char identb_unused; } VMS_IDENT;#else /* __OLD_STARLET */typedef struct _vms_ident {! unsigned int identl_minor_id;' unsigned short intM identw_major_id; unsigned char identb_match; unsigned char identb_unused; } vms_ident;%#endif /* #ifdef __NEW_STARLET */#define TBK$K_RECTYPE_HDR32 1#define TBK$K_RECTYPE_RTN32 2#define TBK$K_RECTYPE_FIL 3#define TBK$K_RECTYPE_LN1 4#define TBK$K_RECTYPE_LN2 5#define TBK$K_RECTYPE_LN4 6#define TBK$K_RECTYPE_PC1 7#define TBK$K_RECTYPE_PC2 8#define TBK$K_RECTYPE_PC4 9 #define TBK$K_RECTYPE_VERSION 10#define TBK$K_RECTYPE_HDR64 11#define TBK$K_RECTYP N E_RTN64 12#define TBK$K_RECTYPE_PC8 13 #ifdef __NEW_STARLET&typedef struct _system_version_array {P unsigned sysver$v_subsystem_mask : 32; /* Bit mask of valid array entries */N SYSVER_MAJMIN sysver$r_system_ver; /* Version of sys$base_image */O SUBSYS_MAJMIN sysver$r_subsys_ver [31]; /* Version of various subsystems */ } SYSTEM_VERSION_ARRAY;#else /* __OLD_STARLET */&typedef struct _system_version_array {P unsigned sysver$v_subsystem_mask : 32; /* Bit maO sk of valid array entries */N sysver_majmin sysver$r_system_ver; /* Version of sys$base_image */O subsys_majmin sysver$r_subsys_ver [31]; /* Version of various subsystems */ } system_version_array;%#endif /* #ifdef __NEW_STARLET */#define SYSVER$K_LENGTH 33#define SYSVER$C_LENGTH 33#define IMF$K_SIZE 32#define IMF$C_SIZE 32 #ifdef __NEW_STARLETtypedef struct _image_fixup {# ELF64_XWORD imf$q_fixup_offset; ELF64_WORD imf$l_type; ELF64_WORD iP mf$l_fixup_seg; ELF64_SXWORD imf$q_addend;" ELF64_WORD imf$l_symvec_index; ELF64_WORD imf$l_data_type; } IMAGE_FIXUP;#else /* __OLD_STARLET */typedef struct _image_fixup {# elf64_xword imf$q_fixup_offset; elf64_word imf$l_type; elf64_word imf$l_fixup_seg; elf64_sxword imf$q_addend;" elf64_word imf$l_symvec_index; elf64_word imf$l_data_type; } image_fixup;%#endif /* #ifdef __NEW_STARLET */#define IMR$K_SIZE 40#define IMR$C_SIQ ZE 40 #ifdef __NEW_STARLETtypedef struct _image_rela {" ELF64_XWORD imr$q_rela_offset; ELF64_WORD imr$l_type; ELF64_WORD imr$l_rela_seg; ELF64_SXWORD imr$q_addend;! ELF64_XWORD imr$q_sym_offset; ELF64_WORD imr$l_sym_seg; ELF64_WORD imr$l_fill_1; } IMAGE_RELA;#else /* __OLD_STARLET */typedef struct _image_rela {" elf64_xword imr$q_rela_offset; elf64_word imr$l_type; elf64_word imr$l_rela_seg; elf64_sxword imr$q_addend;! elR f64_xword imr$q_sym_offset; elf64_word imr$l_sym_seg; elf64_word imr$l_fill_1; } image_rela;%#endif /* #ifdef __NEW_STARLET */#define SGR$K_SIZE 32#define SGR$C_SIZE 32 #ifdef __NEW_STARLETtypedef struct _segment_rela {" ELF64_XWORD sgr$q_rela_offset; ELF64_WORD sgr$l_type; ELF64_WORD sgr$l_rela_seg; ELF64_SXWORD sgr$q_addend; __union {% ELF64_SXWORD sgr$q_gp_offset; __struct {* ELF64_WORD sgr$l_symvec_index;S * ELF64_WORD sgr$l_needed_index; } sgr$r_needed_sym; } sgr$r_symbol_overlay; } SEGMENT_RELA; #if !defined(__VAXC)<#define sgr$q_gp_offset sgr$r_symbol_overlay.sgr$q_gp_offsetS#define sgr$l_symvec_index sgr$r_symbol_overlay.sgr$r_needed_sym.sgr$l_symvec_indexS#define sgr$l_needed_index sgr$r_symbol_overlay.sgr$r_needed_sym.sgr$l_needed_index"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _segment_rela {" elT f64_xword sgr$q_rela_offset; elf64_word sgr$l_type; elf64_word sgr$l_rela_seg; elf64_sxword sgr$q_addend; __union {% elf64_sxword sgr$q_gp_offset; __struct {* elf64_word sgr$l_symvec_index;* elf64_word sgr$l_needed_index; } sgr$r_needed_sym; } sgr$r_symbol_overlay; } segment_rela; #if !defined(__VAXC)<#define sgr$q_gp_offset sgr$r_symbol_overlay.sgr$q_gp_offsetS#define sgr$l_symvec_index sgr$r_symbol_U overlay.sgr$r_needed_sym.sgr$l_symvec_indexS#define sgr$l_needed_index sgr$r_symbol_overlay.sgr$r_needed_sym.sgr$l_needed_index"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define VMS_FIXUP$K_SIZE 24#define VMS_FIXUP$C_SIZE 24 #ifdef __NEW_STARLETtypedef struct _vms_fixup {# ELF64_ADDR vms_fixup$pq_offset;$ ELF64_SXWORD vms_fixup$q_addend;# ELF64_WORD vms_fixup$l_symindx; ELF64_WORD vms_fixup$l_type; } VMS_FIXUP;#else /*V __OLD_STARLET */typedef struct _vms_fixup {# elf64_addr vms_fixup$pq_offset;$ elf64_sxword vms_fixup$q_addend;# elf64_word vms_fixup$l_symindx; elf64_word vms_fixup$l_type; } vms_fixup;%#endif /* #ifdef __NEW_STARLET */#define LNKG$K_SIZE 8#define LNKG$C_SIZE 8 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignW ment#endif%typedef struct _vms_linkages_header {#pragma __nomember_alignment ELF64_WORD lnkg$l_type;! ELF64_WORD lnkg$l_decl_count; } VMS_LINKAGES_HEADER;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endif%typedef struct _vms_linkages_header {#pragma __nomember_alignment elf64_word lnkg$l_type;! elX f64_word lnkg$l_decl_count; } vms_linkages_header;%#endif /* #ifdef __NEW_STARLET */#define LNKG_ENTRY1$K_SIZE 12#define LNKG_ENTRY1$C_SIZE 12 #ifdef __NEW_STARLET!typedef struct _vms_lnkg_entry1 {$ ELF64_WORD lnkg_entry1$l_symidx; __union {+ VMS_LNKG_DESC1 lnkg_entry1$ps_desc;1 ELF64_XWORD lnkg_entry1$q_vms_linkage_qw;" } lnkg_entry1$r_lnkg_desc; } VMS_LNKG_ENTRY1; #if !defined(__VAXC)G#define lnkg_entry1$ps_desc lnkg_entry1$r_lnY kg_desc.lnkg_entry1$ps_descY#define lnkg_entry1$q_vms_linkage_qw lnkg_entry1$r_lnkg_desc.lnkg_entry1$q_vms_linkage_qw"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */!typedef struct _vms_lnkg_entry1 {$ elf64_word lnkg_entry1$l_symidx; __union {+ vms_lnkg_desc1 lnkg_entry1$ps_desc;1 elf64_xword lnkg_entry1$q_vms_linkage_qw;" } lnkg_entry1$r_lnkg_desc; } vms_lnkg_entry1; #if !defined(__VAXC)G#define lnkg_entry1$ps_desc lnkg_entryZ 1$r_lnkg_desc.lnkg_entry1$ps_descY#define lnkg_entry1$q_vms_linkage_qw lnkg_entry1$r_lnkg_desc.lnkg_entry1$q_vms_linkage_qw"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */%#define VMSLNKG$K_VMS_LINKAGE_TYPE1 1#define VMSLNKG$K_REG_POL_VOL 0#define VMSLNKG$K_REG_POL_SCR 1#define VMSLNKG$K_REG_POL_OUT 2#define VMSLNKG$K_REG_POL_PRE 3 #ifdef __NEW_STARLETtypedef struct _func_descr { ELF64_ADDR fd$pq_entryva; ELF64_ADDR fd$pq_gptr; } [ FUNC_DESCR;#else /* __OLD_STARLET */typedef struct _func_descr { elf64_addr fd$pq_entryva; elf64_addr fd$pq_gptr; } func_descr;%#endif /* #ifdef __NEW_STARLET */#define UNWIND$K_DESC_VERSION 1&#define UNWIND$M_UNW_LENGTH 0xFFFFFFFF&#define UNWIND$SC_UNW_FLAG_EHANDLER 32.#define UNWIND$M_UNW_FLAG_EHANDLER 0x100000000&#define UNWIND$SC_UNW_FLAG_UHANDLER 33.#define UNWIND$M_UNW_FLAG_UHANDLER 0x2000000002#define UNWIND$M_UNW_FLAG_RSVD_43_34 0xFFC00000000&#define \ UNWIND$SC_UNW_FLAG_VMS_OSDA 441#define UNWIND$M_UNW_FLAG_VMS_OSDA 0x100000000000)#define UNWIND$SC_UNW_FLAG_VMS_HANDLER 454#define UNWIND$M_UNW_FLAG_VMS_HANDLER 0x200000000000"#define UNWIND$SC_UNW_FLAG_MASK 32-#define UNWIND$M_UNW_FLAG_MASK 0xFFFF00000000,#define UNWIND$M_OSMASK_UNUSED 0xFFFFFFFFFFF$#define UNWIND$SC_UNW_FLAG_OSMASK 44/#define UNWIND$M_UNW_FLAG_OSMASK 0xF00000000000.#define UNWIND$M_IVMSMODE_UNUSED 0xFFFFFFFFFFF"#define UNWIND$SC_UNW_IVMS_MODE 44-#define UNWIND$M_UNW_I] VMS_MODE 0x300000000000.#define UNWIND$M_VERSION_UNUSED 0xFFFFFFFFFFFF #define UNWIND$SC_UNW_VERSION 48/#define UNWIND$M_UNW_VERSION 0xFFFF000000000000#define UNWIND$K_DESC_SIZE 8#define UNWIND$C_DESC_SIZE 8 #ifdef __NEW_STARLET typedef struct _exceptn_unwind { __union { __struct { __union {/ ELF64_WORD unwind$l_unw_length; __struct {6 unsigned unwind$v_unw_length : 32;, } unwind$r ^ _unw_len_mask;) } unwind$r_unwind_length;* ELF64_HALF unwind$w_unw_flags;, ELF64_HALF unwind$w_unw_version;& } unwind$r_unwind_generic; __union { __struct {3 unsigned unwind$v_unused_31_0 : 32;8 unsigned unwind$v_unw_flag_ehandler : 1;8 unsigned unwind$v_unw_flag_uhandler : 1;; unsigned unwind$v_unw_flag_rsvd_43_34 : 10;8 unsigned unwind$v_unw_ _ flag_vms_osda : 1;; unsigned unwind$v_unw_flag_vms_handler : 1;0 unsigned unwind$v_fill_122_ : 2;' } unwind$r_unwind_flag; __struct {3 unsigned unwind$v_mask_unused : 32;5 unsigned unwind$v_unw_flag_mask : 16;& } unwind$r_flags_mask; __struct {7 unsigned unwind$v_osmask_unused_1 : 32;7 unsigned unwind$v_osmask_unused_2 : 12;6 ` unsigned unwind$v_unw_flag_osmask : 4;( } unwind$r_flags_osmask; __struct {9 unsigned unwind$v_ivmsmode_unused_1 : 32;9 unsigned unwind$v_ivmsmode_unused_2 : 12;4 unsigned unwind$v_unw_ivms_mode : 2;0 unsigned unwind$v_fill_123_ : 2;& } unwind$r_flags_ivms; __struct {8 unsigned unwind$v_version_unused_1 : 32;8 unsigned unwind$v_version_unused a _2 : 16;3 unsigned unwind$v_unw_version : 16;# } unwind$r_version;$ } unwind$r_exc_unwnd_os; } unwind$r_unwind_desc; } EXCEPTN_UNWIND; #if !defined(__VAXC)s#define unwind$l_unw_length unwind$r_unwind_desc.unwind$r_unwind_generic.unwind$r_unwind_length.unwind$l_unw_length#define unwind$v_unw_length unwind$r_unwind_desc.unwind$r_unwind_generic.unwind$r_unwind_length.unwind$r_unw_len_mask.unwind$v_unw_\lengthZ#define unwind$w_unw_fb lags unwind$r_unwind_desc.unwind$r_unwind_generic.unwind$w_unw_flags^#define unwind$w_unw_version unwind$r_unwind_desc.unwind$r_unwind_generic.unwind$w_unw_versionq#define unwind$v_unused_31_0 unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_unwind_flag.unwind$v_unused_31_0}#define unwind$v_unw_flag_ehandler unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_unwind_flag.unwind$v_unw_flag_ehandler}#define unwind$v_unw_flag_uhandler unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_unwind_flc ag.unwind$v_unw_flag_uhandler}#define unwind$v_unw_flag_vms_osda unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_unwind_flag.unwind$v_unw_flag_vms_osda#define unwind$v_unw_flag_vms_handler unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_unwind_flag.unwind$v_unw_flag_vms_handlert#define unwind$v_unw_flag_mask unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_flags_mask.unwind$v_unw_flag_maskz#define unwind$v_unw_flag_osmask unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_flags_osm d ask.unwind$v_unw_flag_osmaskt#define unwind$v_unw_ivms_mode unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_flags_ivms.unwind$v_unw_ivms_modem#define unwind$v_unw_version unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_version.unwind$v_unw_version"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ typedef struct _exceptn_unwind { __union { __struct { __union {/ elf64_word unwind$l_unw_length; __struct { e 6 unsigned unwind$v_unw_length : 32;, } unwind$r_unw_len_mask;) } unwind$r_unwind_length;* elf64_half unwind$w_unw_flags;, elf64_half unwind$w_unw_version;& } unwind$r_unwind_generic; __union { __struct {3 unsigned unwind$v_unused_31_0 : 32;8 unsigned unwind$v_unw_flag_ehandler : 1;8 unsigned unwind$v_unw_flag_uhandler : 1;; f unsigned unwind$v_unw_flag_rsvd_43_34 : 10;8 unsigned unwind$v_unw_flag_vms_osda : 1;; unsigned unwind$v_unw_flag_vms_handler : 1;0 unsigned unwind$v_fill_122_ : 2;' } unwind$r_unwind_flag; __struct {3 unsigned unwind$v_mask_unused : 32;5 unsigned unwind$v_unw_flag_mask : 16;& } unwind$r_flags_mask; __struct {7 unsigned unwind$v_osmask_u g nused_1 : 32;7 unsigned unwind$v_osmask_unused_2 : 12;6 unsigned unwind$v_unw_flag_osmask : 4;( } unwind$r_flags_osmask; __struct {9 unsigned unwind$v_ivmsmode_unused_1 : 32;9 unsigned unwind$v_ivmsmode_unused_2 : 12;4 unsigned unwind$v_unw_ivms_mode : 2;0 unsigned unwind$v_fill_123_ : 2;& } unwind$r_flags_ivms; __struct {8 un h signed unwind$v_version_unused_1 : 32;8 unsigned unwind$v_version_unused_2 : 16;3 unsigned unwind$v_unw_version : 16;# } unwind$r_version;$ } unwind$r_exc_unwnd_os; } unwind$r_unwind_desc; } exceptn_unwind; #if !defined(__VAXC)s#define unwind$l_unw_length unwind$r_unwind_desc.unwind$r_unwind_generic.unwind$r_unwind_length.unwind$l_unw_length#define unwind$v_unw_length unwind$r_unwind_desc.unwind$r_unwind_generic.unwi ind$r_unwind_length.unwind$r_unw_len_mask.unwind$v_unw_\lengthZ#define unwind$w_unw_flags unwind$r_unwind_desc.unwind$r_unwind_generic.unwind$w_unw_flags^#define unwind$w_unw_version unwind$r_unwind_desc.unwind$r_unwind_generic.unwind$w_unw_versionq#define unwind$v_unused_31_0 unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_unwind_flag.unwind$v_unused_31_0}#define unwind$v_unw_flag_ehandler unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_unwind_flag.unwind$v_unw_flag_ehandler}#define j unwind$v_unw_flag_uhandler unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_unwind_flag.unwind$v_unw_flag_uhandler}#define unwind$v_unw_flag_vms_osda unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_unwind_flag.unwind$v_unw_flag_vms_osda#define unwind$v_unw_flag_vms_handler unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_unwind_flag.unwind$v_unw_flag_vms_handlert#define unwind$v_unw_flag_mask unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_flags_mask.unwind$v_unw_flag_maskz#defin k e unwind$v_unw_flag_osmask unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_flags_osmask.unwind$v_unw_flag_osmaskt#define unwind$v_unw_ivms_mode unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_flags_ivms.unwind$v_unw_ivms_modem#define unwind$v_unw_version unwind$r_unwind_desc.unwind$r_exc_unwnd_os.unwind$r_version.unwind$v_unw_version"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #define UNWIND$K_FLAGS_UNUSED0 0 #define UNWIND$K_FLAGS_UNUSED1 1"#define UNl WIND$K_FLAGS_SEMANTICS 2'#define UNWIND$K_FLAGS_SEMANTICS_DATA 3#define UNWIND$K_ABI_UNIX 0#define UNWIND$K_ABI_HPUX 1#define UNWIND$K_ABI_WNT 2#define UNWIND$K_ABI_VMS 3#define UNWIND$K_HDR_PATTERN 0#define UNWIND$M_HDR_MASK 128#define UNWIND$K_R1_PATTERN 0#define UNWIND$M_R1_MASK 192#define UNWIND$K_R2_PATTERN 64#define UNWIND$M_R2_MASK 248#define UNWIND$K_R3_PATTERN 96#define UNWIND$M_R3_MASK 252#define UNWIND$K_P1_PATTERN 128#define UNWIND$M_P1_MASK 224#define m UNWIND$K_P2_PATTERN 160#define UNWIND$M_P2_MASK 240#define UNWIND$K_P3_PATTERN 176#define UNWIND$M_P3_MASK 248#define UNWIND$K_P4_PATTERN 184#define UNWIND$M_P4_MASK 255#define UNWIND$K_P5_PATTERN 185#define UNWIND$M_P5_MASK 255#define UNWIND$K_P6_PATTERN 192#define UNWIND$M_P6_MASK 224#define UNWIND$K_P7_PATTERN 224#define UNWIND$M_P7_MASK 240#define UNWIND$K_P8_PATTERN 240#define UNWIND$M_P8_MASK 255#define UNWIND$K_P9_PATTERN 241#define UNWIND$M_P9_MASK 255 #dn efine UNWIND$K_P10_PATTERN 255#define UNWIND$M_P10_MASK 255#define UNWIND$K_B1_PATTERN 128#define UNWIND$M_B1_MASK 192#define UNWIND$K_B2_PATTERN 192#define UNWIND$M_B2_MASK 224#define UNWIND$K_B3_PATTERN 224#define UNWIND$M_B3_MASK 255#define UNWIND$K_B4_PATTERN 240#define UNWIND$M_B4_MASK 247#define UNWIND$K_X1_PATTERN 249#define UNWIND$M_X1_MASK 255#define UNWIND$K_X2_PATTERN 250#define UNWIND$M_X2_MASK 255#define UNWIND$K_X3_PATTERN 251#define UNWIND$M_X3_MASKo 255#define UNWIND$K_X4_PATTERN 252#define UNWIND$M_X4_MASK 255#define UNWIND$K_P10_ABI_UNIX 0#define UNWIND$K_P10_ABI_HPUX 1#define UNWIND$K_P10_ABI_WNT 2#define UNWIND$K_P10_ABI_VMS 3  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif p /* __ELFDEF_LOADED */ wwۛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $EMHDEF ***/#ifndef __EMHDEF_LOADED q #define __EMHDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __r 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 N/* */N/* EVAX Module header record (EMH) s */N/* */N#define EMH$C_MHD 0 /*Main header record */N#define EMH$C_LNM 1 /*Language name and version */N#define EMH$C_SRC 2 /*Source file specification */N#define EMH$C_TTL 3 /*Title text of module */N#define EMH$C_CPR 4 /*Copyright notice t */N#define EMH$C_MTC 5 /*Maintenence status */N#define EMH$C_GTX 6 /*General text */N#define EMH$C_MAXHDRTYP 6 /*Maximum allowable type */ #ifdef __NEW_STARLETtypedef struct _emhdef {N unsigned short int emh$w_rectyp; /*Record type (OBJ$C_MHD) */N unsigned short int emh$w_size; /*length of this EMH */N unsigned short int emh$w_hdrtyp; /*Tyu pe field for MHD */N/*Types of header records */N unsigned char emh$b_strlvl; /*Structure level */N unsigned char emh$b_temp; /*temp pad byte */N int emh$l_arch1; /*target architecture LW1 */N int emh$l_arch2; /*target architecture LW2 */N unsigned int emh$l_recsiz; /*Maximum record size v */N unsigned char emh$b_namlng; /*Module name length */N char emh$t_name [31]; /*Module name */ } EMHDEF;#else /* __OLD_STARLET */struct emhdef {N unsigned short int emh$w_rectyp; /*Record type (OBJ$C_MHD) */N unsigned short int emh$w_size; /*length of this EMH */N unsigned short int emh$w_hdrtyp; /*Type field for MHD */N/*Types of header records w */N unsigned char emh$b_strlvl; /*Structure level */N unsigned char emh$b_temp; /*temp pad byte */N int emh$l_arch1; /*target architecture LW1 */N int emh$l_arch2; /*target architecture LW2 */N unsigned int emh$l_recsiz; /*Maximum record size */N unsigned char emh$b_namlng; /*Module name lex ngth */N char emh$t_name [31]; /*Module name */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EMHDEF_LOADED */ ww"ܛ y /********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $ENVDEF ***/#ifndef __ENVDEF_LOADED#define __ENVDEF_LOADED 1 G#pragma __nostanda z rd /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* ENV - Define/reference an environment */N/* | */#define ENV$M_DEF 0x1#define ENV$M_NESTED 0x2 #ifdef __NEW_STARLETtypedef struct _envdef {N unsigned char env$b_gsdtyp; /*Type field */ __union {N unsigned short int env$w_flags; /*Environment flags */ __struct {N unsigned env$v_def : 1; /*Definition of environment */N unsigned env$v_nested : 1; /*Nested environment i } f set */( unsigned env$v_fill_20_ : 6; } env$r_flags_bits; } env$r_flags_overlay;N unsigned short int env$w_envindx; /*Index of parent environment */N unsigned char env$b_namlng; /*Length of environment name */N char env$t_name [31]; /*Environment name */ } ENVDEF; #if !defined(__VAXC)3#define env$w_flags env$r_flags_overlay.env$w_flags@#define env$v_def env$r_flags_overlay.env$r_ ~ flags_bits.env$v_defF#define env$v_nested env$r_flags_overlay.env$r_flags_bits.env$v_nested"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct envdef {N unsigned char env$b_gsdtyp; /*Type field */ __union {N unsigned short int env$w_flags; /*Environment flags */ __struct {N unsigned env$v_def : 1; /*Definition of environment */N unsigned env$v_nested : 1; /*Ne  sted environment if set */( unsigned env$v_fill_20_ : 6; } env$r_flags_bits; } env$r_flags_overlay;N unsigned short int env$w_envindx; /*Index of parent environment */N unsigned char env$b_namlng; /*Length of environment name */N char env$t_name [31]; /*Environment name */ } ; #if !defined(__VAXC)3#define env$w_flags env$r_flags_overlay.env$w_flags@#define env$v_def env$r_flags_ov erlay.env$r_flags_bits.env$v_defF#define env$v_nested env$r_flags_overlay.env$r_flags_bits.env$v_nested"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ENVDEF_LOADED */ ww ܛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $EOBJRECDEF ***/#ifndef __EOBJRECDEF_LOADED#define __ EOBJRECDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* These are the record types defined for VAX and EV AX object records. */N/* Some types are only recognized in one format of object file, but */N/* the types must be a single set of distinct codes. */N/* */N#define EOBJ$C_EMH 8 /*EVAX module header record */N#define EOBJ$C_EEOM 9 /*EVAX end of module record */R#define EOBJ$C_EGSD 10 /*EVAX global symbol definition record */N#define EOBJ$C_ETIR 11 /*EVAX text information record */N#define EOBJ$C_EDBG 12 /*EVAX Debugger information record */O#define EOBJ$C_ETBT 13 /*EVAX Traceback information record */N#define EOBJ$C_MAXRECTYP 13 /*Last assigned record type */#define EOBJ$K_SUBTYP 4#define EOBJ$C_SUBTYP 4N#define EOBJ$C_MAXRECSIZ 8192 /*Maximum legal record size */N#define EOBJ$C_STRLVL 2 /*Stru cture level */N#define EOBJ$C_STRLVL64 3 /*Structure level */N#define EOBJ$C_SYMSIZ 64 /*Maximum symbol length */T#define EOBJ$C_STOREPLIM -1 /*Maximum repeat count on store commands */N#define EOBJ$C_PSCALILIM 16 /*Maximum p-sect alignment */ #ifdef __NEW_STARLETtypedef struct _eobjrecdef {N/* */N/* These a re the record types defined for VAX object records. */N/* */N unsigned short int eobj$w_rectyp; /*First byte always record type */N unsigned short int eobj$w_size; /*Second is always record size */N/*Permissable record types */N unsigned short int eobj$w_subtyp; /*Record sub-type byte */N unsigned char eobj$b_mhd_strlv; /*Structure level */N unsigned char eobj$b_mhd_hold; /*alignment temp */ __union {N unsigned short int eobj$w_mhd_recsz; /*Maximum record size */ __struct {) char eobjrecdef$$_fill_1 [2];N/*Misc. constants */& } eobj$r_mhd_recsz_fields;# } eobj$r_mhd_recsz_overlay; } EOBJRECDEF; #if !defined(__VAXC)B#define eobj$w_m hd_recsz eobj$r_mhd_recsz_overlay.eobj$w_mhd_recsz"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct eobjrecdef {N/* */N/* These are the record types defined for VAX object records. */N/* */N unsigned short int eobj$w_rectyp; /*First byte always record type */N unsigned short int eobj$w_size; /*Second is always record size */N/*Permissable record types */N unsigned short int eobj$w_subtyp; /*Record sub-type byte */N unsigned char eobj$b_mhd_strlv; /*Structure level */N unsigned char eobj$b_mhd_hold; /*alignment temp */ __union {N unsigned short int eobj$w_mhd_recsz; /*Maximum record size */ __struct {) char eobjrecdef$ $_fill_1 [2];N/*Misc. constants */& } eobj$r_mhd_recsz_fields;# } eobj$r_mhd_recsz_overlay; } ; #if !defined(__VAXC)B#define eobj$w_mhd_recsz eobj$r_mhd_recsz_overlay.eobj$w_mhd_recsz"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_poi nter_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EOBJRECDEF_LOADED */ ww+ܛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//************************* *******************************************************************************************************//*** MODULE $EOMDEF ***/#ifndef __EOMDEF_LOADED#define __EOMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 vari ant_union#endif#endif N/* */N/* End of module record (EOM) */N/* */N#define EOM$C_SUCCESS 0 /*Successful (no errors) */N#define EOM$C_WARNING 1 /*Warnings issued */N#define EOM$C_ERROR 2 /*Errors detected  */N#define EOM$C_ABORT 3 /*Abort the link */N#define EOM$K_EOMMIN 2 /*Min length of EOM record */N#define EOM$C_EOMMIN 2 /*Min length of EOM record */U#define EOM$K_EOMMX1 7 /*Length of EOM record w/o transfer flags */U#define EOM$C_EOMMX1 7 /*Length of EOM record w/o transfer flags */N#define EOM$K_EOMMAX 8 /*Maximum length of EOM record */N#def ine EOM$C_EOMMAX 8 /*Maximum length of EOM record */#define EOM$M_WKTFR 0x1 #ifdef __NEW_STARLETtypedef struct _eomdef {N unsigned char eom$b_rectyp; /*Record type (OBJ$C_EOM) */N unsigned char eom$b_comcod; /*Compiler completion code */N/*Values */N unsigned char eom$b_psindx; /*P-sect of transfer address */N unsigned int eom$l_tfradr; /*Transfer address */ __union {N unsigned char eom$b_tfrflg; /*Transfer address flags */ __struct {N unsigned eom$v_wktfr : 1; /*Transfer address is weak */( unsigned eom$v_fill_12_ : 7; } eom$r_tfrflg_bits; } eom$r_tfrflg_overlay; } EOMDEF; #if !defined(__VAXC)6#define eom$b_tfrflg eom$r_tfrflg_overlay.eom$b_tfrflgF#define eom$v_wktfr eom$r_tfrflg_overlay.eom$r_tfrfl g_bits.eom$v_wktfr"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct eomdef {N unsigned char eom$b_rectyp; /*Record type (OBJ$C_EOM) */N unsigned char eom$b_comcod; /*Compiler completion code */N/*Values */N unsigned char eom$b_psindx; /*P-sect of transfer address */N unsigned int eom$l_tfradr; /*Transfer address  */ __union {N unsigned char eom$b_tfrflg; /*Transfer address flags */ __struct {N unsigned eom$v_wktfr : 1; /*Transfer address is weak */( unsigned eom$v_fill_12_ : 7; } eom$r_tfrflg_bits; } eom$r_tfrflg_overlay; } ; #if !defined(__VAXC)6#define eom$b_tfrflg eom$r_tfrflg_overlay.eom$b_tfrflgF#define eom$v_wktfr eom$r_tfrflg_overlay.eom$r_tfrflg_bits.eom$v_wktfr"#endif /* #if !defined(__VAXC ) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EOMDEF_LOADED */ wwK4ݛ/******************************************************************************************************* *************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $EOMWDEF ***/#ifndef __EOMWDEF_LOADED#define __EOMWDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __ nomember_alignmentR#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 !d efined(__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 N/* */N/* End of module record with word of psect (EOMW) */N/* */N#define EOMW$K_EOMMIN 2 /*Min length of EOM record */N#define EOMW$C_EOMMIN 2 /*Min length of EOM record */V#define EOMW$K_EOMMX1 8 /*Length of EOMW record w/o transfer flags */V#define EOMW$C_EOMMX1 8 /*Length of EOMW record w/o transfer flags */N#define EOMW$K_EOMMAX 9 /*Maximum length of EOMW record */N#define EOMW$C_EOMMAX 9 /*Maximum length of EOMW record */#define EOMW$M_WKTFR 0x1 #ifdef __NEW_STARL ETtypedef struct _eomwdef {N unsigned char eomw$b_rectyp; /*Record type (OBJ$C_EOM) */N unsigned char eomw$b_comcod; /*Compiler completion code */N unsigned short int eomw$w_psindx; /*P-sect of transfer address */N unsigned int eomw$l_tfradr; /*Transfer address */ __union {N unsigned char eomw$b_tfrflg; /*Transfer address flags */ __struct {N unsigned eomw$v_wktfr :  1; /*Transfer address is weak */) unsigned eomw$v_fill_13_ : 7;! } eomw$r_tfrflg_bits; } eomw$r_tfrflg_overlay; } EOMWDEF; #if !defined(__VAXC)9#define eomw$b_tfrflg eomw$r_tfrflg_overlay.eomw$b_tfrflgJ#define eomw$v_wktfr eomw$r_tfrflg_overlay.eomw$r_tfrflg_bits.eomw$v_wktfr"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct eomwdef {N unsigned char eomw$b_rectyp; /*Record type (OBJ$C_EOM) */N unsigned char eomw$b_comcod; /*Compiler completion code */N unsigned short int eomw$w_psindx; /*P-sect of transfer address */N unsigned int eomw$l_tfradr; /*Transfer address */ __union {N unsigned char eomw$b_tfrflg; /*Transfer address flags */ __struct {N unsigned eomw$v_wktfr : 1; /*Transfer address is weak */) unsigned eomw$v_fill_13_ : 7;! } eomw$r_tfr flg_bits; } eomw$r_tfrflg_overlay; } ; #if !defined(__VAXC)9#define eomw$b_tfrflg eomw$r_tfrflg_overlay.eomw$b_tfrflgJ#define eomw$v_wktfr eomw$r_tfrflg_overlay.eomw$r_tfrflg_bits.eomw$v_wktfr"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined requ ired ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EOMWDEF_LOADED */ wwkݛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//*************************************************************************************** *****************************************//*** MODULE $EPMDEF ***/#ifndef __EPMDEF_LOADED#define __EPMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 siz e 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 N/*  */N/* GSD entry - Entry point definition, normal symbols */N/* */#define EPM$K_NAME 12#define EPM$C_NAME 12 #ifdef __NEW_STARLETtypedef struct _epmdef { __union {N unsigned char epm$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {! char epmdef$$_fill_1;" } epm$r_gsdtyp_fields;  } epm$r_gsdtyp_overlay;N unsigned char epm$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int epm$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char epm$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int epm$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned short int epm$w_mask; /*Entry point mask */N unsigned char epm$b_namlng; /*Length of name  */N char epm$t_name [31]; /*Symbol name */ } EPMDEF; #if !defined(__VAXC)6#define epm$b_gsdtyp epm$r_gsdtyp_overlay.epm$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct epmdef { __union {N unsigned char epm$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {! char epmdef$$_fill_1;" } epm$r_gsdtyp_fields; } epm$r_gsdtyp_overlay;N  unsigned char epm$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int epm$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char epm$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int epm$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned short int epm$w_mask; /*Entry point mask */N unsigned char epm$b_namlng; /*Length of name */N char epm$t_nam e [31]; /*Symbol name */ } ; #if !defined(__VAXC)6#define epm$b_gsdtyp epm$r_gsdtyp_overlay.epm$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#p ragma __standard #endif /* __EPMDEF_LOADED */ wwݛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $EPMMDEF * **/#ifndef __EPMMDEF_LOADED#define __EPMMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* GSD entry - Entry point definition, version mask symbols */N/* */#define EPMM$K_NAME 16#define EPMM$C_NAME 16 #ifdef __NEW_STARLETtypedef struct _epmmdef { __union {N unsigned char epmm$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char epmmdef$$_fill_1;# } epmm$r_gsdtyp_fields; } epmm$r_gsdtyp_overlay;N unsigned char epmm$b_datyp;  /*Maps over GSY$B_DATYP */N unsigned short int epmm$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char epmm$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int epmm$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned int epmm$l_version_mask; /*Mask value for symbol */N unsigned short int epmm$w_mask; /*Entry point mask */N unsigned char epmm$b_namlng; /*Length of name */N char epmm$t_name [31]; /*Symbol name */ } EPMMDEF; #if !defined(__VAXC)9#define epmm$b_gsdtyp epmm$r_gsdtyp_overlay.epmm$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct epmmdef { __union {N unsigned char epmm$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char epmmdef$$_fill_1;# } epmm$r_gsdtyp_fields; }  epmm$r_gsdtyp_overlay;N unsigned char epmm$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int epmm$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char epmm$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int epmm$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned int epmm$l_version_mask; /*Mask value for symbol */N unsigned short int epmm$w_mask; /*Entry point mask  */N unsigned char epmm$b_namlng; /*Length of name */N char epmm$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define epmm$b_gsdtyp epmm$r_gsdtyp_overlay.epmm$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __re store /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EPMMDEF_LOADED */ wwޛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//***************************************** ***************************************************************************************//*** MODULE $EPMVDEF ***/#ifndef __EPMVDEF_LOADED#define __EPMVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined required ptr size */[#pragma __re quired_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#e ndif#endif N/* */N/* GSD entry - Entry point definition, vectored symbols */N/* */#define EPMV$K_NAME 16#define EPMV$C_NAME 16 #ifdef __NEW_STARLETtypedef struct _epmvdef { __union {N unsigned char epmv$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char epmvdef$$_f ill_1;# } epmv$r_gsdtyp_fields; } epmv$r_gsdtyp_overlay;N unsigned char epmv$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int epmv$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char epmv$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int epmv$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned int epmv$l_vector; /*Vectored entry point address */N unsigned sho rt int epmv$w_mask; /*Entry point mask */N unsigned char epmv$b_namlng; /*Length of name */N char epmv$t_name [31]; /*Symbol name */ } EPMVDEF; #if !defined(__VAXC)9#define epmv$b_gsdtyp epmv$r_gsdtyp_overlay.epmv$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct epmvdef { __union {N unsigned char epmv$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char epmvdef$$_fill_1;# } epmv$r_gsdtyp_fields; } epmv$r_gsdtyp_overlay;N unsigned char epmv$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int epmv$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char epmv$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int epmv$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned int epmv$l_vector;  /*Vectored entry point address */N unsigned short int epmv$w_mask; /*Entry point mask */N unsigned char epmv$b_namlng; /*Length of name */N char epmv$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define epmv$b_gsdtyp epmv$r_gsdtyp_overlay.epmv$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef _ _INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EPMVDEF_LOADED */ wwlޛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Sou rce: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $EPMWDEF ***/#ifndef __EPMWDEF_LOADED#define __EPMWDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supporte d */\#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 N/* */N/* GSD entry - Entry point definition with word of psect value */N/* */#define EPMW$K_NAME 13#define EPMW$C_NAME 13 #ifdef __NEW_STARLETtypedef struct _epmwdef { __union {N unsigned c har epmw$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char epmwdef$$_fill_1;# } epmw$r_gsdtyp_fields; } epmw$r_gsdtyp_overlay;N unsigned char epmw$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int epmw$w_flags; /*Maps over GSY$W_FLAGS */N unsigned short int epmw$w_psindx; /*Maps over SDFW$W_PSINDX */Y unsigned int epmw$l_addrs; /*Entry point address, maps over S DFW$L_VALUE */N unsigned short int epmw$w_mask; /*Entry point mask */N unsigned char epmw$b_namlng; /*Length of name */N char epmw$t_name [31]; /*Symbol name */ } EPMWDEF; #if !defined(__VAXC)9#define epmw$b_gsdtyp epmw$r_gsdtyp_overlay.epmw$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct epmwdef { __union {N unsigned char epmw$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char epmwdef$$_fill_1;# } epmw$r_gsdtyp_fields; } epmw$r_gsdtyp_overlay;N unsigned char epmw$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int epmw$w_flags; /*Maps over GSY$W_FLAGS */N unsigned short int epmw$w_psindx; /*Maps over SDFW$W_PSINDX */Y unsigned int epmw$l_addrs; /*Entry point address, maps over SDFW$L_VALUE */N unsigned short int epmw$w_mask; /*Entry point mask */N unsigned char epmw$b_namlng; /*Length of name */N char epmw$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define epmw$b_gsdtyp epmw$r_gsdtyp_overlay.epmw$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EPMWDEF_LOADED */ wwޛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARL ET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $ERADEF ***/#ifndef __ERADEF_LOADED#define __ERADEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __sa ve /* 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(__VAX C)#define __union union#else#define __union variant_union#endif#endif N/* */N/* */N/* Define erase type codes. The codes LODUMMY and HIDUMMY are */N/* used as placeholders, to make the definition of the upper and */N/* lower bound erase type symbols automatic. New erase type codes */N/* should be added at the end of the list, but before HIDUMMY. */N/* */N/* */N#define ERA$K_LODUMMY 0 /* */N#define ERA$K_MEMORY 1 /* Erase main memory */N#define ERA$K_DISK 2 /* Erase disk mass storage */N#define ERA$K_TAPE 3 /* E rase magnetic tape mass storage */N#define ERA$K_HIDUMMY 4 /* */N#define ERA$K_MINTYPE 1 /* Lower bound of erase type codes */N#define ERA$K_MAXTYPE 3 /* Upper bound of erase type codes */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#end if#ifdef __cplusplus }#endif#pragma __standard #endif /* __ERADEF_LOADED */ ww0ߛ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//*************************************************************************************************************** *****************//*** MODULE $ESDFDEF ***/#ifndef __ESDFDEF_LOADED#define __ESDFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 po inters */#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 N/*  */N/* EVAX Symbol definition */N/* */#define ESDF$K_NAME 33#define ESDF$C_NAME 33 #ifdef __NEW_STARLETtypedef struct _esdfdef { __union {N unsigned short int esdf$w_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {' short int esdfdef$$_fill_1;# } esdf$r_gsdtyp_fields; } esdf$r_g sdtyp_overlay;N unsigned short int esdf$w_size; /*size of this ESDF */N unsigned char esdf$b_datyp; /*Maps over GSY$B_DATYP */N unsigned char esdf$b_temp; /*pad for alignment */N unsigned short int esdf$w_flags; /*Maps over GSY$W_FLAGS */ __union {& unsigned __int64 esdf$q_value;" unsigned int esdf$l_value; } esdf$r_val_overlay; __union {- unsigned __int64 esdf$ q_code_address;) unsigned int esdf$l_code_address; } esdf$r_ca_overlay;Y unsigned int esdf$l_ca_psindx; /*Psect index of the code address (which is in */N/*LP_1 if the norm bit is set). */N unsigned int esdf$l_psindx; /*Owning psect number */N unsigned char esdf$b_namlng; /*Length of name */N char esdf$t_name [31]; /*Symbol name */  } ESDFDEF; #if !defined(__VAXC)9#define esdf$w_gsdtyp esdf$r_gsdtyp_overlay.esdf$w_gsdtyp4#define esdf$q_value esdf$r_val_overlay.esdf$q_value4#define esdf$l_value esdf$r_val_overlay.esdf$l_valueA#define esdf$q_code_address esdf$r_ca_overlay.esdf$q_code_addressA#define esdf$l_code_address esdf$r_ca_overlay.esdf$l_code_address"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct esdfdef { __union {N unsigned short int esdf$w_gsdtyp; /*Maps over GS Y$B_GSDTYP */ __struct {' short int esdfdef$$_fill_1;# } esdf$r_gsdtyp_fields; } esdf$r_gsdtyp_overlay;N unsigned short int esdf$w_size; /*size of this ESDF */N unsigned char esdf$b_datyp; /*Maps over GSY$B_DATYP */N unsigned char esdf$b_temp; /*pad for alignment */N unsigned short int esdf$w_flags; /*Maps over GSY$W_FLAGS */ __union {& un signed int esdf$q_value [2];" unsigned int esdf$l_value; } esdf$r_val_overlay; __union {- unsigned int esdf$q_code_address [2];) unsigned int esdf$l_code_address; } esdf$r_ca_overlay;Y unsigned int esdf$l_ca_psindx; /*Psect index of the code address (which is in */N/*LP_1 if the norm bit is set). */N unsigned int esdf$l_psindx; /*Owning psect number */N unsigned char esdf$b_namlng; /*Length of name */N char esdf$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define esdf$w_gsdtyp esdf$r_gsdtyp_overlay.esdf$w_gsdtyp4#define esdf$q_value esdf$r_val_overlay.esdf$q_value4#define esdf$l_value esdf$r_val_overlay.esdf$l_valueA#define esdf$q_code_address esdf$r_ca_overlay.esdf$q_code_addressA#define esdf$l_code_address esdf$r_ca_overlay.esdf$l_code_address"#endif /* #if !defined( __VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ESDFDEF_LOADED */ ww;~ߛ/*********************************************************************************************** *********************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $ESDFMDEF ***/#ifndef __ESDFMDEF_LOADED#define __ESDFMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save #pragma __nomember_alignmentR#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 __st ruct#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 N/* */N/* EVAX Symbol definition for version mask symbols */N/* */#define ESDFM$K_NAME 25 #define ESDFM$C_NAME 25 #ifdef __NEW_STARLETtypedef struct _esdfmdef { __union {N unsigned short int esdfm$w_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {# char esdfmdef$$_fill_1;$ } esdfm$r_gsdtyp_fields;! } esdfm$r_gsdtyp_overlay;N unsigned short int esdfm$w_size; /*size of this ESDFM */N unsigned char esdfm$b_datyp; /*Maps over GSY$B_DATYP */N unsigned char esdfm$b_temp; /*pad for alignment */N unsigned short int esdfm$w_flags; /*Maps over GSY$W_FLAGS */ __union {' unsigned __int64 esdfm$q_value;# unsigned int esdfm$l_value; } esdfm$r_val_overlay;N unsigned int esdfm$l_psindx; /*Owning psect number */N unsigned int esdfm$l_version_mask; /*Mask for symbol */N unsigned char esdfm$b_namlng; /*Length of name */N char esdfm $t_name [31]; /*Symbol name */ } ESDFMDEF; #if !defined(__VAXC)<#define esdfm$w_gsdtyp esdfm$r_gsdtyp_overlay.esdfm$w_gsdtyp7#define esdfm$q_value esdfm$r_val_overlay.esdfm$q_value7#define esdfm$l_value esdfm$r_val_overlay.esdfm$l_value"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct esdfmdef { __union {N unsigned short int esdfm$w_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {# char esdfmdef$$_fill_1;$ } esdfm$r_gsdtyp_fields;! } esdfm$r_gsdtyp_overlay;N unsigned short int esdfm$w_size; /*size of this ESDFM */N unsigned char esdfm$b_datyp; /*Maps over GSY$B_DATYP */N unsigned char esdfm$b_temp; /*pad for alignment */N unsigned short int esdfm$w_flags; /*Maps over GSY$W_FLAGS */ __union {' unsigned int esdfm$q_value [2];# unsigned int esd fm$l_value; } esdfm$r_val_overlay;N unsigned int esdfm$l_psindx; /*Owning psect number */N unsigned int esdfm$l_version_mask; /*Mask for symbol */N unsigned char esdfm$b_namlng; /*Length of name */N char esdfm$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)<#define esdfm$w_gsdtyp esdfm$r_gsdtyp_overlay.esdfm$w_gsdtyp7#define esdfm$q_value esdfm$r_val_overlay. esdfm$q_value7#define esdfm$l_value esdfm$r_val_overlay.esdfm$l_value"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ESDFMDEF_LOADED */ ww[ߛ /********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $ESDFVDEF ***/#ifndef __ESDFVDEF_LOADED#define __ESDFVDEF_LOADED 1 G#pragma __ nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_param s ...#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 N/* */N/* EVAX Symbol definition for vectored symbols */N/*  */#define ESDFV$K_NAME 25#define ESDFV$C_NAME 25 #ifdef __NEW_STARLETtypedef struct _esdfvdef { __union {N unsigned short int esdfv$w_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {# char esdfvdef$$_fill_1;$ } esdfv$r_gsdtyp_fields;! } esdfv$r_gsdtyp_overlay;N unsigned short int esdfv$w_size; /*size of this SDFV */N unsigned char esdfv$b_datyp; /*Maps over GSY$B_DATYP */N unsigned char esdfv$b_temp; /*pad for alignment */N unsigned short int esdfv$w_flags; /*Maps over GSY$W_FLAGS */ __union {' unsigned __int64 esdfv$q_value;# unsigned int esdfv$l_value; } esdfv$r_val_overlay;N unsigned int esdfv$l_psindx; /*Owning psect number */N unsigned int esdfv$l_vector; /*Vectored value of symbol  */N unsigned char esdfv$b_namlng; /*Length of name */N char esdfv$t_name [31]; /*Symbol name */ } ESDFVDEF; #if !defined(__VAXC)<#define esdfv$w_gsdtyp esdfv$r_gsdtyp_overlay.esdfv$w_gsdtyp7#define esdfv$q_value esdfv$r_val_overlay.esdfv$q_value7#define esdfv$l_value esdfv$r_val_overlay.esdfv$l_value"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct esdfvdef { __union {N unsi gned short int esdfv$w_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {# char esdfvdef$$_fill_1;$ } esdfv$r_gsdtyp_fields;! } esdfv$r_gsdtyp_overlay;N unsigned short int esdfv$w_size; /*size of this SDFV */N unsigned char esdfv$b_datyp; /*Maps over GSY$B_DATYP */N unsigned char esdfv$b_temp; /*pad for alignment */N unsigned short int esdfv$w_flags; /*Maps over GSY$W_FLAGS */ __union {' unsigned int esdfv$q_value [2];# unsigned int esdfv$l_value; } esdfv$r_val_overlay;N unsigned int esdfv$l_psindx; /*Owning psect number */N unsigned int esdfv$l_vector; /*Vectored value of symbol */N unsigned char esdfv$b_namlng; /*Length of name */N char esdfv$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)<#defin e esdfv$w_gsdtyp esdfv$r_gsdtyp_overlay.esdfv$w_gsdtyp7#define esdfv$q_value esdfv$r_val_overlay.esdfv$q_value7#define esdfv$l_value esdfv$r_val_overlay.esdfv$l_value"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ESDFVDEF_LOADED */ ww{/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************/ /*** MODULE ESFDEF ***/#ifndef __ESFDEF_LOADED#define __ESFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* Enumerate Item Codes for the various types of Environmental Sensor FRUs. */N/* */#define ESF$K_TEMP 4096#define ESF$K_POWER 4097#define ESF$K_FAN 4098N/* */N/* The sys$get_env_sensors system service will populate the user's buffer */N/* with an array of the following structure. The dimension of the array is */N/* determined by the n umber of sensors corresponding to the item code by a */N/* run-time call to sys$get_env_sensors() with a buffer address of zero or */O/* buffer size of zero. sys$get_env_sensors() will pass the dimensions back */N/* to the caller so he can allocate buffers to contain the arrays for */N/* subsequent calls to sys$get_env_sensors() with valid buffer pointers and */N/* sizes. */N/* See [SYS]SYS_GET_ENV_SENSORS.C  */N/* */#define ESF$M_VALID_STATUS 0x1#define ESF$M_VALID_VALUE 0x2 #define ESF$M_FEAT_RESERVED 0xFC #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _esfitem {#pragma __nomember_alignmentN unsigned char es f$b_type; /* CFG_NODE config type field */N unsigned char esf$b_subtype; /* CFG_NODE config subtype field */N unsigned char esf$b_value; /* Value byte */N unsigned char esf$b_status; /* Status byte */ __union {N unsigned char esf$b_features; /* Features of the Sensor FRU */ __struct {, unsigned esf$v_valid_status : 1;+ unsigned esf$v_valid_value : 1 ;- unsigned esf$v_feat_reserved : 6;" } esf$r_features_bits;! } esf$r_features_overlay;N/* */N/* Pad out to next quad word */N/* */' unsigned char esf$b_reserved_1 [3];N/* */N/* fru_node_id conta ins FRU Descriptor Node ID information to help */N/* identify the location of the associated sensor. See "Alpha Systems */N/* Configuration Tree Implementation Specification" Table 1-79 on Page 50. */N/* The byte fields in this 8-byte structure are declared in CFGDEF.H as */N/* struct cfg$_cfg_node_id_fru_desc in the CFG_NODE structure. */N/* */' unsigned __int64 esf$q_fru_node_id;N/*  */N/* fru_flags contains the Node Flags for the FRU. See "Alpha Configuration */N/* Tree Specification" Release T6.0-0023 page 7-45. */N/* See also cfg$iq_node_flags in CFGDEF.H. */N/* */% unsigned __int64 esf$q_fru_flags;N/* */N/* console_id is a quadword that contains the offset and bitfield elements */N/* to be used to access the low-level hardware status or value information */N/* */ __union {N unsigned __int64 esf$q_console_id; /* Whole Console ID */ __struct {N unsigned int esf$l_offset; /* Offset part of Console ID */N unsigned int esf$l_bitfield; /* Bitfield part of Console ID */ } esf$r_cid_fields; } esf$r_cid_overlay; } ESFITEM; #if !defined(__VAXC)<#define esf$b_features esf$r_features_overlay.esf$b_featuresX#define esf$v_valid_status esf$r_features_overlay.esf$r_features_bits.esf$v_valid_statusV#define esf$v_valid_value esf$r_features_overlay.esf$r_features_bits.esf$v_valid_valueZ#define esf$v_feat_reserved esf$r_features_overlay.esf$r_features_bits.esf$v_feat_reserved;#define esf$q_console_id esf$r_cid_overlay.esf $q_console_idD#define esf$l_offset esf$r_cid_overlay.esf$r_cid_fields.esf$l_offsetH#define esf$l_bitfield esf$r_cid_overlay.esf$r_cid_fields.esf$l_bitfield"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _esfitem {#pragma __nomember_alignmentN unsigned char esf$b_ty pe; /* CFG_NODE config type field */N unsigned char esf$b_subtype; /* CFG_NODE config subtype field */N unsigned char esf$b_value; /* Value byte */N unsigned char esf$b_status; /* Status byte */ __union {N unsigned char esf$b_features; /* Features of the Sensor FRU */ __struct {, unsigned esf$v_valid_status : 1;+ unsigned esf$v_valid_value : 1;- unsigned esf$v_feat_reserved : 6;" } esf$r_features_bits;! } esf$r_features_overlay;N/* */N/* Pad out to next quad word */N/* */' unsigned char esf$b_reserved_1 [3];N/* */N/* fru_node_id contains FR U Descriptor Node ID information to help */N/* identify the location of the associated sensor. See "Alpha Systems */N/* Configuration Tree Implementation Specification" Table 1-79 on Page 50. */N/* The byte fields in this 8-byte structure are declared in CFGDEF.H as */N/* struct cfg$_cfg_node_id_fru_desc in the CFG_NODE structure. */N/* */' unsigned int esf$q_fru_node_id [2];N/*  */N/* fru_flags contains the Node Flags for the FRU. See "Alpha Configuration */N/* Tree Specification" Release T6.0-0023 page 7-45. */N/* See also cfg$iq_node_flags in CFGDEF.H. */N/* */% unsigned int esf$q_fru_flags [2];N/* */N/* console_id is a quadword that contains the offset and bitfield elements */N/* to be used to access the low-level hardware status or value information */N/* */ __union {N unsigned int esf$q_console_id [2]; /* Whole Console ID */ __struct {N unsigned int esf$l_offset; /* Offset part of Console ID */N unsigned int esf$l_bitfield; /* Bitfield part of Con sole ID */ } esf$r_cid_fields; } esf$r_cid_overlay; } esfitem; #if !defined(__VAXC)<#define esf$b_features esf$r_features_overlay.esf$b_featuresX#define esf$v_valid_status esf$r_features_overlay.esf$r_features_bits.esf$v_valid_statusV#define esf$v_valid_value esf$r_features_overlay.esf$r_features_bits.esf$v_valid_valueZ#define esf$v_feat_reserved esf$r_features_overlay.esf$r_features_bits.esf$v_feat_reserved;#define esf$q_console_id esf$r_cid_overlay.esf$q_con sole_idD#define esf$l_offset esf$r_cid_overlay.esf$r_cid_fields.esf$l_offsetH#define esf$l_bitfield esf$r_cid_overlay.esf$r_cid_fields.esf$l_bitfield"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ .#define ESF$K_ESFITEM_SIZE (sizeof( ESFITEM )) $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr siz e */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ESFDEF_LOADED */ wwh/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//***************************************************************************************************** ***************************//*** MODULE $ESGPSDEF ***/#ifndef __ESGPSDEF_LOADED#define __ESGPSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 defaul t 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 N/*  */N/* EVAX GSD entry - P-section definition in shareable image */N/* */#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 ES GPS$M_COM 0x800"#define ESGPS$M_ALLOC_64BIT 0x1000#define ESGPS$K_NAME 25#define ESGPS$C_NAME 25 #ifdef __NEW_STARLETtypedef struct _esgpsdef { __union {N unsigned short int esgps$w_gsdtyp; /*Typ field */ __struct {# char esgpsdef$$_fill_1;$ } esgps$r_gsdtyp_fields;! } esgps$r_gsdtyp_overlay;N unsigned short int esgps$w_size; /*size of this ESGPS */N unsigned char esgps$b_align; /*P-sect alignment */N unsigned char esgps$b_temp; /*pad for allignment */ __union {N unsigned short int esgps$w_flags; /*P-sect flags */ __struct {N unsigned esgps$v_pic : 1; /*Position independent */N unsigned esgps$v_lib : 1; /*From a shareable image */N unsigned esgps$v_ovr : 1; /*Overlaid memory allocation */N unsigned esg ps$v_rel : 1; /*Relocatable */N unsigned esgps$v_gbl : 1; /*Global scope */N unsigned esgps$v_shr : 1; /*Shareable */N unsigned esgps$v_exe : 1; /*Executable */N unsigned esgps$v_rd : 1; /*Readable */N unsigned esgps$v_wrt : 1; /*Writeable */N unsigned esgps$v_vec : 1; /*Vector p sect */N unsigned esgps$v_nomod : 1; /*Not stored into */N unsigned esgps$v_com : 1; /*Associated with COMM sym */N 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;O 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 __int64 esgps$q_value;# unsigned int esgps$l_value; } esgps$r_value_overlay;N unsigned char esgps$b_namlng; /*Length of p-sect name */N char esgps$t_name [31]; /*Name field */ } ESGPSDEF; #if !defined(__VAXC)<#define esgps$w_gsdtyp esgps$r_gsdtyp_overlay.esgps$w_gsdtyp9#define esgps$w_flags esgps$r_flags_overlay.esgps$w_flag sH#define esgps$v_pic esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_picH#define esgps$v_lib esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_libH#define esgps$v_ovr esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_ovrH#define esgps$v_rel esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_relH#define esgps$v_gbl esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_gblH#define esgps$v_shr esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_shrH#define esgps$v_exe esgps$r_flags_overlay.esgps$r_flags_bi ts.esgps$v_exeF#define esgps$v_rd esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_rdH#define esgps$v_wrt esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_wrtH#define esgps$v_vec esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_vecL#define esgps$v_nomod esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_nomodH#define esgps$v_com esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_comX#define esgps$v_alloc_64bit esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_alloc_64bit9#define esgps$q_value esgps$ r_value_overlay.esgps$q_value9#define esgps$l_value esgps$r_value_overlay.esgps$l_value"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct esgpsdef { __union {N unsigned short int esgps$w_gsdtyp; /*Typ field */ __struct {# char esgpsdef$$_fill_1;$ } esgps$r_gsdtyp_fields;! } esgps$r_gsdtyp_overlay;N unsigned short int esgps$w_size; /*size of this ESGPS */N unsigned  char esgps$b_align; /*P-sect alignment */N unsigned char esgps$b_temp; /*pad for allignment */ __union {N unsigned short int esgps$w_flags; /*P-sect flags */ __struct {N unsigned esgps$v_pic : 1; /*Position independent */N unsigned esgps$v_lib : 1; /*From a shareable image */N unsigned esgps$v_ovr : 1; /*Overlaid memory allocation */N unsigned esgps$v_rel : 1; /*Relocatable */N unsigned esgps$v_gbl : 1; /*Global scope */N unsigned esgps$v_shr : 1; /*Shareable */N unsigned esgps$v_exe : 1; /*Executable */N unsigned esgps$v_rd : 1; /*Readable */N unsigned esgps$v_wrt : 1; /*Writeable */N unsigned esgps  $v_vec : 1; /*Vector psect */N unsigned esgps$v_nomod : 1; /*Not stored into */N unsigned esgps$v_com : 1; /*Associated with COMM sym */N 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;O 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;N unsigned char esgps$b_namlng; /*Length of p-sect name */N char esgps$t_name [31]; /*Name field */ } ; #if !defined(__VAXC)<#define esgps$w_gsdtyp esgps$r_gsdtyp_overlay.esgps$w_gsdtyp9#define esgps$w_flags esgps$r_flags_over lay.esgps$w_flagsH#define esgps$v_pic esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_picH#define esgps$v_lib esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_libH#define esgps$v_ovr esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_ovrH#define esgps$v_rel esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_relH#define esgps$v_gbl esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_gblH#define esgps$v_shr esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_shrH#define esgps$v_exe esgps$r_flags_overlay. esgps$r_flags_bits.esgps$v_exeF#define esgps$v_rd esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_rdH#define esgps$v_wrt esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_wrtH#define esgps$v_vec esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_vecL#define esgps$v_nomod esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_nomodH#define esgps$v_com esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_comX#define esgps$v_alloc_64bit esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_alloc_64bit9#define esgp  s$q_value esgps$r_value_overlay.esgps$q_value9#define esgps$l_value esgps$r_value_overlay.esgps$l_value"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* EVAX GSD entry - 64-Bit P-section definition in shareable image */N/* */#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 #ifdef __NEW_STARLETtypedef struct _esgps64def { __union {N unsigned short int esgps64$w_gsdtyp; /*Typ field */ __struct {% char esgps64def$$_fill_1;& } esgps64$r_gsdtyp_fields;# } esgps64$r_gsdtyp_overlay;N unsigned short int esgps64$w_size; /*size of this ESGPS */N unsigned char esgps64$b_align; /*P-sect alignment */N unsigned char esgps64$b_temp; /*pad for allignment */ __union {N unsigned short int esgps64$w_flags; /*P-sect flags */ __struct {N unsigned esgps64$v_pic : 1; /*Position independent */N unsigned esgps64$v_lib : 1; /*From a shareable image */N unsigned esgps64$v_ovr : 1; /*Overlaid memory allocation */N unsigned esgps64$v_rel : 1; /*Relocatable */N unsigned esgps64$v_gbl : 1; /*Global scope */N unsigned esgps64$v_shr : 1; /*Shareable */N unsigned esgps 64$v_exe : 1; /*Executable */N unsigned esgps64$v_rd : 1; /*Readable */N unsigned esgps64$v_wrt : 1; /*Writeable */N unsigned esgps64$v_vec : 1; /*Vector psect */N unsigned esgps64$v_nomod : 1; /*Not stored into */N unsigned esgps64$v_com : 1; /*Associated with COMM sym */N unsigned esgps64$v_alloc_64bit : 1; /*Lo ad in 64-bit space */, unsigned esgps64$v_fill_26_ : 3;# } esgps64$r_flags_bits;" } esgps64$r_flags_overlay; __union {Q unsigned __int64 esgps64$q_alloc; /*Length of this psect in shr image */N unsigned int esgps64$l_alloc; /* Low Longword */" } esgps64$r_alloc_overlay; __union {] unsigned __int64 esgps64$q_base; /*Offset into img of psect, copy of symbol vector */N unsigned int esgps64$l _base; /* Low Longword */! } esgps64$r_base_overlay; __union {) unsigned __int64 esgps64$q_value;% unsigned int esgps64$l_value;" } esgps64$r_value_overlay;N unsigned char esgps64$b_namlng; /*Length of p-sect name */N char esgps64$t_name [31]; /*Name field */ } ESGPS64DEF; #if !defined(__VAXC)B#define esgps64$w_gsdtyp esgps64$r_gsdtyp_overlay.esgps64$w_gsdtyp?#define es gps64$w_flags esgps64$r_flags_overlay.esgps64$w_flagsP#define esgps64$v_pic esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_picP#define esgps64$v_lib esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_libP#define esgps64$v_ovr esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_ovrP#define esgps64$v_rel esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_relP#define esgps64$v_gbl esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_gblP#define esgps64$v_shr esgps64$r_flags_ov erlay.esgps64$r_flags_bits.esgps64$v_shrP#define esgps64$v_exe esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_exeN#define esgps64$v_rd esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_rdP#define esgps64$v_wrt esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_wrtP#define esgps64$v_vec esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_vecT#define esgps64$v_nomod esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_nomodP#define esgps64$v_com esgps64$r_flags_overlay.esgps6 4$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) */ #else /* __OLD_STARLET */struct esgps64def { __union {N unsigned short int esgps64$w_gsdtyp; /*Typ field */ __struct {% char esgps64def$$_fill_1;& } esgps64$r_gsdtyp_fields;# } esgps64$r_gsdtyp_overlay;N unsigned short int esgps64$w_size; /*size of this ESGPS */N unsigned char esgps64$b_align; /*P-sect alignment */N un signed char esgps64$b_temp; /*pad for allignment */ __union {N unsigned short int esgps64$w_flags; /*P-sect flags */ __struct {N unsigned esgps64$v_pic : 1; /*Position independent */N unsigned esgps64$v_lib : 1; /*From a shareable image */N unsigned esgps64$v_ovr : 1; /*Overlaid memory allocation */N unsigned esgps64$v_rel : 1; /*Relocatable  */N unsigned esgps64$v_gbl : 1; /*Global scope */N unsigned esgps64$v_shr : 1; /*Shareable */N unsigned esgps64$v_exe : 1; /*Executable */N unsigned esgps64$v_rd : 1; /*Readable */N unsigned esgps64$v_wrt : 1; /*Writeable */N unsigned esgps64$v_vec : 1; /*Vector psect */N unsigned  esgps64$v_nomod : 1; /*Not stored into */N unsigned esgps64$v_com : 1; /*Associated with COMM sym */N 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 {Q unsigned int esgps64$q_alloc [2]; /*Length of this psect in shr image */N 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 */N 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;N unsigned char esgps64$b_namlng; /*Length of p-sect name */N char esg  ps64$t_name [31]; /*Name field */ } ; #if !defined(__VAXC)B#define esgps64$w_gsdtyp esgps64$r_gsdtyp_overlay.esgps64$w_gsdtyp?#define esgps64$w_flags esgps64$r_flags_overlay.esgps64$w_flagsP#define esgps64$v_pic esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_picP#define esgps64$v_lib esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_libP#define esgps64$v_ovr esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_ovrP#define esgps64$v_rel  esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_relP#define esgps64$v_gbl esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_gblP#define esgps64$v_shr esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_shrP#define esgps64$v_exe esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_exeN#define esgps64$v_rd esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_rdP#define esgps64$v_wrt esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_wrtP#define esgps64$v_vec esgps64$r_flags_ overlay.esgps64$r_flags_bits.esgps64$v_vecT#define esgps64$v_nomod esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_nomodP#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<#d  efine 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) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif  #ifdef __cplusplus }#endif#pragma __standard #endif /* __ESGPSDEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//*****************************************************************************************************************  ***************//*** MODULE $ESRFDEF ***/#ifndef __ESRFDEF_LOADED#define __ESRFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 poin ters */#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 N/*  */N/* EVAX Symbol reference (SYM$M_DEF in EGSY$W_FLAGS is 0) */N/* */#define ESRF$K_NAME 9#define ESRF$C_NAME 9 #ifdef __NEW_STARLETtypedef struct _esrfdef { __union {N unsigned short int esrf$w_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {' short int esrfdef$$_fill_1;# } esrf$r_gsdtyp_fields; } esrf$r_gsd typ_overlay;N unsigned short int esrf$w_size; /*size of this ESRF */N unsigned char esrf$b_datyp; /*Maps over GSY$B_DATYP */N unsigned char esrf$b_temp; /*pad for alignment */N unsigned short int esrf$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char esrf$b_namlng; /*Length of symbol name */N char esrf$t_name [31]; /*Symbol name */ } ESRFDE F; #if !defined(__VAXC)9#define esrf$w_gsdtyp esrf$r_gsdtyp_overlay.esrf$w_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct esrfdef { __union {N unsigned short int esrf$w_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {' short int esrfdef$$_fill_1;# } esrf$r_gsdtyp_fields; } esrf$r_gsdtyp_overlay;N unsigned short int esrf$w_size; /*size of this ESRF */N unsigned c har esrf$b_datyp; /*Maps over GSY$B_DATYP */N unsigned char esrf$b_temp; /*pad for alignment */N unsigned short int esrf$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char esrf$b_namlng; /*Length of symbol name */N char esrf$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define esrf$w_gsdtyp esrf$r_gsdtyp_overlay.esrf$w_gsdtyp"#endif /* #if !defined(! __VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ESRFDEF_LOADED */ wwᛴ/*********************************************************************************************** " *********************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $ETIRDEF ***/#ifndef __ETIRDEF_LOADED#define __ETIRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#p# ragma __nomember_alignmentR#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 N/* */N/* EVAX Text, information and relocation record (ETIR) */N/* */N#define ETIR$C_MINSTACOD 0 % /*Minimum store code */N#define ETIR$C_STA_GBL 0 /*Stack global symbol value */N#define ETIR$C_STA_LW 1 /*Stack longword */N#define ETIR$C_STA_QW 2 /*Stack quadword */S#define ETIR$C_STA_PQ 3 /*Stack psect base plus quadword offset */N#define ETIR$C_STA_LI 4 /*Stack literal */N#define ETIR$C_STA_MOD 5 /*Stack mo& dule */N#define ETIR$C_STA_CKARG 6 /*Check Arguments */N#define ETIR$C_MAXSTACOD 6 /*Maximum stack code */N#define ETIR$C_MINSTOCOD 50 /*Minimum store code */N#define ETIR$C_STO_B 50 /*Store byte */N#define ETIR$C_STO_W 51 /*Store word */N#define ETIR$C_STO_LW 52 /*Store longword ' */N#define ETIR$C_STO_QW 53 /*Store quadword */N#define ETIR$C_STO_IMMR 54 /*Store immediate Repeated */N#define ETIR$C_STO_GBL 55 /*Store global */N#define ETIR$C_STO_CA 56 /*Store code address */N#define ETIR$C_STO_RB 57 /*Store relative branch */N#define ETIR$C_STO_AB 58 /*Store absolute branch */N#define ETIR$C_STO_OFF( 59 /*Store offset within psect */N#define ETIR$C_STO_IMM 61 /*Store immediate */N#define ETIR$C_STO_GBL_LW 62 /*Store global Longword */N/*STO_LP_PSB not valid in level 2 use STC_LP_PSB */W#define ETIR$C_STO_BR_GBL 64 /*Store 21 bit displayment to global address */W#define ETIR$C_STO_BR_PS 65 /*Store 21 bit displayment to psect + offset */N#define ETIR$C_MAXSTOCOD 65 ) /*Maximum store code */N#define ETIR$C_MINOPRCOD 100 /*Minimum operate code */N#define ETIR$C_OPR_NOP 100 /*No-op */N#define ETIR$C_OPR_ADD 101 /*Add */N#define ETIR$C_OPR_SUB 102 /*Subtract */N#define ETIR$C_OPR_MUL 103 /*Multiply */N#define ETIR$C_OPR_DIV 104 /*Divide * */N#define ETIR$C_OPR_AND 105 /*Logical AND */N#define ETIR$C_OPR_IOR 106 /*Logical inclusive OR */N#define ETIR$C_OPR_EOR 107 /*Logical exclusive OR */N#define ETIR$C_OPR_NEG 108 /*Negate */N#define ETIR$C_OPR_COM 109 /*Complement */N#define ETIR$C_OPR_INSV 110 /*Insert bit field */N+ #define ETIR$C_OPR_ASH 111 /*Arithmetic shift */N#define ETIR$C_OPR_USH 112 /*Unsigned shift */N#define ETIR$C_OPR_ROT 113 /*Rotate */[#define ETIR$C_OPR_SEL 114 /*Select one of three longwords on top of stack */O#define ETIR$C_OPR_REDEF 115 /*Redefine this symbol after pass 2 */N#define ETIR$C_OPR_DFLIT 116 /*Define a literal */N#define ET, IR$C_MAXOPRCOD 116 /*Maximum operate code */N#define ETIR$C_MINCTLCOD 150 /*Minimum control code */N#define ETIR$C_CTL_SETRB 150 /*Set relocation base */N#define ETIR$C_CTL_AUGRB 151 /*Augment relocation base */N#define ETIR$C_CTL_DFLOC 152 /*Define debug location */N#define ETIR$C_CTL_STLOC 153 /*Set debug location */N#define ETIR$C_CTL_STKDL 154 - /*Stack debug location */N#define ETIR$C_MAXCTLCOD 154 /*Maximum control code */N#define ETIR$C_MINSTCCOD 200 /*Minimum store-conditional code */N#define ETIR$C_STC_LP 200 /*Store-conditional Linkage Pair */d#define ETIR$C_STC_LP_PSB 201 /*Store-conditional Linkage Pair with Procedure Signature */X#define ETIR$C_STC_GBL 202 /*Store-conditional Address at global address */]#define ETIR$C_STC_GCA 203 . /*Store-conditional Code Address at global address */X#define ETIR$C_STC_PS 204 /*Store-conditional Address at psect + offset */W#define ETIR$C_STC_NOP_GBL 205 /*Store-conditional NOP at address of global */S#define ETIR$C_STC_NOP_PS 206 /*Store-conditional NOP at pect + offset */T#define ETIR$C_STC_BSR_GBL 207 /*Store-conditional BSR at global address */S#define ETIR$C_STC_BSR_PS 208 /*Store-conditional BSR at pect + offset */T#d/ efine ETIR$C_STC_LDA_GBL 209 /*Store-conditional LDA at global address */T#define ETIR$C_STC_LDA_PS 210 /*Store-conditional LDA at psect + offset */\#define ETIR$C_STC_BOH_GBL 211 /*Store-conditional BSR or Hint at global address */[#define ETIR$C_STC_BOH_PS 212 /*Store-conditional BSR or Hint at pect + offset */`#define ETIR$C_STC_NBH_GBL 213 /*Store-conditional NOP,BSR or HINT at global address */`#define ETIR$C_STC_NBH_PS 214 /*Store-co 0 nditional NOP,BSR or HINT at psect + offset */N#define ETIR$C_MAXSTCCOD 214 /*Maximum store-conditional code */o/********************************************************************************************************* */ #ifdef __NEW_STARLETtypedef struct _etirdef {N unsigned short int etir$w_rectyp; /* Record type (OBJ$C_ETIR) */N unsigned short int etir$w_size; /* Record size */N/* Define relocation commands 1 */&/* ETIR descriptions */N/* */B/* */</* MNEUMONIC DESCRIPTION FORMAT STACK EFFECT */</* --------- ----------- ------ ------------ */5/* 0 2 4 6 8 12 16 20 24 */4/* | | | | | | | | | */4/* v v v v v v v v v */2 /* */P/* STA_GBL pushes symbol value on stack |type|size|counted string... +1 */N/* */I/* STA_LW pushes longword value on stack |type|size|longword | +1 */N/* */Q/* STA_QW pushes quadword value on stack |type|size| quadword | +1 */N/* */V3 /* STA_PQ pushes image offset associated |type|size| psect | quadword | +1 */,/* with psect index + quadword */B/* offset on stack */O/* STA_LI pushes literal value on stack |type|size|counted string... +1 */N/* */P/* STA_MOD pushes image offset associated |type|size|counted string... +1 */B/* with module on stack 4 */N/* */T/* STA_CKARG compares poped stack element to |type|size|counted string... 0 */B/* symbol value and pushes result */B/* on stack */B/* */?/* STO_B pops stack and stores low byte |type|size| -1 */B/* at location pointer 5 */N/* */?/* STO_W pops stack and stores low word |type|size| -1 */F/* at location pointer */N/* */@/* STO_LW pops stack and stores low |type|size| -1 */F/* longword at location pointer */N/* 6 */@/* STO_QW pops stack and stores qwadword |type|size| -1 */F/* at location pointer */N/* */O/* STO_GBL stores value associated with |type|size|counted string... 0 */F/* global symbol at location */F/* pointer */N/* 7 */O/* STO_CA stores contents of value |type|size|counted string... 0 */F/* associated with global symbol */F/* +8 at location pointer *//* */N/* STO_RB adds offset from location |type|size|psect| quadword | 0 */E/* pointer to image offset value */F/* associated with psect index + */F/*8 quadword offset to low word */F/* at location pointer */N/* */O/* STO_AB stores value associated with |type|size|counted string... 0 */F/* global symbol in low 21 bits */F/* at location pointer */N/* 9 */`/* STO_OFF pops offset into image from |type|size| -1 */I/* stack and stores the value in */F/* the linker's location counter */N/* */U/* STO_IMMR pops repeat count and stores |type|size| size |immediate... -1 */I/* this number of immediates at : */F/* location counter */N/* */F/* STO_LP stores code address at |type|size|counted string... 0 */B/* location pointer and global */B/* symbol value at location */B/* pointer + 8 */N/* ; */S/* STO_IMM stores this number of |type|size| size |immediate... 0 */I/* immediates at location counter */N/* */R/* STO_GBL_LW stores low order 32 bits of |type|size|counted string... 0 */F/* value associated with global */F/* symbol at location pointer */N/* < */a/* STO_LP_PSB stores code address at |type|size|counted string...|size|signature block...| 0 */B/* location pointer and global */B/* symbol value at location */B/* pointer + 8 and signature */N/* information in fixup section */N/* (following the LP_PSB fixups). = */B/* */\/* STO_BR_GBL Store low order 23 bits as |type|size|ps1 |off1 |ps2 |off2 | */8/* signed offset from virtual |counted string 0 */B/* address signified by ps2 + */B/* off2 to virtual address of */B/* global symbol shifted two bits */N/* to the right into the 21 bit > */N/* displacement field of instruction */N/* at location ps1 + off1. */N/* */\/* STO_BR_PS Store low order 23 bits as |type|size|ps1 |off1 |ps2 |off2 | */M/* signed offset from virtual |ps3 |off3 | 0 */B/* address signified by ps2 + */B/* off2 to virt? ual address */B/* signified by ps3 + off3 shifted */B/* two bits to the right into */B/* the 21 bit displacement field */B/* of instruction at location */B/* ps1 + off1. */N/* */1/* OPR_NOP nothing |type|si@ ze| 0 */N/* */C/* OPR_ADD pop two elements from stack |type|size| -1 */F/* adds and push results */N/* */C/* OPR_SUB pop two elements from stack |type|size| -1 */F/* subtracts and push results */N/* A */B/* OPR_MUL pop two elements from stack |type|size| -1 */E/* multiplys and push results */N/* */C/* OPR_DIV pop two elements from stack |type|size| -1 */F/* divides and push results */N/* */C/* OPR_AND pop two elemB ents from stack |type|size| -1 */F/* ANDs and push results */N/* */C/* OPR_IOR pop two elements from stack |type|size| -1 */F/* inclusive ors and push results */N/* */C/* OPR_EOR pop two elements from stack |type|size| -1 */F/* exclusive orC s and push results */N/* */B/* OPR_NEG pop one element from stack |type|size| 0 */F/* negates and push results */N/* */B/* OPR_COM pop one element from stack |type|size| 0 */F/* compliments and push results */N/* D */C/* OPR_INSV pop two elements from stack |type|size| -1 */F/* inserts bit field from first */F/* into second and push results */N/* */C/* OPR_USH pop two elements from stack |type|size| -1 */F/* unsigned shift and push results */N/* E */C/* OPR_ASH pop two elements from stack |type|size| -1 */F/* arithmetic shift and push */F/* results */N/* */C/* OPR_ROT pop two elements from stack |type|size| -1 */F/* rotate and push results F */N/* */G/* OPR_SEL pop three elements from stack |type|size| -2 */F/* if first is true */F/* then push third */F/* else push second */I/* */V/* OPR_REDEF pop value from stack and |type|G size|counted string... -1 */F/* assign this value to global */F/* symbol */N/* */V/* OPR_DFLIT pop value from stack and |type|size|counted string... -1 */F/* assign this value to literal */N/* */N/* H */G/* CTL_SETRB pop value from stack and move |type|size| -1 */B/* to location pointer *//* */T/* CTL_AUGRB add quadword to location |type|size| quadword | 0 */F/* pointer */N/* */W/* CTL_DFLOC pop index from stackI and save |type|size| quadword index | -1 */F/* current location pointer in */F/* debug table using index */N/* */Z/* CTL_STLOC pop index from stack, get |type|size| quadword index | -1 */G/* saved location pointer in */F/* debug table using index and J */F/* move it to current location */F/* pointer */N/* */Z/* CTL_STKDL pop index from stack, get |type|size| quadword index | 0 */F/* saved location pointer in */F/* debug table using index and */F/* push it K */N/* */N/* */</* MNEUMONIC DESCRIPTION FORMAT STACK EFFECT */</* --------- ----------- ------ ------------ */5/* 0 2 4 6 8 12 16 20 24 */4/* | | | | | | | | | */4/* v v v v v v v v v */-/* L */h/* STC_LP If the linkage pair specified |type|size|lp index |counted string... 0 */N/* by the index is referenced, */N/* i.e. all instructions ref'ing */N/* it weren't successfully replaced */N/* by other STC_** commands, then */N/* store code address at location M */N/* pointer and global symbol value */N/* at location pointer + 8. */N/* */h/* STC_LP_PSB If the linkage pair specified |type|size|lp index |counted string...|- 0 */W/* by the index is referenced, |size|signature block...| */N/* i.e. all instructions ref'inN g */N/* it weren't successfully replaced */N/* by other STC_** commands, then */N/* store code address at location */N/* pointer and global symbol value */N/* at location pointer + 8. Store */N/* signature information in fixup O */N/* section following the LP_PSB */N/* fixups. */N/* */h/* STC_GBL store value associated with |type|size|lp index |counted string... 0 */N/* global symbol (if norm bit is */N/* set this is the procedure desc. P */N/* address) in the linkage pair */N/* pointed to by the index only */N/* if that part of the lp is referenced. */N/* When the norm bit is set the index will */N/* point to the second quadword of */N/* the linkage pair. */N/* Q */h/* STC_GCA store the value from the field |type|size|lp index |counted string... 0 */N/* ESDF$L_LP_1 of the global */N/* symbol in the linkage pair */N/* pointed to by the index only */N/* if that part of the lp is referenced. */N/* R The global symbol must be a procedure, */N/* and the norm bit must be set. */N/* The lp index must point to the */N/* first quadword of the linkage pair. */N/* */-/* */h/* STC_PS store the address associated |type|size|lp index |psct|S qw offset| 0 */N/* with the psect + offset in the */N/* lp pointed to by the index. */N/* The index may point to either */N/* quadword. */N/* */d/* STC_NOP_GBL Store a NOP (specified by the |type|size|lp index |psc1|T qw off1 | - */h/* compiler) at the location |repl inst|psc2|qw off2 |counted string 0 */N/* pointed to by PS1, offset1 */N/* if the displacement from */N/* ps2, offset2 to the value in */N/* the EGSY$L_LP_1 field of the */N/* global symbol + its psect base U */N/* can be squished into 21 bits. */N/* */N/* */d/* STC_NOP_PS Store a NOP (specified by the |type|size|lp index |psc1|qw off1 | - */[/* compiler) at the location |repl inst|psc2|qw off2 | - */h/* pointed to by PS1, offset1V |psc3|qw off3 | 0 */N/* if the displacement from */N/* ps2, offset2 to ps3,offset3 */N/* can be squished into 21 bits. */N/* */d/* STC_BSR_GBL Store a BSR (specified in |type|size|lp index |psc1|qw off1 | - */h/* replW inst) at the location |repl inst|psc2|qw off2 |counted string 0 */h/* pointed to by PS1, offset1 */N/* if the displacement from */N/* ps2, offset2 to the value in */N/* the EGSY$L_LP_1 field of the */N/* global symbol + its psect base X */N/* can be squished into 21 bits. */N/* Insert the 21 bit displacement */N/* into the instruction. */N/* */d/* STC_BSR_PS Store a BSR (specified in |type|size|lp index |psc1|qw off1 | - */[/* repl inst) at the location |repl inst|psc2|qw oY ff2 | - */h/* pointed to by PS1, offset1 |psc3|qw off3 | 0 */N/* if the displacement from */N/* ps2, offset2 to ps3,offset3 */N/* can be squished into 21 bits. */N/* Insert the 21 bit displacement */N/* into the instruction. Z */N/* */d/* STC_LDA_GBL Store a LDA (specified in |type|size|lp index |psc1|qw off1 | - */h/* repl inst) at the location |repl inst|psc2|qw off2 |counted string 0 */h/* pointed to by PS1, offset1 */N/* if the displacement from */N/* [ ps2, offset2 to the value in */N/* the EGSY$L_VALUE field of the */N/* global symbol + its psect base */N/* can be squished into 16 bits. */N/* The global symbol cannot be from */N/* a shareable image. */N/* Insert the 16 bit displace\ ment */N/* into the instruction. */N/* The index is only nonzero if the */N/* instruction being replaced refs */N/* a linkage pair. */N/* */d/* STC_LDA_PS Store a LDA (specified in |type|size|lp index ] |psc1|qw off1 | - */[/* repl inst) at the location |repl inst|psc2|qw off2 | - */h/* pointed to by PS1, offset1 |psc3|qw off3 | 0 */N/* if the displacement from */N/* ps2, offset2 to ps3,offset3 */N/* can be squished into 16 bits. */N/* PS3 cannot be a ^ shareable image psect. */N/* Insert the 16 bit displacement */N/* into the instruction. */N/* The index is only nonzero if the */N/* instruction being replaced refs */N/* a linkage pair. */N/* _ */d/* STC_BOH_GBL Store a BSR (specified in |type|size|lp index |ps1 |qw off1 | - */h/* repl inst) at the location |repl inst|ps2 |qw off2 |counted string 0 */e/* pointed to by ps1, off1 */N/* if the displacement from */N/* ps2, off2 to the value in */N/* ` the EGSY$L_LP_1 field of the */N/* global symbol + its psect base */N/* can be squished into 21 bits. */N/* Insert the 21 bit displacement */N/* into the instruction. If the */N/* displacement is too large, then */N/* store the low order 16a bits of */N/* the virtual address of the global */N/* symbol shifted two bits to the */N/* right into the location */N/* ps1 + off1. */N/* */d/* STC_BOH_PS Store a BSR (specified in |type|size|lp inb dex |ps1 |qw off1 | - */Y/* repl inst) at the location |repl inst|ps2 |qw off2 | - */h/* pointed to by PS1, off1 |ps3 |qw off3 | 0 */N/* if the displacement from */N/* ps2, off2 to ps3,off3 */N/* can be squished into 21 bits. */N/* Insert the 21 c bit displacement */N/* into the instruction. If the */N/* displacement is too large, then */N/* store the low order 16 bits of */N/* the virtual address of the global */N/* symbol shifted two bits to the */N/* right into the location d */N/* ps1, off1. */N/* */d/* STC_NBH_GBL Equivalent to STC_NOP_GBL, |type|size|lp index |ps1 |qw off1 | - */[/* index, ps1, off1, ins1, ps2, |repl ins1|ps2 |qw off2 | - */h/* off2 + 4, counted string, |repl ins2|counted string... 0 */N/* folle owed by STC_BOH_GBL, index, */N/* ps2, off2, ins2, ps2, off2 + 4, */N/* counted string. */N/* Implicit assumption is that */N/* the original instructions (LDQ, JSR) */N/* are contiguous. */N/* f */d/* STC_NBH_PS Equivalent to STC_NOP_PS, |type|size|lp index |ps1 |qw off1 | - */[/* index, ps1, off1, ins1, ps2, |repl ins1|ps2 |qw off2 | - */h/* off2 + 4, ps3, off3, |repl ins2|ps3 |qw off3 | 0 */N/* followed by STC_BOH_PS, index, */N/* ps2, off2, ins2, ps2, off2 + 4, */N/* g ps3, off3. */N/* Implicit assumption is that */N/* the original instructions (LDQ, JSR) */N/* are contiguous. */N/* */f/************************************************************************************************ */ } ETIRDE h F;#else /* __OLD_STARLET */struct etirdef {N unsigned short int etir$w_rectyp; /* Record type (OBJ$C_ETIR) */N unsigned short int etir$w_size; /* Record size */N/* Define relocation commands */&/* ETIR descriptions */N/* */B/* */</* MNEUMONIC DESCRIPT i ION FORMAT STACK EFFECT */</* --------- ----------- ------ ------------ */5/* 0 2 4 6 8 12 16 20 24 */4/* | | | | | | | | | */4/* v v v v v v v v v *//* */P/* STA_GBL pushes symbol value on stack |type|size|counted string... +1 */N/* */I/* STA_LW pushes longword value on stack |type|size|lonj gword | +1 */N/* */Q/* STA_QW pushes quadword value on stack |type|size| quadword | +1 */N/* */V/* STA_PQ pushes image offset associated |type|size| psect | quadword | +1 */,/* with psect index + quadword */B/* offset on stack */O/* STA_LI pushes literal value on stack k |type|size|counted string... +1 */N/* */P/* STA_MOD pushes image offset associated |type|size|counted string... +1 */B/* with module on stack */N/* */T/* STA_CKARG compares poped stack element to |type|size|counted string... 0 */B/* symbol value and pushes result */Bl /* on stack */B/* */?/* STO_B pops stack and stores low byte |type|size| -1 */B/* at location pointer */N/* */?/* STO_W pops stack and stores low word |type|size| -1 */F/* at location pointer */N/* m */@/* STO_LW pops stack and stores low |type|size| -1 */F/* longword at location pointer */N/* */@/* STO_QW pops stack and stores qwadword |type|size| -1 */F/* at location pointer */N/* */O/* STO_Gn BL stores value associated with |type|size|counted string... 0 */F/* global symbol at location */F/* pointer */N/* */O/* STO_CA stores contents of value |type|size|counted string... 0 */F/* associated with global symbol */F/* +8 at location pointer o *//* */N/* STO_RB adds offset from location |type|size|psect| quadword | 0 */E/* pointer to image offset value */F/* associated with psect index + */F/* quadword offset to low word */F/* at location pointer */N/* */O/* STO_AB stores valp ue associated with |type|size|counted string... 0 */F/* global symbol in low 21 bits */F/* at location pointer */N/* */`/* STO_OFF pops offset into image from |type|size| -1 */I/* stack and stores the value in */F/* the linker's location counter q */N/* */U/* STO_IMMR pops repeat count and stores |type|size| size |immediate... -1 */I/* this number of immediates at */F/* location counter */N/* */F/* STO_LP stores code address at |type|size|counted string... 0 */B/* locationr pointer and global */B/* symbol value at location */B/* pointer + 8 */N/* */S/* STO_IMM stores this number of |type|size| size |immediate... 0 */I/* immediates at location counter */N/* s */R/* STO_GBL_LW stores low order 32 bits of |type|size|counted string... 0 */F/* value associated with global */F/* symbol at location pointer */N/* */a/* STO_LP_PSB stores code address at |type|size|counted string...|size|signature block...| 0 */B/* location pointer and global */B/* symbol value at lot cation */B/* pointer + 8 and signature */N/* information in fixup section */N/* (following the LP_PSB fixups). */B/* */\/* STO_BR_GBL Store low order 23 bits as |type|size|ps1 |off1 |ps2 |off2 | */8/* signed offset from virtual |counted string 0 */B/* address u signified by ps2 + */B/* off2 to virtual address of */B/* global symbol shifted two bits */N/* to the right into the 21 bit */N/* displacement field of instruction */N/* at location ps1 + off1. */N/* v */\/* STO_BR_PS Store low order 23 bits as |type|size|ps1 |off1 |ps2 |off2 | */M/* signed offset from virtual |ps3 |off3 | 0 */B/* address signified by ps2 + */B/* off2 to virtual address */B/* signified by ps3 + off3 shifted */B/* two bits to the right into */B/* the 21 bit displacement field w */B/* of instruction at location */B/* ps1 + off1. */N/* */1/* OPR_NOP nothing |type|size| 0 */N/* */C/* OPR_ADD pop two elements from stack |type|size| -1 */F/* adds and push results */N/*x */C/* OPR_SUB pop two elements from stack |type|size| -1 */F/* subtracts and push results */N/* */B/* OPR_MUL pop two elements from stack |type|size| -1 */E/* multiplys and push results */N/* y */C/* OPR_DIV pop two elements from stack |type|size| -1 */F/* divides and push results */N/* */C/* OPR_AND pop two elements from stack |type|size| -1 */F/* ANDs and push results */N/* */C/* OPR_IOR pop two elements from stack |typz e|size| -1 */F/* inclusive ors and push results */N/* */C/* OPR_EOR pop two elements from stack |type|size| -1 */F/* exclusive ors and push results */N/* */B/* OPR_NEG pop one element from stack |type|size| 0 */F/* negates and push results { */N/* */B/* OPR_COM pop one element from stack |type|size| 0 */F/* compliments and push results */N/* */C/* OPR_INSV pop two elements from stack |type|size| -1 */F/* inserts bit field from first */F/* into second and push resul| ts */N/* */C/* OPR_USH pop two elements from stack |type|size| -1 */F/* unsigned shift and push results */N/* */C/* OPR_ASH pop two elements from stack |type|size| -1 */F/* arithmetic shift and push */F/* results } */N/* */C/* OPR_ROT pop two elements from stack |type|size| -1 */F/* rotate and push results */N/* */G/* OPR_SEL pop three elements from stack |type|size| -2 */F/* if first is true */F/* th~ en push third */F/* else push second */I/* */V/* OPR_REDEF pop value from stack and |type|size|counted string... -1 */F/* assign this value to global */F/* symbol */N/*  */V/* OPR_DFLIT pop value from stack and |type|size|counted string... -1 */F/* assign this value to literal */N/* */N/* */G/* CTL_SETRB pop value from stack and move |type|size| -1 */B/* to location pointer *//* */T/* CTL_AUG RB add quadword to location |type|size| quadword | 0 */F/* pointer */N/* */W/* CTL_DFLOC pop index from stack and save |type|size| quadword index | -1 */F/* current location pointer in */F/* debug table using index */N/*  */Z/* CTL_STLOC pop index from stack, get |type|size| quadword index | -1 */G/* saved location pointer in */F/* debug table using index and */F/* move it to current location */F/* pointer */N/* */Z/* CTL_S TKDL pop index from stack, get |type|size| quadword index | 0 */F/* saved location pointer in */F/* debug table using index and */F/* push it */N/* */N/* */</* MNEUMONIC DESCRIPTION FORMAT S TACK EFFECT */</* --------- ----------- ------ ------------ */5/* 0 2 4 6 8 12 16 20 24 */4/* | | | | | | | | | */4/* v v v v v v v v v */-/* */h/* STC_LP If the linkage pair specified |type|size|lp index |counted string... 0 */N/* by the index is referenced, */N/* i.e. all instr uctions ref'ing */N/* it weren't successfully replaced */N/* by other STC_** commands, then */N/* store code address at location */N/* pointer and global symbol value */N/* at location pointer + 8. */N/*  */h/* STC_LP_PSB If the linkage pair specified |type|size|lp index |counted string...|- 0 */W/* by the index is referenced, |size|signature block...| */N/* i.e. all instructions ref'ing */N/* it weren't successfully replaced */N/* by other STC_** commands, then */N/* store code address at location */N/* pointer and global symbol value */N/* at location pointer + 8. Store */N/* signature information in fixup */N/* section following the LP_PSB */N/* fixups. */N/*  */h/* STC_GBL store value associated with |type|size|lp index |counted string... 0 */N/* global symbol (if norm bit is */N/* set this is the procedure desc. */N/* address) in the linkage pair */N/* pointed to by the index only */N/* if that part of the lp is referenced.  */N/* When the norm bit is set the index will */N/* point to the second quadword of */N/* the linkage pair. */N/* */h/* STC_GCA store the value from the field |type|size|lp index |counted string... 0 */N/* ESDF$L_LP_1 of the global  */N/* symbol in the linkage pair */N/* pointed to by the index only */N/* if that part of the lp is referenced. */N/* The global symbol must be a procedure, */N/* and the norm bit must be set. */N/* The lp index must point to the */N/* fi rst quadword of the linkage pair. */N/* */-/* */h/* STC_PS store the address associated |type|size|lp index |psct|qw offset| 0 */N/* with the psect + offset in the */N/* lp pointed to by the index. */N/* The index may point to either  */N/* quadword. */N/* */d/* STC_NOP_GBL Store a NOP (specified by the |type|size|lp index |psc1|qw off1 | - */h/* compiler) at the location |repl inst|psc2|qw off2 |counted string 0 */N/* pointed to by PS1, offset1 */N/* if the displ acement from */N/* ps2, offset2 to the value in */N/* the EGSY$L_LP_1 field of the */N/* global symbol + its psect base */N/* can be squished into 21 bits. */N/* */N/*  */d/* STC_NOP_PS Store a NOP (specified by the |type|size|lp index |psc1|qw off1 | - */[/* compiler) at the location |repl inst|psc2|qw off2 | - */h/* pointed to by PS1, offset1 |psc3|qw off3 | 0 */N/* if the displacement from */N/* ps2, offset2 to ps3,offset3 */N/* ca n be squished into 21 bits. */N/* */d/* STC_BSR_GBL Store a BSR (specified in |type|size|lp index |psc1|qw off1 | - */h/* repl inst) at the location |repl inst|psc2|qw off2 |counted string 0 */h/* pointed to by PS1, offset1 */N/* if the displacement from  */N/* ps2, offset2 to the value in */N/* the EGSY$L_LP_1 field of the */N/* global symbol + its psect base */N/* can be squished into 21 bits. */N/* Insert the 21 bit displacement */N/* into the instruction.  */N/* */d/* STC_BSR_PS Store a BSR (specified in |type|size|lp index |psc1|qw off1 | - */[/* repl inst) at the location |repl inst|psc2|qw off2 | - */h/* pointed to by PS1, offset1 |psc3|qw off3 | 0 */N/* if the displacement from */N/* ps2, offset2 to ps3,offs et3 */N/* can be squished into 21 bits. */N/* Insert the 21 bit displacement */N/* into the instruction. */N/* */d/* STC_LDA_GBL Store a LDA (specified in |type|size|lp index |psc1|qw off1 | - */h/* repl inst) at the location  |repl inst|psc2|qw off2 |counted string 0 */h/* pointed to by PS1, offset1 */N/* if the displacement from */N/* ps2, offset2 to the value in */N/* the EGSY$L_VALUE field of the */N/* global symbol + its psect base */N/* ca n be squished into 16 bits. */N/* The global symbol cannot be from */N/* a shareable image. */N/* Insert the 16 bit displacement */N/* into the instruction. */N/* The index is only nonzero if the */N/* instruction being replaced r efs */N/* a linkage pair. */N/* */d/* STC_LDA_PS Store a LDA (specified in |type|size|lp index |psc1|qw off1 | - */[/* repl inst) at the location |repl inst|psc2|qw off2 | - */h/* pointed to by PS1, offset1 |psc3|qw off3 | 0 */N/*  if the displacement from */N/* ps2, offset2 to ps3,offset3 */N/* can be squished into 16 bits. */N/* PS3 cannot be a shareable image psect. */N/* Insert the 16 bit displacement */N/* into the instruction. */N/* The index is only  nonzero if the */N/* instruction being replaced refs */N/* a linkage pair. */N/* */d/* STC_BOH_GBL Store a BSR (specified in |type|size|lp index |ps1 |qw off1 | - */h/* repl inst) at the location |repl inst|ps2 |qw off2 |counted string 0 */e/*  pointed to by ps1, off1 */N/* if the displacement from */N/* ps2, off2 to the value in */N/* the EGSY$L_LP_1 field of the */N/* global symbol + its psect base */N/* can be squished into 21 bits. */N/*  Insert the 21 bit displacement */N/* into the instruction. If the */N/* displacement is too large, then */N/* store the low order 16 bits of */N/* the virtual address of the global */N/* symbol shifted two bits to the */N/* right into the location  */N/* ps1 + off1. */N/* */d/* STC_BOH_PS Store a BSR (specified in |type|size|lp index |ps1 |qw off1 | - */Y/* repl inst) at the location |repl inst|ps2 |qw off2 | - */h/* pointed to by PS1, off1 |ps3 |qw off3 | 0 */N/*  if the displacement from */N/* ps2, off2 to ps3,off3 */N/* can be squished into 21 bits. */N/* Insert the 21 bit displacement */N/* into the instruction. If the */N/* displacement is too large, then */N/* store the low or der 16 bits of */N/* the virtual address of the global */N/* symbol shifted two bits to the */N/* right into the location */N/* ps1, off1. */N/* */d/* STC_NBH_GBL Equivalent to STC_NOP_GBL, |type|size |lp index |ps1 |qw off1 | - */[/* index, ps1, off1, ins1, ps2, |repl ins1|ps2 |qw off2 | - */h/* off2 + 4, counted string, |repl ins2|counted string... 0 */N/* followed by STC_BOH_GBL, index, */N/* ps2, off2, ins2, ps2, off2 + 4, */N/* counted string. */N/* Implic it assumption is that */N/* the original instructions (LDQ, JSR) */N/* are contiguous. */N/* */d/* STC_NBH_PS Equivalent to STC_NOP_PS, |type|size|lp index |ps1 |qw off1 | - */[/* index, ps1, off1, ins1, ps2, |repl ins1|ps2 |qw off2 | - */h/*  off2 + 4, ps3, off3, |repl ins2|ps3 |qw off3 | 0 */N/* followed by STC_BOH_PS, index, */N/* ps2, off2, ins2, ps2, off2 + 4, */N/* ps3, off3. */N/* Implicit assumption is that */N/* the original instructions (LDQ, JSR) */N/* are contiguous. */N/* */f/************************************************************************************************ */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined  required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ETIRDEF_LOADED */ ww+ᛴ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//******************************************************************************* *************************************************//*** MODULE $EVENTDEF ***/#ifndef __EVENTDEF_LOADED#define __EVENTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 /* A nd 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 #ifndef __EVENTD EF#define __EVENTDEFN/* EVSB - Event Status Block */R/* The Event Status Block receives $EVENT service VMS and NT completion status */ #ifdef __NEW_STARLETtypedef struct _evsb {N unsigned int evt$l_vms_status; /* VMS completion status */N unsigned int evt$l_nt_status; /* NT completion status */ } EVSB;#else /* __OLD_STARLET */typedef struct _evsb {N unsigned int evt$l_vms_status; /* VMS completion status */N unsigned int evt$l_nt_status; /* NT completion status */ } evsb;%#endif /* #ifdef __NEW_STARLET */N#define EVSB$K_LENGTH 8 /* Length of EVSB */N#define EVSB$C_LENGTH 8 /* Length of EVSB */ )#if defined (__ALPHA) || defined (__ia64)# ifdef __INITIAL_POINTER_SIZEN# pragma __required_pointer_size __save /* Save current pointer size */I# pra gma __required_pointer_size 64 /* Pointers are 64-bits */D typedef struct _evsb * EVSB_PQ; /* 64-bit ptr->EVSB */I typedef struct _evsb ** EVSB_PPQ; /* 64-bit ptr->ptr->EVSB */P# pragma __required_pointer_size __restore /* Return to prev pointer size */# elseL typedef unsigned __int64 EVSB_PQ; /* Same size as 64-bit ptr->EVSB */P typedef unsigned __int64 EVSB_PPQ; /* Same size as 64-bit ptr->ptr->EVSB*/# endif#endifN/*  */N/* +-------------------------------------------------------------------+ */N/* | function codes */N/* +-------------------------------------------------------------------+ */N/* */N#define EVT$FC_REGISTER_EVENT_SOURCE 1 /* register event source */N#define EVT$FC_REPORT_EVENT 2 /* repor t event */N#define EVT$FC_DEREGISTER_EVENT_SOURCE 3 /* deregister event source */O#define EVT$FC_FUNCTION_CODE_TOO_BIG 4 /* Always keep as last function code */N/* */N/* +-------------------------------------------------------------------+ */N/* | item codes */N/* +------------------------------------------------------------------- + */N/* */P#define EVT$_SERVER_NAME 1 /* PW server name - currently ignored */N#define EVT$_SOURCE 2 /* Event source id */P#define EVT$_HANDLE 3 /* handle of registered event channel */N#define EVT$_EVENT_TYPE 4 /* info, warning or error */N#define EVT$_EVENT_CATEGORY 5 /* Event category */N#define EVT$_E VENT_ID 6 /* Event ID */N#define EVT$_USER_SID 7 /* NT security ID */O#define EVT$_NUMSTRINGS 8 /* # counted strings in STRING_ARRAY */N#define EVT$_DATASIZE 9 /* # bytes in RAW_DATA */N#define EVT$_STRING_ARRAY 10 /* event log string data */N#define EVT$_RAW_DATA 11 /* event log non-string data */N#define EVT$_ITEM_CODE_TOO_BIG 12  /* Always keep as last item code */N/* */N/* max length of SERVER_NAME string is 8 wchars, 32 bytes (4 * 8) */N/* */##define EVT$_MAX_SERVER_NAME_LEN 32N/* */O/* Values for EVT$_EVENT_TYPE. NOTE! These values must be kept in sync with */N/* the corresponding val ues in Microsoft's winnt.h */N/* */N#define EVT$_SUCCESS 0 /* MS EVENTLOG_SUCCESS */N#define EVT$_ERROR 1 /* MS EVENTLOG_ERROR_TYPE */N#define EVT$_WARNING 2 /* MS EVENTLOG_WARNING_TYPE */N#define EVT$_INFO 4 /* MS EVENTLOG_INFORMATION_TYPE */N#define EVT$_AUDIT_SUCCESS 8 /* MS EVEN TLOG_AUDIT_SUCCESS */N#define EVT$_AUDIT_FAILURE 16 /* MS EVENTLOG_AUDIT_FAILURE */ #endif /* __EVENTDEF */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __EVENTDEF_LOADED */ ww;ᛴ/*********** *********************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $FABDEF ***/#ifndef __FABDEF_LOADED#define __FABDEF_LOADED 1 G#pragma __nostandard /* Thi s file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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#def ine __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 N/* */N/* */I/* file access block (fab) d efinitions */N/* */N/* the fields thru ctx must not be modified due to */N/* commonality between fab/rab/xab */N/* */ #ifdef __NEW_STARLETstruct _namdef;struct _namldef;#elsestruct namdef;struct namldef;#endifN#define FAB$C_BID 3  /* code for fab */#define FAB$M_PPF_RAT 0x3FC0#define FAB$M_PPF_IND 0x4000#define FAB$M_PPIFI 0x8000#define FAB$M_ASY 0x1#define FAB$M_MXV 0x2#define FAB$M_SUP 0x4#define FAB$M_TMP 0x8#define FAB$M_TMD 0x10#define FAB$M_DFW 0x20#define FAB$M_SQO 0x40#define FAB$M_RWO 0x80#define FAB$M_POS 0x100#define FAB$M_WCK 0x200#define FAB$M_NEF 0x400#define FAB$M_RWC 0x800#define FAB$M_DMO 0x1000#define FAB$M_SPL 0x2000#define FAB$M_SC F 0x4000#define FAB$M_DLT 0x8000#define FAB$M_NFS 0x10000#define FAB$M_UFO 0x20000#define FAB$M_PPF 0x40000#define FAB$M_INP 0x80000#define FAB$M_CTG 0x100000#define FAB$M_CBT 0x200000#define FAB$M_SYNCSTS 0x400000#define FAB$M_RCK 0x800000#define FAB$M_NAM 0x1000000#define FAB$M_CIF 0x2000000#define FAB$M_ESC 0x8000000#define FAB$M_TEF 0x10000000#define FAB$M_OFP 0x20000000#define FAB$M_KFO 0x40000000##define FAB$M_EXTEND_FOP 0x80000000#define FAB$M_ERL 0x8000 #define FAB$M_PUT 0x1#define FAB$M_GET 0x2#define FAB$M_DEL 0x4#define FAB$M_UPD 0x8#define FAB$M_TRN 0x10#define FAB$M_BIO 0x20#define FAB$M_BRO 0x40#define FAB$M_EXE 0x80#define FAB$M_SHRPUT 0x1#define FAB$M_SHRGET 0x2#define FAB$M_SHRDEL 0x4#define FAB$M_SHRUPD 0x8#define FAB$M_MSE 0x10#define FAB$M_NIL 0x20#define FAB$M_UPI 0x40#define FAB$M_NQL 0x80#define FAB$M_ORG 0xF0N#define FAB$C_SEQ 0 /* sequential */N#define FAB$C_REL 16 /* relative */N#define FAB$C_IDX 32 /* indexed */N#define FAB$C_HSH 48 /* hashed */N#define FAB$C_SPECIAL 64 /* special file */#define FAB$M_FTN 0x1#define FAB$M_CR 0x2#define FAB$M_PRN 0x4#define FAB$M_BLK 0x8#define FAB$M_MSB 0x10N#define FAB$C_FIFO 1 /* FIFO special file  */N#define FAB$C_CHAR_SPECIAL 2 /* character special file */N#define FAB$C_BLOCK_SPECIAL 3 /* block special file */U#define FAB$C_SYMLINK 4 /* symbolic link special file for pre-V8.2 */\#define FAB$C_SYMBOLIC_LINK 5 /* symbolic link special file for V8.2 and beyond */N#define FAB$C_RFM_DFLT 2 /* var len is default */N#define FAB$C_UDF 0 /* undefined (also stream binary) */N #define FAB$C_FIX 1 /* fixed length records */N#define FAB$C_VAR 2 /* variable length records */N#define FAB$C_VFC 3 /* variable fixed control */[#define FAB$C_STM 4 /* RMS-11 stream (valid only for sequential org) */W#define FAB$C_STMLF 5 /* LF stream (valid only for sequential org) */W#define FAB$C_STMCR 6 /* CR stream (valid only for sequential or g) */N#define FAB$C_MAXRFM 6 /* maximum rfm supported */#define FAB$M_ONLY_RU 0x1#define FAB$M_RU 0x2#define FAB$M_BI 0x4#define FAB$M_AI 0x8#define FAB$M_AT 0x10#define FAB$M_NEVER_RU 0x20#define FAB$M_JOURNAL_FILE 0x40#define FAB$M_SSIO_RQST 0x1#define FAB$M_SSIO_GRANTED 0x2#define FAB$M_SSIO_FOC 0x4#define FAB$M_RCF_RU 0x1#define FAB$M_RCF_AI 0x2#define FAB$M_RCF_BI 0x4  9#ifdef __cplusplus /* Define structure prototypes */ struct _namdef;struct _namldef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _fabdef {#pragma __nomember_alignmentN unsigned char fab$b_bid; /* block id */N unsigned char fab$b_bln; /* block len */  __union {N unsigned short int fab$w_ifi; /* internal file index */ __struct {N unsigned fabdef$$_fill_1 : 6; /* move to bit 6 */S unsigned fab$v_ppf_rat : 8; /* rat value for process-permanent files */W unsigned fab$v_ppf_ind : 1; /* indirect access to process-permanent file */N/* (i.e., restricted operations) */N unsigned fab$v_ppifi : 1; /* indicates tha t this is PPF file */ } fab$r_ifi_bits; } fab$r_ifi_overlay; __union {N unsigned int fab$l_fop; /* file options */ __struct {N unsigned fab$v_asy : 1; /* asynchronous operations */N unsigned fab$v_mxv : 1; /* maximize version number */N unsigned fab$v_sup : 1; /* supersede existing file */N unsigned fab$v_tmp : 1; /* create temporary fi le */P unsigned fab$v_tmd : 1; /* create temp file marked for delete */N unsigned fab$v_dfw : 1; /* deferred write (rel and idx) */N unsigned fab$v_sqo : 1; /* sequential access only */N unsigned fab$v_rwo : 1; /* rewind mt on open */N unsigned fab$v_pos : 1; /* use next magtape position */N unsigned fab$v_wck : 1; /* write checking */N  unsigned fab$v_nef : 1; /* inhibit end of file positioning */N unsigned fab$v_rwc : 1; /* rewind mt on close */T unsigned fab$v_dmo : 1; /* dismount mt on close (not implemented) */N unsigned fab$v_spl : 1; /* spool file on close */N unsigned fab$v_scf : 1; /* submit command file on close */N unsigned fab$v_dlt : 1; /* delete sub-option */N unsigned fab$v _nfs : 1; /* non-file structured operation */P unsigned fab$v_ufo : 1; /* user file open - no rms operations */R unsigned fab$v_ppf : 1; /* process permanent file (pio segment) */O unsigned fab$v_inp : 1; /* process-permanent file is 'input' */N unsigned fab$v_ctg : 1; /* contiguous extension */N unsigned fab$v_cbt : 1; /* contiguous best try */h unsigned fab$v_syncsts : 1; /* S ynchronous status notification for asynchronous routines. */N unsigned fab$v_rck : 1; /* read checking */a unsigned fab$v_nam : 1; /* use name block dvi, did, and/or fid fields for open */N unsigned fab$v_cif : 1; /* create if non-existent */N unsigned fabdef$$_fill_3 : 1; /* reserved (was UFM bitfield) */Y unsigned fab$v_esc : 1; /* 'escape' to non-standard function ($modify) */k  unsigned fab$v_tef : 1; /* truncate at eof on close (write-accessed seq. disk file only) */W unsigned fab$v_ofp : 1; /* output file parse (only name type sticky) */^ unsigned fab$v_kfo : 1; /* known file open (image activator only release 1) */N unsigned fab$v_extend_fop : 1; /* extend FOP */ } fab$r_fop_bits; __struct {N unsigned fabdef$$_fill_10 : 15; /* move to bit 16 */N  unsigned fab$v_erl : 1; /* Erase Regardless of Lock */N unsigned fabdef$$_fill_11 : 16; /* Fill for remaining bits */% } fab$r_fop_bits_overlay; } fab$r_fop_overlay;N unsigned int fab$l_sts; /* status */N unsigned int fab$l_stv; /* status value */N unsigned int fab$l_alq; /* allocation quantity */N unsigned short int fab$w_deq; /* d efault allocation quantity */ __union {N unsigned char fab$b_fac; /* file access */ __struct {N unsigned fab$v_put : 1; /* put access */N unsigned fab$v_get : 1; /* get access */N unsigned fab$v_del : 1; /* delete access */N unsigned fab$v_upd : 1; /* update access */N unsigned fab$v_trn : 1; /* truncate access */N unsigned fab$v_bio : 1; /* block i/o access */N unsigned fab$v_bro : 1; /* block and record i/o access */a unsigned fab$v_exe : 1; /* execute access (caller must be exec or kernel mode, */N/* ufo must also be set) */ } fab$r_fac_bits; } fab$r_fac_overlay; __union {N unsigned char fab$b_shr;  /* file sharing */ __struct {N unsigned fab$v_shrput : 1; /* put access */N unsigned fab$v_shrget : 1; /* get access */N unsigned fab$v_shrdel : 1; /* delete access */N unsigned fab$v_shrupd : 1; /* update access */N unsigned fab$v_mse : 1; /* multi-stream connects enabled */N unsigned fab$v_nil : 1; /* n o sharing */Y unsigned fab$v_upi : 1; /* user provided interlocking (allows multiple */N/* writers to seq. files) */N unsigned fab$v_nql : 1; /* no query locking (file level) */ } fab$r_shr_bits; } fab$r_shr_overlay;N unsigned int fab$l_ctx; /* user context */N/*-----***** */N char fab$b_rtv; /* retrieval window size */ __union {N unsigned char fab$b_org; /* file organization */ __struct {) unsigned fabdef$$_fill_5 : 4;# unsigned fab$v_org : 4; } fab$r_org_bits; } fab$r_org_overlay; __union {N unsigned char fab$b_rat; /* record format */ __struct {N unsigned fab$v_ftn : 1; /* fortran carriage-ctl */N unsigned fab$v_cr : 1; /* lf-record-cr carriage ctl */N unsigned fab$v_prn : 1; /* print-file carriage ctl */R unsigned fab$v_blk : 1; /* records don't cross block boundaries */N unsigned fab$v_msb : 1; /* MSB formatted byte count */' unsigned fab$v_fill_0_ : 3; } fab$r_rat_bits;N unsigned char fab$b_special_type; /* type of special file */ } fab$r_rat_overlay;N unsigned char fab$b_rfm; /* record format */ __union { unsigned int fab$l_jnl; __struct { __union {Z unsigned char fab$b_journal; /* journaling options (from FH2$B_JOURNAL) */U __struct { /* note: only one of RU, ONLY_RU, NEVER_RU */N/* may be set at a time */^ unsigned f ab$v_only_ru : 1; /* file is accessible only in recovery unit */N unsigned fab$v_ru : 1; /* enable recovery unit journal */N unsigned fab$v_bi : 1; /* enable before image journal */N unsigned fab$v_ai : 1; /* enable after image journal */N unsigned fab$v_at : 1; /* enable audit trail journal */` unsigned fab$v_never_ru : 1; /* file is never accessible in recovery unit */Q un signed fab$v_journal_file : 1; /* this is a journal file *// unsigned fab$v_fill_1_ : 1;) } fab$r_journal_bits;( } fab$r_journal_overlay;Q unsigned char fab$b_ru_facility; /* recoverable facility id number */ __union {N unsigned short int fab$w_fopext; /* FOP extension */ __struct {N unsigned fab$v_ssio_rqst : 1; /* SSIO access request */N unsigned fab$v_ssio_granted : 1; /* SSIO access granted */N unsigned fab$v_ssio_foc : 1; /* SSIO flush-on-close */g unsigned fabdef$$_reserved_bits_mbz : 13; /* MBZ - reserved to HP for future use */( } fab$r_fopext_bits;' } fab$r_fopext_overlay;# } fab$r_jnl_real_stuff; } fab$r_jnl_overlay;N void *fab$l_xab; /* xab address */ __union {U  struct _namdef *fab$l_nam; /* nam block address ~~~ struct namdef ~~~ */W struct _namldef *fab$l_naml; /* naml block address ~~~ struct namldef ~~~ */ } fab$r_nam_overlay;N char *fab$l_fna; /* file name string address */N char *fab$l_dna; /* default file name string addr */N unsigned char fab$b_fns; /* file name string size */N unsigned char fab$b_dns; /* default name stri ng size */N unsigned short int fab$w_mrs; /* maximum record size */N int fab$l_mrn; /* maximum record number */N unsigned short int fab$w_bls; /* blocksize for tape */N unsigned char fab$b_bks; /* bucket size */N unsigned char fab$b_fsz; /* fixed header size */N unsigned int fab$l_dev; /* device characteristics */N un signed int fab$l_sdc; /* spooling device characteristics */N unsigned short int fab$w_gbc; /* Global buffer count */ __union {N unsigned char fab$b_acmodes; /* agent access modes */ __struct {N unsigned fab$v_lnm_mode : 2; /* ACMODE for log nams */N unsigned fab$v_chan_mode : 2; /* ACMODE for channel */` unsigned fab$v_file_mode : 2; /* ACMODE to use for determining file accessibility */U unsigned fab$v_callers_mode : 2; /* ACMODE for user structure probing; */N/* maximized with actual mode of caller */! } fab$r_acmodes_bits; } fab$r_acmodes_overlay;N __union { /* recovery control flags */N unsigned char fab$b_rcf; /* (only for use by RMS Recovery) */ __struct {N unsigned fab$v_rcf_ru : 1; /* recovery unit recov ery */N unsigned fab$v_rcf_ai : 1; /* after image recovery */N unsigned fab$v_rcf_bi : 1; /* before image recovery */' unsigned fab$v_fill_2_ : 5; } fab$r_rcf_bits; } fab$r_rcf_overlay;] unsigned short int fab$w_gbc_initial; /* Initial Global Buffer Count declared for file */T unsigned short int fab$w_reserved_mbz; /* MBZ - reserved to HP for future use */ } FABDEF; #if !defined(__VAXC)- #define fab$w_ifi fab$r_ifi_overlay.fab$w_ifi7#define fab$r_ifi_bits fab$r_ifi_overlay.fab$r_ifi_bits2#define fab$v_ppf_rat fab$r_ifi_bits.fab$v_ppf_rat2#define fab$v_ppf_ind fab$r_ifi_bits.fab$v_ppf_ind.#define fab$v_ppifi fab$r_ifi_bits.fab$v_ppifi-#define fab$l_fop fab$r_fop_overlay.fab$l_fop7#define fab$r_fop_bits fab$r_fop_overlay.fab$r_fop_bits*#define fab$v_asy fab$r_fop_bits.fab$v_asy*#define fab$v_mxv fab$r_fop_bits.fab$v_mxv*#define fab$v_sup fab$r_fop_bits.fab$v_sup*#define fa b$v_tmp fab$r_fop_bits.fab$v_tmp*#define fab$v_tmd fab$r_fop_bits.fab$v_tmd*#define fab$v_dfw fab$r_fop_bits.fab$v_dfw*#define fab$v_sqo fab$r_fop_bits.fab$v_sqo*#define fab$v_rwo fab$r_fop_bits.fab$v_rwo*#define fab$v_pos fab$r_fop_bits.fab$v_pos*#define fab$v_wck fab$r_fop_bits.fab$v_wck*#define fab$v_nef fab$r_fop_bits.fab$v_nef*#define fab$v_rwc fab$r_fop_bits.fab$v_rwc*#define fab$v_dmo fab$r_fop_bits.fab$v_dmo*#define fab$v_spl fab$r_fop_bits.fab$v_spl*#define fab$v_scf fab$r_fop_bits .fab$v_scf*#define fab$v_dlt fab$r_fop_bits.fab$v_dlt*#define fab$v_nfs fab$r_fop_bits.fab$v_nfs*#define fab$v_ufo fab$r_fop_bits.fab$v_ufo*#define fab$v_ppf fab$r_fop_bits.fab$v_ppf*#define fab$v_inp fab$r_fop_bits.fab$v_inp*#define fab$v_ctg fab$r_fop_bits.fab$v_ctg*#define fab$v_cbt fab$r_fop_bits.fab$v_cbt2#define fab$v_syncsts fab$r_fop_bits.fab$v_syncsts*#define fab$v_rck fab$r_fop_bits.fab$v_rck*#define fab$v_nam fab$r_fop_bits.fab$v_nam*#define fab$v_cif fab$r_fop_bits.fab$v_cif*#d efine fab$v_esc fab$r_fop_bits.fab$v_esc*#define fab$v_tef fab$r_fop_bits.fab$v_tef*#define fab$v_ofp fab$r_fop_bits.fab$v_ofp*#define fab$v_kfo fab$r_fop_bits.fab$v_kfo8#define fab$v_extend_fop fab$r_fop_bits.fab$v_extend_fopG#define fab$r_fop_bits_overlay fab$r_fop_overlay.fab$r_fop_bits_overlay2#define fab$v_erl fab$r_fop_bits_overlay.fab$v_erl-#define fab$b_fac fab$r_fac_overlay.fab$b_fac7#define fab$r_fac_bits fab$r_fac_overlay.fab$r_fac_bits*#define fab$v_put fab$r_fac_bits.fab$v_put *#define fab$v_get fab$r_fac_bits.fab$v_get*#define fab$v_del fab$r_fac_bits.fab$v_del*#define fab$v_upd fab$r_fac_bits.fab$v_upd*#define fab$v_trn fab$r_fac_bits.fab$v_trn*#define fab$v_bio fab$r_fac_bits.fab$v_bio*#define fab$v_bro fab$r_fac_bits.fab$v_bro*#define fab$v_exe fab$r_fac_bits.fab$v_exe-#define fab$b_shr fab$r_shr_overlay.fab$b_shr7#define fab$r_shr_bits fab$r_shr_overlay.fab$r_shr_bits0#define fab$v_shrput fab$r_shr_bits.fab$v_shrput0#define fab$v_shrget fab$r_shr_bits.fab$ v_shrget0#define fab$v_shrdel fab$r_shr_bits.fab$v_shrdel0#define fab$v_shrupd fab$r_shr_bits.fab$v_shrupd*#define fab$v_mse fab$r_shr_bits.fab$v_mse*#define fab$v_nil fab$r_shr_bits.fab$v_nil*#define fab$v_upi fab$r_shr_bits.fab$v_upi*#define fab$v_nql fab$r_shr_bits.fab$v_nql-#define fab$b_org fab$r_org_overlay.fab$b_org7#define fab$r_org_bits fab$r_org_overlay.fab$r_org_bits*#define fab$v_org fab$r_org_bits.fab$v_org-#define fab$b_rat fab$r_rat_overlay.fab$b_rat7#define fab$r_rat_bits fab$r_rat_overlay.fab$r_rat_bits*#define fab$v_ftn fab$r_rat_bits.fab$v_ftn(#define fab$v_cr fab$r_rat_bits.fab$v_cr*#define fab$v_prn fab$r_rat_bits.fab$v_prn*#define fab$v_blk fab$r_rat_bits.fab$v_blk*#define fab$v_msb fab$r_rat_bits.fab$v_msb?#define fab$b_special_type fab$r_rat_overlay.fab$b_special_type-#define fab$l_jnl fab$r_jnl_overlay.fab$l_jnlC#define fab$r_jnl_real_stuff fab$r_jnl_overlay.fab$r_jnl_real_stuffH#define fab$r_journal_overlay fab$r_jnl_real_stuff.fab$r_journal_ove rlay9#define fab$b_journal fab$r_journal_overlay.fab$b_journalC#define fab$r_journal_bits fab$r_journal_overlay.fab$r_journal_bits6#define fab$v_only_ru fab$r_journal_bits.fab$v_only_ru,#define fab$v_ru fab$r_journal_bits.fab$v_ru,#define fab$v_bi fab$r_journal_bits.fab$v_bi,#define fab$v_ai fab$r_journal_bits.fab$v_ai,#define fab$v_at fab$r_journal_bits.fab$v_at8#define fab$v_never_ru fab$r_journal_bits.fab$v_never_ru@#define fab$v_journal_file fab$r_journal_bits.fab$v_journal_file@#defin e fab$b_ru_facility fab$r_jnl_real_stuff.fab$b_ru_facilityF#define fab$r_fopext_overlay fab$r_jnl_real_stuff.fab$r_fopext_overlay6#define fab$w_fopext fab$r_fopext_overlay.fab$w_fopext@#define fab$r_fopext_bits fab$r_fopext_overlay.fab$r_fopext_bits9#define fab$v_ssio_rqst fab$r_fopext_bits.fab$v_ssio_rqst?#define fab$v_ssio_granted fab$r_fopext_bits.fab$v_ssio_granted7#define fab$v_ssio_foc fab$r_fopext_bits.fab$v_ssio_foc-#define fab$l_nam fab$r_nam_overlay.fab$l_nam/#define fab$l_naml f ab$r_nam_overlay.fab$l_naml9#define fab$b_acmodes fab$r_acmodes_overlay.fab$b_acmodesC#define fab$r_acmodes_bits fab$r_acmodes_overlay.fab$r_acmodes_bits8#define fab$v_lnm_mode fab$r_acmodes_bits.fab$v_lnm_mode:#define fab$v_chan_mode fab$r_acmodes_bits.fab$v_chan_mode:#define fab$v_file_mode fab$r_acmodes_bits.fab$v_file_mode@#define fab$v_callers_mode fab$r_acmodes_bits.fab$v_callers_mode-#define fab$b_rcf fab$r_rcf_overlay.fab$b_rcf7#define fab$r_rcf_bits fab$r_rcf_overlay.fab$r_rcf_bit s0#define fab$v_rcf_ru fab$r_rcf_bits.fab$v_rcf_ru0#define fab$v_rcf_ai fab$r_rcf_bits.fab$v_rcf_ai0#define fab$v_rcf_bi fab$r_rcf_bits.fab$v_rcf_bi"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct fabdef {#pragma __nomember_alignmentN unsigned char fab$b_bid; /* block id */N unsigned char fab$b_bln; /* block len */ __union {N unsigned short int fab$w_ifi; /* internal file index */ __struct {N unsigned fabdef$$_fill_1 : 6; /* move to bit 6 */S unsigned fab$v_ppf_rat : 8; /* rat value for process-permanent files */W unsigned fab$v_ppf_ind : 1; /* indirect access to process-permanent file */N/* (i.e., rest ricted operations) */N unsigned fab$v_ppifi : 1; /* indicates that this is PPF file */ } fab$r_ifi_bits; } fab$r_ifi_overlay; __union {N unsigned int fab$l_fop; /* file options */ __struct {N unsigned fab$v_asy : 1; /* asynchronous operations */N unsigned fab$v_mxv : 1; /* maximize version number */N unsigned fab$v_sup : 1; /* supersede existing file */N unsigned fab$v_tmp : 1; /* create temporary file */P unsigned fab$v_tmd : 1; /* create temp file marked for delete */N unsigned fab$v_dfw : 1; /* deferred write (rel and idx) */N unsigned fab$v_sqo : 1; /* sequential access only */N unsigned fab$v_rwo : 1; /* rewind mt on open */N unsigned fab$v_pos : 1; /* u se next magtape position */N unsigned fab$v_wck : 1; /* write checking */N unsigned fab$v_nef : 1; /* inhibit end of file positioning */N unsigned fab$v_rwc : 1; /* rewind mt on close */T unsigned fab$v_dmo : 1; /* dismount mt on close (not implemented) */N unsigned fab$v_spl : 1; /* spool file on close */N unsigned fab$v_scf : 1; /* submit command file o n close */N unsigned fab$v_dlt : 1; /* delete sub-option */N unsigned fab$v_nfs : 1; /* non-file structured operation */P unsigned fab$v_ufo : 1; /* user file open - no rms operations */R unsigned fab$v_ppf : 1; /* process permanent file (pio segment) */O unsigned fab$v_inp : 1; /* process-permanent file is 'input' */N unsigned fab$v_ctg : 1; /* contiguous extension */N  unsigned fab$v_cbt : 1; /* contiguous best try */h unsigned fab$v_syncsts : 1; /* Synchronous status notification for asynchronous routines. */N unsigned fab$v_rck : 1; /* read checking */a unsigned fab$v_nam : 1; /* use name block dvi, did, and/or fid fields for open */N unsigned fab$v_cif : 1; /* create if non-existent */N unsigned fabdef$$_fill_3 : 1; /* reserved (was UFM bitfield) */Y unsigned fab$v_esc : 1; /* 'escape' to non-standard function ($modify) */k unsigned fab$v_tef : 1; /* truncate at eof on close (write-accessed seq. disk file only) */W unsigned fab$v_ofp : 1; /* output file parse (only name type sticky) */^ unsigned fab$v_kfo : 1; /* known file open (image activator only release 1) */N unsigned fab$v_extend_fop : 1; /* extend FOP */ } fab$r_ fop_bits; __struct {N unsigned fabdef$$_fill_10 : 15; /* move to bit 16 */N unsigned fab$v_erl : 1; /* Erase Regardless of Lock */N unsigned fabdef$$_fill_11 : 16; /* Fill for remaining bits */% } fab$r_fop_bits_overlay; } fab$r_fop_overlay;N unsigned int fab$l_sts; /* status */N unsigned int fab$l_stv; /* status value */N  unsigned int fab$l_alq; /* allocation quantity */N unsigned short int fab$w_deq; /* default allocation quantity */ __union {N unsigned char fab$b_fac; /* file access */ __struct {N unsigned fab$v_put : 1; /* put access */N unsigned fab$v_get : 1; /* get access */N unsigned fab$v_del : 1; /* delete access  */N unsigned fab$v_upd : 1; /* update access */N unsigned fab$v_trn : 1; /* truncate access */N unsigned fab$v_bio : 1; /* block i/o access */N unsigned fab$v_bro : 1; /* block and record i/o access */a unsigned fab$v_exe : 1; /* execute access (caller must be exec or kernel mode, */N/* ufo must also be set) */ } fab$r_fac_bits; } fab$r_fac_overlay; __union {N unsigned char fab$b_shr; /* file sharing */ __struct {N unsigned fab$v_shrput : 1; /* put access */N unsigned fab$v_shrget : 1; /* get access */N unsigned fab$v_shrdel : 1; /* delete access */N unsigned fab$v_shrupd : 1; /* update access */N  unsigned fab$v_mse : 1; /* multi-stream connects enabled */N unsigned fab$v_nil : 1; /* no sharing */Y unsigned fab$v_upi : 1; /* user provided interlocking (allows multiple */N/* writers to seq. files) */N unsigned fab$v_nql : 1; /* no query locking (file level) */ } fab$r_shr_bits; } fab$r_shr_overlay;N unsigned int fab$l_ctx; /* user context */N/*-----***** */N char fab$b_rtv; /* retrieval window size */ __union {N unsigned char fab$b_org; /* file organization */ __struct {) unsigned fabdef$$_fill_5 : 4;# unsigned fab$v_org : 4; } fab$r_org_bits; } fab$r_org_overlay; __union {N unsigned char  fab$b_rat; /* record format */ __struct {N unsigned fab$v_ftn : 1; /* fortran carriage-ctl */N unsigned fab$v_cr : 1; /* lf-record-cr carriage ctl */N unsigned fab$v_prn : 1; /* print-file carriage ctl */R unsigned fab$v_blk : 1; /* records don't cross block boundaries */N unsigned fab$v_msb : 1; /* MSB formatted byte count */' unsigned f ab$v_fill_0_ : 3; } fab$r_rat_bits;N unsigned char fab$b_special_type; /* type of special file */ } fab$r_rat_overlay;N unsigned char fab$b_rfm; /* record format */ __union { unsigned int fab$l_jnl; __struct { __union {Z unsigned char fab$b_journal; /* journaling options (from FH2$B_JOURNAL) */U __struct { /* note: only one of RU, ONLY_RU, NE VER_RU */N/* may be set at a time */^ unsigned fab$v_only_ru : 1; /* file is accessible only in recovery unit */N unsigned fab$v_ru : 1; /* enable recovery unit journal */N unsigned fab$v_bi : 1; /* enable before image journal */N unsigned fab$v_ai : 1; /* enable after image journal */N unsigned fab$v_at : 1; /* enable audit trail journal */ ` unsigned fab$v_never_ru : 1; /* file is never accessible in recovery unit */Q unsigned fab$v_journal_file : 1; /* this is a journal file *// unsigned fab$v_fill_1_ : 1;) } fab$r_journal_bits;( } fab$r_journal_overlay;Q unsigned char fab$b_ru_facility; /* recoverable facility id number */ __union {N unsigned short int fab$w_fopext; /* FOP extension */  __struct {N unsigned fab$v_ssio_rqst : 1; /* SSIO access request */N unsigned fab$v_ssio_granted : 1; /* SSIO access granted */N unsigned fab$v_ssio_foc : 1; /* SSIO flush-on-close */g unsigned fabdef$$_reserved_bits_mbz : 13; /* MBZ - reserved to HP for future use */( } fab$r_fopext_bits;' } fab$r_fopext_overlay;# } fab$r_jnl_real_stuff; } fab$r_jnl_overlay;N void *fab$l_xab; /* xab address */ __union {K struct namdef *fab$l_nam; /* nam block address */M struct namldef *fab$l_naml; /* naml block address */ } fab$r_nam_overlay;N char *fab$l_fna; /* file name string address */N char *fab$l_dna; /* default file name string addr */N unsigned char fab$b_fns;  /* file name string size */N unsigned char fab$b_dns; /* default name string size */N unsigned short int fab$w_mrs; /* maximum record size */N int fab$l_mrn; /* maximum record number */N unsigned short int fab$w_bls; /* blocksize for tape */N unsigned char fab$b_bks; /* bucket size */N unsigned char fab$b_fsz; /* fixed header size */N unsigned int fab$l_dev; /* device characteristics */N unsigned int fab$l_sdc; /* spooling device characteristics */N unsigned short int fab$w_gbc; /* Global buffer count */ __union {N unsigned char fab$b_acmodes; /* agent access modes */ __struct {N unsigned fab$v_lnm_mode : 2; /* ACMODE for log nams */N unsigned fab$v_chan_mode : 2; /* ACMODE  for channel */` unsigned fab$v_file_mode : 2; /* ACMODE to use for determining file accessibility */U unsigned fab$v_callers_mode : 2; /* ACMODE for user structure probing; */N/* maximized with actual mode of caller */! } fab$r_acmodes_bits; } fab$r_acmodes_overlay;N __union { /* recovery control flags */N unsigned char fab$b_rcf; /* (only for use by RM S Recovery) */ __struct {N unsigned fab$v_rcf_ru : 1; /* recovery unit recovery */N unsigned fab$v_rcf_ai : 1; /* after image recovery */N unsigned fab$v_rcf_bi : 1; /* before image recovery */' unsigned fab$v_fill_2_ : 5; } fab$r_rcf_bits; } fab$r_rcf_overlay;] unsigned short int fab$w_gbc_initial; /* Initial Global Buffer Count declared for file */T unsigned short int fab $w_reserved_mbz; /* MBZ - reserved to HP for future use */ } ; #if !defined(__VAXC)-#define fab$w_ifi fab$r_ifi_overlay.fab$w_ifiD#define fab$v_ppf_rat fab$r_ifi_overlay.fab$r_ifi_bits.fab$v_ppf_ratD#define fab$v_ppf_ind fab$r_ifi_overlay.fab$r_ifi_bits.fab$v_ppf_ind@#define fab$v_ppifi fab$r_ifi_overlay.fab$r_ifi_bits.fab$v_ppifi-#define fab$l_fop fab$r_fop_overlay.fab$l_fop<#define fab$v_asy fab$r_fop_overlay.fab$r_fop_bits.fab$v_asy<#define fab$v_mxv fab$r_fop_overlay.fab$r_fop_ bits.fab$v_mxv<#define fab$v_sup fab$r_fop_overlay.fab$r_fop_bits.fab$v_sup<#define fab$v_tmp fab$r_fop_overlay.fab$r_fop_bits.fab$v_tmp<#define fab$v_tmd fab$r_fop_overlay.fab$r_fop_bits.fab$v_tmd<#define fab$v_dfw fab$r_fop_overlay.fab$r_fop_bits.fab$v_dfw<#define fab$v_sqo fab$r_fop_overlay.fab$r_fop_bits.fab$v_sqo<#define fab$v_rwo fab$r_fop_overlay.fab$r_fop_bits.fab$v_rwo<#define fab$v_pos fab$r_fop_overlay.fab$r_fop_bits.fab$v_pos<#define fab$v_wck fab$r_fop_overlay.fab$r_fop_bits.fab$v _wck<#define fab$v_nef fab$r_fop_overlay.fab$r_fop_bits.fab$v_nef<#define fab$v_rwc fab$r_fop_overlay.fab$r_fop_bits.fab$v_rwc<#define fab$v_dmo fab$r_fop_overlay.fab$r_fop_bits.fab$v_dmo<#define fab$v_spl fab$r_fop_overlay.fab$r_fop_bits.fab$v_spl<#define fab$v_scf fab$r_fop_overlay.fab$r_fop_bits.fab$v_scf<#define fab$v_dlt fab$r_fop_overlay.fab$r_fop_bits.fab$v_dlt<#define fab$v_nfs fab$r_fop_overlay.fab$r_fop_bits.fab$v_nfs<#define fab$v_ufo fab$r_fop_overlay.fab$r_fop_bits.fab$v_ufo<#def ine fab$v_ppf fab$r_fop_overlay.fab$r_fop_bits.fab$v_ppf<#define fab$v_inp fab$r_fop_overlay.fab$r_fop_bits.fab$v_inp<#define fab$v_ctg fab$r_fop_overlay.fab$r_fop_bits.fab$v_ctg<#define fab$v_cbt fab$r_fop_overlay.fab$r_fop_bits.fab$v_cbtD#define fab$v_syncsts fab$r_fop_overlay.fab$r_fop_bits.fab$v_syncsts<#define fab$v_rck fab$r_fop_overlay.fab$r_fop_bits.fab$v_rck<#define fab$v_nam fab$r_fop_overlay.fab$r_fop_bits.fab$v_nam<#define fab$v_cif fab$r_fop_overlay.fab$r_fop_bits.fab$v_cif<#defin e fab$v_esc fab$r_fop_overlay.fab$r_fop_bits.fab$v_esc<#define fab$v_tef fab$r_fop_overlay.fab$r_fop_bits.fab$v_tef<#define fab$v_ofp fab$r_fop_overlay.fab$r_fop_bits.fab$v_ofp<#define fab$v_kfo fab$r_fop_overlay.fab$r_fop_bits.fab$v_kfoJ#define fab$v_extend_fop fab$r_fop_overlay.fab$r_fop_bits.fab$v_extend_fopD#define fab$v_erl fab$r_fop_overlay.fab$r_fop_bits_overlay.fab$v_erl-#define fab$b_fac fab$r_fac_overlay.fab$b_fac<#define fab$v_put fab$r_fac_overlay.fab$r_fac_bits.fab$v_put<#define fab$v_get fab$r_fac_overlay.fab$r_fac_bits.fab$v_get<#define fab$v_del fab$r_fac_overlay.fab$r_fac_bits.fab$v_del<#define fab$v_upd fab$r_fac_overlay.fab$r_fac_bits.fab$v_upd<#define fab$v_trn fab$r_fac_overlay.fab$r_fac_bits.fab$v_trn<#define fab$v_bio fab$r_fac_overlay.fab$r_fac_bits.fab$v_bio<#define fab$v_bro fab$r_fac_overlay.fab$r_fac_bits.fab$v_bro<#define fab$v_exe fab$r_fac_overlay.fab$r_fac_bits.fab$v_exe-#define fab$b_shr fab$r_shr_overlay.fab$b_shrB#define fab$v_shrput fab$r_shr_o verlay.fab$r_shr_bits.fab$v_shrputB#define fab$v_shrget fab$r_shr_overlay.fab$r_shr_bits.fab$v_shrgetB#define fab$v_shrdel fab$r_shr_overlay.fab$r_shr_bits.fab$v_shrdelB#define fab$v_shrupd fab$r_shr_overlay.fab$r_shr_bits.fab$v_shrupd<#define fab$v_mse fab$r_shr_overlay.fab$r_shr_bits.fab$v_mse<#define fab$v_nil fab$r_shr_overlay.fab$r_shr_bits.fab$v_nil<#define fab$v_upi fab$r_shr_overlay.fab$r_shr_bits.fab$v_upi<#define fab$v_nql fab$r_shr_overlay.fab$r_shr_bits.fab$v_nql-#define fab$b_org fab$r_org_overlay.fab$b_org<#define fab$v_org fab$r_org_overlay.fab$r_org_bits.fab$v_org-#define fab$b_rat fab$r_rat_overlay.fab$b_rat<#define fab$v_ftn fab$r_rat_overlay.fab$r_rat_bits.fab$v_ftn:#define fab$v_cr fab$r_rat_overlay.fab$r_rat_bits.fab$v_cr<#define fab$v_prn fab$r_rat_overlay.fab$r_rat_bits.fab$v_prn<#define fab$v_blk fab$r_rat_overlay.fab$r_rat_bits.fab$v_blk<#define fab$v_msb fab$r_rat_overlay.fab$r_rat_bits.fab$v_msb?#define fab$b_special_type fab$r_rat_overlay.fab$b_special _type-#define fab$l_jnl fab$r_jnl_overlay.fab$l_jnl`#define fab$b_journal fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_journal_overlay.fab$b_journals#define fab$v_only_ru fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_journal_overlay.fab$r_journal_bits.fab$v_only_rui#define fab$v_ru fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_journal_overlay.fab$r_journal_bits.fab$v_rui#define fab$v_bi fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_journal_overlay.fab$r_journal_bits.fab$v_bii#define fab$v_ai f ab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_journal_overlay.fab$r_journal_bits.fab$v_aii#define fab$v_at fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_journal_overlay.fab$r_journal_bits.fab$v_atu#define fab$v_never_ru fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_journal_overlay.fab$r_journal_bits.fab$v_never_ru}#define fab$v_journal_file fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_journal_overlay.fab$r_journal_bits.fab$v_journal_fileR#define fab$b_ru_facility fab$r_jnl_overlay.fab$r_jnl_real_s tuff.fab$b_ru_facility]#define fab$w_fopext fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_fopext_overlay.fab$w_fopextu#define fab$v_ssio_rqst fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_fopext_overlay.fab$r_fopext_bits.fab$v_ssio_rqst{#define fab$v_ssio_granted fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_fopext_overlay.fab$r_fopext_bits.fab$v_ssio_granteds#define fab$v_ssio_foc fab$r_jnl_overlay.fab$r_jnl_real_stuff.fab$r_fopext_overlay.fab$r_fopext_bits.fab$v_ssio_foc-#define fab$l_nam fab$ r_nam_overlay.fab$l_nam/#define fab$l_naml fab$r_nam_overlay.fab$l_naml9#define fab$b_acmodes fab$r_acmodes_overlay.fab$b_acmodesN#define fab$v_lnm_mode fab$r_acmodes_overlay.fab$r_acmodes_bits.fab$v_lnm_modeP#define fab$v_chan_mode fab$r_acmodes_overlay.fab$r_acmodes_bits.fab$v_chan_modeP#define fab$v_file_mode fab$r_acmodes_overlay.fab$r_acmodes_bits.fab$v_file_modeV#define fab$v_callers_mode fab$r_acmodes_overlay.fab$r_acmodes_bits.fab$v_callers_mode-#define fab$b_rcf fab$r_rcf_overlay.fa b$b_rcfB#define fab$v_rcf_ru fab$r_rcf_overlay.fab$r_rcf_bits.fab$v_rcf_ruB#define fab$v_rcf_ai fab$r_rcf_overlay.fab$r_rcf_bits.fab$v_rcf_aiB#define fab$v_rcf_bi fab$r_rcf_overlay.fab$r_rcf_bits.fab$v_rcf_bi"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate FABDEF operates after aggregate end */N#define FAB$K_BLN 80 /* length of fab */N#define FAB$C_BLN 80 /* length of fab */ S/* These are traditional macros that should be hand-maintained for compatibility */W/* Do not have to add new ones, but do have to maintain those that are here already. */D#define FAB$V_PPF_RAT 6 /* rat value for process-permanent files */#define FAB$S_PPF_RAT 8I#define FAB$V_PPF_IND 14 /* indirect access to process-permanent file */2#define FAB$V_ASY 0 /* asynchronous operations */2#define FAB$V_MXV 1 /* maximize version number */2#define FAB$V_SUP 2 / * supersede existing file */0#define FAB$V_TMP 3 /* create temporary file */;#define FAB$V_TMD 4 /* temporary file marked for delete */7#define FAB$V_DFW 5 /* deferred write (rel and idx) */1#define FAB$V_SQO 6 /* sequential access only */7#define FAB$V_RWO 7 /* rewind magnetic tape on open */:#define FAB$V_POS 8 /* use next magnetic tape position */)#define FAB$V_WCK 9 /* write checking */E#define FAB$V_NEF 10 /* not end of file, inihibit eof positioning */9#define FAB$V_RWC 11  /* rewind magnetic tape on close */B#define FAB$V_DMO 12 /* dismount mt on close (not implemented) *//#define FAB$V_SPL 13 /* spool file on close */8#define FAB$V_SCF 14 /* submit command file on close */'#define FAB$V_DLT 15 /* delete file */9#define FAB$V_NFS 16 /* non-file-structured operation */=#define FAB$V_UFO 17 /* user file open - no rms operation */@#define FAB$V_PPF 18 /* process permanent file (pio segment) */=#define FAB$V_INP 19 /* process permanent file is 'input'  */0#define FAB$V_CTG 20 /* contiguous extension *//#define FAB$V_CBT 21 /* contiguous best try */Y#define FAB$V_SYNCSTS 22 /* Synchronous status notification for asynchronous routines */)#define FAB$V_RCK 23 /* read checking */J#define FAB$V_NAM 24 /* use NAM block device, file and/or directory id */2#define FAB$V_CIF 25 /* create if non-existent */H#define FAB$V_ESC 27 /* 'escape' to non-standard functions ($modify) */a#define FAB$V_TEF 28 /* truncate at end-of-file on close (wri  te-accessed seq. disk file only) */E#define FAB$V_OFP 29 /* output file parse (only name type sticky) */L#define FAB$V_KFO 30 /* known file open (image activator only release 1) */%#define FAB$V_PUT 0 /* put access */%#define FAB$V_GET 1 /* get access */(#define FAB$V_DEL 2 /* delete access */(#define FAB$V_UPD 3 /* update access */*#define FAB$V_TRN 4 /* truncate access */+#define FAB$V_BIO 5 /* block i/o access */6#define FAB$V_BRO 6 /* block and record i/o access */d#define  FAB$V_EXE 7 /* execute access (caller must be exec or kernel mode, ufo must also be set) */(#define FAB$V_SHRPUT 0 /* put access */(#define FAB$V_SHRGET 1 /* get access */+#define FAB$V_SHRDEL 2 /* delete access */+#define FAB$V_SHRUPD 3 /* update access */8#define FAB$V_MSE 4 /* multi-stream connects enabled */%#define FAB$V_NIL 5 /* no sharing */F#define FAB$V_UPI 6 /* user provided interlocking (allows multiple */,#define FAB$V_ORG 4 /* file organization */#define FAB$S_ORG 4  =#define FAB$V_FTN 0 /* FORTRAN carriage control character */=#define FAB$V_CR 1 /* line feed - record -carriage return */6#define FAB$V_PRN 2 /* print-file carriage control */?#define FAB$V_BLK 3 /* records don't cross block boundaries */3#define FAB$V_MSB 4 /* MSB formatted byte count */J#define fab$b_dsbmsk fab$b_acmodes /* saved for backwards compatibility */-#define FAB$S_LNM_MODE 2 /* logical names */#define FAB$V_LNM_MODE 0(#define FAB$S_CHAN_MODE 2 /* channel */#define  FAB$V_CHAN_MODE 24#define FAB$S_FILE_MODE 2 /* files accessability */#define FAB$V_FILE_MODE 4</* The following defines were scrambled before VAX C V3.1 */8#define FAB$V_RU 1 /* (was 0) recovery unit recovery */7#define FAB$V_BI 2 /* (was 2) before image recovery */6#define FAB$V_AI 3 /* (was 1) after image recovery */#ifdef __NEW_STARLET#define FAB _fabdef#else#define FAB fabdef#endif1#define fab$l_jnl_real_stuff fab$r_jnl_real_stuff+#define fab$l_jnl_overlay fab$r_jnl_ov erlay%#define cc$rms_fab (*decc$ga_rms_fab)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdefV extern struct FAB cc$rms_fab; /* Declare initialized prototype data structures */# pragma extern_model __restore#elseY globalref struct FAB cc$rms_fab; /* Declare initialized prototype data structures */#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas su pported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FABDEF_LOADED */ ww{⛴/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSFALMSG.SDI ;1 *//********************************************************************************************************************************//*** MODULE $FALDEF ***/#ifndef __FALDEF_LOADED#define __FALDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previ ously-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 un ion#else#define __union variant_union#endif#endif N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:57:37.67 */N/* */N/* */J/* VERSION: 'X-1' */N/* */Q/***************************************************************************** *//** * */8/** COPYRIGHT (C) 1978, 1980, 1982, 1984 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * * /Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION.  * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/* */N/*++ */N/* FACILITY:  */N/* */J/* MESSAGES ARE FOR THE FAL (DECNET FILE ACCESS LISTENER) FACILITY, BUT */I/* ARE GENERATED ON BEHALF OF FAL BY RMS. */N/* */N/* ABSTRACT: */N/*  */K/* THIS MODULE DEFINES FAL STATUS CODE SYMBOLS AND CORRESPONDING MESSAGE */J/* TEXT. NOTE THAT THIS MESSAGE FILE IS MAINTAINED BY THE RMS FACILITY, */J/* NOT THE FAL FACILITY, BECAUSE RMS DOES THE TRANSLATION OF DAP STATUS */N/* INTO FAL STATUS CODES WHICH ARE REPORTED AS SECONDARY STATUS INFORMATION */M/* TO THE RMS$_NETFAIL AND RMS$_SUPPORT COMPLETION CODES ON BEHALF OF FAL. */N/* */N/* ENVIRONMENT:  VAX/VMS */N/* */I/* AUTHOR: JAMES A. KRYCKA, CREATION DATE: 15-JAN-1982 */N/* */N/* MODIFIED BY: */N/* */4/* X-1 RAB RICHARD A. BISHOP 24-JUN-1991  */B/* MOVED TO [STARLET] FACILITY */N/* */I/* ================================== */I/* OLD AUDIT TRAIL FOLLOWS: */N/* */8/* X-3 SAD009 STUART A. DAVIDSON 06-OCT-1986 */B/* ADD STATUS CODES FOR SNADTF.  */N/* */3/* X-2 DAS DAVID A. SOLOMON 01-AUG-1986 */B/* REMOVE /MACRO= ON .FACILITY SO THE PROPER MACROS WILL */B/* BE GENERATED IN THE SDL FILE. */N/* */=/* V03-001 JAK0147 J A KRYCKA 09-JUL-1984 */B/* ADD ERROR CODES THAT CORRESPOND TO DAP MICCODES 416 TO 470 */B/* (OCTAL) FOR  MACCODES 4 THROUGH 7 DEFINED IN THE DAP V7.0 */B/* SPECIFICATION. */N/* */N/*-- */N/*++ */N/* DEFINE FAL STATUS CODES FOR USE BY RMS AS SECONDARY STATUS CODES. */N/*  */N/* LAYOUT OF MESSAGE SPACE: */N/* */;/* MSG NUMBERS MSG NUMBERS MSG CODES DESCRIPTION */A/* (DECIMAL) (HEXADECIMAL) (HEXADECIMAL) */N/* */=/* 0 - 1023 0000 - 03FF 8000 - 9FFF UNUSED */=/* 1024 - 2047 0400 - 07FF A000 - BFFF FOR RMS$_NETFAIL  */=/* 2048 - 4095 0800 - 0FFF C000 - FFFF FOR RMS$_SUPPORT */N/*-- */#define FAL$_FACILITY 503N/*+ */R/* DEFINE FAL STATUS CODES THAT ARE ASSOCIATED WITH THE RMS$_NETFAIL COMPLETION */N/* CODE AND RETURNED IN THE STV FIELD OF THE FAB OR RAB. */N/* */N/* U SE THE FOLLOWING FORMULA TO MAP A DAP STATUS CODE (STSCODE FIELD WITH */P/* MACCODE = 4 THRU 7) INTO A CORRESPONDING FAL MESSAGE CODE (LOWER 16 BITS): */N/* */I/* MESSAGE-CODE = (2**15 + ((MICCODE + 1024) * 8) + SEVERITY-LEVEL) */N/* */M/* NOTE: THE FIRST THREE CHARACTERS OF THE MESSAGE IDENTIFICATION MNEMONIC */I/* FOR EACH MESSAGE CODE IN THIS SET INDICATES ITS ORIGIN AS FOLLOWS: */N/* */K/* RMS --- THE CODE IS DEFINED FOR RMS-11 OR RMS-20, BUT NOT FOR RMS-32. */B/* (RMS-32 COMPLETION CODES ARE DEFINED IN RMSDEF.MDL.) */I/* FCS --- THE CODE IS DEFINED FOR THE FCS-11 ENVIRONMENT. */I/* TEN --- THE CODE IS DEFINED FOR THE TOPS-10 ENVIRONMENT. */I/* DAP --- ORIGIN IN THE DAP SPECIFICATION IS UNKNOWN. */N/*-  */#define FAL$_OFFSET_A 1024N/* MICCODE = 0000 (OCTAL) */#define FAL$_DAPFAIL 33005572#define FAL$_RMSABO 33005580N/* MICCODE = 0011 (OCTAL) */#define FAL$_RMSAST 33005644#define FAL$_RMSBPA 33005652#define FAL$_RMSBPS 33005660N/* MICCODE = 0026 (OCTAL) */#define FAL$_R  MSCLS 33005748N/* MICCODE = 0056 (OCTAL) */#define FAL$_RMSFID 33005940N/* MICCODE = 0071 (OCTAL) */#define FAL$_RMSINI 33006028N/* MICCODE = 0102 (OCTAL) */#define FAL$_RMSLBL 33006100#define FAL$_RMSLBY 33006108#define FAL$_RMSLCH 33006116N/* MICCODE = 0106 (OCTAL) */#define FAL$_RMSLOC  33006132#define FAL$_RMSMAP 33006140N/* MICCODE = 0115 (OCTAL) */#define FAL$_RMSNID 33006188N/* MICCODE = 0117 (OCTAL) */#define FAL$_RMSOPN 33006204N/* MICCIDE = 0124 (OCTAL) */#define FAL$_RMSPRM 33006244N/* MICCODE = 0153 (OCTAL) */#define FAL$_RMSSTK 33006428N/* MICCODE = 0162 (OCTAL)  */#define FAL$_RMSVOL 33006484N/* MICCODE = 0170 (OCTAL) */#define FAL$_RMSCAA 33006532N/* MICCODE = 0231 (OCTAL) */#define FAL$_RMSBLK 33006796#define FAL$_RMSBSZ 33006804#define FAL$_RMSCDR 33006812#define FAL$_RMSCGJ 33006820#define FAL$_RMSCOF 33006828#define FAL$_RMSJFN 33006836#define FAL$_RMSPEF 33006844#define FAL$_RMSTRU 33 006852#define FAL$_RMSUDF 33006860#define FAL$_RMSXCL 33006868#define FAL$_DAPDIRFUL 33006876#define FAL$_FCSHWR 33006884#define FAL$_FCSFHE 33006892#define FAL$_DAPWRTEOF 33006900#define FAL$_FCSONP 33006908#define FAL$_FCSDNA 33006916#define FAL$_FCSDAA 33006924#define FAL$_FCSDUN 33006932#define FAL$_FCSRSU 33006940#define FAL$_FCSOVR 33006948#define FAL$_FCSBCC 33006956#define FAL$_FCSNOD 33006964#define FAL$_FCSIFU 33006972#define FAL$_FCSHFU 33006980#define FA L$_FCSWAC 33006988#define FAL$_FCSCKS 33006996#define FAL$_FCSWAT 33007004#define FAL$_FCSALN 33007012#define FAL$_FCSBTF 33007020#define FAL$_FCSILL 33007028#define FAL$_FCS2DV 33007036#define FAL$_FCSFEX 33007044#define FAL$_FCSRNM 33007052#define FAL$_FCSFOP 33007060#define FAL$_FCSVER 33007068#define FAL$_FCSEOV 33007076#define FAL$_FCSDAO 33007084#define FAL$_FCSBBE 33007092#define FAL$_FCSEOT 33007100#define FAL$_FCSNBF 33007108#define FAL$_FCSNBK 33007116#defin  e FAL$_FCSNST 33007124#define FAL$_FCSULK 33007132#define FAL$_FCSNLN 33007140#define FAL$_FCSSRE 33007148N/* MICCODE = 0311 (OCTAL) */#define FAL$_DAPQUOEXC 33007180N/* MICCODE = 0346 (OCTAL) */#define FAL$_DAPDIRCAF 33007412#define FAL$_DAPDIRCRA 33007420#define FAL$_DAPDIRPRO 33007428#define FAL$_DAPDIRPRA 33007436#define FAL$_DAPDIRNFA 33007444#define FAL$_DAPDIRCON 33007 452N/* MICCODE = 0416 (OCTAL) */#define FAL$_TENFILMOD 33007732#define FAL$_TENDEVNA 33007740#define FAL$_TENDEVNF 33007748#define FAL$_TENPARALL 33007756#define FAL$_TENBNFREE 33007764#define FAL$_TENCSDF 33007772#define FAL$_TENCDDF 33007780#define FAL$_TENSFDNF 33007788#define FAL$_TENSLE 33007796#define FAL$_TENSFDCNT 33007804#define FAL$_TENNCESL 33007812#define FAL$_TENCUPFIL 33007820#define FAL$_TENNETCAP 33007! 828#define FAL$_TENTSKNA 33007836#define FAL$_TENNODNF 33007844#define FAL$_TENSFDREN 33007852#define FAL$_TENCDFNDR 33007860#define FAL$_TENJCREAD 33007868#define FAL$_TENRENSFD 33007876#define FAL$_TENDEVDWN 33007884#define FAL$_TENDEVRES 33007892#define FAL$_TENDEVMDA 33007900#define FAL$_TENDEVALL 33007908#define FAL$_TENILLDM 33007916#define FAL$_TENLPTPAG 33007924#define FAL$_TENLPTVFU 33007932#define FAL$_TENLPTCHR 33007940#define FAL$_TENLPTRAM 3300794" 8#define FAL$_TENFILSPC 33007956N/* MICCODE = 0453 (OCTAL) */#define FAL$_TENNSNOD 33007964#define FAL$_TENANODI 33007972#define FAL$_TENSNODI 33007980#define FAL$_TENNSDEV 33007988#define FAL$_TENADEVI 33007996#define FAL$_TENSDEVI 33008004#define FAL$_TENNSDIR 33008012#define FAL$_TENADIRI 33008020#define FAL$_TENSDIRI 33008028#define FAL$_TENNSFIL 33008036#define FAL$_TENAFILI 33008044#define FAL$_TENSFILI 33008052#def # ine FAL$_TENAFILR 33008060#define FAL$_TENSFILR 33008068N/* MICCODE = 475 (OCTAL) */#define FAL$_DTFFALSHT 33008108#define FAL$_DTFNOFIL 33008116#define FAL$_DTFNOREC 33008124#define FAL$_DTFNOTREG 33008132#define FAL$_DTFOPRABO 33008140N/* MICCODE = 504 (OCTAL) */#define FAL$_DTFRDCKP 33008164N/*+ */R/* DEFIN$ E FAL STATUS CODES THAT ARE ASSOCIATED WITH THE RMS$_SUPPORT COMPLETION */N/* CODE AND RETURNED IN THE STV FIELD OF THE FAB OR RAB. */N/* */N/* USE THE FOLLOWING FORMULA TO MAP A DAP STATUS CODE (STSCODE FIELD WITH */N/* MACCODE = 2) INTO A CORRESPONDING FAL MESSAGE CODE (LOWER 16 BITS): */N/* */I/* MESSAGE-CODE = (2**15 + ((M% ICCODE + 2048) * 8) + SEVERITY-LEVEL) */N/* */Q/* NOTE: THE INTENT IN THIS SECTION IS TO DEFINE FAL STATUS CODES ONLY FOR DAP */J/* FIELDS THAT CORRESPOND DIRECTLY TO RMS CONTROL BLOCK FIELDS USED FOR */K/* INPUT. FOR OTHER DAP FIELDS THAT MAY BE REJECTED BY THE REMOTE FAL AS */L/* BEING UNSUPPORTED, THE RMS$_SUP COMPLETION CODE IS RETURNED IN THE STS */K/* FIELD OF THE FAB OR RAB WITH AN ASSOCIATED DAP CODE IN THE ST& V FIELD. */N/*- */#define FAL$_OFFSET_B 2048N/* MICCODE = 0222 (OCTAL) */#define FAL$_ORG 33014932#define FAL$_RFM 33014940#define FAL$_RAT 33014948#define FAL$_BLS 33014956#define FAL$_MRS 33014964#define FAL$_ALQ1 33014972#define FAL$_BKS 33014980#define FAL$_FSZ 33014988#define FAL$_MRN 33014996N/* MICCODE = 0234 (OCTAL) ' */#define FAL$_DEQ1 33015012#define FAL$_FOP1 33015020N/* MICCODE = 0241 (OCTAL) */#define FAL$_LRL 33015052N/* MICCODE = 0320 (OCTAL) */#define FAL$_ACCFUNC 33015428N/* MICCODE = 0323 (OCTAL) */#define FAL$_FAC 33015452#define FAL$_SHR 33015460N/* MICCODE = 0420 (OCTAL) ( */#define FAL$_CTLFUNC 33015940N/* MICCODE = 0422 (OCTAL) */#define FAL$_RAC 33015956#define FAL$_KEY 33015964#define FAL$_KRF 33015972#define FAL$_ROP 33015980N/* MICCODE = 0520 (OCTAL) */#define FAL$_CONFUNC 33016452N/* MICCODE = 0720 (OCTAL) */#define FAL$_CMPFUNC 33017476#define FAL$_FOP2 33017484N/* MICCODE = 122) 1 (OCTAL) */#define FAL$_FLG 33019020#define FAL$_DFL 33019028#define FAL$_IFL 33019036N/* MICCODE = 1225 (OCTAL) */#define FAL$_POS 33019052#define FAL$_SIZ 33019060#define FAL$_REF 33019068#define FAL$_KNM 33019076#define FAL$_NUL 33019084#define FAL$_IAN 33019092#define FAL$_LAN 33019100#define FAL$_DAN 33019108#define FAL$_DTP 33019116N/* MICCODE = 1321 (OCTAL) * */#define FAL$_VOL 33019532#define FAL$_ALN 33019540#define FAL$_AOP 33019548#define FAL$_LOC 33019556N/* MICCODE = 1326 (OCTAL) */#define FAL$_ALQ2 33019572#define FAL$_AID 33019580#define FAL$_BKZ 33019588#define FAL$_DEQ2 33019596N/* MICCODE = 1521 (OCTAL) */#define FAL$_CDT 33020556#define FAL$_RDT 33020564#define FAL$ + _EDT 33020572#define FAL$_RVN 33020580N/* MICCODE = 1621 (OCTAL) */#define FAL$_OWNER 33021068#define FAL$_PROTSYS 33021076#define FAL$_PROTOWN 33021084#define FAL$_PROTGRP 33021092#define FAL$_PROTWLD 33021100 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */, #endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FALDEF_LOADED */ ww㛴/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]FDL$ROUTINES.SDI;1 *//*************************************************************************************************** - *****************************/'/*** MODULE FDL$ROUTINES IDENT X-2 ***/#ifndef __FDL_ROUTINES_LOADED#define __FDL_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* / */N/* File Definition Language (FDL) Routines */N/* */N/* Note - FDL routines accept only class S string descriptors */N/* */N/* */N/* FDL$CREATE - Create a file 0 */N/* */N/* status = FDL$CREATE (fdl_desc [,filename] [,default_name] */N/* [,result_name] [,fid_block] [,flags] */N/* [,stmnt_num] [,retlen] [,sts] [,stv] */;/* [,dflt-fdl-spc] */N/* */N/* 1 fdl_desc - Name of file or string containg FDL statements */N/* filename - Name of file to be created */N/* default_name - Default name string */N/* result_name - Receives resultant file name */N/* fid_block - Receives file ID of created file */N/* flags - Flags controlling operation */N/* stmt_num - Receives nu 2 mber of statement in error */N/* retlen - Receives length of result_name */N/* sts - Receives RMS STS value */N/* stv - Receives RMS STV value */N/* dflt-fdl-spc - Name of file or string containing default FDL statements */#define fdl$create FDL$CREATE #ifdef __NEW_STARLETunsigned int fdl$create( void *fdl_desc, __optional_params );#else 3 /* __OLD_STARLET */*unsigned int fdl$create(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* FDL$GENERATE - Generate an FDL specification from a file */N/* */N/* status = FDL$GENERATE (flags, fab_pointer, rab_pointer */N/* [,fdl_file_dst] [,fdl_file_resnam] */;/* 4 [,fdl_str_dst] [,bad_blk_addr] [,retlen]) */N/* */N/* flags - Flags controlling operation */N/* fab_pointer - Address of FAB block */N/* rab_pointer - Address of RAB block */N/* fdl_file_dst - Name of FDL file to be created */N/* fdl_file_resnam - Receives resultant name of 5 FDL file */N/* fdl_str_dst - Receives FDL string */N/* bad_blk_addr - Receives address of invalid RMS block */N/* retlen - Receives length of fdl_file_resnam or fdl_str_dst */N/* */##define fdl$generate FDL$GENERATE #ifdef __NEW_STARLETunsigned int fdl$generate( unsigned int *flags, void *fab_pointer, void *rab_point 6 er, __optional_params );#else /* __OLD_STARLET */,unsigned int fdl$generate(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* FDL$PARSE - Parse an FDL specification */N/* */N/* status = FDL$PARSE (fdl_spec, fdl_fab_pointer, fdl_rab_pointer */N/* [,flags] [,dflt_fdl_s7 pec] [,stmt_num]) */N/* */N/* fdl_spec - Name of FDL file or FDL string to be parsed */N/* fdl_fab_pointer - Receives address of created FAB */N/* fdl_rab_pointer - Receives address of created RAB */N/* flags - Flags controlling operation */N/* dflt_fdl_spec - Name of default FDL file or default FDL string 8 */N/* stmt_num - Receives number of statement in error */N/* */#define fdl$parse FDL$PARSE #ifdef __NEW_STARLETunsigned int fdl$parse( void *fdl_spec, void *fdl_fab_pointer, void *fdl_rab_pointer, __optional_params );#else /* __OLD_STARLET */)unsigned int fdl$parse(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* 9 */N/* FDL$RELEASE - Release FDL context */N/* */N/* status = FDL$RELEASE ([fab_pointer] [,rab_pointer] [,flags] */N/* [,badblk_addr]) */N/* */N/* fab_pointer - Address of FAB to be deallocated : */N/* rab_pointer - Address of RAB to be deallocated */N/* flags - Flags controlling operation */N/* badblk_addr - Recives address of invalid RMS block */N/* */!#define fdl$release FDL$RELEASE #ifdef __NEW_STARLETunsigned int fdl$release( __optional_params );#else /* __OLD_STARLET */+unsigned int fdl$release(__unknown_p; arams);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __FDL_ROUTINES_LOADED */ wwN㛴/***************************************************************************************************** < ***************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $FDLDEF ***/#ifndef __FDLDEF_LOADED#define __FDLDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragm= a __nomember_alignmentR#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#i> f !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 N/*+ */N/* Define the version level of the FDL file structure */N/*- */#define FDL$C_VERSION 2#define ? FDL$K_VERSION 2N/*+ */N/* FDL CALL INTERFACE CONTROL FLAGS */N/*- */#define FDL$M_SIGNAL 0x1#define FDL$M_FDL_STRING 0x2 #define FDL$M_DEFAULT_STRING 0x4#define FDL$M_FULL_OUTPUT 0x8#define FDL$M_$CALLBACK 0x10#define FDL$M_LONG_NAMES 0x20 #ifdef __NEW_STARLETtypedef union _fdldef { __struct@ {N unsigned fdl$v_signal : 1; /* SIGNAL ERRORS, DON'T RETURN */N unsigned fdl$v_fdl_string : 1; /* MAIN FDL SPEC IS A CHAR STRING */R unsigned fdl$v_default_string : 1; /* DEFAULT FDL SPEC IS A CHAR STRING */N unsigned fdl$v_full_output : 1; /* PRODUCE A 'COMPLETE' FDL SPEC */N unsigned fdl$v_$callback : 1; /* USED BY EDF ON INPUT (DEC ONLY) */Q unsigned fdl$v_long_names : 1; /* Allocate and use NAML for FDL$PARSE */# unsi A gned fdl$v_fill_0_ : 2; } fdl$r_fdldef_bits; } FDLDEF; #if !defined(__VAXC)3#define fdl$v_signal fdl$r_fdldef_bits.fdl$v_signal;#define fdl$v_fdl_string fdl$r_fdldef_bits.fdl$v_fdl_stringC#define fdl$v_default_string fdl$r_fdldef_bits.fdl$v_default_string=#define fdl$v_full_output fdl$r_fdldef_bits.fdl$v_full_output9#define fdl$v_$callback fdl$r_fdldef_bits.fdl$v_$callback;#define fdl$v_long_names fdl$r_fdldef_bits.fdl$v_long_names"#endif /* #if !defined(__VAXC) */ B #else /* __OLD_STARLET */union fdldef { __struct {N unsigned fdl$v_signal : 1; /* SIGNAL ERRORS, DON'T RETURN */N unsigned fdl$v_fdl_string : 1; /* MAIN FDL SPEC IS A CHAR STRING */R unsigned fdl$v_default_string : 1; /* DEFAULT FDL SPEC IS A CHAR STRING */N unsigned fdl$v_full_output : 1; /* PRODUCE A 'COMPLETE' FDL SPEC */N unsigned fdl$v_$callback : 1; /* USED BY EDF ON INPUT (DEC ONLY) */Q unsigned fdl$v_long_name C s : 1; /* Allocate and use NAML for FDL$PARSE */# unsigned fdl$v_fill_0_ : 2; } fdl$r_fdldef_bits; } ; #if !defined(__VAXC)3#define fdl$v_signal fdl$r_fdldef_bits.fdl$v_signal;#define fdl$v_fdl_string fdl$r_fdldef_bits.fdl$v_fdl_stringC#define fdl$v_default_string fdl$r_fdldef_bits.fdl$v_default_string=#define fdl$v_full_output fdl$r_fdldef_bits.fdl$v_full_output9#define fdl$v_$callback fdl$r_fdldef_bits.fdl$v_$callback;#define fdl$v_long_names fdl$r_fdldef_biD ts.fdl$v_long_names"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FDLDEF_LOADED */ ww㛴/*************************************************** E *****************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]FDLMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $FDLMSGDEF ***/#ifndef __FDLMSGDEF_LOADED#define __FDLMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard feF atures */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __G 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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:41.06 */N/* H */N/* */J/* VERSION: 'X-4' */N/* */O/* ************************************************************************* */O/* * * */O/* * COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION, 1978, 1979, 1980, 1981, * */OI /* * 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992 * */O/* * ALL RIGHTS RESERVED. * */O/* * UNPUBLISHED RIGHTS RESERVED UNDER THE COPYRIGHT LAWS OF THE UNITED * */O/* * STATES. * */O/* * * */O/* * THE SOFTWARE CONTAINED ON THIS MEDIA IS PROPRIETARY TO AND EMBODIES * */O/* * THE CONJ FIDENTIAL TECHNOLOGY OF DIGITAL EQUIPMENT CORPORATION. * */O/* * POSSESSION, USE, DUPLICATION OR DISSEMINATION OF THE SOFTWARE AND * */O/* * MEDIA IS AUTHORIZED ONLY PURSUANT TO A VALID WRITTEN LICENSE FROM * */O/* * DIGITAL EQUIPMENT CORPORATION. * */O/* * * */O/* * RESTRICTED RIGHTS LEGEND USE, DUPLICATION, OR DISCLOSURE BY THE U.S. * */O/* * GOVERNMENT IS SUBJECTK TO RESTRICTIONS AS SET FORTH IN SUBPARAGRAPH * */O/* * (C)(1)(II) OF DFARS 252.227-7013, OR IN FAR 52.227-19, AS APPLICABLE. * */O/* * * */O/* ************************************************************************* */N/*++ */N/* */K/* FACILITY: VAX-11 FDL UTILITIES L */N/* */N/* ENVIRONMENT: */N/* */B/* VAX/VMS OPERATING SYSTEM */N/* */N/* ABSTRACT: */B/* FDM L ERROR MESSAGES */N/* */N/* */N/*-- */N/* */A/* AUTHOR: KEITH B THOMPSON CREATION DATE: AUGUST-1980 */N/* N */N/* */N/* MODIFIED BY: */N/* */3/* X-4 BP026 BOB PREMOVICH 28-MAY-1998 */B/* CREATE LITERAL MESSAGE VALUES FOR THE MESSAGES THAT */B/* WERE UTILIZING THE $SHR_MSGDEF MACRO. THIS IS TO */B/* FACILITATE THE MOVE OF THE MESSAGES TO THE STARL O ET */B/* FACILITY. */N/* */4/* X-3 CW002 CHRIS WHITAKER 26-AUG-1992 */B/* MERGE IN AMBER CHANGES. */N/* */7/* X-3 SBL1003 STEVEN B. LIONEL 13-DEC-1991 */B/* SET MACRO NAME TO $FDMLSGDEF */N/* P */6/* X-2 RNM0063 RUSSELL MURRAY 13-APR-1988 */B/* ADD TAGGED FILE SUPPORT. ADD MESSAGE FDL$_UNKNOWN_TAG */N/* */9/* V03-004 KFH0003 KEN HENDERSON 21 DEC 1982 */B/* REWORDED "key word" TO "keyword" */N/* */9/* V03-003 KFH0002 KEN HENDQ ERSON 22-NOV-1982 */B/* REWORDED "on line" TO "in statement" */N/* */9/* V03-002 KFH0001 KEN HENDERSON 25-OCT-1982 */B/* ADDED INVBLK MESSAGE */N/* */:/* V03-001 KBT0033 KEITH THOMPSON 31-MAR-1982 */B/* ADD INVDATIM MESSAGE R */N/* */N/***** */#define FDL$_FACILITY 180N#define FDL$_BADLOGIC 11800866 /* */P#define FDL$_CLOSEIN 11800658 /* /FAO=1 */Q#define FDL$_CLOSEOUT 11800666 /* /FAO=1 */N#define FDL$_CREATED 11800691 /* /FAO=1S */[#define FDL$_CREATEDSTM 11801339 /* /FAO=1 */N#define FDL$_INSVIRMEM 11801330 /* */P#define FDL$_OPENIN 11800730 /* /FAO=1 */Q#define FDL$_OPENOUT 11800738 /* /FAO=1 */N#define FDL$_READERR 11800754 /* /FAO=1 */T#define FDL$_VALERR 11801066 /* */N#define FDL$_WRITEERR 11800786 /* /FAO=1 */#define FDL$_FAO_MAX 5#define FDL$_TITLE 11829259#define FDL$_ABKW 11829264#define FDL$_INVDATIM 11829272#define FDL$_MULSEC 11829280#define FDL$_NOQUAL 11829288#define FDL$_NULLPRI 11829296#define FDL$_RFLOC 11829304#define FDL$_VALPRI 11829312#define FDL$_UNQUAKW 11829320#define FDL$_UNSECKW 11829328#define FDL$_WARNING 11829336#define FDL$_ABPRIKW 11829346#define FDL$_CU REATE 11829354#define FDL$_FDLERROR 11829362#define FDL$_ILL_ARG 11829370#define FDL$_MULPRI 11829378#define FDL$_OPENFDL 11829386#define FDL$_OUTORDER 11829394#define FDL$_SYNTAX 11829402#define FDL$_UNPRIKW 11829410#define FDL$_INVBLK 11829418!#define FDL$_UNKNOWN_TAG 11829426 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined V required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FDLMSGDEF_LOADED */ ww䛴/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//***************************************************************************** W ***************************************************//*** MODULE $FDSCDEF ***/#ifndef __FDSCDEF_LOADED#define __FDSCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 /* AndX 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 N/* Y */N/* Function descriptor offset definitions for the IA64 VMS calling */N/* standard. This definition includes the offsets and fields for */N/* local, official, translated/native, and bound function descriptors. */N/* */</* Function descriptor kind quadwords in FD */N/* Z */G/* Local FD w/o translated image support 2 */H/* Local FD with translated image support 4 */J/* Official FD w/o translated image support 2 or 3 (see note) */K/* Official FD with translated image support 3 */./* Bound FD 6 */N/* */N/* Note: the official FD w/o translated image support coul[ d be 2 */N/* quadwords if the linker knows it's not a universal symbol and */N/* that no module exports its address. Until there's a way for */N/* compilers to notify the linker of this, all such FDs are 3 */N/* quadwords in length. */N/* */P#define FDSC$K_BOUND_SIZE 48 /* Size of bound procedure descriptor */ \ #ifdef __NEW_STARLETtypedef struct _fdscdef { __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *fdsc$q_entry; /* Simple FD: Entry code address */#else unsigned __int64 fdsc$q_entry;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And ] set ptr size default to 32-bit pointers */#endif void *fdsc$l_entry;R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */] void *fdsc$q_ots_entry; /* Bound FD: Entry code address of OTS$JUMP_TO_BPV */#else# unsigned __int64 fdsc$q_ots_entry;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __re ^ quired_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif void *fdsc$l_ots_entry; } fdsc$r_entry_overlay; __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *fdsc$q_gp; /* Simple FD: Global pointer */#else unsigned __int64 fdsc$q_gp;#endifR#ifdef __INITIAL_POINTER_SIZE _ /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif void *fdsc$l_gp;R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */s void *fdsc$q_ots_pseudo_gp; /* Bound FD: Global pointer for OTS$JUMP_TO_BPV (ie. address of this FD) */#else' unsigned __int64 fdsc ` $q_ots_pseudo_gp;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif# void *fdsc$l_ots_pseudo_gp; } fdsc$r_gp_overlay; __union {N unsigned __int64 fdsc$q_signature; /* Signature information field */ __struct {, unsigned int fdsc$l_signature_l;, unsigned int fdsc$l_signature_h;& } a fdsc$r_signature_struct;# } fdsc$r_signature_overlay; __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */w void *fdsc$q_target_entry; /* PD address of translated routine or entry code address of bound procedure */#else& unsigned __int64 fdsc$q_target_entry;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas su b pported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void *fdsc$l_target_entry;& } fdsc$r_target_entry_overlay; __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */P void *fdsc$q_target_gp; /* Global pointer for bound procedure */#else# unsigned __int64 fdsc$q_target_gp c ;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif void *fdsc$l_target_gp;# } fdsc$r_target_gp_overlay; __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */p void *fdsc$q_target_envir; /* Ed nvironment value for bound procedure (uplevel-addressing pointer) */#else& unsigned __int64 fdsc$q_target_envir;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void *fdsc$l_target_envir;& } fdsc$r_target_envir_overlay; } FDSCDEF; #if !defined(__VAXC)6#define fdsc$q_entry fdsc$r_entry_overlay.fdsc$q_entry6#define fdsc$l_entry e fdsc$r_entry_overlay.fdsc$l_entry>#define fdsc$q_ots_entry fdsc$r_entry_overlay.fdsc$q_ots_entry>#define fdsc$l_ots_entry fdsc$r_entry_overlay.fdsc$l_ots_entry-#define fdsc$q_gp fdsc$r_gp_overlay.fdsc$q_gp-#define fdsc$l_gp fdsc$r_gp_overlay.fdsc$l_gpC#define fdsc$q_ots_pseudo_gp fdsc$r_gp_overlay.fdsc$q_ots_pseudo_gpC#define fdsc$l_ots_pseudo_gp fdsc$r_gp_overlay.fdsc$l_ots_pseudo_gpB#define fdsc$q_signature fdsc$r_signature_overlay.fdsc$q_signature^#define fdsc$l_signature_l fdsc$r_signf ature_overlay.fdsc$r_signature_struct.fdsc$l_signature_l^#define fdsc$l_signature_h fdsc$r_signature_overlay.fdsc$r_signature_struct.fdsc$l_signature_hK#define fdsc$q_target_entry fdsc$r_target_entry_overlay.fdsc$q_target_entryK#define fdsc$l_target_entry fdsc$r_target_entry_overlay.fdsc$l_target_entryB#define fdsc$q_target_gp fdsc$r_target_gp_overlay.fdsc$q_target_gpB#define fdsc$l_target_gp fdsc$r_target_gp_overlay.fdsc$l_target_gpK#define fdsc$q_target_envir fdsc$r_target_envir_overlay.fdscg $q_target_envirK#define fdsc$l_target_envir fdsc$r_target_envir_overlay.fdsc$l_target_envir"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _fdscdef { __union {N unsigned __int64 fdsc$q_entry; /* Simple FD: Entry code address */ int fdsc$l_entry;` unsigned __int64 fdsc$q_ots_entry; /* Bound FD: Entry code address of OTS$JUMP_TO_BPV */ int fdsc$l_ots_entry; } fdsc$r_entry_overlay; __union {N h unsigned __int64 fdsc$q_gp; /* Simple FD: Global pointer */ int fdsc$l_gp;z unsigned __int64 fdsc$q_ots_pseudo_gp; /* Bound FD: Global pointer for OTS$JUMP_TO_BPV (ie. address of this FD) */! int fdsc$l_ots_pseudo_gp; } fdsc$r_gp_overlay; __union {N unsigned int fdsc$q_signature [2]; /* Signature information field */ __struct {, unsigned int fdsc$l_signature_l;, unsigned int fdsc$l_signature_h;& i } fdsc$r_signature_struct;# } fdsc$r_signature_overlay; __union {} unsigned __int64 fdsc$q_target_entry; /* PD address of translated routine or entry code address of bound procedure */ int fdsc$l_target_entry;& } fdsc$r_target_entry_overlay; __union {S unsigned __int64 fdsc$q_target_gp; /* Global pointer for bound procedure */ int fdsc$l_target_gp;# } fdsc$r_target_gp_overlay; __union {v unsigned __int64 fdsc$ j q_target_envir; /* Environment value for bound procedure (uplevel-addressing pointer) */ int fdsc$l_target_envir;& } fdsc$r_target_envir_overlay; } fdscdef; #if !defined(__VAXC)6#define fdsc$q_entry fdsc$r_entry_overlay.fdsc$q_entry6#define fdsc$l_entry fdsc$r_entry_overlay.fdsc$l_entry>#define fdsc$q_ots_entry fdsc$r_entry_overlay.fdsc$q_ots_entry>#define fdsc$l_ots_entry fdsc$r_entry_overlay.fdsc$l_ots_entry-#define fdsc$q_gp fdsc$r_gp_overlay.fdsc$q_gp-#define fdsck $l_gp fdsc$r_gp_overlay.fdsc$l_gpC#define fdsc$q_ots_pseudo_gp fdsc$r_gp_overlay.fdsc$q_ots_pseudo_gpC#define fdsc$l_ots_pseudo_gp fdsc$r_gp_overlay.fdsc$l_ots_pseudo_gpB#define fdsc$q_signature fdsc$r_signature_overlay.fdsc$q_signature^#define fdsc$l_signature_l fdsc$r_signature_overlay.fdsc$r_signature_struct.fdsc$l_signature_l^#define fdsc$l_signature_h fdsc$r_signature_overlay.fdsc$r_signature_struct.fdsc$l_signature_hK#define fdsc$q_target_entry fdsc$r_target_entry_overlay.fdsc$q_target_ l entryK#define fdsc$l_target_entry fdsc$r_target_entry_overlay.fdsc$l_target_entryB#define fdsc$q_target_gp fdsc$r_target_gp_overlay.fdsc$q_target_gpB#define fdsc$l_target_gp fdsc$r_target_gp_overlay.fdsc$l_target_gpK#define fdsc$q_target_envir fdsc$r_target_envir_overlay.fdsc$q_target_envirK#define fdsc$l_target_envir fdsc$r_target_envir_overlay.fdsc$l_target_envir"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdefm __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FDSCDEF_LOADED */ ww;`䛴/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* S n ource: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $FIBDEF ***/#ifndef __FIBDEF_LOADED#define __FIBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas suppo orted */\#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#ep ndif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*---- */N/* */N/* LAYOUT OF THE FILE IDENTIFICATION BLOCK (FIB) */N/* */N/***** q */N/* */Y/* NOTE: If the size of the FIB is changed the following must be changed */N/* to reflect the change: */N/* */N/* In Module: [RMS.SRC]RMSFWADEF.SDL */N/* r */N/* Field: FWA$T_FIBBUF */N/* */N/* Constant: FWA$C_FIBLEN */N/* */N/* Both the field and constant must be GEQ to the size of */N/* the FIB, i.e. FIB$C_LENGTH. FIB length is currently 96. */N/* s */N/***** */N/* */#define FIB$M_NOWRITE 0x1#define FIB$M_DLOCK 0x2#define FIB$M_BLK_LOCK 0x4#define FIB$M_FASTRDSQNOS 0x8#define FIB$M_SPOOL 0x10#define FIB$M_WRITECK 0x20#define FIB$M_SEQONLY 0x40#define FIB$M_SEQNO 0x80#define FIB$M_WRITE 0x100#define FIB$M_READCK 0x200t #define FIB$M_NOREAD 0x400#define FIB$M_NOTRUNC 0x800#define FIB$M_CONTROL 0x1000!#define FIB$M_NO_READ_DATA 0x2000#define FIB$M_SSIO 0x4000#define FIB$M_EXECUTE 0x10000#define FIB$M_PRSRV_ATR 0x20000#define FIB$M_RMSLOCK 0x40000#define FIB$M_WRITETHRU 0x80000#define FIB$M_NOLOCK 0x100000#define FIB$M_NORECORD 0x200000#define FIB$M_NOVERIFY 0x400000!#define FIB$M_CHANGE_VOL 0x800000#define FIB$M_REWIND 0x8#define FIB$M_CURPOS 0x10#define FIB$M_UPDATE 0x40N#def u ine FIB$K_ACCDATA 10 /* ABOVE DATA NECESSARY FOR ACCESS */N#define FIB$C_ACCDATA 10 /* ABOVE DATA NECESSARY FOR ACCESS */U#define FIB$K_DIRDATA 22 /* ABOVE DATA NECESSARY FOR DIRECTORY OPS */U#define FIB$C_DIRDATA 22 /* ABOVE DATA NECESSARY FOR DIRECTORY OPS */#define FIB$M_NAMES_8BIT 0x1#define FIB$M_NAMES_16BIT 0x2!#define FIB$M_PERCENT_LITERAL 0x4#define FIB$M_ALLVER 0x8#define FIB$M_ALLTYP 0x10#define FIB$M_ALLNAM 0v x20!#define FIB$M_CASE_SENSITIVE 0x40#define FIB$M_SEARCH 0x80#define FIB$M_WILD 0x100#define FIB$M_NEWVER 0x200#define FIB$M_SUPERSEDE 0x400#define FIB$M_FINDFID 0x800#define FIB$M_FINDDIR 0x1000!#define FIB$M_CASE_VARIANT 0x2000#define FIB$M_LOWVER 0x4000#define FIB$M_HIGHVER 0x8000#define FIB$M_ALCON 0x1#define FIB$M_ALCONB 0x2#define FIB$M_FILCON 0x4#define FIB$M_ALDEF 0x8#define FIB$M_ALLOCATR 0x10#define FIB$M_EXTEND 0x80#define FIB$M_TRUNC 0x100#def w ine FIB$M_NOHDREXT 0x200#define FIB$M_MARKBAD 0x400#define FIB$M_NOPLACE 0x4000#define FIB$M_NOCHARGE 0x8000W#define FIB$K_EXTDATA 32 /* ABOVE NECESSARY FOR BASIC FILE EXTENSION */W#define FIB$C_EXTDATA 32 /* ABOVE NECESSARY FOR BASIC FILE EXTENSION */#define FIB$M_EXACT 0x1#define FIB$M_ONCYL 0x2N#define FIB$C_CYL 1 /* CYLINDER ADDRESS SPECIFIED */N#define FIB$C_LBN 2 /* LBN SPECIFIED x */N#define FIB$C_VBN 3 /* PROXIMATE VBN SPECIFIED */N#define FIB$C_RFI 4 /* RELATED FILE ID SPECIFIED */Q#define FIB$K_ALCDATA 44 /* ABOVE DATA NECESSARY FOR PLACEMENT */Q#define FIB$C_ALCDATA 44 /* ABOVE DATA NECESSARY FOR PLACEMENT */#define FIB$M_ALT_REQ 0x1#define FIB$M_ALT_GRANTED 0x2#define FIB$M_DIRACL 0x4#define FIB$M_PROPAGATE 0x8#define FIB$M_NOCOPYACL 0x10#define FIB$M_NOCOPYOWNER 0x y 20#define FIB$M_NOCOPYPROT 0x40#define FIB$M_EXCLPREVIOUS 0x80#define FIB$M_ALIAS_ENTRY 0x100 #define FIB$M_WILDFID_FLAG 0x200 #define FIB$M_DID_FILESPEC 0x400#define FIB$M_IS_SPECIAL 0x800"#define FIB$M_CHECK_SPECIAL 0x1000N#define FIB$K_MOVEFILE 72 /* end of FIB required by MOVEFILE */N#define FIB$C_MOVEFILE 72 /* end of FIB required by MOVEFILE */!#define FIB$M_FILE_ATTRIBUTES 0xF #define FIB$M_FILE_CONTENTS 0xF0N#define FIB$C_DEFAULT 0 z /*Use default caching policy */N#define FIB$C_WRITETHROUGH 1 /*Use writethrough caching */N#define FIB$C_WRITEBEHIND 2 /*Use writebehind caching */N#define FIB$C_NOCACHING 3 /*Do not cache file */"#define FIB$M_FLUSH_ON_CLOSE 0xF00S#define FIB$C_FLUSH 1 /*Flush file from cache when file closed */R#define FIB$C_NOFLUSH 2 /*Retain file in cache when file closed */,#define FIB$M_CA{ CHING_OPTIONS_MBZ 0xFFFFF000O#define FIB$C_ODS2 0 /* Name is ODS-2 legal ASCII encoded */N#define FIB$C_ISL1 1 /* Name is 8-bit (ISO Latin 1) */N#define FIB$C_ISO_LATIN 1 /* Synonym for ISL1 */N/* NOTE - Name format type 2 reserved (was UTF8) */N#define FIB$C_UCS2 3 /* Name is UCS-2 encoded (both) */U#define FIB$C_NAMETYPE_LEN 96 /* Length of FIB including NAMETYP| E fields */#define FIB$K_LENGTH 96#define FIB$C_LENGTH 96#define FIB$K_F64LEN 96#define FIB$C_F64LEN 96 #ifdef __NEW_STARLETtypedef struct _fibdef { __union {N unsigned int fib$l_acctl; /* ACCESS CONTROL BITS */ __struct {N unsigned fib$v_nowrite : 1; /* NO OTHER WRITERS */N unsigned fib$v_dlock : 1; /* ENABLE DEACCESS LOCK */N unsigned fib$v_blk_lock : 1; /* ENABLE RMS-11 } BLOCK LOCKING */N unsigned fib$v_fastrdsqnos : 1; /* READ HDRSEQ AND DATASEQ VALS */N unsigned fib$v_spool : 1; /* SPOOL FILE ON CLOSE */N unsigned fib$v_writeck : 1; /* ENABLE WRITE CHECK */N unsigned fib$v_seqonly : 1; /* SEQUENTIAL ONLY ACCESS */N unsigned fib$v_seqno : 1; /* STORE SEQNOS FOR THIS FILE */N unsigned fib$v_write : 1; /* WRITE ACCESS */N ~ unsigned fib$v_readck : 1; /* ENABLE READ CHECK */N unsigned fib$v_noread : 1; /* NO OTHER READERS */N unsigned fib$v_notrunc : 1; /* FILE MAY NOT BE TRUNCATED */N unsigned fib$v_control : 1; /* CONTROL ACCESS TO FILE */N unsigned fib$v_no_read_data : 1; /* NO READ ACCESS TO FILE DATA */N unsigned fib$v_ssio : 1; /* File is opened for SSIO access */N unsigned fibdef$$_ fill_3 : 1; /* SPARE */N/* THE HIGH 8 BITS CANNOT BE COPIED */N/* INTO THE ACCESS MODE WORD IN THE WINDOW */Z unsigned fib$v_execute : 1; /* ACCESS FOR EXECUTE (USE EXECUTE PROTECTION) */U unsigned fib$v_prsrv_atr : 1; /* PRESERVE ORIGINAL ATTRIBUTES OF FILE */N unsigned fib$v_rmslock : 1; /* OPEN WITH RMS RECORD LOCKING */W unsigned fib$v_writethru : 1; /* FORCE CACHE WRITE-THROUGH ON OPERATION */N unsigned fib$v_nolock : 1; /* OVERRIDE ACCESS INTERLOCKS */N unsigned fib$v_norecord : 1; /* DO NOT RECORD FILE ACCESS */N unsigned fib$v_noverify : 1; /* Do not perform compare on move. */^ unsigned fib$v_change_vol : 1; /* Allow Movefile move between volumes in a set. */ } fib$r_acctl_bits0; __struct {) unsigned fibdef$$_fill_5 : 3;N unsi gned fib$v_rewind : 1; /* REWIND TAPE */N unsigned fib$v_curpos : 1; /* CREATE AT CURRENT TAPE POSITION */) unsigned fibdef$$_fill_6 : 1;V unsigned fib$v_update : 1; /* UPDATE MODE (POSITION TO START OF FILE) */' unsigned fib$v_fill_1_ : 1; } fib$r_acctl_bits1; __struct {& char fibdef$$_fill_13 [3];N char fib$b_wsize; /* WINDOW SIZE */" } fib$r_acctl_fields2; } fib$r_acctl_overlay; __union {N unsigned short int fib$w_fid [3]; /* FILE ID */ __struct {N unsigned short int fib$w_fid_num; /* FILE NUMBER */N unsigned short int fib$w_fid_seq; /* FILE SEQUENCE NUMBER */ __union {O unsigned short int fib$w_fid_rvn; /* RELATIVE VOLUME NUMBER */ __struct {N unsigned char fi b$b_fid_rvn; /* SHORT FORM RVN */N unsigned char fib$b_fid_nmx; /* EXTENDED FILE NUMBER */+ } fib$r_fid_rvn_fields;( } fib$r_fid_rvn_overlay; } fib$r_fid_fields;N __struct { /* File ID fields for ISO 9660 */R unsigned short int fib$w_fid_dirnum; /* Directory number of File-Id */L unsigned int fib$l_fid_recnum; /* Record number of File-ID */( } fib$ r_fid_iso_9660_fields; } fib$r_fid_overlay; __union {N unsigned short int fib$w_did [3]; /* DIRECTORY ID */ __struct {N unsigned short int fib$w_did_num; /* FILE NUMBER */N unsigned short int fib$w_did_seq; /* FILE SEQUENCE NUMBER */ __union {O unsigned short int fib$w_did_rvn; /* RELATIVE VOLUME NUMBER */ __struct {N unsigned char fib$ b_did_rvn; /* SHORT FORM RVN */N unsigned char fib$b_did_nmx; /* EXTENDED FILE NUMBER */+ } fib$r_did_rvn_fields;( } fib$r_did_rvn_overlay; } fib$r_did_fields;N __struct { /* Directory ID fields for ISO 9660 */R unsigned short int fib$w_did_dirnum; /* Directory number of File-Id */L unsigned int fib$l_did_recnum; /* Record number of File-ID */( } fib$r_ did_iso_9660_fields; } fib$r_did_overlay;N unsigned int fib$l_wcc; /* WILD CARD CONTEXT */ __union {N unsigned short int fib$w_nmctl; /* NAME CONTROL BITS */ __struct {N unsigned fib$v_names_8bit : 1; /* RETURN 8BIT FILENAMES (HFS) */N unsigned fib$v_names_16bit : 1; /* RETURN 16BIT FILENAMES (HFS) */R unsigned fib$v_percent_literal : 1; /* PERCENT IS LITERAL (HFS) */N  unsigned fib$v_allver : 1; /* MATCH ALL VERSIONS */N unsigned fib$v_alltyp : 1; /* MATCH ALL TYPES */N unsigned fib$v_allnam : 1; /* MATCH ALL NAMES */N unsigned fib$v_case_sensitive : 1; /* case sensitive lookup */V unsigned fib$v_search : 1; /* Match names in purely case blind manner. */N/* (intended for search operations; normal file */N/* access should give prefere nce to exact match) */N unsigned fib$v_wild : 1; /* WILD CARDS IN FILE NAME */N unsigned fib$v_newver : 1; /* MAXIMIZE VERSION NUMBER */N unsigned fib$v_supersede : 1; /* SUPERSEDE EXISTING FILE */N unsigned fib$v_findfid : 1; /* SEARCH FOR FILE ID */Z unsigned fib$v_finddir : 1; /* SEARCH FOR DIR EXTENTION (Internal use only) */N/* the following bits are output, not input */Y unsigned fib$v_case_variant : 1; /* A case variant of this filename exists */N unsigned fib$v_lowver : 1; /* LOWER VERSION OF FILE EXISTS */N unsigned fib$v_highver : 1; /* HIGHER VERSION OF FILE EXISTS */ } fib$r_nmctl_bits; } fib$r_nmctl_overlay; __union {N unsigned short int fib$w_exctl; /* EXTEND CONTROL */ __struct {N unsigned fib$v_alcon : 1; /* ALLOCATE CONTIGUOUS */N unsigned fib$v_alconb : 1; /* CONTIGUOUS BEST EFFORT */N unsigned fib$v_filcon : 1; /* MARK FILE CONTIGUOUS */N unsigned fib$v_aldef : 1; /* ALLOCATE DEFAULT AMOUNT */X unsigned fib$v_allocatr : 1; /* PLACEMENT DATA PRESENT IN ATTRIBUTE LIST */* unsigned fibdef$$_fill_10 : 2;N unsigned fib$v_extend : 1; /* ENABLE EXTENSION */N  unsigned fib$v_trunc : 1; /* ENABLE TRUNCATION */N unsigned fib$v_nohdrext : 1; /* INHIBIT EXTENSION HEADERS */N unsigned fib$v_markbad : 1; /* MARK BLOCKS BAD */* unsigned fibdef$$_fill_11 : 3;V unsigned fib$v_noplace : 1; /* DON'T ADD PLACEMENT POINTERS IN MOVEFILE */N unsigned fib$v_nocharge : 1; /* DON'T CHARGE DISKQUOTA */ } fib$r_exctl_bits; } fib$r_exctl_over lay;N unsigned int fib$l_exsz; /* EXTEND SIZE */N unsigned int fib$l_exvbn; /* EXTENSION VBN */ __union {N unsigned char fib$b_alopts; /* ALLOCATION OPTIONS */ __struct {N unsigned fib$v_exact : 1; /* EXACT PLACEMENT REQUIRED */N unsigned fib$v_oncyl : 1; /* PUT ALLOCATION ON ONE CYLINDER */' unsigned fib$v_fill_2_ : 6; } fib$r_ alopts_bits; } fib$r_alopts_overlay;N unsigned char fib$b_alalign; /* ALLOCATION ALIGNMENT */ __union {N unsigned short int fib$w_alloc [5]; /* ALLOCATION LOCATION */ __struct { __union {N unsigned short int fib$w_loc_fid [3]; /* RELATED FILE ID */ __struct {P unsigned short int fib$w_loc_num; /* RELATED FILE NUMBER */Q unsigned short int fib$w _loc_seq; /* FILE SEQUENCE NUMBER */ __union {N unsigned short int fib$w_loc_rvn; /* RELATED RVN */# __struct {N unsigned char fib$b_loc_rvn; /* SHORT FORM RVN */T unsigned char fib$b_loc_nmx; /* EXTENDED FILE NUMBER */3 } fib$r_loc_rvn_fields;0 } fib$r_loc_rvn_overlay;+ } fib$r_loc_fid_fields;( } fib$r_loc_fid_overlay;P unsigned int fib$l_loc_addr; /* LOCATION ADDRESS (VBN, LBN, CYL) */! } fib$r_alloc_fields; } fib$r_alloc_overlay;N unsigned short int fib$w_verlimit; /* DIRECTORY ENTRY VERSION LIMIT */N unsigned char fib$b_agent_mode; /* AGENTS ACCESS MODE */N unsigned char fib$b_ru_facility; /* RECOVERABLE-FACILITY CODE */N unsigned int fib$l_aclctx; /* ACL CONTEXT FOR READ */N unsigned int fib$l_acl_status; /* RETURN STATUS FROM ACL OPERATION */ __union {N unsigned int fib$l_status; /* GENERAL STATUS LONGWORD */ __struct {N unsigned fib$v_alt_req : 1; /* ALTERNATE ACCESS REQUIRED */N unsigned fib$v_alt_granted : 1; /* ALTERNATE ACCESS GRANTED */N unsigned fib$v_diracl : 1; /* DO DIRECTORY ACL PROPAGATION */N unsigned fib$v_propagate : 1; /* DO PROPAGATION ON ENTER/MODIFY */N unsigned fib$v_nocopyacl : 1; /* DON'T PROPAGATE THE ACL */O unsigned fib$v_nocopyowner : 1; /* DON'T PROPAGATE THE OWNER UIC */T unsigned fib$v_nocopyprot : 1; /* DON'T PROPAGATE THE SOGW PROTECTION */` unsigned fib$v_exclprevious : 1; /* EXCLUDE THE PREVIOUS VERSION FROM PROPAGATION */\ unsigned fib$v_alias_entry : 1; /* FILE ACCESSED VIA AN ALIAS DIRECTORY ENTRY */N unsigned fib$v_wildfid_flag : 1; /* WILDCARD FID FLAG */N unsigned fib$v_did_filespec : 1; /* FILESPEC HAD BEEN DID'ED */R unsigned fib$v_is_special : 1; /* Special file detected and handled */N unsigned fib$v_check_special : 1; /* Check for special files */' unsigned fib$v_fill_3_ : 3; } fib$r_status_bits; } fib$r_status_overlay;N unsigned int fib$l_alt_access; /* ALTERNATE ACCESS MASK */ __union { __struct {N  unsigned int fib$l_mov_svbn; /* starting VBN (MOVEFILE) */N unsigned int fib$l_mov_vbncnt; /* count of VBNs (MOVEFILE) */ } fib$r_movfildp; } fib$r_funcdepend;Z unsigned short int fib$w_file_hdrseq_incr; /*header seq no increment for indiv file */] unsigned short int fib$w_dir_hdrseq_incr; /*header seq no increment for directory file */Y unsigned short int fib$w_file_dataseq_incr; /*data seq no increment for indiv file */\ un signed short int fib$w_dir_dataseq_incr; /*data seq no increment for driectory file */N/* Define fields and constant values for FIB$L_CACHING_OPTIONS longword. */N/* These must match [STARLET]ATRDEF.SDL exactly */ __union {O unsigned int fib$l_caching_options; /*F64XQP cache control bitvector */ __struct {R unsigned fib$v_file_attributes : 4; /*File attributes caching field */N unsigned fib$v_file_contents : 4; /*File c ontents caching field */N unsigned fib$v_flush_on_close : 4; /*Flush file on close field */N unsigned fib$v_caching_options_mbz : 20; /*Must be zero */) } fib$r_caching_options_bits;( } fib$r_caching_options_overlay;Q __union { /* FID field for Secondary File Delete */N unsigned short int fib$w_sd_fid [3]; /* FILE ID */ __struct {N unsigned short int fib$w_sd_fid_num; /* FILE NUMBER */N unsigned short int fib$w_sd_fid_seq; /* FILE SEQUENCE NUMBER */ __union {R unsigned short int fib$w_sd_fid_rvn; /* RELATIVE VOLUME NUMBER */ __struct {N unsigned char fib$b_sd_fid_rvn; /* SHORT FORM RVN */O unsigned char fib$b_sd_fid_nmx; /* EXTENDED FILE NUMBER */. } fib$r_sd_fid_rvn_fields;+ } fib$r_sd_fid_rvn_overlay;" } fib$r_sd_fid_fields; } fib$r_sd_fid_overlay;N short int fib$$_reserved_1; /* Pad up to a longword boundary */N unsigned char fib$b_name_format_in; /* Inbound file name encoding */N unsigned char fib$b_name_format_out; /* Returned file name encoding */N unsigned char fib$b_ascname_format; /* ASCNAME attribute encoding */U unsigned char fib$b_reserved_2; /* For alignment. NOTE - Must be zero. */ } FIBDEF; #if !def ined(__VAXC)3#define fib$l_acctl fib$r_acctl_overlay.fib$l_acctlI#define fib$v_nowrite fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_nowriteE#define fib$v_dlock fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_dlockK#define fib$v_blk_lock fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_blk_lockQ#define fib$v_fastrdsqnos fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_fastrdsqnosE#define fib$v_spool fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_spoolI#define fib$v_writeck fib$r_acctl_overlay.fib$r_acctl_bi ts0.fib$v_writeckI#define fib$v_seqonly fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_seqonlyE#define fib$v_seqno fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_seqnoE#define fib$v_write fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_writeG#define fib$v_readck fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_readckG#define fib$v_noread fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_noreadI#define fib$v_notrunc fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_notruncI#define fib$v_control fib$r_acctl_overlay. fib$r_acctl_bits0.fib$v_controlS#define fib$v_no_read_data fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_no_read_dataC#define fib$v_ssio fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_ssioI#define fib$v_execute fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_executeM#define fib$v_prsrv_atr fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_prsrv_atrI#define fib$v_rmslock fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_rmslockM#define fib$v_writethru fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_writethruG#def ine fib$v_nolock fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_nolockK#define fib$v_norecord fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_norecordK#define fib$v_noverify fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_noverifyO#define fib$v_change_vol fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_change_volG#define fib$v_rewind fib$r_acctl_overlay.fib$r_acctl_bits1.fib$v_rewindG#define fib$v_curpos fib$r_acctl_overlay.fib$r_acctl_bits1.fib$v_curposG#define fib$v_update fib$r_acctl_overlay.fib$r_acc tl_bits1.fib$v_updateG#define fib$b_wsize fib$r_acctl_overlay.fib$r_acctl_fields2.fib$b_wsize-#define fib$w_fid fib$r_fid_overlay.fib$w_fidF#define fib$w_fid_num fib$r_fid_overlay.fib$r_fid_fields.fib$w_fid_numF#define fib$w_fid_seq fib$r_fid_overlay.fib$r_fid_fields.fib$w_fid_seq\#define fib$w_fid_rvn fib$r_fid_overlay.fib$r_fid_fields.fib$r_fid_rvn_overlay.fib$w_fid_rvnq#define fib$b_fid_rvn fib$r_fid_overlay.fib$r_fid_fields.fib$r_fid_rvn_overlay.fib$r_fid_rvn_fields.fib$b_fid_rvnq#defin e fib$b_fid_nmx fib$r_fid_overlay.fib$r_fid_fields.fib$r_fid_rvn_overlay.fib$r_fid_rvn_fields.fib$b_fid_nmxU#define fib$w_fid_dirnum fib$r_fid_overlay.fib$r_fid_iso_9660_fields.fib$w_fid_dirnumU#define fib$l_fid_recnum fib$r_fid_overlay.fib$r_fid_iso_9660_fields.fib$l_fid_recnum-#define fib$w_did fib$r_did_overlay.fib$w_didF#define fib$w_did_num fib$r_did_overlay.fib$r_did_fields.fib$w_did_numF#define fib$w_did_seq fib$r_did_overlay.fib$r_did_fields.fib$w_did_seq\#define fib$w_did_rvn fib$r_ did_overlay.fib$r_did_fields.fib$r_did_rvn_overlay.fib$w_did_rvnq#define fib$b_did_rvn fib$r_did_overlay.fib$r_did_fields.fib$r_did_rvn_overlay.fib$r_did_rvn_fields.fib$b_did_rvnq#define fib$b_did_nmx fib$r_did_overlay.fib$r_did_fields.fib$r_did_rvn_overlay.fib$r_did_rvn_fields.fib$b_did_nmxU#define fib$w_did_dirnum fib$r_did_overlay.fib$r_did_iso_9660_fields.fib$w_did_dirnumU#define fib$l_did_recnum fib$r_did_overlay.fib$r_did_iso_9660_fields.fib$l_did_recnum3#define fib$w_nmctl fib$r_nmctl_ overlay.fib$w_nmctlN#define fib$v_names_8bit fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_names_8bitP#define fib$v_names_16bit fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_names_16bitX#define fib$v_percent_literal fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_percent_literalF#define fib$v_allver fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_allverF#define fib$v_alltyp fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_alltypF#define fib$v_allnam fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_allnamV#define fib$v_ca se_sensitive fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_case_sensitiveF#define fib$v_search fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_searchB#define fib$v_wild fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_wildF#define fib$v_newver fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_newverL#define fib$v_supersede fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_supersedeH#define fib$v_findfid fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_findfidH#define fib$v_finddir fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_findd irR#define fib$v_case_variant fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_case_variantF#define fib$v_lowver fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_lowverH#define fib$v_highver fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_highver3#define fib$w_exctl fib$r_exctl_overlay.fib$w_exctlD#define fib$v_alcon fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_alconF#define fib$v_alconb fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_alconbF#define fib$v_filcon fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_filconD#def ine fib$v_aldef fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_aldefJ#define fib$v_allocatr fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_allocatrF#define fib$v_extend fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_extendD#define fib$v_trunc fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_truncJ#define fib$v_nohdrext fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_nohdrextH#define fib$v_markbad fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_markbadH#define fib$v_noplace fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_noplace J#define fib$v_nocharge fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_nocharge6#define fib$b_alopts fib$r_alopts_overlay.fib$b_aloptsF#define fib$v_exact fib$r_alopts_overlay.fib$r_alopts_bits.fib$v_exactF#define fib$v_oncyl fib$r_alopts_overlay.fib$r_alopts_bits.fib$v_oncyl3#define fib$w_alloc fib$r_alloc_overlay.fib$w_alloc`#define fib$w_loc_fid fib$r_alloc_overlay.fib$r_alloc_fields.fib$r_loc_fid_overlay.fib$w_loc_fidu#define fib$w_loc_num fib$r_alloc_overlay.fib$r_alloc_fields.fib$r_loc_fid_o verlay.fib$r_loc_fid_fields.fib$w_loc_numu#define fib$w_loc_seq fib$r_alloc_overlay.fib$r_alloc_fields.fib$r_loc_fid_overlay.fib$r_loc_fid_fields.fib$w_loc_seq#define fib$w_loc_rvn fib$r_alloc_overlay.fib$r_alloc_fields.fib$r_loc_fid_overlay.fib$r_loc_fid_fields.fib$r_loc_rvn_overlay.fib$w\_loc_rvn#define fib$b_loc_rvn fib$r_alloc_overlay.fib$r_alloc_fields.fib$r_loc_fid_overlay.fib$r_loc_fid_fields.fib$r_loc_rvn_overlay.fib$r\_loc_rvn_fields.fib$b_loc_rvn#define fib$b_loc_nmx fib$r_allo c_overlay.fib$r_alloc_fields.fib$r_loc_fid_overlay.fib$r_loc_fid_fields.fib$r_loc_rvn_overlay.fib$r\_loc_rvn_fields.fib$b_loc_nmxL#define fib$l_loc_addr fib$r_alloc_overlay.fib$r_alloc_fields.fib$l_loc_addr6#define fib$l_status fib$r_status_overlay.fib$l_statusJ#define fib$v_alt_req fib$r_status_overlay.fib$r_status_bits.fib$v_alt_reqR#define fib$v_alt_granted fib$r_status_overlay.fib$r_status_bits.fib$v_alt_grantedH#define fib$v_diracl fib$r_status_overlay.fib$r_status_bits.fib$v_diraclN#def ine fib$v_propagate fib$r_status_overlay.fib$r_status_bits.fib$v_propagateN#define fib$v_nocopyacl fib$r_status_overlay.fib$r_status_bits.fib$v_nocopyaclR#define fib$v_nocopyowner fib$r_status_overlay.fib$r_status_bits.fib$v_nocopyownerP#define fib$v_nocopyprot fib$r_status_overlay.fib$r_status_bits.fib$v_nocopyprotT#define fib$v_exclprevious fib$r_status_overlay.fib$r_status_bits.fib$v_exclpreviousR#define fib$v_alias_entry fib$r_status_overlay.fib$r_status_bits.fib$v_alias_entryT#define fib$v_ wildfid_flag fib$r_status_overlay.fib$r_status_bits.fib$v_wildfid_flagT#define fib$v_did_filespec fib$r_status_overlay.fib$r_status_bits.fib$v_did_filespecP#define fib$v_is_special fib$r_status_overlay.fib$r_status_bits.fib$v_is_specialV#define fib$v_check_special fib$r_status_overlay.fib$r_status_bits.fib$v_check_specialE#define fib$l_mov_svbn fib$r_funcdepend.fib$r_movfildp.fib$l_mov_svbnI#define fib$l_mov_vbncnt fib$r_funcdepend.fib$r_movfildp.fib$l_mov_vbncntQ#define fib$l_caching_options  fib$r_caching_options_overlay.fib$l_caching_optionsl#define fib$v_file_attributes fib$r_caching_options_overlay.fib$r_caching_options_bits.fib$v_file_attributesh#define fib$v_file_contents fib$r_caching_options_overlay.fib$r_caching_options_bits.fib$v_file_contentsj#define fib$v_flush_on_close fib$r_caching_options_overlay.fib$r_caching_options_bits.fib$v_flush_on_closet#define fib$v_caching_options_mbz fib$r_caching_options_overlay.fib$r_caching_options_bits.fib$v_caching_options_mbz6#define fi b$w_sd_fid fib$r_sd_fid_overlay.fib$w_sd_fidR#define fib$w_sd_fid_num fib$r_sd_fid_overlay.fib$r_sd_fid_fields.fib$w_sd_fid_numR#define fib$w_sd_fid_seq fib$r_sd_fid_overlay.fib$r_sd_fid_fields.fib$w_sd_fid_seqk#define fib$w_sd_fid_rvn fib$r_sd_fid_overlay.fib$r_sd_fid_fields.fib$r_sd_fid_rvn_overlay.fib$w_sd_fid_rvn#define fib$b_sd_fid_rvn fib$r_sd_fid_overlay.fib$r_sd_fid_fields.fib$r_sd_fid_rvn_overlay.fib$r_sd_fid_rvn_fields.fib$b_sd_fid_rvn#define fib$b_sd_fid_nmx fib$r_sd_fid_overlay.fi b$r_sd_fid_fields.fib$r_sd_fid_rvn_overlay.fib$r_sd_fid_rvn_fields.fib$b_sd_fid_nmx"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct fibdef { __union {N unsigned int fib$l_acctl; /* ACCESS CONTROL BITS */ __struct {N unsigned fib$v_nowrite : 1; /* NO OTHER WRITERS */N unsigned fib$v_dlock : 1; /* ENABLE DEACCESS LOCK */N unsigned fib$v_blk_lock : 1; /* ENABLE R MS-11 BLOCK LOCKING */N unsigned fib$v_fastrdsqnos : 1; /* READ HDRSEQ AND DATASEQ VALS */N unsigned fib$v_spool : 1; /* SPOOL FILE ON CLOSE */N unsigned fib$v_writeck : 1; /* ENABLE WRITE CHECK */N unsigned fib$v_seqonly : 1; /* SEQUENTIAL ONLY ACCESS */N unsigned fib$v_seqno : 1; /* STORE SEQNOS FOR THIS FILE */N unsigned fib$v_write : 1; /* WRITE ACCESS */ N unsigned fib$v_readck : 1; /* ENABLE READ CHECK */N unsigned fib$v_noread : 1; /* NO OTHER READERS */N unsigned fib$v_notrunc : 1; /* FILE MAY NOT BE TRUNCATED */N unsigned fib$v_control : 1; /* CONTROL ACCESS TO FILE */N unsigned fib$v_no_read_data : 1; /* NO READ ACCESS TO FILE DATA */N unsigned fib$v_ssio : 1; /* File is opened for SSIO access */N unsigned fib def$$_fill_3 : 1; /* SPARE */N/* THE HIGH 8 BITS CANNOT BE COPIED */N/* INTO THE ACCESS MODE WORD IN THE WINDOW */Z unsigned fib$v_execute : 1; /* ACCESS FOR EXECUTE (USE EXECUTE PROTECTION) */U unsigned fib$v_prsrv_atr : 1; /* PRESERVE ORIGINAL ATTRIBUTES OF FILE */N unsigned fib$v_rmslock : 1; /* OPEN WITH RMS RECORD LOCKING */W unsigned fib$v_wri tethru : 1; /* FORCE CACHE WRITE-THROUGH ON OPERATION */N unsigned fib$v_nolock : 1; /* OVERRIDE ACCESS INTERLOCKS */N unsigned fib$v_norecord : 1; /* DO NOT RECORD FILE ACCESS */N unsigned fib$v_noverify : 1; /* Do not perform compare on move. */^ unsigned fib$v_change_vol : 1; /* Allow Movefile move between volumes in a set. */ } fib$r_acctl_bits0; __struct {) unsigned fibdef$$_fill_5 : 3;N unsigned fib$v_rewind : 1; /* REWIND TAPE */N unsigned fib$v_curpos : 1; /* CREATE AT CURRENT TAPE POSITION */) unsigned fibdef$$_fill_6 : 1;V unsigned fib$v_update : 1; /* UPDATE MODE (POSITION TO START OF FILE) */' unsigned fib$v_fill_1_ : 1; } fib$r_acctl_bits1; __struct {& char fibdef$$_fill_13 [3];N char fib$b_wsize; /* WINDOW SIZE */" } fib$r_acctl_fields2; } fib$r_acctl_overlay; __union {N unsigned short int fib$w_fid [3]; /* FILE ID */ __struct {N unsigned short int fib$w_fid_num; /* FILE NUMBER */N unsigned short int fib$w_fid_seq; /* FILE SEQUENCE NUMBER */ __union {O unsigned short int fib$w_fid_rvn; /* RELATIVE VOLUME NUMBER */ __struct {N unsigned c har fib$b_fid_rvn; /* SHORT FORM RVN */N unsigned char fib$b_fid_nmx; /* EXTENDED FILE NUMBER */+ } fib$r_fid_rvn_fields;( } fib$r_fid_rvn_overlay; } fib$r_fid_fields;N __struct { /* File ID fields for ISO 9660 */R unsigned short int fib$w_fid_dirnum; /* Directory number of File-Id */L unsigned int fib$l_fid_recnum; /* Record number of File-ID */( } fib$r_fid_iso_9660_fields; } fib$r_fid_overlay; __union {N unsigned short int fib$w_did [3]; /* DIRECTORY ID */ __struct {N unsigned short int fib$w_did_num; /* FILE NUMBER */N unsigned short int fib$w_did_seq; /* FILE SEQUENCE NUMBER */ __union {O unsigned short int fib$w_did_rvn; /* RELATIVE VOLUME NUMBER */ __struct {N unsigned cha r fib$b_did_rvn; /* SHORT FORM RVN */N unsigned char fib$b_did_nmx; /* EXTENDED FILE NUMBER */+ } fib$r_did_rvn_fields;( } fib$r_did_rvn_overlay; } fib$r_did_fields;N __struct { /* Directory ID fields for ISO 9660 */R unsigned short int fib$w_did_dirnum; /* Directory number of File-Id */L unsigned int fib$l_did_recnum; /* Record number of File-ID */( } fib$r_did_iso_9660_fields; } fib$r_did_overlay;N unsigned int fib$l_wcc; /* WILD CARD CONTEXT */ __union {N unsigned short int fib$w_nmctl; /* NAME CONTROL BITS */ __struct {N unsigned fib$v_names_8bit : 1; /* RETURN 8BIT FILENAMES (HFS) */N unsigned fib$v_names_16bit : 1; /* RETURN 16BIT FILENAMES (HFS) */R unsigned fib$v_percent_literal : 1; /* PERCENT IS LITERAL (HFS) */N  unsigned fib$v_allver : 1; /* MATCH ALL VERSIONS */N unsigned fib$v_alltyp : 1; /* MATCH ALL TYPES */N unsigned fib$v_allnam : 1; /* MATCH ALL NAMES */N unsigned fib$v_case_sensitive : 1; /* case sensitive lookup */V unsigned fib$v_search : 1; /* Match names in purely case blind manner. */N/* (intended for search operations; normal file */N/* access should give p reference to exact match) */N unsigned fib$v_wild : 1; /* WILD CARDS IN FILE NAME */N unsigned fib$v_newver : 1; /* MAXIMIZE VERSION NUMBER */N unsigned fib$v_supersede : 1; /* SUPERSEDE EXISTING FILE */N unsigned fib$v_findfid : 1; /* SEARCH FOR FILE ID */Z unsigned fib$v_finddir : 1; /* SEARCH FOR DIR EXTENTION (Internal use only) */N/* the following bits are output, not input */Y unsigned fib$v_case_variant : 1; /* A case variant of this filename exists */N unsigned fib$v_lowver : 1; /* LOWER VERSION OF FILE EXISTS */N unsigned fib$v_highver : 1; /* HIGHER VERSION OF FILE EXISTS */ } fib$r_nmctl_bits; } fib$r_nmctl_overlay; __union {N unsigned short int fib$w_exctl; /* EXTEND CONTROL */ __struct {N unsigned fib$v_a lcon : 1; /* ALLOCATE CONTIGUOUS */N unsigned fib$v_alconb : 1; /* CONTIGUOUS BEST EFFORT */N unsigned fib$v_filcon : 1; /* MARK FILE CONTIGUOUS */N unsigned fib$v_aldef : 1; /* ALLOCATE DEFAULT AMOUNT */X unsigned fib$v_allocatr : 1; /* PLACEMENT DATA PRESENT IN ATTRIBUTE LIST */* unsigned fibdef$$_fill_10 : 2;N unsigned fib$v_extend : 1; /* ENABLE EXTENSION */N unsigned fib$v_trunc : 1; /* ENABLE TRUNCATION */N unsigned fib$v_nohdrext : 1; /* INHIBIT EXTENSION HEADERS */N unsigned fib$v_markbad : 1; /* MARK BLOCKS BAD */* unsigned fibdef$$_fill_11 : 3;V unsigned fib$v_noplace : 1; /* DON'T ADD PLACEMENT POINTERS IN MOVEFILE */N unsigned fib$v_nocharge : 1; /* DON'T CHARGE DISKQUOTA */ } fib$r_exctl_bits; } fib$r_exct l_overlay;N unsigned int fib$l_exsz; /* EXTEND SIZE */N unsigned int fib$l_exvbn; /* EXTENSION VBN */ __union {N unsigned char fib$b_alopts; /* ALLOCATION OPTIONS */ __struct {N unsigned fib$v_exact : 1; /* EXACT PLACEMENT REQUIRED */N unsigned fib$v_oncyl : 1; /* PUT ALLOCATION ON ONE CYLINDER */' unsigned fib$v_fill_2_ : 6; } fib$r_alopts_bits; } fib$r_alopts_overlay;N unsigned char fib$b_alalign; /* ALLOCATION ALIGNMENT */ __union {N unsigned short int fib$w_alloc [5]; /* ALLOCATION LOCATION */ __struct { __union {N unsigned short int fib$w_loc_fid [3]; /* RELATED FILE ID */ __struct {P unsigned short int fib$w_loc_num; /* RELATED FILE NUMBER */Q unsigned short int fib$w_loc_seq; /* FILE SEQUENCE NUMBER */ __union {N unsigned short int fib$w_loc_rvn; /* RELATED RVN */# __struct {N unsigned char fib$b_loc_rvn; /* SHORT FORM RVN */T unsigned char fib$b_loc_nmx; /* EXTENDED FILE NUMBER */3 } fib$r_loc_rvn_fields;0 } fib$r_loc_rvn_overlay;+ } fib$r_loc_fid_fiel ds;( } fib$r_loc_fid_overlay;P unsigned int fib$l_loc_addr; /* LOCATION ADDRESS (VBN, LBN, CYL) */! } fib$r_alloc_fields; } fib$r_alloc_overlay;N unsigned short int fib$w_verlimit; /* DIRECTORY ENTRY VERSION LIMIT */N unsigned char fib$b_agent_mode; /* AGENTS ACCESS MODE */N unsigned char fib$b_ru_facility; /* RECOVERABLE-FACILITY CODE */N unsigned int fib$l_aclctx; /* ACL CONTEXT FOR READ */N unsigned int fib$l_acl_status; /* RETURN STATUS FROM ACL OPERATION */ __union {N unsigned int fib$l_status; /* GENERAL STATUS LONGWORD */ __struct {N unsigned fib$v_alt_req : 1; /* ALTERNATE ACCESS REQUIRED */N unsigned fib$v_alt_granted : 1; /* ALTERNATE ACCESS GRANTED */N unsigned fib$v_diracl : 1; /* DO DIRECTORY ACL PROPAGATION */N unsigned fib$v_propagate : 1; /* DO PROPAGAT ION ON ENTER/MODIFY */N unsigned fib$v_nocopyacl : 1; /* DON'T PROPAGATE THE ACL */O unsigned fib$v_nocopyowner : 1; /* DON'T PROPAGATE THE OWNER UIC */T unsigned fib$v_nocopyprot : 1; /* DON'T PROPAGATE THE SOGW PROTECTION */` unsigned fib$v_exclprevious : 1; /* EXCLUDE THE PREVIOUS VERSION FROM PROPAGATION */\ unsigned fib$v_alias_entry : 1; /* FILE ACCESSED VIA AN ALIAS DIRECTORY ENTRY */N unsigned fib$v_wildfid_flag : 1; /* WILDCARD FID FLAG */N unsigned fib$v_did_filespec : 1; /* FILESPEC HAD BEEN DID'ED */R unsigned fib$v_is_special : 1; /* Special file detected and handled */N unsigned fib$v_check_special : 1; /* Check for special files */' unsigned fib$v_fill_3_ : 3; } fib$r_status_bits; } fib$r_status_overlay;N unsigned int fib$l_alt_access; /* ALTERNATE ACCESS MASK */ __union { __struct {N unsigned int fib$l_mov_svbn; /* starting VBN (MOVEFILE) */N unsigned int fib$l_mov_vbncnt; /* count of VBNs (MOVEFILE) */ } fib$r_movfildp; } fib$r_funcdepend;Z unsigned short int fib$w_file_hdrseq_incr; /*header seq no increment for indiv file */] unsigned short int fib$w_dir_hdrseq_incr; /*header seq no increment for directory file */Y unsigned short int fib$w_file_dataseq_incr; /*data seq no increment for indiv file */\ unsigned short int fib$w_dir_dataseq_incr; /*data seq no increment for driectory file */N/* Define fields and constant values for FIB$L_CACHING_OPTIONS longword. */N/* These must match [STARLET]ATRDEF.SDL exactly */ __union {O unsigned int fib$l_caching_options; /*F64XQP cache control bitvector */ __struct {R unsigned fib$v_file_attributes : 4; /*File attributes caching field */N unsigned fib$v_file_contents : 4; /* File contents caching field */N unsigned fib$v_flush_on_close : 4; /*Flush file on close field */N unsigned fib$v_caching_options_mbz : 20; /*Must be zero */) } fib$r_caching_options_bits;( } fib$r_caching_options_overlay;Q __union { /* FID field for Secondary File Delete */N unsigned short int fib$w_sd_fid [3]; /* FILE ID */ __struct {N unsigned short int fib$w_sd_fi d_num; /* FILE NUMBER */N unsigned short int fib$w_sd_fid_seq; /* FILE SEQUENCE NUMBER */ __union {R unsigned short int fib$w_sd_fid_rvn; /* RELATIVE VOLUME NUMBER */ __struct {N unsigned char fib$b_sd_fid_rvn; /* SHORT FORM RVN */O unsigned char fib$b_sd_fid_nmx; /* EXTENDED FILE NUMBER */. } fib$r_sd_fid_rvn_fields;+ } fib$r_sd_fid_rvn_overl ay;" } fib$r_sd_fid_fields; } fib$r_sd_fid_overlay;N short int fib$$_reserved_1; /* Pad up to a longword boundary */N unsigned char fib$b_name_format_in; /* Inbound file name encoding */N unsigned char fib$b_name_format_out; /* Returned file name encoding */N unsigned char fib$b_ascname_format; /* ASCNAME attribute encoding */U unsigned char fib$b_reserved_2; /* For alignment. NOTE - Must be zero. */ } ; #if !def ined(__VAXC)3#define fib$l_acctl fib$r_acctl_overlay.fib$l_acctlI#define fib$v_nowrite fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_nowriteE#define fib$v_dlock fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_dlockK#define fib$v_blk_lock fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_blk_lockQ#define fib$v_fastrdsqnos fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_fastrdsqnosE#define fib$v_spool fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_spoolI#define fib$v_writeck fib$r_acctl_overlay.fib$r_acctl_bi ts0.fib$v_writeckI#define fib$v_seqonly fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_seqonlyE#define fib$v_seqno fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_seqnoE#define fib$v_write fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_writeG#define fib$v_readck fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_readckG#define fib$v_noread fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_noreadI#define fib$v_notrunc fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_notruncI#define fib$v_control fib$r_acctl_overlay. fib$r_acctl_bits0.fib$v_controlS#define fib$v_no_read_data fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_no_read_dataC#define fib$v_ssio fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_ssioI#define fib$v_execute fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_executeM#define fib$v_prsrv_atr fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_prsrv_atrI#define fib$v_rmslock fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_rmslockM#define fib$v_writethru fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_writethruG#def ine fib$v_nolock fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_nolockK#define fib$v_norecord fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_norecordK#define fib$v_noverify fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_noverifyO#define fib$v_change_vol fib$r_acctl_overlay.fib$r_acctl_bits0.fib$v_change_volG#define fib$v_rewind fib$r_acctl_overlay.fib$r_acctl_bits1.fib$v_rewindG#define fib$v_curpos fib$r_acctl_overlay.fib$r_acctl_bits1.fib$v_curposG#define fib$v_update fib$r_acctl_overlay.fib$r_acc tl_bits1.fib$v_updateG#define fib$b_wsize fib$r_acctl_overlay.fib$r_acctl_fields2.fib$b_wsize-#define fib$w_fid fib$r_fid_overlay.fib$w_fidF#define fib$w_fid_num fib$r_fid_overlay.fib$r_fid_fields.fib$w_fid_numF#define fib$w_fid_seq fib$r_fid_overlay.fib$r_fid_fields.fib$w_fid_seq\#define fib$w_fid_rvn fib$r_fid_overlay.fib$r_fid_fields.fib$r_fid_rvn_overlay.fib$w_fid_rvnq#define fib$b_fid_rvn fib$r_fid_overlay.fib$r_fid_fields.fib$r_fid_rvn_overlay.fib$r_fid_rvn_fields.fib$b_fid_rvnq#defin e fib$b_fid_nmx fib$r_fid_overlay.fib$r_fid_fields.fib$r_fid_rvn_overlay.fib$r_fid_rvn_fields.fib$b_fid_nmxU#define fib$w_fid_dirnum fib$r_fid_overlay.fib$r_fid_iso_9660_fields.fib$w_fid_dirnumU#define fib$l_fid_recnum fib$r_fid_overlay.fib$r_fid_iso_9660_fields.fib$l_fid_recnum-#define fib$w_did fib$r_did_overlay.fib$w_didF#define fib$w_did_num fib$r_did_overlay.fib$r_did_fields.fib$w_did_numF#define fib$w_did_seq fib$r_did_overlay.fib$r_did_fields.fib$w_did_seq\#define fib$w_did_rvn fib$r_ did_overlay.fib$r_did_fields.fib$r_did_rvn_overlay.fib$w_did_rvnq#define fib$b_did_rvn fib$r_did_overlay.fib$r_did_fields.fib$r_did_rvn_overlay.fib$r_did_rvn_fields.fib$b_did_rvnq#define fib$b_did_nmx fib$r_did_overlay.fib$r_did_fields.fib$r_did_rvn_overlay.fib$r_did_rvn_fields.fib$b_did_nmxU#define fib$w_did_dirnum fib$r_did_overlay.fib$r_did_iso_9660_fields.fib$w_did_dirnumU#define fib$l_did_recnum fib$r_did_overlay.fib$r_did_iso_9660_fields.fib$l_did_recnum3#define fib$w_nmctl fib$r_nmctl_ overlay.fib$w_nmctlN#define fib$v_names_8bit fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_names_8bitP#define fib$v_names_16bit fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_names_16bitX#define fib$v_percent_literal fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_percent_literalF#define fib$v_allver fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_allverF#define fib$v_alltyp fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_alltypF#define fib$v_allnam fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_allnamV#define fib$v_ca se_sensitive fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_case_sensitiveF#define fib$v_search fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_searchB#define fib$v_wild fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_wildF#define fib$v_newver fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_newverL#define fib$v_supersede fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_supersedeH#define fib$v_findfid fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_findfidH#define fib$v_finddir fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_findd irR#define fib$v_case_variant fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_case_variantF#define fib$v_lowver fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_lowverH#define fib$v_highver fib$r_nmctl_overlay.fib$r_nmctl_bits.fib$v_highver3#define fib$w_exctl fib$r_exctl_overlay.fib$w_exctlD#define fib$v_alcon fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_alconF#define fib$v_alconb fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_alconbF#define fib$v_filcon fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_filconD#def ine fib$v_aldef fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_aldefJ#define fib$v_allocatr fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_allocatrF#define fib$v_extend fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_extendD#define fib$v_trunc fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_truncJ#define fib$v_nohdrext fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_nohdrextH#define fib$v_markbad fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_markbadH#define fib$v_noplace fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_noplace J#define fib$v_nocharge fib$r_exctl_overlay.fib$r_exctl_bits.fib$v_nocharge6#define fib$b_alopts fib$r_alopts_overlay.fib$b_aloptsF#define fib$v_exact fib$r_alopts_overlay.fib$r_alopts_bits.fib$v_exactF#define fib$v_oncyl fib$r_alopts_overlay.fib$r_alopts_bits.fib$v_oncyl3#define fib$w_alloc fib$r_alloc_overlay.fib$w_alloc`#define fib$w_loc_fid fib$r_alloc_overlay.fib$r_alloc_fields.fib$r_loc_fid_overlay.fib$w_loc_fidu#define fib$w_loc_num fib$r_alloc_overlay.fib$r_alloc_fields.fib$r_loc_fid_o verlay.fib$r_loc_fid_fields.fib$w_loc_numu#define fib$w_loc_seq fib$r_alloc_overlay.fib$r_alloc_fields.fib$r_loc_fid_overlay.fib$r_loc_fid_fields.fib$w_loc_seq#define fib$w_loc_rvn fib$r_alloc_overlay.fib$r_alloc_fields.fib$r_loc_fid_overlay.fib$r_loc_fid_fields.fib$r_loc_rvn_overlay.fib$w\_loc_rvn#define fib$b_loc_rvn fib$r_alloc_overlay.fib$r_alloc_fields.fib$r_loc_fid_overlay.fib$r_loc_fid_fields.fib$r_loc_rvn_overlay.fib$r\_loc_rvn_fields.fib$b_loc_rvn#define fib$b_loc_nmx fib$r_allo c_overlay.fib$r_alloc_fields.fib$r_loc_fid_overlay.fib$r_loc_fid_fields.fib$r_loc_rvn_overlay.fib$r\_loc_rvn_fields.fib$b_loc_nmxL#define fib$l_loc_addr fib$r_alloc_overlay.fib$r_alloc_fields.fib$l_loc_addr6#define fib$l_status fib$r_status_overlay.fib$l_statusJ#define fib$v_alt_req fib$r_status_overlay.fib$r_status_bits.fib$v_alt_reqR#define fib$v_alt_granted fib$r_status_overlay.fib$r_status_bits.fib$v_alt_grantedH#define fib$v_diracl fib$r_status_overlay.fib$r_status_bits.fib$v_diraclN#def ine fib$v_propagate fib$r_status_overlay.fib$r_status_bits.fib$v_propagateN#define fib$v_nocopyacl fib$r_status_overlay.fib$r_status_bits.fib$v_nocopyaclR#define fib$v_nocopyowner fib$r_status_overlay.fib$r_status_bits.fib$v_nocopyownerP#define fib$v_nocopyprot fib$r_status_overlay.fib$r_status_bits.fib$v_nocopyprotT#define fib$v_exclprevious fib$r_status_overlay.fib$r_status_bits.fib$v_exclpreviousR#define fib$v_alias_entry fib$r_status_overlay.fib$r_status_bits.fib$v_alias_entryT#define fib$v_ wildfid_flag fib$r_status_overlay.fib$r_status_bits.fib$v_wildfid_flagT#define fib$v_did_filespec fib$r_status_overlay.fib$r_status_bits.fib$v_did_filespecP#define fib$v_is_special fib$r_status_overlay.fib$r_status_bits.fib$v_is_specialV#define fib$v_check_special fib$r_status_overlay.fib$r_status_bits.fib$v_check_specialE#define fib$l_mov_svbn fib$r_funcdepend.fib$r_movfildp.fib$l_mov_svbnI#define fib$l_mov_vbncnt fib$r_funcdepend.fib$r_movfildp.fib$l_mov_vbncntQ#define fib$l_caching_options  fib$r_caching_options_overlay.fib$l_caching_optionsl#define fib$v_file_attributes fib$r_caching_options_overlay.fib$r_caching_options_bits.fib$v_file_attributesh#define fib$v_file_contents fib$r_caching_options_overlay.fib$r_caching_options_bits.fib$v_file_contentsj#define fib$v_flush_on_close fib$r_caching_options_overlay.fib$r_caching_options_bits.fib$v_flush_on_closet#define fib$v_caching_options_mbz fib$r_caching_options_overlay.fib$r_caching_options_bits.fib$v_caching_options_mbz6#define fi b$w_sd_fid fib$r_sd_fid_overlay.fib$w_sd_fidR#define fib$w_sd_fid_num fib$r_sd_fid_overlay.fib$r_sd_fid_fields.fib$w_sd_fid_numR#define fib$w_sd_fid_seq fib$r_sd_fid_overlay.fib$r_sd_fid_fields.fib$w_sd_fid_seqk#define fib$w_sd_fid_rvn fib$r_sd_fid_overlay.fib$r_sd_fid_fields.fib$r_sd_fid_rvn_overlay.fib$w_sd_fid_rvn#define fib$b_sd_fid_rvn fib$r_sd_fid_overlay.fib$r_sd_fid_fields.fib$r_sd_fid_rvn_overlay.fib$r_sd_fid_rvn_fields.fib$b_sd_fid_rvn#define fib$b_sd_fid_nmx fib$r_sd_fid_overlay.fi b$r_sd_fid_fields.fib$r_sd_fid_rvn_overlay.fib$r_sd_fid_rvn_fields.fib$b_sd_fid_nmx"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define FIB$C_REWINDVOL 1 /* REWIND VOLUME SET */N#define FIB$C_POSEND 2 /* POSITION TO END OF VOLUME SET */N#define FIB$C_NEXTVOL 3 /* FORCE NEXT VOLUME */N#define FIB$C_SPACE 4 /* SPACE MAGNETIC TAPE */N#define FIB$C_ILLEGA L 5 /* */N#define FIB$C_REWINDFIL 6 /* REWIND FILE */N#define FIB$C_LOCK_VOL 7 /* LOCK VOLUME AGAINST ALLOCATION */N#define FIB$C_UNLK_VOL 8 /* UNLOCK VOLUME */N/* QUOTA FILE OPERATIONS */N#define FIB$C_ENA_QUOTA 9 /* ENABLE QUOTA FILE */N#define FIB$C_DSA_QUOTA 10 /* DIS ABLE QUOTA FILE */N#define FIB$C_ADD_QUOTA 11 /* ADD QUOTA FILE ENTRY */N#define FIB$C_EXA_QUOTA 12 /* EXAMINE QUOTA FILE ENTRY */N#define FIB$C_MOD_QUOTA 13 /* MODIFY QUOTA FILE ENTRY */N#define FIB$C_REM_QUOTA 14 /* REMOVE QUOTA FILE ENTRY */O#define FIB$C_USEREOT 15 /* ENABLE USER END OF TAPE HANDLING */N#define FIB$C_REMAP 16 /* REMAP FILE WINDOW  */f#define FIB$C_CLSEREXCP 17 /* ALLOW THE USER TO CLEAR A SERIOUS EXCP FROM A TAPE DRIVE */N#define FIB$C_FLUSH_CACHE 18 /* FLUSH SELECTED CACHE */O#define FIB$C_FORCE_MV 19 /* FORCE MOUNT VERIFICATION TO OCCUR */^#define FIB$C_VALIDATE_VOLUME 20 /* VALIDATE VOLUME SET FOLLOWING SNAPSHOT FILE BOOT */X#define FIB$C_VALIDATE_FILE 21 /* VALIDATE FILE FOLLOWING SNAPSHOT FILE BOOT */\#define FIB$C_UPDATE_VOL_PROFILE 22 /* U PDATE A VOLUME'S (PERMANENT) SECURITY PROFILE */Z#define FIB$C_UPDATE_FIL_PROFILE 23 /* UPDATE A FILE'S (PERMANENT) SECURITY PROFILE */U#define FIB$C_CHECK_PROTECTION 24 /* PERFORM FILE OR VOLUME PROTECTION CHECK */N#define FIB$C_ADD_THREAD 25 /* ADD A NEW THREAD */N#define FIB$C_REM_THREAD 26 /* REMOVE A THREAD */N#define FIB$C_EXA_THREAD 27 /* INQUIRE ABOUT THREADS */N#define FIB$C_CHECK_PATH 28  /* FIND DIRSEQ VAL AND ARM BLKAST */N#define FIB$C_ENA_DW 29 /* ENABLE DEFERRED WRITE */N#define FIB$C_DSA_DW 30 /* DISABLE DEFERRED WRITE */N#define FIB$C_WRITEBACK_CACHE 31 /* F64 caching */N#define FIB$C_WRITETHRU_CACHE 32 /* F64 caching */N#define FIB$C_FILE_SYNCH 33 /* VDC/Spiralog flush file to disk */N#define FIB$C_CACHING_OPTIONS 34 /* VDC/Spiralog select caching mode */W#define FIB$C_WRITE_BARRIER 35 /* VDC/Spiralog barrier writes to this point */N#define FIB$C_VOL_FLUSH 36 /* VDC volume flush local node only */S#define FIB$C_VOL_FLUSH_ALL 37 /* VDC flush all volumes local node only */`#define FIB$C_CLONE_FIL_PROFILE 38 /* RETURN A COPY OF A FILE'S CURRENT SECURITY PROFILE */N#define FIB$C_STRUC_LEVEL2 39 /* Set the vcb to ods2 */N#define FIB$C_STRUC_LEVEL5 40 /* Set the vcb to ods5 */N#define FIB$C_EXPAND_VOLUME 41 /* Expand the volume size */N#define FIB$C_EXPAND_BITMAP 42 /* Increase the BITMAP.SYS size */N#define FIB$K_MTALEN 28 /* LENGTH OF MTAACP DATA */N#define FIB$C_MTALEN 28 /* LENGTH OF MTAACP DATA */N/* */N#define FIB$C_FID_CACHE 1 /* FLUSH THE FID CACHE */N #define FIB$C_EXTENT_CACHE 2 /* FLUSH THE EXTENT CACHE */N#define FIB$C_QUOTA_CACHE 3 /* FLUSH THE QUOTA CACHE */N#define FIB$C_BFRD_CACHE 4 /* FLUSH THE BFRD CACHE */N#define FIB$C_VBN_CACHE 5 /* FLUSH THE VBN CACHE */N/* */N#define FIB$C_FLUSH_FILE_ATTRIBUTES 1 /* Only flush file attributes */N#define FIB$C_FLUSH_FILE_C ONTENTS 2 /* Only flush file contents */N#define FIB$C_FLUSH_FILE 3 /* Flush all of file */N/* */#define FIB$M_ALL_MEM 0x1#define FIB$M_ALL_GRP 0x2#define FIB$M_MOD_USE 0x4#define FIB$M_MOD_PERM 0x8#define FIB$M_MOD_OVER 0x10 #ifdef __NEW_STARLETtypedef struct _fibdef1 { char fibdef$$_fill_14 [22];N unsigned short int fib$w_cntrlfunc; /* ACP CONTROL FUNCTIO N */N/* DEFINE ACP CONTROL FUNCTION CODES */N/* */ __union {S unsigned int fib$l_cntrlval; /* ACP CONTROL FUNCTION VALUE PARAMETER */N/* CACHE IDENTIFIER CODES FOR FLUSH_CACHE */N/* */N/* Files-64 CACHE IDENTIFIER CODES FOR FILE_SYNC  */N/* */N/* CONTROL BITS FOR QUOTA FILE OPERATIONS */N/* */ __struct {N unsigned fib$v_all_mem : 1; /* MATCH ALL MEMBER NUMBERS */N unsigned fib$v_all_grp : 1; /* MATCH ALL GROUP NUMBERS */N unsigned fib$v_mod_use : 1; /* MODIFY USAGE DATA */N unsigned fib$v_mod_perm : 1; /* MODIFY PERMANENT QUOTA */N unsigned fib$v_mod_over : 1; /* MODIFY OVERDRAFT LIMIT */' unsigned fib$v_fill_4_ : 3;" } fib$r_cntrlval_bits;! } fib$r_cntrlval_overlay; } FIBDEF1; #if !defined(__VAXC)<#define fib$l_cntrlval fib$r_cntrlval_overlay.fib$l_cntrlvalN#define fib$v_all_mem fib$r_cntrlval_overlay.fib$r_cntrlval_bits.fib$v_all_memN#define fib$v_all_grp fib$r_cntrlval_o verlay.fib$r_cntrlval_bits.fib$v_all_grpN#define fib$v_mod_use fib$r_cntrlval_overlay.fib$r_cntrlval_bits.fib$v_mod_useP#define fib$v_mod_perm fib$r_cntrlval_overlay.fib$r_cntrlval_bits.fib$v_mod_permP#define fib$v_mod_over fib$r_cntrlval_overlay.fib$r_cntrlval_bits.fib$v_mod_over"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct fibdef1 { char fibdef$$_fill_14 [22];N unsigned short int fib$w_cntrlfunc; /* ACP CONTROL FUNCTION */N/* DEFINE ACP CO NTROL FUNCTION CODES */N/* */ __union {S unsigned int fib$l_cntrlval; /* ACP CONTROL FUNCTION VALUE PARAMETER */N/* CACHE IDENTIFIER CODES FOR FLUSH_CACHE */N/* */N/* Files-64 CACHE IDENTIFIER CODES FOR FILE_SYNC */N/*  */N/* CONTROL BITS FOR QUOTA FILE OPERATIONS */N/* */ __struct {N unsigned fib$v_all_mem : 1; /* MATCH ALL MEMBER NUMBERS */N unsigned fib$v_all_grp : 1; /* MATCH ALL GROUP NUMBERS */N unsigned fib$v_mod_use : 1; /* MODIFY USAGE DATA */N unsigned fib $v_mod_perm : 1; /* MODIFY PERMANENT QUOTA */N unsigned fib$v_mod_over : 1; /* MODIFY OVERDRAFT LIMIT */' unsigned fib$v_fill_4_ : 3;" } fib$r_cntrlval_bits;! } fib$r_cntrlval_overlay; } ; #if !defined(__VAXC)<#define fib$l_cntrlval fib$r_cntrlval_overlay.fib$l_cntrlvalN#define fib$v_all_mem fib$r_cntrlval_overlay.fib$r_cntrlval_bits.fib$v_all_memN#define fib$v_all_grp fib$r_cntrlval_overlay.fib$r_cntrlval_bits.fib$v_all_grp N#define fib$v_mod_use fib$r_cntrlval_overlay.fib$r_cntrlval_bits.fib$v_mod_useP#define fib$v_mod_perm fib$r_cntrlval_overlay.fib$r_cntrlval_bits.fib$v_mod_permP#define fib$v_mod_over fib$r_cntrlval_overlay.fib$r_cntrlval_bits.fib$v_mod_over"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* Add a synonym for FIB$C_FILE_SYNCH to keep naming consistency */#define FIB$C_FILE_FLUSH 33 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZ E /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FIBDEF_LOADED */ wwJ围/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:0 0:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $FIDDEF ***/#ifndef __FIDDEF_LOADED#define __FIDDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __requ ired_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 __unio n#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* STRUCTURE OF A FILE ID (FID) */N/* */#define FID$K_LENGTH 6#define FID$C_LENGTH 6N#define FID$C_INDEXF 1 /* INDEX FILE */N#define FID$C_BITMAP 2  /* STORAGE MAP FILE */N#define FID$C_BADBLK 3 /* BAD BLOCK FILE */N#define FID$C_MFD 4 /* MASTER FILE DIRECTORY */N#define FID$C_CORIMG 5 /* CORE IMAGE FILE */N#define FID$C_VOLSET 6 /* VOLUME SET LIST FILE */N#define FID$C_CONTIN 7 /* STANRARD CONTINUATION FILE */N#define FID$C_BACKUP 8 /* BACKUP LOG FILE */N#define FID$C_BADLOG 9 /* BAD BLOCK LOG FILE */N#define FID$C_SECURITY 10 /* SECURITY FILE */N#define FID$C_GPT 11 /* GPT FILE */N#define FID$C_FREFIL 10 /* FREE SPACE FILE */ #ifdef __NEW_STARLETtypedef struct _fiddef { __union {N unsigned short int fid$w_fid [3]; /* File Identification Number */ __st ruct {N unsigned short int fid$w_num; /* FILE NUMBER */N unsigned short int fid$w_seq; /* FILE SEQUENCE NUMBER */ __union {N unsigned short int fid$w_rvn; /* RELATIVE VOLUME NUMBER */ __struct {N unsigned char fid$b_rvn; /* BYTE FORM OF RVN */N unsigned char fid$b_nmx; /* FILE NUMBER EXTENSION */N/* FILE ID'S OF THE RESERVED FILES */' } fid$r_rvn_fields;$ } fid$r_rvn_overlay; } fid$r_fid_fields;N __struct { /* File ID fields for ISO 9660 */N unsigned short int fid$w_dirnum; /* Directory number of File-Id */I unsigned int fid$l_recnum; /* Record number of File-ID */$ } fid$r_iso_9660_fields; } fid$r_fid_overlay; } FIDDEF; #if !defined(__VAXC)-#define  fid$w_fid fid$r_fid_overlay.fid$w_fid>#define fid$w_num fid$r_fid_overlay.fid$r_fid_fields.fid$w_num>#define fid$w_seq fid$r_fid_overlay.fid$r_fid_fields.fid$w_seqP#define fid$w_rvn fid$r_fid_overlay.fid$r_fid_fields.fid$r_rvn_overlay.fid$w_rvna#define fid$b_rvn fid$r_fid_overlay.fid$r_fid_fields.fid$r_rvn_overlay.fid$r_rvn_fields.fid$b_rvna#define fid$b_nmx fid$r_fid_overlay.fid$r_fid_fields.fid$r_rvn_overlay.fid$r_rvn_fields.fid$b_nmxI#define fid$w_dirnum fid$r_fid_overlay.fid$r_iso_9660_fi elds.fid$w_dirnumI#define fid$l_recnum fid$r_fid_overlay.fid$r_iso_9660_fields.fid$l_recnum"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct fiddef { __union {N unsigned short int fid$w_fid [3]; /* File Identification Number */ __struct {N unsigned short int fid$w_num; /* FILE NUMBER */N unsigned short int fid$w_seq; /* FILE SEQUENCE NUMBER */ __union {N un signed short int fid$w_rvn; /* RELATIVE VOLUME NUMBER */ __struct {N unsigned char fid$b_rvn; /* BYTE FORM OF RVN */N unsigned char fid$b_nmx; /* FILE NUMBER EXTENSION */N/* FILE ID'S OF THE RESERVED FILES */' } fid$r_rvn_fields;$ } fid$r_rvn_overlay; } fid$r_fid_fields;N __struct { /* File ID fields fo r ISO 9660 */N unsigned short int fid$w_dirnum; /* Directory number of File-Id */I unsigned int fid$l_recnum; /* Record number of File-ID */$ } fid$r_iso_9660_fields; } fid$r_fid_overlay; } ; #if !defined(__VAXC)-#define fid$w_fid fid$r_fid_overlay.fid$w_fid>#define fid$w_num fid$r_fid_overlay.fid$r_fid_fields.fid$w_num>#define fid$w_seq fid$r_fid_overlay.fid$r_fid_fields.fid$w_seqP#define fid$w_rvn fid$r_fid_overlay.fid$r_fid_fiel ds.fid$r_rvn_overlay.fid$w_rvna#define fid$b_rvn fid$r_fid_overlay.fid$r_fid_fields.fid$r_rvn_overlay.fid$r_rvn_fields.fid$b_rvna#define fid$b_nmx fid$r_fid_overlay.fid$r_fid_fields.fid$r_rvn_overlay.fid$r_rvn_fields.fid$b_nmxI#define fid$w_dirnum fid$r_fid_overlay.fid$r_iso_9660_fields.fid$w_dirnumI#define fid$l_recnum fid$r_fid_overlay.fid$r_iso_9660_fields.fid$l_recnum"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FIDDEF_LOADED */ wwq围/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M /* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $FLTDEF ***/#ifndef __FLTDEF_LOADED#define __FLTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* FLAG BITS FOR THE $SETFLT SYSTEM SERVICE. */N/* */#define FLT$M_NO_EXECUTE 0x1#define FLT$M_EXECUTE_ONLY 0x2#define FLT$M_PERM 0x4#define FLT$M_EXECUTABLE 0x8 #ifdef _ _NEW_STARLETtypedef union _fltdef { __struct {N unsigned flt$v_no_execute : 1; /* No Execute */N unsigned flt$v_execute_only : 1; /* Execute Only (for future use) */K unsigned flt$v_perm : 1; /* Permanent (for future use) */N unsigned flt$v_executable : 1; /* Set page to executable */# unsigned flt$v_fill_5_ : 4; } flt$r_fltdef_bits; } FLTDEF; #if !defined(__VAXC);#define flt$v_no_exe cute flt$r_fltdef_bits.flt$v_no_execute?#define flt$v_execute_only flt$r_fltdef_bits.flt$v_execute_only/#define flt$v_perm flt$r_fltdef_bits.flt$v_perm;#define flt$v_executable flt$r_fltdef_bits.flt$v_executable"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union fltdef { __struct {N unsigned flt$v_no_execute : 1; /* No Execute */N unsigned flt$v_execute_only : 1; /* Execute Only (for future use) */K unsigned flt $v_perm : 1; /* Permanent (for future use) */N unsigned flt$v_executable : 1; /* Set page to executable */# unsigned flt$v_fill_5_ : 4; } flt$r_fltdef_bits; } ; #if !defined(__VAXC);#define flt$v_no_execute flt$r_fltdef_bits.flt$v_no_execute?#define flt$v_execute_only flt$r_fltdef_bits.flt$v_execute_only/#define flt$v_perm flt$r_fltdef_bits.flt$v_perm;#define flt$v_executable flt$r_fltdef_bits.flt$v_executable"#endif /* #if !defined( __VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FLTDEF_LOADED */ ww˿围/************************************************************************************************* *******************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $FMLDEF ***/#ifndef __FMLDEF_LOADED#define __FMLDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragm a __nomember_alignmentR#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#i f !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 N/* */N/* Appended to a procedure definition are the formal arguments: */N/* FML$ - The fixed part of the formal arguments description */N/*  */#define FML$K_SIZE 2#define FML$C_SIZE 2 #ifdef __NEW_STARLETtypedef struct _fmldef {N unsigned char fml$b_minargs; /*Minimum number of arguments */` unsigned char fml$b_maxargs; /*Maximum which include function if procedure is one */ } FMLDEF;#else /* __OLD_STARLET */struct fmldef {N unsigned char fml$b_minargs; /*Minimum number of arguments */` unsigned char fml$b_maxargs;  /*Maximum which include function if procedure is one */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FMLDEF_LOADED */ ww 更/*********************************************  ***********************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */K/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]FOR_MSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $FORDEF ***/#ifndef __FORDEF_LOADED#define __FORDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard fe atures */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:39.29 */N/*  */N/* FILE: FOR_MSG.MSG */N/* */N/********************************************************************** */N/*** * */N/*** COPYRIGHT 2001 COMPAQ COMPUTER CORPORATION * */N/*** * */N/* ** COMPAQ AND THE COMPAQ LOGO ARE TRADEMARKS OF COMPAQ INFORMATION * */N/*** TECHNOLOGIES GROUP, L.P. * */N/*** * */N/*** CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM COMPAQ * */N/*** REQUIRED FOR POSSESSION, USE OR COPYING. CONSISTENT WITH FAR * */N/*** 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE, COMPUTER * */N/*** SOFTWARE DOCUMENTATION , AND TECHNICAL DATA FOR COMMERCIAL ITEMS * */N/*** ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD * */N/*** COMMERCIAL LICENSE. * */N/*** * */N/********************************************************************** */N/* */N/* 1-014 - ADD ERRORS 17-19 FOR NAMELIST. SBL 10-NOV- 1980 */N/* 1-015 - CORRECT TYPO IN TOOMANVAL. SBL 15-DEC-1980 */R/* 1-016 - RESTORE CLOSING BRACKET ON OPEDEFREQ, MYSTERIOUSLY DROPPED IN 1-015. */I/* SBL 6-JAN-1981 */P/* 2-001 - CONVERT TO MESSAGE UTILITY SOURCE FORMAT. ADAPTED FROM FORMSG.MDL */I/* VERSION 1-016. SBL 22-APR-1981 */N/* 2-002 - ADD UNFIO_FMT, FMTIO_UNF, DIRIO_KEY, SEQIO_DIR, KEYIO_DIR, */I/* IO_NONFOR, INVTXTREC, FLOUNDEXC. JAW 23-AUG-1981 */N/* 2-003 - CHANGE INVTXTREC TO INVTEXREC. JAW 24-AUG-1981 */U/* 2-004 - ADD INVTEX WHICH DOES NOT REQUIRE A RECORD NUMBER. THIS IS FOR INDEXED */S/* AND INTERNAL FILES THAT DO NOT HAVE A VALID RECORD NUMBER. DGP 21-DEC-1981 */N/* 2-005 - ADD .TITLE. SBL 28-AUG-1982 */N/* 2-006 - ADD OPEREQDIS AND OPEREQSEQ. SBL 2-JUN-1983 */N/* 2-007 - ADD ULT RIX SPECIFIC ERRORS AND WARNINGS. */N/* 2-008 - ADD INVMATKEY. DJM 14-SEP-1987. */N/* 2-009 - ADD FORRTL2 MESSAGES. CHH 22-SEP-1987 */J/* X-4 STEVE LIONEL 16-OCT-1989 */I/* ADD SUBPRCDEL,UNAWAKSUB. */N/* X-5 */I/* A LONG TIME AGO, IN A GALAXY FAR, FAR AWAY ...  */I/* X-6 SBL1001 22-OCT-1991 STEVE LIONEL */I/* ADD FOR$_VECALIGNEXC */K/* X-7 EBF1002 08-OCT-1992 ED FLECCHIA */I/* ADDED DEC FORTRAN MESSAGES FOR OTHER PLATFORMS. */O/* X-8 ADD FOR$_ENDRECDUR, END OF RECORD DURING READ. CHANGE IDENT TO VM.N-O */I/* SYNTAX. BRR 10-NOV-1993. */M/* X-9 ADD MISSING ALPHA GENTRAP MESSAGES. TCM 02-JUN-94. */N/* X-10 ADD INVREALLOC. JDR 11-JUL-1994. */N/* X-11 ADD RESACQFAI. JDR 23-NOV-1994. */N/* X-12 ADD INVDEALLOC. TCM 13-MAR-1995. */N/* X-13 MAKE MESSAGE ENDRECDUR, END OF RECORD DURING READ FATAL INSTEAD */L/* ERROR, LIKE THE OTHER OPERATING SYSTEMS. THE STANDARD SAYS FATAL, AND */F/* THIS SHOULD FIX BUG DFB2234. TCM 24-MAR-199 5 */N/* X-14 ADD POINTERS TO THE MESSAGE TEXT FOR INVDEALLOC. TCM 19-JUN-1995. */N/* X-15 FIX THE MESSAGE TEXT OF ERROR 69 (SIGINT) */E/* INTERRUPT WAS SPELLED WRONG, MISSING AN R. TCM 29-MAR-1996 */N/* X-16 ADD PRELIMINARY VISUAL FORTRAN SUPPORT. */I/* THUS, ADDING ALL OF THE MSF ERROR MESSAGES. */I/* NOTE: THESE MESSAGES MUST BE CONTIGUOUS, SO */B/* THAT THE MAP PING OF MSF ERRORS TO VISUAL */:/* FORTRAN CAN BE DONE WITH EASE. TCM 26-APR-1996 */N/* X-17 FIX THE MESSAGE TEXT OF MSF ERRORS 6970, 6971. */I/* IT SHOULD BE D FIELD NOT M FIELD, ETC. ALSO */H/* FIX F6750-52, REMOVE UNIX IN THE TEXT. TCM 07-NOV-1996 */N/* X-18 ADD INVDEALLOC2. WCH 15-JUL-1999. */N/* X-19 CHANGE PRODUCT NAME FROM DEC TO COMPAQ PMK 8-NOV-1999 */N/* X -20 REPLACE DEC WITH COMPAQ IN RESACQFAI MESSAGE. PMK 9-NOV-1999 */N/* X-21 ADD SHORTDATEARG, SHORTTIMEARG, & SHORTZONEARG. PMK 31-JUL-2000 */N/* X-22 ADD COUNTING FLTING INEXACTS. WCH 10-AUG-2000. */U/* X-23 ADD NEW ERRORS FOR COMPILER GENERATED RUNTIME MESSAGES. WCH 16-AUG-2000. */Q/* X-24 ADD A GENERIC DIVIDE BY ZERO MESSAGE FOR CASES WHEN WE CANNOT TELL IF */L/* IT WAS A TRUE FLOATING POINT DIV0 OR AN INTEGER DIV0. AS OF GEM BL46, */O/* GEM SOMETIMES DOE S INTEGER DIV IN THE FP UNIT ON ALPHA. WCH 06-OCT-2000. */O/* X-25 ADD A NEW MESSAGE FOR ATTEMPTED ARRAY ALLOCATIONS THAT OVERFLOW MAX */N/* ARRAY SIZE (32/64 BITS). WCH 13-OCT-2000. */N/*-- */N/*+ */N/* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */N/*  */I/* FOR$_ABCMNOXYZ */N/* */O/* IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */Q/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR */N/* MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS. */N/*  */P/* THE NAMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD APPEAR */N/* IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION. */N/* */N/* MACRO-32 PROGRAMMING: */N/* */N/* THE MACROS CALL: */N/*  */I/* $FORDEF */N/* */N/* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */N/* THE STS$V_MSG_ID IS THE FORTRAN ERROR NUMBER (1:94). */N/* THESE SYMBOLS ARE DECLARED EXTERNAL BY THE RUN-TIME LIBRARY, */N/* THE MACROS ARE PROVIDED ONLY FOR THE  CONVENIENCE OF THE USER. */N/*- */;/* ; MAKE ALL ERRORS BE SEVERE (EXCEPT AS NOTED) */;/* ; SET SUB-SYSTEM SPECIFIC BIT AND MAKE SEVERE */;/* ; SET LH TO 24 (DECIMAL). */#define FOR$_FACILITY 24#define FOR$_NOTFORSPE 1605644B/* ; NEVER SIGNALED. USED ONLY AS A FORTRAN ERROR */B/* ; NUMBER FOR ERRSNS TO MEAN SOME OTHER FACILITY */B/* ;  THAN FOR$ OR MTH$ DETECTED THE ERROR. */#define FOR$_NOTIMP 1605652#define FOR$_IGNORED 1605656#define FOR$_IGNNOTDEL 1605664#define FOR$_VERSION 1605683#define FOR$_BUG_CHECK 1605700#define FOR$_PERACCFIL 1605708#define FOR$_CANOVEEXI 1605716#define FOR$_UNINOTCON 1605723#define FOR$_SYNERRNAM 1605772#define FOR$_TOOMANVAL 1605780#define FOR$_INVREFVAR 1605788#define FOR$_REWERR 1605796#define FOR$_DUPFILSPE 1605804#define FOR$_INPRECTOO 1605812#def ine FOR$_BACERR 1605820#define FOR$_ENDDURREA 1605828#define FOR$_RECNUMOUT 1605836#define FOR$_OPEDEFREQ 1605844#define FOR$_TOOMANREC 1605852#define FOR$_CLOERR 1605860#define FOR$_FILNOTFOU 1605868#define FOR$_OPEFAI 1605876#define FOR$_MIXFILACC 1605884#define FOR$_INVLOGUNI 1605892#define FOR$_ENDFILERR 1605900#define FOR$_UNIALROPE 1605908#define FOR$_SEGRECFOR 1605916#define FOR$_ATTACCNON 1605924#define FOR$_INCRECLEN 1605932#define FOR$_ERRDURWRI 1605940#def ine FOR$_ERRDURREA 1605948#define FOR$_RECIO_OPE 1605956#define FOR$_INSVIRMEM 1605964#define FOR$_NO_SUCDEV 1605972#define FOR$_FILNAMSPE 1605980#define FOR$_INCRECTYP 1605988#define FOR$_KEYVALERR 1605996#define FOR$_INCOPECLO 1606004#define FOR$_WRIREAFIL 1606012#define FOR$_INVARGFOR 1606020#define FOR$_INVKEYSPE 1606028#define FOR$_INCKEYCHG 1606036#define FOR$_INCFILORG 1606044#define FOR$_SPERECLOC 1606052#define FOR$_NO_CURREC 1606060#define FOR$_REWRITERR 1606068 #define FOR$_DELERR 1606076#define FOR$_UNLERR 1606084#define FOR$_FINERR 1606092#define FOR$_MORONEREC 1605852#define FOR$_ATTREANON 1605924#define FOR$_FMTSYN 1606099#define FOR$_LISIO_SYN 1606108#define FOR$_INFFORLOO 1606116#define FOR$_FORVARMIS 1606124#define FOR$_SYNERRFOR 1606132#define FOR$_OUTCONERR 1606138#define FOR$_INPCONERR 1606148#define FOR$_FLTINV 1606156#define FOR$_OUTSTAOVE 1606164#define FOR$_INPSTAREQ 1606172#define FOR$_VFEVALERR 1606180#d efine FOR$_SIGINT 1606186#define FOR$_INTOVF 1606196#define FOR$_INTDIV 1606204#define FOR$_FLTOVF 1606210#define FOR$_FLTDIV 1606218#define FOR$_FLTUND 1606226#define FOR$_SIGFPE 1606234#define FOR$_SIGIOT 1606242#define FOR$_SUBRNG 1606252#define FOR$_SIGTERM 1606258#define FOR$_SIGQUIT 1606266#define FOR$_WRONUMARG 1606276#define FOR$_INVARGMAT 1606284#define FOR$_UNDEXP 1606292#define FOR$_LOGZERNEG 1606300#define FOR$_SQUROONEG 1606308#define FOR$_SIGLOSM AT 1606332#define FOR$_FLOOVEMAT 1606340#define FOR$_FLOUNDMAT 1606346#define FOR$_ADJARRDIM 1606380#define FOR$_INVMATKEY 1606388#define FOR$_FLOCONFAI 1606394#define FOR$_CANSTAFIL 1606500#define FOR$_OPEREQSEE 1606596#define FOR$_BRK_USERBP 1606676!#define FOR$_BRK_KERNELBP 1606684!#define FOR$_BRK_BD_TAKEN 1606700$#define FOR$_BRK_BD_NOTTAKEN 1606708 #define FOR$_BRK_SSTEPBP 1606716!#define FOR$_BRK_OVERFLOW 1606724 #define FOR$_BRK_DIVZERO 1606732#define FOR$_BRK_RANGE  1606740#define FOR$_BRK_RANGE2 1606748N/* ********** */N/* [X-9] THE FOLLOWING ERRORS REFER TO GENTRAP EXCEPTIONS OR SIGNALS */N/* AND ARE NOT RETURNED BY IOSTAT. */#define FOR$_FLTINE 1606756#define FOR$_DECOVF 1606764#define FOR$_DECDIV 1606772#define FOR$_DECINV 1606780#define FOR$_ROPRAND 1606788#define FOR$_ASSERTERR 1606796#define FOR$_NULPTRERR 1606804#define  FOR$_STKOVF 1606812#define FOR$_STRLENERR 1606820#define FOR$_SUBSTRERR 1606828#define FOR$_RANGEERR 1606836N/* ********** */N/* [X-10] THE FOLLOWING MESSAGE IS FOR FORTRAN 90'S ALLOCATABLE ARRAYS */#define FOR$_INVREALLOC 1606844N/* ********** */N/* [X-11] */#define FOR$_RESACQFAI 1606852N/* ********** */N/* [X-12] THE FOLLOWING MESSAGE IS FOR FORTRAN 90'S ALLOCATABLE ARRAYS */R/* [X-14] THE COMPILER MAY NOW CAUSE THIS MESSAGE TO BE GENERATED FOR POINTERS. */#define FOR$_INVDEALLOC 1606860N/* ********** */R/* [X-18] THE COMPILER MAY NOW CAUSE THIS MESSAGE TO BE GENERATED FOR POINTERS. */ #define FOR$_INVDEALLOC2 1607020N/* ********** */[/* [X-21] NEW ERRORS GENERATED FOR ARGUMENT LENGTHS SHORTER THAN STANDARD SPECIFIES FOR */N/* INTRINSIC DATE_AND_TIME. */N/* [X-24] NEW ERROR FOR GENERIC DIVIDE BY ZERO. */N/* [X-25] NEW ERROR FOR ARRAY ALLOCATION SIZE OVERFLOW. */!#define FOR$_SHORTDATEARG 1607036!#define FOR$_SHORTTIMEARG 1607044!#define FOR$_SHORTZONEARG 1607052#define FOR$_DIV! 1607060#define FOR$_ARRSIZEOVF 1607068N/* ********** */N/* THE FOLLOWING MESSAGES ARE SECONDARY MESSAGES, OR ARE USED ONLY IN */N/* EXIT HANDLERS, AND THEREFORE DO NOT NEED TO BE (AND SHOULD NOT BE) */N/* CONTIGUOUS WITH THE MESSAGES ABOVE. */N/* THE NEXT SIX MESSAGES ARE SECONDARY MESSAGES FOR USE WITH MIXFILACC IN */N/* FOR$$IO_BEG AND FOR$$CB. " */#define FOR$_UNFIO_FMT 1607684#define FOR$_FMTIO_UNF 1607692#define FOR$_DIRIO_KEY 1607700#define FOR$_SEQIO_DIR 1607708#define FOR$_KEYIO_DIR 1607716#define FOR$_IO_NONFOR 1607724N/* THE NEXT TWO MESSAGES ARE SECONDARY MESSAGES FOR USE WITH INPCONERR IN */N/* FOR$$UDF_WF AND FOR$$UDF_WL. */#define FOR$_INVTEXREC 1607732#define FOR$_INVTEX 1607740N/* ADDITIONAL SECONDARY MESSAGES # */#define FOR$_OPEREQDIS 1607748#define FOR$_OPEREQSEQ 1607756#define FOR$_PROABOUSE 1607762#define FOR$_FLOCONFAIU 1607770N/* ********** */S/* [X-13] THE FOLLOWING MESSAGE IS A FATAL MESSAGE ACCORDING TO THE F90 STANDARD */#define FOR$_ENDRECDUR 1607780Z/* THESE NEXT 4 MESSAGES ARE USED IN THE EXIT HANDLER WHICH IS DECLARED BY FOR$HANDLER. */#define FOR$_FLOINEEXC 1608003#define FOR$_FLOINVEXC 1608011#define FOR$_FLO $ OVFEXC 1608019#define FOR$_FLODIV0EXC 1608027#define FOR$_FLOUNDEXC 1608035 #define FOR$_VECALIGNEXC 1608043N/* END OF SPECIAL MESSAGES */N/* ********** */N/* ********** */N/* RESERVE A NUMBER FOR A MESSAGE TO REPORT COMPILED CODE GENERATED */N/* RUNTIME ERRORS. % */#define FOR$_MSGBUFOVF 1608828#define FOR$_DIAGNOSTIC 1608836N/* ********** */N/* THE FOLLOWING MESSAGES ARE MESSAGES ISSUED FROM FORRTL2, THE */N/* VAX FORTRAN V5.0 PARALLEL PROCESSING RTL SUPPORT. */N/* */#define FOR$_FATINTERR 1609732#define FOR$_SUBPRCDIED 1609740#define FOR$_NOTIMPRET 1609748#define FOR$& _FAIOWNERID 1609756#define FOR$_FAIPRCID 1609764#define FOR$_FAIPRCNAME 1609772#define FOR$_FAIACTCPU 1609780#define FOR$_FAIIDPRC 1609788 #define FOR$_FAIIMAGNAME 1609796#define FOR$_FAIDCLEXIT 1609804#define FOR$_FAISUBPRC 1609812#define FOR$_INVNUMPRC 1609820#define FOR$_MEMSHRERR 1609828 #define FOR$_LOCALSHRERR 1609836 #define FOR$_LOCALACCESS 1609844#define FOR$_INVLCLADR 1609852#define FOR$_COMSHRERR 1609860#define FOR$_INVCOMADR 1609868#define FOR$_PARINITERR 16 ' 09876 #define FOR$_STACKSHRERR 1609884 #define FOR$_FAISHRSTACK 1609892#define FOR$_INVUNWIND 1609900#define FOR$_STKBUFOVR 1609908#define FOR$_SUBPRCDEL 1609916N#define FOR$_ASSERTFAIL 1609924 /* ********** */O/* THE FOLLOWING MESSAGES ARE MESSAGES ISSUED FROM MICORSOFT FORTRAN AND NOW */N/* VISUAL FORTRAN. */N/* */N/* [X-16] TH( E FOLLOWING ERRORS REFER TO MSF ERROR MESSAGES. */N/* THESE MESSAGES MUST REMAIN IN CONTIGUOUS ORDER SO THAT AN */N/* OFFSET INTO A MAPPING ARRAY CAN BE COMPUTED FROM THE MESSAGE */N/* BASE NUMBER, WHICH IS 540 FOR MSF MESSAGES. THAT WAY VISUAL */N/* FORTRAN CAN RETURN IOSTAT NUMBERS SIMILAR TO MSF. ALSO */N/* WE PUT THESE MESSAGES THIS FAR DOWN TO KEEP IN SYNCH WITH */N/* THE VMS MESSAGE FILE. IT HAS CONTI) GUOUS OPENINGS UP TO 768 */N/* IN THIS RANGE. THE NEXT CONTIGUOUS OPENING BEGINS FROM 1024. */#define FOR$_F6096 1609956#define FOR$_F6097 1609964#define FOR$_F6098 1609972#define FOR$_F6099 1609980#define FOR$_F6100 1609988#define FOR$_F6101 1609996#define FOR$_F6102 1610004#define FOR$_F6103 1610012#define FOR$_F6104 1610020#define FOR$_F6105 1610028#define FOR$_F6106 1610036#define FOR$_F6200 1610044#define FOR$_F6201 1610052#define FOR$_F6202 1* 610060#define FOR$_F6203 1610068#define FOR$_F6204 1610076#define FOR$_F6205 1610084#define FOR$_F6206 1610092#define FOR$_F6207 1610100#define FOR$_F6208 1610108#define FOR$_F6209 1610116#define FOR$_F6210 1610124#define FOR$_F6211 1610132#define FOR$_F6212 1610140#define FOR$_F6213 1610148#define FOR$_F6214 1610156#define FOR$_F6300 1610164#define FOR$_F6301 1610172#define FOR$_F6302 1610180#define FOR$_F6303 1610188#define FOR$_F6304 1610196#define FOR$_F6305 161+ 0204#define FOR$_F6306 1610212#define FOR$_F6307 1610220#define FOR$_F6308 1610228#define FOR$_F6309 1610236#define FOR$_F6310 1610244#define FOR$_F6311 1610252#define FOR$_F6312 1610260#define FOR$_F6313 1610268#define FOR$_F6314 1610276#define FOR$_F6315 1610284#define FOR$_F6316 1610292#define FOR$_F6317 1610300#define FOR$_F6318 1610308#define FOR$_F6319 1610316#define FOR$_F6400 1610324#define FOR$_F6401 1610332#define FOR$_F6402 1610340#define FOR$_F6403 16103, 48#define FOR$_F6404 1610356#define FOR$_F6405 1610364#define FOR$_F6406 1610372#define FOR$_F6407 1610380#define FOR$_F6408 1610388#define FOR$_F6409 1610396#define FOR$_F6410 1610404#define FOR$_F6411 1610412#define FOR$_F6412 1610420#define FOR$_F6413 1610428#define FOR$_F6414 1610436#define FOR$_F6415 1610444#define FOR$_F6416 1610452#define FOR$_F6417 1610460#define FOR$_F6418 1610468#define FOR$_F6419 1610476#define FOR$_F6420 1610484#define FOR$_F6421 1610492- #define FOR$_F6422 1610500#define FOR$_F6423 1610508#define FOR$_F6424 1610516#define FOR$_F6425 1610524#define FOR$_F6500 1610532#define FOR$_F6501 1610540#define FOR$_F6502 1610548#define FOR$_F6503 1610556#define FOR$_F6504 1610564#define FOR$_F6505 1610572#define FOR$_F6506 1610580#define FOR$_F6507 1610588#define FOR$_F6508 1610596#define FOR$_F6509 1610604#define FOR$_F6510 1610612#define FOR$_F6511 1610620#define FOR$_F6512 1610628#define FOR$_F6513 1610636. #define FOR$_F6514 1610644#define FOR$_F6515 1610652#define FOR$_F6516 1610660#define FOR$_F6600 1610668#define FOR$_F6601 1610676#define FOR$_F6602 1610684#define FOR$_F6700 1610692#define FOR$_F6701 1610700#define FOR$_F6970 1610708#define FOR$_F6971 1610716#define FOR$_F6972 1610724#define FOR$_F6980 1610732#define FOR$_F6981 1610740#define FOR$_F6982 1610748#define FOR$_F6983 1610756#define FOR$_F6984 1610764#define FOR$_F6985 1610772#define FOR$_F6986 1610780#d/ efine FOR$_F6987 1610788#define FOR$_F6988 1610796#define FOR$_F6989 1610804#define FOR$_F6990 1610812#define FOR$_F6991 1610820#define FOR$_F6992 1610828#define FOR$_F6993 1610836#define FOR$_F6994 1610844#define FOR$_F6995 1610852#define FOR$_F6996 1610860#define FOR$_F6997 1610868#define FOR$_F6998 1610876#define FOR$_F6999 1610884#define FOR$_F6702 1610892#define FOR$_F6703 1610900#define FOR$_F6704 1610908#define FOR$_F6705 1610916#define FOR$_F6706 1610924#def0 ine FOR$_F6707 1610932#define FOR$_F6708 1610940#define FOR$_F6709 1610948#define FOR$_F6710 1610956#define FOR$_F6711 1610964#define FOR$_F6712 1610972#define FOR$_F6713 1610980#define FOR$_F6714 1610988#define FOR$_F6715 1610996#define FOR$_F6716 1611004#define FOR$_F6717 1611012#define FOR$_F6718 1611020#define FOR$_F6719 1611028#define FOR$_F6720 1611036#define FOR$_F6721 1611044#define FOR$_F6722 1611052#define FOR$_F6723 1611060#define FOR$_F6724 1611068#defin1 e FOR$_F6725 1611076#define FOR$_F6726 1611084#define FOR$_F6727 1611092#define FOR$_F6728 1611100#define FOR$_F6729 1611108#define FOR$_F6730 1611116#define FOR$_F6731 1611124#define FOR$_F6732 1611132#define FOR$_F6733 1611140#define FOR$_F6734 1611148#define FOR$_F6735 1611156#define FOR$_F6736 1611164#define FOR$_F6737 1611172#define FOR$_F6738 1611180#define FOR$_F6739 1611188#define FOR$_F6740 1611196#define FOR$_F6741 1611204#define FOR$_F6742 1611212#define 2 FOR$_F6743 1611220#define FOR$_F6744 1611228#define FOR$_F6745 1611236#define FOR$_F6746 1611244#define FOR$_F6747 1611252#define FOR$_F6748 1611260#define FOR$_F6749 1611268#define FOR$_F6750 1611276#define FOR$_F6751 1611284#define FOR$_F6752 1611292#define FOR$_F6753 1611300#define FOR$_F6754 1611308#define FOR$_F6755 1611316#define FOR$_F6756 1611324#define FOR$_F6757 1611332#define FOR$_F6758 1611340#define FOR$_F6759 1611348#define FOR$_F6760 1611356#define FO3 R$_F6761 1611364#define FOR$_F6762 1611372#define FOR$_F6763 1611380#define FOR$_F6764 1611388#define FOR$_F6765 1611396#define FOR$_F6766 1611404#define FOR$_F6767 1611412#define FOR$_F6768 1611420#define FOR$_F6769 1611428#define FOR$_F6770 1611436#define FOR$_F6771 1611444#define FOR$_F6772 1611452#define FOR$_F6773 1611460#define FOR$_F6774 1611468#define FOR$_F6775 1611476#define FOR$_F6776 1611484#define FOR$_F6777 1611492#define FOR$_F6778 1611500#define FOR$4 _F6779 1611508#define FOR$_F6780 1611516#define FOR$_F6781 1611524#define FOR$_F6782 1611532#define FOR$_F6783 1611540#define FOR$_F6784 1611548#define FOR$_F6785 1611556#define FOR$_F6786 1611564#define FOR$_F6787 1611572#define FOR$_F6788 1611580#define FOR$_F6789 1611588#define FOR$_F6790 1611596#define FOR$_F6791 1611604#define FOR$_F6792 1611612#define FOR$_F6793 1611620#define FOR$_F6794 1611628#define FOR$_F6795 1611636#define FOR$_F6796 1611644#define FOR$_F5 6797 1611652#define FOR$_F6798 1611660#define FOR$_F6799 1611668#define FOR$_F6800 1611676#define FOR$_F6801 1611684#define FOR$_F6802 1611692#define FOR$_F6803 1611700#define FOR$_F6804 1611708N/* END OF SPECIAL MISCROSOFT ERROR MESSAGES */N/* ********** */#define FOR$_INVLOGNAM 1611778#define FOR$_TOOMANPRC 1611786 #define FOR$_INVDSTRSIZE 1611794#define FOR$_DEFVALUSED 1615875#def 6 ine FOR$_UNIPROCESS 1615883#define FOR$_NOPARINIT 1615891#define FOR$_NOTRUNINPP 1615899#define FOR$_NESTPPLOOP 1615907#define FOR$_UNAWAKSUB 1615915N/* END OF FORRTL2 MESSAGES */N/* ********** */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the7 previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FORDEF_LOADED */ ww更/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//***************************************************************** 8 ***************************************************************//*** MODULE $FSCNDEF ***/#ifndef __FSCNDEF_LOADED#define __FSCNDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __sh9 ort /* 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 N/* : */N/* Descriptor codes for SYS$FILESCAN */N/* */#define FSCN$M_NODE 0x1#define FSCN$M_DEVICE 0x2#define FSCN$M_ROOT 0x4#define FSCN$M_DIRECTORY 0x8#define FSCN$M_NAME 0x10#define FSCN$M_TYPE 0x20#define FSCN$M_VERSION 0x40 #define FSCN$M_NODE_PRIMARY 0x80#define FSCN$M_NODE_ACS 0x100##define FSCN$M ; _NODE_SECONDARY 0x200 #ifdef __NEW_STARLETtypedef struct _fldflags {N unsigned fscn$v_node : 1; /* Node name present */N unsigned fscn$v_device : 1; /* Device name present */N unsigned fscn$v_root : 1; /* Root directory present */N unsigned fscn$v_directory : 1; /* Directory present */N unsigned fscn$v_name : 1; /* File name present */N unsigned fscn$v_type : 1 < ; /* File type present */N unsigned fscn$v_version : 1; /* File version present */N unsigned fscn$v_node_primary : 1; /* Primary (first) node present */N unsigned fscn$v_node_acs : 1; /* Primary ACS present */N unsigned fscn$v_node_secondary : 1; /* Secondary node present */N unsigned fscndef$$_fill_1 : 22; /* Fill out longword */ } FLDFLAGS;#else /* __OLD_STARLET */stru= ct fldflags {N unsigned fscn$v_node : 1; /* Node name present */N unsigned fscn$v_device : 1; /* Device name present */N unsigned fscn$v_root : 1; /* Root directory present */N unsigned fscn$v_directory : 1; /* Directory present */N unsigned fscn$v_name : 1; /* File name present */N unsigned fscn$v_type : 1; /* File type present */N unsign> ed fscn$v_version : 1; /* File version present */N unsigned fscn$v_node_primary : 1; /* Primary (first) node present */N unsigned fscn$v_node_acs : 1; /* Primary ACS present */N unsigned fscn$v_node_secondary : 1; /* Secondary node present */N unsigned fscndef$$_fill_1 : 22; /* Fill out longword */ } ;%#endif /* #ifdef __NEW_STARLET */N#define FSCN$_FILESPEC 1 /* complete filespec ? */N#define FSCN$_NODE 2 /* node:: field */N#define FSCN$_DEVICE 3 /* device: field */N#define FSCN$_ROOT 4 /* [root.] field */N#define FSCN$_DIRECTORY 5 /* [directory] field */N#define FSCN$_NAME 6 /* name field */N#define FSCN$_TYPE 7 /* .typ field */N#define FSCN @ $_VERSION 8 /* ;version field */N#define FSCN$_NODE_PRIMARY 9 /* primary node field */N#define FSCN$_NODE_ACS 10 /* acc. cont. str. fld. */N#define FSCN$_NODE_SECONDARY 11 /* secondary node field */#define FSCN$S_ITEM_LEN 8 #ifdef __NEW_STARLETtypedef struct _fscndef {N unsigned short int fscn$w_length; /* return length word */N unsigned short int fscn$w_item_c A ode; /* item code value */N void *fscn$l_addr; /* component address */ } FSCNDEF;#else /* __OLD_STARLET */struct fscndef {N unsigned short int fscn$w_length; /* return length word */N unsigned short int fscn$w_item_code; /* item code value */N int fscn$l_addr; /* component address */ } ;%#endif /* #ifdef __NEW_STARLET */  $#pragma __member_aB lignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __FSCNDEF_LOADED */ ww直/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVM C S SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $GEN64DEF ***/#ifndef __GEN64DEF_LOADED#define __GEN64DEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* DefineD d 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 __stE ruct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* Define the generic quadword structure. */N/*- */  #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If F using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _generic_64 {#pragma __nomember_alignmentN __union { /* You can treat me as... */N unsigned __int64 gen64$q_quadword; /* ...a single 64-bit value, or */N unsigned int gen64$l_longword [2]; /* ...two 32-bit values, or */N unsigned short int gen64$w_word [4]; /* ...four 16-bit values */ G } gen64$r_quad_overlay; } GENERIC_64; #if !defined(__VAXC)>#define gen64$q_quadword gen64$r_quad_overlay.gen64$q_quadword>#define gen64$l_longword gen64$r_quad_overlay.gen64$l_longword6#define gen64$w_word gen64$r_quad_overlay.gen64$w_word"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_align H ment#endiftypedef struct _generic_64 {#pragma __nomember_alignmentN __union { /* You can treat me as... */N unsigned int gen64$q_quadword [2]; /* ...a single 64-bit value, or */N unsigned int gen64$l_longword [2]; /* ...two 32-bit values, or */N unsigned short int gen64$w_word [4]; /* ...four 16-bit values */ } gen64$r_quad_overlay; } generic_64; #if !defined(__VAXC)>#define gen64$q_quadword gen64$r I _quad_overlay.gen64$q_quadword>#define gen64$l_longword gen64$r_quad_overlay.gen64$l_longword6#define gen64$w_word gen64$r_quad_overlay.gen64$w_word"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define GEN64$K_LENGTH 8 /* Length of GEN64 structure */N#define GEN64$C_LENGTH 8 /* Length of GEN64 structure */ )#if defined (__ALPHA) || defined (__ia64)# ifdef __INITIAL_POINTER_SIZEQ# pragma __required_pointer_sJ ize __save /* Save current pointer size */K# pragma __required_pointer_size 64 /* Pointers are 64-bits */V typedef struct _generic_64 * GENERIC_64_PQ; /* 64-bit pointer to a GENERIC_64 */c typedef struct _generic_64 ** GENERIC_64_PPQ;/* 64-bit pointer to a pointer to a GENERIC_64 */W# pragma __required_pointer_size __restore /* Return to previous pointer size */# elsef typedef unsigned __int64 GENERIC_64_PQ; /* Same size as a 64-bit pointer to K an GENERIC_64 */s typedef unsigned __int64 GENERIC_64_PPQ; /* Same size as a 64-bit pointer to a pointer to an GENERIC_64 */# endif#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __GEN64DEF_LOADED */ ww0 L /********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $GETSPIDEF ***/#ifndef __GETSPIDEF_LOADED#define __GETSPIDEF_LOADED 1 G M #pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __optiN onal_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 N/*+ */N/* Get System Performance Information Data Identifier Definitions */O N/* */I/* The following constants define the items which can be collected */I/* with the Get System Performance Information service (GETSPI). */I/* The item numbers are defined as follows: */N/* */I/* 16 12 0 */I/* +------------------+-------------+ P */I/* | Structure number | Item number | */I/* +------------------+-------------+ */N/* */K/* The top four bits represent the structure of the item and the last 12 */I/* bits represent the item within the structure. */N/* */N/* CQ aution! */N/* The SPIDEF in the [montor] facility contained the following */N/* instructions on adding new symbols. With this interface being added */N/* to STARLET, changing any item number is unacceptable. Some spare item */O/* number exist in each range; if these are ever exhausted, new ranges must */N/* be defined and support added, rather than changing item numbers. */N/* R */L/* * The item numbers start */N/* * at 0 and increase sequentially to the last item (even across tables). */N/* * If new items are added to a table, programs MUST be relinked to allow */L/* * the old definitions to change. This was done to simplify some table */M/* * lookups in the Monitor Utility. To get around this, new items can be */L/* * added at the end of the list. S */N/* * */O/* * Each table has one item at the end to act as a place holder. It should */M/* * have the same item number as the first item of the next table. These */S/* * items are not counters in the total number of SPI items GETSPI$_TABLESIZE. */N/*- */N/* DEFINE TABLE TYPES */T N#define GETSPI$C_EXETYPE 1 /* Executive cells */N#define GETSPI$C_EWSTYPE 2 /* Executive writable storage area */N#define GETSPI$C_MONTYPE 3 /* Monitor specific items */N#define GETSPI$C_RMSTYPE 4 /* Monitor RMS specific items */N#define GETSPI$C_LISTEND 0 /* End of table list */N/* */T/* The following sectionU defines items which are collected during initialization. */P/* There items include general system information, and server version number. */N/* The server version number is also defined here. */N/* */N#define GETSPI$_INITIAL -1 /* Initialization item list */N#define GETSPI$_DATA_COLLECTION -2 /* Data collection item list */N#define GETSPI$_SYSINFO -3 /* V System information item */N#define GETSPI$_VERSION_NUMBER -4 /* Monitor version number */N#define GETSPI$_RMS_FILE -5 /* Parse file name */N#define GETSPI$_RMS_GS -6 /* Get global section address */#define GETSPI$_LAST_TYPE -7 #define GETSPI$_SERVER_VERSION 5N/* */N/* Define bits in the PMS flags field PMS$GL_FLAGS. These are used to */N/* s W ynchronize access to some PMS field and enable other activity. */N/* */ #ifdef __NEW_STARLET"typedef struct _getspi$pms_flags {T __struct { /* Class qualifier flags for CDB (Active) */[ unsigned getspi$v_disk_enable : 1; /* YES => Enable disk queue length collection */N/* This field must be accessed via an interlocked */N/* bit instruction. X */N unsigned getspi$v_filler1 : 7; /* Fill out remainder of first byte */` unsigned getspi$v_disk_sync : 1; /* YES => Synchronize access to several PMS counters */N/* used in the collection of disk queue length. */N/* This field must be accessed via an interlocked */N/* bit instruction, AND MUST BE IN A SEPARATE */N/* BYTE from the disk_enable Y bit (required by */N/* the architecture to maintain synchronization). */N unsigned getspi$v_filler2 : 23; /* Fill out remainder of field */ } getspi$l_flags; } GETSPI$PMS_FLAGS; #if !defined(__VAXC)@#define getspi$v_disk_enable getspi$l_flags.getspi$v_disk_enable8#define getspi$v_filler1 getspi$l_flags.getspi$v_filler1<#define getspi$v_disk_sync getspi$l_flags.getspi$v_disk_sync8#define getspi$v_filler2 getspi$l_fl Z ags.getspi$v_filler2"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct getspi$pms_flags {T __struct { /* Class qualifier flags for CDB (Active) */[ unsigned getspi$v_disk_enable : 1; /* YES => Enable disk queue length collection */N/* This field must be accessed via an interlocked */N/* bit instruction. */N unsigned getspi$v_filler1 : 7; /* F[ ill out remainder of first byte */` unsigned getspi$v_disk_sync : 1; /* YES => Synchronize access to several PMS counters */N/* used in the collection of disk queue length. */N/* This field must be accessed via an interlocked */N/* bit instruction, AND MUST BE IN A SEPARATE */N/* BYTE from the disk_enable bit (required by */N/* the architecture to maintain synchronizati\ on). */N unsigned getspi$v_filler2 : 23; /* Fill out remainder of field */ } getspi$l_flags; } ; #if !defined(__VAXC)@#define getspi$v_disk_enable getspi$l_flags.getspi$v_disk_enable8#define getspi$v_filler1 getspi$l_flags.getspi$v_filler1<#define getspi$v_disk_sync getspi$l_flags.getspi$v_disk_sync8#define getspi$v_filler2 getspi$l_flags.getspi$v_filler2"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* ] */N/* Define two contants to handle help handle large lookaside lists. The */N/* maximum number that SPISHR will count to is defined with */N/* GETSPI$K_MAX_PACKET and the value returned when this threshold is */N/* reached is defined as GETSPI$K_POOL_OVF. */N/* */#define GETSPI$K_MAX_PACKET 500%#d^ efine GETSPI$K_POOL_OVF -2147483647N/* */N/* Define item identifier numbers. Each data item has an associated */N/* value which is used to find its entry in the EXETBL. The item table */N/* is defined by the macros SPI_GENERATE_TABLE which makes multiple calls */N/* to the macro SPI_ITEM_CODE defined in the SYSGETSPI module. */N/* _ */N#define GETSPI$_MODES 4096 /* All modes counters on all CPU's */P#define GETSPI$_INTERRUPT 4097 /* time on interrupt stack -- primary */N#define GETSPI$_KERNEL 4098 /* time in kernel mode -- primary */N#define GETSPI$_EXEC 4099 /* time in exec mode -- primary */P#define GETSPI$_SUPER 4100 /* time in supervisor mode -- primary */N#define GETSPI$_USER 4101 /* time in user mode -- primary */N#define GE` TSPI$_COMPAT 4102 /* time in compat. mode -- primary */X#define GETSPI$_INTERRUPT_BUSY 4103 /* Time spent spinning on the interrupt stack */U#define GETSPI$_KERNEL_BUSY 4104 /* Time spent spinning on the lernel stack */N#define GETSPI$_IDLE 4105 /* idle time -- primary */N#define GETSPI$_CPUBUSY 4106 /* RETIRED ITEM - RETURNS 0 */N#define GETSPI$_COLPG 4107 /* collided page wait */N#define GETSPI$_MWa AIT 4108 /* memory wait */N#define GETSPI$_CEF 4109 /* common event flag wait */N#define GETSPI$_PFW 4110 /* page wait */N#define GETSPI$_LEF 4111 /* local event flag wait */N#define GETSPI$_LEFO 4112 /* lef wait out of bal. set */N#define GETSPI$_HIB 4113 /* hibernating */N#define GETSPI$_HIBO 4114 /* hb ibernating outswapped */N#define GETSPI$_SUSP 4115 /* suspended */N#define GETSPI$_SUSPO 4116 /* suspended outswapped */N#define GETSPI$_FPG 4117 /* free page wait */N#define GETSPI$_COM 4118 /* computing */N#define GETSPI$_COMO 4119 /* computable outswapped */N#define GETSPI$_CUR 4120 /* current c */N#define GETSPI$_OTHSTAT 4121 /* RETIRED ITEM - RETURNS 0 */N#define GETSPI$_PROCS 4122 /* process count for SYSTEM class */N#define GETSPI$_PROC 4123 /* collect all process information */N#define GETSPI$_FRLIST 4124 /* size of free list */N#define GETSPI$_MODLIST 4125 /* size of modified list */N#define GETSPI$_FAULTS 4126 /* page fault count */N#define GETSPI$_d PREADS 4127 /* page reads */N#define GETSPI$_PWRITES 4128 /* page writes */N#define GETSPI$_PWRITIO 4129 /* physical page write I/O's */N#define GETSPI$_PREADIO 4130 /* physical page read I/O's */N#define GETSPI$_GVALFLTS 4131 /* global valid faults */N#define GETSPI$_WRTINPROG 4132 /* faults from write in progress */N#define GETSPI$_FREFLTS 4133 /*e faults from free list */N#define GETSPI$_MFYFLTS 4134 /* faults from modified list */N#define GETSPI$_DZROFLTS 4135 /* demand zero faults */N#define GETSPI$_SYSFAULTS 4136 /* system page faults */N#define GETSPI$_LRPCNT 4137 /* number of LRP packets available */N#define GETSPI$_LRPINUSE 4138 /* number of LRPs in use */N#define GETSPI$_IRPCNT 4139 /* number of IRP packets avaf ilable */N#define GETSPI$_IRPINUSE 4140 /* number of IRPs in use */N#define GETSPI$_SRPCNT 4141 /* number of SRP packets available */N#define GETSPI$_SRPINUSE 4142 /* number of SRPs in use */N#define GETSPI$_HOLECNT 4143 /* number of blocks in dyn. memory */N#define GETSPI$_BIGHOLE 4144 /* largest hole */N#define GETSPI$_SMALLHOLE 4145 /* smallest hole */R#define GETSPIg $_HOLESUM 4146 /* total space in dyn. memory available */N#define GETSPI$_DYNINUSE 4147 /* dynamic memory space in use */Q#define GETSPI$_SMALLCNT 4148 /* number of blocks < 32 bytes in size */N#define GETSPI$_ISWPCNT 4149 /* total inswaps */N#define GETSPI$_DIRIO 4150 /* count of direct I/Os */N#define GETSPI$_BUFIO 4151 /* count of buffered I/Os */N#define GETSPI$_MBREADS 4152 h /* total mailbox reads */N#define GETSPI$_MBWRITES 4153 /* total mailbox writes */N#define GETSPI$_LOGNAM 4154 /* logical name translations */N#define GETSPI$_FCPCALLS 4155 /* total fcp calls */N#define GETSPI$_FCPREAD 4156 /* number of disk reads by FCP */N#define GETSPI$_FCPWRITE 4157 /* number of disk writes by FCP */N#define GETSPI$_FCPCACHE 4158 /* number of FCP ci ache hits */N#define GETSPI$_FCPCPU 4159 /* number of CPU tics by FCP */N#define GETSPI$_FCPHIT 4160 /* number of window hits */N#define GETSPI$_FCPSPLIT 4161 /* number of split transfers */N#define GETSPI$_FCPFAULT 4162 /* number of FCP page faults */N#define GETSPI$_ENQNEW 4163 /* number of ENQ's (new) */N#define GETSPI$_ENQCVT 4164 /* number of ENQ's (conversions) */N#defj ine GETSPI$_DEQ 4165 /* number of DEQ's */N#define GETSPI$_BLKAST 4166 /* number of blocking AST's */N#define GETSPI$_ENQWAIT 4167 /* number of ENQ's forced to wait */N#define GETSPI$_ENQNOTQD 4168 /* number of ENQ's not queued */N#define GETSPI$_DLCKSRCH 4169 /* number of deadlock searches */N#define GETSPI$_DLCKFND 4170 /* number of deadlocks found */N#define GETSPI$_NUMLOCKS 4171 k /* total locks */N#define GETSPI$_NUMRES 4172 /* total resources */N#define GETSPI$_ARRLOCPK 4173 /* arriving local packets */N#define GETSPI$_DEPLOCPK 4174 /* departing local packets */N#define GETSPI$_ARRTRAPK 4175 /* arriving transit packets */N#define GETSPI$_TRCNGLOS 4176 /* transit congestion loss */N#define GETSPI$_RCVBUFFL 4177 /* receiver buffl er failures */N#define GETSPI$_RESERVED1 4178 /* Reserved PMS location 1 */N#define GETSPI$_RESERVED2 4179 /* Reserved PMS location 2 */N#define GETSPI$_RESERVED3 4180 /* Reserved PMS location 3 */N#define GETSPI$_RESERVED4 4181 /* Reserved PMS location 4 */N#define GETSPI$_RESERVED5 4182 /* Reserved PMS location 5 */N#define GETSPI$_RESERVED6 4183 /* Reserved PMS location 6 */N#dm efine GETSPI$_RESERVED7 4184 /* Reserved PMS location 7 */N#define GETSPI$_RESERVED8 4185 /* Reserved PMS location 8 */N#define GETSPI$_RESERVED9 4186 /* Reserved PMS location 9 */N#define GETSPI$_RESERVED10 4187 /* Reserved PMS location 10 */N#define GETSPI$_RESERVED11 4188 /* Reserved PMS location 11 */N#define GETSPI$_RESERVED12 4189 /* Reserved PMS location 12 */N#define GETSPI$_RESERVED13 4n 190 /* Reserved PMS location 13 */N#define GETSPI$_RESERVED14 4191 /* Reserved PMS location 14 */N#define GETSPI$_RESERVED15 4192 /* Reserved PMS location 15 */N#define GETSPI$_RESERVED16 4193 /* Reserved PMS location 16 */N#define GETSPI$_RESERVED17 4194 /* Reserved PMS location 17 */N#define GETSPI$_RESERVED18 4195 /* Reserved PMS location 18 */N#define GETSPI$_FID_TRIES 4196 /* count of Fio le Id cache attempts */Q#define GETSPI$_FILHDR_TRIES 4197 /* count of File header cache attempts */U#define GETSPI$_DIRFCB_TRIES 4198 /* count of Directory block cache attempts */T#define GETSPI$_DIRDATA_TRIES 4199 /* count of Directory data cache attempts */N#define GETSPI$_EXT_TRIES 4200 /* count of Extent cache attempts */N#define GETSPI$_QUO_TRIES 4201 /* count of Quota cache attempts */T#define GETSPI$_STORAGMAP_TRIES 4202 /* count of storage bip tmap cache attempts */N#define GETSPI$_DISKS 4203 /* all disk data */x#define GETSPI$_TOTAL_LOCKS 4204 /* Total of all locking activity - NOT COLLECTED BY SPI - COMPUTED BY MONITOR */N#define GETSPI$_ENQNEWLOC 4205 /* new lock requests (local) */N#define GETSPI$_ENQNEWIN 4206 /* new lock requests (incoming) */N#define GETSPI$_ENQNEWOUT 4207 /* new lock requests (outgoing) */N#define GETSPI$_ENQCVTLOC 4208 q /* lock conversion requests (local) */Q#define GETSPI$_ENQCVTIN 4209 /* lock conversion requests (incoming) */Q#define GETSPI$_ENQCVTOUT 4210 /* lock conversion requests (outgoing) */N#define GETSPI$_DEQLOC 4211 /* dequeues (local) */N#define GETSPI$_DEQIN 4212 /* dequeues (incoming) */N#define GETSPI$_DEQOUT 4213 /* dequeues (outgoing) */N#define GETSPI$_BLKLOC 4214 /* blocking ASTs qr ueued (local) */N#define GETSPI$_BLKIN 4215 /* blocking ASTs queued (incoming) */N#define GETSPI$_BLKOUT 4216 /* blocking ASTs queued (outgoing) */N#define GETSPI$_DIRIN 4217 /* directory operations (incoming) */N#define GETSPI$_DIROUT 4218 /* directory operations (outgoing) */T#define GETSPI$_DLCKMSGS 4219 /* deadlock detection messages (in & out) */N#define GETSPI$_SCS 4220 /* All SCS information */s N#define GETSPI$_SYSTIME 4221 /* Current system time */P#define GETSPI$_MSCP_REQUEST 4222 /* IO request rate to the MSCP server */R#define GETSPI$_MSCP_READ 4223 /* Read request rate to the MSCP server */S#define GETSPI$_MSCP_WRITE 4224 /* Write request rate to the MSCP server */P#define GETSPI$_MSCP_FRAGMENT 4225 /* Rate at which I/O's are fragmented */N#define GETSPI$_MSCP_SPLIT 4226 /* Rate at which I/O's are split */g#define GEt TSPI$_MSCP_BUFWAIT 4227 /* Rate at which incoming requests have to wait for a buffer */N#define GETSPI$_MSCP_SIZE1 4228 /* I/O rate for sizes 1-2 blocks */N#define GETSPI$_MSCP_SIZE2 4229 /* I/O rate for sizes 2-3 blocks */N#define GETSPI$_MSCP_SIZE3 4230 /* I/O rate for sizes 4-7 blocks */N#define GETSPI$_MSCP_SIZE4 4231 /* I/O rate for sizes 8-15 blocks */N#define GETSPI$_MSCP_SIZE5 4232 /* I/O rate for sizes 16-31 blocks */N#define GEu TSPI$_MSCP_SIZE6 4233 /* I/O rate for sizes 32-63 blocks */N#define GETSPI$_MSCP_SIZE7 4234 /* I/O rate for sizes 64-127 blocks */_#define GETSPI$_MSCP_ALL 4235 /* Dummy item to collect all MSCP server class items */N#define GETSPI$_DDTM_STARTS 4236 /* Local Transaction starts */N#define GETSPI$_DDTM_PREPARES 4237 /* Local Transaction prepare event */P#define GETSPI$_DDTM_ONE_PHASE 4238 /* Transaction ONE_PHASE commit event */N#define GETSPI$_v DDTM_COMMITS 4239 /* Local Transaction commit event */N#define GETSPI$_DDTM_ABORTS 4240 /* Local Transaction abort event */N#define GETSPI$_DDTM_ENDS 4241 /* Local Transaction ends */N#define GETSPI$_DDTM_BRANCHS 4242 /* Start branch event */N#define GETSPI$_DDTM_ADDS 4243 /* Add branch event */N#define GETSPI$_DDTM_BUCKETS1 4244 /* TPS rate for < 1 */N#define GETSPI$_DDTM_BUCKETS2 4245 /*w TPS rate for 1-2 */N#define GETSPI$_DDTM_BUCKETS3 4246 /* TPS rate for 2-3 */N#define GETSPI$_DDTM_BUCKETS4 4247 /* TPS rate for 3-4 */N#define GETSPI$_DDTM_BUCKETS5 4248 /* TPS rate for 4-5 */N#define GETSPI$_DDTM_BUCKETS6 4249 /* TPS rate for > 6 */_#define GETSPI$_DDTM_ALL 4250 /* Dummy item to collect all TRANSACTION class items */N#define GETSPI$_VECTORP 4251 /* Vector x Processor tics scheduled */N#define GETSPI$_VBYTE_READ 4252 /* VBS bytes read */N#define GETSPI$_VBYTE_WRITE 4253 /* VBS bytes written */#define GETSPI$_VVBS_TRAN 4254#define GETSPI$_VRBS_TRAN 4255#define GETSPI$_VDIO_SEL 4256"#define GETSPI$_VDIOMAP_ALLOC 4257#define GETSPI$_VRBS_AVAIL 4258#define GETSPI$_VSEL_FAIL 4259#define GETSPI$_VVBSM_HIT 4260 #define GETSPI$_VVBSM_CACHE 4261#define GETSPI$_VFLUIDBAL 4262#define GETSPI$_VRECy OPY 4263#define GETSPI$_VCPUTICKS 4264N#define GETSPI$_RESERVEDEXE1 4265 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE2 4266 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE3 4267 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE4 4268 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE5 4269 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE6 4270 /* Reserved EXE items z */N#define GETSPI$_RESERVEDEXE7 4271 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE8 4272 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE9 4273 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE10 4274 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE11 4275 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE12 4276 /* Reserved EXE items */N#define GE{ TSPI$_RESERVEDEXE13 4277 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE14 4278 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE15 4279 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE16 4280 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE17 4281 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE18 4282 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE19 4283 | /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE20 4284 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE21 4285 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE22 4286 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE23 4287 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE24 4288 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE25 4289 /* Reserved EXE items } */N#define GETSPI$_RESERVEDEXE26 4290 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE27 4291 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE28 4292 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE29 4293 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE30 4294 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE31 4295 /* Reserved EXE items */N#define ~ GETSPI$_RESERVEDEXE32 4296 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE33 4297 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE34 4298 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE35 4299 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE36 4300 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE37 4301 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE38 4302 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE39 4303 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE40 4304 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE41 4305 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE42 4306 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE43 4307 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE44 4308 /* Reserved EXE item s */N#define GETSPI$_RESERVEDEXE45 4309 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE46 4310 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE47 4311 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE48 4312 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE49 4313 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE50 4314 /* Reserved EXE items */N#defin e GETSPI$_RESERVEDEXE51 4315 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE52 4316 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE53 4317 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE54 4318 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE55 4319 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE56 4320 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE57 43 21 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE58 4322 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE59 4323 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE60 4324 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE61 4325 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE62 4326 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE63 4327 /* Reserved EXE it ems */N#define GETSPI$_RESERVEDEXE64 4328 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE65 4329 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE66 4330 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE67 4331 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE68 4332 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE69 4333 /* Reserved EXE items */N#def ine GETSPI$_RESERVEDEXE70 4334 /* Reserved EXE items */N#define GETSPI$_RESERVEDEXE71 4335 /* Reserved EXE items */N#define GETSPI$_LASTEXE 4336 /* Last item in the EXE table */N/* */N/* These next items are located in an executive writable page in memory */N/* */N#define GETSPI$_ACCESS 8432  /* number of file accesses */N#define GETSPI$_ALLOC 8433 /* number of file extends */N#define GETSPI$_FCPCREATE 8434 /* number of file creations */S#define GETSPI$_VOLWAIT 8435 /* # of times XQP waited for volume lock */N#define GETSPI$_FCPTURN 8436 /* number of window turns */N#define GETSPI$_FCPERASE 8437 /* number of erase calls */N#define GETSPI$_OPENS 8438 /* number  of file opens */N#define GETSPI$_FIDHIT 8439 /* count of File Id cache hits */N#define GETSPI$_FIDMISS 8440 /* count of File Id cache misses */N#define GETSPI$_FILHDR_HIT 8441 /* count of File header cache hits */Q#define GETSPI$_DIRFCB_HIT 8442 /* count of Directory block cache hits */S#define GETSPI$_DIRFCB_MISS 8443 /* count of Directory block cache misses */P#define GETSPI$_DIRDATA_HIT 8444 /* count of Directory data cache hits */N#define GETSPI$_EXTHIT 8445 /* count of Extent cache hits */N#define GETSPI$_EXTMISS 8446 /* count of Extent cache misses */N#define GETSPI$_QUOHIT 8447 /* count of Quota cache hits */N#define GETSPI$_QUOMISS 8448 /* count of Quota cache misses */P#define GETSPI$_STORAGMAP_HIT 8449 /* count of storage bitmap cache hits */N#define GETSPI$_VOLLCK 8450 /* Volume synch locks */N#define  GETSPI$_SYNCHLCK 8451 /* directory and file synch locks */f#define GETSPI$_SYNCHWAIT 8452 /* # of times XQP waited for a directory or file synch lock */N#define GETSPI$_ACCLCK 8453 /* access locks */b#define GETSPI$_XQPCACHEWAIT 8454 /* # of times XQP had to wait for free space in a cache */N#define GETSPI$_RESERVEDEWS1 8455 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS2 8456 /* Reserved EWS items  */N#define GETSPI$_RESERVEDEWS3 8457 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS4 8458 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS5 8459 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS6 8460 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS7 8461 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS8 8462 /* Reserved EWS items */N#define GETSPI$_ RESERVEDEWS9 8463 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS10 8464 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS11 8465 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS12 8466 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS13 8467 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS14 8468 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS15 8469 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS16 8470 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS17 8471 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS18 8472 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS19 8473 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS20 8474 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS21 8475 /* Reserved EWS items  */N#define GETSPI$_RESERVEDEWS22 8476 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS23 8477 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS24 8478 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS25 8479 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS26 8480 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS27 8481 /* Reserved EWS items */N#define GETSPI $_RESERVEDEWS28 8482 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS29 8483 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS30 8484 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS31 8485 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS32 8486 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS33 8487 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS34 8488  /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS35 8489 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS36 8490 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS37 8491 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS38 8492 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS39 8493 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS40 8494 /* Reserved EWS items  */N#define GETSPI$_RESERVEDEWS41 8495 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS42 8496 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS43 8497 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS44 8498 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS45 8499 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS46 8500 /* Reserved EWS items */N#define GETS PI$_RESERVEDEWS47 8501 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS48 8502 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS49 8503 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS50 8504 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS51 8505 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS52 8506 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS53 8507  /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS54 8508 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS55 8509 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS56 8510 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS57 8511 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS58 8512 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS59 8513 /* Reserved EWS items  */N#define GETSPI$_RESERVEDEWS60 8514 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS61 8515 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS62 8516 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS63 8517 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS64 8518 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS65 8519 /* Reserved EWS items */N#define GE TSPI$_RESERVEDEWS66 8520 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS67 8521 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS68 8522 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS69 8523 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS70 8524 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS71 8525 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS72 8526  /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS73 8527 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS74 8528 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS75 8529 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS76 8530 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS77 8531 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS78 8532 /* Reserved EWS items  */N#define GETSPI$_RESERVEDEWS79 8533 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS80 8534 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS81 8535 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS82 8536 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS83 8537 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS84 8538 /* Reserved EWS items */N#define  GETSPI$_RESERVEDEWS85 8539 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS86 8540 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS87 8541 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS88 8542 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS89 8543 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS90 8544 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS91 8545 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS92 8546 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS93 8547 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS94 8548 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS95 8549 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS96 8550 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS97 8551 /* Reserved EWS item s */N#define GETSPI$_RESERVEDEWS98 8552 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS99 8553 /* Reserved EWS items */N#define GETSPI$_RESERVEDEWS100 8554 /* Reserved EWS items */R#define GETSPI$_LASTEWS 8555 /* Last item in the exec writable table */N/* */N/* Begin monitor specific data items. The items listed below are */N/* NOT collected by the SPI as individual items. Some are NOT collected */N/* at all but are computed by MONITOR. */N/* */Z#define GETSPI$_FIDHITPCNT 12651 /* percentage of file id cache hits/hits+misses */^#define GETSPI$_FILHDR_HITPCNT 12652 /* percentage of file header cache hits/hits+misses */b#define GETSPI$_DIRFCB_HITPCNT 12653 /* percentage of directory block cache h its/hits+misses */a#define GETSPI$_DIRDATA_HITPCNT 12654 /* percentage of directory data cache hits/hits+misses */Y#define GETSPI$_EXTHITPCNT 12655 /* percentage of extent cache hits/hits+misses */X#define GETSPI$_QUOHITPCNT 12656 /* percentage of quota cache hits/hits+misses */^#define GETSPI$_STORAGMAP_HITPCNT 12657 /* percentage of storage map cache hits/hits+misses */N#define GETSPI$_OPCNT 12658 /* disk io operation count */N#define GETSPI$_IOQUELEN 126 59 /* disk io queue length */N#define GETSPI$_IOAQUELEN 12660 /* Accurate disk io queue length */N#define GETSPI$_DISKRESPTIM 12661 /* disk io response time */W#define GETSPI$_JNLIOCNT 12662 /* journaling io operation count (for disks) */N#define GETSPI$_JDNQLEN 12663 /* jdevice normal io queue length */N#define GETSPI$_JDWQLEN 12664 /* jdevice wait irp queue length */N#define GETSPI$_JDFQLEN 12665 /* j device force io queue length */N#define GETSPI$_JDEXCNT 12666 /* jdevice extend count */N#define GETSPI$_JNLWRTSS 12667 /* obsolete */N#define GETSPI$_JNLBUFWR 12668 /* obsolete */N#define GETSPI$_DGSENT 12669 /* SCS application datagrams sent */P#define GETSPI$_DGRCVD 12670 /* SCS application datagrams received */Q#define GETSPI$_DGDISCARD 12671 /* SCS application datagrams discarded */N#define GETSPI$_MSGSENT 12672 /* SCS application messages sent */O#define GETSPI$_MSGRCVD 12673 /* SCS application messages received */N#define GETSPI$_SNDATS 12674 /* SCS block send datas initiated */N#define GETSPI$_KBYTSENT 12675 /* SCS kbytes sent via send datas */O#define GETSPI$_REQDATS 12676 /* SCS block request datas initiated */S#define GETSPI$_KBYTREQD 12677 /* SCS kbytes received via request datas */R #define GETSPI$_KBYTMAPD 12678 /* SCS kbytes mapped for block transfer */Y#define GETSPI$_QCR_CNT 12679 /* SCS times connection queued for send credit */_#define GETSPI$_QBDT_CNT 12680 /* SCS times connection queued for buffer descriptor */N#define GETSPI$_DIRLOOK 12681 /* directory lookups */N#define GETSPI$_DIRINS 12682 /* directory inserts */N#define GETSPI$_DIRDEL 12683 /* directory deletes  */N#define GETSPI$_PACKETS 12684 /* Ethernet packets/second */N#define GETSPI$_KBYTES 12685 /* Kbytes/second */N#define GETSPI$_PACKETSIZE 12686 /* Packets size (bytes) */N#define GETSPI$_MPACKETS 12687 /* Multicast packets/second */N#define GETSPI$_MKBYTES 12688 /* Multicast Kbytes/second */N#define GETSPI$_MPACKETSIZE 12689 /* Multicast packet size (bytes) */P#define GETSPI$_SI NGLECOLL 12690 /* Transmit single collision detected */P#define GETSPI$_MULTICOLL 12691 /* Transmit multi collisions detected */N#define GETSPI$_INITDEFER 12692 /* Transmit initially deferred */N#define GETSPI$_INTERNALBUFERR 12693 /* Receive internal buffer error */N#define GETSPI$_LOCBUFERR 12694 /* Receive local buffer error */N#define GETSPI$_BUFFUNAVAIL 12695 /* System buffer unavailable */N#define GETSPI$_FILLER 12696  /* Dummy pad item */N#define GETSPI$_RESERVEDMON1 12697 /* Reserved MON items */N#define GETSPI$_RESERVEDMON2 12698 /* Reserved MON items */N#define GETSPI$_RESERVEDMON3 12699 /* Reserved MON items */N#define GETSPI$_RESERVEDMON4 12700 /* Reserved MON items */N#define GETSPI$_RESERVEDMON5 12701 /* Reserved MON items */N#define GETSPI$_RESERVEDMON6 12702 /* Reserved MON items  */N#define GETSPI$_RESERVEDMON7 12703 /* Reserved MON items */N#define GETSPI$_RESERVEDMON8 12704 /* Reserved MON items */N#define GETSPI$_RESERVEDMON9 12705 /* Reserved MON items */N#define GETSPI$_RESERVEDMON10 12706 /* Reserved MON items */N#define GETSPI$_RESERVEDMON11 12707 /* Reserved MON items */N#define GETSPI$_RESERVEDMON12 12708 /* Reserved MON items */N#define GETS PI$_RESERVEDMON13 12709 /* Reserved MON items */N#define GETSPI$_RESERVEDMON14 12710 /* Reserved MON items */N#define GETSPI$_RESERVEDMON15 12711 /* Reserved MON items */N#define GETSPI$_RESERVEDMON16 12712 /* Reserved MON items */N#define GETSPI$_RESERVEDMON17 12713 /* Reserved MON items */N#define GETSPI$_RESERVEDMON18 12714 /* Reserved MON items */N#define GETSPI$_RESERVEDMON19 12715  /* Reserved MON items */N#define GETSPI$_RESERVEDMON20 12716 /* Reserved MON items */N#define GETSPI$_RESERVEDMON21 12717 /* Reserved MON items */N#define GETSPI$_RESERVEDMON22 12718 /* Reserved MON items */N#define GETSPI$_RESERVEDMON23 12719 /* Reserved MON items */N#define GETSPI$_RESERVEDMON24 12720 /* Reserved MON items */N#define GETSPI$_RESERVEDMON25 12721 /* Reserved MON items  */N#define GETSPI$_RESERVEDMON26 12722 /* Reserved MON items */N#define GETSPI$_RESERVEDMON27 12723 /* Reserved MON items */N#define GETSPI$_RESERVEDMON28 12724 /* Reserved MON items */N#define GETSPI$_RESERVEDMON29 12725 /* Reserved MON items */N#define GETSPI$_RESERVEDMON30 12726 /* Reserved MON items */N#define GETSPI$_RESERVEDMON31 12727 /* Reserved MON items */N#define GE TSPI$_RESERVEDMON32 12728 /* Reserved MON items */N#define GETSPI$_RESERVEDMON33 12729 /* Reserved MON items */N#define GETSPI$_RESERVEDMON34 12730 /* Reserved MON items */N#define GETSPI$_RESERVEDMON35 12731 /* Reserved MON items */N#define GETSPI$_RESERVEDMON36 12732 /* Reserved MON items */N#define GETSPI$_RESERVEDMON37 12733 /* Reserved MON items */N#define GETSPI$_RESERVEDMON38 12734  /* Reserved MON items */N#define GETSPI$_RESERVEDMON39 12735 /* Reserved MON items */N#define GETSPI$_RESERVEDMON40 12736 /* Reserved MON items */N#define GETSPI$_RESERVEDMON41 12737 /* Reserved MON items */N#define GETSPI$_RESERVEDMON42 12738 /* Reserved MON items */N#define GETSPI$_RESERVEDMON43 12739 /* Reserved MON items */N#define GETSPI$_RESERVEDMON44 12740 /* Reserved MON items  */N#define GETSPI$_RESERVEDMON45 12741 /* Reserved MON items */N#define GETSPI$_RESERVEDMON46 12742 /* Reserved MON items */N#define GETSPI$_RESERVEDMON47 12743 /* Reserved MON items */N#define GETSPI$_RESERVEDMON48 12744 /* Reserved MON items */N#define GETSPI$_RESERVEDMON49 12745 /* Reserved MON items */N#define GETSPI$_RESERVEDMON50 12746 /* Reserved MON items */N#define  GETSPI$_RESERVEDMON51 12747 /* Reserved MON items */N#define GETSPI$_RESERVEDMON52 12748 /* Reserved MON items */N#define GETSPI$_RESERVEDMON53 12749 /* Reserved MON items */N#define GETSPI$_RESERVEDMON54 12750 /* Reserved MON items */N#define GETSPI$_RESERVEDMON55 12751 /* Reserved MON items */N#define GETSPI$_RESERVEDMON56 12752 /* Reserved MON items */N#define GETSPI$_RESERVEDMON57 1275 3 /* Reserved MON items */N#define GETSPI$_RESERVEDMON58 12754 /* Reserved MON items */N#define GETSPI$_RESERVEDMON59 12755 /* Reserved MON items */N#define GETSPI$_RESERVEDMON60 12756 /* Reserved MON items */N#define GETSPI$_RESERVEDMON61 12757 /* Reserved MON items */N#define GETSPI$_RESERVEDMON62 12758 /* Reserved MON items */N#define GETSPI$_RESERVEDMON63 12759 /* Reserved MON item s */N#define GETSPI$_RESERVEDMON64 12760 /* Reserved MON items */N#define GETSPI$_RESERVEDMON65 12761 /* Reserved MON items */N#define GETSPI$_RESERVEDMON66 12762 /* Reserved MON items */N#define GETSPI$_RESERVEDMON67 12763 /* Reserved MON items */N#define GETSPI$_RESERVEDMON68 12764 /* Reserved MON items */N#define GETSPI$_RESERVEDMON69 12765 /* Reserved MON items */N#defin e GETSPI$_RESERVEDMON70 12766 /* Reserved MON items */N#define GETSPI$_RESERVEDMON71 12767 /* Reserved MON items */N#define GETSPI$_RESERVEDMON72 12768 /* Reserved MON items */N#define GETSPI$_RESERVEDMON73 12769 /* Reserved MON items */N#define GETSPI$_RESERVEDMON74 12770 /* Reserved MON items */N#define GETSPI$_RESERVEDMON75 12771 /* Reserved MON items */N#define GETSPI$_RESERVEDMON76 12 772 /* Reserved MON items */N#define GETSPI$_RESERVEDMON77 12773 /* Reserved MON items */N#define GETSPI$_RESERVEDMON78 12774 /* Reserved MON items */N#define GETSPI$_RESERVEDMON79 12775 /* Reserved MON items */N#define GETSPI$_RESERVEDMON80 12776 /* Reserved MON items */N#define GETSPI$_RESERVEDMON81 12777 /* Reserved MON items */N#define GETSPI$_RESERVEDMON82 12778 /* Reserved MON it ems */N#define GETSPI$_RESERVEDMON83 12779 /* Reserved MON items */N#define GETSPI$_RESERVEDMON84 12780 /* Reserved MON items */N#define GETSPI$_RESERVEDMON85 12781 /* Reserved MON items */N#define GETSPI$_RESERVEDMON86 12782 /* Reserved MON items */N#define GETSPI$_RESERVEDMON87 12783 /* Reserved MON items */N#define GETSPI$_RESERVEDMON88 12784 /* Reserved MON items */N#def ine GETSPI$_RESERVEDMON89 12785 /* Reserved MON items */N#define GETSPI$_RESERVEDMON90 12786 /* Reserved MON items */N#define GETSPI$_RESERVEDMON91 12787 /* Reserved MON items */N#define GETSPI$_RESERVEDMON92 12788 /* Reserved MON items */N#define GETSPI$_RESERVEDMON93 12789 /* Reserved MON items */N#define GETSPI$_RESERVEDMON94 12790 /* Reserved MON items */N#define GETSPI$_RESERVEDMON95  12791 /* Reserved MON items */N#define GETSPI$_RESERVEDMON96 12792 /* Reserved MON items */N#define GETSPI$_RESERVEDMON97 12793 /* Reserved MON items */N#define GETSPI$_RESERVEDMON98 12794 /* Reserved MON items */N#define GETSPI$_RESERVEDMON99 12795 /* Reserved MON items */N#define GETSPI$_RESERVEDMON100 12796 /* Reserved MON items */U#define GETSPI$_LASTMON 12797 /* Last item in  the monitor specific table */N/* */O/* Begin items specific to the Monitor RMS class. These items are maintained */R/* by RMS and collected from a global section with the following naming scheme: */O/* _RMS$xxxxxxxxyyyyyy where x is the volume lock id and y is the fid of the */N/* file being monitored. */N/*  */Q#define GETSPI$_RMS_STATS 16893 /* All of the following rms statistics */N#define GETSPI$_SEQGETS 16894 /* Total # of sequential gets */N#define GETSPI$_KEYGETS 16895 /* Total # of keyed gets */N#define GETSPI$_RFAGETS 16896 /* Total # of gets by RFA */N#define GETSPI$_GETBYTES 16897 /* Total size in bytes of all GETS */N#define GETSPI$_SEQPUTS 16898 /* Total # of sequential puts */N#define  GETSPI$_KEYPUTS 16899 /* Total # of puts by key */N#define GETSPI$_PUTBYTES 16900 /* Total # of bytes put to file */N#define GETSPI$_UPDATES 16901 /* Total # of updates to the file */N#define GETSPI$_UPDATEBYTES 16902 /* Total # of bytes updated in file */N#define GETSPI$_DELETES 16903 /* Total # of deletes to file */V#define GETSPI$_TRUNCATES 16904 /* Total # of times file has been truncated */W#define GETSPI$_TRUNCBLKS  16905 /* Total # of blocks file has been truncated */N#define GETSPI$_SEQFINDS 16906 /* Total # of sequential finds */N#define GETSPI$_KEYFINDS 16907 /* Total # of keyed finds */N#define GETSPI$_RFAFINDS 16908 /* Total # of RFA finds */N#define GETSPI$_READS 16909 /* Total # of $READS */O#define GETSPI$_READBYTES 16910 /* Total # of bytes read from $READS */N#define GETSPI$_CONNECTS 16911  /* Total connect requests */N#define GETSPI$_DISCONNECTS 16912 /* Total disconnect requests */N#define GETSPI$_EXTENDS 16913 /* Total extends */[#define GETSPI$_EXTBLOCKS 16914 /* Total number of blocks file has been extended */N#define GETSPI$_FLUSHES 16915 /* Total number of calls to flush */N#define GETSPI$_REWINDS 16916 /* Total number of calls to REWIND */N#define GETSPI$_WRITES 16917 /* Total num ber of calls to $WRITE */N#define GETSPI$_WRITEBYTES 16918 /* Total bytes written using $WRITE */N#define GETSPI$_FLCKENQS 16919 /* Total number of file lock ENQ's */N#define GETSPI$_FLCKDEQS 16920 /* Total number of file lock DEQ's */S#define GETSPI$_FLCKCNVS 16921 /* Total number of file lock conversions */U#define GETSPI$_LBLCKENQS 16922 /* Total number of local buffer lock ENQ's */U#define GETSPI$_LBLCKDEQS 16923 /* Total number of local buffer lock DEQ's */[#define GETSPI$_LBLCKCNVS 16924 /* Total number of local buffer lock conversions */V#define GETSPI$_GBLCKENQS 16925 /* Total number of global buffer lock ENQ's */V#define GETSPI$_GBLCKDEQS 16926 /* Total number of global buffer lock DEQ's */\#define GETSPI$_GBLCKCNVS 16927 /* Total number of global buffer lock conversions */W#define GETSPI$_GSLCKENQS 16928 /* Total number of global section lock ENQ's */W#define GETSPI$_GSLCKDEQS 16 929 /* Total number of global section lock DEQ's */]#define GETSPI$_GSLCKCNVS 16930 /* Total number of global section lock conversions */O#define GETSPI$_RLCKENQS 16931 /* Total number of record lock ENQ's */O#define GETSPI$_RLCKDEQS 16932 /* Total number of record lock DEQ's */U#define GETSPI$_RLCKCNVS 16933 /* Total number of record lock conversions */O#define GETSPI$_APPLCKENQS 16934 /* Total number of append lock ENQ's */O#define GETSPI $_APPLCKDEQS 16935 /* Total number of append lock DEQ's */U#define GETSPI$_APPLCKCNVS 16936 /* Total number of append lock conversions */U#define GETSPI$_FLBLKASTS 16937 /* Total number of file lock blocking ASTs */]#define GETSPI$_LBLBLKASTS 16938 /* Total number of local buffer lock blocking ASTs */^#define GETSPI$_GBLBLKASTS 16939 /* Total number of global buffer lock blocking ASTs */^#define GETSPI$_APPBLKASTS 16940 /* Total number of shared appe nd lock blocking ASTs */Z#define GETSPI$_LCACHEHITS 16941 /* Total cache hits on buckets in local buffers */^#define GETSPI$_LCACHETRIES 16942 /* Total cache attempts on buckets in local buffers */[#define GETSPI$_GCACHEHITS 16943 /* Total cache hits on buckets in global buffers */_#define GETSPI$_GCACHETRIES 16944 /* Total cache attempts on buckets in global buffers */c#define GETSPI$_GBRDIRIOS 16945 /* Total direct IO's causes by global buffer cache reads */ d#define GETSPI$_GBWDIRIOS 16946 /* Total direct IO's causes by global buffer cache writes */b#define GETSPI$_LBRDIRIOS 16947 /* Total direct IO's causes by local buffer cache reads */c#define GETSPI$_LBWDIRIOS 16948 /* Total direct IO's causes by local buffer cache writes */`#define GETSPI$_BKTSPLT 16949 /* Total number of 2 bucket splits done for this file */d#define GETSPI$_MBKTSPLT 16950 /* Total number of multi-bucket splits done for this file */X #define GETSPI$_RMSOPENS 16951 /* Total number of times file has been opened */X#define GETSPI$_CLOSES 16952 /* Total number of times file has been closed */N#define GETSPI$_GSBLKASTS 16953 /* Global Section Blocking ASTS */N#define GETSPI$_FLWAITS 16954 /* File lock ENQs forced to wait */N#define GETSPI$_LBWAITS 16955 /* Local buffer ENQs forced to wait */O#define GETSPI$_GBWAITS 16956 /* Global buffer ENQs forced to wait */P#def ine GETSPI$_GSWAITS 16957 /* Global section ENQs forced to wait */N#define GETSPI$_RLWAITS 16958 /* Record lock ENQs forced to wait */N#define GETSPI$_APWAITS 16959 /* Append lock ENQs forced to wait */N#define GETSPI$_TOTWAITS 16960 /* Total ENQs forced to wait */`#define GETSPI$_OUTBUFQUO 16961 /* Number of times a process runs out of buffer quota */]#define GETSPI$_RMSDEV1 16962 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV2 16963 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV3 16964 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV4 16965 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV5 16966 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV6 16967 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSD EV7 16968 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV8 16969 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV9 16970 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV10 16971 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV11 16972 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV12 16973 /* Res erved for RMS development private monitoring */]#define GETSPI$_RMSDEV13 16974 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV14 16975 /* Reserved for RMS development private monitoring */]#define GETSPI$_RMSDEV15 16976 /* Reserved for RMS development private monitoring */[#define GETSPI$_XQPQIOS 16977 /* Number of XQP operations for this file by RMS */N#define GETSPI$_LCACHEHITPCNT 16978 /* Local RMS buffer hit percent  */N#define GETSPI$_GCACHEHITPCNT 16979 /* Global RMS buffer hit percent */N#define GETSPI$_TOTALGET 16980 /* Total $GET call rate */N#define GETSPI$_TOTALPUT 16981 /* Total $PUT call rate */N#define GETSPI$_TOTALFIND 16982 /* Total $FIND call rate */N#define GETSPI$_BYTESGET 16983 /* Bytes per $GET */N#define GETSPI$_BYTESPUT 16984 /* Bytes per $PUT */N#define GETSPI$_BYTE SUPDATE 16985 /* Bytes per $UPDATE */N#define GETSPI$_BYTESREAD 16986 /* Bytes per $READ */N#define GETSPI$_BYTESWRITE 16987 /* Bytes per $WRITE */N#define GETSPI$_BLOCKSTRUNCATE 16988 /* Bytes per $TRUNCATE */N#define GETSPI$_BLOCKSEXTEND 16989 /* Bytes per $EXTEND */N#define GETSPI$_ACTIVE_STREAMS 16990 /* Active connects to file */N#define GETSPI$_TOTAL_ENQS 16991 /* Tot al new ENQs */N#define GETSPI$_TOTAL_DEQS 16992 /* Total DEQs */N#define GETSPI$_TOTAL_CNVS 16993 /* Total ENQ conversions */N#define GETSPI$_TOTAL_BLKAST 16994 /* Total blocking ASTs */N#define GETSPI$_RMS_ORG 16995 /* RMS File org */]#define GETSPI$_INTCOL_HSHTBL 16996 /* Interlock collision on global buffer hash table */Y#define GETSPI$_INTCOL_GBH 16997 /* Interlock Col lision on global buffer header */]#define GETSPI$_INTRES_SETIMR 16998 /* Interlock Collision resolved by call to $SETIMR */a#define GETSPI$_INTNOTRES 16999 /* Interlock collision not resolved by call to $SETIMR */N#define GETSPI$_RESERVEDRMS5 17000 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS6 17001 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS7 17002 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS8 17003 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS9 17004 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS10 17005 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS11 17006 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS12 17007 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS13 17008 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS14 17009 /* Reserved RMS item s */N#define GETSPI$_RESERVEDRMS15 17010 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS16 17011 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS17 17012 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS18 17013 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS19 17014 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS20 17015 /* Reserved RMS items */N#defin e GETSPI$_RESERVEDRMS21 17016 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS22 17017 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS23 17018 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS24 17019 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS25 17020 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS26 17021 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS27 17 022 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS28 17023 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS29 17024 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS30 17025 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS31 17026 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS32 17027 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS33 17028 /* Reserved RMS it ems */N#define GETSPI$_RESERVEDRMS34 17029 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS35 17030 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS36 17031 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS37 17032 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS38 17033 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS39 17034 /* Reserved RMS items */N#def ine GETSPI$_RESERVEDRMS40 17035 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS41 17036 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS42 17037 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS43 17038 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS44 17039 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS45 17040 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS46  17041 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS47 17042 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS48 17043 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS49 17044 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS50 17045 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS51 17046 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS52 17047 /* Reserved RMS  items */N#define GETSPI$_RESERVEDRMS53 17048 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS54 17049 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS55 17050 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS56 17051 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS57 17052 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS58 17053 /* Reserved RMS items */N#d efine GETSPI$_RESERVEDRMS59 17054 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS60 17055 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS61 17056 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS62 17057 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS63 17058 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS64 17059 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS6 5 17060 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS66 17061 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS67 17062 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS68 17063 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS69 17064 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS70 17065 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS71 17066 /* Reserved RM S items */N#define GETSPI$_RESERVEDRMS72 17067 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS73 17068 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS74 17069 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS75 17070 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS76 17071 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS77 17072 /* Reserved RMS items */N #define GETSPI$_RESERVEDRMS78 17073 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS79 17074 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS80 17075 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS81 17076 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS82 17077 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS83 17078 /* Reserved RMS items */N#define GETSPI$_RESERVEDRM S84 17079 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS85 17080 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS86 17081 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS87 17082 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS88 17083 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS89 17084 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS90 17085 /* Reserved  RMS items */N#define GETSPI$_RESERVEDRMS91 17086 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS92 17087 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS93 17088 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS94 17089 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS95 17090 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS96 17091 /* Reserved RMS items */ N#define GETSPI$_RESERVEDRMS97 17092 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS98 17093 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS99 17094 /* Reserved RMS items */N#define GETSPI$_RESERVEDRMS100 17095 /* Reserved RMS items */U#define GETSPI$_LASTRMS 17096 /* Last item in the monitor specific table */N/* */O/* Add new data items specific to MONITOR (not collected by the SPI on a per */N/* item basis) above this point. */N/* */#define GETSPI$_TABLESIZE 712 #ifdef __NEW_STARLETNtypedef struct _getspi$scs_offsets { /* SCS class information */N __int64 getspi$q_scs_nodename; /* System node name */N int getspi$l_scs_dgsent; /* Application datagra ms sent */N int getspi$l_scs_dgrcvd; /* Application datagrams received */N int getspi$l_scs_dgdiscard; /* Application datagrams discarded */N int getspi$l_scs_msgsent; /* Application messages sent */N int getspi$l_scs_msgrcvd; /* Application messages received */N int getspi$l_scs_snddats; /* Block send datas initiated */N int getspi$l_scs_kbytsent; /* Kbytes sent via send datas */N int  getspi$l_scs_reqdats; /* Block request datas initiated */O int getspi$l_scs_kbytreqd; /* Kbytes received via request datas */O int getspi$l_scs_kbytmapd; /* Kbytes mapped for block transfers */U int getspi$l_scs_qcr_cnt; /* Times connection queued for send credit */[ int getspi$l_scs_qbdt_cnt; /* Times connection queued for buffer descriptor */ } GETSPI$SCS_OFFSETS;#else /* __OLD_STARLET */Nstruct getspi$scs_offsets {  /* SCS class information */N int getspi$q_scs_nodename [2]; /* System node name */N int getspi$l_scs_dgsent; /* Application datagrams sent */N int getspi$l_scs_dgrcvd; /* Application datagrams received */N int getspi$l_scs_dgdiscard; /* Application datagrams discarded */N int getspi$l_scs_msgsent; /* Application messages sent */N int getspi$l_scs_msgrcvd; /* Application messages received */N int getspi$l_scs_snddats; /* Block send datas initiated */N int getspi$l_scs_kbytsent; /* Kbytes sent via send datas */N int getspi$l_scs_reqdats; /* Block request datas initiated */O int getspi$l_scs_kbytreqd; /* Kbytes received via request datas */O int getspi$l_scs_kbytmapd; /* Kbytes mapped for block transfers */U int getspi$l_scs_qcr_cnt; /* Times connection queued for send credit */[ int getspi$l_scs_qbdt_cnt; /* Times connection queued for buffer descriptor */ } ;%#endif /* #ifdef __NEW_STARLET */X#define GETSPI$C_SCS_MINSIZE 56 /* Size of one collection block for scs class */ #ifdef __NEW_STARLETNtypedef struct _getspi$disk_offsets { /* DISK class information for */N/* the current revision level */N short int getspi$w_disk_alloclass; /* Allocation class  */N int getspi$l_disk_devname; /* Device name */N short int getspi$w_disk_unitnum; /* Unit number */W char getspi$b_disk_flags; /* Flags byte (low bit indicates served disk */N __int64 getspi$q_disk_nodename; /* Nodename */N __int64 getspi$q_disk_volnamel; /* Volume name (low) */N int getspi$l_disk_volnameh; /* Volume name (high) */N int ge tspi$l_disk_optcnt; /* Operation count */N int getspi$l_disk_qcount; /* Queue length accumulator */ } GETSPI$DISK_OFFSETS;#else /* __OLD_STARLET */Nstruct getspi$disk_offsets { /* DISK class information for */N/* the current revision level */N short int getspi$w_disk_alloclass; /* Allocation class */N int getspi$l_disk_devname; /* Device name  */N short int getspi$w_disk_unitnum; /* Unit number */W char getspi$b_disk_flags; /* Flags byte (low bit indicates served disk */N int getspi$q_disk_nodename [2]; /* Nodename */N int getspi$q_disk_volnamel [2]; /* Volume name (low) */N int getspi$l_disk_volnameh; /* Volume name (high) */N int getspi$l_disk_optcnt; /* Operation count */N int getspi$l_disk_qcount; /* Queue length accumulator */ } ;%#endif /* #ifdef __NEW_STARLET */N#define GETSPI$C_DISK_MINSIZE 37 /* Size of one block */ #ifdef __NEW_STARLETNtypedef struct _getspi$disk_offsets_rev4 { /* DISK class information */N/* for "revision level 4" */N char getspi$b_disk_alloclass_rev4; /* Allocation class */N int getspi$l_disk_ devname_rev4; /* Device name */N short int getspi$w_disk_unitnum_rev4; /* Unit number */W char getspi$b_disk_flags_rev4; /* Flags byte (low bit indicates served disk */N __int64 getspi$q_disk_nodename_rev4; /* Nodename */N __int64 getspi$q_disk_volnamel_rev4; /* Volume name (low) */N int getspi$l_disk_volnameh_rev4; /* Volume name (high) */N int getspi$l_disk_optcnt_rev4;  /* Operation count */N int getspi$l_disk_qcount_rev4; /* Queue length accumulator */ } GETSPI$DISK_OFFSETS_REV4;#else /* __OLD_STARLET */Nstruct getspi$disk_offsets_rev4 { /* DISK class information */N/* for "revision level 4" */N char getspi$b_disk_alloclass_rev4; /* Allocation class */N int getspi$l_disk_devname_rev4; /* Device name */ N short int getspi$w_disk_unitnum_rev4; /* Unit number */W char getspi$b_disk_flags_rev4; /* Flags byte (low bit indicates served disk */N int getspi$q_disk_nodename_rev4 [2]; /* Nodename */N int getspi$q_disk_volnamel_rev4 [2]; /* Volume name (low) */N int getspi$l_disk_volnameh_rev4; /* Volume name (high) */N int getspi$l_disk_optcnt_rev4; /* Operation count */N int getspi $l_disk_qcount_rev4; /* Queue length accumulator */ } ;%#endif /* #ifdef __NEW_STARLET */N#define GETSPI$C_DISK_MINSIZE_REV4 36 /* Size of one block */ #ifdef __NEW_STARLETNtypedef struct _getspi$proc_class { /* PROCESSES Class Data Block */N int getspi$l_proc_ipid; /* Internal PID */N int getspi$l_proc_uic; /* UIC (Member is low-order word) */N short int getspi$w_proc_state; /* S tate value */N char getspi$b_proc_pri; /* Priority (negative value) */N int getspi$o_proc_lname [4]; /* Process name (counted string) */N int getspi$l_proc_gpgcnt; /* Global page count */N int getspi$l_proc_ppgcnt; /* Process page count */N int getspi$l_proc_sts; /* PCB Status Vector */N/* (PCB$V_RES bit clear => swapped out)  */N int getspi$l_proc_diocnt; /* Direct I/O count */N int getspi$l_proc_pageflts; /* Page fault count */N int getspi$l_proc_cputim; /* Accumulated CPU time (in ticks) */N int getspi$l_proc_biocnt; /* Buffered I/O count */N int getspi$l_proc_epid; /* Extended PID */O int getspi$l_proc_efwm; /* Event flag wait mask (for MWAITs) */N int getspi $l_proc_rbstran; /* Real balance slot transitions */N/* Size of process data block */ } GETSPI$PROC_CLASS;#else /* __OLD_STARLET */Nstruct getspi$proc_class { /* PROCESSES Class Data Block */N int getspi$l_proc_ipid; /* Internal PID */N int getspi$l_proc_uic; /* UIC (Member is low-order word) */N short int getspi$w_proc_state; /* State value  */N char getspi$b_proc_pri; /* Priority (negative value) */N int getspi$o_proc_lname [4]; /* Process name (counted string) */N int getspi$l_proc_gpgcnt; /* Global page count */N int getspi$l_proc_ppgcnt; /* Process page count */N int getspi$l_proc_sts; /* PCB Status Vector */N/* (PCB$V_RES bit clear => swapped out) */N int  getspi$l_proc_diocnt; /* Direct I/O count */N int getspi$l_proc_pageflts; /* Page fault count */N int getspi$l_proc_cputim; /* Accumulated CPU time (in ticks) */N int getspi$l_proc_biocnt; /* Buffered I/O count */N int getspi$l_proc_epid; /* Extended PID */O int getspi$l_proc_efwm; /* Event flag wait mask (for MWAITs) */N int getspi$l_proc_rbstran;  /* Real balance slot transitions */N/* Size of process data block */ } ;%#endif /* #ifdef __NEW_STARLET */ #define GETSPI$C_PROC_MINSIZE 67 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard  #endif /* __GETSPIDEF_LOADED */ ww꛴/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $GLOCKDEF ***/#ifndef __GLOCKDEF_LOADED#define __GLOCKDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 exte rn "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 N#define GLOCK$C_NOWAIT 1 /* $acquire_lock will not auto-wait */N#define GLOCK$C_NOSPIN 2 /* $acquire_lock will not spin */Y#define GLOCK$C_NOBREAK 4 /* $acquire_lock will not break lock ownership */X#define GLOCK$C_AUTO_WAIT 8 /* kernel mode code waints an automatic wait */N#define GLOCK$C_NUM_NODES 64 /* max number of gnodes supported */O#define GLCKTBL$C_PROCESS 0 /* lock region is mapped in P2 space */O#define GLCKTBL$C_SYSTEM 1 /* lock region is mapped in S2 space */N#define GLCKTBL$C_PRIVAT E 2 /* lock region is pre-allocated */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _glock_hist {#pragma __nomember_alignment int glock_hist$l_pc;' unsigned __int64 glock_hist$q_lock; } GLOCK_HIST;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cpl usplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _glock_hist {#pragma __nomember_alignment int glock_hist$l_pc;' unsigned int glock_hist$q_lock [2]; } glock_hist;%#endif /* #ifdef __NEW_STARLET */#define GLOCK_HIST$C_ENTRIES 10#define GLOCK$M_OWNED 0x1#define GLOCK$M_BROKEN 0x2#define GLOCK$M_WAITERS 0x4#define GLOCK$M_PROCESS 0x8!#define GLOCK$M_RESERVED_4_7 0xF 0"#define GLOCK$M_OWNER_COUNT 0xFF00#define GLOCK$M_NODE 0xFF0000%#define GLOCK$M_NODE_SEQ 0xFFFF000000(#define GLOCK$M_OWNER 0xFFFFFF0000000000 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _glock {#pragma __nomember_alignmentN unsigned int glock$l_flink; /* Forward link (lock handle) */N unsigned int glock$l_spare1; /* not used */N unsigned short int glock$w_size; /* size of structure */N unsigned char glock$b_type; /* Structure type */N unsigned char glock$b_subtype; /* subtype */N unsigned char glock$b_ipl; /* IPL to raise to on acquire */N unsigned char glock$b_prev_ipl; /* IPL to lower to on release */N unsigned char glock$b_ rank; /* Rank of lock */N unsigned char glock$b_spare2; /* not used */ __union {N unsigned __int64 glock$q_lock; /* the lock */ __struct { __union {N unsigned glock$b_flags : 8; /* lock flags */ __struct {N unsigned glock$v_owned : 1; /* lock is owned */O unsigned glock$v_bro ken : 1; /* lock ownership is broken */N unsigned glock$v_waiters : 1; /* there are waiters */X unsigned glock$v_process : 1; /* lock is owned in process context */N unsigned glock$v_reserved_4_7 : 4; /* the unused bits */& } glock$r_fill_9_;" } glock$r_fill_8_;N unsigned glock$b_owner_count : 8; /* nested owner count */N unsigned glock$b_node : 8; /* node where lock is owned */N unsigned glock$w_node_seq : 16; /* node sequence number */N unsigned glock$v_owner : 24; /* owner EPID or CPU # */ } glock$r_fill_7_; } glock$r_fill_6_;N unsigned __int64 glock$q_thread_id; /* thread id of lock owner */N unsigned __int64 glock$q_waiters; /* bitmask of waiters */N unsigned int glock$l_timeout; /* wait timeout */N char glock$t_name [1 6]; /* lock name */N unsigned int glock$l_spare4; /* not used */N unsigned int glock$l_spare5; /* not used */N unsigned int glock$l_history_idx; /* next history longword to be used */N GLOCK_HIST glock$r_history [10]; /* acquire - release history */ } GLOCK; #if !defined(__VAXC)1#define glock$q_lock glock$r_fill_6_.glock$q_lockS#define glock$b_flags glock$r_fill_6_. glock$r_fill_7_.glock$r_fill_8_.glock$b_flagsc#define glock$v_owned glock$r_fill_6_.glock$r_fill_7_.glock$r_fill_8_.glock$r_fill_9_.glock$v_ownede#define glock$v_broken glock$r_fill_6_.glock$r_fill_7_.glock$r_fill_8_.glock$r_fill_9_.glock$v_brokeng#define glock$v_waiters glock$r_fill_6_.glock$r_fill_7_.glock$r_fill_8_.glock$r_fill_9_.glock$v_waitersg#define glock$v_process glock$r_fill_6_.glock$r_fill_7_.glock$r_fill_8_.glock$r_fill_9_.glock$v_processq#define glock$v_reserved_4_7 glock$r_fil l_6_.glock$r_fill_7_.glock$r_fill_8_.glock$r_fill_9_.glock$v_reserved_4_7O#define glock$b_owner_count glock$r_fill_6_.glock$r_fill_7_.glock$b_owner_countA#define glock$b_node glock$r_fill_6_.glock$r_fill_7_.glock$b_nodeI#define glock$w_node_seq glock$r_fill_6_.glock$r_fill_7_.glock$w_node_seqC#define glock$v_owner glock$r_fill_6_.glock$r_fill_7_.glock$v_owner"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _glock {#pragma __nomember_alignmentN unsigned int glock$l_flink; /* Forward link (lock handle) */N unsigned int glock$l_spare1; /* not used */N unsigned short int glock$w_size; /* size of structure */N unsigned char glock$b_type; /* Structure type */N  unsigned char glock$b_subtype; /* subtype */N unsigned char glock$b_ipl; /* IPL to raise to on acquire */N unsigned char glock$b_prev_ipl; /* IPL to lower to on release */N unsigned char glock$b_rank; /* Rank of lock */N unsigned char glock$b_spare2; /* not used */ __union {N unsigned int glock$q_lock [2]; /* the lock */ __st ruct { __union {N unsigned glock$b_flags : 8; /* lock flags */ __struct {N unsigned glock$v_owned : 1; /* lock is owned */O unsigned glock$v_broken : 1; /* lock ownership is broken */N unsigned glock$v_waiters : 1; /* there are waiters */X unsigned glock$v_process : 1; /* lock is owned in process context */N unsigned g lock$v_reserved_4_7 : 4; /* the unused bits */& } glock$r_fill_9_;" } glock$r_fill_8_;N unsigned glock$b_owner_count : 8; /* nested owner count */N unsigned glock$b_node : 8; /* node where lock is owned */N unsigned glock$w_node_seq : 16; /* node sequence number */N unsigned glock$v_owner : 24; /* owner EPID or CPU # */ } glock$r_fill_7_; } glock$r_fill_6_;N unsigned int glock$q_thread_id [2]; /* thread id of lock owner */N unsigned int glock$q_waiters [2]; /* bitmask of waiters */N unsigned int glock$l_timeout; /* wait timeout */N char glock$t_name [16]; /* lock name */N unsigned int glock$l_spare4; /* not used */N unsigned int glock$l_spare5; /* not used */N unsigned int glock$l_h istory_idx; /* next history longword to be used */N glock_hist glock$r_history [10]; /* acquire - release history */ } glock; #if !defined(__VAXC)1#define glock$q_lock glock$r_fill_6_.glock$q_lockS#define glock$b_flags glock$r_fill_6_.glock$r_fill_7_.glock$r_fill_8_.glock$b_flagsc#define glock$v_owned glock$r_fill_6_.glock$r_fill_7_.glock$r_fill_8_.glock$r_fill_9_.glock$v_ownede#define glock$v_broken glock$r_fill_6_.glock$r_fill_7_.glock$r_fill_8_.glock$r_fill_9_.glock $v_brokeng#define glock$v_waiters glock$r_fill_6_.glock$r_fill_7_.glock$r_fill_8_.glock$r_fill_9_.glock$v_waitersg#define glock$v_process glock$r_fill_6_.glock$r_fill_7_.glock$r_fill_8_.glock$r_fill_9_.glock$v_processq#define glock$v_reserved_4_7 glock$r_fill_6_.glock$r_fill_7_.glock$r_fill_8_.glock$r_fill_9_.glock$v_reserved_4_7O#define glock$b_owner_count glock$r_fill_6_.glock$r_fill_7_.glock$b_owner_countA#define glock$b_node glock$r_fill_6_.glock$r_fill_7_.glock$b_nodeI#define glock$w_ node_seq glock$r_fill_6_.glock$r_fill_7_.glock$w_node_seqC#define glock$v_owner glock$r_fill_6_.glock$r_fill_7_.glock$v_owner"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define GLOCK$C_LENGTH 64 /* Length */N#define GLOCK$K_LENGTH 64 /* Length */N#define GLOCK$C_MAX_LENGTH 192 /* max length */N#define GLOCK$K_MAX_LENGTH 192 /* max length  */#define GLOCK_LOCK$M_OWNED 0x1#define GLOCK_LOCK$M_BROKEN 0x2 #define GLOCK_LOCK$M_WAITERS 0x4 #define GLOCK_LOCK$M_PROCESS 0x8&#define GLOCK_LOCK$M_RESERVED_4_7 0xF0'#define GLOCK_LOCK$M_OWNER_COUNT 0xFF00"#define GLOCK_LOCK$M_NODE 0xFF0000*#define GLOCK_LOCK$M_NODE_SEQ 0xFFFF000000-#define GLOCK_LOCK$M_OWNER 0xFFFFFF0000000000 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __ nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _glock_lock {#pragma __nomember_alignment __union {N unsigned __int64 glock_lock$q_lock; /* the lock */ __struct { __union {N unsigned glock_lock$b_flags : 8; /* lock flags */ __struct {N unsigned glock_lock$v_owned : 1; /* lock is owned */T unsigned glock_lock$v_broken : 1; /* lock ownership is broken */N unsigned glock_lock$v_waiters : 1; /* there are waiters */] unsigned glock_lock$v_process : 1; /* lock is owned in process context */Q unsigned glock_lock$v_reserved_4_7 : 4; /* the unused bits */, } glock_lock$r_fill_13_;( } glock_lock$r_fill_12_;N unsigned glock_lock$b_owner_count : 8; /* nested owner count */N unsigned glock_l ock$b_node : 8; /* node where lock is owned */N unsigned glock_lock$w_node_seq : 16; /* node sequence number */N unsigned glock_lock$v_owner : 24; /* owner EPID or CPU # */$ } glock_lock$r_fill_11_; } glock_lock$r_fill_10_; } GLOCK_LOCK; #if !defined(__VAXC)A#define glock_lock$q_lock glock_lock$r_fill_10_.glock_lock$q_locko#define glock_lock$b_flags glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$b_flags#define glock_lock$v_owned glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$r_fill_13_.glock_lock$v_own\ed#define glock_lock$v_broken glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$r_fill_13_.glock_lock$v_br\oken#define glock_lock$v_waiters glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$r_fill_13_.glock_lock$v_w\aiters#define glock_lock$v_process glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$r_fill_13_.glock_lock$v_p\rocess#define glock_lock$v_reserved_4_7 glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$r_fill_13_.glock_loc\k$v_reserved_4_7e#define glock_lock$b_owner_count glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$b_owner_countW#define glock_lock$b_node glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$b_node_#define glock_lock$w_node_seq glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$w_node_seqY #define glock_lock$v_owner glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$v_owner"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _glock_lock {#pragma __nomember_alignment __union {N unsigned int glock_lock$q_lock [2]; /* the lock */ __struct { __union {N unsigned glock_lock$b_flags : 8; /* lock flags */ __struct {N unsigned glock_lock$v_owned : 1; /* lock is owned */T unsigned glock_lock$v_broken : 1; /* lock ownership is broken */N unsigned glock_lock$v_waiters : 1; /* there are waiters */] unsigned glock_lock$v_process : 1; /* lock is owned in process context */Q  unsigned glock_lock$v_reserved_4_7 : 4; /* the unused bits */, } glock_lock$r_fill_13_;( } glock_lock$r_fill_12_;N unsigned glock_lock$b_owner_count : 8; /* nested owner count */N unsigned glock_lock$b_node : 8; /* node where lock is owned */N unsigned glock_lock$w_node_seq : 16; /* node sequence number */N unsigned glock_lock$v_owner : 24; /* owner EPID or CPU # */$ } gloc k_lock$r_fill_11_; } glock_lock$r_fill_10_; } glock_lock; #if !defined(__VAXC)A#define glock_lock$q_lock glock_lock$r_fill_10_.glock_lock$q_locko#define glock_lock$b_flags glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$b_flags#define glock_lock$v_owned glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$r_fill_13_.glock_lock$v_own\ed#define glock_lock$v_broken glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_f ill_12_.glock_lock$r_fill_13_.glock_lock$v_br\oken#define glock_lock$v_waiters glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$r_fill_13_.glock_lock$v_w\aiters#define glock_lock$v_process glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$r_fill_13_.glock_lock$v_p\rocess#define glock_lock$v_reserved_4_7 glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$r_fill_12_.glock_lock$r_fill_13_.glock_loc\k$v_reserved_4_7e#define glock_lo ck$b_owner_count glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$b_owner_countW#define glock_lock$b_node glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$b_node_#define glock_lock$w_node_seq glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$w_node_seqY#define glock_lock$v_owner glock_lock$r_fill_10_.glock_lock$r_fill_11_.glock_lock$v_owner"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define GLCKTBL$M_VALID 0x1#define GLCKTBL$M_PRIVATE 0x 2#define GLCKTBL$M_SPACE 0x4##define GLCKTBL$M_RESERVED_3_7 0xF8 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _glcktbl {#pragma __nomember_alignmentN unsigned int glcktbl$l_flink; /* Forward link (region offset) */N unsigned short int glcktbl$w_lock_size; /* size of locks for the table */  __union {N unsigned char glcktbl$b_flags; /* lock table flags */ __struct {N unsigned glcktbl$v_valid : 1; /* lock table is valid */N unsigned glcktbl$v_private : 1; /* user allocated lock memory */R unsigned glcktbl$v_space : 1; /* clear for process, set for system */N unsigned glcktbl$v_reserved_3_7 : 5; /* the unused bits */! } glcktbl$r_fill_15_; } glcktbl$r_fill_14_ ;N unsigned char glcktbl$b_accmode; /* access mode of global section */N unsigned __int64 glcktbl$q_reg_id; /* ID of shared memory region */Y unsigned __int64 glcktbl$q_reg_phys_size; /* physical size of shared memory region */X unsigned __int64 glcktbl$q_reg_virt_size; /* virtual size of shared memory region */N unsigned __int64 glcktbl$q_num_locks; /* number of locks in the region */N unsigned int glcktbl$l_free_list; /* free glock list */N  unsigned int glcktbl$l_used_list; /* used glock list */N unsigned __int64 glcktbl$q_nodes; /* bitmask of connected nodes */N unsigned __int64 glcktbl$q_glock_handle; /* handle of embedded glock */N char glcktbl$b_glock [64]; /* embedded GLOCK */N unsigned short int glcktbl$w_ref_counts [64]; /* per-node ref counters */ } GLCKTBL; #if !defined(__VAXC):#define glcktbl$b_flags glcktbl$r_fill_14_.glcktbl$b_flagsM#define glcktbl$v_valid glcktbl$r_fill_14_.glcktbl$r_fill_15_.glcktbl$v_validQ#define glcktbl$v_private glcktbl$r_fill_14_.glcktbl$r_fill_15_.glcktbl$v_privateM#define glcktbl$v_space glcktbl$r_fill_14_.glcktbl$r_fill_15_.glcktbl$v_space[#define glcktbl$v_reserved_3_7 glcktbl$r_fill_14_.glcktbl$r_fill_15_.glcktbl$v_reserved_3_7"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ '#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _glcktbl {#pragma __nomember_alignmentN unsigned int glcktbl$l_flink; /* Forward link (region offset) */N unsigned short int glcktbl$w_lock_size; /* size of locks for the table */ __union {N unsigned char glcktbl$b_flags; /* lock table flags */ __struct {N unsigned glcktbl$v_valid : 1; /* lock table is valid */N unsigned glcktbl$v_private : 1; /* user allocated lock memory */R unsigned glcktbl$v_space : 1; /* clear for process, set for system */N unsigned glcktbl$v_reserved_3_7 : 5; /* the unused bits */! } glcktbl$r_fill_15_; } glcktbl$r_fill_14_;N unsigned char glcktbl$b_accmode; /* access mode of global section */N unsigned int glcktbl$q_reg_id [2]; /* ID of shared memory region */Y unsigned int glcktbl$q_reg_phys_size [2]; /* physical size of shared memory region */X unsigned int glcktbl$q_reg_virt_size [2]; /* virtual size of shared memory region */N unsigned int glcktbl$q_num_locks [2]; /* number of locks in the region */N unsigned int glcktbl$l_free_list; /* free glock list */N unsigned int glcktbl$l_used_list; /* used glock list */N unsigned int glcktbl$q_nodes [2]; /* bitmask of connected nodes */N unsigned int glcktbl$q_glock_handl e [2]; /* handle of embedded glock */N char glcktbl$b_glock [64]; /* embedded GLOCK */N unsigned short int glcktbl$w_ref_counts [64]; /* per-node ref counters */ } glcktbl; #if !defined(__VAXC):#define glcktbl$b_flags glcktbl$r_fill_14_.glcktbl$b_flagsM#define glcktbl$v_valid glcktbl$r_fill_14_.glcktbl$r_fill_15_.glcktbl$v_validQ#define glcktbl$v_private glcktbl$r_fill_14_.glcktbl$r_fill_15_.glcktbl$v_privateM#define glcktbl$v_space glcktbl$r_fill _14_.glcktbl$r_fill_15_.glcktbl$v_space[#define glcktbl$v_reserved_3_7 glcktbl$r_fill_14_.glcktbl$r_fill_15_.glcktbl$v_reserved_3_7"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define GLCKTBL$C_LENGTH 256 /* Length */N#define GLCKTBL$K_LENGTH 256 /* Length */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#p ragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _glock_nodeb {#pragma __nomember_alignmentN unsigned __int64 glock_nodeb$q_lock_handle; /* lockhandle for ipint */N char glock_nodeb$b_spares [24]; /* pad to 32 bytes */ } GLOCK_NODEB;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#e lse#pragma __nomember_alignment#endiftypedef struct _glock_nodeb {#pragma __nomember_alignmentN unsigned int glock_nodeb$q_lock_handle [2]; /* lockhandle for ipint */N char glock_nodeb$b_spares [24]; /* pad to 32 bytes */ } glock_nodeb;%#endif /* #ifdef __NEW_STARLET */N#define GLOCK_NODEB$C_LENGTH 32 /* length */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If usin g pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _gmdb_glock {#pragma __nomember_alignmentN unsigned __int64 gmdb_glock$q_nodes; /* connected nodes */N unsigned __int64 gmdb_glock$q_max_nodes; /* max nodes supported */N unsigned __int64 gmdb_glock$q_flags; /* flags */N unsigned __int64 gmdb_glock$q_handle; /* lock handle */W char gmdb_glock$b_lock [64]; /* GLOCK for the locking portion of the GMDB */T char gmdb_glock$b_lcktbl [256]; /* embedded GLCKTBL for locks in the GMDB */[ unsigned __int64 gmdb_glock$q_num_tables [2]; /* number of locktables in the regions */N unsigned int gmdb_glock$l_free_list [2]; /* lists of free lock tables */N unsigned int gmdb_glock$l_used_list [2]; /* lists of used lock tables */] unsigned __int64 gmdb_glock$q_reg_handle [2]; /* lock handles for locktable list l ocks */O char gmdb_glock$b_prc_lock [64]; /* GLOCK for process locktable lists */N char gmdb_glock$b_sys_lock [64]; /* GLOCK for system locktable lists */N GLOCK_NODEB gmdb_glock$r_nodeb [64]; /* per node cells */ } GMDB_GLOCK;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _gmdb_glock {#pragma __nomember_alignmentN unsigned int gmdb_glock$q_nodes [2]; /* connected nodes */N unsigned int gmdb_glock$q_max_nodes [2]; /* max nodes supported */N unsigned int gmdb_glock$q_flags [2]; /* flags */N unsigned int gmdb_glock$q_handle [2]; /* lock handle */W char gmdb_glock$b_lock [64]; /* GLOCK for the locking portion of the GMDB */T char gmdb_glock$b_lcktbl [256]; /* embedded GLCKTBL for locks in the GMDB */[ unsigned int gmdb_glock$q_num_tables [2] [2]; /* number of locktables in the regions */N unsigned int gmdb_glock$l_free_list [2]; /* lists of free lock tables */N unsigned int gmdb_glock$l_used_list [2]; /* lists of used lock tables */] unsigned int gmdb_glock$q_reg_handle [2] [2]; /* lock handles for locktable list locks */O char gmdb_glock$b_prc_lock [64]; /* GLOCK for process locktable lists */N char gmdb_glock$b_sys_lock [64];  /* GLOCK for system locktable lists */N glock_nodeb gmdb_glock$r_nodeb [64]; /* per node cells */ } gmdb_glock;%#endif /* #ifdef __NEW_STARLET */N#define GMDB_GLOCK$C_LENGTH 2576 /* Length */ #ifdef __INITIAL_POINTER_SIZEJ#pragma __required_pointer_size __save /* Save current pointer size */E#pragma __required_pointer_size __long /* Pointers are 64-bit */Mtypedef struct _glock * GLOCK_PQ; /* Long pointer to a GL OCK structure. */Ztypedef struct _gmdb_glock * GMDB_GLOCK_PQ; /* Long pointer to the GMDB GLOCK segment. */Rtypedef struct _glcktbl * GLCKTBL_PQ; /* Long pointer to a GLock lock table. */Q#pragma __required_pointer_size __restore /* Return to previous pointer size */#else"typedef unsigned __int64 GLOCK_PQ;##endif /* __INITIAL_POINTER_SIZE */  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __GLOCKDEF_LOADED */ wwz꛴/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//***************** ***************************************************************************************************************//*** MODULE $GPSDEF ***/#ifndef __GPSDEF_LOADED#define __GPSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __un ion variant_union#endif#endif N/* */N/* GSD entry - P-section definition */N/* */#define GPS$M_PIC 0x1#define GPS$M_LIB 0x2#define GPS$M_OVR 0x4#define GPS$M_REL 0x8#define GPS$M_GBL 0x10#define GPS$M_SHR 0x20#define GPS$M_EXE 0x40#define GPS$M_RD 0x80#define GPS$M_WRT 0x100#define !GPS$M_VEC 0x200#define GPS$M_NOMOD 0x400#define GPS$M_COM 0x800#define GPS$K_NAME 9#define GPS$C_NAME 9 #ifdef __NEW_STARLETtypedef struct _gpsdef { __union {N unsigned char gps$b_gsdtyp; /*Typ field */ __struct {! char gpsdef$$_fill_1;" } gps$r_gsdtyp_fields; } gps$r_gsdtyp_overlay;N unsigned char gps$b_align; /*P-sect alignment */ __union {N unsigned s"hort int gps$w_flags; /*P-sect flags */ __struct {N unsigned gps$v_pic : 1; /*Position independent */N unsigned gps$v_lib : 1; /*From a shareable image */N unsigned gps$v_ovr : 1; /*Overlaid memory allocation */N unsigned gps$v_rel : 1; /*Relocatable */N unsigned gps$v_gbl : 1; /*Global scope */N unsigned g#ps$v_shr : 1; /*Shareable */N unsigned gps$v_exe : 1; /*Executable */N unsigned gps$v_rd : 1; /*Readable */N unsigned gps$v_wrt : 1; /*Writeable */N unsigned gps$v_vec : 1; /*Vector psect */N unsigned gps$v_nomod : 1; /*Not stored into */N unsigned gps$v_com : 1; /*Associ $ated with COMM sym */( unsigned gps$v_fill_15_ : 4; } gps$r_flags_bits; } gps$r_flags_overlay;N unsigned int gps$l_alloc; /*Length of this contribution */N unsigned char gps$b_namlng; /*Length of p-sect name */N char gps$t_name [31]; /*Name field */ } GPSDEF; #if !defined(__VAXC)6#define gps$b_gsdtyp gps$r_gsdtyp_overlay.gps$b_gsdtyp3#define gps$w_flags gps$r_fl %ags_overlay.gps$w_flags@#define gps$v_pic gps$r_flags_overlay.gps$r_flags_bits.gps$v_pic@#define gps$v_lib gps$r_flags_overlay.gps$r_flags_bits.gps$v_lib@#define gps$v_ovr gps$r_flags_overlay.gps$r_flags_bits.gps$v_ovr@#define gps$v_rel gps$r_flags_overlay.gps$r_flags_bits.gps$v_rel@#define gps$v_gbl gps$r_flags_overlay.gps$r_flags_bits.gps$v_gbl@#define gps$v_shr gps$r_flags_overlay.gps$r_flags_bits.gps$v_shr@#define gps$v_exe gps$r_flags_overlay.gps$r_flags_bits.gps$v_exe>#define gps$v_rd g &ps$r_flags_overlay.gps$r_flags_bits.gps$v_rd@#define gps$v_wrt gps$r_flags_overlay.gps$r_flags_bits.gps$v_wrt@#define gps$v_vec gps$r_flags_overlay.gps$r_flags_bits.gps$v_vecD#define gps$v_nomod gps$r_flags_overlay.gps$r_flags_bits.gps$v_nomod@#define gps$v_com gps$r_flags_overlay.gps$r_flags_bits.gps$v_com"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct gpsdef { __union {N unsigned char gps$b_gsdtyp; /*Typ field */ ' __struct {! char gpsdef$$_fill_1;" } gps$r_gsdtyp_fields; } gps$r_gsdtyp_overlay;N unsigned char gps$b_align; /*P-sect alignment */ __union {N unsigned short int gps$w_flags; /*P-sect flags */ __struct {N unsigned gps$v_pic : 1; /*Position independent */N unsigned gps$v_lib : 1; /*From a shareable image */N unsigned gps$v(_ovr : 1; /*Overlaid memory allocation */N unsigned gps$v_rel : 1; /*Relocatable */N unsigned gps$v_gbl : 1; /*Global scope */N unsigned gps$v_shr : 1; /*Shareable */N unsigned gps$v_exe : 1; /*Executable */N unsigned gps$v_rd : 1; /*Readable */N unsigned gps$v_wrt : 1; /*Writeable ) */N unsigned gps$v_vec : 1; /*Vector psect */N unsigned gps$v_nomod : 1; /*Not stored into */N unsigned gps$v_com : 1; /*Associated with COMM sym */( unsigned gps$v_fill_15_ : 4; } gps$r_flags_bits; } gps$r_flags_overlay;N unsigned int gps$l_alloc; /*Length of this contribution */N unsigned char gps$b_namlng; /*Length o *f p-sect name */N char gps$t_name [31]; /*Name field */ } ; #if !defined(__VAXC)6#define gps$b_gsdtyp gps$r_gsdtyp_overlay.gps$b_gsdtyp3#define gps$w_flags gps$r_flags_overlay.gps$w_flags@#define gps$v_pic gps$r_flags_overlay.gps$r_flags_bits.gps$v_pic@#define gps$v_lib gps$r_flags_overlay.gps$r_flags_bits.gps$v_lib@#define gps$v_ovr gps$r_flags_overlay.gps$r_flags_bits.gps$v_ovr@#define gps$v_rel gps$r_flags_overlay.gps$r_flags_bi +ts.gps$v_rel@#define gps$v_gbl gps$r_flags_overlay.gps$r_flags_bits.gps$v_gbl@#define gps$v_shr gps$r_flags_overlay.gps$r_flags_bits.gps$v_shr@#define gps$v_exe gps$r_flags_overlay.gps$r_flags_bits.gps$v_exe>#define gps$v_rd gps$r_flags_overlay.gps$r_flags_bits.gps$v_rd@#define gps$v_wrt gps$r_flags_overlay.gps$r_flags_bits.gps$v_wrt@#define gps$v_vec gps$r_flags_overlay.gps$r_flags_bits.gps$v_vecD#define gps$v_nomod gps$r_flags_overlay.gps$r_flags_bits.gps$v_nomod@#define gps$v_com gps$r_flag,s_overlay.gps$r_flags_bits.gps$v_com"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __GPSDEF_LOADED */ ww꛴/*********************************** -*********************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $GSDEF ***/#ifndef __GSDEF_LOADED#define __GSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standar.d features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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#defin/e __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 N/* */N/* Global symbol definition record (GSD) */N/* 0 */N#define GSD$K_ENTRIES 1 /*Offset to first entry in record */N#define GSD$C_ENTRIES 1 /*Offset to first entry in record */N#define GSD$C_PSC 0 /*Psect definition */N#define GSD$C_SYM 1 /*Symbol specification */N#define GSD$C_EPM 2 /*Entry point and mask definition */N#define GSD$C_PRO 3 /*Procedure with formal arguments */R#d1efine GSD$C_SYMW 4 /*Symbol specification with word psect */N#define GSD$C_EPMW 5 /*Entry point mask with word psect */N#define GSD$C_PROW 6 /*Procedure with word psect */N#define GSD$C_IDC 7 /*Random entity check */N#define GSD$C_ENV 8 /*Define environment */N#define GSD$C_LSY 9 /*Local symbol */Q#define GSD$C_LEPM 10 2 /*Local symbol entry point definition */O#define GSD$C_LPRO 11 /*Local symbol procedure definition */N#define GSD$C_SPSC 12 /*Shareable image psect definition */N/* */&#define GSD$C_VECTOR_TYPE_INCREMENT 12T#define GSD$C_SYMV 13 /*Vectored (dual-valued) versions of SYM, */I#define GSD$C_EPMV 14 /* EPM, */I#d3efine GSD$C_PROV 15 /* PRO */N/* */$#define GSD$C_MASK_TYPE_INCREMENT 15N#define GSD$C_SYMM 16 /*Masked versions of SYM, */N#define GSD$C_EPMM 17 /* EPM, */N#define GSD$C_PROM 18 /* PRO */N#define GSD$C_MAXRECTYP 18 /*Maximum entry type defined 4 */ #ifdef __NEW_STARLETtypedef struct _gsdef {N unsigned char gsd$b_rectyp; /*Record type (OBJ$C_GSD) */Q unsigned char gsd$b_gsdtyp; /*Type of entry (first byte of entry) */N/* Vectored symbol types are (regular + 12). For example, SYMV = SYM + 12. */N/* */N/* Mask symbol types are (regular + 15). For example, SYMM = SYM + 15. */N/* 5 */ } GSDEF;#else /* __OLD_STARLET */struct gsdef {N unsigned char gsd$b_rectyp; /*Record type (OBJ$C_GSD) */Q unsigned char gsd$b_gsdtyp; /*Type of entry (first byte of entry) */N/* Vectored symbol types are (regular + 12). For example, SYMV = SYM + 12. */N/* */N/* Mask symbol types are (regular + 15). For example, SYMM = SYM + 15. */N/* 6 */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __GSDEF_LOADED */ ww >뛴/*************************** 7*****************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $GSYDEF ***/#ifndef __GSYDEF_LOADED#define __GSYDEF_LOADED 1 G#pragma __nostandard /* This file uses non-8ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_pa9rams#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 N/* */N/* GSD entry - Symbol definition */N/* : */N/* common to definitions, references, and entry */N/* point definitions. */N/* */#define GSY$M_WEAK 0x1#define GSY$M_DEF 0x2#define GSY$M_UNI 0x4#define GSY$M_REL 0x8#define GSY$M_COMM 0x10 #ifdef __NEW_STARLETtypedef struct _gsydef { __union {N unsigned char gsy$b_gsdtyp; ;/*Type field */ __struct {! char gsydef$$_fill_1;" } gsy$r_gsdtyp_fields; } gsy$r_gsdtyp_overlay;N unsigned char gsy$b_datyp; /*Symbol data type */ __union {N unsigned short int gsy$w_flags; /*Symbol flags */ __struct {N unsigned gsy$v_weak : 1; /*Weak symbol */N unsigned gsy$v_def : 1; /*Definition < */N unsigned gsy$v_uni : 1; /*Universal */N unsigned gsy$v_rel : 1; /*Relocatable */N unsigned gsy$v_comm : 1; /*C common globaldef */( unsigned gsy$v_fill_17_ : 3; } gsy$r_flags_bits; } gsy$r_flags_overlay; } GSYDEF; #if !defined(__VAXC)6#define gsy$b_gsdtyp gsy$r_gsdtyp_overlay.gsy$b_gsdtyp3#define gsy$w_flags gsy$r_flags_overlay. =gsy$w_flagsB#define gsy$v_weak gsy$r_flags_overlay.gsy$r_flags_bits.gsy$v_weak@#define gsy$v_def gsy$r_flags_overlay.gsy$r_flags_bits.gsy$v_def@#define gsy$v_uni gsy$r_flags_overlay.gsy$r_flags_bits.gsy$v_uni@#define gsy$v_rel gsy$r_flags_overlay.gsy$r_flags_bits.gsy$v_relB#define gsy$v_comm gsy$r_flags_overlay.gsy$r_flags_bits.gsy$v_comm"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct gsydef { __union {N unsigned char gsy$b_gsdtyp; /*Type field > */ __struct {! char gsydef$$_fill_1;" } gsy$r_gsdtyp_fields; } gsy$r_gsdtyp_overlay;N unsigned char gsy$b_datyp; /*Symbol data type */ __union {N unsigned short int gsy$w_flags; /*Symbol flags */ __struct {N unsigned gsy$v_weak : 1; /*Weak symbol */N unsigned gsy$v_def : 1; /*Definition ? */N unsigned gsy$v_uni : 1; /*Universal */N unsigned gsy$v_rel : 1; /*Relocatable */N unsigned gsy$v_comm : 1; /*C common globaldef */( unsigned gsy$v_fill_17_ : 3; } gsy$r_flags_bits; } gsy$r_flags_overlay; } ; #if !defined(__VAXC)6#define gsy$b_gsdtyp gsy$r_gsdtyp_overlay.gsy$b_gsdtyp3#define gsy$w_flags gsy$r_flags_overlay.gsy$w_flagsB#def @ine gsy$v_weak gsy$r_flags_overlay.gsy$r_flags_bits.gsy$v_weak@#define gsy$v_def gsy$r_flags_overlay.gsy$r_flags_bits.gsy$v_def@#define gsy$v_uni gsy$r_flags_overlay.gsy$r_flags_bits.gsy$v_uni@#define gsy$v_rel gsy$r_flags_overlay.gsy$r_flags_bits.gsy$v_relB#define gsy$v_comm gsy$r_flags_overlay.gsy$r_flags_bits.gsy$v_comm"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever pAtr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __GSYDEF_LOADED */ ww[웴/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H B.SRC]LBRUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $HLPDEF ***/#ifndef __HLPDEF_LOADED#define __HLPDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* CSave 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)#defDine __union union#else#define __union variant_union#endif#endif N/* */N/* Data structures for help processing */N/* */#define HLP$M_PROMPT 0x1#define HLP$M_PROCESS 0x2#define HLP$M_GROUP 0x4#define HLP$M_SYSTEM 0x8#define HLP$M_LIBLIST 0x10#define HLP$M_HELP 0x20#define HLP$M_SPARE1 0x40E#define HLP$M_PAGE_SAVE 0x80#define HLP$M_PAGE 0x100#define HLP$M_OUTPUT 0x200#define HLP$M_LIBRARY 0x400#define HLP$M_ALL 0x800#define HLP$M_PAGEDEF 0x1000#define HLP$M_PMPTDEF 0x2000#define HLP$M_NOTTERM 0x4000 #ifdef __NEW_STARLETtypedef union _hlpdef { __struct {N unsigned hlp$v_prompt : 1; /* Prompting enabled */Z unsigned hlp$v_process : 1; /* Process logical name table searches enabled */X unsigned hlp$v_group : 1F; /* Group logical name table searches enabled */Y unsigned hlp$v_system : 1; /* System logical name table searched enabled */O unsigned hlp$v_liblist : 1; /* Output list of default libraries */Y unsigned hlp$v_help : 1; /* Display help on help before list of topics */" unsigned hlp$v_spare1 : 1;N unsigned hlp$v_page_save : 1; /* Page=Save enabled */N unsigned hlp$v_page : 1; /* Page breaks enabled G */N unsigned hlp$v_output : 1; /* Output listing file enabled */N unsigned hlp$v_library : 1; /* Main library specified by user */W unsigned hlp$v_all : 1; /* Some logical name table searches enabled */N unsigned hlp$v_pagedef : 1; /* Page flag defaulting disabled */N unsigned hlp$v_pmptdef : 1; /* Prompt flag defaulting disabled */N unsigned hlp$v_notterm : 1; /* Input device is not a terminal */# H unsigned hlp$v_fill_2_ : 1; } hlp$r_hlpdef_bits; } HLPDEF; #if !defined(__VAXC)3#define hlp$v_prompt hlp$r_hlpdef_bits.hlp$v_prompt5#define hlp$v_process hlp$r_hlpdef_bits.hlp$v_process1#define hlp$v_group hlp$r_hlpdef_bits.hlp$v_group3#define hlp$v_system hlp$r_hlpdef_bits.hlp$v_system5#define hlp$v_liblist hlp$r_hlpdef_bits.hlp$v_liblist/#define hlp$v_help hlp$r_hlpdef_bits.hlp$v_help3#define hlp$v_spare1 hlp$r_hlpdef_bits.hlp$v_spare19#define hlp$v_page_sav Ie hlp$r_hlpdef_bits.hlp$v_page_save/#define hlp$v_page hlp$r_hlpdef_bits.hlp$v_page3#define hlp$v_output hlp$r_hlpdef_bits.hlp$v_output5#define hlp$v_library hlp$r_hlpdef_bits.hlp$v_library-#define hlp$v_all hlp$r_hlpdef_bits.hlp$v_all5#define hlp$v_pagedef hlp$r_hlpdef_bits.hlp$v_pagedef5#define hlp$v_pmptdef hlp$r_hlpdef_bits.hlp$v_pmptdef5#define hlp$v_notterm hlp$r_hlpdef_bits.hlp$v_notterm"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union hlpdef { J__struct {N unsigned hlp$v_prompt : 1; /* Prompting enabled */Z unsigned hlp$v_process : 1; /* Process logical name table searches enabled */X unsigned hlp$v_group : 1; /* Group logical name table searches enabled */Y unsigned hlp$v_system : 1; /* System logical name table searched enabled */O unsigned hlp$v_liblist : 1; /* Output list of default libraries */Y unsigned hlp$v_help : 1; /* Display help Kon help before list of topics */" unsigned hlp$v_spare1 : 1;N unsigned hlp$v_page_save : 1; /* Page=Save enabled */N unsigned hlp$v_page : 1; /* Page breaks enabled */N unsigned hlp$v_output : 1; /* Output listing file enabled */N unsigned hlp$v_library : 1; /* Main library specified by user */W unsigned hlp$v_all : 1; /* Some logical name table searches enabled */N unsigned hlp$v_p Lagedef : 1; /* Page flag defaulting disabled */N unsigned hlp$v_pmptdef : 1; /* Prompt flag defaulting disabled */N unsigned hlp$v_notterm : 1; /* Input device is not a terminal */# unsigned hlp$v_fill_2_ : 1; } hlp$r_hlpdef_bits; } ; #if !defined(__VAXC)3#define hlp$v_prompt hlp$r_hlpdef_bits.hlp$v_prompt5#define hlp$v_process hlp$r_hlpdef_bits.hlp$v_process1#define hlp$v_group hlp$r_hlpdef_bits.hlp$v_group3#define hlp$v_system hlp M$r_hlpdef_bits.hlp$v_system5#define hlp$v_liblist hlp$r_hlpdef_bits.hlp$v_liblist/#define hlp$v_help hlp$r_hlpdef_bits.hlp$v_help3#define hlp$v_spare1 hlp$r_hlpdef_bits.hlp$v_spare19#define hlp$v_page_save hlp$r_hlpdef_bits.hlp$v_page_save/#define hlp$v_page hlp$r_hlpdef_bits.hlp$v_page3#define hlp$v_output hlp$r_hlpdef_bits.hlp$v_output5#define hlp$v_library hlp$r_hlpdef_bits.hlp$v_library-#define hlp$v_all hlp$r_hlpdef_bits.hlp$v_all5#define hlp$v_pagedef hlp$r_hlpdef_bits.hlp$v_paNgedef5#define hlp$v_pmptdef hlp$r_hlpdef_bits.hlp$v_pmptdef5#define hlp$v_notterm hlp$r_hlpdef_bits.hlp$v_notterm"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define HLP$M_NOHLPTXT 0x1#define HLP$M_KEYNAMLIN 0x2#define HLP$M_OTHERINFO 0x4 #ifdef __NEW_STARLETtypedef struct _hlpdef1 {T unsigned int hlp$l_desc; /* Address of string descriptor for line */ __union {N unsigned int hlp$l_flags; /* Flags O */ __struct {Y unsigned hlp$v_nohlptxt : 1; /* Line is part of text due to no help found */U unsigned hlp$v_keynamlin : 1; /* Line contains keynames to be printed */W unsigned hlp$v_otherinfo : 1; /* Line is part of "other info available" */' unsigned hlp$v_fill_3_ : 5; } hlp$r_flags_bits; } hlp$r_flags_overlay;V unsigned int hlp$l_data; /* Address of user data passed to GET_HELP */NP unsigned int hlp$l_level; /* Level of this help */ } HLPDEF1; #if !defined(__VAXC)3#define hlp$l_flags hlp$r_flags_overlay.hlp$l_flags=#define hlp$r_flags_bits hlp$r_flags_overlay.hlp$r_flags_bits6#define hlp$v_nohlptxt hlp$r_flags_bits.hlp$v_nohlptxt8#define hlp$v_keynamlin hlp$r_flags_bits.hlp$v_keynamlin8#define hlp$v_otherinfo hlp$r_flags_bits.hlp$v_otherinfo"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct hlpdef1 {T Qunsigned int hlp$l_desc; /* Address of string descriptor for line */ __union {N unsigned int hlp$l_flags; /* Flags */ __struct {Y unsigned hlp$v_nohlptxt : 1; /* Line is part of text due to no help found */U unsigned hlp$v_keynamlin : 1; /* Line contains keynames to be printed */W unsigned hlp$v_otherinfo : 1; /* Line is part of "other info available" */' unsigned hlp$v_fill_3_ : R 5; } hlp$r_flags_bits; } hlp$r_flags_overlay;V unsigned int hlp$l_data; /* Address of user data passed to GET_HELP */N unsigned int hlp$l_level; /* Level of this help */ } ; #if !defined(__VAXC)3#define hlp$l_flags hlp$r_flags_overlay.hlp$l_flagsJ#define hlp$v_nohlptxt hlp$r_flags_overlay.hlp$r_flags_bits.hlp$v_nohlptxtL#define hlp$v_keynamlin hlp$r_flags_overlay.hlp$r_flags_bits.hlp$v_keynamlinL#define hlp$v_otherinfSo hlp$r_flags_overlay.hlp$r_flags_bits.hlp$v_otherinfo"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __HLPDEF_LOADED */ ww{O웴/***************** T***************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $HWDEF ***/#ifndef __HWDEF_LOADED#define __HWDEF_LOADED 1 G#pragma __nostandard /* This fileU uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __Vunknown_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 N#define HW$_VAX 1 /* VAX architecture */N#define HW$_ALPHA 2 /* Alpha architecture */ $#pragma __member_alignment __rWestoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __HWDEF_LOADED */ ww웴/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 X */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $IA64REGDEF ***/#ifndef __IA64REGDEF_LOADED#define __IA64REGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenevYer 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 varZiant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* Special Registers */N#define IA64_REG$_IP 1016 /* getReg only */#define IA64_REG$_PSR_UM 1017#define IA64_REG$_PSR 1019#define IA64_REG$_PSR_L 1019N/* General Integer Registers */N#define IA64_REG$_ [GP 1025 /* R1 */N#define IA64_REG$_SP 1036 /* R12 */N#define IA64_REG$_TP 1037 /* R13 */ N/* Constants for 'hint' instruction */#define IA64_REG$HINT_PAUSE 0#define IA64_REG$HINT_WAIT 64N/* Application Registers */#define IA64_REG$_AR_KR0 3072#define IA64_REG$_AR_KR1\ 3073#define IA64_REG$_AR_KR2 3074#define IA64_REG$_AR_KR3 3075#define IA64_REG$_AR_KR4 3076#define IA64_REG$_AR_KR5 3077#define IA64_REG$_AR_KR6 3078#define IA64_REG$_AR_KR7 3079#define IA64_REG$_AR_RSC 3088#define IA64_REG$_AR_BSP 3089"#define IA64_REG$_AR_BSPSTORE 3090#define IA64_REG$_AR_RNAT 3091#define IA64_REG$_AR_FCR 3093#define IA64_REG$_AR_EFLAG 3096#define IA64_REG$_AR_CSD 3097#define IA64_REG$_AR_SSD 3098#define IA64_REG$_AR_CFLAG 3099#define IA]64_REG$_AR_FSR 3100#define IA64_REG$_AR_FIR 3101#define IA64_REG$_AR_FDR 3102#define IA64_REG$_AR_CCV 3104#define IA64_REG$_AR_UNAT 3108#define IA64_REG$_AR_FPSR 3112#define IA64_REG$_AR_ITC 3116#define IA64_REG$_AR_RUC 3117#define IA64_REG$_AR_PFS 3136#define IA64_REG$_AR_LC 3137#define IA64_REG$_AR_EC 3138N/* Control Registers */#define IA64_REG$_CR_DCR 4096#define IA64_REG$_CR_ITM 4097#define IA64_REG$_CR_IVA^ 4098#define IA64_REG$_CR_PTA 4104#define IA64_REG$_CR_IPSR 4112#define IA64_REG$_CR_ISR 4113#define IA64_REG$_CR_IIP 4115#define IA64_REG$_CR_IFA 4116#define IA64_REG$_CR_ITIR 4117#define IA64_REG$_CR_IIPA 4118#define IA64_REG$_CR_IFS 4119#define IA64_REG$_CR_IIM 4120#define IA64_REG$_CR_IHA 4121N#define IA64_REG$_CR_IIB0 4122 /* getReg only */N#define IA64_REG$_CR_IIB1 4123 /* getReg only */#define IA64_REG$_ _CR_LID 4160N#define IA64_REG$_CR_IVR 4161 /* getReg only */#define IA64_REG$_CR_TPR 4162#define IA64_REG$_CR_EOI 4163N#define IA64_REG$_CR_IRR0 4164 /* getReg only */N#define IA64_REG$_CR_IRR1 4165 /* getReg only */N#define IA64_REG$_CR_IRR2 4166 /* getReg only */N#define IA64_REG$_CR_IRR3 4167 /* getReg only */#define IA64_REG$_CR_ITV 416`8#define IA64_REG$_CR_PMV 4169#define IA64_REG$_CR_CMCV 4170#define IA64_REG$_CR_LRR0 4176#define IA64_REG$_CR_LRR1 4177N/* Indirect Registers for getIndReg() and setIndReg() */N#define IA64_REG$_INDR_CPUID 9000 /* getIndReg only */#define IA64_REG$_INDR_DBR 9001#define IA64_REG$_INDR_IBR 9002#define IA64_REG$_INDR_PKR 9003#define IA64_REG$_INDR_PMC 9004#define IA64_REG$_INDR_PMD 9005#define IA64_REG$_INDR_RR 9006  $#praagma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __IA64REGDEF_LOADED */ ww훴/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13 b:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $IACDEF ***/#ifndef __IACDEF_LOADED#define __IACDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE c /* 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#ddefine __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* IMAGE ACTIVATION CONTROL FLAGS */N/*- */#define IAC$M_NOACT 0x1#define IAC$M_WRITABLE 0x2#define IAC$M_SHAREABLE 0x4#definee IAC$M_PRIVILEGE 0x8#define IAC$M_MERGE 0x10#define IAC$M_EXPREG 0x20#define IAC$M_P1MERGE 0x40#define IAC$M_PARANOID 0x80#define IAC$M_LASTCLU 0x100#define IAC$M_LIM 0x200#define IAC$M_RETRY 0x400#define IAC$M_NOCMKRNL 0x800#define IAC$M_SEQDEVLOD 0x1000#define IAC$M_XLINKER 0x2000#define IAC$M_KP_RESHDR 0x4000#define IAC$M_IS_RESHDR 0x8000#define IAC$M_NOTSHARED 0x10000#define IAC$M_GBLCLUSTR 0x20000#define IAC$M_SHMIDENT 0x40000#define IAC$M_NOCOPY 0x80000 f#define IAC$M_P1MERG_P0 0x100000 #define IAC$M_SETVECTOR 0x200000 #define IAC$M_PROTECTED 0x400000#define IAC$M_P1DIRECT 0x800000#define IAC$M_DEBUG 0x1000000!#define IAC$M_PERMANENT 0x2000000#define IAC$M_NOTRANS 0x4000000(#define IAC$M_NO_SHARE_LINKAGE 0x8000000%#define IAC$M_PAGE_PROTECT 0x10000000N#define IAC$C_LARGEST 6 /*LARGEST FLAG CALLER MAY SPECIFY */ #ifdef __NEW_STARLETtypedef union _iacdef { __struct {U unsigned iac$v_noact : 1; g /*DO NOT ACTIVATE THE IMAGE (FOR INSTALL) */N unsigned iac$v_writable : 1; /*MAKE IMAGE FILE WRITABLE */U unsigned iac$v_shareable : 1; /*ACT. SHAREABLE IMAGE FOR EXECUTABLE IMG */U unsigned iac$v_privilege : 1; /*ACT. SHARE. IMG FOR PRIV EXECUTABLE IMG */S unsigned iac$v_merge : 1; /*ACT 2ND EXECUTABLE IMG INTO ADR SPACE */O unsigned iac$v_expreg : 1; /*MAP IMAGE INTO NEXT FREE VA SPACE */U unsigned iac$v_p1mergeh : 1; /*P1 MERGED ACTIVATION (LEGAL INPUT FLAG) */N unsigned iac$v_paranoid : 1; /*GO INTO PARANOIA MODE */N unsigned iac$v_lastclu : 1; /*LAST CLUSTER FLAG */N unsigned iac$v_lim : 1; /*LINKABLE IMAGE */N unsigned iac$v_retry : 1; /*RETRY IMAGE ACTIVATION */P unsigned iac$v_nocmkrnl : 1; /*SHUT OFF CMKRNL,CMEXEC-SYSVER DIFF */R unsigned iac$v_seqdevlod : 1; /*LOADiING FROM SEQUENTIAL DEVICE (NET) */N unsigned iac$v_xlinker : 1; /*CROSS LINKER FORMAT */N unsigned iac$v_kp_reshdr : 1; /*MAKE IMAGE HEADER RESIDENT */N unsigned iac$v_is_reshdr : 1; /*IMAGE HEADER IS RESIDENT */O unsigned iac$v_notshared : 1; /*DO NOT SET IS_SHARED IN KFI ENTRY */R unsigned iac$v_gblclustr : 1; /*CURRENTLY PROCESSING GBL ISD CLUSTER */R unsigned iac$v_shmident : 1; /*SHARED MEMORY IDENT jUSED FOR GBL SEC */T unsigned iac$v_nocopy : 1; /*NO PRIVATE COPY OF SECTION IN EXEC IMG */R unsigned iac$v_p1merg_p0 : 1; /*P1 MERGED ACTIVATION WITH P0 ADDRESS */N/* RANGE (INTERNAL FLAG ONLY) */S unsigned iac$v_setvector : 1; /*SIGNAL ATLERNATE ENTRY TO SET VECTORS */N unsigned iac$v_protected : 1; /*REQUIRE SHAREABLES BE /PROTECTED */N unsigned iac$v_p1direct : 1; /*DIRECT P1 MERGE k */N unsigned iac$v_debug : 1; /*DEBUG SPECIFIED WITH ACTIVATION */N unsigned iac$v_permanent : 1; /*MAKE P1 IMAGE PERMANENT */Q unsigned iac$v_notrans : 1; /*DO LOOKUP ON UNTRANSLATED IMAGE NAME */Q unsigned iac$v_no_share_linkage : 1; /*Activate without shared linkage */U unsigned iac$v_page_protect : 1; /*Protect image pages according to acmode */$ unsigned iac$v_fill_16_ : 3; } iac$r_iacdef_bits; } IACD lEF; #if !defined(__VAXC)1#define iac$v_noact iac$r_iacdef_bits.iac$v_noact7#define iac$v_writable iac$r_iacdef_bits.iac$v_writable9#define iac$v_shareable iac$r_iacdef_bits.iac$v_shareable9#define iac$v_privilege iac$r_iacdef_bits.iac$v_privilege1#define iac$v_merge iac$r_iacdef_bits.iac$v_merge3#define iac$v_expreg iac$r_iacdef_bits.iac$v_expreg5#define iac$v_p1merge iac$r_iacdef_bits.iac$v_p1merge7#define iac$v_paranoid iac$r_iacdef_bits.iac$v_paranoid5#define iac$v_lastclu ia mc$r_iacdef_bits.iac$v_lastclu-#define iac$v_lim iac$r_iacdef_bits.iac$v_lim1#define iac$v_retry iac$r_iacdef_bits.iac$v_retry7#define iac$v_nocmkrnl iac$r_iacdef_bits.iac$v_nocmkrnl9#define iac$v_seqdevlod iac$r_iacdef_bits.iac$v_seqdevlod5#define iac$v_xlinker iac$r_iacdef_bits.iac$v_xlinker9#define iac$v_kp_reshdr iac$r_iacdef_bits.iac$v_kp_reshdr9#define iac$v_is_reshdr iac$r_iacdef_bits.iac$v_is_reshdr9#define iac$v_notshared iac$r_iacdef_bits.iac$v_notshared9#define iac$v_gblclu nstr iac$r_iacdef_bits.iac$v_gblclustr7#define iac$v_shmident iac$r_iacdef_bits.iac$v_shmident3#define iac$v_nocopy iac$r_iacdef_bits.iac$v_nocopy9#define iac$v_p1merg_p0 iac$r_iacdef_bits.iac$v_p1merg_p09#define iac$v_setvector iac$r_iacdef_bits.iac$v_setvector9#define iac$v_protected iac$r_iacdef_bits.iac$v_protected7#define iac$v_p1direct iac$r_iacdef_bits.iac$v_p1direct1#define iac$v_debug iac$r_iacdef_bits.iac$v_debug9#define iac$v_permanent iac$r_iacdef_bits.iac$v_permanent5#def oine iac$v_notrans iac$r_iacdef_bits.iac$v_notransG#define iac$v_no_share_linkage iac$r_iacdef_bits.iac$v_no_share_linkage?#define iac$v_page_protect iac$r_iacdef_bits.iac$v_page_protect"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union iacdef { __struct {U unsigned iac$v_noact : 1; /*DO NOT ACTIVATE THE IMAGE (FOR INSTALL) */N unsigned iac$v_writable : 1; /*MAKE IMAGE FILE WRITABLE */U unsigned iac$v_shareable : 1; p/*ACT. SHAREABLE IMAGE FOR EXECUTABLE IMG */U unsigned iac$v_privilege : 1; /*ACT. SHARE. IMG FOR PRIV EXECUTABLE IMG */S unsigned iac$v_merge : 1; /*ACT 2ND EXECUTABLE IMG INTO ADR SPACE */O unsigned iac$v_expreg : 1; /*MAP IMAGE INTO NEXT FREE VA SPACE */U unsigned iac$v_p1merge : 1; /*P1 MERGED ACTIVATION (LEGAL INPUT FLAG) */N unsigned iac$v_paranoid : 1; /*GO INTO PARANOIA MODE */N unsigned iac$v_lastclu : 1q; /*LAST CLUSTER FLAG */N unsigned iac$v_lim : 1; /*LINKABLE IMAGE */N unsigned iac$v_retry : 1; /*RETRY IMAGE ACTIVATION */P unsigned iac$v_nocmkrnl : 1; /*SHUT OFF CMKRNL,CMEXEC-SYSVER DIFF */R unsigned iac$v_seqdevlod : 1; /*LOADING FROM SEQUENTIAL DEVICE (NET) */N unsigned iac$v_xlinker : 1; /*CROSS LINKER FORMAT */N unsigned iac$v_kp_reshdr : 1; /*MAKE IMAGE HrEADER RESIDENT */N unsigned iac$v_is_reshdr : 1; /*IMAGE HEADER IS RESIDENT */O unsigned iac$v_notshared : 1; /*DO NOT SET IS_SHARED IN KFI ENTRY */R unsigned iac$v_gblclustr : 1; /*CURRENTLY PROCESSING GBL ISD CLUSTER */R unsigned iac$v_shmident : 1; /*SHARED MEMORY IDENT USED FOR GBL SEC */T unsigned iac$v_nocopy : 1; /*NO PRIVATE COPY OF SECTION IN EXEC IMG */R unsigned iac$v_p1merg_p0 : 1; /*P1 MERGED ACTIVATION WsITH P0 ADDRESS */N/* RANGE (INTERNAL FLAG ONLY) */S unsigned iac$v_setvector : 1; /*SIGNAL ATLERNATE ENTRY TO SET VECTORS */N unsigned iac$v_protected : 1; /*REQUIRE SHAREABLES BE /PROTECTED */N unsigned iac$v_p1direct : 1; /*DIRECT P1 MERGE */N unsigned iac$v_debug : 1; /*DEBUG SPECIFIED WITH ACTIVATION */N unsigned iac$v_permanent : 1; /*MAKE P1 IMAGE PERMANENT */Q t unsigned iac$v_notrans : 1; /*DO LOOKUP ON UNTRANSLATED IMAGE NAME */Q unsigned iac$v_no_share_linkage : 1; /*Activate without shared linkage */U unsigned iac$v_page_protect : 1; /*Protect image pages according to acmode */$ unsigned iac$v_fill_16_ : 3; } iac$r_iacdef_bits; } ; #if !defined(__VAXC)1#define iac$v_noact iac$r_iacdef_bits.iac$v_noact7#define iac$v_writable iac$r_iacdef_bits.iac$v_writable9#define iac$v_shareable iac$r_iacdef u_bits.iac$v_shareable9#define iac$v_privilege iac$r_iacdef_bits.iac$v_privilege1#define iac$v_merge iac$r_iacdef_bits.iac$v_merge3#define iac$v_expreg iac$r_iacdef_bits.iac$v_expreg5#define iac$v_p1merge iac$r_iacdef_bits.iac$v_p1merge7#define iac$v_paranoid iac$r_iacdef_bits.iac$v_paranoid5#define iac$v_lastclu iac$r_iacdef_bits.iac$v_lastclu-#define iac$v_lim iac$r_iacdef_bits.iac$v_lim1#define iac$v_retry iac$r_iacdef_bits.iac$v_retry7#define iac$v_nocmkrnl iac$r_iacdef_bits.iac$v v_nocmkrnl9#define iac$v_seqdevlod iac$r_iacdef_bits.iac$v_seqdevlod5#define iac$v_xlinker iac$r_iacdef_bits.iac$v_xlinker9#define iac$v_kp_reshdr iac$r_iacdef_bits.iac$v_kp_reshdr9#define iac$v_is_reshdr iac$r_iacdef_bits.iac$v_is_reshdr9#define iac$v_notshared iac$r_iacdef_bits.iac$v_notshared9#define iac$v_gblclustr iac$r_iacdef_bits.iac$v_gblclustr7#define iac$v_shmident iac$r_iacdef_bits.iac$v_shmident3#define iac$v_nocopy iac$r_iacdef_bits.iac$v_nocopy9#define iac$v_p1merg_p0 ia wc$r_iacdef_bits.iac$v_p1merg_p09#define iac$v_setvector iac$r_iacdef_bits.iac$v_setvector9#define iac$v_protected iac$r_iacdef_bits.iac$v_protected7#define iac$v_p1direct iac$r_iacdef_bits.iac$v_p1direct1#define iac$v_debug iac$r_iacdef_bits.iac$v_debug9#define iac$v_permanent iac$r_iacdef_bits.iac$v_permanent5#define iac$v_notrans iac$r_iacdef_bits.iac$v_notransG#define iac$v_no_share_linkage iac$r_iacdef_bits.iac$v_no_share_linkage?#define iac$v_page_protect iac$r_iacdef_bits.iac$v_pxage_protect"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __IACDEF_LOADED */ ww`훴/*********************************************************** y*********************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************/"/*** MODULE $ICCDEF IDENT X-4 ***/#ifndef __ICCDEF_LOADED#define __ICCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard featzures */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __op{tional_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 N/* */N/* ICC IOSB data structure for data transfer routines */N/* | */N/* Past the 1st longword, the IOC_ICC fields vary depending on the type of */N/* request/operation. The diagram attempts to picture those relationships */N/* below. Longwords 2-5 are done in columns, each column representing the */N/* value of that longword for that type of request/operation. */N/* */*/* +4 +2 +0 */J/* +--------------------------------------- }------------------+ */N/* L1: | Undefined | Return status code | */J/* |---------------------------------------------------------| */J/* |---------------------------------------------------------| */#/* | | | | | */J/* | RECEIVE | REPLY | TRANSCEIVE | CONNECT | */#/* | | | | | */N/* L2: | rcv_len | replyto_handle| txrcv_len | RemStat | */N/* |-~--------------|---------------|---------------|---------| */N/* L3: | req_handle | Unused | | Unused | */N/* |---------------|---------------| reply_buffer | | */N/* L4: | reply_len | Unused | | | */N/* |---------------|---------------|---------------| | */N/* L5: | Unused | Unused | txreply_len | | */N/* |---------------+----------- ----+---------------+---------| */N/* */ #ifdef __NEW_STARLETtypedef struct _ios_icc {N unsigned short int ios_icc$w_status; /* return status */N unsigned short int ios_icc$w_reserved; /* reserved */ __union { __struct {N unsigned int ios_icc$l_remstat; /* remote status (returned) */- unsigned int ios_icc$l_fill0 [3];  } ios_icc$r_connect; __struct {J unsigned int ios_icc$l_rcv_len; /* return len (returned) */O unsigned int ios_icc$l_req_handle; /* request handle (returned) */N unsigned int ios_icc$l_reply_len; /* reply len (returned) */) unsigned int ios_icc$l_fill1; } ios_icc$r_receive; __struct {P unsigned int ios_icc$l_replyto_handle; /* request_handle (input) */- unsigned int ios_icc $l_fill2 [3]; } ios_icc$r_reply; __struct {P unsigned int ios_icc$l_txrcv_len; /* return length (returned) */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N char *ios_icc$a_reply_buffer; /* 64-bit bfr addr (Alpha) */#else) unsigned __int64 ios_icc$a_reply_buffer;#endifL unsigned int ios_icc$l_txr eply_len; /* reply len (input) */# } ios_icc$r_transceive; } ios_icc$r_parameters; } IOS_ICC; #if !defined(__VAXC)@#define ios_icc$r_connect ios_icc$r_parameters.ios_icc$r_connect=#define ios_icc$l_remstat ios_icc$r_connect.ios_icc$l_remstat@#define ios_icc$r_receive ios_icc$r_parameters.ios_icc$r_receive=#define ios_icc$l_rcv_len ios_icc$r_receive.ios_icc$l_rcv_lenC#define ios_icc$l_req_handle ios_icc$r_receive.ios_icc$l_req_handleA#define ios_icc$l_reply_len ios_icc$r_receive.ios_icc$l_reply_len<#define ios_icc$r_reply ios_icc$r_parameters.ios_icc$r_replyI#define ios_icc$l_replyto_handle ios_icc$r_reply.ios_icc$l_replyto_handleF#define ios_icc$r_transceive ios_icc$r_parameters.ios_icc$r_transceiveD#define ios_icc$l_txrcv_len ios_icc$r_transceive.ios_icc$l_txrcv_lenJ#define ios_icc$a_reply_buffer ios_icc$r_transceive.ios_icc$a_reply_bufferH#define ios_icc$l_txreply_len ios_icc$r_transceive.ios_icc$l_txreply_len"#endif /* #if !defined(__VAXC ) */ #else /* __OLD_STARLET */typedef struct _ios_icc {N unsigned short int ios_icc$w_status; /* return status */N unsigned short int ios_icc$w_reserved; /* reserved */ __union { __struct {N unsigned int ios_icc$l_remstat; /* remote status (returned) */- unsigned int ios_icc$l_fill0 [3]; } ios_icc$r_connect; __struct {J unsigned int ios_icc$l_rcv_len; /* return len (returned) */O unsigned int ios_icc$l_req_handle; /* request handle (returned) */N unsigned int ios_icc$l_reply_len; /* reply len (returned) */) unsigned int ios_icc$l_fill1; } ios_icc$r_receive; __struct {P unsigned int ios_icc$l_replyto_handle; /* request_handle (input) */- unsigned int ios_icc$l_fill2 [3]; } ios_icc$r_reply; __struct {P unsigned int ios_icc$l_txr cv_len; /* return length (returned) */T unsigned __int64 ios_icc$a_reply_buffer; /* 64-bit bfr addr (Alpha) */L unsigned int ios_icc$l_txreply_len; /* reply len (input) */# } ios_icc$r_transceive; } ios_icc$r_parameters; } ios_icc; #if !defined(__VAXC)R#define ios_icc$l_remstat ios_icc$r_parameters.ios_icc$r_connect.ios_icc$l_remstatR#define ios_icc$l_rcv_len ios_icc$r_parameters.ios_icc$r_receive.ios_icc$l_rcv_lenX#define ios_icc$l_req_handle ios_icc$r_parameters.ios_icc$r_receive.ios_icc$l_req_handleV#define ios_icc$l_reply_len ios_icc$r_parameters.ios_icc$r_receive.ios_icc$l_reply_len^#define ios_icc$l_replyto_handle ios_icc$r_parameters.ios_icc$r_reply.ios_icc$l_replyto_handleY#define ios_icc$l_txrcv_len ios_icc$r_parameters.ios_icc$r_transceive.ios_icc$l_txrcv_len_#define ios_icc$a_reply_buffer ios_icc$r_parameters.ios_icc$r_transceive.ios_icc$a_reply_buffer]#define ios_icc$l_txreply_len ios_icc$r_parameters.ios_icc $r_transceive.ios_icc$l_txreply_len"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define ICC$C_RECEIVE_LEN 16#define ICC$C_REPLY_LEN 8#define ICC$C_TRANSCEIVE_LEN 20N/* */N/* Length constants */N/* */#define ICC$C_MAX_ASSOC_LEN 31$#define ICC$C_MAX_CONN_D ATA_LEN 1000N/* */N/* Connection flag bit definitions (for connect/accept services) */N/* */#define ICC$M_SYNCH_MODE 0x1 #ifdef __NEW_STARLET&typedef struct _icc_connection_flags {O unsigned icc$v_synch_mode : 1; /* Set (1) if data transfer routines */N/* are allowed to return SS$_SYNCH  */N/* to the user. */ unsigned icc$v_fill_17_ : 7; } ICC_CONNECTION_FLAGS;#else /* __OLD_STARLET */&typedef struct _icc_connection_flags {O unsigned icc$v_synch_mode : 1; /* Set (1) if data transfer routines */N/* are allowed to return SS$_SYNCH */N/* to the user. */ unsigned icc$v_fill_17_ : 7; } ic c_connection_flags;%#endif /* #ifdef __NEW_STARLET */N/* */N/* ICC event codes (first parameter) for the connect/disconnect routines */N/* */#define ICC$C_EV_CONNECT 0#define ICC$C_EV_DISCONNECT 1#define ICC$C_MIN_EVENT 0#define ICC$C_MAX_EVENT 1N/* */N/* Default ICC association handle */N/* */!#define ICC$C_DFLT_ASSOC_HANDLE 1N/* */N/* Default flow control value */N/* */N#define ICC$C_DEFAULT_MAXFLOWBUFCNT 5 /* Pending inbound msgs */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ICCDEF_LOADED */ ww훴/********************************************************************************************************************************/=/* Created: 5-Apr-2 012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $IDCDEF ***/#ifndef __IDCDEF_LOADED#define __IDCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* IDC - Random entity ident consistency check */N/* */#define IDC$C_LEQ 0#define IDC$C_EQUAL 1 #ifdef __NEW_STARLETtypedef struct _ idcdef {N unsigned char idc$b_gsdtyp; /*Type field */ __union {N unsigned short int idc$w_flags; /*Flags */ __struct {Y unsigned idc$v_binident : 1; /*Ident is binary longword rather than ASCIC */[ unsigned idc$v_idmatch : 2; /*Field for ident match control if binary ident */S unsigned idc$v_errsev : 3; /*Error severity (default is warning-0) */( unsigned idc$v _fill_19_ : 2; } idc$r_flags_bits;N/*Match control values */ } idc$r_flags_overlay; __union {N unsigned char idc$b_namlng; /*Length of entity name */ __struct {! char idcdef$$_fill_1;N/* Followed by entity name */N/* Followed by */N/* byte of ident length */N/* ident string (length = string length) */N/* or */N/* ident binary value (length = 4) */N/* Followed by byte of length of name of object */N/* Followed by the object name */" } idc$r_namlng_fields; } idc$r_namlng_overlay; } IDCDEF; #if !defined(__VAXC)3#define idc$w_flags idc$r_flags_overlay.idc$w_flagsJ#define idc$v_binident idc$r_flags_overlay.idc$r_flags_bits.idc$v_binidentH#define idc$v_idmatch idc$r_flags_overlay.idc$r_flags_bits.idc$v_idmatchF#define idc$v_errsev idc$r_flags_overlay.idc$r_flags_bits.idc$v_errsev6#define idc$b_namlng idc$r_namlng_overlay.idc$b_namlng"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct idcdef {N unsigned char idc$b_gsdt yp; /*Type field */ __union {N unsigned short int idc$w_flags; /*Flags */ __struct {Y unsigned idc$v_binident : 1; /*Ident is binary longword rather than ASCIC */[ unsigned idc$v_idmatch : 2; /*Field for ident match control if binary ident */S unsigned idc$v_errsev : 3; /*Error severity (default is warning-0) */( unsigned idc$v_fill_19_ : 2; } idc$r_fl ags_bits;N/*Match control values */ } idc$r_flags_overlay; __union {N unsigned char idc$b_namlng; /*Length of entity name */ __struct {! char idcdef$$_fill_1;N/* Followed by entity name */N/* Followed by */N/* byte of ident length  */N/* ident string (length = string length) */N/* or */N/* ident binary value (length = 4) */N/* Followed by byte of length of name of object */N/* Followed by the object name */" } idc$r_namlng_fields; } idc$r_namlng_overlay; } ; #if !defin ed(__VAXC)3#define idc$w_flags idc$r_flags_overlay.idc$w_flagsJ#define idc$v_binident idc$r_flags_overlay.idc$r_flags_bits.idc$v_binidentH#define idc$v_idmatch idc$r_flags_overlay.idc$r_flags_bits.idc$v_idmatchF#define idc$v_errsev idc$r_flags_overlay.idc$r_flags_bits.idc$v_errsev6#define idc$b_namlng idc$r_namlng_overlay.idc$b_namlng"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __IDCDEF_LOADED */ ww;$/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7 304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $IEEEDEF ***/#ifndef __IEEEDEF_LOADED#define __IEEEDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 !d efined(__VAXC)#define __union union#else#define __union variant_union#endif#endif #define IEEE$K_VERSION_NUMBER 2N/* */N/* IEEE Floating Point control definitions. */N/* */N/* */`/* The following values are used to set the precision control and rounding control fields via */]/* SYS$IEEE_SET_PRECISION_MODE and SYS$IEEE_SET_ROUNDING_MODE. (Note that one can not set */N/* precision mode on Alpha). */N/* */Q#define IEEE$C_PM_NO_CHANGE -1 /* No change. Just get previous value */N#define IEEE$C_PM_SINGLE 0 /* Single Precision */N#define IEEE$C_PM_UNUSED 1 /* This value has no meaning */N#define IEEE$C_PM_DOUBLE 2 /* Double Precision */N#define IEEE$C_PM_DOUBLE_EXTENDED 3 /* Double-Extended Precision */N#define IEEE$C_PM_MAX 3 /* Maximum legal value */Q#define IEEE$C_RM_NO_CHANGE -1 /* No change. Just get previous value */N#define IEEE$C_RM_NEAREST 0 /* Nearest (or even) */N#define IEEE$C_RM_DOWN 1 /* -Infinity (down)  */N#define IEEE$C_RM_UP 2 /* +Infinity (up) */N#define IEEE$C_RM_TRUNCATE 3 /* Zero (truncate/chop) */N#define IEEE$C_RM_MAX 3 /* Maximum legal value */N/* */R/* The following structure defines bits for the (software) IEEE Floating Point */U/* control register on Alpha, and for the values passed to SYS$IEEE_SET_FP_CONTROL * /N/* on all architectures (except VAX where it does not exist). */N/* */"#define IEEE$M_TRAP_ENABLE_INV 0x2"#define IEEE$M_TRAP_ENABLE_DZE 0x4"#define IEEE$M_TRAP_ENABLE_OVF 0x8##define IEEE$M_TRAP_ENABLE_UNF 0x10##define IEEE$M_TRAP_ENABLE_INE 0x20$#define IEEE$M_TRAP_ENABLE_DNOE 0x40#define IEEE$M_MAP_DNZ 0x2000#define IEEE$M_MAP_UMZ 0x4000#define IEEE$M_INHERIT 0x8000!#define IEEE$M_STATUS_INV 0x20000!#define IEEE$M_STATUS_DZE 0x40000!#define IEEE$M_STATUS_OVF 0x80000"#define IEEE$M_STATUS_UNF 0x100000"#define IEEE$M_STATUS_INE 0x200000"#define IEEE$M_STATUS_DNO 0x400000#define IEEE$M_PC 0x1800000#define IEEE$M_RC 0x6000000#define IEEE$M_WPFP 0x8000000 #ifdef __NEW_STARLETtypedef struct _ieee { __union {N unsigned __int64 ieee$q_flags; /* Internal flags */ __struct {N unsigned ieee$v_spare_0 : 1; /* Bit 0 - reserved */N/* Trap enable flags */N unsigned ieee$v_trap_enable_inv : 1; /* invalid operation */N unsigned ieee$v_trap_enable_dze : 1; /* divide by zero */N unsigned ieee$v_trap_enable_ovf : 1; /* overflow */N unsigned ieee$v_trap_enable_unf : 1; /* underflow */N unsigned ieee$v_trap_enable_ine : 1; /* inexact */Y unsigned ieee$v_trap_enable_dnoe : 1; /* denormal operand exception enable */N unsigned ieee$v_spare_7_12 : 6; /* reserved */N unsigned ieee$v_map_dnz : 1; /* denormal operands mapped to 0.0 */K unsigned ieee$v_map_umz : 1; /* underflows mapped to 0.0 */P unsigned ieee$v_inherit : 1; /* inherit FP state on thread create */N unsigned ieee$v_spare_16 : 1; /* reserved */N unsigned ieee$v_status_inv : 1; /* invalid operation */N unsigned ieee$v_status_dze : 1; /* divide by zero */N unsigned ieee$v_status_ovf : 1; /* overflow */N unsigned ieee$v_status_unf : 1; /* underflow */N unsigned ieee$v_status_ine : 1; /* inexact */N unsigned ieee$v_status_dno : 1; /* denormal operand */N/* Precision, rounding, and WPFP are no t currently supported on Alpha. */N unsigned ieee$v_pc : 2; /* Precision control */N unsigned ieee$v_rc : 2; /* Rounding control */O unsigned ieee$v_wpfp : 1; /* Whole program floating point mode */N unsigned ieee$v_spare_28_31 : 4; /* reserved */ } ieee$r_fill_19_; } ieee$r_fill_18_; } IEEE; #if !defined(__VAXC)1#define ieee$q_flags ieee$r_fill_18_.ieee$q_flagsU#define ieee$v_trap_enable_inv ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_invU#define ieee$v_trap_enable_dze ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_dzeU#define ieee$v_trap_enable_ovf ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_ovfU#define ieee$v_trap_enable_unf ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_unfU#define ieee$v_trap_enable_ine ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_ineW#define ieee$v_trap_enable_dnoe ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_dnoeE#define ieee$v_map_dnz ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_map_dnzE#define ieee$v_map_umz ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_map_umzE#define ieee$v_inherit ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_inheritK#define ieee$v_status_inv ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_invK#define ieee$v_status_dze ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_dzeK#define ieee$v_status_ovf ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_ovfK#define ieee$v_status_un f ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_unfK#define ieee$v_status_ine ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_ineK#define ieee$v_status_dno ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_dno;#define ieee$v_pc ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_pc;#define ieee$v_rc ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_rc?#define ieee$v_wpfp ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_wpfp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _ieee { __union {N unsigned int ieee$q_flags [2]; /* Internal flags */ __struct {N unsigned ieee$v_spare_0 : 1; /* Bit 0 - reserved */N/* Trap enable flags */N unsigned ieee$v_trap_enable_inv : 1; /* invalid operation */N unsigned ieee$v_trap_enable_dze : 1; /* divide by zero */N unsigned ieee$v_trap_enable_ovf : 1; /* overflow */N unsigned ieee$v_trap_enable_unf : 1; /* underflow */N unsigned ieee$v_trap_enable_ine : 1; /* inexact */Y unsigned ieee$v_trap_enable_dnoe : 1; /* denormal operand exception enable */N unsigned ieee$v_spare_7_12 : 6; /* reserved */N unsigned ieee$v_map_dnz : 1; /* denormal operands mapped to 0.0 */K unsigned ieee$v_map_umz : 1; /* underflows mapped to 0.0 */P unsigned ieee$v_inherit : 1; /* inherit FP state on thread create */N unsigned ieee$v_spare_16 : 1; /* reserved */N unsigned ieee$v_status_inv : 1; /* invalid operation */N unsigned ieee$v_status_dze : 1; /* divide by zero */N unsigned ieee$v_status_ovf : 1; /* overflow */N unsigned ieee$v_status_unf : 1; /* underflow */N unsigned ieee$v_status_ine : 1; /* inexact */N unsigned ieee$v_status_dno : 1; /* denormal operand */N/* Precision, rounding, and WPFP are not currently supported on Alpha. */N unsigned ieee$v_pc : 2; /* Precision control */N unsigned ieee$v_rc : 2; /* Rounding control */O unsigned ieee$v_wpfp : 1; /* Whole program floating point mode */N unsigned ieee$v_spare_28_31 : 4; /* reserved  */ } ieee$r_fill_19_; } ieee$r_fill_18_; } ieee; #if !defined(__VAXC)1#define ieee$q_flags ieee$r_fill_18_.ieee$q_flagsU#define ieee$v_trap_enable_inv ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_invU#define ieee$v_trap_enable_dze ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_dzeU#define ieee$v_trap_enable_ovf ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_ovfU#define ieee$v_trap_enable_unf ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_unfU#define ieee$v_trap_enable_ine ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_ineW#define ieee$v_trap_enable_dnoe ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_trap_enable_dnoeE#define ieee$v_map_dnz ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_map_dnzE#define ieee$v_map_umz ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_map_umzE#define ieee$v_inherit ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_inheritK#define ieee$v_status_inv ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_invK#define ieee$v_status_dze ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_dzeK#define ieee$v_status_ovf ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_ovfK#define ieee$v_status_unf ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_unfK#define ieee$v_status_ine ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_ineK#define ieee$v_status_dno ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_status_dno;#define ieee$v_pc ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_pc;#define ieee$v_rc ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_rc?#define ieee$v_wpfp ieee$r_fill_18_.ieee$r_fill_19_.ieee$v_wpfp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __IEEEDEF_LOADED */ wwk/*************** *****************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:52 by OpenVMS SDL EV3-3 */H/* Source: 22-JAN-1996 12:31:58 $1$DGA7304:[STARLET.LIS]ILEDEF.SDL;1 *//********************************************************************************************************************************//*** MODULE $ILEDEF ***/#ifndef __ILEDEF_LOADED#define __ILEDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* Define the 32-bit Item List Entry 3 structure */N/*-  */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _ile3 {#pragma __nomember_alignmentN unsigned short int ile3$w_length; /* Length of buffer in bytes */N unsigned short int ile3$w_code; /* Item code value */N void *ile3$ps_bufaddr;  /* Buffer address */V unsigned short int *ile3$ps_retlen_addr; /* Address of word for returned length */ } ILE3;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _ile3 {#pragma __nomember_alignmentN unsigned short int ile3$w_length; /* Length of buffer in bytes */N unsigned short int ile3$w_code; /* Item code value */N void *ile3$ps_bufaddr; /* Buffer address */V unsigned short int *ile3$ps_retlen_addr; /* Address of word for returned length */ } ile3;%#endif /* #ifdef __NEW_STARLET */N#define ILE3$K_LENGTH 12 /* Length of ILE3 */N#define ILE3$C_LENGTH 12 /* Length of ILE3 */N/*+  */N/* Define the 64-Bit Item List Entry B structure. This is the 64-bit */N/* counterpart of the 32-bit item list 3 structure. */N/*- */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _ileb_64 {#pragma __nomember_alignmentN unsigned short int ileb_64$w_mbo; /* Must be One field */N unsigned short int ileb_64$w_code; /* Item code value */N int ileb_64$l_mbmo; /* Must be Minus One field */N unsigned __int64 ileb_64$q_length; /* Length of buffer in bytes */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *ileb_64$pq_bufaddr; /* Buffer address */#else% unsigned __int64 ileb_64$pq_bufaddr;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */[ unsigned __int64 *ileb_64$pq_retlen_addr; /* Address of quadword for returned length */#else) unsigned __int64 ileb_64$pq_retlen_addr;#endif } ILEB_64;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _ileb_64 {#pragma __nomember_alignmentN unsigned short int ileb_64$w_mbo; /* Must be One field */N unsigned short int ileb_64$w_code; /* Item code value */N int ileb_64$l_mbmo; /* Must be Min us One field */N unsigned int ileb_64$q_length [2]; /* Length of buffer in bytes */N unsigned __int64 ileb_64$pq_bufaddr; /* Buffer address */Z unsigned __int64 ileb_64$pq_retlen_addr; /* Address of quadword for returned length */ } ileb_64;%#endif /* #ifdef __NEW_STARLET */N#define ILEB_64$K_LENGTH 32 /* Length of ILEB */N#define ILEB_64$C_LENGTH 32 /* Length of ILEB */N/*+  */N/* Define the 32-bit Item List Entry 2 structure */N/*- */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _ile2 {#pragma __nomember_alignmentN unsi gned short int ile2$w_length; /* Length of buffer in bytes */N unsigned short int ile2$w_code; /* Item code value */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endifN void *ile2$ps_bufaddr; /* Buffer address */ } ILE2;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !d efined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _ile2 {#pragma __nomember_alignmentN unsigned short int ile2$w_length; /* Length of buffer in bytes */N unsigned short int ile2$w_code; /* Item code value */N void *ile2$ps_bufaddr; /* Buffer address */ } ile2;%#endif /* #ifdef __NEW_STARLET */N#define IL E2$K_LENGTH 8 /* Length of ILE2 */N#define ILE2$C_LENGTH 8 /* Length of ILE2 */N/*+ */N/* Define the 64-Bit Item List Entry 2 structure. This is the 64-bit */N/* counterpart of the 32-bit item list 2 structure. */N/*- */ #ifdef __NEW_STARLETc#if !defin ed(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _ilea_64 {#pragma __nomember_alignmentN unsigned short int ilea_64$w_mbo; /* Must be One field */N unsigned short int ilea_64$w_code; /* Item code value */N int ilea_64$l_mbmo; /* Must be Minus One field */N unsigned __int64 ilea_64 $q_length; /* Length of buffer in bytes */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *ilea_64$pq_bufaddr; /* Buffer address */#else% unsigned __int64 ilea_64$pq_bufaddr;#endif } ILEA_64;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C ++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _ilea_64 {#pragma __nomember_alignmentN unsigned short int ilea_64$w_mbo; /* Must be One field */N unsigned short int ilea_64$w_code; /* Item code value */N int ilea_64$l_mbmo; /* Must be Minus One field */N unsigned int ilea_64$q_length [2]; /* Length of buffer in bytes */N unsigned __int64 ilea_64$pq_ bufaddr; /* Buffer address */ } ilea_64;%#endif /* #ifdef __NEW_STARLET */N#define ILEA_64$K_LENGTH 24 /* Length of ILEA */N#define ILEA_64$C_LENGTH 24 /* Length of ILEA */  M#ifdef __INITIAL_POINTER_SIZE /* Not defined for older compilers */M#pragma __required_pointer_size __save /* Save current pointer size */M#pragma __required_pointer_size __long /* Pointers are 64-bit  */Ctypedef struct _ile2 * ILE2_PQ; /* long pointer to item list 2 */Ctypedef struct _ile3 * ILE3_PQ; /* long pointer to item list 3 */Otypedef struct _ilea_64 * ILEA_64_PQ; /* long pointer to 64-bit item list A */Otypedef struct _ileb_64 * ILEB_64_PQ; /* long pointer to 64-bit item list B */O#pragma __required_pointer_size __restore /* Return to previous pointer size */#elseDtypedef unsigned __int64 ILE2_PQ; /* long pointer to item list 2 */Dtypedef unsigned __int64 ILE3_PQ; / * long pointer to item list 3 */Ntypedef unsigned __int64 ILEA_64_PQ; /* long pointer to 64-bit item list A */Ntypedef unsigned __int64 ILEB_64_PQ; /* long pointer to 64-bit item list B */##endif /* __INITIAL_POINTER_SIZE *//* $is_itmlst64M This macro tests the specified item list to determine if it is a 64-bit itemM list. A 64-bit item list has a one in the first word and a -1 in the second longword. ARGUMENTS:2 itemlist: Specifies the item list to be examined. USAGE:! flag = $is_itmlst64 (item_list);*/%#define $is_itmlst64(item_list) \i ( (((ILEA_64_PQ)item_list)->ilea_64$w_mbo == 1) && (((ILEA_64_PQ)item_list)->ilea_64$l_mbmo == -1) ) $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ILEDEF_LOADED */  ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $INDICTDEF ***/#ifndef __INDICTDEF_LOADED#define __IN DICTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/*  */N/* Object Indictment Definitions */N/* */N/* This file is in [STARLET] to allow other outside developers call the */N/* sys$indict_object call properly. Today the only group who calls that */N/* object is Compaq Analyze. */N/* */N/* **** NOTE **** */N/* */N/* New items must always be added to the END of each item list */N/* so that users will not have to relink. */N/* */N/*- */N#define INDICT$_VERSION 1  /* Request information version */N#define INDICT$_OBJTYPE 2 /* Indictment Object type */Q#define INDICT$_HANDLE 3 /* Indicted object or failing PFN Page */N#define INDICT$_COMPONENT_ID 4 /* Component Handle ID */N#define INDICT$_COMPONENT_TYPE 5 /* Component Handle Type */N#define INDICT$_COMPONENT_SUBTYPE 6 /* Component Handle Subtype */N#define INDICT$_MODULE_ID 7 /* Module Handle Id */N#define INDICT$_MODULE_TYPE 8 /* Module Handle Type */N#define INDICT$_MODULE_SUBTYPE 9 /* Module Handle Subtype */O#define INDICT$_URGENCY 10 /* Urgency of the indictment request */N#define INDICT$_PROBABILITY 11 /* Probability of correct fault */N#define INDICT$_TOTALINDICTMENTS 12 /* Total number to be indicted */Q#define INDICT$_DESCRIPTION 13 /* Readable description of the problem */N#define INDICT$_REPORTHANDLE 14 /* report_handle program name */S#define INDICT$_INITIATOR 15 /* Who called us (e.g. Compaq Analyze). */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __INDICTDEF_LOADED */ ww5/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $INITDEF ***/#ifndef __INITDEF_LOADED#define __INITDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* Values for INIT$_DENSITY item code.  */N/* */N#define INIT$K_DENSITY_800_BPI 1 /* 800 bpi tape */N#define INIT$K_DENSITY_1600_BPI 2 /* 1600 bpi tape */N#define INIT$K_DENSITY_6250_BPI 3 /* 6250 bpi tape */N#define INIT$K_DENSITY_SINGLE_DISK 4 /* Single-density RX02 */N#define INIT$K_DENSITY_DOUBLE_DISK 5 /* RX33 or double-density RX02 */Z#define INIT$K_DENSITY_DD_DISK 6 /* "Double density" (lower than "High Density") */N#define INIT$K_DENSITY_HD_DISK 7 /* High density diskette */N#define INIT$K_DENSITY_COMPACT 8 /* TA90 with data compaction on */N#define INIT$K_DENSITY_ED_DISK 9 /* New density for RX26 */N/* */N/* Values for INIT$_HOMEBLOCKS item code. */N/*  */N#define INIT$K_HOMEBLOCKS_GEOMETRY 1 /* geometry dependent */N#define INIT$K_HOMEBLOCKS_FIXED 2 /* fixed position */N#define INIT$K_HOMEBLOCKS_CONTIGUOUS 3 /* contiguous */N/* */N/* Item codes for $INIT_VOL parameters. */N/*  */ #ifdef __NEW_STARLET#typedef struct _badblocks_lbn_def {N unsigned int init$l_badblocks_lbn; /* LBN of first block */O unsigned int init$l_badblocks_lbn_count; /* Count of blocks to be marked */ } BADBLOCKS_LBN_DEF;#else /* __OLD_STARLET */struct badblocks_lbn_def {N unsigned int init$l_badblocks_lbn; /* LBN of first block */O unsigned int init$l_badblocks_lbn_count; /* Count of blocks to be marked */  } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLET#typedef struct _badblocks_sec_def {N unsigned int init$l_badblocks_sector; /* Sector of first block */O unsigned int init$l_badblocks_sec_count; /* Count of blocks to be marked */N unsigned int init$l_badblocks_track; /* Track of first block */N unsigned int init$l_badblocks_cylinder; /* Cylinder of first block */ } BADBLOCKS_SEC_DEF;#else /* __OLD_STARLET */struct badbloc ks_sec_def {N unsigned int init$l_badblocks_sector; /* Sector of first block */O unsigned int init$l_badblocks_sec_count; /* Count of blocks to be marked */N unsigned int init$l_badblocks_track; /* Track of first block */N unsigned int init$l_badblocks_cylinder; /* Cylinder of first block */ } ;%#endif /* #ifdef __NEW_STARLET */N/* Define codes as constants */S#define INIT$_ACCESSED 1 /* Number of directories in system space */U#define INIT$_BADBLOCKS_LBN 2 /* Bad block areas by logical block number */X#define INIT$_BADBLOCKS_SEC 3 /* Bad block areas by sector, track, cylinder */N#define INIT$_CLUSTERSIZE 4 /* Minimum allocation unit */N#define INIT$_COMPACTION 5 /* Data compaction for TA90 */N#define INIT$_NO_COMPACTION 6 /* No data compaction */N#define INIT$_DENSITY 7 /* Format */R#define INIT$_DIRECTORIES 8 /* Preallocated entries for directories */N#define INIT$_ERASE 9 /* Destroy data on volume */N#define INIT$_NO_ERASE 10 /* Do not destroy data on volume */N#define INIT$_EXTENSION 11 /* Default extension size for files */N#define INIT$_FPROT 12 /* Default protection for files */S#define INIT$_HEADERS 13 /* Number of file headers for index file */S#define INIT$_HIGHWATER 14 /* Set the file highwater mark attribute */Z#define INIT$_NO_HIGHWATER 15 /* Do not set the file highwater mark attribute */U#define INIT$_INDEX_BEGINNING 16 /* Place index file at beginning of volume */N#define INIT$_INDEX_BLOCK 17 /* LBN for index file */O#define INIT$_INDEX_END 18 /* Place index file at end of volume */R#define INIT$_INDEX_MIDDLE 19 /* Place index file at middle of volume */S#define INIT$_INTERCHANGE 20 /* Do not write VMS-specific information */N#define INIT$_NO_INTERCHANGE 21 /* Write VMS-specific information */T#define INIT$_LABEL_ACCESS 22 /* Character for ANSI accessability field */N#define INIT$_LABEL_VOLO 23 /* Text for ANSI owner ID field */O#define INIT$_MAXFILES 24 /* Maximum number of files on volume */O#define INIT$_OVR_ACCESS 25 /* Override ANSI accessability field */V#define INIT$_NO_OVR_ACCESS 26 /* Do not override ANSI accessability field */N#define INIT$_OVR_EXP 27 /* Override expiration date */N#define INIT$_NO_OVR_EXP 28 /* Do not override expiration date */N#define INIT$_OVR_VOLO 29 /* Override ANSI owner ID field */Q#define INIT$_NO_OVR_VOLO 30 /* Do not override ANSI owner ID field */N#define INIT$_OWNER 31 /* UIC for volume */N#define INIT$_READCHECK 32 /* Check all read operations */N#define INIT$_NO_READCHECK 33 /* Do not check all read operations */N#define INIT$_SIZE 34 /* Size of RAM disk */N#define INIT$_STRUCTURE_LEVEL_1 35 /* Format in Files-11 level 1 */N#define INIT$_STRUCTURE_LEVEL_2 36 /* Format in Files-11 level 2 */S#define INIT$_STRUCTURE_LEVEL_2_SUB_0 37 /* Format in subset of Files-11 level 2 */N#define INIT$_USER_NAME 38 /* User name for volume */N#define INIT$_VERIFIED 39 /* Use bad block data on volume */N#define INIT$_NO_VERIFIED 40 /* Ignore bad block data on volume */N#define INIT$_VPROT 41 /* Volume protection */Y#define INIT$_WINDOW 42 /* Number of mapping pointers for file windows */N#define INIT$_WRITECHECK 43 /* Check all write operations */O#define INIT$_NO_WRITECHECK 44 /* Do not check all write operations */N#define INIT$_MIN_CLASS 45 /* Minimum security classfication */N#define INIT$_MAX_CLASS 46 /* Maximum security classfication */P#define INIT$_NO_PROTECTION 47 /* No default security classification */Q#define INIT$_HOMEBLOCKS 48 /* Homeblock placement strategy to use */N#define INIT$_STRUCTURE_LEVEL_5 49 /* Format in Files-11 level 5 */N#define INIT$_SHADOW 50 /* Format disks with Shadowing SCBs */\#define INIT$_HARDLINKS 51 /* Use a linkcount in creating files (ODS-5 only) */Z#define INIT$_ACCESS_DATES 52 /* Use access dates for attributes (ODS-5 only) */#define INIT$_SPARE 53N#define INIT$_VOLUME_LIMIT 54 /* Maximum logical volume size */V#define INIT$_GPT 55 /* Create a GUID Partition Table Structure. */N#define INIT$_NO_GPT 56 /* Do not create a GPT */N#define INIT$_ERASE_ON_DELETE 57 /* Set HM2$V_ERASE bit */N#define INIT$_ERASE_ON_INIT 58 /* Perform DSE erase now */X#define INIT$_STRUCTURE_LEVEL_6 59 /* Format in Files-11 level 6 (CFS container) */N#define INIT$_LOGSIZE 60 /* CFS log file size */X#define INIT$_SPECIAL_FILES 61 /* Volume supports special files (ODS-5 only) */S#define INIT$_NO_SPECIAL_FILES 62 /* Volume does not support special files */Z#define INIT$_LAST_INIT_ITEM 63 /* Note add all new INIT items before this one. */N#define INIT$_MAX_ITEM_CODE 62 /* Maximum item code. */N#define INIT$S_USER_NAME 12 /* Max size of user name on volume */N#define INIT$S_DEVICE_NAME 64 /* Max size of device names */N#define INIT$C_MIN_SECURITY_BLKCNT 6 /* Min size of SECURITY.SYS */N#define INIT$C_MIN_GPT_BLKCNT 34 /* Min size of GPT.SYS */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __INITDEF_LOADED */ ww۪/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV 3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $IODEF ***/#ifndef __IODEF_LOADED#define __IODEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* I/O FUNCTION CODE DEFINITIONS */N/*- */N/* */N/* *** START PHYSICAL I/O FUNCTION CODES *** */N/* */N#define IO$_NOP 0 /*NO OPERATION */N#define IO$_UNLOAD 1 /*UNLOAD DRIVE */N#define IO$_LOADMCODE 1 /*LOAD MICROCODE */N#define IO$_START_BUS 1 /*START LAVC BUS */N#define IO$_SEEK 2 /*SEEK CYLINDER  */N#define IO$_SPACEFILE 2 /*SPACE FILES */N#define IO$_STARTMPROC 2 /*START MICROPROCESSOR */N#define IO$_STOP_BUS 2 /*STOP LAVC BUS */N#define IO$_RECAL 3 /*RECALIBRATE DRIVE */N#define IO$_DUPLEX 3 /*ENTER DUPLEX MODE */N#define IO$_STOP 3 /*STOP */N#define IO$_DEF_COMP 3 /*DEFINE NETWORK COMPONENT */N#define IO$_DRVCLR 4 /*DRIVE CLEAR */N#define IO$_INITIALIZE 4 /*INITIALIZE */N#define IO$_MIMIC 4 /*ENTER MIMIC MODE */N#define IO$_DEF_COMP_LIST 4 /*DEFINE NETWORK COMPONENT LIST */N#define IO$_FLUSH_ERROR 4 /*FLUSH SCSI ERRORS */N#define IO$_RELEASE 5  /*RELEASE PORT */N#define IO$_SETCLOCKP 5 /*SET CLOCK (PHYSICAL) */N#define IO$_START_ANALYSIS 5 /*START LAVC FAILURE ANALYSIS */N#define IO$_BIND 5 /*BIND UNITS INTO A STORAGE POOL */N#define IO$_PATH_VERIFY 5 /*VERIFY PATH TO DEVICE */N#define IO$_OFFSET 6 /*OFFSET READ HEADS */N#define IO$_ERASETAPE 6 /*ERASE TAPE  */N#define IO$_STARTDATAP 6 /*START DATA TRANSFER (PHYSICAL) */N#define IO$_STOP_ANALYSIS 6 /*STOP LAVC FAILURE ANALYSIS */N#define IO$_UNBIND 6 /*REMOVE UNITS FROM A STORAGE POOL */N#define IO$_RETCENTER 7 /*RETURN TO CENTERLINE */N#define IO$_QSTOP 7 /*QUEUE STOP REQUEST */N#define IO$_START_MONITOR 7 /*START LAVC CHANNEL MONITOR. */N#define IO$_CREDISK 7 /*CREATE A DISK IN A STORAGE POOL */N#define IO$_LOCAL_DRAIN 7 /*DRAIN LOCAL IO */N#define IO$_PACKACK 8 /*PACK ACKNOWLEDGE */N#define IO$_STOP_MONITOR 8 /*STOP LAVC CHANNEL MONITOR. */N#define IO$_SEARCH 9 /*SEARCH FOR SECTOR */N#define IO$_SPACERECORD 9 /*SPACE RECORDS */N#define IO$_READRCT 9  /*READ REPLACEMENT & CACHING TABLE */N#define IO$_REMDISK 9 /*REMOVE A DISK FROM A STORAGE POOL */N#define IO$_WRITECHECK 10 /*WRITE CHECK DATA */N#define IO$_EXPORT 10 /*EXPORT A DISK FROM A STORAGE POOL */N#define IO$_WRITEPBLK 11 /*WRITE PHYSICAL BLOCK */N#define IO$_READPBLK 12 /*READ PHYSICAL BLOCK */N#define IO$_WRITEHEAD 13 /*WRITE HEADER AND DATA */N#define IO$_RDSTATS 13 /*READ STATISTICS */N#define IO$_CRESHAD 13 /*CREATE A SHADOW SET */N#define IO$_READHEAD 14 /*READ HEADER AND DATA */N#define IO$_ADDSHAD 14 /*ADD MEMBER TO SHADOW SET */N#define IO$_WRITETRACKD 15 /*WRITE TRACK DATA */O#define IO$_COPYSHAD 15 /*PERFORM SHADOW SET COPY OPERATIONS */N#define IO$_READTRACKD 16 /*READ TRACK DATA */N#define IO$_REMSHAD 16 /*REMOVE MEMBER FROM SHADOW SET */N#define IO$_AVAILABLE 17 /*AVAILABLE (DISK AND TAPE CLASS) */N#define IO$_SETPRFPATH 18 /*SET PREFERRED PATH */N#define IO$_DISPLAY 19 /*DISPLAY VOLUME LABEL */N#define IO$_REMSHADMBR 20 /*REMOVE MEMBER FROM SHADOW SET */N#define IO$_DSE 21  /*DATA SECURITY ERASE (AND REWIND) */N#define IO$_REREADN 22 /*REREAD NEXT */N#define IO$_DISK_COPY_DATA 22 /*DISK_COPY_DATA */N#define IO$_MOUNTSHAD 23 /*CREATE A SHADOW SET */N#define IO$_REREADP 23 /*REREAD PREVIOUS */N#define IO$_WHM 23 /*WRITE HISTORY MANAGEMENT */N#define IO$_AS_SETCHAR 23 /*ASIAN SET CHARACTERISTICS */N#define IO$_WRITERET 24 /*WRITE RETRY */N#define IO$_WRITECHECKH 24 /*WRITE CHECK HEADER AND DATA */N#define IO$_AS_SENSECHAR 24 /*ASIAN SENSE CHARACTERISTICS */N#define IO$_ADDSHADMBR 25 /*ADD MEMBER TO SHADOW SET */N#define IO$_READPRESET 25 /*READIN PRESET */N#define IO$_STARTSPNDL 25 /*START SPINDLE */N#define IO$_SETCHAR 26 /*SET CHARACTERISTICS */N#define IO$_SENSECHAR 27 /*SENSE TAPE CHARACTERISTICS */N#define IO$_WRITEMARK 28 /*WRITE TAPE MARK */N#define IO$_COPYMEM 28 /*COPY MEMORY */N#define IO$_PSXSETCHAR 28 /*POSIX SET CHARACTERISTICS */N#define IO$_WRTTMKR 29 /*WRITE TAPE MARK RETRY */N#define IO$_DIAGNOSE 29  /*DIAGNOSE */N#define IO$_SHADMV 29 /*PREFORM MOUNT VER. ON SHADOW SET */N#define IO$_PSXSENSECHAR 29 /*POSIX SENSE CHARACTERISTICS */N#define IO$_FORMAT 30 /*FORMAT */N#define IO$_CLEAN 30 /*CLEAN TAPE */N#define IO$_UPSHAD 30 /*UPDATE SHADOW SYSDEVICE */P#define IO$_PHYSICAL 31 /*HIGHEST PHYSICAL I/O FUNCTION CODE */N/* */N/* *** START LOGICAL I/O FUNCTION CODES *** */N/* */N#define IO$_WRITELBLK 32 /*WRITE LOGICAL BLOCK */N#define IO$_READLBLK 33 /*READ LOGICAL BLOCK */N#define IO$_REWINDOFF 34 /*REWIND AND SET OFFLINE */N#define IO$_READRCTL 34 /*READ RCT SECTOR ZERO */N#define IO$_SETMODE 35 /*SET MODE */N#define IO$_REWIND 36 /*REWIND TAPE */N#define IO$_SKIPFILE 37 /*SKIP FILES */N#define IO$_PSXSETMODE 37 /*POSIX SET MODE */N#define IO$_SKIPRECORD 38 /*SKIP RECORDS */N#define IO$_PSXSENSEMODE 38 /*POSIX SENSE MODE */N#define IO$_SENSEMODE 39 /*SENSE TAPE MODE */N#define IO$_WRITEOF 40 /*WRITE END OF FILE */S#define IO$_TTY_PORT_BUFIO 40 /*BUFFERED I/O TERMINAL PORT FDT ROUTINE */N#define IO$_TTY_PORT 41 /*TERMINAL PORT FDT ROUTINE */N#define IO$_FREECAP 41 /*RETURN FREE CAPACITY */N#define IO$_FLUSH 42 /*FLUSH CONTROLLER CACHE */N#define IO$_AS_SETMODE 42 /*ASIAN SET MODE */N#define IO$_READLCHUNK 43 /*READ LARGE LOGICAL BLOCK */N#define IO$_AS_SENSEMODE 43 /*ASIAN SENSE MODE */N#define IO$_WRITELCHUNK 44 /*WRITE LARGE LOGICAL BLOCK */O#define IO$_LOGICAL 47 /*HIGHEST LOGICAL I/O FUNCTION CODE */N/*  */N/* *** START VIRTUAL I/O FUNCTION CODES */N/* */N/* NOTE: */R/* Virtual IO operations to a non-file oriented device require that the process */N/* has READ access priviledges for that device. Specificly, EXE$QIO calls */N/* EXE$CHECK_DEVICE_ACCESS for the following virtual IO function codes to */N/* verify that the the process has read access rights: */N/* READPBLK,READLBLK,READVBLK, READHEAD,READTRACKD,REREADN,REREADP, */N/* READPROMPT,TTYREADALL,TTYREADPALL */N#define IO$_WRITEVBLK 48 /*WRITE VIRTUAL BLOCK */N#define IO$_READVBLK 49 /*READ VIRTUAL BLOCK */N#define IO$_ACCESS 50 /*ACCESS FILE */N#define IO$_PSXWRITEVBLK 50  /*POSIX WRITE VIRTUAL */N#define IO$_CREATE 51 /*CREATE FILE */N#define IO$_DEACCESS 52 /*DEACCESS FILE */N#define IO$_PSXREADVBLK 52 /*POSIX READ VIRTUAL */N#define IO$_DELETE 53 /*DELETE FILE */N#define IO$_MODIFY 54 /*MODIFY FILE */N#define IO$_NETCONTROL 54 /*X25 NETWORK CONTROL FUNCTION */N#define IO$_READPROMPT 55 /*READ TERMINAL WITH PROMPT */N#define IO$_SETCLOCK 55 /*SET CLOCK */N#define IO$_AUDIO 55 /*CD-ROM AUDIO */N#define IO$_ACPCONTROL 56 /*MISCELLANEOUS ACP CONTROL */N#define IO$_STARTDATA 56 /*START DATA */N#define IO$_IOCTLV 56 /*GENERIC UNIX IOCTL FUNCTIONS */N#define IO$_MANAGE 56 /*MANAGE DEVICE */N#define IO$_MOUNT 57 /*MOUNT VOLUME */N#define IO$_TTYREADALL 58 /* TERMINAL READ PASSALL */N#define IO$_DISMOUNT 58 /* F64 dismount */N#define IO$_TTYREADPALL 59 /* TERM READ W/PROMPT PASSALL */N#define IO$_USBATTR 59 /* USB device attributes */N#define IO$_CONINTREAD 60  /* Connect to interrupt readonly */N#define IO$_CONINTWRITE 61 /* Connect to interrupt with write */N#define IO$_READDIR 62 /*READ DIRECTORY CONTENTS */N#define IO$_VIRTUAL 63 /*HIGHEST VIRTUAL I/O FUNCTION */N/* */N/* FUNCTION MODIFIER BIT DEFINITIONS */N/*  */#define IO$M_FCODE 0x3F#define IO$M_FMODIFIERS 0xFFC0#define IO$M_INHERLOG 0x800#define IO$M_ERASE 0x400#define IO$M_EXFUNC 0x2000#define IO$M_DATACHECK 0x4000#define IO$M_INHRETRY 0x8000#define IO$M_SYNCSTS 0x10000#define IO$M_NOVCACHE 0x20000#define IO$M_BUFOBJ 0x40000#define IO$M_TRUSTED 0x80000 #define IO$M_FILE_FLUSH 0x100000#define IO$M_BARRIER 0x200000#define IO$M_RAH_HINT 0x400000#define IO$M_INHSEEK 0x1000!#define IO$M_READ_TO_EOF 0x200000#define IO$M_REVERSE 0x40#define IO$M_NOWAIT 0x80#define IO$M_INHEXTGAP 0x1000#define IO$M_RETENSION 0x2000#define IO$M_ALLOWFAST 0x4000#define IO$M_MT3_DENSITY 0x8000#define IO$M_MSCPMODIFS 0x100#define IO$M_SHADOW 0x40#define IO$M_LOCATE 0x80#define IO$M_MSCP_FORMAT 0x40#define IO$M_ALLHOSTS 0x40#define IO$M_DISSOLVE 0x80#define IO$M_NOCLEANUP 0x100#define IO$M_SPINDOWN 0x40#define IO$M_EST_COM_PATH 0x40#define IO$M_LCL_SRC_UNIT 0x80#define IO$M_RTN_COM_PATH 0x100#define IO$M_DEALC_ALL 0x40#define IO$M_DEALC_HRN 0x80#define IO$M_DEALC_ENTLOC 0x100#define IO$M_DECR_AFC 0x200#define IO$M_READ_ALL 0x400#define IO$M_READ_HRN 0x800#define IO$M_BREAK_CONN 0x1000#define IO$M_STEPOVER 0x40#define IO$M_COPYOP 0x100#define IO$M_EXISTS 0x40#define IO$M_CBS 0x80#define IO$M_BOOTING 0x100#define IO$M_REQ_MINICOPY 0x200#define IO$M_OPT_MINICOPY 0x400#define IO$M_NOMINICOPY 0x800%#define IO$M_EXPECT_MOUNT_DONE 0x2000#define IO$M_VUEX_FC 0x200#define IO$M_WRITE_SCB 0x200#define IO$M_UPD_SCBLBN 0x2000#define IO$M_FORCEPATH 0x40#define IO$M_PREFERRED_CPU 0x80!#define IO$M_SYS_ASSIGNABLE 0x100#define IO$M_COMMOD 0x40#define IO$M_MOVETRACKD 0x80#define IO$M_DIAGNOSTIC 0x100#define IO$M_SKPSECINH 0x200#define IO$M_DELDATA 0x40#define IO$M_NOMRSP 0x40#define IO$M_SWAP 0x100#define IO$M_OPPOSITE 0x200#define IO$M_CLSEREXCP 0x200#define IO$M_CHUNKDIAG 0x40#define IO$M_TBC 0x400#define IO$M_ENAREP 0x40#define IO$M_ACCESS 0x40#define IO$M_CREATE 0x80#define IO$M_DELETE 0x100#define IO$M_MOUNT 0x200#define IO$M_DMOUNT 0x400#define IO$M_REMOUNT 0x800#define IO$M_MOVEFILE 0x1000#define IO$M_RWSHELVED 0x4000#define IO$M_SETDIR 0x8000#define IO$M_BINARY 0x40#define IO$M_PACKED 0x80#define IO$M_NOW 0x40#define IO$M_STREAM 0x80#define IO$M_READERCHECK 0x100#define IO$M_WRITERCHECK 0x200#define IO$M_NORSWAIT 0x400 #define IO$M_MB_ROOM_NOTIFY 0x40#define IO$M_READATTN 0x80#define IO$M_WRTATTN 0x100#define IO$M_SETPROT 0x200#define IO$M_READERWAIT 0x400#define IO$M_WRITERWAIT 0x800#define IO$M_NOECHO 0x40#define IO$M_TIMED 0x80#define IO$M_CVTLOW 0x100#define IO$M_NOFILTR 0x200#define IO$M_DSABLMBX 0x400#define IO$M_PURGE 0x800#define IO$M_TRMNOECHO 0x1000#define IO$M_REFRESH 0x2000#define IO$M_ESCAPE 0x4000#define IO$M_EXTEND 0x8000#define IO$M_CANCTRLO 0x40#define IO$M_ENABLMBX 0x80#define IO$M_NOFORMAT 0x100#define IO$M_BREAKTHRU 0x200#define IO$M_NEWLINE 0x400#define IO$M_TYPEAHDCNT 0x40#define IO$M_MAINT 0x40#define IO$M_CTRLYAST 0x80#define IO$M_CTRLCAST 0x100#define IO$M_HANGUP 0x200#define IO$M_OUTBAND 0x400#define IO$M_TT_CONNECT 0x800#define IO$M_TT_DISCON 0x1000#define IO$M_TT_PROCESS 0x2000#define IO$M_BRDCST 0x4000#define IO$M_LOOP 0x80#define IO$M_UNLOOP 0x100#define IO$M_LINE_OFF 0x200#define IO$M_SET_MODEM 0x400#define IO$M_LINE_ON 0x800#define IO$M_LOOP_EXT 0x1000#define IO$M_AUTXOF_ENA 0x2000#define IO$M_AUTXOF_DIS 0x4000#define IO$M_INCLUDE 0x800#define IO$M_TT_ABORT 0x1000#define IO$M_POSIXINIT 0x40#define IO$M_POSIXFLOW 0x80#define IO$M_SET_POSIX 0x80#define IO$M_CLEAR_POSIX 0x100#define IO$M_SET_TERMIOS 0x200#define IO$M_SET_PTC 0x400#define IO$M_CLEAR_PTC 0x800#define IO$M_FLUSH_TAB 0x1000 #define IO$M_FLUSH_OUTPUT 0x2000#define IO$M_UPDATE_PTC 0x4000#define IO$M_OUT_XOFF 0x100#define IO$M_OUT_XON 0x200#define IO$M_IN_XOFF 0x400#define IO$M_IN_XON 0x800#define IO$M_O_NONBLOCK 0x40#define IO$M_INTERRUPT 0x40#define IO$M_MULTIPLE 0x80#define IO$M_LOCKBUF 0x100#define IO$M_NOBLOCK 0x200#define IO$M_ABORT 0x100#define IO$M_SYNCH 0x200#define IO$M_RESPONSE 0x40#define IO$M_STARTUP 0x40#define IO$M_SHUTDOWN 0x80#define IO$M_ATTNAST 0x100#define IO$M_CTRL 0x200#define IO$M_SET_MAC 0x800#define IO$M_UPDATE_MAP 0x1000#define IO$M_ROUTE 0x2000#define IO$M_RD_MEM 0x40 #define IO$M_RD_MODEM 0x80#define IO$M_RD_COUNT 0x100#define IO$M_CLR_COUNT 0x400#define IO$M_SENSE_MAC 0x800#define IO$M_SHOW_MAP 0x1000#define IO$M_SHOW_ROUTE 0x2000N#define IO$K_SRRUNOUT 0 /* Send or rcv until cnt runout */N#define IO$K_PTPBSC 8192 /* Point to point BSC control */N#define IO$K_LOOPTEST 57344 /* Loop test */N/* X25 driver WRITEBLK function modifier bits. */#define IO$M_MORE 0x40#define IO$M_QUALIFIED 0x80#define IO$M_REDIRECT 0x40#define IO$M_ACCEPT 0x80#define IO$M_SETEVF 0x40#define IO$M_WORD 0x40#define IO$M_SETFNCT 0x200#define IO$M_DATAPATH 0x400#define IO$M_CYCLE 0x1000#define IO$M_RESET 0x2000#define IO$M_SETCUADR 0x100#define IO$M_SETBSIZE 0x200#define IO$M_SETPOOLSZ 0x400#define IO$M_SETENQCNT 0x800#define IO$M_CLEAR 0x1000#define IO$M_LPBEXT 0x2000#define IO$M_LPBINT 0x4000#define IO$M_READCSR 0x8000#defin e IO$M_NOCTSWAIT 0x40#define IO$M_SLAVLOOP 0x80#define IO$M_NODSRWAIT 0x100#define IO$M_MAINTLOOP 0x200#define IO$M_LASTBLOCK 0x400#define IO$M_INTCLOCK 0x1000#define IO$M_LT_CONNECT 0x40#define IO$M_LT_DISCON 0x80#define IO$M_LT_READPORT 0x100#define IO$M_LT_MAP_PORT 0x200#define IO$M_LT_RATING 0x400#define IO$M_LT_SOL_INFO 0x800#define IO$M_LT_RCV_INFO 0x1000#define IO$M_LT_SETMODE 0x2000 #define IO$M_LT_SENSEMODE 0x4000$#define IO$M_LT_QUE_CHG_NOTIF 0x8000#define IO $M_LT_MAP_FILLER 0x1#define IO$M_LT_MAP_NODNAM 0x2#define IO$M_LT_MAP_PORNAM 0x4#define IO$M_LT_MAP_SRVNAM 0x8#define IO$M_LT_MAP_LNKNAM 0x10#define IO$M_LT_MAP_NETADR 0x20#define IO$M_FLUSH 0x40#define IO$M_WRITE_BARRIER 0x80#define IO$M_MKFILL1 0x40!#define IO$M_ALLOWFAST_NEVER 0x80##define IO$M_ALLOWFAST_PER_IO 0x100##define IO$M_ALLOWFAST_ALWAYS 0x200#define IO$M_ADD 0x40#define IO$M_IDSTRING 0x40#define IO$M_SERIALNUM 0x80"#define IO$M_BYPASS_VALID_CHK 0x80 #ifdef __NEW_STARLETtypedef union _iodef {N/* Basic I/O function code/modifiers structure */ __struct {N unsigned io$v_fcode : 6; /* Function Code Field */N unsigned io$v_fmodifiers : 10; /* Function Modifiers Field */ } io$r_fcode_structure;N/* Function modifiers common to all drivers which do error logging */ __struct {' unsigned io$v_fcode_fill_1 : 6;# unsigned io$v_fill er_1 : 5;N unsigned io$v_inherlog : 1; /* Inhibit error logging */# unsigned io$v_fill_20_ : 4; } io$r_errlog_modifiers;N/* General disk and tape function code modifiers */ __struct {' unsigned io$v_fcode_fill_2 : 6;/ unsigned io$v_rsvd_for_devdepend_1 : 4;N unsigned io$v_erase : 1; /* Erase data */N unsigned io$v_filler_2 : 1; /* IO$M_INHERLOG   *// unsigned io$v_rsvd_for_devdepend_2 : 1;N unsigned io$v_exfunc : 1; /* func<31:16> are valid */N unsigned io$v_datacheck : 1; /* Write check data after transfer */N unsigned io$v_inhretry : 1; /* Inhibit error retry */N/* the following are only valid if EXFUNC is set */N unsigned io$v_syncsts : 1; /* allow synchronous completion */N unsigned io$v_novcache : 1; /* do not use VBN cache */N unsigned io$v_bufobj : 1; /* Buffer object I/O */N unsigned io$v_trusted : 1; /* I/O from trusted component */N unsigned io$v_file_flush : 1; /* Flush file to disk */N unsigned io$v_barrier : 1; /* Insert a barrier after the write */N unsigned io$v_rah_hint : 1; /* Readahead hint (used by XFC) */# unsigned io$v_fill_21_ : 1;# } io$r_disk_tape_modifiers; N/* General disk function code modifiers */ __struct {' unsigned io$v_fcode_fill_3 : 6;/ unsigned io$v_rsvd_for_devdepend_3 : 6;X unsigned io$v_inhseek : 1; /* Inhibit implied seek on physical functions */# unsigned io$v_fill_22_ : 3; } io$r_disk_modifiers;N/* General disk READ function code modifiers */ __struct {V unsigned io$v_filler_2a : 21; /* Fill to overl ay READ_TO_EOF with BARRIER */N/* the following are only valid if EXFUNC is set */N unsigned io$v_read_to_eof : 1; /* Reserved for Internal Use only. */# unsigned io$v_fill_23_ : 2;# } io$r_disk_read_modifiers;N/* General tape function code modifiers */ __struct {' unsigned io$v_fcode_fill_4 : 6;N unsigned io$v_reverse : 1; /* Reverse operation */N unsigned io$v_nowait : 1; /* No wait for rewind to complete *// unsigned io$v_rsvd_for_devdepend_4 : 4;P unsigned io$v_inhextgap : 1; /* Inhibit extended inter-record gap */k unsigned io$v_retension : 1; /* Traverse the entire tape to uniformly set the tape's tension. */N/* Applies only to IO$_REWIND/REWINDOFF functions */W unsigned io$v_allowfast : 1; /* Allow fast skip by filemarks when enabled */N/* Applies only to IO$_SKIPFILE /SPACEFILE functions */j unsigned io$v_mt3_density : 1; /* Density Setmode and Sensemode for MTD enhanced tape drivers. */ } io$r_tape_modifiers;N/* DU & TU, disk & tape class driver transfer function modifier bits */ __struct {' unsigned io$v_fcode_fill_5 : 6;) unsigned io$v_dutux_reserved : 2;N unsigned io$v_mscpmodifs : 1; /* Use MSCP modifiers in P5 */# unsigned io$v_fill_24_ : 7;# } io$r_d utu_xfer_modifiers; __struct {' unsigned io$v_fcode_fill_6 : 6;N unsigned io$v_shadow : 1; /* Shadowing SENSECHAR */N unsigned io$v_locate : 1; /* Shadowing Locate function */" } io$r_du_sense_modifiers; __struct {' unsigned io$v_fcode_fill_7 : 6;N unsigned io$v_mscp_format : 1; /* PACKACK media for formatting */# unsigned io$v_fill_25_ : 1;$ } io$r_du_packack_modifiers; __struct  {' unsigned io$v_fcode_fill_8 : 6;S unsigned io$v_allhosts : 1; /* Do available as for all class drivers */N unsigned io$v_dissolve : 1; /* Dissolve shadow set */U unsigned io$v_nocleanup : 1; /* Normal shadow set cleanup not necessary */# unsigned io$v_fill_26_ : 7;" } io$r_du_avail_modifiers; __struct {' unsigned io$v_fcode_fill_9 : 6;N unsigned io$v_spindown : 1; /* Spin down removed member  */# unsigned io$v_fill_27_ : 1;$ } io$r_du_remshad_modifiers; __struct {( unsigned io$v_fcode_fill_11 : 6;N unsigned io$v_est_com_path : 1; /* Establish Communication Path */N unsigned io$v_lcl_src_unit : 1; /* Local Source Unit */N unsigned io$v_rtn_com_path : 1; /* Retain Communication Path */# unsigned io$v_fill_28_ : 7; } io$r_du_dcd_modifiers; __struct {( unsigned io$v_fcode_fill_12 : 6;N unsigned io$v_dealc_all : 1; /* Deallocate All */Q unsigned io$v_dealc_hrn : 1; /* Deallocate by Host Reference Number */N unsigned io$v_dealc_entloc : 1; /* Deallocate by Entry Locator */P unsigned io$v_decr_afc : 1; /* Decrement Allocation Failure Count */N unsigned io$v_read_all : 1; /* Read All */N unsigned io$v_read_hrn : 1; /* Read by Host Reference Number */N unsigned io$v_break_conn : 1; /* Break Connection */# unsigned io$v_fill_29_ : 3; } io$r_du_whm_modifiers;N/* HBS driver transfer function modifier bits */N/* Make sure that IO$V_SHADOW .ne. IO$V_LOCATE .ne. IO$V_COPYOP */ __struct {( unsigned io$v_fcode_fill_13 : 6;N unsigned io$v_stepover : 1; /* Stepover SCBLBN. */" unsigned io$v_cs_fill : 1;N unsigned io$v_copy op : 1; /* Shad Server Cpy Operation */# unsigned io$v_fill_30_ : 7;& } io$r_hbs_copyshad_modifiers; __struct {( unsigned io$v_fcode_fill_14 : 6;N unsigned io$v_exists : 1; /* VU already exists. */N unsigned io$v_cbs : 1; /* Controller based shadowing. */N unsigned io$v_booting : 1; /* Creshad for system disk. */N unsigned io$v_req_minicopy : 1; /* MINICOPY required  */N unsigned io$v_opt_minicopy : 1; /* MINICOPY optional */N unsigned io$v_nominicopy : 1; /* NOMINICOPY */$ unsigned io$v_hbvs_fill : 1;X unsigned io$v_expect_mount_done : 1; /* All SSMs on command line sent to HBVS */# unsigned io$v_fill_31_ : 2;% } io$r_hbs_creshad_modifiers; __struct {( unsigned io$v_fcode_fill_15 : 9;N unsigned io$v_vuex_fc : 1; /* Exclude Full copy members  */# unsigned io$v_fill_32_ : 6;" } io$r_hbs_xfer_modifiers; __struct {( unsigned io$v_fcode_fill_54 : 9;N unsigned io$v_write_scb : 1; /* Write the SCB */N unsigned io$v_filler_hbvs_1 : 3; /* */T unsigned io$v_upd_scblbn : 1; /* Update HVBS on new location of the SCB */# unsigned io$v_fill_33_ : 2;! } io$r_hbs_scb_modifiers;N/* Function modifier bits for Set Preferred Pa th. */ __struct {( unsigned io$v_fcode_fill_10 : 6;N/* No modifiers set, passes in a preferred path (DUDRIVER) */P unsigned io$v_forcepath : 1; /* Make path change happen (DUDRIVER) */_ unsigned io$v_preferred_cpu : 1; /* Set Fast Path CPU affinity of port (port driver) */N unsigned io$v_sys_assignable : 1; /* system assignable port */# unsigned io$v_fill_34_ : 7;! } io$r_prfpath_modifiers; N/* DR driver function modifier bits. */ __struct {( unsigned io$v_fcode_fill_16 : 6;N unsigned io$v_commod : 1; /* Diagnostic command */N unsigned io$v_movetrackd : 1; /* Move track descriptor */N unsigned io$v_diagnostic : 1; /* Diagnostic function */N unsigned io$v_skpsecinh : 1; /* Skip sector inhibit */# unsigned io$v_fill_35_ : 6;  } io$r_dr_modifiers;N/* DY driver function modifier bits. */ __struct {( unsigned io$v_fcode_fill_17 : 6;N unsigned io$v_deldata : 1; /* Write deleted data mark */# unsigned io$v_fill_36_ : 1; } io$r_dy_modifiers;N/* DD driver (TU58) function modifier bits. */ __struct {( unsigned io$v_fcode_fill_18 : 6;P unsigned io$v_nomrsp : 1; /* Do not use MRSP for this operation */# unsigned io$v_fill_37_ : 1; } io$r_dd_modifiers;N/* Magnetic tape I/O function modifier bits for the TS11. */ __struct {( unsigned io$v_fcode_fill_19 : 6;/ unsigned io$v_rsvd_for_devdepend_5 : 2;N unsigned io$v_swap : 1; /* Swap byte (TS11) */N unsigned io$v_opposite : 1; /* Opposite bit for rereads (TS11) */# unsigned io$v_fill_38_ : 6; } io$r_ts11_mo difiers;N/* TU driver function modifier bits */ __struct {( unsigned io$v_fcode_fill_20 : 6;/ unsigned io$v_rsvd_for_devdepend_6 : 3;O unsigned io$v_clserexcp : 1; /* Clear serious exception condition */# unsigned io$v_fill_39_ : 6; } io$r_tu_modifiers;N/* Tape class driver segmented and large transfer modifier bits */ __struct {( unsigned io$v_fcode_fill_21 : 6;N unsigned  io$v_chunkdiag : 1; /* Allow diagnostic buffers *// unsigned io$v_rsvd_for_devdepend_7 : 3;N unsigned io$v_tbc : 1; /* To be continued modifier */# unsigned io$v_fill_40_ : 5;( } io$r_tu_lg_transfer_modifiers;N/* TUDRIVER SETMODE function modifier bits. */ __struct {( unsigned io$v_fcode_fill_22 : 6;N unsigned io$v_enarep : 1; /* Enable media quality */# unsi !gned io$v_fill_41_ : 1;$ } io$r_tu_setmode_modifiers;N/* reporting. */N/* ACP function modifier bits. */ __struct {( unsigned io$v_fcode_fill_23 : 6;N unsigned io$v_access : 1; /* Access file */N unsigned io$v_create : 1; /* Create file */N unsigned io$v_delete : 1; /* Delete file " */N unsigned io$v_mount : 1; /* Mount volume */N unsigned io$v_dmount : 1; /* Dismount volume */N unsigned io$v_remount : 1; /* Remount volume */N unsigned io$v_movefile : 1; /* Move a file */N unsigned io$v_filler_8 : 1; /* Used for EXFUNC */N unsigned io$v_rwshelved : 1; /* Access shelved files */N #unsigned io$v_setdir : 1; /* Set file as a directory */N/* Bit 19 used for TRUSTED */ } io$r_acp_modifiers;N/* CR (card reader) driver function modifier bits. */ __struct {( unsigned io$v_fcode_fill_24 : 6;N unsigned io$v_binary : 1; /* Binary read */N unsigned io$v_packed : 1; /* Packed read */ } io$r_cr_modi $fiers;N/* MB (mailbox) driver function modifier bits. */N/* The following modifers are for the QIO READ, WRITE and SENSEMODE */N/* functions. */ __struct {( unsigned io$v_fcode_fill_25 : 6;P unsigned io$v_now : 1; /* Do not wait for operation complete */] unsigned io$v_stream : 1; /* Perform stream mode operation (vs. record mode) */n unsigned io$%v_readercheck : 1; /* Perform operation if no read channel is assigned to the mailbox. */o unsigned io$v_writercheck : 1; /* Perform operation if no write channel is assigned to the mailbox. */N unsigned io$v_norswait : 1; /* Do not allow resource waits */N/* Bit 13 used for EXFUNC */N/* Bit 19 used for TRUSTED */# unsigned io$v_fill_42_ : 5; } io$r_mb_modi &fiers;N/* More MB (mailbox) driver function modifier bits. */N/* Mailbox QIO SETMODE function modifiers. */ __struct {( unsigned io$v_fcode_fill_26 : 6;i unsigned io$v_mb_room_notify : 1; /* Notify when some (any) space in the mailbox is available. */N unsigned io$v_readattn : 1; /* Request ast on waiting reader */N unsigned io$v_wrtattn : 1; /* Request ast on waiting writer */N un 'signed io$v_setprot : 1; /* Set volume protection */d unsigned io$v_readerwait : 1; /* Wait for a read channel to be assigned to the mailbox. */e unsigned io$v_writerwait : 1; /* Wait for a write channel to be assigned to the mailbox. */# unsigned io$v_fill_43_ : 4;$ } io$r_mb_setmode_modifiers;N/* TT driver READ function modifier bits. */ __struct {( unsigned io$v_fcode_fill_27 : 6;N unsign(ed io$v_noecho : 1; /* Noecho */N unsigned io$v_timed : 1; /* Timed */N unsigned io$v_cvtlow : 1; /* Convert lower case */N unsigned io$v_nofiltr : 1; /* No filter */N unsigned io$v_dsablmbx : 1; /* Disable mailbox */N unsigned io$v_purge : 1; /* Purge typeahead */N unsigned io$v_trmnoecho : 1; )/* Terminators are not echoed */N unsigned io$v_refresh : 1; /* Control-R interrupted read */O unsigned io$v_escape : 1; /* Terminate read on escape sequence */N unsigned io$v_extend : 1; /* Used by alternate class drivers */! } io$r_tt_read_modifiers;N/* TT driver WRITE function modifier bits. */ __struct {( unsigned io$v_fcode_fill_28 : 6;N unsigned io$v_canctrlo : 1; /* Cance *l control O */N unsigned io$v_enablmbx : 1; /* Enable mailbox */N unsigned io$v_noformat : 1; /* Do not format output */N unsigned io$v_breakthru : 1; /* Broadcast I/O */N unsigned io$v_newline : 1; /* Output a newline */# unsigned io$v_fill_44_ : 5;" } io$r_tt_write_modifiers;N/* TT driver SENSEMODE function modifier bits. */ + __struct {( unsigned io$v_fcode_fill_29 : 6;N unsigned io$v_typeahdcnt : 1; /* Sense typeahead information */+ unsigned io$v_reserve_rd_modem : 1;& } io$r_tt_sensemode_modifiers;N/* TT driver SETMODE subfunction modifier bits. */ __struct {( unsigned io$v_fcode_fill_30 : 6;N unsigned io$v_maint : 1; /* Enable maint sub modifiers */N unsigned io$v_ctrlyast : 1; /* Set control Y AST, */N unsigned io$v_ctrlcast : 1; /* Set Control C */N unsigned io$v_hangup : 1; /* Set mode and hang up line */N unsigned io$v_outband : 1; /* Set out of band AST */N unsigned io$v_tt_connect : 1; /* Connect to detached terminal */N unsigned io$v_tt_discon : 1; /* Disconnect detached terminal */N unsigned io$v_tt_process : 1; /* Define controlling process */N - unsigned io$v_brdcst : 1; /* Define broadcast mask */# unsigned io$v_fill_45_ : 1;$ } io$r_tt_setmode_modifiers;N/* TT driver MAINTIANCE subfunction submodifier bits. */ __struct {( unsigned io$v_fcode_fill_31 : 6;1 unsigned io$v_reserve_maint_escape_1 : 1;N unsigned io$v_loop : 1; /* Diagnostic loopback */N unsigned io$v_unloop : 1; /* Diagnostic reset loopback */N . unsigned io$v_line_off : 1; /* Disable line */N unsigned io$v_set_modem : 1; /* Diagnostic modem control */N unsigned io$v_line_on : 1; /* Enable line */N unsigned io$v_loop_ext : 1; /* Diagnostic external loopback */N unsigned io$v_autxof_ena : 1; /* Enable auto XOFF */N unsigned io$v_autxof_dis : 1; /* Disable auto XOFF */. unsigned io$v_reserve_ /int_disable : 1;" } io$r_tt_maint_modifiers;N/* TT driver out-of-band modifier bits. */ __struct {( unsigned io$v_fcode_fill_32 : 6;1 unsigned io$v_reserve_maint_escape_2 : 5;N unsigned io$v_include : 1; /* Include character in stream */N unsigned io$v_tt_abort : 1; /* Abort current I/O */# unsigned io$v_fill_46_ : 3;& } io$r_tt_outofband_modifiers;N/* Posix terminal driv 0er SETMODE subfunction modifier bits. */ __struct {( unsigned io$v_fcode_fill_33 : 6;P unsigned io$v_posixinit : 1; /* Enable initialization subfunctions */N unsigned io$v_posixflow : 1; /* Enable flow control subfunctions */' } io$r_tt_psxsetmode_modifiers;N/* Posix terminal driver INIT subfunction submodifier bits. */ __struct {( unsigned io$v_fcode_fill_34 : 6;. unsigned io$v_reserve_init_escape : 11;N unsigned io$v_set_posix : 1; /* Set TT3$M_POSIX and set up PTC */Q unsigned io$v_clear_posix : 1; /* Clear TT3$M_POSIX (opt. delete PTC) */N unsigned io$v_set_termios : 1; /* Set up termios */N unsigned io$v_set_ptc : 1; /* Set up all of PTC */N unsigned io$v_clear_ptc : 1; /* clear PTC */N unsigned io$v_flush_tab : 1; /* flush typeahead buffer */N unsigned i 2o$v_flush_output : 1; /* flush outstanding writes */N unsigned io$v_update_ptc : 1; /* update PTC */# unsigned io$v_fill_47_ : 1;& } io$r_tt_posixinit_modifiers;N/* Posix terminal driver FLOW subfunction submodifier bits. */ __struct {( unsigned io$v_fcode_fill_35 : 6;. unsigned io$v_reserve_flow_escape : 2;N unsigned io$v_out_xoff : 1; /* Simulate output XOFF */N unsigned i 3o$v_out_xon : 1; /* Simulate output XON */N unsigned io$v_in_xoff : 1; /* Simulate input XOFF */N unsigned io$v_in_xon : 1; /* Simulate input XON */# unsigned io$v_fill_48_ : 4;& } io$r_tt_posixflow_modifiers;N/* Posix terminal driver READ function modifier bits. */ __struct {( unsigned io$v_fcode_fill_36 : 6;N unsigned io$v_o_nonblock : 1; /* Nonblock 4 */# unsigned io$v_fill_49_ : 1;$ } io$r_tt_psxread_modifiers;N/* Network WRITE and READ VIRTUAL function modifier bits. */ __struct {( unsigned io$v_fcode_fill_37 : 6;N unsigned io$v_interrupt : 1; /* Interrupt message */N unsigned io$v_multiple : 1; /* Multiple write/read request */N unsigned io$v_lockbuf : 1; /* Direct I/O request */N unsigned io$v_noblock : 1; 5 /* Segment message w/o blocking */N/* Bit 13 used for EXFUNC */N/* Bit 19 used for TRUSTED */# unsigned io$v_fill_50_ : 6;( } io$r_net_write_read_modifiers;N/* Network ACCESS/DEACCESS function modifier bits. */ __struct {( unsigned io$v_fcode_fill_38 : 6;# unsigned io$v_reserved : 2;N unsigned io$v_abort : 1; /* D 6isconnect abort/connect reject */N unsigned io$v_synch : 1; /* Synchronous disconnect */# unsigned io$v_fill_51_ : 6;$ } io$r_net_accdea_modifiers;N/* DATALINK driver WRITE subfunction modifier bits. */ __struct {( unsigned io$v_fcode_fill_39 : 6;P unsigned io$v_response : 1; /* Transmit this packet as a response */# unsigned io$v_fill_52_ : 1;% } io$r_dlink_write_modifiers;N/* DATALINK dr 7iver SETMODE subfunction modifier bits. */ __struct {( unsigned io$v_fcode_fill_40 : 6;N unsigned io$v_startup : 1; /* Start protocol */N unsigned io$v_shutdown : 1; /* Stop protocol */N unsigned io$v_attnast : 1; /* Attention AST */S unsigned io$v_ctrl : 1; /* Controller (ie. not station) function */, unsigned io$v_reserve_set_modem : 1;N 8unsigned io$v_set_mac : 1; /* Set MAC parameters */N unsigned io$v_update_map : 1; /* Functional Addr Map */N unsigned io$v_route : 1; /* Source Routing Ops */# unsigned io$v_fill_53_ : 2;' } io$r_dlink_setmode_modifiers;N/* DATALINK driver SENSEMODE subfunction modifier bits. */ __struct {( unsigned io$v_fcode_fill_41 : 6;N unsigned io$v_rd_mem : 1; /* Read device9 memory */N unsigned io$v_rd_modem : 1; /* Read modem status */N unsigned io$v_rd_count : 1; /* Read counters */' unsigned io$v_reserve_ctrl : 1;N unsigned io$v_clr_count : 1; /* Clear counters */N unsigned io$v_sense_mac : 1; /* Sense MAC parameters */N unsigned io$v_show_map : 1; /* Functional Addr Map */N unsigned io$v_show_route : 1; : /* Source Routing Ops */# unsigned io$v_fill_54_ : 2;) } io$r_dlink_sensemode_modifiers; __struct {( unsigned io$v_fcode_fill_42 : 6;N unsigned io$v_more : 1; /* More data follows (M-bit) */O unsigned io$v_qualified : 1; /* Use qualified sub-channel (Q-bit) */# } io$r_x25_write_modifiers;N/* X25 driver ACCESS function modifier bits. */ __struct {( unsigned io$v_fc ;ode_fill_43 : 6;N unsigned io$v_redirect : 1; /* Redirect virtual call */N unsigned io$v_accept : 1; /* Accept virtual call */$ } io$r_x25_access_modifiers;N/* LPA-11 driver STARTDATA modifier bits. */ __struct {( unsigned io$v_fcode_fill_44 : 6;N unsigned io$v_setevf : 1; /* Set event flag */# unsigned io$v_fill_55_ : 1;# } io$r_lpa_start_modifie <rs;N/* XA (DR11-W) driver function modifier bits. */ __struct {( unsigned io$v_fcode_fill_45 : 6;Y unsigned io$v_word : 1; /* Word (interrupt)/block (DMA) mode specifier */N unsigned io$v_filler_3 : 1; /* IO$M_TIMED */N unsigned io$v_filler_4 : 1; /* IO$M_ATTNAST, IO$M_DIAGNOSTIC */N unsigned io$v_setfnct : 1; /* Set "FNCT" bits in device CSR */S unsigned io$v_datapa =th : 1; /* Change UBA datapath (direct/buffered) */T unsigned io$v_filler_5 : 1; /* IO$M_INHERLOG (former def'n for RESET) */N unsigned io$v_cycle : 1; /* Set "cycle" bit in device CSR */N unsigned io$v_reset : 1; /* Device reset specifier */# unsigned io$v_fill_56_ : 2; } io$r_xa_modifiers;N/* 3271 driver function modifier bits. */ __struct {( unsigned io$v_fcode_fill_46 >: 6;# unsigned io$v_filler_6 : 2;N unsigned io$v_setcuadr : 1; /* Set a new CU address */N unsigned io$v_setbsize : 1; /* Set a new maximum buffer size */N unsigned io$v_setpoolsz : 1; /* Set a new pool size */N unsigned io$v_setenqcnt : 1; /* Set a new ENQ threshold */N unsigned io$v_clear : 1; /* Zero status counters */N unsigned io$v_lpbext : 1; /* Loopback is externa ?l loopback */S unsigned io$v_lpbint : 1; /* Loopback is internal loopback (DUP11) */N unsigned io$v_readcsr : 1; /* Read CSRs on DUP11 */! } io$r_ibm3271_modifiers;N/* XW driver function modifier bits. */ __struct {( unsigned io$v_fcode_fill_47 : 6;N unsigned io$v_noctswait : 1; /* Diagnostic function */N unsigned io$v_slavloop : 1; /* Diagnostic function @ */N unsigned io$v_nodsrwait : 1; /* Do not wait for DSR (diag) */N unsigned io$v_maintloop : 1; /* Internal maint loop */N unsigned io$v_lastblock : 1; /* Last block of message */# unsigned io$v_filler_7 : 1;N unsigned io$v_intclock : 1; /* Internal clock */# unsigned io$v_fill_57_ : 3; } io$r_xw_modifiers;N/* LAT driver function modifier bits. A */ __struct {( unsigned io$v_fcode_fill_48 : 6;U unsigned io$v_lt_connect : 1; /* Solicit connection to remote LAT device */N unsigned io$v_lt_discon : 1; /* Disconnect LAT session */N unsigned io$v_lt_readport : 1; /* Read LAT device info */N unsigned io$v_lt_map_port : 1; /* Map application port */N unsigned io$v_lt_rating : 1; /* Set service rating */N unsigned io$v_lt B_sol_info : 1; /* Request solicit info */N unsigned io$v_lt_rcv_info : 1; /* Setup to recive reply */N unsigned io$v_lt_setmode : 1; /* SETMODE on LTA device */N unsigned io$v_lt_sensemode : 1; /* SENSEMODE on LTA device */N unsigned io$v_lt_que_chg_notif : 1; /* Queue change AST */ } io$r_lt_modifiers;N/* LAT item list definitions for MAP_PORT */ __struct {N C unsigned io$v_lt_map_filler : 1; /* Item 0 not used */N unsigned io$v_lt_map_nodnam : 1; /* Server node name */N unsigned io$v_lt_map_pornam : 1; /* Server port name */N unsigned io$v_lt_map_srvnam : 1; /* Server service name */N unsigned io$v_lt_map_lnknam : 1; /* Link name */N unsigned io$v_lt_map_netadr : 1; /* Server Ethernet Add. */# unsigned io$v_fill_5 D8_ : 2; } io$r_lt_mapitem;N/* FSDRIVER function modifiers for Dollar. */ __struct {( unsigned io$v_fcode_fill_49 : 6;N unsigned io$v_flush : 1; /* Flush writes */N unsigned io$v_write_barrier : 1; /* Barrier writes to this point */ } io$r_fs_modifiers;N/* MKDRIVER function modifiers for SETMODE */ __struct {( unsigned io$v_fcode_fill_50 : 6;Eb unsigned io$v_mkfill1 : 1; /* Filler to not coincide with TU modifier (for safety) */N unsigned io$v_allowfast_never : 1; /* Disable all skip by filemarks */` unsigned io$v_allowfast_per_io : 1; /* Enable skip by filemarks with i/o fcn modifier */c unsigned io$v_allowfast_always : 1; /* Default all IO$_SKIPFILE to use skip by filemarks */# unsigned io$v_fill_59_ : 6;$ } io$r_mk_setmode_modifiers;N/* Snapshot-capable disk (SD) driver function mo Fdifier bits. */ __struct {( unsigned io$v_fcode_fill_51 : 6;N unsigned io$v_add : 1; /* Add UNIT to an existing pool */# unsigned io$v_fill_60_ : 1; } io$r_sd_modifiers;N/* USB usbattr modifiers */ __struct {( unsigned io$v_fcode_fill_52 : 6;Y unsigned io$v_idstring : 1; /* Request for printer's 1284 device ID string */` unsigned io$v_serialnum : G1; /* Request for printer's serial number (if supported) */% } io$r_usb_usbattr_modifiers;N/* Disk-specific PACKACK modifiers */ __struct {2 unsigned io$v_disk_packack_fcode_fill : 6;m unsigned io$v_mscp_format_fill : 1; /* Filler to coincide with MSCP_FORMAT modifier for DU PACKACK */q unsigned io$v_bypass_valid_chk : 1; /* Send PACKACK to driver even if UCB$M_VALID is set (LCLDSKVALID) */& } io$r_disk_pack Hack_modifiers; } IODEF; #if !defined(__VAXC)2#define io$v_fcode io$r_fcode_structure.io$v_fcode<#define io$v_fmodifiers io$r_fcode_structure.io$v_fmodifiers9#define io$v_inherlog io$r_errlog_modifiers.io$v_inherlog6#define io$v_erase io$r_disk_tape_modifiers.io$v_erase8#define io$v_exfunc io$r_disk_tape_modifiers.io$v_exfunc>#define io$v_datacheck io$r_disk_tape_modifiers.io$v_datacheck<#define io$v_inhretry io$r_disk_tape_modifiers.io$v_inhretry:#define io$v_syncsts io$r_disk_tape_ Imodifiers.io$v_syncsts<#define io$v_novcache io$r_disk_tape_modifiers.io$v_novcache8#define io$v_bufobj io$r_disk_tape_modifiers.io$v_bufobj:#define io$v_trusted io$r_disk_tape_modifiers.io$v_trusted@#define io$v_file_flush io$r_disk_tape_modifiers.io$v_file_flush:#define io$v_barrier io$r_disk_tape_modifiers.io$v_barrier<#define io$v_rah_hint io$r_disk_tape_modifiers.io$v_rah_hint5#define io$v_inhseek io$r_disk_modifiers.io$v_inhseekB#define io$v_read_to_eof io$r_disk_read_modifiers.io$v_rea Jd_to_eof5#define io$v_reverse io$r_tape_modifiers.io$v_reverse3#define io$v_nowait io$r_tape_modifiers.io$v_nowait9#define io$v_inhextgap io$r_tape_modifiers.io$v_inhextgap9#define io$v_retension io$r_tape_modifiers.io$v_retension9#define io$v_allowfast io$r_tape_modifiers.io$v_allowfast=#define io$v_mt3_density io$r_tape_modifiers.io$v_mt3_density@#define io$v_mscpmodifs io$r_dutu_xfer_modifiers.io$v_mscpmodifs7#define io$v_shadow io$r_du_sense_modifiers.io$v_shadow7#define io$v_locat Ke io$r_du_sense_modifiers.io$v_locateC#define io$v_mscp_format io$r_du_packack_modifiers.io$v_mscp_format;#define io$v_allhosts io$r_du_avail_modifiers.io$v_allhosts;#define io$v_dissolve io$r_du_avail_modifiers.io$v_dissolve=#define io$v_nocleanup io$r_du_avail_modifiers.io$v_nocleanup=#define io$v_spindown io$r_du_remshad_modifiers.io$v_spindownA#define io$v_est_com_path io$r_du_dcd_modifiers.io$v_est_com_pathA#define io$v_lcl_src_unit io$r_du_dcd_modifiers.io$v_lcl_src_unitA#define Lio$v_rtn_com_path io$r_du_dcd_modifiers.io$v_rtn_com_path;#define io$v_dealc_all io$r_du_whm_modifiers.io$v_dealc_all;#define io$v_dealc_hrn io$r_du_whm_modifiers.io$v_dealc_hrnA#define io$v_dealc_entloc io$r_du_whm_modifiers.io$v_dealc_entloc9#define io$v_decr_afc io$r_du_whm_modifiers.io$v_decr_afc9#define io$v_read_all io$r_du_whm_modifiers.io$v_read_all9#define io$v_read_hrn io$r_du_whm_modifiers.io$v_read_hrn=#define io$v_break_conn io$r_du_whm_modifiers.io$v_break_conn?#define io M$v_stepover io$r_hbs_copyshad_modifiers.io$v_stepover;#define io$v_copyop io$r_hbs_copyshad_modifiers.io$v_copyop:#define io$v_exists io$r_hbs_creshad_modifiers.io$v_exists4#define io$v_cbs io$r_hbs_creshad_modifiers.io$v_cbs<#define io$v_booting io$r_hbs_creshad_modifiers.io$v_bootingF#define io$v_req_minicopy io$r_hbs_creshad_modifiers.io$v_req_minicopyF#define io$v_opt_minicopy io$r_hbs_creshad_modifiers.io$v_opt_minicopyB#define io$v_nominicopy io$r_hbs_creshad_modifiers.io$v_nominicopyPN#define io$v_expect_mount_done io$r_hbs_creshad_modifiers.io$v_expect_mount_done9#define io$v_vuex_fc io$r_hbs_xfer_modifiers.io$v_vuex_fc<#define io$v_write_scb io$r_hbs_scb_modifiers.io$v_write_scb>#define io$v_upd_scblbn io$r_hbs_scb_modifiers.io$v_upd_scblbn<#define io$v_forcepath io$r_prfpath_modifiers.io$v_forcepathD#define io$v_preferred_cpu io$r_prfpath_modifiers.io$v_preferred_cpuF#define io$v_sys_assignable io$r_prfpath_modifiers.io$v_sys_assignable1#define io$v_commod io$r_dr_modifi Oers.io$v_commod9#define io$v_movetrackd io$r_dr_modifiers.io$v_movetrackd9#define io$v_diagnostic io$r_dr_modifiers.io$v_diagnostic7#define io$v_skpsecinh io$r_dr_modifiers.io$v_skpsecinh3#define io$v_deldata io$r_dy_modifiers.io$v_deldata1#define io$v_nomrsp io$r_dd_modifiers.io$v_nomrsp/#define io$v_swap io$r_ts11_modifiers.io$v_swap7#define io$v_opposite io$r_ts11_modifiers.io$v_opposite7#define io$v_clserexcp io$r_tu_modifiers.io$v_clserexcpC#define io$v_chunkdiag io$r_tu_lg_tran Psfer_modifiers.io$v_chunkdiag7#define io$v_tbc io$r_tu_lg_transfer_modifiers.io$v_tbc9#define io$v_enarep io$r_tu_setmode_modifiers.io$v_enarep2#define io$v_access io$r_acp_modifiers.io$v_access2#define io$v_create io$r_acp_modifiers.io$v_create2#define io$v_delete io$r_acp_modifiers.io$v_delete0#define io$v_mount io$r_acp_modifiers.io$v_mount2#define io$v_dmount io$r_acp_modifiers.io$v_dmount4#define io$v_remount io$r_acp_modifiers.io$v_remount6#define io$v_movefile io$r_acp_modifiers.io$ Qv_movefile8#define io$v_rwshelved io$r_acp_modifiers.io$v_rwshelved2#define io$v_setdir io$r_acp_modifiers.io$v_setdir1#define io$v_binary io$r_cr_modifiers.io$v_binary1#define io$v_packed io$r_cr_modifiers.io$v_packed+#define io$v_now io$r_mb_modifiers.io$v_now1#define io$v_stream io$r_mb_modifiers.io$v_stream;#define io$v_readercheck io$r_mb_modifiers.io$v_readercheck;#define io$v_writercheck io$r_mb_modifiers.io$v_writercheck5#define io$v_norswait io$r_mb_modifiers.io$v_norswaitI#dRefine io$v_mb_room_notify io$r_mb_setmode_modifiers.io$v_mb_room_notify=#define io$v_readattn io$r_mb_setmode_modifiers.io$v_readattn;#define io$v_wrtattn io$r_mb_setmode_modifiers.io$v_wrtattn;#define io$v_setprot io$r_mb_setmode_modifiers.io$v_setprotA#define io$v_readerwait io$r_mb_setmode_modifiers.io$v_readerwaitA#define io$v_writerwait io$r_mb_setmode_modifiers.io$v_writerwait6#define io$v_noecho io$r_tt_read_modifiers.io$v_noecho4#define io$v_timed io$r_tt_read_modifiers.io$v_timed S6#define io$v_cvtlow io$r_tt_read_modifiers.io$v_cvtlow8#define io$v_nofiltr io$r_tt_read_modifiers.io$v_nofiltr:#define io$v_dsablmbx io$r_tt_read_modifiers.io$v_dsablmbx4#define io$v_purge io$r_tt_read_modifiers.io$v_purge<#define io$v_trmnoecho io$r_tt_read_modifiers.io$v_trmnoecho8#define io$v_refresh io$r_tt_read_modifiers.io$v_refresh6#define io$v_escape io$r_tt_read_modifiers.io$v_escape6#define io$v_extend io$r_tt_read_modifiers.io$v_extend;#define io$v_canctrlo io$r_tt_write_modifier Ts.io$v_canctrlo;#define io$v_enablmbx io$r_tt_write_modifiers.io$v_enablmbx;#define io$v_noformat io$r_tt_write_modifiers.io$v_noformat=#define io$v_breakthru io$r_tt_write_modifiers.io$v_breakthru9#define io$v_newline io$r_tt_write_modifiers.io$v_newlineC#define io$v_typeahdcnt io$r_tt_sensemode_modifiers.io$v_typeahdcnt7#define io$v_maint io$r_tt_setmode_modifiers.io$v_maint=#define io$v_ctrlyast io$r_tt_setmode_modifiers.io$v_ctrlyast=#define io$v_ctrlcast io$r_tt_setmode_modifiers. Uio$v_ctrlcast9#define io$v_hangup io$r_tt_setmode_modifiers.io$v_hangup;#define io$v_outband io$r_tt_setmode_modifiers.io$v_outbandA#define io$v_tt_connect io$r_tt_setmode_modifiers.io$v_tt_connect?#define io$v_tt_discon io$r_tt_setmode_modifiers.io$v_tt_disconA#define io$v_tt_process io$r_tt_setmode_modifiers.io$v_tt_process9#define io$v_brdcst io$r_tt_setmode_modifiers.io$v_brdcst3#define io$v_loop io$r_tt_maint_modifiers.io$v_loop7#define io$v_unloop io$r_tt_maint_modifiers.io$v_unl Voop;#define io$v_line_off io$r_tt_maint_modifiers.io$v_line_off=#define io$v_set_modem io$r_tt_maint_modifiers.io$v_set_modem9#define io$v_line_on io$r_tt_maint_modifiers.io$v_line_on;#define io$v_loop_ext io$r_tt_maint_modifiers.io$v_loop_ext?#define io$v_autxof_ena io$r_tt_maint_modifiers.io$v_autxof_ena?#define io$v_autxof_dis io$r_tt_maint_modifiers.io$v_autxof_dis=#define io$v_include io$r_tt_outofband_modifiers.io$v_include?#define io$v_tt_abort io$r_tt_outofband_modifiers.io$v_t Wt_abortB#define io$v_posixinit io$r_tt_psxsetmode_modifiers.io$v_posixinitB#define io$v_posixflow io$r_tt_psxsetmode_modifiers.io$v_posixflowA#define io$v_set_posix io$r_tt_posixinit_modifiers.io$v_set_posixE#define io$v_clear_posix io$r_tt_posixinit_modifiers.io$v_clear_posixE#define io$v_set_termios io$r_tt_posixinit_modifiers.io$v_set_termios=#define io$v_set_ptc io$r_tt_posixinit_modifiers.io$v_set_ptcA#define io$v_clear_ptc io$r_tt_posixinit_modifiers.io$v_clear_ptcA#define io$v_fluXsh_tab io$r_tt_posixinit_modifiers.io$v_flush_tabG#define io$v_flush_output io$r_tt_posixinit_modifiers.io$v_flush_outputC#define io$v_update_ptc io$r_tt_posixinit_modifiers.io$v_update_ptc?#define io$v_out_xoff io$r_tt_posixflow_modifiers.io$v_out_xoff=#define io$v_out_xon io$r_tt_posixflow_modifiers.io$v_out_xon=#define io$v_in_xoff io$r_tt_posixflow_modifiers.io$v_in_xoff;#define io$v_in_xon io$r_tt_posixflow_modifiers.io$v_in_xonA#define io$v_o_nonblock io$r_tt_psxread_modifiers.io$v Y_o_nonblockC#define io$v_interrupt io$r_net_write_read_modifiers.io$v_interruptA#define io$v_multiple io$r_net_write_read_modifiers.io$v_multiple?#define io$v_lockbuf io$r_net_write_read_modifiers.io$v_lockbuf?#define io$v_noblock io$r_net_write_read_modifiers.io$v_noblock7#define io$v_abort io$r_net_accdea_modifiers.io$v_abort7#define io$v_synch io$r_net_accdea_modifiers.io$v_synch>#define io$v_response io$r_dlink_write_modifiers.io$v_response>#define io$v_startup io$r_dlink_setmode_mo Zdifiers.io$v_startup@#define io$v_shutdown io$r_dlink_setmode_modifiers.io$v_shutdown>#define io$v_attnast io$r_dlink_setmode_modifiers.io$v_attnast8#define io$v_ctrl io$r_dlink_setmode_modifiers.io$v_ctrl>#define io$v_set_mac io$r_dlink_setmode_modifiers.io$v_set_macD#define io$v_update_map io$r_dlink_setmode_modifiers.io$v_update_map:#define io$v_route io$r_dlink_setmode_modifiers.io$v_route>#define io$v_rd_mem io$r_dlink_sensemode_modifiers.io$v_rd_memB#define io$v_rd_modem io$r_dlink_sense [mode_modifiers.io$v_rd_modemB#define io$v_rd_count io$r_dlink_sensemode_modifiers.io$v_rd_countD#define io$v_clr_count io$r_dlink_sensemode_modifiers.io$v_clr_countD#define io$v_sense_mac io$r_dlink_sensemode_modifiers.io$v_sense_macB#define io$v_show_map io$r_dlink_sensemode_modifiers.io$v_show_mapF#define io$v_show_route io$r_dlink_sensemode_modifiers.io$v_show_route4#define io$v_more io$r_x25_write_modifiers.io$v_more>#define io$v_qualified io$r_x25_write_modifiers.io$v_qualified=#define io \$v_redirect io$r_x25_access_modifiers.io$v_redirect9#define io$v_accept io$r_x25_access_modifiers.io$v_accept8#define io$v_setevf io$r_lpa_start_modifiers.io$v_setevf-#define io$v_word io$r_xa_modifiers.io$v_word3#define io$v_setfnct io$r_xa_modifiers.io$v_setfnct5#define io$v_datapath io$r_xa_modifiers.io$v_datapath/#define io$v_cycle io$r_xa_modifiers.io$v_cycle/#define io$v_reset io$r_xa_modifiers.io$v_reset:#define io$v_setcuadr io$r_ibm3271_modifiers.io$v_setcuadr:#define io$v_set ]bsize io$r_ibm3271_modifiers.io$v_setbsize<#define io$v_setpoolsz io$r_ibm3271_modifiers.io$v_setpoolsz<#define io$v_setenqcnt io$r_ibm3271_modifiers.io$v_setenqcnt4#define io$v_clear io$r_ibm3271_modifiers.io$v_clear6#define io$v_lpbext io$r_ibm3271_modifiers.io$v_lpbext6#define io$v_lpbint io$r_ibm3271_modifiers.io$v_lpbint8#define io$v_readcsr io$r_ibm3271_modifiers.io$v_readcsr7#define io$v_noctswait io$r_xw_modifiers.io$v_noctswait5#define io$v_slavloop io$r_xw_modifiers.io$v_slavloop7 ^#define io$v_nodsrwait io$r_xw_modifiers.io$v_nodsrwait7#define io$v_maintloop io$r_xw_modifiers.io$v_maintloop7#define io$v_lastblock io$r_xw_modifiers.io$v_lastblock5#define io$v_intclock io$r_xw_modifiers.io$v_intclock9#define io$v_lt_connect io$r_lt_modifiers.io$v_lt_connect7#define io$v_lt_discon io$r_lt_modifiers.io$v_lt_discon;#define io$v_lt_readport io$r_lt_modifiers.io$v_lt_readport;#define io$v_lt_map_port io$r_lt_modifiers.io$v_lt_map_port7#define io$v_lt_rating io$r_lt_mod _ifiers.io$v_lt_rating;#define io$v_lt_sol_info io$r_lt_modifiers.io$v_lt_sol_info;#define io$v_lt_rcv_info io$r_lt_modifiers.io$v_lt_rcv_info9#define io$v_lt_setmode io$r_lt_modifiers.io$v_lt_setmode=#define io$v_lt_sensemode io$r_lt_modifiers.io$v_lt_sensemodeE#define io$v_lt_que_chg_notif io$r_lt_modifiers.io$v_lt_que_chg_notif=#define io$v_lt_map_filler io$r_lt_mapitem.io$v_lt_map_filler=#define io$v_lt_map_nodnam io$r_lt_mapitem.io$v_lt_map_nodnam=#define io$v_lt_map_pornam io$r_lt `_mapitem.io$v_lt_map_pornam=#define io$v_lt_map_srvnam io$r_lt_mapitem.io$v_lt_map_srvnam=#define io$v_lt_map_lnknam io$r_lt_mapitem.io$v_lt_map_lnknam=#define io$v_lt_map_netadr io$r_lt_mapitem.io$v_lt_map_netadr/#define io$v_flush io$r_fs_modifiers.io$v_flush?#define io$v_write_barrier io$r_fs_modifiers.io$v_write_barrier;#define io$v_mkfill1 io$r_mk_setmode_modifiers.io$v_mkfill1K#define io$v_allowfast_never io$r_mk_setmode_modifiers.io$v_allowfast_neverM#define io$v_allowfast_per_i ao io$r_mk_setmode_modifiers.io$v_allowfast_per_ioM#define io$v_allowfast_always io$r_mk_setmode_modifiers.io$v_allowfast_always+#define io$v_add io$r_sd_modifiers.io$v_add>#define io$v_idstring io$r_usb_usbattr_modifiers.io$v_idstring@#define io$v_serialnum io$r_usb_usbattr_modifiers.io$v_serialnumO#define io$v_bypass_valid_chk io$r_disk_packack_modifiers.io$v_bypass_valid_chk"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ union iodef {N/* Basic I/O function code/m bodifiers structure */ __struct {N unsigned io$v_fcode : 6; /* Function Code Field */N unsigned io$v_fmodifiers : 10; /* Function Modifiers Field */ } io$r_fcode_structure;N/* Function modifiers common to all drivers which do error logging */ __struct {' unsigned io$v_fcode_fill_1 : 6;# unsigned io$v_filler_1 : 5;N unsigned io$v_inherlog : 1; /* Inhibit error logging c */# unsigned io$v_fill_20_ : 4; } io$r_errlog_modifiers;N/* General disk and tape function code modifiers */ __struct {' unsigned io$v_fcode_fill_2 : 6;/ unsigned io$v_rsvd_for_devdepend_1 : 4;N unsigned io$v_erase : 1; /* Erase data */N unsigned io$v_filler_2 : 1; /* IO$M_INHERLOG *// unsigned io$v_rsvd_for_devdepend_2 : 1;N unsigned ido$v_exfunc : 1; /* func<31:16> are valid */N unsigned io$v_datacheck : 1; /* Write check data after transfer */N unsigned io$v_inhretry : 1; /* Inhibit error retry */N/* the following are only valid if EXFUNC is set */N unsigned io$v_syncsts : 1; /* allow synchronous completion */N unsigned io$v_novcache : 1; /* do not use VBN cache */N unsigned io$v_bufobj : 1; /* Beuffer object I/O */N unsigned io$v_trusted : 1; /* I/O from trusted component */N unsigned io$v_file_flush : 1; /* Flush file to disk */N unsigned io$v_barrier : 1; /* Insert a barrier after the write */N unsigned io$v_rah_hint : 1; /* Readahead hint (used by XFC) */# unsigned io$v_fill_21_ : 1;# } io$r_disk_tape_modifiers;N/* General disk function code modifiers f */ __struct {' unsigned io$v_fcode_fill_3 : 6;/ unsigned io$v_rsvd_for_devdepend_3 : 6;X unsigned io$v_inhseek : 1; /* Inhibit implied seek on physical functions */# unsigned io$v_fill_22_ : 3; } io$r_disk_modifiers;N/* General disk READ function code modifiers */ __struct {V unsigned io$v_filler_2a : 21; /* Fill to overlay READ_TO_EOF with BARRIER */N/* the following are only valid if EXFUNC is g set */N unsigned io$v_read_to_eof : 1; /* Reserved for Internal Use only. */# unsigned io$v_fill_23_ : 2;# } io$r_disk_read_modifiers;N/* General tape function code modifiers */ __struct {' unsigned io$v_fcode_fill_4 : 6;N unsigned io$v_reverse : 1; /* Reverse operation */N unsigned io$v_nowait : 1; /* No wait for rewind to complete *// unsignhed io$v_rsvd_for_devdepend_4 : 4;P unsigned io$v_inhextgap : 1; /* Inhibit extended inter-record gap */k unsigned io$v_retension : 1; /* Traverse the entire tape to uniformly set the tape's tension. */N/* Applies only to IO$_REWIND/REWINDOFF functions */W unsigned io$v_allowfast : 1; /* Allow fast skip by filemarks when enabled */N/* Applies only to IO$_SKIPFILE/SPACEFILE functions */j unsigned io$v_mt3_de insity : 1; /* Density Setmode and Sensemode for MTD enhanced tape drivers. */ } io$r_tape_modifiers;N/* DU & TU, disk & tape class driver transfer function modifier bits */ __struct {' unsigned io$v_fcode_fill_5 : 6;) unsigned io$v_dutux_reserved : 2;N unsigned io$v_mscpmodifs : 1; /* Use MSCP modifiers in P5 */# unsigned io$v_fill_24_ : 7;# } io$r_dutu_xfer_modifiers; __struct {' unsigned io$v_fcode_fill_6 : j 6;N unsigned io$v_shadow : 1; /* Shadowing SENSECHAR */N unsigned io$v_locate : 1; /* Shadowing Locate function */" } io$r_du_sense_modifiers; __struct {' unsigned io$v_fcode_fill_7 : 6;N unsigned io$v_mscp_format : 1; /* PACKACK media for formatting */# unsigned io$v_fill_25_ : 1;$ } io$r_du_packack_modifiers; __struct {' unsigned io$v_fcode_fill_8 : 6;S unsigned io$v_allhos kts : 1; /* Do available as for all class drivers */N unsigned io$v_dissolve : 1; /* Dissolve shadow set */U unsigned io$v_nocleanup : 1; /* Normal shadow set cleanup not necessary */# unsigned io$v_fill_26_ : 7;" } io$r_du_avail_modifiers; __struct {' unsigned io$v_fcode_fill_9 : 6;N unsigned io$v_spindown : 1; /* Spin down removed member */# unsigned io$v_fill_27_ : 1;$ } io$r_du_remshad_mo ldifiers; __struct {( unsigned io$v_fcode_fill_11 : 6;N unsigned io$v_est_com_path : 1; /* Establish Communication Path */N unsigned io$v_lcl_src_unit : 1; /* Local Source Unit */N unsigned io$v_rtn_com_path : 1; /* Retain Communication Path */# unsigned io$v_fill_28_ : 7; } io$r_du_dcd_modifiers; __struct {( unsigned io$v_fcode_fill_12 : 6;N unsigned io$v_dealc_all : 1; /* Deallocate All m */Q unsigned io$v_dealc_hrn : 1; /* Deallocate by Host Reference Number */N unsigned io$v_dealc_entloc : 1; /* Deallocate by Entry Locator */P unsigned io$v_decr_afc : 1; /* Decrement Allocation Failure Count */N unsigned io$v_read_all : 1; /* Read All */N unsigned io$v_read_hrn : 1; /* Read by Host Reference Number */N unsigned io$v_break_conn : 1; /* Break Connection */# n unsigned io$v_fill_29_ : 3; } io$r_du_whm_modifiers;N/* HBS driver transfer function modifier bits */N/* Make sure that IO$V_SHADOW .ne. IO$V_LOCATE .ne. IO$V_COPYOP */ __struct {( unsigned io$v_fcode_fill_13 : 6;N unsigned io$v_stepover : 1; /* Stepover SCBLBN. */" unsigned io$v_cs_fill : 1;N unsigned io$v_copyop : 1; /* Shad Server Cpy Operation */# unsigned io$v_ ofill_30_ : 7;& } io$r_hbs_copyshad_modifiers; __struct {( unsigned io$v_fcode_fill_14 : 6;N unsigned io$v_exists : 1; /* VU already exists. */N unsigned io$v_cbs : 1; /* Controller based shadowing. */N unsigned io$v_booting : 1; /* Creshad for system disk. */N unsigned io$v_req_minicopy : 1; /* MINICOPY required */N unsigned io$v_opt_minicopy : 1; /* MINICOPY optional p */N unsigned io$v_nominicopy : 1; /* NOMINICOPY */$ unsigned io$v_hbvs_fill : 1;X unsigned io$v_expect_mount_done : 1; /* All SSMs on command line sent to HBVS */# unsigned io$v_fill_31_ : 2;% } io$r_hbs_creshad_modifiers; __struct {( unsigned io$v_fcode_fill_15 : 9;N unsigned io$v_vuex_fc : 1; /* Exclude Full copy members */# unsigned io$v_fill_32_ : 6;" } io$r_hbs_xfer_modifier qs; __struct {( unsigned io$v_fcode_fill_54 : 9;N unsigned io$v_write_scb : 1; /* Write the SCB */N unsigned io$v_filler_hbvs_1 : 3; /* */T unsigned io$v_upd_scblbn : 1; /* Update HVBS on new location of the SCB */# unsigned io$v_fill_33_ : 2;! } io$r_hbs_scb_modifiers;N/* Function modifier bits for Set Preferred Path. */ __struct {( unsigned io$v_fcrode_fill_10 : 6;N/* No modifiers set, passes in a preferred path (DUDRIVER) */P unsigned io$v_forcepath : 1; /* Make path change happen (DUDRIVER) */_ unsigned io$v_preferred_cpu : 1; /* Set Fast Path CPU affinity of port (port driver) */N unsigned io$v_sys_assignable : 1; /* system assignable port */# unsigned io$v_fill_34_ : 7;! } io$r_prfpath_modifiers;N/* DR driver function modifier bits. s */ __struct {( unsigned io$v_fcode_fill_16 : 6;N unsigned io$v_commod : 1; /* Diagnostic command */N unsigned io$v_movetrackd : 1; /* Move track descriptor */N unsigned io$v_diagnostic : 1; /* Diagnostic function */N unsigned io$v_skpsecinh : 1; /* Skip sector inhibit */# unsigned io$v_fill_35_ : 6; } io$r_dr_modifiers;N/* DY driver function modifier bits. t */ __struct {( unsigned io$v_fcode_fill_17 : 6;N unsigned io$v_deldata : 1; /* Write deleted data mark */# unsigned io$v_fill_36_ : 1; } io$r_dy_modifiers;N/* DD driver (TU58) function modifier bits. */ __struct {( unsigned io$v_fcode_fill_18 : 6;P unsigned io$v_nomrsp : 1; /* Do not use MRSP for this operation */# unsigned io$v_fill_37_ : 1; } uio$r_dd_modifiers;N/* Magnetic tape I/O function modifier bits for the TS11. */ __struct {( unsigned io$v_fcode_fill_19 : 6;/ unsigned io$v_rsvd_for_devdepend_5 : 2;N unsigned io$v_swap : 1; /* Swap byte (TS11) */N unsigned io$v_opposite : 1; /* Opposite bit for rereads (TS11) */# unsigned io$v_fill_38_ : 6; } io$r_ts11_modifiers;N/* TU driver function modifier bits v */ __struct {( unsigned io$v_fcode_fill_20 : 6;/ unsigned io$v_rsvd_for_devdepend_6 : 3;O unsigned io$v_clserexcp : 1; /* Clear serious exception condition */# unsigned io$v_fill_39_ : 6; } io$r_tu_modifiers;N/* Tape class driver segmented and large transfer modifier bits */ __struct {( unsigned io$v_fcode_fill_21 : 6;N unsigned io$v_chunkdiag : 1; /* Allow diagnostic buffers *// unsi wgned io$v_rsvd_for_devdepend_7 : 3;N unsigned io$v_tbc : 1; /* To be continued modifier */# unsigned io$v_fill_40_ : 5;( } io$r_tu_lg_transfer_modifiers;N/* TUDRIVER SETMODE function modifier bits. */ __struct {( unsigned io$v_fcode_fill_22 : 6;N unsigned io$v_enarep : 1; /* Enable media quality */# unsigned io$v_fill_41_ : 1;$ } io$r_tu_setmode_modifiers;N/* reportingx. */N/* ACP function modifier bits. */ __struct {( unsigned io$v_fcode_fill_23 : 6;N unsigned io$v_access : 1; /* Access file */N unsigned io$v_create : 1; /* Create file */N unsigned io$v_delete : 1; /* Delete file */N unsigned io$v_mount : 1; /* Mount volume y */N unsigned io$v_dmount : 1; /* Dismount volume */N unsigned io$v_remount : 1; /* Remount volume */N unsigned io$v_movefile : 1; /* Move a file */N unsigned io$v_filler_8 : 1; /* Used for EXFUNC */N unsigned io$v_rwshelved : 1; /* Access shelved files */N unsigned io$v_setdir : 1; /* Set file as a directory */N/* B zit 19 used for TRUSTED */ } io$r_acp_modifiers;N/* CR (card reader) driver function modifier bits. */ __struct {( unsigned io$v_fcode_fill_24 : 6;N unsigned io$v_binary : 1; /* Binary read */N unsigned io$v_packed : 1; /* Packed read */ } io$r_cr_modifiers;N/* MB (mailbox) driver function modifier bits. { */N/* The following modifers are for the QIO READ, WRITE and SENSEMODE */N/* functions. */ __struct {( unsigned io$v_fcode_fill_25 : 6;P unsigned io$v_now : 1; /* Do not wait for operation complete */] unsigned io$v_stream : 1; /* Perform stream mode operation (vs. record mode) */n unsigned io$v_readercheck : 1; /* Perform operation if no read channel is assigned to t|he mailbox. */o unsigned io$v_writercheck : 1; /* Perform operation if no write channel is assigned to the mailbox. */N unsigned io$v_norswait : 1; /* Do not allow resource waits */N/* Bit 13 used for EXFUNC */N/* Bit 19 used for TRUSTED */# unsigned io$v_fill_42_ : 5; } io$r_mb_modifiers;N/* More MB (mailbox) driver function modifier bits. } */N/* Mailbox QIO SETMODE function modifiers. */ __struct {( unsigned io$v_fcode_fill_26 : 6;i unsigned io$v_mb_room_notify : 1; /* Notify when some (any) space in the mailbox is available. */N unsigned io$v_readattn : 1; /* Request ast on waiting reader */N unsigned io$v_wrtattn : 1; /* Request ast on waiting writer */N unsigned io$v_setprot : 1; /* Set volume protection */d ~ unsigned io$v_readerwait : 1; /* Wait for a read channel to be assigned to the mailbox. */e unsigned io$v_writerwait : 1; /* Wait for a write channel to be assigned to the mailbox. */# unsigned io$v_fill_43_ : 4;$ } io$r_mb_setmode_modifiers;N/* TT driver READ function modifier bits. */ __struct {( unsigned io$v_fcode_fill_27 : 6;N unsigned io$v_noecho : 1; /* Noecho */N unsigned io$v_timed : 1; /* Timed */N unsigned io$v_cvtlow : 1; /* Convert lower case */N unsigned io$v_nofiltr : 1; /* No filter */N unsigned io$v_dsablmbx : 1; /* Disable mailbox */N unsigned io$v_purge : 1; /* Purge typeahead */N unsigned io$v_trmnoecho : 1; /* Terminators are not echoed */N unsigned io$v_refresh : 1;  /* Control-R interrupted read */O unsigned io$v_escape : 1; /* Terminate read on escape sequence */N unsigned io$v_extend : 1; /* Used by alternate class drivers */! } io$r_tt_read_modifiers;N/* TT driver WRITE function modifier bits. */ __struct {( unsigned io$v_fcode_fill_28 : 6;N unsigned io$v_canctrlo : 1; /* Cancel control O */N unsigned io$v_enablmbx : 1; /* E nable mailbox */N unsigned io$v_noformat : 1; /* Do not format output */N unsigned io$v_breakthru : 1; /* Broadcast I/O */N unsigned io$v_newline : 1; /* Output a newline */# unsigned io$v_fill_44_ : 5;" } io$r_tt_write_modifiers;N/* TT driver SENSEMODE function modifier bits. */ __struct {( unsigned io$v_fcode_fill_29 : 6;N unsigned  io$v_typeahdcnt : 1; /* Sense typeahead information */+ unsigned io$v_reserve_rd_modem : 1;& } io$r_tt_sensemode_modifiers;N/* TT driver SETMODE subfunction modifier bits. */ __struct {( unsigned io$v_fcode_fill_30 : 6;N unsigned io$v_maint : 1; /* Enable maint sub modifiers */N unsigned io$v_ctrlyast : 1; /* Set control Y AST */N unsigned io$v_ctrlcast : 1; /* Set Control C */N unsigned io$v_hangup : 1; /* Set mode and hang up line */N unsigned io$v_outband : 1; /* Set out of band AST */N unsigned io$v_tt_connect : 1; /* Connect to detached terminal */N unsigned io$v_tt_discon : 1; /* Disconnect detached terminal */N unsigned io$v_tt_process : 1; /* Define controlling process */N unsigned io$v_brdcst : 1; /* Define broadcast mask */#  unsigned io$v_fill_45_ : 1;$ } io$r_tt_setmode_modifiers;N/* TT driver MAINTIANCE subfunction submodifier bits. */ __struct {( unsigned io$v_fcode_fill_31 : 6;1 unsigned io$v_reserve_maint_escape_1 : 1;N unsigned io$v_loop : 1; /* Diagnostic loopback */N unsigned io$v_unloop : 1; /* Diagnostic reset loopback */N unsigned io$v_line_off : 1; /* Disable line */N unsigned io$v_set_modem : 1; /* Diagnostic modem control */N unsigned io$v_line_on : 1; /* Enable line */N unsigned io$v_loop_ext : 1; /* Diagnostic external loopback */N unsigned io$v_autxof_ena : 1; /* Enable auto XOFF */N unsigned io$v_autxof_dis : 1; /* Disable auto XOFF */. unsigned io$v_reserve_int_disable : 1;" } io$r_tt_maint_modifiers;N/* TT driver out-of-ba nd modifier bits. */ __struct {( unsigned io$v_fcode_fill_32 : 6;1 unsigned io$v_reserve_maint_escape_2 : 5;N unsigned io$v_include : 1; /* Include character in stream */N unsigned io$v_tt_abort : 1; /* Abort current I/O */# unsigned io$v_fill_46_ : 3;& } io$r_tt_outofband_modifiers;N/* Posix terminal driver SETMODE subfunction modifier bits. */ __struct {(  unsigned io$v_fcode_fill_33 : 6;P unsigned io$v_posixinit : 1; /* Enable initialization subfunctions */N unsigned io$v_posixflow : 1; /* Enable flow control subfunctions */' } io$r_tt_psxsetmode_modifiers;N/* Posix terminal driver INIT subfunction submodifier bits. */ __struct {( unsigned io$v_fcode_fill_34 : 6;. unsigned io$v_reserve_init_escape : 1;N unsigned io$v_set_posix : 1; /* Set TT3$M_POSIX and set up PTC */Q unsigned io$v_clear_posix : 1; /* Clear TT3$M_POSIX (opt. delete PTC) */N unsigned io$v_set_termios : 1; /* Set up termios */N unsigned io$v_set_ptc : 1; /* Set up all of PTC */N unsigned io$v_clear_ptc : 1; /* clear PTC */N unsigned io$v_flush_tab : 1; /* flush typeahead buffer */N unsigned io$v_flush_output : 1; /* flush outstanding writes */N unsign ed io$v_update_ptc : 1; /* update PTC */# unsigned io$v_fill_47_ : 1;& } io$r_tt_posixinit_modifiers;N/* Posix terminal driver FLOW subfunction submodifier bits. */ __struct {( unsigned io$v_fcode_fill_35 : 6;. unsigned io$v_reserve_flow_escape : 2;N unsigned io$v_out_xoff : 1; /* Simulate output XOFF */N unsigned io$v_out_xon : 1; /* Simulate output XON */N unsign ed io$v_in_xoff : 1; /* Simulate input XOFF */N unsigned io$v_in_xon : 1; /* Simulate input XON */# unsigned io$v_fill_48_ : 4;& } io$r_tt_posixflow_modifiers;N/* Posix terminal driver READ function modifier bits. */ __struct {( unsigned io$v_fcode_fill_36 : 6;N unsigned io$v_o_nonblock : 1; /* Nonblock */# unsigned io$v_fill_49_ : 1;$ } io$r_tt_psxrea d_modifiers;N/* Network WRITE and READ VIRTUAL function modifier bits. */ __struct {( unsigned io$v_fcode_fill_37 : 6;N unsigned io$v_interrupt : 1; /* Interrupt message */N unsigned io$v_multiple : 1; /* Multiple write/read request */N unsigned io$v_lockbuf : 1; /* Direct I/O request */N unsigned io$v_noblock : 1; /* Segment message w/o blocking */N/* Bit 13 used for EXFUNC  */N/* Bit 19 used for TRUSTED */# unsigned io$v_fill_50_ : 6;( } io$r_net_write_read_modifiers;N/* Network ACCESS/DEACCESS function modifier bits. */ __struct {( unsigned io$v_fcode_fill_38 : 6;# unsigned io$v_reserved : 2;N unsigned io$v_abort : 1; /* Disconnect abort/connect reject */N unsigned io$v_synch : 1; /* Synchronous disconnect */# unsigned io$v_fill_51_ : 6;$ } io$r_net_accdea_modifiers;N/* DATALINK driver WRITE subfunction modifier bits. */ __struct {( unsigned io$v_fcode_fill_39 : 6;P unsigned io$v_response : 1; /* Transmit this packet as a response */# unsigned io$v_fill_52_ : 1;% } io$r_dlink_write_modifiers;N/* DATALINK driver SETMODE subfunction modifier bits. */ __stru ct {( unsigned io$v_fcode_fill_40 : 6;N unsigned io$v_startup : 1; /* Start protocol */N unsigned io$v_shutdown : 1; /* Stop protocol */N unsigned io$v_attnast : 1; /* Attention AST */S unsigned io$v_ctrl : 1; /* Controller (ie. not station) function */, unsigned io$v_reserve_set_modem : 1;N unsigned io$v_set_mac : 1; /* Set MAC parameters */N  unsigned io$v_update_map : 1; /* Functional Addr Map */N unsigned io$v_route : 1; /* Source Routing Ops */# unsigned io$v_fill_53_ : 2;' } io$r_dlink_setmode_modifiers;N/* DATALINK driver SENSEMODE subfunction modifier bits. */ __struct {( unsigned io$v_fcode_fill_41 : 6;N unsigned io$v_rd_mem : 1; /* Read device memory */N unsigned io$v_rd_modem : 1; /* Read modem status */N unsigned io$v_rd_count : 1; /* Read counters */' unsigned io$v_reserve_ctrl : 1;N unsigned io$v_clr_count : 1; /* Clear counters */N unsigned io$v_sense_mac : 1; /* Sense MAC parameters */N unsigned io$v_show_map : 1; /* Functional Addr Map */N unsigned io$v_show_route : 1; /* Source Routing Ops */# unsigned io$v_fill_54_ : 2 ;) } io$r_dlink_sensemode_modifiers; __struct {( unsigned io$v_fcode_fill_42 : 6;N unsigned io$v_more : 1; /* More data follows (M-bit) */O unsigned io$v_qualified : 1; /* Use qualified sub-channel (Q-bit) */# } io$r_x25_write_modifiers;N/* X25 driver ACCESS function modifier bits. */ __struct {( unsigned io$v_fcode_fill_43 : 6;N unsigned io$v_redirect : 1; /* Redirect virtua l call */N unsigned io$v_accept : 1; /* Accept virtual call */$ } io$r_x25_access_modifiers;N/* LPA-11 driver STARTDATA modifier bits. */ __struct {( unsigned io$v_fcode_fill_44 : 6;N unsigned io$v_setevf : 1; /* Set event flag */# unsigned io$v_fill_55_ : 1;# } io$r_lpa_start_modifiers;N/* XA (DR11-W) driver function modifier bits.  */ __struct {( unsigned io$v_fcode_fill_45 : 6;Y unsigned io$v_word : 1; /* Word (interrupt)/block (DMA) mode specifier */N unsigned io$v_filler_3 : 1; /* IO$M_TIMED */N unsigned io$v_filler_4 : 1; /* IO$M_ATTNAST, IO$M_DIAGNOSTIC */N unsigned io$v_setfnct : 1; /* Set "FNCT" bits in device CSR */S unsigned io$v_datapath : 1; /* Change UBA datapath (direct/buffered) */T unsigned i o$v_filler_5 : 1; /* IO$M_INHERLOG (former def'n for RESET) */N unsigned io$v_cycle : 1; /* Set "cycle" bit in device CSR */N unsigned io$v_reset : 1; /* Device reset specifier */# unsigned io$v_fill_56_ : 2; } io$r_xa_modifiers;N/* 3271 driver function modifier bits. */ __struct {( unsigned io$v_fcode_fill_46 : 6;# unsigned io$v_filler_6 : 2;N unsigned io$v_setcuadr : 1; /* Set a new CU address */N unsigned io$v_setbsize : 1; /* Set a new maximum buffer size */N unsigned io$v_setpoolsz : 1; /* Set a new pool size */N unsigned io$v_setenqcnt : 1; /* Set a new ENQ threshold */N unsigned io$v_clear : 1; /* Zero status counters */N unsigned io$v_lpbext : 1; /* Loopback is external loopback */S unsigned io$v_lpbint : 1; /* Loopback is int ernal loopback (DUP11) */N unsigned io$v_readcsr : 1; /* Read CSRs on DUP11 */! } io$r_ibm3271_modifiers;N/* XW driver function modifier bits. */ __struct {( unsigned io$v_fcode_fill_47 : 6;N unsigned io$v_noctswait : 1; /* Diagnostic function */N unsigned io$v_slavloop : 1; /* Diagnostic function */N unsigned io$v_nodsrwait : 1; /* Do not wait for DSR  (diag) */N unsigned io$v_maintloop : 1; /* Internal maint loop */N unsigned io$v_lastblock : 1; /* Last block of message */# unsigned io$v_filler_7 : 1;N unsigned io$v_intclock : 1; /* Internal clock */# unsigned io$v_fill_57_ : 3; } io$r_xw_modifiers;N/* LAT driver function modifier bits. */ __struct {( unsigned io$v_fcode_fill_48 : 6;U  unsigned io$v_lt_connect : 1; /* Solicit connection to remote LAT device */N unsigned io$v_lt_discon : 1; /* Disconnect LAT session */N unsigned io$v_lt_readport : 1; /* Read LAT device info */N unsigned io$v_lt_map_port : 1; /* Map application port */N unsigned io$v_lt_rating : 1; /* Set service rating */N unsigned io$v_lt_sol_info : 1; /* Request solicit info */N unsigned io$v_lt_rcv_info : 1; /* Setup to recive reply */N unsigned io$v_lt_setmode : 1; /* SETMODE on LTA device */N unsigned io$v_lt_sensemode : 1; /* SENSEMODE on LTA device */N unsigned io$v_lt_que_chg_notif : 1; /* Queue change AST */ } io$r_lt_modifiers;N/* LAT item list definitions for MAP_PORT */ __struct {N unsigned io$v_lt_map_filler : 1; /* Item 0 not used */N unsigned io$v_lt_map_nodnam : 1; /* Server node name */N unsigned io$v_lt_map_pornam : 1; /* Server port name */N unsigned io$v_lt_map_srvnam : 1; /* Server service name */N unsigned io$v_lt_map_lnknam : 1; /* Link name */N unsigned io$v_lt_map_netadr : 1; /* Server Ethernet Add. */# unsigned io$v_fill_58_ : 2; } io$r_lt_mapitem;N/* FSDRIVER function modifiers for Dol lar. */ __struct {( unsigned io$v_fcode_fill_49 : 6;N unsigned io$v_flush : 1; /* Flush writes */N unsigned io$v_write_barrier : 1; /* Barrier writes to this point */ } io$r_fs_modifiers;N/* MKDRIVER function modifiers for SETMODE */ __struct {( unsigned io$v_fcode_fill_50 : 6;b unsigned io$v_mkfill1 : 1; /* Filler to not coincide with TU modifier (for safety) */N unsigned io$v_allowfast_never : 1; /* Disable all skip by filemarks */` unsigned io$v_allowfast_per_io : 1; /* Enable skip by filemarks with i/o fcn modifier */c unsigned io$v_allowfast_always : 1; /* Default all IO$_SKIPFILE to use skip by filemarks */# unsigned io$v_fill_59_ : 6;$ } io$r_mk_setmode_modifiers;N/* Snapshot-capable disk (SD) driver function modifier bits. */ __struct {( unsigned io$v_fcod e_fill_51 : 6;N unsigned io$v_add : 1; /* Add UNIT to an existing pool */# unsigned io$v_fill_60_ : 1; } io$r_sd_modifiers;N/* USB usbattr modifiers */ __struct {( unsigned io$v_fcode_fill_52 : 6;Y unsigned io$v_idstring : 1; /* Request for printer's 1284 device ID string */` unsigned io$v_serialnum : 1; /* Request for printer's serial number (if supported) */% } io $r_usb_usbattr_modifiers;N/* Disk-specific PACKACK modifiers */ __struct {2 unsigned io$v_disk_packack_fcode_fill : 6;m unsigned io$v_mscp_format_fill : 1; /* Filler to coincide with MSCP_FORMAT modifier for DU PACKACK */q unsigned io$v_bypass_valid_chk : 1; /* Send PACKACK to driver even if UCB$M_VALID is set (LCLDSKVALID) */& } io$r_disk_packack_modifiers; } ; #if !defined(__VAXC)2#define io$v_fcode io$r_ fcode_structure.io$v_fcode<#define io$v_fmodifiers io$r_fcode_structure.io$v_fmodifiers9#define io$v_inherlog io$r_errlog_modifiers.io$v_inherlog6#define io$v_erase io$r_disk_tape_modifiers.io$v_erase8#define io$v_exfunc io$r_disk_tape_modifiers.io$v_exfunc>#define io$v_datacheck io$r_disk_tape_modifiers.io$v_datacheck<#define io$v_inhretry io$r_disk_tape_modifiers.io$v_inhretry:#define io$v_syncsts io$r_disk_tape_modifiers.io$v_syncsts<#define io$v_novcache io$r_disk_tape_modifiers.io$v_novc ache8#define io$v_bufobj io$r_disk_tape_modifiers.io$v_bufobj:#define io$v_trusted io$r_disk_tape_modifiers.io$v_trusted@#define io$v_file_flush io$r_disk_tape_modifiers.io$v_file_flush:#define io$v_barrier io$r_disk_tape_modifiers.io$v_barrier<#define io$v_rah_hint io$r_disk_tape_modifiers.io$v_rah_hint5#define io$v_inhseek io$r_disk_modifiers.io$v_inhseekB#define io$v_read_to_eof io$r_disk_read_modifiers.io$v_read_to_eof5#define io$v_reverse io$r_tape_modifiers.io$v_reverse3#define io$v_n owait io$r_tape_modifiers.io$v_nowait9#define io$v_inhextgap io$r_tape_modifiers.io$v_inhextgap9#define io$v_retension io$r_tape_modifiers.io$v_retension9#define io$v_allowfast io$r_tape_modifiers.io$v_allowfast=#define io$v_mt3_density io$r_tape_modifiers.io$v_mt3_density@#define io$v_mscpmodifs io$r_dutu_xfer_modifiers.io$v_mscpmodifs7#define io$v_shadow io$r_du_sense_modifiers.io$v_shadow7#define io$v_locate io$r_du_sense_modifiers.io$v_locateC#define io$v_mscp_format io$r_du_packack _modifiers.io$v_mscp_format;#define io$v_allhosts io$r_du_avail_modifiers.io$v_allhosts;#define io$v_dissolve io$r_du_avail_modifiers.io$v_dissolve=#define io$v_nocleanup io$r_du_avail_modifiers.io$v_nocleanup=#define io$v_spindown io$r_du_remshad_modifiers.io$v_spindownA#define io$v_est_com_path io$r_du_dcd_modifiers.io$v_est_com_pathA#define io$v_lcl_src_unit io$r_du_dcd_modifiers.io$v_lcl_src_unitA#define io$v_rtn_com_path io$r_du_dcd_modifiers.io$v_rtn_com_path;#define io$v_dealc_a ll io$r_du_whm_modifiers.io$v_dealc_all;#define io$v_dealc_hrn io$r_du_whm_modifiers.io$v_dealc_hrnA#define io$v_dealc_entloc io$r_du_whm_modifiers.io$v_dealc_entloc9#define io$v_decr_afc io$r_du_whm_modifiers.io$v_decr_afc9#define io$v_read_all io$r_du_whm_modifiers.io$v_read_all9#define io$v_read_hrn io$r_du_whm_modifiers.io$v_read_hrn=#define io$v_break_conn io$r_du_whm_modifiers.io$v_break_conn?#define io$v_stepover io$r_hbs_copyshad_modifiers.io$v_stepover;#define io$v_copyop io$r_hbs_copyshad_modifiers.io$v_copyop:#define io$v_exists io$r_hbs_creshad_modifiers.io$v_exists4#define io$v_cbs io$r_hbs_creshad_modifiers.io$v_cbs<#define io$v_booting io$r_hbs_creshad_modifiers.io$v_bootingF#define io$v_req_minicopy io$r_hbs_creshad_modifiers.io$v_req_minicopyF#define io$v_opt_minicopy io$r_hbs_creshad_modifiers.io$v_opt_minicopyB#define io$v_nominicopy io$r_hbs_creshad_modifiers.io$v_nominicopyP#define io$v_expect_mount_done io$r_hbs_creshad_modifiers.io$v_expect_mount_done 9#define io$v_vuex_fc io$r_hbs_xfer_modifiers.io$v_vuex_fc<#define io$v_write_scb io$r_hbs_scb_modifiers.io$v_write_scb>#define io$v_upd_scblbn io$r_hbs_scb_modifiers.io$v_upd_scblbn<#define io$v_forcepath io$r_prfpath_modifiers.io$v_forcepathD#define io$v_preferred_cpu io$r_prfpath_modifiers.io$v_preferred_cpuF#define io$v_sys_assignable io$r_prfpath_modifiers.io$v_sys_assignable1#define io$v_commod io$r_dr_modifiers.io$v_commod9#define io$v_movetrackd io$r_dr_modifiers.io$v_movetrackd9#d efine io$v_diagnostic io$r_dr_modifiers.io$v_diagnostic7#define io$v_skpsecinh io$r_dr_modifiers.io$v_skpsecinh3#define io$v_deldata io$r_dy_modifiers.io$v_deldata1#define io$v_nomrsp io$r_dd_modifiers.io$v_nomrsp/#define io$v_swap io$r_ts11_modifiers.io$v_swap7#define io$v_opposite io$r_ts11_modifiers.io$v_opposite7#define io$v_clserexcp io$r_tu_modifiers.io$v_clserexcpC#define io$v_chunkdiag io$r_tu_lg_transfer_modifiers.io$v_chunkdiag7#define io$v_tbc io$r_tu_lg_transfer_modifiers.i o$v_tbc9#define io$v_enarep io$r_tu_setmode_modifiers.io$v_enarep2#define io$v_access io$r_acp_modifiers.io$v_access2#define io$v_create io$r_acp_modifiers.io$v_create2#define io$v_delete io$r_acp_modifiers.io$v_delete0#define io$v_mount io$r_acp_modifiers.io$v_mount2#define io$v_dmount io$r_acp_modifiers.io$v_dmount4#define io$v_remount io$r_acp_modifiers.io$v_remount6#define io$v_movefile io$r_acp_modifiers.io$v_movefile8#define io$v_rwshelved io$r_acp_modifiers.io$v_rwshelved2#define io $v_setdir io$r_acp_modifiers.io$v_setdir1#define io$v_binary io$r_cr_modifiers.io$v_binary1#define io$v_packed io$r_cr_modifiers.io$v_packed+#define io$v_now io$r_mb_modifiers.io$v_now1#define io$v_stream io$r_mb_modifiers.io$v_stream;#define io$v_readercheck io$r_mb_modifiers.io$v_readercheck;#define io$v_writercheck io$r_mb_modifiers.io$v_writercheck5#define io$v_norswait io$r_mb_modifiers.io$v_norswaitI#define io$v_mb_room_notify io$r_mb_setmode_modifiers.io$v_mb_room_notify=#defin e io$v_readattn io$r_mb_setmode_modifiers.io$v_readattn;#define io$v_wrtattn io$r_mb_setmode_modifiers.io$v_wrtattn;#define io$v_setprot io$r_mb_setmode_modifiers.io$v_setprotA#define io$v_readerwait io$r_mb_setmode_modifiers.io$v_readerwaitA#define io$v_writerwait io$r_mb_setmode_modifiers.io$v_writerwait6#define io$v_noecho io$r_tt_read_modifiers.io$v_noecho4#define io$v_timed io$r_tt_read_modifiers.io$v_timed6#define io$v_cvtlow io$r_tt_read_modifiers.io$v_cvtlow8#define io$v_nofiltr i o$r_tt_read_modifiers.io$v_nofiltr:#define io$v_dsablmbx io$r_tt_read_modifiers.io$v_dsablmbx4#define io$v_purge io$r_tt_read_modifiers.io$v_purge<#define io$v_trmnoecho io$r_tt_read_modifiers.io$v_trmnoecho8#define io$v_refresh io$r_tt_read_modifiers.io$v_refresh6#define io$v_escape io$r_tt_read_modifiers.io$v_escape6#define io$v_extend io$r_tt_read_modifiers.io$v_extend;#define io$v_canctrlo io$r_tt_write_modifiers.io$v_canctrlo;#define io$v_enablmbx io$r_tt_write_modifiers.io$v_enablmbx; #define io$v_noformat io$r_tt_write_modifiers.io$v_noformat=#define io$v_breakthru io$r_tt_write_modifiers.io$v_breakthru9#define io$v_newline io$r_tt_write_modifiers.io$v_newlineC#define io$v_typeahdcnt io$r_tt_sensemode_modifiers.io$v_typeahdcnt7#define io$v_maint io$r_tt_setmode_modifiers.io$v_maint=#define io$v_ctrlyast io$r_tt_setmode_modifiers.io$v_ctrlyast=#define io$v_ctrlcast io$r_tt_setmode_modifiers.io$v_ctrlcast9#define io$v_hangup io$r_tt_setmode_modifiers.io$v_hangup;#def ine io$v_outband io$r_tt_setmode_modifiers.io$v_outbandA#define io$v_tt_connect io$r_tt_setmode_modifiers.io$v_tt_connect?#define io$v_tt_discon io$r_tt_setmode_modifiers.io$v_tt_disconA#define io$v_tt_process io$r_tt_setmode_modifiers.io$v_tt_process9#define io$v_brdcst io$r_tt_setmode_modifiers.io$v_brdcst3#define io$v_loop io$r_tt_maint_modifiers.io$v_loop7#define io$v_unloop io$r_tt_maint_modifiers.io$v_unloop;#define io$v_line_off io$r_tt_maint_modifiers.io$v_line_off=#define io$v _set_modem io$r_tt_maint_modifiers.io$v_set_modem9#define io$v_line_on io$r_tt_maint_modifiers.io$v_line_on;#define io$v_loop_ext io$r_tt_maint_modifiers.io$v_loop_ext?#define io$v_autxof_ena io$r_tt_maint_modifiers.io$v_autxof_ena?#define io$v_autxof_dis io$r_tt_maint_modifiers.io$v_autxof_dis=#define io$v_include io$r_tt_outofband_modifiers.io$v_include?#define io$v_tt_abort io$r_tt_outofband_modifiers.io$v_tt_abortB#define io$v_posixinit io$r_tt_psxsetmode_modifiers.io$v_posixinitB#define io$v_posixflow io$r_tt_psxsetmode_modifiers.io$v_posixflowA#define io$v_set_posix io$r_tt_posixinit_modifiers.io$v_set_posixE#define io$v_clear_posix io$r_tt_posixinit_modifiers.io$v_clear_posixE#define io$v_set_termios io$r_tt_posixinit_modifiers.io$v_set_termios=#define io$v_set_ptc io$r_tt_posixinit_modifiers.io$v_set_ptcA#define io$v_clear_ptc io$r_tt_posixinit_modifiers.io$v_clear_ptcA#define io$v_flush_tab io$r_tt_posixinit_modifiers.io$v_flush_tabG#define io$v_flush_output io$r_tt_posixinit_modifiers.io$v_flush_outputC#define io$v_update_ptc io$r_tt_posixinit_modifiers.io$v_update_ptc?#define io$v_out_xoff io$r_tt_posixflow_modifiers.io$v_out_xoff=#define io$v_out_xon io$r_tt_posixflow_modifiers.io$v_out_xon=#define io$v_in_xoff io$r_tt_posixflow_modifiers.io$v_in_xoff;#define io$v_in_xon io$r_tt_posixflow_modifiers.io$v_in_xonA#define io$v_o_nonblock io$r_tt_psxread_modifiers.io$v_o_nonblockC#define io$v_interrupt io$r_net_write_read_modifiers.io$v_interrup tA#define io$v_multiple io$r_net_write_read_modifiers.io$v_multiple?#define io$v_lockbuf io$r_net_write_read_modifiers.io$v_lockbuf?#define io$v_noblock io$r_net_write_read_modifiers.io$v_noblock7#define io$v_abort io$r_net_accdea_modifiers.io$v_abort7#define io$v_synch io$r_net_accdea_modifiers.io$v_synch>#define io$v_response io$r_dlink_write_modifiers.io$v_response>#define io$v_startup io$r_dlink_setmode_modifiers.io$v_startup@#define io$v_shutdown io$r_dlink_setmode_modifiers.io$v_sh utdown>#define io$v_attnast io$r_dlink_setmode_modifiers.io$v_attnast8#define io$v_ctrl io$r_dlink_setmode_modifiers.io$v_ctrl>#define io$v_set_mac io$r_dlink_setmode_modifiers.io$v_set_macD#define io$v_update_map io$r_dlink_setmode_modifiers.io$v_update_map:#define io$v_route io$r_dlink_setmode_modifiers.io$v_route>#define io$v_rd_mem io$r_dlink_sensemode_modifiers.io$v_rd_memB#define io$v_rd_modem io$r_dlink_sensemode_modifiers.io$v_rd_modemB#define io$v_rd_count io$r_dlink_sensemode_modifie rs.io$v_rd_countD#define io$v_clr_count io$r_dlink_sensemode_modifiers.io$v_clr_countD#define io$v_sense_mac io$r_dlink_sensemode_modifiers.io$v_sense_macB#define io$v_show_map io$r_dlink_sensemode_modifiers.io$v_show_mapF#define io$v_show_route io$r_dlink_sensemode_modifiers.io$v_show_route4#define io$v_more io$r_x25_write_modifiers.io$v_more>#define io$v_qualified io$r_x25_write_modifiers.io$v_qualified=#define io$v_redirect io$r_x25_access_modifiers.io$v_redirect9#define io$v_accept io$r_x 25_access_modifiers.io$v_accept8#define io$v_setevf io$r_lpa_start_modifiers.io$v_setevf-#define io$v_word io$r_xa_modifiers.io$v_word3#define io$v_setfnct io$r_xa_modifiers.io$v_setfnct5#define io$v_datapath io$r_xa_modifiers.io$v_datapath/#define io$v_cycle io$r_xa_modifiers.io$v_cycle/#define io$v_reset io$r_xa_modifiers.io$v_reset:#define io$v_setcuadr io$r_ibm3271_modifiers.io$v_setcuadr:#define io$v_setbsize io$r_ibm3271_modifiers.io$v_setbsize<#define io$v_setpoolsz io$r_ibm3271_ modifiers.io$v_setpoolsz<#define io$v_setenqcnt io$r_ibm3271_modifiers.io$v_setenqcnt4#define io$v_clear io$r_ibm3271_modifiers.io$v_clear6#define io$v_lpbext io$r_ibm3271_modifiers.io$v_lpbext6#define io$v_lpbint io$r_ibm3271_modifiers.io$v_lpbint8#define io$v_readcsr io$r_ibm3271_modifiers.io$v_readcsr7#define io$v_noctswait io$r_xw_modifiers.io$v_noctswait5#define io$v_slavloop io$r_xw_modifiers.io$v_slavloop7#define io$v_nodsrwait io$r_xw_modifiers.io$v_nodsrwait7#define io$v_maintloop  io$r_xw_modifiers.io$v_maintloop7#define io$v_lastblock io$r_xw_modifiers.io$v_lastblock5#define io$v_intclock io$r_xw_modifiers.io$v_intclock9#define io$v_lt_connect io$r_lt_modifiers.io$v_lt_connect7#define io$v_lt_discon io$r_lt_modifiers.io$v_lt_discon;#define io$v_lt_readport io$r_lt_modifiers.io$v_lt_readport;#define io$v_lt_map_port io$r_lt_modifiers.io$v_lt_map_port7#define io$v_lt_rating io$r_lt_modifiers.io$v_lt_rating;#define io$v_lt_sol_info io$r_lt_modifiers.io$v_lt_sol_i nfo;#define io$v_lt_rcv_info io$r_lt_modifiers.io$v_lt_rcv_info9#define io$v_lt_setmode io$r_lt_modifiers.io$v_lt_setmode=#define io$v_lt_sensemode io$r_lt_modifiers.io$v_lt_sensemodeE#define io$v_lt_que_chg_notif io$r_lt_modifiers.io$v_lt_que_chg_notif=#define io$v_lt_map_filler io$r_lt_mapitem.io$v_lt_map_filler=#define io$v_lt_map_nodnam io$r_lt_mapitem.io$v_lt_map_nodnam=#define io$v_lt_map_pornam io$r_lt_mapitem.io$v_lt_map_pornam=#define io$v_lt_map_srvnam io$r_lt_mapitem.io$v_lt _map_srvnam=#define io$v_lt_map_lnknam io$r_lt_mapitem.io$v_lt_map_lnknam=#define io$v_lt_map_netadr io$r_lt_mapitem.io$v_lt_map_netadr/#define io$v_flush io$r_fs_modifiers.io$v_flush?#define io$v_write_barrier io$r_fs_modifiers.io$v_write_barrier;#define io$v_mkfill1 io$r_mk_setmode_modifiers.io$v_mkfill1K#define io$v_allowfast_never io$r_mk_setmode_modifiers.io$v_allowfast_neverM#define io$v_allowfast_per_io io$r_mk_setmode_modifiers.io$v_allowfast_per_ioM#define io$v_allowfast_alway s io$r_mk_setmode_modifiers.io$v_allowfast_always+#define io$v_add io$r_sd_modifiers.io$v_add>#define io$v_idstring io$r_usb_usbattr_modifiers.io$v_idstring@#define io$v_serialnum io$r_usb_usbattr_modifiers.io$v_serialnumO#define io$v_bypass_valid_chk io$r_disk_packack_modifiers.io$v_bypass_valid_chk"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __IODEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1  *//********************************************************************************************************************************//*** MODULE $IOSADEF ***/#ifndef __IOSADEF_LOADED#define __IOSADEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 un ion#else#define __union variant_union#endif#endif N/*+ */N/* Define I/O Status Area */N/*- */ N#define IOSA$K_LENGTH 32 /* Length of IOSA */N#define IOSA$C_LENGTH 32 /* Length of IOSA */N#define IOSA$S_IOSADEF 32  /* Size of IOSA */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _iosa {#pragma __nomember_alignment __union { __struct {N unsigned short int iosa$w_iosb_status; /* Final I/O status */ __union {N __struct { /* 16-bit byte count variant */P unsigned short int iosa$w_iosb_bcnt; /* 16-bit byte count */ __union {_ unsigned int iosa$l_iosb_dev_depend; /* 32-bit device dependent info */N unsigned int iosa$l_iosb_pid; /* 32-bit pid */# } iosa$r_l;% } iosa$r_bcnt_16;N __struct { /* 32-bit byte count variant */V unsign ed int iosa$l_iosb_bcnt; /* 32-bit byte count (unaligned) */f unsigned short int iosa$w_iosb_dev_depend_high; /* 16-bit device dependent info */% } iosa$r_bcnt_32;# } iosa$r_devdepend; } iosa$r_iosb; __struct {N unsigned int iosa$l_status; /* Status */N unsigned int iosa$l_resd; /* Reserved (driver) */ } iosa$r_statusq; } iosa$r_ios b_overlay; __union {N __int64 iosa$q_count_q; /* Force size */N __int64 iosa$ih_count; /* Number of bytes */ } iosa$r_bytecount; __union {N __int64 iosa$q_context_q; /* Force size */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *io sa$ph_context_p; /* User context area */#else$ unsigned __int64 iosa$ph_context_p;#endifN __int64 iosa$ih_context; /* User context area */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */P void *iosa$ph_updsec_nowrt_va; /* First VA not written by $UPDSEC_64 */#else* unsigned __int64 iosa$ph_updsec_nowrt_va; #endif } iosa$r_ctx;N __union { /* Just in case we need */N unsigned int iosa$l_resl [2]; /* in the future some */N __int64 iosa$q_resq; /* additional space */N __int64 iosa$q_context_id; /* User context ID */ } iosa$r_reserved; } IOSA; #if !defined(__VAXC)3#define iosa$r_iosb iosa$r_iosb_overlay.iosa$r_iosb9#define iosa$w_iosb_status iosa$r_iosb.iosa$w_iosb_statusU#define iosa$w_iosb_bcnt iosa$r_iosb.iosa$r_devdepend.iosa$r_bcnt_16.iosa$w_iosb_bcntE#define iosa$r_l iosa$r_iosb.iosa$r_devdepend.iosa$r_bcnt_16.iosa$r_l>#define iosa$l_iosb_dev_depend iosa$r_l.iosa$l_iosb_dev_depend0#define iosa$l_iosb_pid iosa$r_l.iosa$l_iosb_pidU#define iosa$l_iosb_bcnt iosa$r_iosb.iosa$r_devdepend.iosa$r_bcnt_32.iosa$l_iosb_bcntk#define iosa$w_iosb_dev_depend_high iosa$r_iosb.iosa$r_devdepend.iosa$r_bcnt_32.iosa$w_iosb_dev_depend_high9#def ine iosa$r_statusq iosa$r_iosb_overlay.iosa$r_statusq2#define iosa$l_status iosa$r_statusq.iosa$l_status.#define iosa$l_resd iosa$r_statusq.iosa$l_resd6#define iosa$q_count_q iosa$r_bytecount.iosa$q_count_q4#define iosa$ih_count iosa$r_bytecount.iosa$ih_count4#define iosa$q_context_q iosa$r_ctx.iosa$q_context_q6#define iosa$ph_context_p iosa$r_ctx.iosa$ph_context_p2#define iosa$ih_context iosa$r_ctx.iosa$ih_contextB#define iosa$ph_updsec_nowrt_va iosa$r_ctx.iosa$ph_updsec_nowrt_va/#define iosa$l_resl iosa$r_reserved.iosa$l_resl/#define iosa$q_resq iosa$r_reserved.iosa$q_resq;#define iosa$q_context_id iosa$r_reserved.iosa$q_context_id"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _iosa {#pragma __nomember_alignment __union { __struct {N unsigned short int iosa$w_iosb_status; /* Final I/O status */ __union {N __struct { /* 16-bit byte count variant */P unsigned short int iosa$w_iosb_bcnt; /* 16-bit byte count */ __union {_ unsigned int iosa$l_iosb_dev_depend; /* 32-bit device dependent info */N unsigned int iosa$l_iosb_pid; /* 32-bit pid */# } iosa $r_l;% } iosa$r_bcnt_16;N __struct { /* 32-bit byte count variant */V unsigned int iosa$l_iosb_bcnt; /* 32-bit byte count (unaligned) */f unsigned short int iosa$w_iosb_dev_depend_high; /* 16-bit device dependent info */% } iosa$r_bcnt_32;# } iosa$r_devdepend; } iosa$r_iosb; __struct {N unsigned int iosa$l_status; /* Status  */N unsigned int iosa$l_resd; /* Reserved (driver) */ } iosa$r_statusq; } iosa$r_iosb_overlay; __union {N int iosa$q_count_q [2]; /* Force size */N __int64 iosa$ih_count; /* Number of bytes */ } iosa$r_bytecount; __union {N int iosa$q_context_q [2]; /* Force size */N unsigned __int64 iosa$ph_context_p; /* User context area */N __int64 iosa$ih_context; /* User context area */Z unsigned __int64 iosa$ph_updsec_nowrt_va; /* First VA not written by $UPDSEC_64 */ } iosa$r_ctx;N __union { /* Just in case we need */N unsigned int iosa$l_resl [2]; /* in the future some */N __int64 iosa$q_resq; /* additional space */N __int64 iosa$q_conte xt_id; /* User context ID */ } iosa$r_reserved; } iosa; #if !defined(__VAXC)M#define iosa$w_iosb_status iosa$r_iosb_overlay.iosa$r_iosb.iosa$w_iosb_statusi#define iosa$w_iosb_bcnt iosa$r_iosb_overlay.iosa$r_iosb.iosa$r_devdepend.iosa$r_bcnt_16.iosa$w_iosb_bcnt~#define iosa$l_iosb_dev_depend iosa$r_iosb_overlay.iosa$r_iosb.iosa$r_devdepend.iosa$r_bcnt_16.iosa$r_l.iosa$l_iosb_dev_dependp#define iosa$l_iosb_pid iosa$r_iosb_overlay.iosa$r_iosb.iosa$r_devdepend.iosa$r_bcnt_16.iosa$r_l.iosa$l_iosb_pidi#define iosa$l_iosb_bcnt iosa$r_iosb_overlay.iosa$r_iosb.iosa$r_devdepend.iosa$r_bcnt_32.iosa$l_iosb_bcnt#define iosa$w_iosb_dev_depend_high iosa$r_iosb_overlay.iosa$r_iosb.iosa$r_devdepend.iosa$r_bcnt_32.iosa$w_iosb_dev_depend_highF#define iosa$l_status iosa$r_iosb_overlay.iosa$r_statusq.iosa$l_statusB#define iosa$l_resd iosa$r_iosb_overlay.iosa$r_statusq.iosa$l_resd6#define iosa$q_count_q iosa$r_bytecount.iosa$q_count_q4#define iosa$ih_count iosa$r _bytecount.iosa$ih_count4#define iosa$q_context_q iosa$r_ctx.iosa$q_context_q6#define iosa$ph_context_p iosa$r_ctx.iosa$ph_context_p2#define iosa$ih_context iosa$r_ctx.iosa$ih_contextB#define iosa$ph_updsec_nowrt_va iosa$r_ctx.iosa$ph_updsec_nowrt_va/#define iosa$l_resl iosa$r_reserved.iosa$l_resl/#define iosa$q_resq iosa$r_reserved.iosa$q_resq;#define iosa$q_context_id iosa$r_reserved.iosa$q_context_id"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifd ef __NEW_STARLETtypedef __int64 FANDLE;#else /* __OLD_STARLET */typedef __int64 fandle;%#endif /* #ifdef __NEW_STARLET */M#pragma __required_pointer_size __save /* Save current pointer size */G#pragma __required_pointer_size __long /* Pointers are 64-bit */Atypedef struct _iosa * IOSA_PQ; /* Pointer to an IOSA */Itypedef struct _iosa ** IOSA_PPQ; /* Pointer to a pointer to an IOSA */#ifdef __NEW_STARLET=typedef FANDLE * FANDLE_PQ; /* Pointer t o FANDLE */Ftypedef FANDLE ** FANDLE_PPQ; /* Pointer to pointer to FANDLE */#else=typedef fandle * FANDLE_PQ; /* Pointer to fandle */Ftypedef fandle ** FANDLE_PPQ; /* Pointer to pointer to fandle */#endifO#pragma __required_pointer_size __restore /* Return to previous pointer size */N/*+ */N/* $IO_SETUP flag bits */N/*-  */#define FIO$M_EXPEDITE 0x1#define FIO$M_AST_NOFLOAT 0x2#define FIO$M_CTX 0x4 #ifdef __NEW_STARLETtypedef union _setup_flags { int fio$l_flags_longword; __struct {N unsigned fio$v_expedite : 1; /* Make this a high-priority I/O */T unsigned fio$v_ast_nofloat : 1; /* The AST routine does not use f.p. regs */X unsigned fio$v_ctx : 1; /* Completion notification done via EFN$C_CTX */$ unsigned fio$v_fill_61_ : 5; } fio$r_flag_bits; } SETUP_FLAGS; #if !defined(__VAXC)5#define fio$v_expedite fio$r_flag_bits.fio$v_expedite;#define fio$v_ast_nofloat fio$r_flag_bits.fio$v_ast_nofloat+#define fio$v_ctx fio$r_flag_bits.fio$v_ctx"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union setup_flags { int fio$l_flags_longword; __struct {N unsigned fio$v_expedite : 1; /* Make this a high-priority I/O */T  unsigned fio$v_ast_nofloat : 1; /* The AST routine does not use f.p. regs */X unsigned fio$v_ctx : 1; /* Completion notification done via EFN$C_CTX */$ unsigned fio$v_fill_61_ : 5; } fio$r_flag_bits; } ; #if !defined(__VAXC)5#define fio$v_expedite fio$r_flag_bits.fio$v_expedite;#define fio$v_ast_nofloat fio$r_flag_bits.fio$v_ast_nofloat+#define fio$v_ctx fio$r_flag_bits.fio$v_ctx"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __IOSADEF_LOADED */ ww/********************************************************************************************************************************/=/* Cre ated: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $IOSBDEF ***/#ifndef __IOSBDEF_LOADED#define __IOSBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* Define I/O Status Block */N/*- */  #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) & & !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _iosb {#pragma __nomember_alignment __union { __struct {N unsigned short int iosb$w_status; /* Final I/O status */ __union {N __struct { /* 16-bit byte count variant */N unsigned short int iosb$w_bcnt; /* 16-bit byte count */ __union {Z unsigned int iosb$l_dev_depend; /* 32-bit device dependent info */N unsigned int iosb$l_pid; /* 32-bit pid */# } iosb$r_l;% } iosb$r_bcnt_16;N __struct { /* 32-bit byte count variant */Q unsigned int iosb$l_bcnt; /* 32-bit byte count (unaligned) */a unsigned short int iosb$w_dev_depend_h igh; /* 16-bit device dependent info */% } iosb$r_bcnt_32;# } iosb$r_devdepend; } iosb$r_io_64; __struct { __union {N unsigned int iosb$l_getxxi_status; /* Final GETxxI status */N unsigned int iosb$l_reg_status; /* Final $Registry status */" } iosb$r_l_status;N unsigned int iosb$l_reserved; /* Reserved field */ } iosb$r_get_64;  } iosb$r_io_get; } IOSB; #if !defined(__VAXC)>#define iosb$w_status iosb$r_io_get.iosb$r_io_64.iosb$w_statusZ#define iosb$w_bcnt iosb$r_io_get.iosb$r_io_64.iosb$r_devdepend.iosb$r_bcnt_16.iosb$w_bcntT#define iosb$r_l iosb$r_io_get.iosb$r_io_64.iosb$r_devdepend.iosb$r_bcnt_16.iosb$r_l4#define iosb$l_dev_depend iosb$r_l.iosb$l_dev_depend&#define iosb$l_pid iosb$r_l.iosb$l_pidZ#define iosb$l_bcnt iosb$r_io_get.iosb$r_io_64.iosb$r_devdepend.iosb$r_bcnt_32.iosb$l_bcntp#define iosb$w_d ev_depend_high iosb$r_io_get.iosb$r_io_64.iosb$r_devdepend.iosb$r_bcnt_32.iosb$w_dev_depend_high]#define iosb$l_getxxi_status iosb$r_io_get.iosb$r_get_64.iosb$r_l_status.iosb$l_getxxi_statusW#define iosb$l_reg_status iosb$r_io_get.iosb$r_get_64.iosb$r_l_status.iosb$l_reg_status"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else #pragma __nomember_alignment#endiftypedef struct _iosb {#pragma __nomember_alignment __union { __struct {N unsigned short int iosb$w_status; /* Final I/O status */ __union {N __struct { /* 16-bit byte count variant */N unsigned short int iosb$w_bcnt; /* 16-bit byte count */ __union {Z unsigned int iosb$l_dev_depend; /* 32-bit device depen dent info */N unsigned int iosb$l_pid; /* 32-bit pid */# } iosb$r_l;% } iosb$r_bcnt_16;N __struct { /* 32-bit byte count variant */Q unsigned int iosb$l_bcnt; /* 32-bit byte count (unaligned) */a unsigned short int iosb$w_dev_depend_high; /* 16-bit device dependent info */% } iosb$r_bcnt_32;# } iosb$r_devdepend; } iosb$r_io_64; __struct { __union {N unsigned int iosb$l_getxxi_status; /* Final GETxxI status */N unsigned int iosb$l_reg_status; /* Final $Registry status */" } iosb$r_l_status;N unsigned int iosb$l_reserved; /* Reserved field */ } iosb$r_get_64; } iosb$r_io_get; } iosb; #if !defined(__VAXC)>#define iosb$w_status iosb$r_io_get.iosb$r_io_64.iosb$w_statusZ#define iosb$w_bcnt iosb$r_io_get.iosb$r_io_64.iosb$r_devdepend.iosb$r_bcnt_16.iosb$w_bcnto#define iosb$l_dev_depend iosb$r_io_get.iosb$r_io_64.iosb$r_devdepend.iosb$r_bcnt_16.iosb$r_l.iosb$l_dev_dependa#define iosb$l_pid iosb$r_io_get.iosb$r_io_64.iosb$r_devdepend.iosb$r_bcnt_16.iosb$r_l.iosb$l_pidZ#define iosb$l_bcnt iosb$r_io_get.iosb$r_io_64.iosb$r_devdepend.iosb$r_bcnt_32.iosb$l_bcntp#define iosb$w_dev_depend_high iosb$r_io_get.iosb$r_io_64.iosb$r_devdepend.iosb$r_bcnt_32.iosb $w_dev_depend_high]#define iosb$l_getxxi_status iosb$r_io_get.iosb$r_get_64.iosb$r_l_status.iosb$l_getxxi_statusW#define iosb$l_reg_status iosb$r_io_get.iosb$r_get_64.iosb$r_l_status.iosb$l_reg_status"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define IOSB$K_LENGTH 8 /* Length of IOSB */N#define IOSB$C_LENGTH 8 /* Length of IOSB */ )#if defined (__ALPHA) || defined (__ia64)# ifdef __INITIAL_POINTER_SIZEM# pragma __required_pointer_size __save /* Save current pointer size */G# pragma __required_pointer_size 64 /* Pointers are 64-bits */K typedef struct _iosb * IOSB_PQ; /* 64-bit pointer to an IOSB */Y typedef struct _iosb ** IOSB_PPQ; /* 64-bit pointer to a pointer to an IOSB */S# pragma __required_pointer_size __restore /* Return to previous pointer size */# elseW typedef unsigned __int64 IOSB_PQ; /* Same size as a 64-bit pointer to an IOSB */d typedef unsigned __int64 IOSB_PPQ; /* Same size as a 64-bit pointer to a pointer to an IOSB */# endif#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __IOSBDEF_LOADED */ wwi/* *******************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $ISSDEF ***/#ifndef __ISSDEF_LOADED#define __ISSDEF_LOADED 1 G#pragma __nostan dard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* $PERSONA_CREATE, $PERSONA_CREATE_INT itemlist item codes */N/* These item codes must match the TLV item codes in [LIB]PSBDEF.SDL */N/* */N/*- */N/*+ */O/* At the time of this modules creation there are four CHP$ item codes which */O/* must have the same value as their ISS$ counterparts. They are as follows: */N/*  */N/* ISS$_WORKPRIV = CHP$_PRIV = 3 */N/* ISS$_CLASS = CHP$_CLASS = 5 */N/* ISS$_ADD_RIGHTS = CHP$_ADD_RIGHTS = 7 */N/* ISS$_UIC = CHP$_UIC = 22 */N/* */N/* This is to preserve backward comptibility with $CREATE_USER_PROFILE. */N/*- */N#define ISS$_FLAGS 1 /* 1 Persona flags */N#define ISS$_ARBFLAGS 2 /* 2 Unused */N#define ISS$_WORKPRIV 3 /* 3 Working privileges */N#define ISS$_MODE 4 /* 4 Access mode */N#define ISS$_WORKCLASS 5 /* 5 Working classification */N#define ISS$_RIGHTS 6 /* 6 Rights */N#define ISS$_ADD_RIGHTS 7 /* 7 Add to the Rights */N#define ISS$_ADD_AUTHRIGHTS 8 /* 8 Add to the AuthRights */N#define ISS$_USERNAME 9 /* 9 Username */N#define ISS$_ACCOUNT 10 /* 10 Account */N#define ISS$_NOAUDIT 11 /* 11 No Audit setting */N#define ISS$_AUTHPRIV 12  /* 12 Authorized privileges */N#define ISS$_PERMPRIV 13 /* 13 Permanent privileges */N#define ISS$_IMAGE_WORKPRIV 14 /* 14 Image working privileges */N#define ISS$_ENABLED 15 /* 15 Rights enabled mask */N#define ISS$_AUTHRIGHTS 16 /* 16 Authorized rights */N#define ISS$_MINCLASS 17 /* 17 Minimum classification */N#define ISS$_MAXCLASS 18 /* 18 Maximum classification */N#define ISS$_UID 19 /* 19 UID */N#define ISS$_PERSONA_ID 20 /* 20 Persona ID */N#define ISS$_PRINCIPAL 21 /* 21 Principal Name */N#define ISS$_UIC 22 /* 22 UIC */N#define ISS$_SWITCH_EXTENSION 23 /* 23 Switch Extension directive */N#define ISS$_PRIMARY_EXTENSION 24 /* 24 PSB Primary Extension */N#define ISS$_EXTENSION_COUNT 25 /* 25 Count of valid extensions */N#define ISS$_EXTENSION_ARRAY 26 /* 26 Array of valid extension IDs */N#define ISS$_RIGHTS_INDEX 27 /* 27 Rights Chain Index - sets the */N/* chain for all rights list */N/* operations. */P#define ISS$_INPUT_DATA 28 /* 28 Generic buffer for IN/OUT query */N#define ISS$_POSIX_UID 29  /* 29 POSIX User ID */N#define ISS$_POSIX_GID 30 /* 30 POSIX Group ID */#define ISS$_MIN_ITEM_CODE 1#define ISS$_MAX_ITEM_CODE 30N/*+ */N/* Bits within item code ISS$_FLAGS */N/*- */ #define ISS$M_FLAG_PERMANENT 0x1#define ISS$M_FLAG_SECAUDIT 0x2 #ifdef __NEW_STARLETtypedef union _issflagsdef { __struct {* unsigned iss$v_flag_permanent : 1;) unsigned iss$v_flag_secaudit : 1;# unsigned iss$v_fill_0 : 30; } iss$r_issflags_bits; } ISSFLAGSDEF; #if !defined(__VAXC)E#define iss$v_flag_permanent iss$r_issflags_bits.iss$v_flag_permanentC#define iss$v_flag_secaudit iss$r_issflags_bits.iss$v_flag_secaudit"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union issflagsdef { __struct {* unsigned iss$v_flag_permanent : 1;) unsigned iss$v_flag_secaudit : 1;# unsigned iss$v_fill_0 : 30; } iss$r_issflags_bits; } ; #if !defined(__VAXC)E#define iss$v_flag_permanent iss$r_issflags_bits.iss$v_flag_permanentC#define iss$v_flag_secaudit iss$r_issflags_bits.iss$v_flag_secaudit"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* Codes that represent common attributes that are normally  */N/* present in all persona extensions */N#define ISS$_COMMON_FLAGS 1024 /* Flags */N#define ISS$_COMMON_USERNAME 1025 /* Username */N#define ISS$_COMMON_ACCOUNT 1026 /* Account */N#define ISS$_DOMAIN 1027 /* Domain */N#define ISS$_COMMON_PRINCIPAL 1028 /* principal */#define ISS$_DOI  1029N#define ISS$_EXTENSION 1030 /* Extension name */N#define ISS$_MAKE_TLV 1031 /* For NSA$MAKE_TLV */&#define ISS$_MIN_COMMON_ITEM_CODE 1024&#define ISS$_MAX_COMMON_ITEM_CODE 1031N/* Codes that represent attributes specific to each persona extension. */N/* These codes are shared by all extensions. */N/* NT Persona extension item codes */N#define ISS$_NT_TO KEN 8192 /* token */N#define ISS$_NT_SECURITY_SUBJECT 8193 /* securtiy context */#define ISS$_NT_FLAGS 8194"#define ISS$_NT_USER_REFCOUNT 8195#define ISS$_NT_PRINCIPAL 8196N#define ISS$_NT_CREDENTIALS 8197 /* access token + security context */N#define ISS$_NT_NT_OWF_PASSWORD 8198 /* */N#define ISS$_NT_LM_OWF_PASSWORD 8199 /* */%#define ISS$_NT_UNPACK_CRED_ SIZE 8200"#define ISS$_NT_TOKEN_TOKENID 8201+#define ISS$_NT_TOKEN_IMPERSONATELEVEL 8202+#define ISS$_NT_TOKEN_AUTHENTICATIONID 8203,#define ISS$_NT_TOKEN_USERANDGROUPCOUNT 8204)#define ISS$_NT_TOKEN_VARIABLELENGTH 8205(#define ISS$_NT_TOKEN_USERANDGROUPS 8206,#define ISS$_NT_TOKEN_USERANDGROUPS_SID 8207'#define ISS$_NT_TOKEN_PRIMARYGROUP 8208%#define ISS$_NT_TOKEN_PRIVILEGES 8209&#define ISS$_NT_TOKEN_DEFAULTDACL 8210"#define ISS$_NT_TOKEN_UNIXUID 8211"#define ISS$_NT_TOKEN_UNIXGID 8212"#define ISS$_NT_TOKEN_GIDINFO 8213'#define ISS$_NT_TOKEN_GIDINFO_GIDS 8214##define ISS$_NT_TOKEN_UNIXNAME 8215%#define ISS$_NT_TOKEN_DOMAINNAME 8216##define ISS$_NT_TOKEN_USERNAME 8217)#define ISS$_NT_TOKEN_USERSESSIONKEY 8218'#define ISS$_NT_TOKEN_LMSESSIONKEY 8219'#define ISS$_NT_TOKEN_VARIABLEPART 8220%#define ISS$_NT_TOKEN_GROUP_LIST 8221*#define ISS$_NT_TOKEN_PRIVILEGES_LIST 8222'#define ISS$_NT_SECURITY_SIGNATURE 8223$#define ISS$_NT_SECURITY_SMBUID 8224,#define ISS$_N T_SECURITY_PROCESSAUDITID 8225'#define ISS$_NT_SECURITY_PROCESSID 8226%#define ISS$_NT_SECURITY_LOGONID 8227'#define ISS$_NT_SECURITY_LOGONTYPE 8228*#define ISS$_NT_SECURITY_SUBJECTFLAGS 8229+#define ISS$_NT_SECURITY_CONTEXT_OTHER 8230"#define ISS$_MIN_NT_ITEM_CODE 8192"#define ISS$_MAX_NT_ITEM_CODE 8230N/*+ */N/* Bits within item code ISS$_ENABLED */N/*-  */!#define ISS$M_ENABLED_PERSONA 0x1##define ISS$M_ENABLED_SUBSYSTEM 0x2#define ISS$M_ENABLED_IMAGE 0x4 #define ISS$M_ENABLED_SYSTEM 0x8$#define ISS$M_ENABLED_TEMPORARY 0x10 #ifdef __NEW_STARLETtypedef union _issenableddef { __struct {+ unsigned iss$v_enabled_persona : 1;- unsigned iss$v_enabled_subsystem : 1;) unsigned iss$v_enabled_image : 1;* unsigned iss$v_enabled_system : 1;- unsigned  iss$v_enabled_temporary : 1;# unsigned iss$v_fill_0 : 27; } iss$r_issenabled_bits; } ISSENABLEDDEF; #if !defined(__VAXC)I#define iss$v_enabled_persona iss$r_issenabled_bits.iss$v_enabled_personaM#define iss$v_enabled_subsystem iss$r_issenabled_bits.iss$v_enabled_subsystemE#define iss$v_enabled_image iss$r_issenabled_bits.iss$v_enabled_imageG#define iss$v_enabled_system iss$r_issenabled_bits.iss$v_enabled_systemM#define iss$v_enabled_temporary iss$r_issenabled_bits.iss$v_enabled_temporary"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union issenableddef { __struct {+ unsigned iss$v_enabled_persona : 1;- unsigned iss$v_enabled_subsystem : 1;) unsigned iss$v_enabled_image : 1;* unsigned iss$v_enabled_system : 1;- unsigned iss$v_enabled_temporary : 1;# unsigned iss$v_fill_0 : 27; } iss$r_issenabled_bits; } ; #if !defined(__VAXC)I#define iss$v_enabled_pers ona iss$r_issenabled_bits.iss$v_enabled_personaM#define iss$v_enabled_subsystem iss$r_issenabled_bits.iss$v_enabled_subsystemE#define iss$v_enabled_image iss$r_issenabled_bits.iss$v_enabled_imageG#define iss$v_enabled_system iss$r_issenabled_bits.iss$v_enabled_systemM#define iss$v_enabled_temporary iss$r_issenabled_bits.iss$v_enabled_temporary"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* ARB_SUPPORT constants  */ #define ISS$C_ARB_UNSPECIFIED -1#define ISS$C_ARB_NONE 0#define ISS$C_ARB_CLEAR 1#define ISS$C_ARB_READ_ONLY 2#define ISS$C_ARB_FULL 3T#define ISS$C_ARB_FORCE 4 /* Ignore multiple usermode persona check */#define ISS$C_ARB_MAX_CODE 4#define ISS$C_ARB_MIN_CODE 0N/* Reserved Persona Ids */#define ISS$C_ID_NATURAL 1#define ISS$C_ID_POSIX_REAL -2!#define ISS$C_ID_IMAGE_PERSONA -2N/*+  */N/* Persona services control flags */N/*- */#define ISS$M_IMP_FLAGS 0x7F(#define ISS$M_ASSUME_NODEREF_OLD 0x10000&#define ISS$M_ASSUME_NOREF_NEW 0x20000 #define ISS$M_CREATE_DEFPRIV 0x8"#define ISS$M_CREATE_DEFCLASS 0x10"#define ISS$M_CREATE_AUTHPRIV 0x20#define ISS$M_NOACCESS 0x100000 #ifdef __NEW_STARLETtypedef union _i sssrvcflg {N/* */N/* Common flags */N/* */ __struct {N unsigned iss$v_imp_flags : 7; /* Previously defined IMP flags */( unsigned iss$v_common_rsvd : 25; } iss$r_common_flags;N/* */N/* ASSUME service control flags */N/* */ __struct {N unsigned iss$v_assume_common : 16; /* Start past common flags */O unsigned iss$v_assume_noderef_old : 1; /* Do not drop a reference to */N/* the old (pre-ASSUME) persona */N unsigned iss$v_assume_noref_new : 1; /* Do not add a reference to */N/* the new (post-ASSUME) persona */N unsigned iss$v_assume_rsvd_1 : 1; /* Reserved for the future. */N unsigned iss$v_assume_rsvd_2 : 1; /* Reserved for the future. */( unsigned iss$v_assume_fill : 12; } iss$r_assume_flags;N/* */N/* CREATE service control flags */N/*  */ __struct {0 unsigned iss$v_create_common_rsvd_0 : 1;0 unsigned iss$v_create_common_rsvd_1 : 1;0 unsigned iss$v_create_common_rsvd_2 : 1;N unsigned iss$v_create_defpriv : 1; /* Create psb w/ def. privs. */N unsigned iss$v_create_defclass : 1; /* Create psb w/ def. class. */N unsigned iss$v_create_authpriv : 1; /* Create psb w/ auth. privs. */N unsigned iss$v_create_common_fill : 14; /* Start past common flags */N/* and the assume flags. */N unsigned iss$v_noaccess : 1; /* When set, do not access */N/* the SYSUAF or RIGHTSLIST. */N/* This is similar to */N/* CREATE_USER_PROFILE. */N unsigned iss$v_create_rsvd_1 : 1; /* Reserved for the future. */N  unsigned iss$v_create_rsvd_2 : 1; /* Reserved for the future. */' unsigned iss$v_create_fill : 9; } iss$r_create_flags; } ISSSRVCFLG; #if !defined(__VAXC):#define iss$v_imp_flags iss$r_common_flags.iss$v_imp_flagsL#define iss$v_assume_noderef_old iss$r_assume_flags.iss$v_assume_noderef_oldH#define iss$v_assume_noref_new iss$r_assume_flags.iss$v_assume_noref_newD#define iss$v_create_defpriv iss$r_create_flags.iss$v_create_defprivF#define iss$v_create_defcl ass iss$r_create_flags.iss$v_create_defclassF#define iss$v_create_authpriv iss$r_create_flags.iss$v_create_authpriv8#define iss$v_noaccess iss$r_create_flags.iss$v_noaccess"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union isssrvcflg {N/* */N/* Common flags */N/* */  __struct {N unsigned iss$v_imp_flags : 7; /* Previously defined IMP flags */( unsigned iss$v_common_rsvd : 25; } iss$r_common_flags;N/* */N/* ASSUME service control flags */N/* */ __struct {N unsigned iss$v_assume_common : 16; /* Start past common flags  */O unsigned iss$v_assume_noderef_old : 1; /* Do not drop a reference to */N/* the old (pre-ASSUME) persona */N unsigned iss$v_assume_noref_new : 1; /* Do not add a reference to */N/* the new (post-ASSUME) persona */N unsigned iss$v_assume_rsvd_1 : 1; /* Reserved for the future. */N unsigned iss$v_assume_rsvd_2 : 1; /* Reserved for the future. */( unsigned i ss$v_assume_fill : 12; } iss$r_assume_flags;N/* */N/* CREATE service control flags */N/* */ __struct {0 unsigned iss$v_create_common_rsvd_0 : 1;0 unsigned iss$v_create_common_rsvd_1 : 1;0 unsigned iss$v_create_common_rsvd_2 : 1;N unsigned iss$v_create_defpriv : 1; /* Create psb w/ def. privs. */N unsigned iss$v_create_defclass : 1; /* Create psb w/ def. class. */N unsigned iss$v_create_authpriv : 1; /* Create psb w/ auth. privs. */N unsigned iss$v_create_common_fill : 14; /* Start past common flags */N/* and the assume flags. */N unsigned iss$v_noaccess : 1; /* When set, do not access */N/* the SYSUAF or RIGHTSLIST.  */N/* This is similar to */N/* CREATE_USER_PROFILE. */N unsigned iss$v_create_rsvd_1 : 1; /* Reserved for the future. */N unsigned iss$v_create_rsvd_2 : 1; /* Reserved for the future. */' unsigned iss$v_create_fill : 9; } iss$r_create_flags; } ; #if !defined(__VAXC):#define iss$v_imp_flags iss$r_common_flags.iss$v_imp_flagsL#def ine iss$v_assume_noderef_old iss$r_assume_flags.iss$v_assume_noderef_oldH#define iss$v_assume_noref_new iss$r_assume_flags.iss$v_assume_noref_newD#define iss$v_create_defpriv iss$r_create_flags.iss$v_create_defprivF#define iss$v_create_defclass iss$r_create_flags.iss$v_create_defclassF#define iss$v_create_authpriv iss$r_create_flags.iss$v_create_authpriv8#define iss$v_noaccess iss$r_create_flags.iss$v_noaccess"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* NT TLV version number */#define ISS$K_NT_VERSION_1 1 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __ISSDEF_LOADED */ ww+/************************************************* *******************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]JBCMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $JBCMSGDEF ***/#ifndef __JBCMSGDEF_LOADED#define __JBCMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard  features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:38.77 */N/*   */N/* */J/* VERSION: 'X-5' */N/* */O/* ************************************************************************* */O/* * * */O/* * COPYRIGHT 2004 HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P. * */ O/* * * */O/* * CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM HP AND/OR * */O/* * ITS SUBSIDIARIES REQUIRED FOR POSSESSION, USE, OR COPYING. * */O/* * * */O/* * CONSISTENT WITH FAR 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE, * */O/* * COMPUTER SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL * */O/* * ITEMS ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD * */O/* * COMMERCIAL LICENSE. * */O/* * * */O/* * NEITHER HP NOR ANY OF ITS SUBSIDIARIES SHALL BE LIABLE FOR TECHNICAL * */O/* * OR EDITORIAL ERRORS OR OMISSIONS CONTAINED HEREIN. THE INFORMATION * */O/* * IN THIS DOCUMENT IS PROVIDED "as is" WITHOUT WARRANTY OF ANY KIND AND * */O/* * IS SUBJECT TO CHANGE WITHOUT NOTICE. THE WARRANTIES FOR HP PRODUCTS * */O/* * ARE SET FORTH IN THE EXPRESS LIMITED WARRANTY STATEMENTS ACCOMPANYING * */O/* * SUCH PRODUCTS. NOTHING HEREIN SHOULD BE CONSTRUED AS CONSTITUTING AN * */O/* * ADDITIONAL WARRANTY. * */O/* * * */O/* ************************************************************************* */N/*  */N/* MODIFIED BY: */N/* */N/* X-5 CAK ASWIN CHALUPADI 28-FEB-2006 */N/* ADD NEW LMFLICERR TO SIGNAL WHEN NON-COMPLIANT LICENSE */S/* IS DETECTED. ALSO ADD TWO OTHER GENERIC ERRORS FOR FURTHER USE. */N/*  */:/* X-4 DJS DAVID J. SWEENEY 16-FEB-2001 */B/* ADD NOTIMZONRUL TO BE SIGNALLED WHEN THE SYS$TIMEZONE_RULE */B/* LOGICAL IS NOT DEFINED, MEANING DAYLIGHT SAVINGS TIME CLOCK */B/* ADJUSTMENT WILL NOT BE MADE. */N/* */N/* X-3 LAD LORI A. DESMARAIS 03-JUN-1993 */N/* ADD ACCNOTENB, TO BE USED WHEN ACCOUNTING IS DISABLED AND */N/* SJC$_NEW_VERSION ITEM IS PRESENT. */N/* */5/* X-2 RAB RICHARD A. BISHOP 19-MAY-1992 */B/* PICK UP QMANABORT MESSAGE FROM BLADE: */N/* */3/* X-18 TNF0319 TODD FLOLO 12 FEB 1992 */F/* ADD QMANABORT, DENOTING THAT A REQUEST CAUSED THE QUEUE MANAGER */B/* TO ABORT. */N/* */I/* OLD AUDIT TRAIL..... */N/* */>/* X-17 RG40209 RAY GUZMAN 11-NOV-1991 */E/* ADD THREE NEW MESSAGES TO RETURN TO THE USER. QMGREXISTS IS */E/* RETURNED WHEN AN ATTEMPT TO ADD A QUEUE MANAGER NAME THAT IS */E/* ALREADY DEFINED IS MADE. TWOQMGRS IS RETURNED WHEN A REQUEST */E/* IS MADE THAT WOULD REQUIRE INFORMATION FROM TWO DIFFERENT */E/* QUEUE MANAGERS. INVQMANNAM IS RETURNED FOR INVALIDE QUEUE */G/* MANAGER NAMES. NOMOREQMGR IS RETURNED DURING WILDCARD SEARCHES. */N/* */>/* X-16 RG40126 RAY GUZMAN 4-APR-1991 */E/* MODIFY THE TEXT OF TWO MESSAGES INVMSG, NOAUTOSTART  & */E/* QUEDISABLED. ALSO REMOVE BADMSG, NOMASTER, & BADLOCK FROM */E/* THIS FILE SINCE THEY ARE NO LONGER USEFUL AND NEVER WENT WITH */E/* ANY SHIPPED RELEASE. ALSO ADD FAILCREPRC TO THE LIST OF */B/* MESSAGES TO BE SIGNALLED. */N/* */>/* X-15 RG40063 RAY GUZMAN 8-FEB-1991 */E/* ADD TWO NEW MESSAGES ONE FOR UNEXPECTED QUEUE MANAGER FAILURES */B/* AND ANOTHER FOR RESOLVING LOST DELPROC MESSAGES. */N/* */>/* X-14 RG40052 RAY GUZMAN 22-JAN-1991 */B/* MODIFY JBC$_NOTSUPPORTED TO BE A SEVERE ERROR. */N/* */>/* X-13 RG40043 RAY GUZMAN 11-JAN-1991 */E/* ADD BUFTOOSMALL TO INDICATE THAT ALL THE DESIRED DATA COULD */E/* NOT  BE RETURNED BECAUSE OF A LIMITTED BUFFER SIZE. ALSO ADD */E/* QMANNOTSTARTED TO INDICATE THAT THE QUEUE MANAGER COULD NOT BE */B/* STARTED. */N/* */?/* X-12 SEH0032 SUSAN HEIMBACH 6-SEP-1990 */B/* MODIFY NOTSUPPORTED AND TOOMUCHINFO. */N/* ADD INITFAIL AND NOMASTER. */N/*  */?/* X-11 SEH0020 SUSAN HEIMBACH 12-OCT-1989 */B/* ADD MESSAGES FOR VERSION 6. */N/* */:/* X-10 JAK0579 J A KRYCKA 18-NOV-1987 */B/* ADD MESSAGE JOBCTLABORT. */N/* */;/* X-9 JES0038 JACK SPEIGHT 07-JAN-1987 */B/* ADD NEW ERRORS - NOSUCHENT, NOMOREENT. */N/* */>/* X-8 JES0037 JACK SPEIGHT 23-OCT-1986 */B/* FIX ERROR NFYQUESTATE TO ALLOW A PARAMETER, WHERE */B/* THAT PARAMETER WILL BE USED TO SPECIFY A NUMBER */B/* OF QUEUE STATES - STALLED, STOPPED, PAUSED ETC. */N/*  */;/* X-7 JES0036 JACK SPEIGHT 08-SEP-1986 */B/* ADD NEW MESSAGES FOR VERSION 5.0 - BASE LEVEL 1. */N/* */?/* V04-007 JES0035 JACK SPEIGHT 04-OCT-1985 */B/* CHANGE TEXT FOR JBC$_NOSUCHNODE. */N/* */?/* V04-006 JES0034 JACK SPEIGHT 05-SEP-1985 */B/* ADD JBC$_NOSUCHNODE, JBC$_RESTARTCOM. */N/* */=/* V04-005 JAK0407 J A KRYCKA 29-APR-1985 */C/* MOVE JBC$_NOCMKRNL, JBC$_NOOPER, AND JBC$_SYSNAM DEFINITIONS */B/* HERE FROM JOBCTLDEF.REQ. */N/* */=/* V04-004 JAK0405 J A KRYCKA 26-APR-1985  */B/* ADD JBC$_NOMORECHAR, JBC$_NOMOREFILE, JBC$_NOMOREFORM, */G/* JBC$_NOMOREJOB, JBC$_NOMOREQUE, JBC$_NOJOBCTX, AND JBC$_NOQUECTX */B/* MESSAGES. */N/* */?/* V04-003 JES0033 JACK SPEIGHT 26-APR-1985 */B/* SPECIFY AN EXPLICIT SEVERITY LEVEL FOR EACH ERROR MESSAGE */B/* SO THAT THE DEFINITIONS HERE AGREE WITH WHAT IS ACTUALLY */E/* RETURNED BY THE JOB CONTROLLER IN THE USER'S I/O STATUS BLOCK. */C/* PRIOR TO THIS CHANGE ALL NON-SUCCESS CODES WERE DEFINED HERE */D/* WITH A SEVERITY LEVEL OF WARNING AND THE JOB CONTROLLER ADDED */B/* THE PROPER SEVERITY LEVEL. ALSO MAKE MINOR EDITS TO CERTAIN */B/* MESSAGE TEXT. */B/* */B/* V04-002 JES0032 JACK SPEIGHT 03-APR-1985 */B/* ADD JBC$_RESTRICT, JBC$_NFY_FAILURE, JBC$_NFY_CPULIM, */B/* AND JBC$_NFY_WSVAL MESSAGES. */N/* */B/* V04-001 JES0031 JACK SPEIGHT 15-MAR-1985 */B/* ADD JBC$_QUENOTSTOP MESSAGE. */#define JBC$_FACILITY 4N/* */T/* THE FOLLOWING CODES ARE RETURNED BY THE $SNDJBC, $GETQUI, $SNDJBC, AND $SNDSMB */N/* SYSTEM SERVICES, OR PLACED IN THE ACCOUNTING FILE. */N/* */N/* THESE VALUES ARE PUBLIC AND MUST NOT CHANGE FROM RELEASE TO RELEASE. */N/* */S/* NOTE: ERROR CODES WITH ASSOCIATED TEXT OF <> ARE RETIRED ERROR CODES AND HAVE */I/* A SEVERITY LEVEL OF SEVERE. */N/*  */N#define JBC$_NORMAL 262145 /* */S#define JBC$_NOCMKRNL 272386 /* */Q#define JBC$_NOOPER 272530 /* */S#define JBC$_NOSYSNAM 272402 /* */#define JBC$_ILLDEVNAM 294916#define JBC$_UNSDEVTYP 294924#define JBC$_ILLFILNAM 294932#def!ine JBC$_INVQUENAM 294940#define JBC$_NOPRIV 294946#define JBC$_NOQUEHDR 294956#define JBC$_NOQUESPACE 294962#define JBC$_NOSUCHQUE 294970#define JBC$_NOSUCHJOB 294978#define JBC$_NOOPENJOB 294986#define JBC$_REFERENCED 294994#define JBC$_STARTED 295002#define JBC$_INVITMCOD 295012#define JBC$_INVFUNCOD 295020#define JBC$_EMPTYJOB 295026#define JBC$_JOBQUEDIS 295034#define JBC$_JOBABORT 295044#define JBC$_ACMINVOP 295052#define JBC$_INVPARLEN 295060#define JBC$"_TRMMBXUSE 295068#define JBC$_MAXSYMEXD 295076#define JBC$_SCTTABFUL 295084#define JBC$_CREPRCFAL 295092#define JBC$_SYMNTBFUL 295100#define JBC$_NODSTQUE 295106#define JBC$_INVDSTQUE 295116#define JBC$_JOBDELETE 295124#define JBC$_NORESTART 295130#define JBC$_JOBREQUEUE 295140#define JBC$_QUERESET 295148#define JBC$_SYSFAIL 295156#define JBC$_EXECUTING 295162#define JBC$_INVMSGBUF 295172#define JBC$_MISREQPAR 295180#define JBC$_INVPARVAL 295188#define JBC$#_INCQUETYP 295196#define JBC$_INCDSTQUE 295204#define JBC$_JOBQUEENA 295210#define JBC$_NOTASSIGN 295218#define JBC$_INCOMPLETE 295226#define JBC$_INVCHANAM 295236#define JBC$_INVFORNAM 295244#define JBC$_NOSUCHCHAR 295250#define JBC$_NOSUCHFORM 295258#define JBC$_DUPFORM 295266#define JBC$_INCFORMPAR 295276#define JBC$_NOSUCHFILE 295282#define JBC$_DELACCESS 295290#define JBC$_QUENOTSTOP 295298#define JBC$_NOMORECHAR 295306#define JBC$_NOMOREFILE 295314#define $JBC$_NOMOREFORM 295322#define JBC$_NOMOREJOB 295330#define JBC$_NOMOREQUE 295338#define JBC$_NOJOBCTX 295346#define JBC$_NOQUECTX 295354#define JBC$_NOSUCHNODE 295362#define JBC$_GEN_MAX 295370#define JBC$_QUE_CLOSED 295378#define JBC$_NOSUCHENT 295386#define JBC$_NOMOREENT 295394#define JBC$_JOBCTLABORT 295404 #define JBC$_NOTSUPPORTED 295412!#define JBC$_NOTMEANINGFUL 295419#define JBC$_QUEDISABLED 295426#define JBC$_NOTDISABLED 295434#define JBC$_NOTENAGEN 29544%2#define JBC$_ENABLEQUE 295448#define JBC$_QUENOTMOD 295459#define JBC$_ATT_MAX 295466#define JBC$_ATTNOTAVAIL 295474#define JBC$_QEXISTS 295482#define JBC$_NOSUCHQMGR 295490#define JBC$_JOBNOTEXEC 295498#define JBC$_DUPCHARNAME 295506#define JBC$_DUPCHARNUM 295514#define JBC$_DUPFORMNAME 295522 #define JBC$_STKNOTCHANGE 295530#define JBC$_ITMREMOVED 295539#define JBC$_PRIOSMALL 295547#define JBC$_QMANMAX 295552#define JBC$_NOAUTOSTART 295560#define JBC$_NOTAL&LREQUE 295568#define JBC$_NULL1 295580#define JBC$_TOOMUCHINFO 295586 #define JBC$_AUTONOTSTART 295595#define JBC$_NULL2 295602"#define JBC$_QMANNOTSTARTED 295610#define JBC$_BUFTOOSMALL 295616!#define JBC$_INTERNALERROR 295624#define JBC$_QMGREXISTS 295634#define JBC$_TWOQMGRS 295642#define JBC$_INVQMANNAM 295650#define JBC$_NOMOREQMGR 295658#define JBC$_QMANABORT 295668N/* */Q/* THE FOLLOWING CODES' ARE SIGNALLED TO THE CONSOLE OR BROADCAST TO THE USER'S */N/* TERMINAL BY THE JOB CONTROLLER. */N/* */N/* THESE MESSAGES ARE NOT PUBLIC AND MAY CHANGE FROM RELEASE TO REALEASE. */N/* */R/* NOTE: THE JOB CONTROLLER ABORTS EXECUTION AND RESTARTS ITSELF WHEN A SEVERE */I/* ERROR IS SIGNALLED TO THE CONSOLE. ( */N/* */#define JBC$_ACCDISERR 295939#define JBC$_ALLOCMEM 295948#define JBC$_COMREMJBC 295956#define JBC$_INVBLOCK 295964#define JBC$_INVMSG 295970#define JBC$_NEWQUEUE 295979#define JBC$_OPEJBCMBX 295988#define JBC$_PRCREAT 295996#define JBC$_QUEFORMAT 296000#define JBC$_REAJBCMBX 296012#define JBC$_REQUEST 296019#define JBC$_SETIMR 296026#define JBC$_SYMCREPRC 2)96034#define JBC$_SYMDEL 296042#define JBC$_WRIRSPMSG 296050#define JBC$_WRISMBMBX 296058 #define JBC$_NFY_COMPLETE 296067#define JBC$_NFY_CURRENT 296075#define JBC$_NFY_HOLD 296083#define JBC$_NFY_PENDING 296091#define JBC$_NFY_TIMER 296099 #define JBC$_STRUCT_LEVEL 296107#define JBC$_DIAGNOSTIC 296112#define JBC$_DIAG_TEXT 296120#define JBC$_DIAG_DATA 296128#define JBC$_RESTRICT 296136#define JBC$_NFY_FAILURE 296147#define JBC$_NFY_CPULIM 296155#define JBC$_NFY*_WSVAL 296163#define JBC$_RESTARTCOM 296171 #define JBC$_NFY_NOACCESS 296179#define JBC$_NFY_CHARAC 296187#define JBC$_NFY_NOLOWER 296195 #define JBC$_NFY_SIZE_MIN 296203 #define JBC$_NFY_SIZE_MAX 296211#define JBC$_NFY_FORM 296219 #define JBC$_NFY_QUESTATE 296227#define JBC$_FAILCREPRC 296234#define JBC$_QMANCREPRC 296242#define JBC$_INITFAIL 296252#define JBC$_QMANDEL 296258#define JBC$_NOTIMZONRUL 296264#define JBC$_LMFPRCFAIL 296272#define JBC$_LMFLICERR 296280N#def+ine JBC$_LMFERROR 296288 /* */N/* THIS IS CONTINUATION OF THE FIRST PORTION OF MESSAGES. */T/* THE FOLLOWING CODES ARE RETURNED BY THE $SNDJBC, $GETQUI, $SNDJBC, AND $SNDSMB */N/* SYSTEM SERVICES, OR PLACED IN THE ACCOUNTING FILE. */N/* */N/* THESE VALUES ARE PUBLIC AND MUST NOT CHANGE FROM RELEASE TO RELEASE. */N/* , */#define JBC$_ACCNOTENB 298914 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __JBCMSGDEF_LOADED */ ww[T/************************************************************* -*******************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $JPIDEF ***/#ifndef __JPIDEF_LOADED#define __JPIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#p.ragma __member_alignment __save#pragma __nomember_alignmentR#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_param/s ...#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 N/*+ */N/* */N/* Get Job Process Information Data Identifier Definitions 0 */N/* */N/* **** NOTE **** */N/* */N/* New items must always be added to the END of each item list */N/* (preceeding the ENDlistname item) so that users will not have */N/* to relink. */N/*- 1 */N/* Scheduler policy definitions */N#define JPI$K_DEFAULT_POLICY 0 /* Native VMS scheduling policy */N#define JPI$K_PSX_FIFO_POLICY 1 /* POSIX fifo policy */N#define JPI$K_PSX_RR_POLICY 2 /* POSIX round-robbin policy */N#define JPI$K_ALL_THREADS -2147483648 /* policy affectsall kernel threads */N/* DEFINE TABLE NUMBERS 2 */N/* STRUCTURE CODES MUST START AT 1 */N#define JPI$C_ADRTYPE 1 /* ITEM IS ADDRESS OF DATA */N#define JPI$C_CTLTYPE 2 /* ITEM IS IN CONTROL REGION */N#define JPI$C_PCBTYPE 3 /* ITEM IN PCB */N#define JPI$C_PHDTYPE 4 /* ITEM IN PHD */N#define JPI$C_PCBFLDTYPE 5 /* ITEM IS BIT FIELD 3 */N#define JPI$C_PHDFLDTYPE 6 /* ITEM IS BIT FIELD */N#define JPI$C_JIBTYPE 7 /* ITEM IN JIB (SUBTYPE) */N/* NOTE: The PSB replaces the ARB within this context! */N#define JPI$C_PSBTYPE 8 /* ITEM IN PSB (SUBTYPE) */N#define JPI$C_KTBTYPE 9 /* ITEM IN KTB (SUBTYPE) */N#define JPI$C_MAXSTRUC 6 /* TOTAL OF 6 TABLES */N#define JPI$C_LIST 4END 0 /* DEFINE ITMLST TERMINATOR */N#define JPI$_CHAIN -1 /* CHAIN INDICATOR */N#define JPI$_GETJPI_CONTROL_FLAGS -2 /* SPECIAL CONTROL ITEMS */"#define JPI$M_NO_TARGET_INSWAP 0x1#define JPI$M_NO_TARGET_AST 0x2&#define JPI$M_IGNORE_TARGET_STATUS 0x4#define JPI$M_THREAD 0x8"#define JPI$M_NATURAL_PERSONA 0x10#define JPI$M_FILL1 0x7FE0$#define JPI$M_NEED_THREAD_CAP 0x8000 #ifdef __NEW_STARLETtypedef struct _jpic5tldef { __union {N unsigned int jpi$l_jpictlflgs; /* Control item flags */ __struct {| unsigned jpi$v_no_target_inswap : 1; /* Do not inswap the target process, (do deliver ASTs if it is resident) */N unsigned jpi$v_no_target_ast : 1; /* Do not send AST to target */S unsigned jpi$v_ignore_target_status : 1; /* Don't check target state */n unsigned jpi$v_thread : 1; /* Return information about each thread for mu6ltithreaded processes */x unsigned jpi$v_natural_persona : 1; /* Select natural persona when processing security profile item codes */X unsigned jpi$v_fill1 : 10; /* Filler so NEED_THREAD_CAP bit is in bit 15 */l/* NOTE: This bit is used internally by $GETJPI in cluster environments. It is not specified by the user. */y unsigned jpi$v_need_thread_cap : 1; /* Indicates that target node in a cluster needs to know about kernel */N/* threads 7 */ } jpi$r_fill_63_; } jpi$r_fill_62_; } JPICTLDEF; #if !defined(__VAXC)S#define jpi$v_no_target_inswap jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_no_target_inswapM#define jpi$v_no_target_ast jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_no_target_ast[#define jpi$v_ignore_target_status jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_ignore_target_status?#define jpi$v_thread jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_threadQ#define jpi$v_natural_persona 8jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_natural_persona=#define jpi$v_fill1 jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_fill1Q#define jpi$v_need_thread_cap jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_need_thread_cap"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct jpictldef { __union {N unsigned int jpi$l_jpictlflgs; /* Control item flags */ __struct {| unsigned jpi$v_no_target_inswap : 1; /* Do not inswap the target process, (do deli9ver ASTs if it is resident) */N unsigned jpi$v_no_target_ast : 1; /* Do not send AST to target */S unsigned jpi$v_ignore_target_status : 1; /* Don't check target state */n unsigned jpi$v_thread : 1; /* Return information about each thread for multithreaded processes */x unsigned jpi$v_natural_persona : 1; /* Select natural persona when processing security profile item codes */X unsigned jpi$v_fill1 : 10; /* Filler so NEED_THREAD_CAP bit i :s in bit 15 */l/* NOTE: This bit is used internally by $GETJPI in cluster environments. It is not specified by the user. */y unsigned jpi$v_need_thread_cap : 1; /* Indicates that target node in a cluster needs to know about kernel */N/* threads */ } jpi$r_fill_63_; } jpi$r_fill_62_; } ; #if !defined(__VAXC)S#define jpi$v_no_target_inswap jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_no_target_ins;wapM#define jpi$v_no_target_ast jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_no_target_ast[#define jpi$v_ignore_target_status jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_ignore_target_status?#define jpi$v_thread jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_threadQ#define jpi$v_natural_persona jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_natural_persona=#define jpi$v_fill1 jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_fill1Q#define jpi$v_need_thread_cap jpi$r_fill_62_.jpi$r_fill_63_.jpi$v_need_thread_cap"#endif /* #if !defined(__VA <XC) */ %#endif /* #ifdef __NEW_STARLET */N/* NOTE: the following constants must match values in $JIBDEF! */N#define JPI$K_OTHER 0 /* JPI$_Mode values */N#define JPI$K_NETWORK 1 /* JPI$_Mode values */N#define JPI$K_BATCH 2 /* JPI$_Mode values */N#define JPI$K_INTERACTIVE 3 /* JPI$_Mode values */N#define JPI$K_DETACHED 0 /* JPI$_JOBTYP =E values */N#define JPI$K_LOCAL 3 /* JPI$_JOBTYPE values */N#define JPI$K_DIALUP 4 /* JPI$_JOBTYPE values */N#define JPI$K_REMOTE 5 /* JPI$_JOBTYPE values */N/* (also BATCH & INTERACTIVE) */##define JPI$M_NEW_MAIL_AT_LOGIN 0x1"#define JPI$M_PASSWORD_CHANGED 0x2"#define JPI$M_PASSWORD_EXPIRED 0x4"#define JPI$M_PASSWORD_WARNING 0x8$#define JPI$M_ >PASSWORD2_CHANGED 0x10$#define JPI$M_PASSWORD2_EXPIRED 0x20$#define JPI$M_PASSWORD2_WARNING 0x40 #ifdef __NEW_STARLETtypedef struct _jpilgidef { __union {N unsigned int jpi$l_jpilgiflgs; /* Miscellaneous LOGIN flags */ __struct {T unsigned jpi$v_new_mail_at_login : 1; /* User had new MAIL message(s) */O unsigned jpi$v_password_changed : 1; /* Primary password changed */X unsigned jpi$v_password_expired : 1; /* Primary pass ?word expired on login */[ unsigned jpi$v_password_warning : 1; /* Primary password expiration imminent */R unsigned jpi$v_password2_changed : 1; /* Secondary password changed */[ unsigned jpi$v_password2_expired : 1; /* Secondary password expired on login */^ unsigned jpi$v_password2_warning : 1; /* Secondary password expiration imminent */( unsigned jpi$v_fill_66_ : 1; } jpi$r_fill_65_; } jpi$r_fill_64_; } JPIL @GIDEF; #if !defined(__VAXC)U#define jpi$v_new_mail_at_login jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_new_mail_at_loginS#define jpi$v_password_changed jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_password_changedS#define jpi$v_password_expired jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_password_expiredS#define jpi$v_password_warning jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_password_warningU#define jpi$v_password2_changed jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_password2_changedU#define jpi$v_password2_expired jpi$r_ Afill_64_.jpi$r_fill_65_.jpi$v_password2_expiredU#define jpi$v_password2_warning jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_password2_warning"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct jpilgidef { __union {N unsigned int jpi$l_jpilgiflgs; /* Miscellaneous LOGIN flags */ __struct {T unsigned jpi$v_new_mail_at_login : 1; /* User had new MAIL message(s) */O unsigned jpi$v_password_changed : 1; /* Primary password chaBnged */X unsigned jpi$v_password_expired : 1; /* Primary password expired on login */[ unsigned jpi$v_password_warning : 1; /* Primary password expiration imminent */R unsigned jpi$v_password2_changed : 1; /* Secondary password changed */[ unsigned jpi$v_password2_expired : 1; /* Secondary password expired on login */^ unsigned jpi$v_password2_warning : 1; /* Secondary password expiration imminent */( unsigned jpi$v_fill_66_ : C1; } jpi$r_fill_65_; } jpi$r_fill_64_; } ; #if !defined(__VAXC)U#define jpi$v_new_mail_at_login jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_new_mail_at_loginS#define jpi$v_password_changed jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_password_changedS#define jpi$v_password_expired jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_password_expiredS#define jpi$v_password_warning jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_password_warningU#define jpi$v_password2_changed jpi$r_fill_64_.jpi$r_fill_65 D_.jpi$v_password2_changedU#define jpi$v_password2_expired jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_password2_expiredU#define jpi$v_password2_warning jpi$r_fill_64_.jpi$r_fill_65_.jpi$v_password2_warning"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */T/* NOTE: Symlink search mode encodings are coordinated across $JPIDEF, $LIBCQDEF, */N/* $LIBFILDEF, $PPROPDEF, and $NAMLDEF. */N#define JPI$K_SEARCH_SYMLINK_NONE 1 /* JPI$_SEARCH_SEYMLINK_xxx values */N#define JPI$K_SEARCH_SYMLINK_ALL 2 /* JPI$_SEARCH_SYMLINK_xxx values */N#define JPI$K_SEARCH_SYMLINK_NOELLIPS 3 /* JPI$_SEARCH_SYMLINK_xxx values */N/* ITEM IDENTIFIERS FOR PCB */N#define JPI$_ASTACT 768 /* ACCESS MODES WITH ACTIVE ASTS */N#define JPI$_ASTEN 769 /* ACCESS MODES WITH ASTS ENABLED */N#define JPI$_PRI 770 /* CURRENT PROCESS PRIORITY */\#dFefine JPI$_OWNER 771 /* Epid of owner process, if this is a subprocess */N#define JPI$_UIC 772 /* UIC OF PROCESS */N#define JPI$_STS 773 /* PROCESS STATUS */N#define JPI$_STATE 774 /* PROCESS STATE */N#define JPI$_MEM 775 /* MEMBER FIELD OF UIC */N#define JPI$_GRP 776 /* GROUP FIELD OF UIC */N#define JPI$_PGRIB 777 /* PROCESS BASE PRIORITY */N#define JPI$_APTCNT 778 /* ACTIVE PAGE TABLE COUNT */N#define JPI$_TMBU 779 /* TERMINATION MAILBOX UNIT */O#define JPI$_GPGCNT 780 /* GLOBAL PAGE COUNT IN WORKING SET */P#define JPI$_PPGCNT 781 /* PROCESS PAGE COUNT IN WORKING SET */N#define JPI$_ASTCNT 782 /* AST COUNT REMAINING */N#define JPI$_BIOCNT 783 H /* BUFFERED I/O COUNT REMAINING */N#define JPI$_BIOLM 784 /* BUFFERED I/O LIMIT */T#define JPI$_BYTCNT 785 /* BYTE COUNT REMAINING FOR BUFFERED I/O */N#define JPI$_DIOCNT 786 /* DIRECT I/O COUNT REMAINING */N#define JPI$_DIOLM 787 /* DIRECT I/O COUNT LIMIT */N#define JPI$_FILCNT 788 /* COUNT REMAINING OF OPEN FILES */U#define JPI$_TQCNT 789 /* COUNT REMAINIING OF TIMER QUEUE ENTRIES */N#define JPI$_EFWM 790 /* EVENT FLAG WAIT MASK */N#define JPI$_EFCS 791 /* LOCAL EVENT FLAGS 0-31 */N#define JPI$_EFCU 792 /* LOCAL EVENT FLAGS 32-63 */N#define JPI$_PID 793 /* PROCESS IDENTIFICATION */N#define JPI$_BYTLM 794 /* BUFFERED I/0 BYTE COUNT LIMIT */N#define JPI$_PRCCNT 795 /* SUBPROCESS COUNT J */N#define JPI$_PRCNAM 796 /* PROCESS NAME */N#define JPI$_TERMINAL 797 /* LOGIN TERMINAL NAME */S#define JPI$_JOBPRCCNT 798 /* TOTAL COUNT OF SUBPROCESSES IN A JOB */N#define JPI$_ENQCNT 799 /* ENQUEUE COUNT REMAINING */N#define JPI$_ENQLM 800 /* ENQUEUE COUNT LIMIT */N#define JPI$_SWPFILLOC 801 /* SWAP FILE BACKING STORE ADDRESS */S#define JPI$_MKODE 802 /* MODE VALUE (FROM STS) - DEFINED ABOVE */N#define JPI$_JOBTYPE 803 /* JOB TYPE CODE */N#define JPI$_PROC_INDEX 804 /* PROCESS INDEX */N#define JPI$_MASTER_PID 805 /* MASTER PROCESS PID */N#define JPI$_RIGHTSLIST 806 /* PSB composite rights */N#define JPI$_CPU_ID 807 /* CPU ID */N#define JPI$_STS2 808 L /* Second process status longword */V#define JPI$_NODENAME 809 /* Name of node on which process is running */V#define JPI$_NODE_CSID 810 /* CSID of node on which process is running */]#define JPI$_NODE_VERSION 811 /* VMS version of node on which process is running */N#define JPI$_TT_PHYDEVNAM 812 /* Physical device name of terminal */N#define JPI$_TT_ACCPORNAM 813 /* Access port name of terminal */N#define JPI$_PROCESS_RIGHTS M814 /* PSB persona rights */N#define JPI$_SYSTEM_RIGHTS 815 /* PSB system rights */N#define JPI$_IMAGE_RIGHTS 816 /* PSB protected sub-system rights */a#define JPI$_RIGHTS_SIZE 817 /* Approximate size (in bytes) of all PSB rights lists */N#define JPI$_CLASSIFICATION 818 /* PSB current MAC classification */N#define JPI$_SCHED_POLICY 819 /* Scheduler policy */U#define JPI$_RMS_FILEPROT 820 N /* Process default file protection for RMS */O#define JPI$_MULTITHREAD 821 /* Kernel threads - max thread count */N#define JPI$_KT_COUNT 822 /* Kernel threads - thread count */Q#define JPI$_INITIAL_THREAD_PID 823 /* Kernel threads - initial thread PID */N#define JPI$_THREAD_INDEX 824 /* Kernel threads - thread index */P#define JPI$_CURRENT_USERCAP_MASK 825 /* KTB current user capabilities mask */R#define JPI$_PERMANENT_USERCAP_MASK 826 /* KOTB permanent user capabilities mask */N#define JPI$_CURRENT_AFFINITY_MASK 827 /* KTB current affinity mask */N#define JPI$_PERMANENT_AFFINITY_MASK 828 /* KTB permanent affinity mask */N#define JPI$_PERSONA_ID 829 /* Persona (PSB) id */N#define JPI$_PERSONA_AUTHPRIV 830 /* PSB authorized privilege mask */T#define JPI$_PERSONA_PERMPRIV 831 /* PSB permanent (default) privilege mask */Q#define JPI$_PERSONA_WORKPRIV 832 /* PSB working (actiPve) privilege mask */a#define JPI$_IMAGE_WORKPRIV 833 /* PSB installed image working (active) privilege mask */_#define JPI$_PERSONA_RIGHTS_SIZE 834 /* Approximate size (in bytes) of PSB persona rights */N#define JPI$_PERSONA_RIGHTS 835 /* PSB persona rights */l#define JPI$_SUBSYSTEM_RIGHTS_SIZE 836 /* Approximate size (in bytes) of PSB protected sub-system rights */N#define JPI$_SUBSYSTEM_RIGHTS 837 /* PSB protected sub-system rights */g#define JPI$_IQNSTALL_RIGHTS_SIZE 838 /* Approximate size (in bytes) of PSB installed image rights */N#define JPI$_INSTALL_RIGHTS 839 /* PSB installed image rights */^#define JPI$_SYSTEM_RIGHTS_SIZE 840 /* Approximate size (in bytes) of PSB system rights */N#define JPI$_CURRENT_CAP_MASK 841 /* KTB current capabilities mask */N#define JPI$_PERMANENT_CAP_MASK 842 /* KTB permanent capabilities mask */N#define JPI$_SCHED_CLASS_NAME 843 /* Scheduling class name */RN#define JPI$_HOME_RAD 844 /* KTB Home RAD */N#define JPI$_POSIX_SID 845 /* Session ID for POSIX and COE */P#define JPI$_POSIX_PGID 846 /* Process Group ID for POSIX and COE */Y#define JPI$_CREATOR 847 /* Epid of creator process (Unix-style parent) */N#define JPI$_KRNLTIM 848 /* Kernel mode cpu time */N#define JPI$_EXECTIM 849 /* Executive mode cpu time */N#define JPSI$_SUPRTIM 850 /* Supervisor mode cpu time */N#define JPI$_USERTIM 851 /* User mode cpu time */U#define JPI$_ORG_BYTLM 852 /* Original buffered I/O byte count limit */X#define JPI$_DEADLOCK_WAIT 853 /* Per-process sub-second deadlock wait value */W#define JPI$_KT_LIMIT 854 /* Per-process multiple kernel threads limit */N/* ADD NEW ITEM-CODES BEFORE THIS COMMENT */N#define TJPI$_LASTPCB 855 /* MAX INDEX IN PCB TABLE */N/* ITEM IDENTIFIERS FOR PHD */N#define JPI$_CURPRIV 1024 /* CURRENT PROCESS PRIVILEGE MASK */N#define JPI$_WSAUTH 1025 /* AUTHORIZED WORKING SET SIZE */N#define JPI$_WSQUOTA 1026 /* QUOTA ON WORKING SET SIZE */N#define JPI$_DFWSCNT 1027 /* DEFAULT WORKING SET SIZE */Z#define JPI$_FREP0VA 1028 U /* FIRST FREE VIRTUAL ADDR. AT END OF P0 SPACE */R#define JPI$_FREP1VA 1029 /* FIRST FREE ADDR. AT END OF P1 SPACE */N#define JPI$_DFPFC 1030 /* DEFAULT PAGE FAULT CLUSTER */N#define JPI$_CPUTIM 1031 /* ACCUMULATED CPU TIME */N#define JPI$_PRCLM 1032 /* SUBPROCESS QUOTA */N#define JPI$_ASTLM 1033 /* AST LIMIT */N#define JPI$_PAGEFLTS 1034 /* CVOUNT OF PAGE FAULTS */N#define JPI$_DIRIO 1035 /* PROCESS DIRECT I/O OPERATIONS */N#define JPI$_BUFIO 1036 /* PROCESS BUFFERED I/O OPERATIONS */N#define JPI$_CPULIM 1037 /* LIMIT ON CPUTIM FOR PROCESS */N#define JPI$_PGFLQUOTA 1038 /* MAX. VIRTUAL PAGE COUNT */N#define JPI$_FILLM 1039 /* OPEN FILE LIMIT */N#define JPI$_TQLM 1040 /* TIMER QUEUE LIMIT W */N#define JPI$_WSSIZE 1041 /* CURRENT WORKING SET SIZE */N#define JPI$_AUTHPRIV 1042 /* PSB authorized privilege mask */d#define JPI$_IMAGPRIV 1043 /* PHD installed image permanent (default) privilege mask */X#define JPI$_PAGFILCNT 1044 /* Remaining paging file quota of the process */S#define JPI$_FREPTECNT 1045 /* ROOM FOR EXPANSION OF P0 OR P1 SPACE */N#define JPI$_WSEXTENT 1046 /* EXTENT OF WORKIXNG SET SIZE */N#define JPI$_WSAUTHEXT 1047 /* MAX EXTENT OF WORKING SET SIZE */N#define JPI$_AUTHPRI 1048 /* AUTHORIZED PRIORITY FOR $SETPRI */N#define JPI$_PAGFILLOC 1049 /* PAGE FILE BACKING STORE ADDRESS */Q#define JPI$_IMAGECOUNT 1050 /* IMAGE COUNTER (CLOCKED BY RUNDOWN) */N#define JPI$_PHDFLAGS 1051 /* PROCESS HEADER FLAGS WORD */N#define JPI$_VP_CPUTIM 1052 /* VECTOR CPU TIME */XY#define JPI$_VP_CONSUMER 1053 /* Flag -- is this process a vector consumer? */N#define JPI$_P0_FIRST_FREE_VA_64 1054 /* First free VA in P0 space */N#define JPI$_P1_FIRST_FREE_VA_64 1055 /* First free VA in P1 space */N#define JPI$_P2_FIRST_FREE_VA_64 1056 /* First free VA in P2 space */[#define JPI$_IMAGE_AUTHPRIV 1057 /* PHD installed image authorized privilege mask */d#define JPI$_IMAGE_PERMPRIV 1058 /* PHD installed image permanent (default)Z privilege mask */N/* ADD NEW ITEM-CODES BEFORE THIS COMMENT */N#define JPI$_LASTPHD 1059 /* MAX INDEX IN PROCESS HEADER */N/* ITEM IDENTIFIERS FOR CONTROL REGION */N#define JPI$_VIRTPEAK 512 /* PEAK VIRTUAL SIZE */N#define JPI$_WSPEAK 513 /* PEAK WORKING SET SIZE */N#define JPI$_USERNAME 514 /* PSB username string */N#defin[e JPI$_ACCOUNT 515 /* PSB account name string */T#define JPI$_PROCPRIV 516 /* PSB permanent (default) privilege mask */N#define JPI$_VOLUMES 517 /* VOLUMES MOUNTED */P#define JPI$_LOGINTIM 518 /* TIME OF LOGIN OR PROCESS CREATION */N#define JPI$_IMAGNAME 519 /* CURRENT IMAGE FILE NAME */N#define JPI$_SITESPEC 520 /* PER-PROCESS SITE-SPECIFIC CELL */N#define JPI$_MSGMASK 521\ /* PROCESS DEFAULT MESSAGE FLAGS */O#define JPI$_CLINAME 522 /* COMMAND LANGUAGE INTERPRETER NAME */U#define JPI$_TABLENAME 523 /* COMMAND LANGUAGE INTERPRETER TABLE NAME */W#define JPI$_CREPRC_FLAGS 524 /* $CREPRC FLAGS USED TO CREATE THIS PROCESS */N#define JPI$_UAF_FLAGS 525 /* FLAGS FROM UAF RECORD */X#define JPI$_MAXDETACH 526 /* MAXIMUM DETACHED PROCESSES FOR SINGLE USER */V#define JPI$_MAXJOBS] 527 /* MAXIMUM ACTIVE PROCESSES FOR SINGLE USER */N#define JPI$_SHRFILLM 528 /* MAXIMUM OPEN SHARED FILES */T#define JPI$_FAST_VP_SWITCH 529 /* NUMBER OF FAST VECTOR CONTEXT SWITCHES */T#define JPI$_SLOW_VP_SWITCH 530 /* NUMBER OF SLOW VECTOR CONTEXT SWITCHES */N#define JPI$_LAST_LOGIN_I 531 /* Last interactive login */N#define JPI$_LAST_LOGIN_N 532 /* Last non-interactive login */O#define JPI$_LOGIN_FAILURE^S 533 /* Number of login failures at login */N#define JPI$_LOGIN_FLAGS 534 /* Miscellaneous login flags */N#define JPI$_RMS_DFMBC 535 /* RMS default: multi-block count */S#define JPI$_RMS_DFMBFSDK 536 /* " " multi-buffer count for disk (SEQ) */N#define JPI$_RMS_DFMBFSMT 537 /* " " multi-buffer count for tape */T#define JPI$_RMS_DFMBFSUR 538 /* " " multi-buffer count for unit record */R#define JPI$_RMS_DFMBFREL 539 _ /* " " multi-buffer count for REL files */S#define JPI$_RMS_DFMBFIDX 540 /* " " multi-buffer count for ISAM files */N#define JPI$_RMS_PROLOGUE 541 /* " " prolog */N#define JPI$_RMS_EXTEND_SIZE 542 /* " " file extend quantity */N#define JPI$_RMS_DFNBC 543 /* " " network block count */N#define JPI$_RMS_DFLRL 544 /* " " Heuristic default LRL */R#define JPI$_RMS_HEURISTIC 545 /* " " Heurist`ic enable/disable setting */N#define JPI$_PARSE_STYLE_PERM 546 /* Parse style for life of process */N#define JPI$_PARSE_STYLE_IMAGE 547 /* Parse style for life of image */N#define JPI$_RMSD6 548 /* RMS dynamic parameter RMSD6 */S#define JPI$_RMS_QUERY_LOCK 549 /* RMS QUERY_LOCK enable/disable setting */R#define JPI$_CASE_LOOKUP_PERM 550 /* Case lookup mode for life of process */P#define JPI$_CASE_LOOKUP_IMAGE 551 /* Case lookup mode for liafe of image */N#define JPI$_UNITS 552 /* Bytes or Blocks */N#define JPI$_TOKEN 553 /* Small or Large Token */U#define JPI$_SEARCH_SYMLINK_PERM 554 /* Symlink search mode for life of process */S#define JPI$_SEARCH_SYMLINK_TEMP 555 /* Symlink search mode for life of image */N/* ADD NEW ITEM-CODES BEFORE THIS COMMENT */N#define JPI$_LASTCTL 556 /* MAX INDEX IN CONTROL REGION b*/N/* ITEM IDENTIFIERS FOR ADDRESS DATA */S#define JPI$_EXCVEC 256 /* ADDRESS OF "EXCEPTION VECTOR" VECTOR */W#define JPI$_FINALEXC 257 /* ADDRESS OF LAST CHANCE EXCEPTION VECTORS */N/* ADD NEW ITEM-CODES BEFORE THIS COMMENT */N#define JPI$_LASTADR 258 /* MAX INDEX IN ADDRESS TABLE */N/* ITEM IDENTIFIERS FOR PCBFLD */N/* ADDc ITEM-CODES BEFORE THIS COMMENT */N#define JPI$_LASTPCBFLD 1280 /* MAX INDEX IN PCBFLD TABLE */N/* ITEM IDENTIFIERS FOR PHDFLD */N/* ADD ITEM-CODES BEFORE THIS COMMENT */N#define JPI$_LASTPHDFLD 1536 /* MAX INDEX IN PHDFLD TABLE */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas dsupported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __JPIDEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.S eDI;1 *//********************************************************************************************************************************//*** MODULE $JPIFDEF ***/#ifndef __JPIFDEF_LOADED#define __JPIFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the pfreviously-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 __unio gn union#else#define __union variant_union#endif#endif N/*+ */N/* */N/* Get Job Process Information "Fast" Data Identifier Definitions */N/* */N/*- */#define JPIF$M_UASTACT 0x1#define hJPIF$C_UASTACT 0#define JPIF$M_RMS_DFMBC 0x2#define JPIF$C_RMS_DFMBC 1##define JPIF$M_PARSE_STYLE_PERM 0x4!#define JPIF$C_PARSE_STYLE_PERM 2$#define JPIF$M_PARSE_STYLE_IMAGE 0x8"#define JPIF$C_PARSE_STYLE_IMAGE 3#define JPIF$M_LOGINTIM_L 0x10#define JPIF$C_LOGINTIM_L 4#define JPIF$M_LOGINTIM_H 0x20#define JPIF$C_LOGINTIM_H 5#define JPIF$M_CPUTIM 0x40#define JPIF$C_CPUTIM 6 #ifdef __NEW_STARLETtypedef struct _jpifdef { __union {* unsigned __int64 jpif$q_jpiifitems; __struct {N unsigned jpif$v_uastact : 1; /* User mode AST active */N unsigned jpif$v_rms_dfmbc : 1; /* RMS default multi-block count */N unsigned jpif$v_parse_style_perm : 1; /* Permanent parse style */N unsigned jpif$v_parse_style_image : 1; /* Image parse style */N unsigned jpif$v_logintim_l : 1; /* Login time - low LW */N unsigned jpif$v_logintim_h : 1; /* Login time - high LW j */N unsigned jpif$v_cputim : 1; /* Process accumulated CPU time */) unsigned jpif$v_fill_69_ : 1; } jpif$r_fill_68_; } jpif$r_fill_67_; } JPIFDEF; #if !defined(__VAXC)E#define jpif$v_uastact jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_uastactI#define jpif$v_rms_dfmbc jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_rms_dfmbcW#define jpif$v_parse_style_perm jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_parse_style_permY#define jpif$v_parse_style_image jpi kf$r_fill_67_.jpif$r_fill_68_.jpif$v_parse_style_imageK#define jpif$v_logintim_l jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_logintim_lK#define jpif$v_logintim_h jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_logintim_hC#define jpif$v_cputim jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_cputim"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct jpifdef { __union {* unsigned int jpif$q_jpifitems [2]; __struct {N unsigned jpif$v_uastact : 1; /* User modle AST active */N unsigned jpif$v_rms_dfmbc : 1; /* RMS default multi-block count */N unsigned jpif$v_parse_style_perm : 1; /* Permanent parse style */N unsigned jpif$v_parse_style_image : 1; /* Image parse style */N unsigned jpif$v_logintim_l : 1; /* Login time - low LW */N unsigned jpif$v_logintim_h : 1; /* Login time - high LW */N unsigned jpif$v_cputim : 1; /* Process accumulated CPU time */ m) unsigned jpif$v_fill_69_ : 1; } jpif$r_fill_68_; } jpif$r_fill_67_; } ; #if !defined(__VAXC)E#define jpif$v_uastact jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_uastactI#define jpif$v_rms_dfmbc jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_rms_dfmbcW#define jpif$v_parse_style_perm jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_parse_style_permY#define jpif$v_parse_style_image jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_parse_style_imageK#define jpif$v_logintim_l jpif$r_f nill_67_.jpif$r_fill_68_.jpif$v_logintim_lK#define jpif$v_logintim_h jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_logintim_hC#define jpif$v_cputim jpif$r_fill_67_.jpif$r_fill_68_.jpif$v_cputim"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif o#ifdef __cplusplus }#endif#pragma __standard #endif /* __JPIFDEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//************************************************************************************************************* p*******************//*** MODULE $KGBDEF ***/#ifndef __KGBDEF_LOADED#define __KGBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 poqinters */#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 N/*++ r */N/* Key Grant Block definitions: Format of records in the rights database */N/* file. These records (1) associate identifier codes with names, and */N/* (2) list the holders of all identifiers in the system. */N/*-- */Q/* WARNING : If you add attributes, you must change the following modules: */N/* s */F/* [AUDSRV]FORMATBL.B32 - add name to id_attr_table */N/* */Y/* Changing these modules is necessary so that auditing will reflect the new attr name */N/* */N/* */N/* WARNING : If you add any fields, or change the size of the */N/* t NAME, the HOLDER, or the SYS_ID, be sure to update */N/* the contents at the bottom of this file. */N/* */#define KGB$M_RESOURCE 0x1#define KGB$M_DYNAMIC 0x2#define KGB$M_NOACCESS 0x4#define KGB$M_SUBSYSTEM 0x8#define KGB$M_IMPERSONATE 0x10 #define KGB$M_HOLDER_HIDDEN 0x20#define KGB$M_NAME_HIDDEN 0x40N#define KGB$K_HOLD_RECORD 16 /* End of holder record u */N#define KGB$K_IDENT_RECORD 48 /* End of identifier record */N#define KGB$K_LEVEL1 257 /* Version 1 structure level */N#define KGB$K_MAINT_RECORD 64 /* End of maintenance record */$#define KGB$K_NUMBER_OF_ATTRIBUTES 7 #ifdef __NEW_STARLETtypedef struct _kgbdef {N unsigned int kgb$l_identifier; /* Binary identifier code */ __union {N unsigned int kgb$l_attributes; /* Attribute bit definitions v */ __struct {T unsigned kgb$v_resource : 1; /* Resource may be charged to identifier */S unsigned kgb$v_dynamic : 1; /* Identifier may be enabled or disabled */_ unsigned kgb$v_noaccess : 1; /* Identifier will not be used in protection checks */] unsigned kgb$v_subsystem : 1; /* Identifier denotes active protected subsystem */Z unsigned kgb$v_impersonate : 1; /* Identifier can be used for impersonation */Q unsiwgned kgb$v_holder_hidden : 1; /* Holder records are restricted */` unsigned kgb$v_name_hidden : 1; /* $IDTOASC or $ASCTOID translation is restricted */( unsigned kgb$v_fill_72_ : 1; } kgb$r_fill_71_; } kgb$r_fill_70_;N unsigned __int64 kgb$q_holder; /* Holder identifier */S char kgb$t_name [32]; /* Identifier name (blank filled string) */N unsigned short int kgb$w_level; /* File structure level x */ short int kgb$$$_fill_1;N unsigned __int64 kgb$q_sys_id; /* System identifier */N unsigned int kgb$l_next_id; /* Next available identifier */ } KGBDEF; #if !defined(__VAXC)8#define kgb$l_attributes kgb$r_fill_70_.kgb$l_attributesC#define kgb$v_resource kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_resourceA#define kgb$v_dynamic kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_dynamicC#define kgb$v_noaccess kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_noaccessE y#define kgb$v_subsystem kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_subsystemI#define kgb$v_impersonate kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_impersonateM#define kgb$v_holder_hidden kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_holder_hiddenI#define kgb$v_name_hidden kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_name_hidden"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct kgbdef {N unsigned int kgb$l_identifier; /* Binary identifier code */ __union {N unsignedz int kgb$l_attributes; /* Attribute bit definitions */ __struct {T unsigned kgb$v_resource : 1; /* Resource may be charged to identifier */S unsigned kgb$v_dynamic : 1; /* Identifier may be enabled or disabled */_ unsigned kgb$v_noaccess : 1; /* Identifier will not be used in protection checks */] unsigned kgb$v_subsystem : 1; /* Identifier denotes active protected subsystem */Z unsigned kgb$v_impersonate : 1; /* Identif {ier can be used for impersonation */Q unsigned kgb$v_holder_hidden : 1; /* Holder records are restricted */` unsigned kgb$v_name_hidden : 1; /* $IDTOASC or $ASCTOID translation is restricted */( unsigned kgb$v_fill_72_ : 1; } kgb$r_fill_71_; } kgb$r_fill_70_;N unsigned int kgb$q_holder [2]; /* Holder identifier */S char kgb$t_name [32]; /* Identifier name (blank filled string) */N unsigned short | int kgb$w_level; /* File structure level */ short int kgb$$$_fill_1;N unsigned int kgb$q_sys_id [2]; /* System identifier */N unsigned int kgb$l_next_id; /* Next available identifier */ } ; #if !defined(__VAXC)8#define kgb$l_attributes kgb$r_fill_70_.kgb$l_attributesC#define kgb$v_resource kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_resourceA#define kgb$v_dynamic kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_dynamicC#define kgb$v_noaccess } kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_noaccessE#define kgb$v_subsystem kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_subsystemI#define kgb$v_impersonate kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_impersonateM#define kgb$v_holder_hidden kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_holder_hiddenI#define kgb$v_name_hidden kgb$r_fill_70_.kgb$r_fill_71_.kgb$v_name_hidden"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/*++ ~ */N/* Define the environmental rights ID values */N/*-- */N#define KGB$K_BATCH_ID -2147483647 /* Batch ID value */N#define KGB$K_DIALUP_ID -2147483646 /* Dialup ID value */N#define KGB$K_INTERACTIVE_ID -2147483645 /* Interactive ID value */N#define KGB$K_LOCAL_ID -2147483644 /* Local ID value */N#define KGB$K_NETWORK_ID -2147483643 /* Network ID value */N#define KGB$K_REMOTE_ID -2147483642 /* Remote ID value */N#define KGB$K_DECWINDOWS_ID -2147483641 /* Decwindows ID value */N#define KGB$K_BOBUSER_ID -2147483640 /* Buffer Object User ID value */S#define KGB$K_MRES_USER_ID -2147483639 /* Memory Resident Section User ID value */N#define KGB$K_SAT_ACCESS_ID -2147483638 /* VMS$SATELLITE_ACCESS id value */P#define KGB$K_LAST_ENV_ID -2147483637 /* NOTE: Add all new ones before this */N/* */N/* Define the range of environmental identifiers */N/* */%#define KGB$K_BASE_ENV_ID -2147483647"#define KGB$K_NUMBER_OF_ENV_IDS 10N/* */R/* Define the restricted range of system identifiers as lowest id (% x800000000) */N/* to %x80010000. */N/* */*#define KGB$K_RESTRICTED_RANGE -2147418112N/* */N/* Define the various access class ranges. */N/* */(#define KGB$K_SEC_LEVEL_BASE -2147482648(#def ine KGB$K_INT_LEVEL_BASE -2147482392+#define KGB$K_SEC_CATEGORY_BASE -2147482136+#define KGB$K_INT_CATEGORY_BASE -2147482072/#define KGB$K_SEC_ACCESS_CLASS_BASE -2147482648.#define KGB$K_SEC_ACCESS_CLASS_END -2147482008N/* */N/* Define the values for the optional $GRANTID/$REVOKID FLAGS argument. */N/* */N#define KGB$K_PROCESS 0  /* local rights */N#define KGB$K_SYSTEM 1 /* system rights */N#define KGB$K_EXTENDED 2 /* local rights (extended) */P#define KGB$K_IMAGE 3 /* image (protected subsystem) rights */#define KGB$K_MAX_SEG 4P#define KGB$K_SUBSYSTEM 3 /* image (protected subsystem) rights */ N#define KGB$S_NAME 32 /* Size of KGB Identifier Name */N#define KGB$S_HOLDER 8  /* Size of KGB Holder ID value */N#define KGB$S_SYS_ID 8 /* Size of KGB System Ident */ N#define KGB$S_KGBDEF 64 /* Size of KGB structure */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __KGBDEF_LOADED */ wwی/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $LADEF ***/#ifndef __LADEF_LOADED#define __LADEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/*  */N/* LPA-11 CHARACTERISTICS DEFINITIONS */N/* */N/*- */N/*MICROCODE TYPE VALUES */N#define LA$K_MRMCODE 1 /* MULTIREQUEST MICROCODE */N#define LA$K_ADMCODE 2 /* DEDICATED A/D MICROCODE */N#define LA$K_DAMCODE 3 /* DEDICATED D/A MICROCODE */#define LA$M_MCVALID 0x1#define LA$M_CLOCKA 0x8#define LA$M_CLOCKB 0x10#define LA$M_AD1 0x20#define LA$M_AD2 0x40#define LA$M_DA 0x80#define LA$M_DIO1 0x100#define LA$M_DIO2 0x200#define LA$M_DIO3 0x400#define LA$M_DIO4 0x800#define LA$M_DIO5 0x1000#define LA$M_BFROVRN 0x800000 #ifdef __NEW_STARLETtypedef union _ladef { __struct {N unsigned la$v_mcvalid : 1; /* MICROCODE VALID */N unsigned la$v_mctype : 2; /* MICROCODE TYPE */N unsigned la$v_config : 10; /* DEVICE CONFIGURATION BITS */N unsigned la$v_rate : 3; /* CLOCK RATE */N unsigned la$v_preset : 16; /* CLOCK PRESET */ } la$r_ladef_bits0; __struct {Q unsigned ladef$$_fill_1 : 3; /* SKIP OVER MICROCODE VALID AND TYPE */N  unsigned la$v_clocka : 1; /* CLOCK A */N unsigned la$v_clockb : 1; /* CLOCK B */N unsigned la$v_ad1 : 1; /* A/D ! 1 */N unsigned la$v_ad2 : 1; /* A/D ! 2 */N unsigned la$v_da : 1; /* D/A */N unsigned la$v_dio1 : 1; /* DIGITAL I/O ! 1 */N unsigned la$v_dio2 : 1 ; /* DIGITAL I/O ! 2 */N unsigned la$v_dio3 : 1; /* DIGITAL I/O ! 3 */N unsigned la$v_dio4 : 1; /* DIGITAL I/O ! 4 */N unsigned la$v_dio5 : 1; /* DIGITAL I/O ! 5 */# unsigned la$v_fill_73_ : 3; } la$r_ladef_bits1; __struct {N unsigned ladef$$_fill_2 : 23; /*(IN USER'S COMMAND TABLE) */N unsigned la$v_bfrovrn : 1; /* BUFFER OVERRUN NON-FATAL BIT */ } la$r_ladef_bits2; } LADEF; #if !defined(__VAXC)2#define la$v_mcvalid la$r_ladef_bits0.la$v_mcvalid0#define la$v_mctype la$r_ladef_bits0.la$v_mctype0#define la$v_config la$r_ladef_bits0.la$v_config,#define la$v_rate la$r_ladef_bits0.la$v_rate0#define la$v_preset la$r_ladef_bits0.la$v_preset0#define la$v_clocka la$r_ladef_bits1.la$v_clocka0#define la$v_clockb la$r_ladef_bits1.la$v_clockb*#define la$v_ad1 la$r_ladef_bits1.la$v_ad1*#define la$v_ad2 la$r_ladef_bits1.la$v_ad2(#define la$v_da la$r_ladef_bits1.la$v_da,#define la$v_dio1 la$r_ladef_bits1.la$v_dio1,#define la$v_dio2 la$r_ladef_bits1.la$v_dio2,#define la$v_dio3 la$r_ladef_bits1.la$v_dio3,#define la$v_dio4 la$r_ladef_bits1.la$v_dio4,#define la$v_dio5 la$r_ladef_bits1.la$v_dio52#define la$v_bfrovrn la$r_ladef_bits2.la$v_bfrovrn"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ union ladef { __struct {N unsigned la$v_mcvalid : 1; /* MIC ROCODE VALID */N unsigned la$v_mctype : 2; /* MICROCODE TYPE */N unsigned la$v_config : 10; /* DEVICE CONFIGURATION BITS */N unsigned la$v_rate : 3; /* CLOCK RATE */N unsigned la$v_preset : 16; /* CLOCK PRESET */ } la$r_ladef_bits0; __struct {Q unsigned ladef$$_fill_1 : 3; /* SKIP OVER MICROCODE VALID AND TYPE */N unsigned la$v_clocka : 1; /* CLOCK A */N unsigned la$v_clockb : 1; /* CLOCK B */N unsigned la$v_ad1 : 1; /* A/D ! 1 */N unsigned la$v_ad2 : 1; /* A/D ! 2 */N unsigned la$v_da : 1; /* D/A */N unsigned la$v_dio1 : 1; /* DIGITAL I/O ! 1 */N unsigned la$v_dio2 : 1; /* DIG ITAL I/O ! 2 */N unsigned la$v_dio3 : 1; /* DIGITAL I/O ! 3 */N unsigned la$v_dio4 : 1; /* DIGITAL I/O ! 4 */N unsigned la$v_dio5 : 1; /* DIGITAL I/O ! 5 */# unsigned la$v_fill_73_ : 3; } la$r_ladef_bits1; __struct {N unsigned ladef$$_fill_2 : 23; /*(IN USER'S COMMAND TABLE) */N unsigned la$v_bfrovrn : 1; /* BUFFER OVERRUN NON-FATAL BIT */ } la$r_ladef_bits2; } ; #if !defined(__VAXC)2#define la$v_mcvalid la$r_ladef_bits0.la$v_mcvalid0#define la$v_mctype la$r_ladef_bits0.la$v_mctype0#define la$v_config la$r_ladef_bits0.la$v_config,#define la$v_rate la$r_ladef_bits0.la$v_rate0#define la$v_preset la$r_ladef_bits0.la$v_preset0#define la$v_clocka la$r_ladef_bits1.la$v_clocka0#define la$v_clockb la$r_ladef_bits1.la$v_clockb*#define la$v_ad1 la$r_ladef_bits1.la$v_ad1*#define la$v_ad2 la$r_ladef_bits1.la$v_ad2(#define la$v_da la$r_ladef_bits1.la$v_da,#define la$v_dio1 la$r_ladef_bits1.la$v_dio1,#define la$v_dio2 la$r_ladef_bits1.la$v_dio2,#define la$v_dio3 la$r_ladef_bits1.la$v_dio3,#define la$v_dio4 la$r_ladef_bits1.la$v_dio4,#define la$v_dio5 la$r_ladef_bits1.la$v_dio52#define la$v_bfrovrn la$r_ladef_bits2.la$v_bfrovrn"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LADEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARL ET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $latdef ***/#ifndef __LATDEF_LOADED#define __LATDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #undef __struct#undef __union#define __struct struct#define __union union#define LAT$M_ETYPE 0xFFFF#define LAT$C_ENT_NODE 1#define LAT$C_ENT_SERVICE 2#define LAT$C_ENT_LINK 3#define LAT$C_ENT_PORT 4#define LAT$C_ENT_CONNECTION 5#define LAT$C_ENT_QUEUE_ENTRY 6#define LAT$C_MAXETYPE 6#define LAT$M_ESTATUS 0xFN#define LAT$C_ENTS_OLD 0 /* Must already exist */N#define LAT$C_ENTS_NEW 1 /* Must NOT exist. Create it. */N#define LAT$C_ENTS_UNK 2 /* Create if it does not exist */N#define LAT$C_ENTS_DEL 3 /* Must exist. Delete it. */#define LAT$M_SENSE_NEXT 0x1#define LAT$M_SENSE_FULL 0x2#define LAT$M_READ_HISTORY 0x4 #ifdef __NEW_STARLETtypedef struct _entity { unsigned lat$v_etype : 16; __union {# unsigned lat$v_estatus : 4; __union {N un signed char lat$b_eflags; /* Flags for SENSEmode */ __struct {N unsigned lat$v_sense_next : 1; /* Wildcard flag */N unsigned lat$v_sense_full : 1; /* Full (vs. summary) flag */N unsigned lat$v_read_history : 1; /* Used for history buffer */, unsigned lat$v_fill_74_ : 5;" } lat$r_eflagbits; } lat$r_eflag; } lat$r_estatflags; } ENTITY; #if !defined(_ _VAXC)4#define lat$v_estatus lat$r_estatflags.lat$v_estatus0#define lat$r_eflag lat$r_estatflags.lat$r_eflag-#define lat$b_eflags lat$r_eflag.lat$b_eflags3#define lat$r_eflagbits lat$r_eflag.lat$r_eflagbits9#define lat$v_sense_next lat$r_eflagbits.lat$v_sense_next9#define lat$v_sense_full lat$r_eflagbits.lat$v_sense_full=#define lat$v_read_history lat$r_eflagbits.lat$v_read_history"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct entity { unsigned lat$v _etype : 16; __union {# unsigned lat$v_estatus : 4; __union {N unsigned char lat$b_eflags; /* Flags for SENSEmode */ __struct {N unsigned lat$v_sense_next : 1; /* Wildcard flag */N unsigned lat$v_sense_full : 1; /* Full (vs. summary) flag */N unsigned lat$v_read_history : 1; /* Used for history buffer */, unsigned lat$v_fill_74_ : 5;" } lat$r_ef lagbits; } lat$r_eflag; } lat$r_estatflags; } ; #if !defined(__VAXC)4#define lat$v_estatus lat$r_estatflags.lat$v_estatus>#define lat$b_eflags lat$r_estatflags.lat$r_eflag.lat$b_eflagsV#define lat$v_sense_next lat$r_estatflags.lat$r_eflag.lat$r_eflagbits.lat$v_sense_nextV#define lat$v_sense_full lat$r_estatflags.lat$r_eflag.lat$r_eflagbits.lat$v_sense_fullZ#define lat$v_read_history lat$r_estatflags.lat$r_eflag.lat$r_eflagbits.lat$v_read_history"#endif /* #if ! defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define LAT$M_ITEMINDEX 0x3FFF#define LAT$M_STRING 0x4000#define LAT$M_CLEAR 0x8000N#define LAT$_ITM_STATE 1 /*Entity (node or port) state */N#define LAT$_ITM_CIRCUIT_TIMER 2 /*Circuit timer value */N#define LAT$_ITM_KEEPALIVE_TIMER 3 /*Keepalive timer value */N#define LAT$_ITM_MULTICAST_TIMER 4 /*Multicast timer value */N#define LAT$_ITM_NODE_LIMIT 5  /*Maximum number of nodes */N#define LAT$_ITM_RETRANSMIT_LIMIT 6 /*Retransmit limit value */N#define LAT$_ITM_SERVER_MODE 7 /*Enable LAT master flag */N#define LAT$_ITM_OUTGOING_SES_LIMIT 8 /*Outgoing sessions limit */N#define LAT$_ITM_INCOMING_SES_LIMIT 9 /*Incoming sessions limit */N#define LAT$_ITM_CONNECTIONS 10 /*Enable LAT slave flag */N#define LAT$_ITM_DECNET_ADDRESS 11 /*Use DECnet address flag */N#define LAT$_ITM_RATING 12 /*Static LAT rating value */N#define LAT$_ITM_RATING_TYPE 13 /*Dynamic/static rating flag */N#define LAT$_ITM_NODE_TYPE 14 /*Local/remote node type flag */N#define LAT$_ITM_NODE_STATUS 15 /*Reachable/unreachable flag */N#define LAT$_ITM_SERVICE_STATUS 16 /*Available/unavailable flag */N#define LAT$_ITM_PORT_TYPE 17 /*Port type value */N#define LAT$_ITM_QUEUED 18 /*Queued/nonqueued access flag */N#define LAT$_ITM_DISCONNECT_REASON 19 /*Reason for last disconnect */N#define LAT$_ITM_CONNECTED_COUNT 20 /*Number of current sessions */N#define LAT$_ITM_SERVICE_TYPE 21 /*Service type value */N#define LAT$_ITM_CTNOD_SSZ 22 /*(node) Seconds since zeroed */N#define LAT$_ITM_CTNOD_MSGR 23 /*(node) Messages received */N#define LAT$_ITM_CTNOD_MSGT 24 /*(node) Messages transmitted */N#define LAT$_ITM_CTNOD_SLTR 25 /*(node) Slots received */N#define LAT$_ITM_CTNOD_SLTT 26 /*(node) Slots transmitted */N#define LAT$_ITM_CTNOD_BYTR 27 /*(node) Bytes received */N#define LAT$_ITM_CTNOD_BYTT 28 /*(node) Bytes transmitted */N#define LAT$_ITM_CTNOD_MNA 29 /*(node) Multiple node addresses */N#define LAT$_ITM_CTNOD_DUP 30 /*(node) Duplicates received */N#define LAT$_ITM_CTNOD_MRT 31 /*(node) Messages retransmitted */N#define LAT$_ITM_CTNOD_ILM 32 /*(node) Illegal messages received */N#define LAT$_ITM_CTNOD_ILS 33 /*(node) Illegal slots received */N#define LAT$_ITM_CTNOD_SLCA 34 /*(node) Solicitations accepted */N#define LAT$_ITM_CTNOD_SLCR 35 /*(node) Solicitations rejected */N#define LAT$_ITM_CTNOD_TER 36 /*(node) Transmit errors */N#define LAT$_ITM_CTNOD_RES 37 /*(node) Resource errors */N#define LAT$_ITM_CTNOD_NTB 38 /*(node) No transmit buffer */N#define LAT$_ITM_CTNOD_TMO 39 /*(node) Virtual circuit timeouts */N#define LAT$_ITM_CTNOD_DOB 40 /*(node) Discarded output bytes */N#define LAT$_ITM_CTNOD_LSTER 41 /*(node) Last transmit error */N#define LAT$_ITM_CTNOD_PROTO 42 /*(node) Protocol error count */U#define LAT$_ITM_CTPRO_IVM 43 /*(protocol) Invalid message type received */V#define LAT$_ITM_CTPRO_ISM 44 /*(protocol) Invalid start message received */O#define LAT$_ITM_CTPRO_IVS 45 /*(protocol) Invalid sequence number */P#define LAT$_ITM_CTPRO_NIZ 46 /*(protocol) Zero node index received */Q#define LAT$_ITM_CTPRO_ICI 47 /*(protocol) Invalid server slot index */P#define LAT$_ITM_CTPRO_CSI 48 /*(protocol) Circuit sequence invalid */U#define LAT$_ITM_CTPRO_NLV 49 /*(protocol) Circuit index no longer valid */N#define LAT$_ITM_CTPRO_HALT 50 /*(protocol) Circuit forced to halt */Q#define LAT$_ITM_CTPRO_MIZ 51 /*(protocol) Invalid master slot index */P#define LAT$_ITM_CTPRO_SIZ 52 /*(protocol) Invalid slave slot index */N#define LAT$_ITM_CTPRO_CRED 53 /*(protocol) Invalid credit field */Q#define LAT$_ITM_CTPRO_RCSM 54 /*(protocol) Repeat master slot create */U#define LAT$_ITM_CTPRO_RDSM 55  /*(protocol) Repeat master slot disconnect */N#define LAT$_ITM_CTSRV_SSZ 56 /*(service) Seconds since zeroed */N#define LAT$_ITM_CTSRV_MCNA 57 /*(service) Connections attempted */N#define LAT$_ITM_CTSRV_MCNC 58 /*(service) Connections completed */N#define LAT$_ITM_CTSRV_SCNA 59 /*(service) Connections accepted */N#define LAT$_ITM_CTSRV_SCNR 60 /*(service) Connections rejected */N#define LAT$_ITM_CTPRT_SSZ 61 /*(port) Seconds since zeroed */N#define LAT$_ITM_CTPRT_RMT 62 /*(port) Remote accesses */N#define LAT$_ITM_CTPRT_BYTR 63 /*(port) Bytes received */N#define LAT$_ITM_CTPRT_BYTT 64 /*(port) Bytes transmitted */N#define LAT$_ITM_MAXIMUM_UNITS 65 /*Maximum LTA device unit number */N#define LAT$_ITM_SERVICE_CLASS 66 /* Port service class item */N#define LAT$_ITM_DISPLAY_NUMBER 67 /* X Display Number (Binary) */N#define LAT$_ITM_CPU_RATING 68 /* CPU rating */N#define LAT$_ITM_SERVICE_RESPONDER 69 /* Service responder */N#define LAT$_ITM_CTNOD_MCBXMT 70 /*(node) Multicast bytes xmt */N#define LAT$_ITM_CTNOD_MCBRCV 71 /*(node) Multicast bytes rcv */N#define LAT$_ITM_CTNOD_MCMXMT 72 /*(node) Multicast msgs xmt */N#define LAT$_ITM_CTNOD_MCMRCV 73 /*(node) Multicast msgs rcv */N#define LAT$_ITM_CTNOD_SOLFAIL 74 /*(node) Solicit failures */N#define LAT$_ITM_CTNOD_ATLOS 75 /*(node) Attention slot lost */N#define LAT$_ITM_CTNOD_DATLOS 76 /*(node) User data lost */N#define LAT$_ITM_CTNOD_NOREJ 77 /*(node) No reject slot sent */N#define LAT$_ITM_CTNOD_LOSCT 78 /*(node) Node counter lost */N#define LAT$_ITM_CTNOD_LOSSAM 79 /*(node) s.a.m. lossage */N#define LAT$_ITM_CTNOD_NOSAM 80 /*(node) Couldn't send s.a.m. */N#define LAT$_ITM_CTNOD_NOSTS 81 /*(node) Lost node status */N#define LAT$_ITM_CTNOD_NOXMT 82 /*(node) No link to send on */N#define LAT$_ITM_HISTORY 83 /*(node) History buffer enable */N#define LAT$_ITM_CTNOD_CTLERR 84 /*(node) Controller errors */N#define LAT$_ITM_CTNOD_CERRCOD 85 /*(node) Last controller error */P#define LAT$_ITM_CTNOD_ISOLA 86 /*(node) (Incoming) solicits accepted */P#define LAT$_ITM_CTNOD_ISOLR 87 /*(node) (Incoming) solicits rejected */N#define LAT$_ITM_CONNECTED_SESSIONS 88 /* Connected session count */N#define LAT$_ITM_CONNECT_TYPE 89 /* Connection type */N#define LAT$_ITM_CONNECTION_SESS_LIM 90 /* Connection session limit */N#define LAT$_ITM_CTCON_MSGRCV 91 /*(conn) msgs received */N#define LAT$_ITM_CTCON_DUPRCV 92 /*(conn) dup msgs rcvd */N#define LAT$_ITM_CTCON_MSGXMT 93 /*(conn) msgs xmtd */N#define LAT$_ITM_CTCON_MSGILL 94 /*(conn) illegal msgs rcvd */N#define LAT$_ITM_CTCON_MSGRXT 95 /*(conn) msgs retransmitted */N#define LAT$_ITM_CTCON_SLTILL 96 /*(conn) ill slots rcvd */N#define LAT$_ITM_CTCON_DUPNOD 97 /*(conn) duplicate node */N#define LAT$_ITM_CTCON_SECZER 98 /*(conn) seconds since zero */N#define LAT$_ITM_CTCON_BYTRCV 99 /*(conn) bytes received */N#define LAT$_ITM_CTCON_BYTXMT 100 /*(conn) bytes xmtd */N#define LAT$_ITM_CTCON_SLTRCV 101 /*(conn) slots rcvd */N#define LAT$_ITM_CTCON_SLTXMT 102 /*(conn) slots transmitted */N#define LAT$_ITM_CTCON_SOLACP 103 /*(conn) solicits accepted */N#define LAT$_ITM_CTCON_SOLREJ 104 /*(conn) solicits rejected */N#define LAT$_ITM_CTCON_XERR 105 /*(conn) last transmit error  */N#define LAT$_ITM_CTCON_XERRCOD 106 /*(conn) last xmt error code */N#define LAT$_ITM_CTCON_ATTLOS 107 /*(conn) attention slot loss */N#define LAT$_ITM_CTCON_DATLOS 108 /*(conn) data loss */N#define LAT$_ITM_CTCON_CANTREJ 109 /*(conn) reject slot loss */O#define LAT$_ITM_SESSION_NUMBER 110 /*(conn) session number for subblock */N#define LAT$_ITM_FORWARD_SESSION_LIMIT 111 /*(node) forward session limit */N#define LAT$_ITM_EXTRA_DATALINK_BUFFERS 112 /*Extra datalink buffers */N#define LAT$_ITM_TRANSMIT_BUFFERS_INUSE 113 /*Transmit buffers in use */N#define LAT$_ITM_QUE_POS_OBSOLETE 114 /*Queue position for entry */N/*Obsolete - node queue and */N/*service queue position are */N/*now implemented. */N#define LAT$_ITM_QUEUE_DEPTH_LIMIT 115 /*(node) queue depth limit */N#define LAT$_ITM_DEVICE_SEED 116 /*(node) device seed */N#define LAT$_ITM_NODE_QUEUE_POSITION 117 /*(port) minimum queue position */N#define LAT$_ITM_SERVICE_QUEUE_POSITION 118 /*(port) maximum queue position */N#define LAT$_ITM_DIALUP 119 /*(port) dialup characteristic */N#define LAT$_ITM_AUTOPROMPT 120 /*(port) autoprompt char */T#define LAT$_ITM_RATING_LOAD_OBSOLETE 121 /*obsolete - portion of rating for load */N#define LAT$_ITM_CTPRT_LCL 122 /*(port) local accesses */N#define LAT$_ITM_CTPRT_SLCA 123 /*(port) Solicitations accepted */N#define LAT$_ITM_CTPRT_SLCR 124 /*(port) Solicitations rejected */P#define LAT$_ITM_CTPRT_ISOLA 125 /*(node) (Incoming) solicits accepted */P#define LAT$_ITM_CTPRT_ISOLR 126 /*(node) (Incoming) solicits rejected */N/* */N/* This next item code is only returned (it cannot be supplied as a */N/* SETMODE item). It indicates whether or not a service on the local */N/* node is password protected. */N/* */N#define LAT$_ITM_PASSWORD 127 /*(svc) Password enabled/disabled */N#define LAT$_ITM_HI_CIRCUITS 128 /*(node) Hi circuit count */N#define LAT$_ITM_CUR_CIRCUITS 129 /*(node) Current circuit count */N#define LAT$_ITM_MAX_CIRCUITS 130 /*(node) Maximum virtual circuits */N#define LAT$_ITM_HI_SESSIONS 131 /*(node) Hi session count */N#define LAT$_ITM_CUR_SESSIONS 132 /*(node) Current session count */N#define LAT$_ITM_MAX_SESSIONS 133 /*(node) Maximum session count */N#define LAT$_ITM_HI_OUT_QUEUE 134 /*(node) Hi outgoing queue entries */N#define LAT$_ITM_CUR_OUT_QUEUE 135 /*(node) Current outgoing q entries */N#define LAT$_ITM_MAX_OUT_QUEUE 136 /*(node) Maximum outgoing q entries */N#define LAT$_ITM_HI_IN_QUEUE 137 /*(node) Hi incoming queue entries */N#define LAT$_ITM_CUR_IN_QUEUE 138 /*(node) Current incoming q entries */N#define LAT$_ITM_MAX_IN_QUEUE 139 /*(node) Maximum incoming q entries */N#define LAT$_ITM_HI_SAMS_QUEUED 140 /*(node) Hi unprocessed SAMs */N#define LAT$_ITM_CUR_SAMS_QUEUED 141 /*(node) Current unprocessed SAMs */N#define LAT$_ITM_MAX_SAMS_QUEUED 142 /*(node) Maximum unprocessed SAMs */N#define LAT$_ITM_HI_SOL_QUEUED 143 /*(node) Hi unprocessed sol infos */Q#define LAT$_ITM_CUR_SOL_QUEUED 144 /*(node) Current unprocessed sol infos */Q#define LAT$_ITM_MAX_SOL_QUEUED 145 /*(node) Maximum unprocessed sol infos */N#define LAT$_ITM_HI_AVAIL_SVCS 146 /*(node) Hi available services */N#define LAT$_ITM_CUR_AVAIL_SVCS 147 /*(node) Current available services */N#define LAT$_ITM_MAX_AVAIL_SVCS 148 /*(node) Maximum available services */N#define LAT$_ITM_HI_REACH_NODES 149 /*(node) Hi reachable nodes */N#define LAT$_ITM_CUR_REACH_NODES 150 /*(node) Current reachable nodes */N#define LAT$_ITM_MAX_REACH_NODES 151 /*(node) Maximum reachable nodes */N#define LAT$_ITM_HI_LCL_SVCS 152 /*(node) Hi local services */N#define LAT$_ITM_CUR_LCL_SVCS 153 /*(node) Current local services */N#define LAT$_ITM_MAX_LCL_SVCS 154 /*(node) Maximum local services */N#define LAT$_ITM_DISCARDED_NODES 155 /*(node) Discarded nodes */N#define LAT$_ITM_MAX_DL_BUFFERS 156 /*(conn) Maximum datalink buffers */N#define LAT$_ITM_PRODUCT_TYPE 157 /*(conn) Product type */N#define LAT$_ITM_REM_PRODUCT_VERSION 158 /*(conn) Remote product version */N#define LAT$_ITM_CTPRT_FRAMERR 159 /*(port) Framing errors */N#define LAT$_ITM_CTPRT_PARERR 160 /*(port) Parity errors  */N#define LAT$_ITM_CTPRT_OVERRUN 161 /*(port) Data overruns */\#define LAT$_ITM_CTPRO_INVCLASS 162 /*(protocol) protocol error invalid service class */^#define LAT$_ITM_CTPRO_EXCSTART 163 /*(protocol) protocol error (excessive start slots) */T#define LAT$_ITM_CTNOD_XSTR 164 /*(node) Remote node too many START slots */N#define LAT$_ITM_PASSWORD_FAILURES 165 /*(service,port) Password failures */N#define LAT$_ITM_CTPRO_ILLSAM 166 /*(protocol) Illegal SAMs */N#define LAT$_ITM_TYPEAHEAD 167 /*(port) 1 = typeahd present */N#define LAT$_ITM_CTLAT_RMSG 168 /*(link) LAT msgs rcvd */N#define LAT$_ITM_CTLAT_RBYT 169 /*(link) LAT bytes rcvd */N#define LAT$_ITM_CTLAT_XMSG 170 /*(link) LAT msgs xmt */N#define LAT$_ITM_CTLAT_XBYT 171 /*(link) LAT bytes xmt */N#define LAT$_ITM_CTLAT_MUL_RMSG 172 /*(link) LAT multicast msgs rcvd */N#define LAT$_ITM_CTLAT_MUL_RBYT 173 /*(link) LAT multicast bytes rcvd */N#define LAT$_ITM_CTLAT_MUL_XMSG 174 /*(link) LAT multicast msgs xmt */N#define LAT$_ITM_CTLAT_MUL_XBYT 175 /*(link) LAT multicast bytes xmt */N#define LAT$_ITM_PATH_STATE 176 /*Datalink path state */N#define LAT$_ITM_LARGE_BUFFERS 177 /*Use of large buffers by default */R#define LAT$_ITM_ANNOUNCEMENTS 178 /*(node) Transmit service announcements */N#define LAT$_ITM_PORT_STATE 179 /*(port) Current state */N#define LAT$_ITM_CTPRO_BADUID 180 /*(protocol) Invalid node UID event */#define LAT$C_ITM_MAXSCALAR 180T#define LAT$_ITM_IDENTIFICATION 16640 /*Entity (node or service) identification */N#define LAT$_ITM_SERVICE_NAME 16641 /*Service name */N#define LAT$_ITM_NODE_NAME 16642 /*Node name */N#define LAT$_ITM_PORT_NAME 16643 /*Port name */P#define LAT$_ITM_CONNECTED_SERVICE_NAME 16644 /*Port's connected service name */N#define LAT$_ITM_CONNECTED_NODE_NAME 16645 /*Port's connected node name */N#define LAT$_ITM_CONNECTED_PORT_NAME 16646 /*Port's connected port name */N#define LAT$_ITM_TARGET_SERVICE_NAME 16647 /*Port's target service name */N#define LAT$_ITM_TARGET_NODE_NAME 16648 /*Port's target node name */N#define LAT$_ITM_TARGET_PORT_NAME 16649 /*Port's target port name */N#define LAT$_ITM_SERVICE_GROUPS 16650 /*Enabled service groups bitmask */N#define LAT$_ITM_USER_GROUPS 16651 /*Enabled user groups bitmask */N#define LAT$_ITM_LINK_NAME 16652 /*Link name */N#define LAT$_ITM_SERVICE_PASSWORD 16653 /*Service password */N#define LAT$_ITM_DEVICE_NAME 16654 /*Link's device name */N#define LAT$_ITM_DATALINK_ADDRESS 16655 /*6-byte binary Ethernet address */N#define LAT$_ITM_PROTOCOL_VERSION 16656 /*LAT protocol version string */N#define LAT$_ITM_SVC_NODE_BLOCK 16657 /*Subblock for SENSE SERVICE */N#define LAT$_ITM_NODE_SVC_BLOCK 16658 /*Subblock for SENSE NODE */N#define LAT$_ITM_DED_PORT_BLOCK 16659 /*Subblock for dedicated ports */N#define LAT$_ITM_COUNTERS 16660 /*Subblock for counters */N#define LAT$_ITM_PROTOCOL_ERRORS 16661 /*Subblock for protocol errors */N#define LAT$_ITM_CONNECTED_LINK_NAME 16662 /*Port's connected link name */N#define LAT$_ITM_HISTORY_ENTRY 16663 /*Node history buffer entry */N#define LAT$_ITM_CONNECT_ID 16664 /*Connect ID name */N#define LAT$_ITM_SESSION_BLOCK 16665 /*Subblock for SENSE CONNECTION */N#define LAT$_ITM_QUEUED_ENTRY_ID 16666 /*Queued entry ID string */N#define LAT$_ITM_LIM_PORT_BLOCK 16667 /*subblock for limited ports */N#define LAT$_ITM_SERVICE_CLASSES 16668 /*service class bitmask for node */N#define LAT$_ITM_LAT_DEV_CTR_BLOCK 16669 /*link LAT only counters */N#define LAT$_ITM_PATH_BLOCK 16670 /*Datalink path information */!#define LAT$C_ITM_MAXSTRING 16670 #ifdef __NEW_STARLETtypedef struct _item_entry { __union {* unsigned short int lat$w_itemcode; __struct {* unsigned lat$v_itemindex : 14;& unsigned lat$v_string : 1;% unsigned lat$v_clear : 1; } lat$r_itm_bits; } lat$r_itm_code; __union { __struct {* unsigned char lat$b_item_bcnt;- char lat$t_item_string_value [1];( } lat$r_item_counted_string;- unsigned int lat$l_item_scalar_value; } lat$r_item_value; } ITEM_ENTRY; #if !defined(__VAXC)4#define lat$w_itemcode lat$r_itm_code.lat$w_itemcode4#define lat$r_itm_bits lat$r_itm_code.lat$r_itm_bits6#define lat$v_itemindex lat$r_itm_bits.lat$v_itemindex0#define lat$v_string lat$r_itm_bits.lat$v_string.#define lat$v_clear la t$r_itm_bits.lat$v_clearR#define lat$b_item_bcnt lat$r_item_value.lat$r_item_counted_string.lat$b_item_bcntb#define lat$t_item_string_value lat$r_item_value.lat$r_item_counted_string.lat$t_item_string_valueH#define lat$l_item_scalar_value lat$r_item_value.lat$l_item_scalar_value"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct item_entry { __union {* unsigned short int lat$w_itemcode; __struct {* unsigned lat$v_itemindex : 14;&  unsigned lat$v_string : 1;% unsigned lat$v_clear : 1; } lat$r_itm_bits; } lat$r_itm_code; __union { __struct {* unsigned char lat$b_item_bcnt;- char lat$t_item_string_value [1];( } lat$r_item_counted_string;- unsigned int lat$l_item_scalar_value; } lat$r_item_value; } ; #if !defined(__VAXC)4#define lat$w_itemcode lat$r_itm_code.lat$w_itemcodeE#define lat$v_itemindex lat$ r_itm_code.lat$r_itm_bits.lat$v_itemindex?#define lat$v_string lat$r_itm_code.lat$r_itm_bits.lat$v_string=#define lat$v_clear lat$r_itm_code.lat$r_itm_bits.lat$v_clearR#define lat$b_item_bcnt lat$r_item_value.lat$r_item_counted_string.lat$b_item_bcntb#define lat$t_item_string_value lat$r_item_value.lat$r_item_counted_string.lat$t_item_string_valueH#define lat$l_item_scalar_value lat$r_item_value.lat$l_item_scalar_value"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET  */#define LAT$C_DISABLED 0#define LAT$C_ENABLED 1#define LAT$C_OFF 0#define LAT$C_ON 1#define LAT$C_SHUT 2#define LAT$M_FLUSH_DATA 1N#define LAT$C_PT_FORWARD 0 /*"Forward" connection port */N#define LAT$C_PT_INTERACTIVE 1 /*Interactive incoming port */N#define LAT$C_PT_APPLICATION 2 /*Application port */N#define LAT$C_PT_DEDICATED 3 /*Dedicated port */N#define LAT$C_PT_LIMITED 4  /*Limited port */N#define LAT$C_PT_STATE_INACTIVE 0 /*Idle, no connection */N#define LAT$C_PT_STATE_CONNECTING 1 /*Connection in progress, not done */N#define LAT$C_PT_STATE_ACTIVE 2 /*Fully connected */N#define LAT$C_PT_STATE_DISCONNECTING 3 /*In the disconnect process */N#define LAT$C_NT_LOCAL 0 /*My own node */N#define LAT$C_NT_REMOTE 1 /*The other guy  */N#define LAT$C_ST_GENERAL 0 /*General timesharing service */N#define LAT$C_ST_APPLICATION 1 /*Application service */N#define LAT$C_ST_LIMITED 2 /*Limited service */N#define LAT$C_DYNAMIC 0 /*Dynamic calculation */N#define LAT$C_STATIC 1 /*Fixed rating */#define LAT$C_PS_WORKING 0#define LAT$C_PS_SUSPECT 1#define LAT$C_PS_FAILED 2N#define LAT$C_CN_UNKNOWN 0 /*Unknown connection type */N#define LAT$C_CN_INCOMING 1 /*Slave connection */N#define LAT$C_CN_OUTGOING 2 /*Master connection */N#define LAT$C_UNREACHABLE 0 /*Known not there */N#define LAT$C_UNKNOWN 1 /*Haven't heard in a while */N#define LAT$C_REACHABLE 2 /*I heard from him */N#define LAT$C_UNAVAILABLE 0  /*Can't get it */N#define LAT$C_AVAILABLE 1 /*It IS there */N#define LAT$C_SERVCLASS_INTERACTIVE 1 /* SC1 = TTDRIVER */N#define LAT$C_SERVCLASS_TESTSERVICE 2 /* SC2 = TEST SERVICE */N#define LAT$C_SERVCLASS_XTRANSPORT 3 /* SC3 = X Transport */N#define LAT$C_SERVCLASS_FONT 4 /* SC4 = X Fonts */ #ifdef __NEW_STARLETtypedef union _latsetbits {#if defined(__VAXC) char lat$t_filler[];#else"#define lat$t_filler lat$t_filler2"#endif /* #if defined(__VAXC) */ char lat$t_filler2; } LATSETBITS;#else /* __OLD_STARLET */union latsetbits {#if defined(__VAXC) char lat$t_filler[];#else"#define lat$t_filler lat$t_filler2"#endif /* #if defined(__VAXC) */ char lat$t_filler2; } ;%#endif /* #ifdef __NEW_STARLET */N#define LAT$C_RATING_VECTOR_LENGTH 56 /* Size of vector */ #ifdef __NEW_STARLETtypedef struct _rating_vec {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endifN void *lat$a_control_init_rtn; /* Address of controller init */N void *lat$a_unit_init_rtn; /* Address of init init */S void *lat$a_rating_init_rtn; /* Address of initial call from LTDRIVER */N void *lat$a_timer_rtn; /* Routine called each second */N void *lat$a_calc_rating_rtn; /* Routine that calculates rating */N void *lat$a_stop_rtn; /* Routine called at LAT shutdown */N void *lat$a_spare1_rtn; /* Expansion placeholder */N void *lat$a_spare2_rtn; /* Expansion placeholder */N void *lat$a_spare3_rtn; /* Expansion placeholder */N void *lat$a_spare4_rtn; /* Expansion placeholder */N void *lat$a_spare5_rtn; /* Expansion placeholder */N void *lat$a_spare6_rtn; /* Expansion placeholder */N void *lat$a_spare7_rtn; /* Expansion placeholder */N void *lat$a_spare8_rtn; /* Expansion placeholder */ } RATING_VEC;#else /* __OLD_STARLET */struct rating_vec {N void *lat$a_control_init_rtn; /* Address of controller init  */N void *lat$a_unit_init_rtn; /* Address of init init */S void *lat$a_rating_init_rtn; /* Address of initial call from LTDRIVER */N void *lat$a_timer_rtn; /* Routine called each second */N void *lat$a_calc_rating_rtn; /* Routine that calculates rating */N void *lat$a_stop_rtn; /* Routine called at LAT shutdown */N void *lat$a_spare1_rtn; /* Expansion placeholder */N void *lat$a_spare2_rtn; /* Expansion placeholder */N void *lat$a_spare3_rtn; /* Expansion placeholder */N void *lat$a_spare4_rtn; /* Expansion placeholder */N void *lat$a_spare5_rtn; /* Expansion placeholder */N void *lat$a_spare6_rtn; /* Expansion placeholder */N void *lat$a_spare7_rtn; /* Expansion placeholder */N void *lat$a_spare8_rtn;  /* Expansion placeholder */ } ;%#endif /* #ifdef __NEW_STARLET */ #define ENTITY entity#define ITEM_ENTRY item_entry %#define LAT$R_ITM_CODE lat$r_itm_code)#define LAT$R_ITEM_VALUE lat$r_item_value7#define LAT$L_ITEM_SCALAR_VALUE lat$l_item_scalar_value)#define LAT$R_ESTATFLAGS lat$r_estatflags;#define LAT$R_ITEM_COUNTED_STRING lat$r_item_counted_string%#define LAT$R_ITM_BITS lat$r_itm_bits#define LAT$V_ETYPE lat$v_etype%#define LAT$W_ITEMCODE lat$w_itemcode'#define LAT$B_ITEM_BCNT lat$b_item_bcnt#define LAT$R_EFLAG lat$r_eflag7#define LAT$T_ITEM_STRING_VALUE lat$t_item_string_value##define LAT$V_ESTATUS lat$v_estatus!#define LAT$V_STRING lat$v_string'#define LAT$R_EFLAGBITS lat$r_eflagbits-#define LAT$V_READ_HISTORY lat$v_read_history)#define LAT$V_SENSE_NEXT lat$v_sense_next)#define LAT$V_SENSE_FULL lat$v_sense_full#ifndef __cplusplus"#pragma member_alignment __restore#pragma standard#include #pragma member_alignment __save#pragma nomember_alignment#pragma nostandard#endif /* __cplusplus */#undef __struct#undef __union#if !defined(__VAXC)#define __struct struct#define __union union#else#define __struct variant_struct#define __union variant_union#endif $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LATDEF_LOADED */ ww)/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]LATMSG.SDI;1 *//******************************************************************************************************* *************************//*** MODULE $LATMSGDEF ***/#ifndef __LATMSGDEF_LOADED#define __LATMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*  */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:59:28.97 */N/* */N/* MODULE: LATMSG.MSG */N/* VERSION: 'V6.0-064' */N/* */Q/*********************************************************** ****************** *//** * */L/** COPYRIGHT (C) 1978, 1980, 1982, 1984, 1985, 1987, 1990-1995 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER  * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE  USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/* */0/* V6.0-064 MICHAEL D. RASPUZZI 16-JAN-1995 */B/* ADD ERROR MESSAGE FOR INVALID PORT NAME. */N/*  */0/* V6.0-063 MICHAEL D. RASPUZZI 14-SEP-1994 */B/* ADD ERROR MESSAGE FOR INVALID NODE UID. */N/* */0/* V6.0-062 MICHAEL D. RASPUZZI 16-MAY-1994 */B/* ADD ERROR MESSAGES FOR NEW LAT RATING IMAGE. THIS MESSAGES */B/* ARE USED TO INDICATE THE STATE OF THE LAT$RATING IMAGE. IT */B/* SHOULD BE LOADED CORRECTLY IF THE SYSTEM USED THE PROPER */B/* LAT STARTUP. HOWEVER, WE ALL KNOW THA T PEOPLE LIKE TO DO */B/* THINGS THEIR OWN WAY ... */N/* */0/* V05-061 MICHAEL D. RASPUZZI 22-FEB-1994 */B/* ADD NEW REJECT REASON FOR LTPAD. MATCHES DECSERVER REJECT */B/* REASON FOR SAME FUNCTIONALITY. */N/* */0/* V05-060 MICHAEL D. RASPUZZI 6-JAN-1994 */B/* ADD NEW CONNECT MESSAGE FOR LTPAD WHEN DISCONNECT */B/* CHARACTER IS DISABLED. */N/* */0/* V05-059 MICHAEL D. RASPUZZI 30-AUG-1993 */B/* ADD NEW MESSAGE FOR INCOMPATIBLE PROTOCOL VERSION. */N/* */0/* V05-058 MICHAEL D. RASPUZZI 3-MAY-1993 */B/* ADDED INCOMPATIBLE DRIVER/ACP ERROR CODE.  */N/* */0/* V05-057 MICHAEL D. RASPUZZI 16-APR-1993 */B/* ADD MORE CONNECT FAILURE MESSAGES. */N/* */0/* V05-056 MICHAEL D. RASPUZZI 8-SEP-1992 */B/* ADD MESSAGE FOR DELETING CONNECTION. */N/* */0/* V05-055 MICHAEL  D. RASPUZZI 28-AUG-1992 */B/* ADD INFORMATIONAL ERROR MESSAGE FOR LTPAD TO QUEUE */B/* QUEUE POSITION REPORTING. */N/* *///* V05-54 MICHAEL D. RASPUZZI 19-AUG-1992 */B/* ADD ERROR MESSAGE WHEN ONE TRIES TO RUN LATACP IMPROPERLY. */N/* *///* V05-53 MICHAEL D. RASPUZZI 3-AUG-1992 */B/* ADD INFORMATIONAL RETURN FOR LIMITED SERVICE CONNECTION. */N/* *///* V05-52 MICHAEL D. RASPUZZI 24-JUL-1992 */B/* ADD "no active links" ERROR. */N/* *///* V05-51 MICHAEL D. RASPUZZI 13-JAN-1992 */B/* ADD MISSING LRJ REASON CODES. */N/*  *///* V05-50 MICHAEL D. RASPUZZI 4-NOV-1991 */B/* ADD CONNECT SOLICIT CODE FOR REGULAR CONNECTIONS. */N/* *///* V05-49 MICHAEL D. RASPUZZI 5-SEP-1991 */B/* ADD LAN DRIVER ERROR MESSAGE SO LAT WON'T START IF VCI */B/* DRIVERS ARE ABSENT. */N/* *///* V05-48 MICHAEL D. RASPUZZI 19-JUN-1991 */B/* MAKE SDL MODULE NAME $LATMSGDEF TO PREVENT CONFLICTS WITH */B/* REAL $LATDEF THAT IS IN STARLET. */N/* */,/* V05-47 ERIC L. MERSHON 10-MAY-1991 */B/* MAKE GRAMMATICAL CHANGE TO DRIVERNOTSHUT AS REQUESTED BY */B/* VMS DOC WRITER. */N/*  */,/* V05-46 ERIC L. MERSHON 4-APR-1991 */B/* MAKE COSMETIC CHANGES RECOMMENDED BY VMS DOCUMENTATION. */N/* *///* V05-45 MICHAEL D. RASPUZZI 8-MAR-1991 */B/* ADD MESSAGE FOR X SOLICIT REQUESTS. */N/* *///* V05-44 MICHAEL D. RASPUZZI 19-JAN-1991 */B/* ADD QUEUED ENTRY MESSAGES.  */N/* *///* V05-43 MICHAEL D. RASPUZZI 31-DEC-1990 */B/* ADD CONNECTION MESSAGES AND CHANGE "server mode disabled". */N/* */&/* V05-42 SHOOU YIU 28-NOV-1990 */B/* ADD MESSAGE FOR LINK NAME THAT IS TOO LONG */N/* */,/* V05-41 ERIC L. MERSHON 25-OCT-1990 */B/* REMOVE LNKOBS, SRVRSOBS, AND PRTOBS. ADD QUALOBS, CMDOBS. */N/* *///* V05-40 MICHAEL D. RASPUZZI 13-SEP-1990 */B/* ADD MESSAGES WHEN NODE IS SHUTTING DOWN OR INCOMING */B/* CONNECTIONS ARE DISABLED. */N/* */*/* V05-39 DAVID H. COOK 27-AUG-1990 */B/* ADD NODECNTRSONLY MSG FOR SE NSEMODE. */N/* */,/* V05-38 ERIC L. MERSHON 25-JUL-1990 */B/* ADD CONATMPT AND REMOVE CAPITILIZATION OF THE BEGINNING OF */B/* SOME MESSAGES. */N/* */,/* V05-37 ERIC L. MERSHON 27-JUN-1990 */B/* REMOVE QUOTES FROM TODISCON, AND ADD CONFQUAVAL. */N/*  */,/* V05-36 ERIC L. MERSHON 13-JUN-1990 */B/* ADD CNTRSOBS, SRVRSOBS, AND PRTOBS. */N/* */,/* V05-35 ERIC L. MERSHON 15-MAY-1990 */B/* ADD DEFINEKEY. */N/* */,/* V05-34 ERIC L. MERSHON 30-JAN-1990 */B/* ADD LNKOBS. */N/* */,/* V05-33 ERIC L. MERSHON 12-JAN-1990 */B/* MODIFIED TODISCON TO ACCEPT AN FAO PARAMETER TO DISPLAY */B/* USER'S CUSTOMIZED DISCONNECT CHARACTER (FOR LTPAD). */N/* *///* V05-32 MICHAEL D. RASPUZZI 9-JAN-1990 */B/* ADD DRIVERNOTSHUT MESSAGE  */N/* */,/* V05-31 JAMES F. CAHILL 15-NOV-1989 */B/* ADD NEWLOGNAME FOR CREATE PORT/LOG/LOGICAL_NAME */N/* *///* V05-30 MICHAEL D. RASPUZZI 16-OCT-1989 */B/* ADD VERMISMATCH SO WE CAN USE TO BUILD OLD COMPONENTS */N/* */,/* V05-29 JAMES F. CAHILL 16-OCT-1989 */B/* ADD LATCP MESSAGES TO SUPPORT /LOG QUALIFIER. */N/* */*/* V05-28 DAVID H. COOK 06-OCT-1989 */B/* ADD ACPNOCTL, ACPNOKSTK, ACPNOVIRT, NODLIMIT. */N/* */*/* V05-27 DAVID H. COOK 18-SEP-1989 */B/* ADD NOMORENODS, NOMORESVCS, NOSELF, NOTOFFERED. */N/*  */*/* V05-26 DAVID H. COOK 04-AUG-1989 */B/* ADD ENTNOTFOU. */N/* */,/* V05-25 JAMES F. CAHILL 24-JUL-1989 */B/* ADD CANTATTACH. */N/* */2/* V05-24 ELM032 ERIC L. MERSHON 21-JUL-1989 */B/* CHANGED FAO PARAMETER OF END TO ASCID. */N/* */2/* V05-23 ELM023 ERIC L. MERSHON 29-JUN-1989 */B/* REMOVED FAO ARGUMENTS FROM FAILOVER. */N/* */,/* V05-22 JAMES F. CAHILL 21-JUN-1989 */B/* ADD CONTROLC. */N/*  */2/* V05-21 ELM012 ERIC L. MERSHON 6-JUN-1989 */B/* REMOVED NORESP AND ADDED TODISCON. */N/* */0/* V05-19 DHC002 DAVID H. COOK 30-MAY-1989 */B/* CREATE AN LAT SHUTDOWN MESSAGE. */N/* */2/* V05-17 ELM011 ERIC L. MERSHON 23-MAY-1989 */B/* CHANGE CONNECTED TO HAVE A SEV ERITY LEVEL INDICATOR OF */B/* SUCCESS. ADD FLEXIBILITY TO SAME MESSAGE FOR CONNECTIONS */C/* TO NODES WHICH HAVE THE SAME NAME AS THE SERVICE THEY OFFER. */N/* */+/* V05-16 SY001 SHOOU YIU 16-MAY-1989 */B/* ADD MESSAGES USED BY LTDRIVER MODULES */N/* */2/* V05-15 ELM010 ERIC L. MERSHON 16-MAY-1989 */B/* ADD REMAINING (HOPEFULLY) LAT REJECT CODES AND PWDPROMPT, */B/* USED FOR PASSWORD PROMPTING ON PASSWORD PROTECTED SERVICES. */N/* */-/* V05-014 JAMES F. CAHILL 2-MAY-1989 */B/* CHANGE SEVERITY OF REINITERR AND DRVERROR. RENAME NOTERM */C/* TO NOTATERM TO AVOID CONFUSION WITH EXISING MESSAGE NOTERMS. */N/* */3/* V05-013 ELM009 ERIC L. MERSH ON 1-MAY-1989 */B/* ADD NOTERM MESSAGE. */N/* */3/* V05-012 ELM008 ERIC L. MERSHON 28-APR-1989 */B/* ADD CTRL/Y MESSAGE, AND REMOVE SECOND FAO ARGUMENTS FROM */B/* CONFAIL AND CONLOST. */N/* */3/* V05-011 ELM007 ERIC L. MERSHON 18-APR-1989 */C/* ADD MESSAGES FOR LTPAD, AND CLEAN OUT MESSAGES INTENDED, BUT */B/* NO LONGER NEEDED FOR DDE. */N/* */-/* V05-010 JAMES F. CAHILL 10-APR-1989 */B/* CHANGE CMDERROR AND INVCMD FROM ERRORS TO WARNINGS. */N/* */-/* V05-009 JAMES F. CAHILL 9-MAR-1989 */B/* SHARED MESSAGE INVCMD NOT FOUND, SO ADD LAT$_INVCMD.  */N/* */-/* V05-008 JAMES F. CAHILL 9-MAR-1989 */B/* ADD OUTOFRANGE, REMOVE PRSERROR. */N/* */3/* V05-007 ELM006 ERIC L. MERSHON 8-MAR-1989 */B/* MERGE IN MESSAGES FROM LAT$MESSAGES AND ADD MORE */B/* DECSERVER EMULATOR MESSAGES. */N/*  */3/* V05-006 ELM005 ERIC L. MERSHON 25-FEB-1989 */B/* ADD MESSAGES FOR DECSERVER EMULATOR SESSION CONTROL */N/* */3/* V05-005 ELM002 ERIC L. MERSHON 15-FEB-1989 */B/* ADD DECSERVER EMULATOR MESSAGES */N/* */2/* V05-004 DHC0001 DAVID H. COOK 18-NOV-1988 */B/* ADD ACP MSGS */N/* */4/* V05-003 JFC0025 JAMES F. CAHILL 7-SEP-1988 */B/* ADD TWO MESSAGES FOR LMF */N/* */4/* V05-002 JFC0015 JAMES F. CAHILL 10-AUG-1987 */B/* FIX CAPITALIZATION PROBLEMS */N/*  */;/* V05-001 (VARIOUS AUTHORS) */B/* INITIAL VERSION */N/* */N/* THIS FILE REPRESENTS THE MERGE OF ERROR MESSAGES FOR LATCP, LAT, AND LGU */N/* LATCP MESSAGES APPEAR FIRST AS THIS FACILITY HAS BEEN SHIPPED. WHILE THE */N/* ERROR NAMES ARE CHANGED WITH THE ASSIGNMENT OF A LAT FACILITY CODE, THE */N/* ERROR  MESSAGE NUMBERS/MEANINGS ARE NOT. NEW ERROR MESSAGES ARE ADDED */N/* AT THE SECTION BELOW WHERE .BASE VALUES HAVE BEEN ASSIGNED. */N/* */#define LAT$_FACILITY 374!#define LAT$_CMDBUFOVFLW 24543244#define LAT$_CANTBIND 24543250#define LAT$_IVCMD 24543258#define LAT$_IVDEV 24543266#define LAT$_IVQUAL 24543274#define LAT$_MAXSERV 24543282#define LAT$_NOTERMS 24543290#define LAT$_NONODE 24543298#define LAT$_NOTLOADED 24543306#define LAT$_NOTINITED 24543314 #define LAT$_NOTSTARTED 24543322 #define LAT$_NOTSTOPPED 24543330#define LAT$_NOTSET 24543338#define LAT$_NOHISTORY 24543346!#define LAT$_NOSTARTHIST 24543354 #define LAT$_NOSUCHSERV 24543362 #define LAT$_NOTFROMLAT 24543370#define LAT$_INTERNAL 24543378 #define LAT$_SERVEXISTS 24543386#define LAT$_LOCKED 24543394#define LAT$_UNDEFLINK 24543402 #define LAT$_LINKEXISTS 24543410 #define LAT$_LINKACTIVE 24543418 #define LAT$_MAXLINKS 24543426#define LAT$_IVPORT 24543434#define LAT$_NOLINK 24543440#define LAT$_STARTED 24543451#define LAT$_STOPPED 24543459#define LAT$_SET 24543467#define LAT$_NOSERVERS 24543475N/* */N/* NEW MESSAGES ARE ADDED ONLY IN THE SECTIONS BELOW */N/* */ #define LAT$_ALREADYDEF 24544835#define LAT$_NOTDEF 24544843#define LAT$_NOCONTEXT 24544851#define LAT$_RELNOTES 24544859#define LAT$_ACPINIT 24544867#define LAT$_ACPSTATS 24544875#define LAT$_FAILOVER 24544883"#define LAT$_DISCONNECTED 24544891#define LAT$_LOSTMSG 24544899#define LAT$_PWDPROT 24544907 #define LAT$_OUTOFRANGE 24544915#define LAT$_END 24544923#define LAT$_CTRLY 24544931#define LAT$_PWDPROMPT 24544939#define LAT$_TODISCON 24544947#define LAT$_CONTROLC 24544955N#define LAT$_NEWLINK 24544963  /* CREATE /LOG MESSAGES */#define LAT$_NEWPORT 24544971 #define LAT$_NEWSERVICE 24544979 #define LAT$_NEWLOGNAME 24544987N#define LAT$_DELLINK 24544995 /* DELETE /LOG MESSAGES */#define LAT$_DELPORT 24545003 #define LAT$_DELSERVICE 24545011#define LAT$_DELENTRY 24545019N#define LAT$_MODLINK 24545027 /* SET /LOG MESSAGES */#define LAT$_MODPORT 24545035 #define LAT$_MODSERVICE 24545043#define LAT$_MODNODE 24545051N#define LAT$_ZEROLINK 24545059 /* ZERO /LOG MESSAGES */#define LAT$_ZEROPORT 24545067!#define LAT$_ZEROSERVICE 24545075#define LAT$_ZERONODE 24545083#define LAT$_DEFINEKEY 24545091#define LAT$_CONATMPT 24545099##define LAT$_NODECNTRSONLY 24545107$#define LAT$_CONNECTLIMITED 24545115##define LAT$_CONNECTQUEUED 24545123!#define LAT$_DELETEDCONN 24545131#define LAT$_NODISCON 24545139!#define LAT$_NAMETOOLONG 24546434 #define LAT$_LOGSTOPPED 24546442!#define LAT$_CONTEXTINIT 24546450#define LAT$_ILLSTRUCT 24546458!#define LAT$_CONSISTANCY 24546466#define LAT$_NOCNCT 24546474#define LAT$_BADGETJPI 24546482#define LAT$_BRDCSTMSG 24546490#define LAT$_BRDCSTOUT 24546498 #define LAT$_CANTATTACH 24546506#define LAT$_CANTSPAWN 24546514!#define LAT$_CANTCOPYSTR 24546522#define LAT$_ERRCREKBD 24546530#define LAT$_ERRVIRDPY 24546538 #define LAT$_NOGCDAVAIL 24546546 #define LAT$_NOIDBAVAIL 24546554#define LAT$_NOITMLST 24546562#define LA T$_NOREQUEST 24546570#define LAT$_DRVERROR 24546578 #define LAT$_CANTRUNACP 24546586#define LAT$_INVCMD 24548032#define LAT$_CMDERROR 24548040#define LAT$_REINITERR 24548048#define LAT$_QUALOBS 24548056#define LAT$_CNTRSOBS 24548064#define LAT$_CMDOBS 24548072#define LAT$_CONNECTED 24549633N/* */N/* LAT CONNECTION REJECTION REASON CODES. THESE MESSAGES CORRESPOND TO */N/* THE REJECTION REASON CODES GE NERATED BY LTDRIVER WHEN A CONNECTION */N/* REQUEST IS ABORTED (IE. FAILS). THE REASON CODE IS RETURNED IN PART */N/* OF THE IOSB AND MAY BE TRANSLATED TO THE CORRESPONDING CODE BELOW */N/* WITH A SIMPLE TRANSLATION VECTOR. */N/* */ #define LAT$_LRJUNKNOWN 24551236!#define LAT$_LRJSHUTDOWN 24551244!#define LAT$_LRJRESOURCE 24551252#define LAT$_LRJINUSE 24551260"#define LAT$_LRJNOSERVICE 24551268 #define LAT$_LRJDISABLE 24551276##define LAT$_LRJNOTOFFERED 24551284$#define LAT$_LRJNAMEUNKNOWN 24551292%#define LAT$_LRJACCESSREJECT 24551300%#define LAT$_LRJACCESSDENIED 24551308 #define LAT$_LRJCORRUPT 24551316##define LAT$_LRJNOTSUPPORT 24551324 #define LAT$_LRJNOSTART 24551332 #define LAT$_LRJDELETED 24551340 #define LAT$_LRJILLEGAL 24551348 #define LAT$_LRJUSERDIS 24551356##define LAT$_LRJIVPASSWORD 24551364 #define LAT$_CONTIMEOUT 24551372$#define LAT$_CONAPPLICATION 24551380!#define LAT$_LICREQUIRED 24551388!#define LAT$_UNREACHABLE 24551396 #define LAT$_NOSUCHNODE 24551404#define LAT$_NOSRVC 24551412#define LAT$_PWDSYNTAX 24551420#define LAT$_SERUNAV 24551428#define LAT$_SESLIM 24551436#define LAT$_SRVCNODE 24551444#define LAT$_VCLIM 24551452#define LAT$_NODUNAV 24551460#define LAT$_INITERR 24551468#define LAT$_OUTERROR 24551476#define LAT$_AUTHFAIL 24551484#define LAT$_CONFAIL 24551492#define LAT$_CONLOST 24551500#define LAT$_INSRES 24551508#define LAT$_NOMASTER 24551516#define LAT$_TIMEOUT 24551524#define LAT$_PROTERR 24551532#define LAT$_SRVDIS 24551540#define LAT$_NOACP 24551548#define LAT$_NOSLOT 24551556#define LAT$_BADCIRC 24551564#define LAT$_VCSESLIM 24551572#define LAT$_BADLINK 24551580#define LAT$_NOTATERM 24551588#define LAT$_NOCIB 24551596!#define LAT$_INSRESOURCE 24551604#define LAT$_CIBLIM 24551612#define LAT$_PROTVIO 24551620#define LAT$_NOROOM 24551628"#define LAT$_LISTTOOSHORT 24551636!#define LAT$_LATSTOPPING 24551644!#define LAT$_NOTWITHCONN 24551652#define LAT$_ENTNOTFOU 24551660 #define LAT$_NOMORENODS 24551668 #define LAT$_NOMORESVCS 24551676#define LAT$_NOSELF 24551684 #define LAT$_NOTOFFERED 24551692#define LAT$_ACPNOCTL 24551700#define LAT$_ACPNOKSTK 24551708#define LAT$_ACPNOVIRT 24551716#define LAT$_NODLIMIT 24551724!#define LAT$_VERMISMATCH 24551732##define LAT$_DRIVERNOTSHUT 24551740 #define LAT$_CONFQUAVAL 24551748#define LAT$_NODESHUT 24551756!#define LAT$_INCDISABLED 24551764!#define LAT$_CANTMODCONN 24551772#define LAT$_UNDEFCONN 24551780 #define LAT$_NOMORECONN 24551788 #define LAT$_UNDEFENTRY 24551796##define LAT$_NOMOREENTRIES 24551804"#define LAT$_ENTRYDELONLY 24551812#define LAT$_XSOLICIT 24551820#define LAT$_NOLANDEV 24551828#define LAT$_SOLGENSVC 24551836!#define LAT$_LRJUSERDISC 24551844"#define LAT$_LRJNOTQUEUED 24551852 #define LAT$_NOACTLINKS 24551860$ #define LAT$_CONNDELETEONLY 24551868$#define LAT$_LRJREMDISABLED 24551876"#define LAT$_INCOMPDRVACP 24551884"#define LAT$_LRJINCOMPVER 24551892#define LAT$_LRJIVMSG 24551900##define LAT$_NORATINGIMAGE 24551908##define LAT$_RATINGNOTINIT 24551916 #define LAT$_INVNODEUID 24551924 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LATMSGDEF_LOADED */ wwK/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]LBR$ROUTINES.SDI;1 *//*************************************************************************************** *****************************************/'/*** MODULE LBR$ROUTINES IDENT X-4 ***/#ifndef __LBR_ROUTINES_LOADED#define __LBR_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* */N/* This package defines the interfaces to the Librarian utility */N/* routines as documented in the OpenVMS Utility Routines Reference */N/* Manual. */N/* */N/*  */N/* LBR$CLOSE - CLose a library */N/* */N/* status = LBR$CLOSE (library_index) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/*  */#define lbr$close LBR$CLOSE #ifdef __NEW_STARLETunsigned int lbr$close( unsigned int *library_index);#else /* __OLD_STARLET */)unsigned int lbr$close(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$DELETE_DATA - Delete a module's data */N/* */N/* status = LBR$ DELETE_DATA (library_index, txtrfa [,flags]) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* txtrfa - RFA of module header for module to delete */H/* flags - key flags */N/* */)#define lbr$delete_data LBR$DELETE_DATA  #ifdef __NEW_STARLETunsigned int lbr$delete_data( unsigned int *library_index, unsigned int *txtrfa, __optional_params);#else /* __OLD_STARLET *//unsigned int lbr$delete_data(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$DELETE_KEY - Delete a key */N/* */N/* status = LBR$DELE TE_KEY (library_index, key_name [,txtrfa] [,flags]) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* key_name - Key to be deleted - for binary keys, passed by */N/* reference, for string keys, by descriptor */I/* txtrfa - RFA of module header for key to delete */H/* flags - key flags   */N/* */'#define lbr$delete_key LBR$DELETE_KEY #ifdef __NEW_STARLETunsigned int lbr$delete_key( unsigned int *library_index, unsigned int *key_name, __optional_params );#else /* __OLD_STARLET */.unsigned int lbr$delete_key(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$FIND - Lookup a module by its RFA */N/* */N/* status = LBR$FIND (library_index, txtrfa) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* txtrfa - RFA of module to access */N/*  */#define lbr$find LBR$FIND #ifdef __NEW_STARLETunsigned int lbr$find( unsigned int *library_index, unsigned int *txtrfa);#else /* __OLD_STARLET */(unsigned int lbr$find(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$FLUSH - Recover virtual memory */N/* */N/* status = LBR$FLUSH (library_index, block_type) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* block_type - Extent of the flush operation */#define lbr$flush LBR$FLUSH #ifdef __NEW_STARLETunsigned int lbr$flush( unsigned int *library_index, unsigned int block_type);#else /* __OLD_STARLET */)unsigned int lbr$flush(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$GET_HEADER - Retrieve library header information */N/* */N/* status = LBR$GET_HEADER (library_index, retary) */N/* */N/* library_index - Index value retu rned by LBR$INI_CONTROL */N/* retary - Array of 128 longwords to receive library header */N/* */'#define lbr$get_header LBR$GET_HEADER #ifdef __NEW_STARLETunsigned int lbr$get_header( unsigned int *library_index, unsigned int *retary);#else /* __OLD_STARLET */.unsigned int lbr$get_header(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* LBR$GET_HELP - Retrieve help text */N/* */N/* status = LBR$GET_HELP (library_index [,line_width] [,routine] */N/* [,data] [,key_n...]) */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* line_width - Width of the help text line  */N/* routine - Routine called to output text line */N/* data - User data passed to routine */N/* key_n - Zero or more key strings */N/* */##define lbr$get_help LBR$GET_HELP #ifdef __NEW_STARLETunsigned int lbr$get_help( unsigned int *library_index, __optional_params );#else /* __OLD_S TARLET */,unsigned int lbr$get_help(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$GET_HISTORY - Retrieve a library history update record */N/* */N/* status = LBR$GET_HISTORY (library_index, action_routine) */N/* */N/* library_ index - Index value returned by LBR$INI_CONTROL */N/* action_routine - Routine to process history records */N/* */)#define lbr$get_history LBR$GET_HISTORY #ifdef __NEW_STARLETunsigned int lbr$get_history( int *library_index,* int (*action_routine)(__unknown_params));#else /* __OLD_STARLET *//unsigned int lbr$get_history(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$GET_INDEX - Call routine for selected index keys */N/* */N/* status = LBR$GET_INDEX (library_index, index_number, routine_name */N/* [,match_desc] [,flags]) */N/* */N/* library_index - In dex value returned by LBR$INI_CONTROL */N/* index_number - Number of the index to search */N/* routine_name - User routine to process selections */N/* match_desc - Key matching string */H/* flags - Key flags */N/* */%#define lbr$get_index LBR$GET_INDEX #ifdef __N EW_STARLETunsigned int lbr$get_index( unsigned int *library_index, unsigned int *index_number,' int (*routine_name)(__unknown_params), __optional_params );#else /* __OLD_STARLET */-unsigned int lbr$get_index(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$GET_RECORD - Read a data record */N/*  */N/* status = LBR$GET_RECORD (library_index [,inbufdes] [,outbufdes]) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* inbufdes - Buffer to receive record */N/* outbufdes - Descriptor receiving information about record */'#define lbr$get_record LBR$GET_RECORD #ifdef __NEW_STARLETunsigned int lbr$get _record( unsigned int *library_index, __optional_params );#else /* __OLD_STARLET */.unsigned int lbr$get_record(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$INI_CONTROL - Initialize a library control structure */N/* */N/* status = LBR$INI_CONTROL (library_index, func [,type] [,namblk]) */N/*  */N/* library_index - Receives index value */N/* func - Function to be performed */N/* type - Type of library */N/* namblk - RMS NAM block for library */N/* */)#define lbr$ini_control LBR$INI_CONTROL #ifdef __NEW_STARLETunsigned int lbr$ini_control( unsigned int *library_index, unsigned int *func, __optional_params );#else /* __OLD_STARLET *//unsigned int lbr$ini_control(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$INSERT_KEY - Insert a new key */N/* */N/* status = LBR$INSERT_KEY (library_index, key_name, txtrfa [,flags]) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* key_name - Name of key to insert (reference for binary key, */N/* descriptor for text key) */N/* txtrfa - RFA of module */H/* flags - key flags  */N/* */'#define lbr$insert_key LBR$INSERT_KEY #ifdef __NEW_STARLETunsigned int lbr$insert_key( unsigned int *library_index, unsigned int *key_name, unsigned int *txtrfa, __optional_params);#else /* __OLD_STARLET */.unsigned int lbr$insert_key(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*   */N/* LBR$LOOKUP_KEY - Look up a library key */N/* */N/* status = LBR$LOOKUP_KEY (library_index, key_name, txtrfa [,flags]) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* key_name - Name of key to insert (reference for binary key, */N/* ! descriptor for text key) */N/* txtrfa - Receives RFA of module */H/* flags - Receives key flags */N/* */'#define lbr$lookup_key LBR$LOOKUP_KEY #ifdef __NEW_STARLETunsigned int lbr$lookup_key( unsigned int *library_index, unsigned int *key_name, unsigned int *txtrfa, __optional_params);#e "lse /* __OLD_STARLET */.unsigned int lbr$lookup_key(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$LOOKUP_TYPE - Look up a type of key with specified RFA in */E/* library's current index */N/* */N/* status = LBR$LOOKUP_TYPE (library_index, key_name, txtrfa, flags) */N/* # */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* key_name - Name of key to insert (reference for binary key, */N/* descriptor for text key) */N/* txtrfa - RFA of module */H/* flags - Receives type of key */N/* $ */)#define lbr$lookup_type LBR$LOOKUP_TYPE #ifdef __NEW_STARLETunsigned int lbr$lookup_type( unsigned int *library_index, unsigned int *key_name, unsigned int *txtrfa, unsigned int *flags);#else /* __OLD_STARLET *//unsigned int lbr$lookup_type(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$OPEN - Open or create a library % */N/* */N/* status = LBR$OPEN (library_index [,fns] [,create_options] [,dns] */N/* [,rlfna] [,rns] [,rnslen]) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* fns - File specification of the library */N/* cr&eate_options - Library characteristics ($LBRDEF, $CREDEF) */N/* dns - Default file specification */N/* rlfna - Related file name block */N/* rns - Receives resultant file specification */N/* rnslen - Receives length of resultant file specification */N/* */#define lbr$open LBR$OPEN '#ifdef __NEW_STARLETunsigned int lbr$open( unsigned int *library_index, __optional_params );#else /* __OLD_STARLET */(unsigned int lbr$open(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$OUTPUT_HELP - Output help messages */N/* */N/* status = LBR$OUTPUT_HELP (output_routine [,output_w(idth] [,line_desc] */N/* [,library_name] [,flags] [,input_routine]) */N/* */N/* output_routine - Routine called to output text lines */N/* output_width - Maximum width of output lines */N/* line_desc - Help request line */N/* library_name - Name of the help library */N )/* flags - Flags to control operation */N/* input_routine - Routine used for prompting */N/* */)#define lbr$output_help LBR$OUTPUT_HELP #ifdef __NEW_STARLETunsigned int lbr$output_help() int (*output_routine)(__unknown_params), __optional_params );#else /* __OLD_STARLET *//unsigned int lbr$output_help(__unknown_params);!#endif /* #ifdef* __NEW_STARLET */N/* */N/* LBR$PUT_MODULE - Put an ELF object module to the ELF object library. */N/* */N/* status = LBR$PUT_MODULE (library_index, addr, size, txtrfa) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* ad +dr - address of the ELF object module */N/* size - Size of the ELF object module */N/* txtrfa - Receives RFA of module */N/* */'#define lbr$put_module LBR$PUT_MODULE #ifdef __NEW_STARLETunsigned int lbr$put_module( unsigned int *library_index, unsigned __int64 *addr, unsigned __int64 *size, unsigned ,int *txtrfa);#else /* __OLD_STARLET */.unsigned int lbr$put_module(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$PUT_END - Write an end-of-module record */N/* */N/* status = LBR$PUT_END (library_index) */N/* - */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* */!#define lbr$put_end LBR$PUT_END #ifdef __NEW_STARLETunsigned int lbr$put_end( unsigned int *library_index);#else /* __OLD_STARLET */+unsigned int lbr$put_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$PUT_H.ISTORY - Write an update history record */N/* */N/* status = LBR$PUT_HISTORY (library_index, record_desc) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* record_desc - History record */N/* / */)#define lbr$put_history LBR$PUT_HISTORY #ifdef __NEW_STARLETunsigned int lbr$put_history( unsigned int *library_index, void *record_desc);#else /* __OLD_STARLET *//unsigned int lbr$put_history(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$PUT_RECORD - Write a data record */N/* 0 */N/* status = LBR$PUT_RECORD (library_index, bufdes, txtrfa [,modsize]) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* bufdes - Record to be written */N/* txtrfa - Receives RFA of module */J/* modsize - ELF object module size 1 */'#define lbr$put_record LBR$PUT_RECORD #ifdef __NEW_STARLETunsigned int lbr$put_record( unsigned int *library_index, void *bufdes, unsigned int *txtrfa, __optional_params);#else /* __OLD_STARLET */.unsigned int lbr$put_record(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$REPLACE_KEY - Replace a library key */N/* 2 */Q/* status = LBR$REPLACE_KEY (library_index, key_name, oldrfa, newrfa [,flags]) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* key_name - Name of key, passed by reference or descriptor */N/* oldrfa - RFA of old module header */N/* newrfa - RFA of new module header 3 */H/* flags - key flags */N/* */)#define lbr$replace_key LBR$REPLACE_KEY #ifdef __NEW_STARLETunsigned int lbr$replace_key( unsigned int *library_index, unsigned int *key_name, unsigned int *oldrfa, unsigned int *newrfa, __optional_params);#else /* __OLD_STARLET *//unsigned int lbr$replace_key(__unknown_params);!#endif /* #i 4fdef __NEW_STARLET */N/* */N/* LBR$RET_RMSSTV - Return VMS RMS status value */N/* */N/* status = LBR$RET_RMSSTV () */N/* */'#define lbr$ret_rmsstv LBR$RET_RMSSTV#ifdef __NEW_STARLET"unsigned int lbr$r 5et_rmsstv(void);#else /* __OLD_STARLET */"unsigned int lbr$ret_rmsstv(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$SEARCH - Search an index */N/* */N/* status = LBR$SEARCH (library_index, index_number, rfa_to_find, */I/* routine_name [,flags]) 6 */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* index_number - Number of index to search */N/* rfa_to_find - RFA of module to search for */N/* routine_name - Routine called to process keys */H/* flags - Key flags */#define lbr$search LBR7$SEARCH #ifdef __NEW_STARLETunsigned int lbr$search( unsigned int *library_index, unsigned int *index_number, unsigned int *rfa_to_find,' int (*routine_name)(__unknown_params), __optional_params);#else /* __OLD_STARLET */*unsigned int lbr$search(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$SET_INDEX - Set the current index number */N/* 8 */N/* status = LBR$SET_INDEX (library_index, index_number) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* index_number - New index number */N/* */%#define lbr$set_index LBR$SET_INDEX #i 9fdef __NEW_STARLETunsigned int lbr$set_index( unsigned int *library_index, unsigned int *index_number);#else /* __OLD_STARLET */-unsigned int lbr$set_index(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$SET_LOCATE - Set record access to locate mode */N/* */N/* status = LBR$SET_LOCATE (library_inde :x) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* */'#define lbr$set_locate LBR$SET_LOCATE #ifdef __NEW_STARLETunsigned int lbr$set_locate( unsigned int *library_index);#else /* __OLD_STARLET */.unsigned int lbr$set_locate(__unknown_params);!#endif /* #ifdef __N;EW_STARLET */N/* */N/* LBR$SET_MODULE - Read or update a module header */N/* */N/* status = LBR$SET_MODULE (library_index, rfa [,bufdesc] */B/* [,buflen] [,updatedesc]) */N/* */N/* library_index - In <dex value returned by LBR$INI_CONTROL */N/* rfa - RFA of module header */N/* bufdesc - Receives module header */N/* buflen - Receives length of module header */N/* updatedesc - Additional information to be stored in module header */N/* */'#define lbr$set_module LBR$SET_MODULE #i =fdef __NEW_STARLETunsigned int lbr$set_module( unsigned int *library_index, unsigned int *rfa, __optional_params );#else /* __OLD_STARLET */.unsigned int lbr$set_module(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$SET_MOVE - Set record access to move mode */N/* */N/* status = LBR$SET_MOVE > (library_index) */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* */##define lbr$set_move LBR$SET_MOVE #ifdef __NEW_STARLETunsigned int lbr$set_move( unsigned int *library_index);#else /* __OLD_STARLET */,unsigned int lbr$set_move(__unknown_params);!#endif /* #i?fdef __NEW_STARLET */N/* */N/* LBR$MAP_MODULE - Copy/map an ELF object module from current library */B/* to the memory space */N/* */N/* statust = LBR$MAP_MODULE (library_index, addr, len, rfa) */N/* */N/* library_in @dex - Index value returned by LBR$INI_CONTROL */N/* addr - Receives address of the module */N/* len - Receives length of module */N/* rfa - RFA of module */N/* */'#define lbr$map_module LBR$MAP_MODULE #ifdef __NEW_STARLETunsigned int lbr$map_module( unsigned int *library A_index, unsigned __int64 *addr, unsigned __int64 *len, unsigned int *rfa);#else /* __OLD_STARLET */.unsigned int lbr$map_module(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */R/* LBR$UNMAP_MODULE - Remove/release an ELF object module from the memory space */N/* */N/* status = LBR$UNMAP_MODULE (library_index, rfa) B */N/* */N/* library_index - Index value returned by LBR$INI_CONTROL */N/* rfa - RFA of module */N/* */+#define lbr$unmap_module LBR$UNMAP_MODULE #ifdef __NEW_STARLETunsigned int lbr$unmap_module( unsigned int *library_index, unsigned int *rfa);#else /* __OLDC_STARLET */0unsigned int lbr$unmap_module(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __LBR_ROUTINES_LOADED */ ww:/*********************************************** D*********************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]LBRUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $LBRCTLTBL ***/#ifndef __LBRCTLTBL_LOADED#define __LBRCTLTBL_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-StandarEd features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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#definFe __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 N#define LBR$C_CTLTBLID 203 /* Ident for control table */#define LBR$M_LOCATE 0x1#define LBR$M_OPEN 0x2#define LBR$K_LENGTH 30#define LBR$C_LENGTH 30 #ifdef __NEW_STARLETtypedef Gstruct _lbrctltbl {N unsigned char lbr$b_id; /* Control table ID */N unsigned char lbr$b_tblsiz; /* Control table size */N unsigned char lbr$b_type; /* Type of library opened */N unsigned char lbr$b_func; /* Operation (function) requested */N char lbrctltbl$$_fill_1 [2]; /* Reserved extra bytes */ __union {N unsigned int lbr$l_usrflg; /* Flags longword H */ __struct {S unsigned lbr$v_locate : 1; /* Use "locate" rather than "move" mode */N unsigned lbr$v_open : 1; /* Library open */' unsigned lbr$v_fill_0_ : 6; } lbr$r_usrflg_bits; } lbr$r_usrflg_overlay;N unsigned int lbr$l_hdrptr; /* Pointer to in-core header */O unsigned int lbr$l_ctxptr; /* Pointer to context control block */N unsigned int lbr$l_curidx; I /* Number of current index */N unsigned int lbr$l_usrnam; /* Pointer to user NAM block */Y unsigned int lbr$l_oldhdrptr; /* Pointer to unmodified in-core header block */ } LBRCTLTBL; #if !defined(__VAXC)6#define lbr$l_usrflg lbr$r_usrflg_overlay.lbr$l_usrflg@#define lbr$r_usrflg_bits lbr$r_usrflg_overlay.lbr$r_usrflg_bits3#define lbr$v_locate lbr$r_usrflg_bits.lbr$v_locate/#define lbr$v_open lbr$r_usrflg_bits.lbr$v_open"#endif /* #if !de Jfined(__VAXC) */ #else /* __OLD_STARLET */struct lbrctltbl {N unsigned char lbr$b_id; /* Control table ID */N unsigned char lbr$b_tblsiz; /* Control table size */N unsigned char lbr$b_type; /* Type of library opened */N unsigned char lbr$b_func; /* Operation (function) requested */N char lbrctltbl$$_fill_1 [2]; /* Reserved extra bytes */ __union {N unsigned K int lbr$l_usrflg; /* Flags longword */ __struct {S unsigned lbr$v_locate : 1; /* Use "locate" rather than "move" mode */N unsigned lbr$v_open : 1; /* Library open */' unsigned lbr$v_fill_0_ : 6; } lbr$r_usrflg_bits; } lbr$r_usrflg_overlay;N unsigned int lbr$l_hdrptr; /* Pointer to in-core header */O unsigned int lbr$l_ctxptr; /* Pointer to context co Lntrol block */N unsigned int lbr$l_curidx; /* Number of current index */N unsigned int lbr$l_usrnam; /* Pointer to user NAM block */Y unsigned int lbr$l_oldhdrptr; /* Pointer to unmodified in-core header block */ } ; #if !defined(__VAXC)6#define lbr$l_usrflg lbr$r_usrflg_overlay.lbr$l_usrflgH#define lbr$v_locate lbr$r_usrflg_overlay.lbr$r_usrflg_bits.lbr$v_locateD#define lbr$v_open lbr$r_usrflg_overlay.lbr$r_usrflg_bits.lbr$v_open"M#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LBRCTLTBL_LOADED */ ww/********************************************************************* N***********************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]LBRUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $LBRDEF ***/#ifndef __LBRDEF_LOADED#define __LBRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __membOer_alignment __save#pragma __nomember_alignmentR#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 ...#endPif #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 N/* */N/* Types of libraries */N/* */N/* DefQine the library types */O#define LBR$C_TYP_UNK 0 /* Unknown/unspecified library type */N#define LBR$C_TYP_OBJ 1 /* Object/shareable image library */N#define LBR$C_TYP_MLB 2 /* Macro library */N#define LBR$C_TYP_HLP 3 /* Help file library */N#define LBR$C_TYP_TXT 4 /* TEXT library */N#define LBR$C_TYP_SHSTB 5 R /* Shareable image symbol library */N#define LBR$C_TYP_NCS 6 /* NCS library */R#define LBR$C_TYP_DECMX 6 /* Maximum Digital library type defined */N#define LBR$C_TYP_EOBJ 7 /* Alpha object library */R#define LBR$C_TYP_ESHSTB 8 /* Alpha Shareable image symbol library */N#define LBR$C_TYP_ELFOBJ 9 /* ELF object library */P#define LBR$C_TYP_ELFSHSTB 10 /* ELF SShareable image symbol library */N#define ELBR$C_TYP_DECMX 10 /* Maximum library type defined */O#define LBR$C_TYP_RDEC 127 /* Types between DECMX and RDEC are */N/* reserved to Digital */P#define LBR$C_TYP_USRLW 128 /* User library types range from 128 */N#define LBR$C_TYP_USRHI 255 /* to 255. */N/* T */N/* Function codes for lbr$flush */N/* */N#define LBR$C_FLUSHDATA 1 /* Flush data blocks from cache */S#define LBR$C_FLUSHALL 0 /* Flush data blocks, then index blocks */N/* */N/* Librarian fixed parameters */N/* U */N#define LBR$C_MAXRECSIZ 2048 /* Maximum record size allowed */N#define LBR$C_PAGESIZE 512 /* Size of memory page */Z#define LBR$C_HASHSIZE 512 /* Size of hash table ** Must be power of 2 ** */R#define LBR$C_TEXTPAGE 508 /* No. of useable bytes on a text page */N#define LBR$C_DEXTQ 50 /* Library default extend quantity */O#define LBR$C_MAXCVTL 64 /* Maximum number of open libraries */N#define LBR$C_MAXHDRSIZ 128 /* Maximum length of module header */N/* (max user length is: */N/* lbr$c_maxhdrsiz-mhd$c_length) */W#define LBR$C_DEFENTALL 300 /* Number of entries to allocate by default */X#define LBR$C_RETRYOPEN 120 /* Number of times to retry open on RMS$_FLK */N#define LBR$C_RETRYWAIWT 1 /* Number of seconds to wait */O#define LBR$C_MINREAD 2 /* Minimum number of blocks to read */N#define LBR$C_MAXREAD 100 /* Max blocks can ever read */p#define LBR$C_MEMXTRA 50 /* Number blocks to expand region by above and beyond lbr$gl_maxread */R#define LBR$C_PUTBUFSIZ 30 /* Block size of VM empty cache buffer */R#define LBR$C_FLSHBFSIZ 1 /* Block size of stack mt_cache buffer */O#defXine LBR$C_MAXIDXRD 20 /* Maximum blocks in one index read */b#define LBR$C_ELFMAXKEYLEN 1024 /* Maximum length of an ASCII keyword for ELF libraries */c#define LBR$C_MAXKEYLEN 128 /* Maximum length of an ASCII keyword, at most N, where */N/* 3*(N+7) < or = 506 */[#define LBR$C_MAXLUHREC 32768 /* maximum library update history record length */N#define LBR$M_SYM_WEAK 1 /* Weak symbYol attribute */N#define LBR$M_SYM_GROUP 2 /* Group symbol attribute */N#define LBR$M_SYM_ALL -2147483648 /* All types symbol */[#define LBR$M_SYM_NGG 1 /* Symbol type bitmasks - Nongroup global symbol */U#define LBR$M_SYM_UXWK 2 /* Symbol type bitmasks - Unix weak symbol */X#define LBR$M_SYM_GG 4 /* Symbol type bitmasks - group global symbol */[#define LBR$M_SYM_GUXWK 8 /* SymZbol type bitmasks - group Unix weak symbol */N/* */N/* Librarian fixed parameters for ALPHA */N/* */N#define ELBR$C_MAXRECSIZ 8192 /* Maximum record size allowed */N/* */N/* LBR$INI_CONTROL argument list [ */N/* */N#define LBR$C_CREATE 0 /* Create a new library */N#define LBR$C_READ 1 /* Read an existing library */N#define LBR$C_UPDATE 2 /* Update an exisiting library */N#define LBR$C_MAXFUNC 2 /* Maximum legal function */ #ifdef __NEW_STARLETtypedef struct _lbrdef {N int lbrdef$$_fill_1; \ /* Argument count */N unsigned int lbr$l_ic_ctltbl; /* Control index address */N unsigned int lbr$l_ic_func; /* Function */O unsigned int lbr$l_ic_type; /* Type of library expected to open */N/* */N/* LBR$OPEN argument list */N/* ] */ } LBRDEF;#else /* __OLD_STARLET */struct lbrdef {N int lbrdef$$_fill_1; /* Argument count */N unsigned int lbr$l_ic_ctltbl; /* Control index address */N unsigned int lbr$l_ic_func; /* Function */O unsigned int lbr$l_ic_type; /* Type of library expected to open */N/* */N/* LBR$OPEN ar ^gument list */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef1 {N int lbrdef$$_fill_2; /* Argument count */N unsigned int lbr$l_op_ctltbl; /* Control index address */X unsigned int lbr$l_op_fns; /* Address of string descriptor for filename */N un_signed int lbr$l_op_creopt; /* Address of create options array */\ unsigned int lbr$l_op_dns; /* Address of descriptor for default name string */T unsigned int lbr$l_op_rlfna; /* Address of NAM block for related file */` unsigned int lbr$l_op_rns; /* Address of descriptor for related filename string */l unsigned int lbr$l_op_rnslen; /* Address of longword to store resultant filename string length */N/* ` */N/* LBR$CLOSE argument list */N/* */ } LBRDEF1;#else /* __OLD_STARLET */struct lbrdef1 {N int lbrdef$$_fill_2; /* Argument count */N unsigned int lbr$l_op_ctltbl; /* Control index address */X unsigned int lbr$l_op_fns; /* Address of string descriptor for filenamea */N unsigned int lbr$l_op_creopt; /* Address of create options array */\ unsigned int lbr$l_op_dns; /* Address of descriptor for default name string */T unsigned int lbr$l_op_rlfna; /* Address of NAM block for related file */` unsigned int lbr$l_op_rns; /* Address of descriptor for related filename string */l unsigned int lbr$l_op_rnslen; /* Address of longword to store resultant filename string length */N/* b */N/* LBR$CLOSE argument list */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef2 {N int lbrdef$$_fill_3; /* Argument count */N unsigned int lbr$l_cl_ctltbl; /* Control index address */N/* c */N/* LBR$GET_HEADER argument list */N/* */ } LBRDEF2;#else /* __OLD_STARLET */struct lbrdef2 {N int lbrdef$$_fill_3; /* Argument count */N unsigned int lbr$l_cl_ctltbl; /* Control index address */N/* d */N/* LBR$GET_HEADER argument list */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef3 {N int lbrdef$$_fill_4; /* Argument count */N unsigned int lbr$l_gh_ctltbl; /* Address of Control index */\ unsigned int lbr$l_gh_retary; /* Address of 128-longword array for e return info */N/* */N/* LBR$SET_INDEX argument list */N/* */ } LBRDEF3;#else /* __OLD_STARLET */struct lbrdef3 {N int lbrdef$$_fill_4; /* Argument count */N unsigned int lbr$l_gh_ctltbl; /* Address of Control index */\ unsigned int lbr$l f_gh_retary; /* Address of 128-longword array for return info */N/* */N/* LBR$SET_INDEX argument list */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef4 {N int lbrdef$$_fill_5; /* Argument count */N unsign ged int lbr$l_si_ctltbl; /* Control index address */N unsigned int lbr$l_si_idxnum; /* Address of index number */N/* */N/* LBR$LOOKUP_KEY argument list */N/* */ } LBRDEF4;#else /* __OLD_STARLET */struct lbrdef4 {N int lbrdef$$_fill_5; /* Argumen ht count */N unsigned int lbr$l_si_ctltbl; /* Control index address */N unsigned int lbr$l_si_idxnum; /* Address of index number */N/* */N/* LBR$LOOKUP_KEY argument list */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETitypedef struct _lbrdef5 {N int lbrdef$$_fill_6; /* Argument count */N unsigned int lbr$l_lk_ctltbl; /* Control index address */[ unsigned int lbr$l_lk_keynam; /* Address of string descriptor or binary value */Y unsigned int lbr$l_lk_txtrfa; /* Address of quadword to return RFA if found */N/* */N/* LBR$INSERT_KEY argument list j */N/* */ } LBRDEF5;#else /* __OLD_STARLET */struct lbrdef5 {N int lbrdef$$_fill_6; /* Argument count */N unsigned int lbr$l_lk_ctltbl; /* Control index address */[ unsigned int lbr$l_lk_keynam; /* Address of string descriptor or binary value */Y unsigned int lbr$l_lk_txtrfa; /* Address of quadword to return RFA i kf found */N/* */N/* LBR$INSERT_KEY argument list */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef6 {N int lbrdef$$_fill_7; /* Argument count */N unsigned int lbr$l_ik_ctltbl; /* Control index address l */[ unsigned int lbr$l_ik_keynam; /* Address of string descriptor or binary value */N unsigned int lbr$l_ik_txtrfa; /* Address of RFA of text */N/* */N/* LBR$REPLACE_MOD argument list */N/* */N/* */N m/* LBR$REPLACE_KEY argument list */N/* */ } LBRDEF6;#else /* __OLD_STARLET */struct lbrdef6 {N int lbrdef$$_fill_7; /* Argument count */N unsigned int lbr$l_ik_ctltbl; /* Control index address */[ unsigned int lbr$l_ik_keynam; /* Address of string descriptor or binary value */N unsigned int lbr$l_ik_ntxtrfa; /* Address of RFA of text */N/* */N/* LBR$REPLACE_MOD argument list */N/* */N/* */N/* LBR$REPLACE_KEY argument list */N/* o */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef7 {N int lbrdef$$_fill_8; /* Argument count */N unsigned int lbr$l_rk_ctltbl; /* Control index address */[ unsigned int lbr$l_rk_keynam; /* Address of string descriptor or binary value */N unsigned int lbr$l_rk_oldrfa; /* Address of RFA of old text */N unsigned int lbr$l_rk_newrfa; p/* Address of RFA of new text */N/* */N/* LBR$DELETE_KEY argument list */N/* */ } LBRDEF7;#else /* __OLD_STARLET */struct lbrdef7 {N int lbrdef$$_fill_8; /* Argument count */N unsigned int lbr$l_rk_ctltbl; /* Control index address */[q unsigned int lbr$l_rk_keynam; /* Address of string descriptor or binary value */N unsigned int lbr$l_rk_oldrfa; /* Address of RFA of old text */N unsigned int lbr$l_rk_newrfa; /* Address of RFA of new text */N/* */N/* LBR$DELETE_KEY argument list */N/* */ } ;%#e rndif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef8 {N int lbrdef$$_fill_9; /* Argument count */N unsigned int lbr$l_dk_ctltbl; /* Control index address */[ unsigned int lbr$l_dk_keynam; /* Address of string descriptor or binary value */N/* */N/* LBR$DELETE_DATA argument list */N s/* */ } LBRDEF8;#else /* __OLD_STARLET */struct lbrdef8 {N int lbrdef$$_fill_9; /* Argument count */N unsigned int lbr$l_dk_ctltbl; /* Control index address */[ unsigned int lbr$l_dk_keynam; /* Address of string descriptor or binary value */N/* */N/* LBR$DELETE_DATA argumen tt list */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef9 {N int lbrdef$$_fill_10; /* Argument count */N unsigned int lbr$l_dd_ctltbl; /* Control index address */N unsigned int lbr$l_dd_txtrfa; /* Address of RFA to delete from */N/* u */N/* LBR$GET_RECORD argument list */N/* */ } LBRDEF9;#else /* __OLD_STARLET */struct lbrdef9 {N int lbrdef$$_fill_10; /* Argument count */N unsigned int lbr$l_dd_ctltbl; /* Control index address */N unsigned int lbr$l_dd_txtrfa; /* Address of RFA to delete vfrom */N/* */N/* LBR$GET_RECORD argument list */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef10 {N int lbrdef$$_fill_11; /* Argument count */N unsigned int lbr$l_gr_ctltbl; /* Control index address w */N unsigned int lbr$l_gr_bufdes; /* Address of descriptor of buffer */X unsigned int lbr$l_gr_buflen; /* Address of longword to return record size */N/* */N/* LBR$PUT_RECORD argument list */N/* */ } LBRDEF10;#else /* __OLD_STARLET */struct lbrdef10 {N int lbrdef$$x_fill_11; /* Argument count */N unsigned int lbr$l_gr_ctltbl; /* Control index address */N unsigned int lbr$l_gr_bufdes; /* Address of descriptor of buffer */X unsigned int lbr$l_gr_buflen; /* Address of longword to return record size */N/* */N/* LBR$PUT_RECORD argument list */N/* y */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef11 {N int lbrdef$$_fill_12; /* Argument count */N unsigned int lbr$l_pr_ctltbl; /* Control index address */X unsigned int lbr$l_pr_bufdes; /* Address of descriptor of buffer to output */P unsigned int lbr$l_pr_txtrfa; /* Address of quadword to return RFA */N/* of text record z */N/* */N/* LBR$PUT_END argument list */N/* */ } LBRDEF11;#else /* __OLD_STARLET */struct lbrdef11 {N int lbrdef$$_fill_12; /* Argument count */N unsigned int lbr$l_pr_ctltbl; /* Control index a{ddress */X unsigned int lbr$l_pr_bufdes; /* Address of descriptor of buffer to output */P unsigned int lbr$l_pr_txtrfa; /* Address of quadword to return RFA */N/* of text record */N/* */N/* LBR$PUT_END argument list */N/* | */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef12 {N int lbrdef$$_fill_13; /* Argument count */N unsigned int lbr$l_pe_ctltbl; /* Control index address */N/* */N/* LBR$SEARCH argument list */N/* } */ } LBRDEF12;#else /* __OLD_STARLET */struct lbrdef12 {N int lbrdef$$_fill_13; /* Argument count */N unsigned int lbr$l_pe_ctltbl; /* Control index address */N/* */N/* LBR$SEARCH argument list */N/* */ } ;%#endif /* #ifdef ~ __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef13 {N int lbrdef$$_fill_14; /* Argument count */N unsigned int lbr$l_sr_ctltbl; /* Control index address */N unsigned int lbr$l_sr_idxnum; /* Address of index number */Q unsigned int lbr$l_sr_rfa; /* Address of RFA to search index for */N unsigned int lbr$l_sr_usrtn; /* User routine to call on match */N/*  */N/* Argument list for user routine called by LBR$SEARCH */N/* */ } LBRDEF13;#else /* __OLD_STARLET */struct lbrdef13 {N int lbrdef$$_fill_14; /* Argument count */N unsigned int lbr$l_sr_ctltbl; /* Control index address */N unsigned int lbr$l_sr_idxnum; /* Address of index numb er */Q unsigned int lbr$l_sr_rfa; /* Address of RFA to search index for */N unsigned int lbr$l_sr_usrtn; /* User routine to call on match */N/* */N/* Argument list for user routine called by LBR$SEARCH */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef14 {N int lbrdef$$_fill_15; /* Argument count */[ unsigned int lbr$l_su_keydes; /* Address of string descriptor or binary value */X unsigned int lbr$l_su_txtrfa; /* Address of array containing rfa of module */N/* */N/* LBR$GET_INDEX argument list */N/*  */ } LBRDEF14;#else /* __OLD_STARLET */struct lbrdef14 {N int lbrdef$$_fill_15; /* Argument count */[ unsigned int lbr$l_su_keydes; /* Address of string descriptor or binary value */X unsigned int lbr$l_su_txtrfa; /* Address of array containing rfa of module */N/* */N/* LBR$GET_INDEX argument list */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef15 {N int lbrdef$$_fill_16; /* Argument count */N unsigned int lbr$l_gi_ctltbl; /* Control index address */N unsigned int lbr$l_gi_idxnum; /* Index number */R unsigned int lbr$l_gi_usrtn; /* User routine to call for each entry  */N/* */N/* Argument list for user routine called by LBR$GET_INDEX */N/* */ } LBRDEF15;#else /* __OLD_STARLET */struct lbrdef15 {N int lbrdef$$_fill_16; /* Argument count */N unsigned int lbr$l_gi_ctltbl; /* Control index address */N unsigned int lbr$l_gi_idxn um; /* Index number */R unsigned int lbr$l_gi_usrtn; /* User routine to call for each entry */N/* */N/* Argument list for user routine called by LBR$GET_INDEX */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef16 {N int lbrdef$$_fill_17;  /* Argument count */T unsigned int lbr$l_gu_keyadr; /* Address of descriptor or binary value */N unsigned int lbr$l_gu_txtrfa; /* RFA of associated text */N/* */N/* LBR$ADD_UPDATE argument list */N/* */ } LBRDEF16;#else /* __OLD_STARLET */struct lbrdef16 {N int lbrdef$$_fill_17; /* Argument count */T unsigned int lbr$l_gu_keyadr; /* Address of descriptor or binary value */N unsigned int lbr$l_gu_txtrfa; /* RFA of associated text */N/* */N/* LBR$ADD_UPDATE argument list */N/* */  } ;%#endif /* #ifdef __NEW_STARLET */N#define LBR$C_ADDMOD 1 /* Add module */N#define LBR$C_DELMOD 2 /* Delete module */N#define LBR$C_REPMOD 3 /* Replace module */N/* */ #ifdef __NEW_STARLETtypedef struct _lbrdef17 {N int lbrdef$$_fill_18; /* Argument count */N unsigned int lbr$l_au_ctltbl; /* Control index address */N unsigned int lbr$l_au_flags; /* Flags */[ unsigned int lbr$l_au_keynam; /* Address of string descriptor or binary value */N/* Types of operations logged */N/* LBR$GET_UPDATES argument list */N/* */ } LBRDEF 17;#else /* __OLD_STARLET */struct lbrdef17 {N int lbrdef$$_fill_18; /* Argument count */N unsigned int lbr$l_au_ctltbl; /* Control index address */N unsigned int lbr$l_au_flags; /* Flags */[ unsigned int lbr$l_au_keynam; /* Address of string descriptor or binary value */N/* Types of operations logged */N/* LBR$GET_UPDATES argument list  */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef18 {N int lbrdef$$_fill_19; /* Argument count */N unsigned int lbr$l_gu_ctltbl; /* Control index address */S unsigned int lbr$l_gu_usrtn; /* User routine to call for each update */N/*  */N/* Argument list for user routine called by LBR$GET_UPDATES */N/* */ } LBRDEF18;#else /* __OLD_STARLET */struct lbrdef18 {N int lbrdef$$_fill_19; /* Argument count */N unsigned int lbr$l_gu_ctltbl; /* Control index address */S unsigned int lbr$l_gu_usrtn; /* User routine to call fo r each update */N/* */N/* Argument list for user routine called by LBR$GET_UPDATES */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _lbrdef19 {N int lbrdef$$_fill_20; /* Argument list */Q unsigned int lbr$l_uu_updesc; /* String descriptor f or history line */ } LBRDEF19;#else /* __OLD_STARLET */struct lbrdef19 {N int lbrdef$$_fill_20; /* Argument list */Q unsigned int lbr$l_uu_updesc; /* String descriptor for history line */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$MAP_MODULE argument list */N/*  */ #ifdef __NEW_STARLETtypedef struct _lbrdef20 {N int lbrdef$$_fill_21; /* Argument count */N unsigned int lbr$l_mm_ctltbl; /* Control index address */c unsigned __int64 lbr$q_mm_vaaddr; /* 64-bit virtual Address of the specified object module */N unsigned __int64 lbr$q_mm_modsiz; /* Address of module size */N unsigned int lbr$l_mm_txtrfa; /* Address of RFA to map from  */N/* */N/* Argument list for user routine called by LBR$MAP_MODULE */N/* */ } LBRDEF20;#else /* __OLD_STARLET */struct lbrdef20 {N int lbrdef$$_fill_21; /* Argument count */N unsigned int lbr$l_mm_ctltbl; /* Control index address */c unsigned int lbr$q_mm_vaaddr [2]; /* 64-bit virtual Address of the specified object module */N unsigned int lbr$q_mm_modsiz [2]; /* Address of module size */N unsigned int lbr$l_mm_txtrfa; /* Address of RFA to map from */N/* */N/* Argument list for user routine called by LBR$MAP_MODULE */N/* */ } ;%#endif /* #ifdef  __NEW_STARLET */N/* */N/* LBR$UNMAP_MODULE argument list */N/* */ #ifdef __NEW_STARLETtypedef struct _lbrdef21 {N int lbrdef$$_fill_22; /* Argument count */N unsigned int lbr$l_um_ctltbl; /* Control index address */N unsigned int lbr$l_um_txtrfa ; /* Address of RFA to unmap */N/* */N/* Argument list for user routine called by LBR$UNMAP_MODULE */N/* */ } LBRDEF21;#else /* __OLD_STARLET */struct lbrdef21 {N int lbrdef$$_fill_22; /* Argument count */N unsigned int lbr$l_um_ctltbl; /* Control index address  */N unsigned int lbr$l_um_txtrfa; /* Address of RFA to unmap */N/* */N/* Argument list for user routine called by LBR$UNMAP_MODULE */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$GET_VERSION argument list  */N/* */ #ifdef __NEW_STARLETtypedef struct _lbrdef22 {N int lbrdef$$_fill_23; /* Argument count */N unsigned int lbr$l_gv_verdesc; /* Addr of Version Descriptor */N unsigned int lbr$l_gv_retlen; /* Address of ret. len. */N/* */N/* Argument list  for user routine called by LBR$GET_VERSION */N/* */ } LBRDEF22;#else /* __OLD_STARLET */struct lbrdef22 {N int lbrdef$$_fill_23; /* Argument count */N unsigned int lbr$l_gv_verdesc; /* Addr of Version Descriptor */N unsigned int lbr$l_gv_retlen; /* Address of ret. len. */N/*  */N/* Argument list for user routine called by LBR$GET_VERSION */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* LBR$LOOKUP_TYPE argument list */N/* */ #ifdef __NEW_STARLETtypedef struct _lbrdef23 {N int lbrdef$$_fill_24; /* Argument count */N unsigned int lbr$l_lt_ctltbl; /* Control index address */[ unsigned int lbr$l_lt_keynam; /* Address of string descriptor or binary value */Y unsigned int lbr$l_lt_txtrfa; /* Address of quadword to return RFA if found */N unsigned int lbr$l_lt_flag; /* Address of ret. flag */N/*  */N/* Argument list for user routine called by LBR$LOOKUP_TYPE */N/* */ } LBRDEF23;#else /* __OLD_STARLET */struct lbrdef23 {N int lbrdef$$_fill_24; /* Argument count */N unsigned int lbr$l_lt_ctltbl; /* Control index address */[ unsigned int lbr$l_lt_keynam; /* Address of string descriptor or binary value * /Y unsigned int lbr$l_lt_txtrfa; /* Address of quadword to return RFA if found */N unsigned int lbr$l_lt_flag; /* Address of ret. flag */N/* */N/* Argument list for user routine called by LBR$LOOKUP_TYPE */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */N/*  */N/* LBR$PUT_MODULE argument list */N/* */ #ifdef __NEW_STARLETtypedef struct _lbrdef24 {N int lbrdef$$_fill_25; /* Argument count */N unsigned int lbr$l_pm_ctltbl; /* Control index address */c unsigned __int64 lbr$q_pm_vaaddr; /* 64-bit virtual Address of the specified object mo dule */N unsigned __int64 lbr$q_pm_modsiz; /* Address of module size */N unsigned int lbr$l_pm_txtrfa; /* Address of return RFA */N/* */N/* Argument list for user routine called by LBR$PUT_MODULE */N/* */ } LBRDEF24;#else /* __OLD_STARLET */struct lbrdef24 {N int lbrdef$$_fill_25;  /* Argument count */N unsigned int lbr$l_pm_ctltbl; /* Control index address */c unsigned int lbr$q_pm_vaaddr [2]; /* 64-bit virtual Address of the specified object module */N unsigned int lbr$q_pm_modsiz [2]; /* Address of module size */N unsigned int lbr$l_pm_txtrfa; /* Address of return RFA */N/* */N/* Argument list for user routine called by LBR$PUT_MODULE */N/* */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LBRDEF_LOADED */ wwK/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $LCKDEF ***/#ifndef __LCKDEF_LOADED#define __LCKDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* LOCK MANAGER DEFINITIONS  */N/*- */#define LCK$M_VALBLK 0x1#define LCK$M_CONVERT 0x2#define LCK$M_NOQUEUE 0x4#define LCK$M_SYNCSTS 0x8#define LCK$M_SYSTEM 0x10#define LCK$M_NOQUOTA 0x20#define LCK$M_CVTSYS 0x40#define LCK$M_RECOVER 0x80#define LCK$M_PROTECT 0x100#define LCK$M_NODLCKWT 0x200#define LCK$M_NODLCKBLK 0x400#define LCK$M_EXPEDITE 0x800#define LCK$M_QUECVT 0x1000#define LCK$M_BYPASS 0x2000#define LCK$M_NOIOLOCK8 0x4000#define LCK$M_NOFORK 0x8000#define LCK$M_XVALBLK 0x10000#define LCK$M_DEQALL 0x1#define LCK$M_CANCEL 0x2#define LCK$M_INVVALBLK 0x4##define LCK$M_RESV_NOIOLOCK8 0x4000 #define LCK$M_RESV_NOFORK 0x8000"#define LCK$M_RESV_XVALBLK 0x10000N#define LCK$K_NLMODE 0 /* NULL */N#define LCK$K_CRMODE 1 /* CONCURRENT READ */N#define LCK$K_CWMODE 2 /* CONCURRENT WRITE  */N#define LCK$K_PRMODE 3 /* PROTECTED READ */N#define LCK$K_PWMODE 4 /* PROTECTED WRITE */N#define LCK$K_EXMODE 5 /* EXCLUSIVE */ #ifdef __NEW_STARLETtypedef union _lckdef { __struct {N unsigned lck$v_valblk : 1; /* VALUE BLOCK INCLUDED */N unsigned lck$v_convert : 1; /* CONVERSION REQUEST */N unsigned lck$v_noqueue : 1; /* DO NOT QUEUE REQUEST */N unsigned lck$v_syncsts : 1; /* SYNCHRONOUS STATUS REQUESTED */N unsigned lck$v_system : 1; /* SYSTEM LOCK */N unsigned lck$v_noquota : 1; /* DON'T CHARGE QUOTA */N unsigned lck$v_cvtsys : 1; /* CONVERT TO SYSTEM */N unsigned lck$v_recover : 1; /* RECOVER LOCK DURING FAILOVER */N unsigned lck$v_protect : 1; /* PROTECT LOCK DURING FAILOVER */N unsigned lck$v_nodlckwt : 1; /* NO DEADLOCK WAITING */N unsigned lck$v_nodlckblk : 1; /* NO DEADLOCK BLOCKING */N unsigned lck$v_expedite : 1; /* EXPEDITE NLMODE REQUEST */N unsigned lck$v_quecvt : 1; /* FORCE CONVERSION TO QUEUE */N unsigned lck$v_bypass : 1; /* BYPASS WAITING REQUESTS */N unsigned lck$v_noiolock8 : 1; /* DO NOT LOCK IOLOCK8 FOR CALLBACK */ T unsigned lck$v_nofork : 1; /* SAFE TO PERFORM OPERATION WITHOUT FORK */N unsigned lck$v_xvalblk : 1; /* LONG VALUE BLOCK INCLUDED */N/* */N/* IFBLKING bitfield mask; /* PERFORM CONVERSION IF BLOCKING */N/* */$ unsigned lck$v_fill_75_ : 7; } lck$r_lckdef_bits0; __struct {N unsigned lck$v_deqall : 1; /* DEQUEUE ALL LOCKS */N unsigned lck$v_cancel : 1; /* CANCEL REQUEST */N unsigned lck$v_invvalblk : 1; /* INVALIDATE VALUE BLOCK */N unsigned lck$v_pad : 11; /* RESERVE NEXT 11 BITS */Q unsigned lck$v_resv_noiolock8 : 1; /* DO NOT LOCK IOLOCK8 FOR CALLBACK */T unsigned lck$v_resv_nofork : 1; /* SAFE TO PERFORM OPERATION WITHOUT FORK */N unsigned lck$v_res v_xvalblk : 1; /* LONG VALUE BLOCK INCLUDED */$ unsigned lck$v_fill_76_ : 7; } lck$r_lckdef_bits1;N/*LOCK MODES */ } LCKDEF; #if !defined(__VAXC)4#define lck$v_valblk lck$r_lckdef_bits0.lck$v_valblk6#define lck$v_convert lck$r_lckdef_bits0.lck$v_convert6#define lck$v_noqueue lck$r_lckdef_bits0.lck$v_noqueue6#define lck$v_syncsts lck$r_lckdef_bits0.lck$v_syncsts4#define lck$v_system lck$r_lckdef_bits 0.lck$v_system6#define lck$v_noquota lck$r_lckdef_bits0.lck$v_noquota4#define lck$v_cvtsys lck$r_lckdef_bits0.lck$v_cvtsys6#define lck$v_recover lck$r_lckdef_bits0.lck$v_recover6#define lck$v_protect lck$r_lckdef_bits0.lck$v_protect8#define lck$v_nodlckwt lck$r_lckdef_bits0.lck$v_nodlckwt:#define lck$v_nodlckblk lck$r_lckdef_bits0.lck$v_nodlckblk8#define lck$v_expedite lck$r_lckdef_bits0.lck$v_expedite4#define lck$v_quecvt lck$r_lckdef_bits0.lck$v_quecvt4#define lck$v_bypass lck$r_lckdef_bits 0.lck$v_bypass:#define lck$v_noiolock8 lck$r_lckdef_bits0.lck$v_noiolock84#define lck$v_nofork lck$r_lckdef_bits0.lck$v_nofork6#define lck$v_xvalblk lck$r_lckdef_bits0.lck$v_xvalblk4#define lck$v_deqall lck$r_lckdef_bits1.lck$v_deqall4#define lck$v_cancel lck$r_lckdef_bits1.lck$v_cancel:#define lck$v_invvalblk lck$r_lckdef_bits1.lck$v_invvalblk"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union lckdef { __struct {N unsigned lck$v_valblk : 1; /* VALUE BLOCK INCLUDED */N unsigned lck$v_convert : 1; /* CONVERSION REQUEST */N unsigned lck$v_noqueue : 1; /* DO NOT QUEUE REQUEST */N unsigned lck$v_syncsts : 1; /* SYNCHRONOUS STATUS REQUESTED */N unsigned lck$v_system : 1; /* SYSTEM LOCK */N unsigned lck$v_noquota : 1; /* DON'T CHARGE QUOTA */N unsigned lck$v_cvtsys : 1; /* CONVERT TO SYSTEM  */N unsigned lck$v_recover : 1; /* RECOVER LOCK DURING FAILOVER */N unsigned lck$v_protect : 1; /* PROTECT LOCK DURING FAILOVER */N unsigned lck$v_nodlckwt : 1; /* NO DEADLOCK WAITING */N unsigned lck$v_nodlckblk : 1; /* NO DEADLOCK BLOCKING */N unsigned lck$v_expedite : 1; /* EXPEDITE NLMODE REQUEST */N unsigned lck$v_quecvt : 1; /* FORCE CONVERSION TO QUEUE */N unsigned lck$v_bypass : 1; /* BYPASS WAITING REQUESTS */N unsigned lck$v_noiolock8 : 1; /* DO NOT LOCK IOLOCK8 FOR CALLBACK */T unsigned lck$v_nofork : 1; /* SAFE TO PERFORM OPERATION WITHOUT FORK */N unsigned lck$v_xvalblk : 1; /* LONG VALUE BLOCK INCLUDED */N/* */N/* IFBLKING bitfield mask; /* PERFORM CONVERSION IF BLOCKING */N/*  */$ unsigned lck$v_fill_75_ : 7; } lck$r_lckdef_bits0; __struct {N unsigned lck$v_deqall : 1; /* DEQUEUE ALL LOCKS */N unsigned lck$v_cancel : 1; /* CANCEL REQUEST */N unsigned lck$v_invvalblk : 1; /* INVALIDATE VALUE BLOCK */N unsigned lck$v_pad : 11; /* RESERVE NEXT 11 BITS */Q unsigned lck$v_resv_noiolock8 : 1; /* DO NOT LOC K IOLOCK8 FOR CALLBACK */T unsigned lck$v_resv_nofork : 1; /* SAFE TO PERFORM OPERATION WITHOUT FORK */N unsigned lck$v_resv_xvalblk : 1; /* LONG VALUE BLOCK INCLUDED */$ unsigned lck$v_fill_76_ : 7; } lck$r_lckdef_bits1;N/*LOCK MODES */ } ; #if !defined(__VAXC)4#define lck$v_valblk lck$r_lckdef_bits0.lck$v_valblk6#define lck$v_convert lck$r_lckdef_bits0.lck$v_convert6#define lck$v_no queue lck$r_lckdef_bits0.lck$v_noqueue6#define lck$v_syncsts lck$r_lckdef_bits0.lck$v_syncsts4#define lck$v_system lck$r_lckdef_bits0.lck$v_system6#define lck$v_noquota lck$r_lckdef_bits0.lck$v_noquota4#define lck$v_cvtsys lck$r_lckdef_bits0.lck$v_cvtsys6#define lck$v_recover lck$r_lckdef_bits0.lck$v_recover6#define lck$v_protect lck$r_lckdef_bits0.lck$v_protect8#define lck$v_nodlckwt lck$r_lckdef_bits0.lck$v_nodlckwt:#define lck$v_nodlckblk lck$r_lckdef_bits0.lck$v_nodlckblk8#define lck$v_ex pedite lck$r_lckdef_bits0.lck$v_expedite4#define lck$v_quecvt lck$r_lckdef_bits0.lck$v_quecvt4#define lck$v_bypass lck$r_lckdef_bits0.lck$v_bypass:#define lck$v_noiolock8 lck$r_lckdef_bits0.lck$v_noiolock84#define lck$v_nofork lck$r_lckdef_bits0.lck$v_nofork6#define lck$v_xvalblk lck$r_lckdef_bits0.lck$v_xvalblk4#define lck$v_deqall lck$r_lckdef_bits1.lck$v_deqall4#define lck$v_cancel lck$r_lckdef_bits1.lck$v_cancel:#define lck$v_invvalblk lck$r_lckdef_bits1.lck$v_invvalblk"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LCKDEF_LOADED */ ww/******************************************************************************************* *************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $LDDEF ***/#ifndef __LDDEF_LOADED#define __LDDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #include #define IO$_LD_CONTROL 20#define LDIO$K_CONNECT 0#define LDIO$K_DISCONNECT 1#define LDIO$K_ENABLE_TRACE 2#define LDIO$K_DISABLE_TRACE 3#define LDIO$K_GET_TRACE 4#define LDIO$K_RESET_TRACE 5#define LDIO$K_GET_CONNECTION 6#define LDIO$K_SET_SEED 7#define LDIO$K_ENABLE_WATCH 8#define LDIO$K_DISABLE_WATCH 9#define LDIO$K_GET_WATCH 10#define LDIO$K_RESUME_WATCH 11"#define LDIO$K_GET_SUSPEND_LIST 12 #define LDIO$K_ENABLE_PROTECT 13!#define LDIO$K_DISABLE_PROTECT 14#define LDIO$K_SET_ALLOCLASS 15&#define LDIO$K_GET_TRACE_PARAMETERS 16#define LDIO$K_GET_VERSION 17#define LDIO$M_REPLACE 0x100#define LDIO$M_ABORT 0x200#define LDIO$M_INQUIRE 0x400#define LDIO$M_NOWAIT 0x800#define LDIO$M_RESET 0x1000#define LDIO$M_SHARE 0x2000#define LDIO$M_ACCURATE 0x4000#define LDIO$M_FDTTRACE 0x8000#define LDIO$M_LBN 0x10000#define LDIO$M_OVERRIDE 0x20000#define LDIO$M_LOCK 0x40000#define LDIO$M_NOFE 0x80000 #ifdef __NEW_STARLETtypedef struct _ldio { unsigned ldio$v_func : 8; unsigned ldio$v_replace : 1; unsigned ldio$v_abort : 1; unsigned ldio$v_inquire : 1; unsigned ldio$v_nowait : 1; unsigned ldio$v_reset : 1; unsigned ldio$v_share : 1;! unsigned ldio$v_accurate : 1;! unsigned ldio$v_fdttrace : 1; unsigned ldio$v_lbn : 1;! unsigned ldio$v_override : 1; unsigned ldio$v_lock : 1; unsigned ldio$v_nofe : 1;! unsigned ldio$v_fill_77_ : 4; } LDIO;#else /* __OLD_STARLET */ struct ldio { unsigned ldio$v_func : 8; unsigned ldio$v_replace : 1; unsigned ldio$v_abort : 1; unsigned ldio$v_inquire : 1; unsigned ldio$v_nowait : 1; unsigned ldio$v_reset : 1; unsigned ldio$v_share : 1;! unsigned ldio$v_accurate : 1;! unsigned ldio$v_fdttrace : 1; unsigned ldio$v_lbn : 1;! unsigned ldio$v_override : 1; unsigned ldio$v_lock : 1; unsigned ldio$v_nofe : 1;! unsigned ldio$v_fill_77_ : 4; } ;%#endif /* #ifdef __NEW_STARLET */#define LDRSN$K_NOTSHARED 1#define LDRSN$K_NOSHARE 2#define LDRSN$K_ALLOCLASS 3#define LDRSN$K_UNITNUMBER 4#define LDRSN$K_TRACKS 5#define LDRSN$K_SECTORS 6#define LDRSN$K_CYLINDERS 7#define LDRSN$K_MAXBLOCK 8#define LDRSN$K_NOLBNMAP 9#define LDRSN$K_STARTLBN 10#define LDRSN$K_DEVICENAME 11#define LDRSN$K_NOTREPLACED 12#define LDRSN$K_RANGEINUSE 13#define LDRSN$K_FILEIDINUSE 14#define LDRSN$K_INCMPPROT 15#define LDRSN$K_INCMPDEVTYPE 16#define LDTRC$C_LENGTH 88#define LDTRC$K_LENGTH 88 #ifdef __NEW_STARLETtypedef struct _trace_ent { unsigned int ldtrc$l_pid; unsigned int ldtrc$l_lbn; unsigned int ldtrc$l_bcnt;$ unsigned short int ldtrc$w_func;( unsigned short int ldtrc$w_reserved;" unsigned int ldtrc$l_iosb [2]; __union {, unsigned __int64 ldtrc$q_start_time;( unsigned int ldtrc$l_start_time; } ldtrc$r_stime_union; __union {* unsigned __int64 ldtrc$q_end_time;& unsigned int ldtrc$l_end_time; } ldtrc$r_etime_union;' unsigned __int64 ldtrc$q_start_scc;% unsigned __int64 ldtrc$q_end_scc;" unsigned int ldtrc$l_startcpu; unsigned int ldtrc$l_endcpu; __union {) unsigned __int64 ldtrc$q_elapsed;% unsigned int ldtrc$l_elapsed; } ldtrc$r_elapsed_union;( unsigned __int64 ldtrc$q_start_usec;& unsigned __int64 ldtrc$q_end_usec; } TRACE_ENT; #if !defined(__VAXC)A#define ldtrc$q_start_time ldtrc$r_stime_union.ldtrc$q_start_timeA#define ldtrc$l_start_time ldtrc$r_stime_union.ldtrc$l_start_time=#define ldtrc$q_end_time ldtrc$r_etime_union.ldtrc$q_end_time=#define ldtrc$l_end_time ldtrc$r_etime_union.ldtrc$l_end_time=#define ldtrc$q_elapsed ldtrc$r_elapsed_union.ldtrc$q_elapsed=#define ldtrc$l_elapsed ldtrc$r_elapsed_union.ldtrc$l_elapsed"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _trace_ent { unsigned int ldtrc$l_pid; unsigned int ldtrc$l_lbn; unsigned int ldtrc$l_bcnt;$ unsigned short int ldtrc$w_func;( unsigned short int ldtrc$w_reserved;" unsigned int ldtrc$l_iosb [2]; __union {, unsigned int ldtrc$q_start_time [2];( unsigned int ldtrc$l_start_time; } ldtrc$r_stime_union; __union {* unsigned int ldtrc$q_end_time [2];& unsigned int ldtrc$l_end_time; } ldtrc$r_etime_union;' unsigned int ldtrc$q_start_scc [2];% unsigned int ldtrc$q_end_scc [2];" unsigned int ldtrc$l_startcpu; unsigned int ldtrc$l_endcpu; __union {) unsigned int ldtrc$q_elapsed [2];% unsigned int ldtrc$l_elapsed; } ldtrc$r_elap sed_union;( unsigned int ldtrc$q_start_usec [2];& unsigned int ldtrc$q_end_usec [2]; } trace_ent; #if !defined(__VAXC)A#define ldtrc$q_start_time ldtrc$r_stime_union.ldtrc$q_start_timeA#define ldtrc$l_start_time ldtrc$r_stime_union.ldtrc$l_start_time=#define ldtrc$q_end_time ldtrc$r_etime_union.ldtrc$q_end_time=#define ldtrc$l_end_time ldtrc$r_etime_union.ldtrc$l_end_time=#define ldtrc$q_elapsed ldtrc$r_elapsed_union.ldtrc$q_elapsed=#define ldtrc$l_elapsed ldtrc$r_elapsed_union.ldtrc$l_elapsed"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define LDWTC$M_CHARS 0x7F#define LDWTC$M_NOLBN 0x1#define LDWTC$M_FILE 0x2#define LDWTC$M_REMOVE_ALL 0x80#define LDWTC$C_SUSPEND 0#define LDWTC$C_CRASH 1#define LDWTC$C_ERROR 2#define LDWTC$C_OPCOM 3#define LDWTC$C_MAX 3#define LDWTC$C_LENGTH 22#define LDWTC$K_LENGTH 22  9#ifdef __cplusplus /* Define structure prototypes */struct _sbkdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETtypedef struct _watchpt { unsigned int ldwtc$l_lbn; __union {) unsigned short int ldwtc$w_flags; __struct { __union {+ unsigned ldwtc$v_chars : 7; __struct {/ unsigned ldwtc$v_nolbn : 1;. unsigned ldwtc$v_file : 1;2 unsigned ldwtc$v_reserved : 5;4 unsigned ldwtc$v_remove_all : 1;%  } ldwtc$r_flags2;! } ldwtc$r_flags1; } ldwtc$r_fill_79_; } ldwtc$r_fill_78_;& unsigned short int ldwtc$w_action;$ unsigned short int ldwtc$w_func;' unsigned short int ldwtc$w_retcode; __union {$ struct _sbkdef *ldwtc$a_sbk; void *ldwtc$a_fcb; } ldwtc$r_sbk_fcb; __union {+ unsigned short int ldwtc$w_fid [3]; __struct {/ unsigned short int ldwtc$w_fid_num;/ unsi gned short int ldwtc$w_fid_seq;/ unsigned short int ldwtc$w_fid_rvn; } ldwtc$r_fidarea2; } ldwtc$r_fidarea1; } WATCHPT; #if !defined(__VAXC)4#define ldwtc$w_flags ldwtc$r_fill_78_.ldwtc$w_flagsT#define ldwtc$v_chars ldwtc$r_fill_78_.ldwtc$r_fill_79_.ldwtc$r_flags1.ldwtc$v_charsc#define ldwtc$v_nolbn ldwtc$r_fill_78_.ldwtc$r_fill_79_.ldwtc$r_flags1.ldwtc$r_flags2.ldwtc$v_nolbna#define ldwtc$v_file ldwtc$r_fill_78_.ldwtc$r_fill_79_.ldwtc$r_flags1.ldwtc$r_flags2.ldwtc$v_filei#define ldwtc$v_reserved ldwtc$r_fill_78_.ldwtc$r_fill_79_.ldwtc$r_flags1.ldwtc$r_flags2.ldwtc$v_reservedm#define ldwtc$v_remove_all ldwtc$r_fill_78_.ldwtc$r_fill_79_.ldwtc$r_flags1.ldwtc$r_flags2.ldwtc$v_remove_all/#define ldwtc$a_sbk ldwtc$r_sbk_fcb.ldwtc$a_sbk/#define ldwtc$a_fcb ldwtc$r_sbk_fcb.ldwtc$a_fcb0#define ldwtc$w_fid ldwtc$r_fidarea1.ldwtc$w_fidI#define ldwtc$w_fid_num ldwtc$r_fidarea1.ldwtc$r_fidarea2.ldwtc$w_fid_numI#define ldwtc$w_fid_seq ldwtc$r_fidarea1.ldwtc$r_fidarea2.ldwtc$w_fid_seqI#define ldwtc$w_fid_rvn ldwtc$r_fidarea1.ldwtc$r_fidarea2.ldwtc$w_fid_rvn"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _watchpt { unsigned int ldwtc$l_lbn; __union {) unsigned short int ldwtc$w_flags; __struct { __union {+ unsigned ldwtc$v_chars : 7; __struct {/ unsigned ldwtc$v_nolbn : 1;. unsigned ldwtc$v_file : 1;2 unsigned ldwtc$v_reserved : 5;4 unsigned ldwtc$v_remove_all : 1;% } ldwtc$r_flags2;! } ldwtc$r_flags1; } ldwtc$r_fill_79_; } ldwtc$r_fill_78_;& unsigned short int ldwtc$w_action;$ unsigned short int ldwtc$w_func;' unsigned short int ldwtc$w_retcode; __union { void *ldwtc$a_sbk; void *ldwtc$a_fcb; } ldwtc$r_sbk_fcb; __union {+  unsigned short int ldwtc$w_fid [3]; __struct {/ unsigned short int ldwtc$w_fid_num;/ unsigned short int ldwtc$w_fid_seq;/ unsigned short int ldwtc$w_fid_rvn; } ldwtc$r_fidarea2; } ldwtc$r_fidarea1; } watchpt; #if !defined(__VAXC)4#define ldwtc$w_flags ldwtc$r_fill_78_.ldwtc$w_flagsT#define ldwtc$v_chars ldwtc$r_fill_78_.ldwtc$r_fill_79_.ldwtc$r_flags1.ldwtc$v_charsc#define ldwtc$v_nolbn ldwtc$r_fill_78_.ldwtc$r_fill_79_.ldwtc$r_flags1.ldwtc$r_flags2.ldwtc$v_nolbna#define ldwtc$v_file ldwtc$r_fill_78_.ldwtc$r_fill_79_.ldwtc$r_flags1.ldwtc$r_flags2.ldwtc$v_filei#define ldwtc$v_reserved ldwtc$r_fill_78_.ldwtc$r_fill_79_.ldwtc$r_flags1.ldwtc$r_flags2.ldwtc$v_reservedm#define ldwtc$v_remove_all ldwtc$r_fill_78_.ldwtc$r_fill_79_.ldwtc$r_flags1.ldwtc$r_flags2.ldwtc$v_remove_all/#define ldwtc$a_sbk ldwtc$r_sbk_fcb.ldwtc$a_sbk/#define ldwtc$a_fcb ldwtc$r_sbk_fcb.ldwtc$a_fcb0#define ldwtc$w_fid ldwtc$r_fidarea1.ldwtc$w_fidI#define ldwtc$w_fid_num ldwtc$r_fidarea1.ldwtc$r_fidarea2.ldwtc$w_fid_numI#define ldwtc$w_fid_seq ldwtc$r_fidarea1.ldwtc$r_fidarea2.ldwtc$w_fid_seqI#define ldwtc$w_fid_rvn ldwtc$r_fidarea1.ldwtc$r_fidarea2.ldwtc$w_fid_rvn"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define LDSUSP$C_LENGTH 16#define LDSUSP$K_LENGTH 16 #ifdef __NEW_STARLETtypedef struct _suspend_list { unsigned int ldsusp$l_pid; unsigned int ldsusp$l_lbn;& unsigned short int ldsusp$w_flags;' unsigned short int ldsusp$w_action;% unsigned short int ldsusp$w_func;( unsigned short int ldsusp$w_retcode; } SUSPEND_LIST;#else /* __OLD_STARLET */typedef struct _suspend_list { unsigned int ldsusp$l_pid; unsigned int ldsusp$l_lbn;& unsigned short int ldsusp$w_flags;' unsigned short int ldsusp$w_action;% unsigned short int ldsusp$w_func;( unsigned short int ldsusp$w_retcode; } suspend_list;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LDDEF_LOADED */ ww;/******************************************************************************************************************* *************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $LEPMDEF ***/#ifndef __LEPMDEF_LOADED#define __LEPMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* GSD entry - Module local entry point definition */N/* */#define LEPM$K_NAME 15#define LEPM$C_NAME 15 #ifdef __NEW_STARLETtypedef struct _lepmdef { __union {N unsigned char lepm$b_gsdtyp; /*Maps over LSY$B_GSDTYP */ __struct {" char lepmdef$$_fill_1;# } lepm$r_gsdtyp_fields; } lepm$r_gsdtyp_overlay;N unsigned char lepm$b_datyp; /*Maps over LSY$B_DATYP */N unsigned short int lepm$w_flags; /*Maps over LSY$W_FLAGS */Q unsigned short int lepm$w_envindx; /*Environment index symbol defined in */N unsigned short int lepm$w_psindx; /*Maps over LSDF$W_PSINDX */N unsigned int lepm$l_addrs; /*Entry point address, maps */N/* over LSDF$L_VALUE */N unsigned short int lepm$w_mask; /*Entry point mask */N unsigned char lepm$b_namlng; /*Length of name */N char lepm$t_name [31]; /*Symbol name */ } LEPMDEF; #if !defined(__VAXC)9#define lepm$b_gsdtyp lepm$r_gsdtyp_overlay.lepm$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct lepmdef { __union {N unsigned char lepm$b_gsdtyp; /*Maps over LSY$B_GSDTYP */ __struct {" char lepmdef$$_fill_1;# } lepm$r_gsdtyp_fields; } lepm$r_gsdtyp_overlay;N unsigned char lepm$b_datyp; /*Maps over LSY$B_DATYP */N unsigned short int lepm$w_flags; /*Maps over LSY$W_FLAGS */Q unsigned short int lepm$w_envindx; /*Environment index symbol defined in */N unsigned short int lepm$w_psindx; /*Maps over LSDF$W_PSINDX */N unsigned int lepm$l_addrs; /*Entry point address, maps */N/* over LSDF$L_VALUE */N unsigned short int lepm$w_mask; /*Entry point mask */N unsigned char lepm$b_namlng; /*Length of name */N char lepm$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define lepm$b_gsdtyp lepm$r_gsdtyp_overlay.lepm$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LEPMDEF_LOADED */ ww[6/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */L/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]LOGINMSG.SDI;1 *//*************************************************************************************** *****************************************//*** MODULE $LGIDEF ***/#ifndef __LGIDEF_LOADED#define __LGIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*  */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:57:41.49 */N/* */N/*--- */N/* */I/* ERROR MESSAGES FOR LOGINOUT */N/*  */N/*--- */N/* */O/* ************************************************************************* */O/* * * */O/* * COPYRIGHT 1981 HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P. * */O/* * * */O/* * CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM HP AND/OR * */O/* * ITS SUBSIDIARIES REQUIRED FOR POSSESSION, USE, OR COPYING. * */O/* * * */O/* * CONSISTENT WITH FAR 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE, * */O/* * COMPUTER SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL * */O/* * ITEMS ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD * */O/* * COMMERCIAL LICENSE. * */O/* * * */O/* * NEITHER HP NOR ANY OF ITS SUBSIDIARIES SHALL BE LIABLE FOR TECHNICAL * */O/* * OR EDITORIAL ERRORS OR OMISSIONS CONTAINED HEREIN. THE INFORMATION * */O/* * IN THIS DOCUMENT IS PROVIDED "as is" WITHOUT WARRANTY OF ANY KIND AND * */O/* * IS SUBJECT TO CHANGE WITHOUT NOTICE. THE WARRANTIES FOR HP PRODUCTS * */O/* * ARE SET FORTH IN THE EXPRESS LIMITED WARRANTY STATEMENTS ACCOMPANYING * */O/* * SUCH PRODUCTS. NOTHING HEREIN SHOULD BE CONSTRUED AS CONSTITUTING AN * */O/* * ADDITIONAL WARRANTY. * */O/* * * */O/* ************************************************************************* */N/* */N/*++  */N/* FACILITY: LOGINOUT */N/* */N/* ABSTRACT: */N/* */I/* THESE ARE THE ERROR MESSAGES USED BY THE LOGINOUT PROGRAM. */N/*  */N/* ENVIRONMENT: */N/* */I/* VMS OPERATING SYSTEM, PRIVILEGED UTILITY. */N/* */N/* AUTHOR: TIM HALVORSEN, MARCH 1981 */N/* */N/* MODIFIED BY:  */N/* */6/* X-13 JAH0504 JOHN A HARNEY 23-MAR-2005 */B/* D'OH. I DUPLICATED THE SPACE PADDING IN THE NEW */B/* PWDCLEARSEC MESSAGE FROM THE MESSAGE ABOVE; THAT'D */B/* HAVE BEEN WONDERFUL IF THE MESSAGE JUST ABOVE WAS */B/* A SIMILAR MESSAGE. ADD ONE MORE SPACE, TO MAKE */B/* PWDCLEARSEC JUST LIKE PWDSYNCHSEC. */N/* */6/* X-12 JAH0504 JOHN A HARNEY 05-JAN-2005 */B/* ADD PWDCLEARSEC - */N/* "OpenVMS secondary password has been cleared" */N/* */7/* X-11 MAS0803 MARK A. STILES 10-NOV-2004 */B/* ONCE AGAIN, WE BOW TO THE LEGAL BEAGLES, BEAN CO UNTERS, */B/* AND SPIN DOCTORS. MAKE "hp" BE "HP" IN THE PRODUCT NAME */B/* IN THE BANNER. */N/* */7/* X-10 MAS0796 MARK A. STILES 4-APR-2004 */B/* FINALLY USE REAL PRODUCT NAME IN WELCOME. */B/* FOR TOPAZ, THIS WILL BE: */E/* HP OPENVMS INDUSTRY STANDARD 64 OPERATING SYSTEM, VERSION V8.2 */N/*  */6/* X-9 MAS0784 MARK A. STILES 23-JUN-2003 */B/* YOU DIDN'T THINK THEY'D LET US GET OUT WITHOUT AT */B/* LEAST ONE PRODUCT/BANNER/WELCOME NAME CHANGE, DO YOU?? */B/* FOR MAKO_BL2, THE BANNER/WELCOME BECOMES: */B/* HP OPENVMS INDUSTRY STANDARD 64 EVALUATION RELEASE V8.0 */N/* */5/* X-8 JAH0434 JOHN A HARNEY 25-FEB-2003 */B/* ADD IA64HELLO WELCOME MESSAGE. */N/* */</* X-7 LJK0200 LAWRENCE J. KILGALLEN 13-DEC-2000 */B/* ADD THE STATUS CODE LGI$_DECWRESTART. */N/* */</* X-6 LJK0198 LAWRENCE J. KILGALLEN 12-DEC-2000 */B/* ADD THE STATUS CODE LGI$_NULLNETUSER.  */N/* */</* X-5 LJK0175 LAWRENCE J. KILGALLEN 26-JUN-2000 */B/* COPY MESSAGES FROM SET.MSG SO THEY WILL BE AVAILABLE */B/* TO THIRD PARTY ACME AGENTS. */B/* CHANGE COPYRIGHT. */N/* */</* X-4 LJK0119 LAWRENCE J. KILGALLEN 29-JAN-1999 */B/* ADD LGI$_LOSTSYNC MESSAGE. */N/* */</* X-3 LJK0045 LAWRENCE J. KILGALLEN 26-MAY-1998 */B/* CHANGE THE TWO PASSWORD SYNCHRONIZATION MESSAGES TO */B/* SAY "external" RATHER THAN "network". */B/* TRIPLE THE TWO PASSWORD SYNCHRONIZATION MESSAGES TO */B/* COVER PRIMARY AND SECONDARY PASSWORDS. */N/*  */</* X-2 LJK0033 LAWRENCE J. KILGALLEN 13-MAY-1998 */B/* ADD LGI$_LOGDISABLOPR. */B/* ADD SPACE TO LGI$_LOSTLGI. */B/* ADD SPACE TO LGI$_LOSTDEC. */N/* */</* X-1 LJK0009 LAWRENCE J. KILGALLEN 11-MAR-1998 */B/* INITIAL SUPPORT OF EXTERNAL AUTHENTICATION I I: */B/* ADD LGI$_PWD2NOTSET. */B/* ADD LGI$_SYSPWDERR. */B/* ADD LGI$_LOSTDEC. */B/* ADD LGI$_LOSTLGI. */B/* ADD LGI$_NOSYSPWD. */B/* ADD LGI$_WRONGPRINCIPAL. */B/* ADD LGI$_PROCSTEP. */B/* ADD LGI$_SUBPROGRAM. */B/* ADD LGI$_OLDPOLICY. */B/* CHANGE MODULE NAME TO LOGINMSG AND MOVE IT TO STARLET. */N/* */8/* X-19 RJB0023 RICHARD J. BARRY 4-MAR-1996 */B/* ADD SINGLE SIGN-ON MESSAGES. */N/* */6/* X-18 JAH0202 JOHN A HARNEY 16-JAN-1996 */B/* PUT THE (TM) IN THE RIGHT PLACE IN ALPHAHELLO AND VAXHELLO. */N/* */9/* X-17 NYK487 NITIN Y. KARKHANIS 29-SEP-1995 */B/* O INCREASE FIELD WIDTH FOR NUMBER DISPLAYED AFTER THE */B/* PEAK PAGE FILE SIZE TEXT IN LOGOUT/FULL. */B/* O CHANGED THE FIELD WIDTHS FOR WS PEAK AND MOUNTED */B/* VOLUME COUNT SO THAT THE NUMBERS ARE ALIGNED ON THE */B/* RIGHT-HAND-SIDE, FOR LOGOUT/FULL. */B/* O REPLACED THE "Peak page file size" TEXT WITH "PEAK */B/* VIRTUAL SIZE" SINCE THAT IS THE VALUE THAT IS ACTUALLY */B/* DISPLAYED. */N/* */</* X-16 JAH0180 JOHN A HARNEY 08-MAY-1995 */B/* CHANGE THE ALPHA'S WELCOME MESSAGE TO REMOVE AXP REFERENCE */N/*  */5/* X-15 TNS003 TOM SCARPELLI 21-SEP-1993 */B/* UPDATE MESSAGES TO MATCH VAX VERSION. */N/* */5/* X-14 TNS003 TOM SCARPELLI 29-JUN-1993 */B/* MOVE HARDCODED DAYS OF THE WEEK TO MESSAGE FILE. */N/* */5/* X-13 TNS003 TOM SCARPELLI 23-JUN- 1993 */B/* USE LOCAL DATE/TIME FORMAT. */N/* *///* X-12 AHM DREW MASON 29-SEP-1992 */B/* MAKE PRODUCT NAME FIT ON 80 COLUMNS. */N/* *///* X-11 AHM DREW MASON 29-SEP-1992 */B/* LAST PRODUCT NAME CHANGE FOR V1. */N/*  *///* X-10 AHM DREW MASON 28-SEP-1992 */B/* LAST PRODUCT NAME CHANGE FOR V1. */N/* */./* X-9 AHM DREW MASON 25-SEP-1992 */B/* CHANGE PRODUCT NAME. */N/* */4/* X-7 TNS001 TOM SCARPELLI 19-JUN-1992 */B/* FIX TEXT OF DECWCAPTIVE ERROR MESSAGE. */N/* */;/* X-6 TNS001 TOM SCARPELLI 23-JAN-1992 */B/* MERGE THE FOLLOWING CHANGE: */N/* (X-15 DDP1119 DERRELL D. PIPER 8-JAN-1992 12:16 */N/* ADD MESSAGE FOR WHEN LOGINOUT IS NOT PROPERLY INSTALLED.) */N/*  */;/* X-5 TNS001 TOM SCARPELLI 23-DEC-1991 */B/* MERGE THE FOLLOWING CHANGE: */F/* (X-14 DDP0952 DERRELL D. PIPER 23-MAY-1991 13:40 */B/* FOLD SIGMA CHANGE INTO MAGIC: */A/* DDP0931 DERRELL D. PIPER 6-MAY-1991 16:50 */B/* ADD MESSAGE FOR FAILURE TO ACCESS RIGHTS DATA BASE.) */N/* */5/* X-4 KLN1136 KAREN L. NOEL 06-AUG-1991 */B/* MERGE THE FOLLOWING CHANGE: */N/* (X-13 JRC1015 JOHN R. COVERT 22-FEB-1991 14:45 */N/* IMPLEMENT LOGINOUT CALLOUTS.) */N/* */;/* X-3 TNS001 TOM SCARPELLI 22-APR-1991 */B/* ADD WELCOME AND LOGOUT MESSAGE TEXT. */N/*  */D/* X-9 DDP0352 DERRELL D. PIPER 24-FEB-1989 14:51 */B/* ADD VAXCLUSTER LICENSE MESSAGE. */N/* */D/* X-8 DDP0303 DERRELL D. PIPER 27-JUN-1988 15:15 */B/* MERGE DECWINDOWS CHANGES INTO MAINLINE. */N/* */>/* X-7 RJB0048 RICHARD J. BOUCHARD JR. 15-NOV-1987 */B/* CHANGE LOGOPRCON TO EXPLICITLY STATE THAT LOGIN WAS */B/* ALLOWED ON OPA0:, NOT A GENERIC "operator console" */N/* */>/* X-6 RJB0034 RICHARD J. BOUCHARD JR. 26-OCT-1987 */B/* ADD MESSAGES FOR SUPPORT OF LMF CALL WITHIN LOGINOUT */;/* */D/* X-5 DDP0135 DERRELL D. PIPER  13-AUG-1987 20:03 */B/* RENAME LGI$_FRCPWDERR TO LGI$_FRCPWDHLP AND MAKE THE */B/* MESSAGE TEXT MORE READABLE. ADD LGI$_FRCPWDERR FOR */B/* FORCE PASSWORD CHANGE TIMEOUTS. */N/* */D/* X-4 DDP0076 DERRELL D. PIPER 18-MAY-1987 19:04 */B/* ADD LGI$_FRCPWDERR MESSAGE FOR FORCED PASSWORD CHANGE */B/* ERRORS (POINT USER TO ).  */N/* */7/* X-3 DDP0052 DERRELL D. PIPER 01-APR-1987 */B/* ADD LGI$_NOTMODEM MESSAGE FOR INCORRECTLY WIRED MODEMS. */N/* */?/* V04-001 ACG0478 ANDREW C. GOLDSTEIN, 12-APR-1985 19:41 */B/* ADD LGI$_EXLICENSE, LGI$_DISUSER, LGI$_AUTOLOGIN, */B/* AND LGI$_INVINPUT MESSAGES */N/*  */9/* V03-008 MHB0142 MARK BRAMHALL 27-APR-1984 */B/* ADD NOSUCHUSER AND INVPWD. */N/* */9/* V03-007 MHB0130 MARK BRAMHALL 10-APR-1984 */B/* MAKE CONNERR ONLY AN ERROR, NOT FATAL. */B/* ADD CLITBLFAIL AND CLITBLPROT. */N/*  */9/* V03-006 MHB0112 MARK BRAMHALL 21-MAR-1984 */B/* ADD CONNERR AND DISRECONNECT. */N/* */8/* V03-005 PCG0001 PETER GEORGE 04-FEB-1984 */B/* ADD ACNTEXPIR AND PWDEXPIR. */N/* */?/* V03-004 ACG0385 ANDREW C. GOLDSTEIN, 29-DEC-1983 11:59 */B/* ADD NEW RESTRICTION MESSAGES */N/* */?/* V03-003 ACG0376 ANDREW C. GOLDSTEIN, 29-NOV-1983 14:23 */B/* ADD DEFCLI RESTRICTIONS MESSAGE */N/* */7/* V03-002 GAS-162 GERRY SMITH 30-JUL-1983 */B/* ADD MESSAGES FOR SYSTEM PASSWORD AND BREAKIN EVASION.  */N/* */7/* V03-001 GAS0123 GERRY SMITH 20-APR-1983 */B/* ADD NETUAFACC, ERROR ACCESSING NETUAF FILE. */N/* */7/* V02-003 HRJ0036 HERB JACOBS 08-DEC-1981 */B/* ADDED MORE MESSAGES FOR TERMINAL TYPE RESTRICTIONS. */N/* */7/* V02-002 HRJ0031 HERB JACOBS 02-NOV-1981 */B/* ADD MESSAGES FOR TIME OF DAY AND USER ACCOUNT RESTRICTIONS. */N/* */=/* V001 TMH0001 TIM HALVORSEN 22-OCT-1981 */B/* ADD ERROR MESSAGE FOR CAPTIVE ACCOUNTS */B/* CHANGE TO USE SYSTEM-WIDE FACILITY NUMBER. */N/*---- */N/* IMPORTANT:  */N/* */Q/* THESE MESSAGES ARE MADE AVAILABLE TO INSTALLATION CALLOUT ROUTINES AND ARE */P/* STORED IN THE ACCOUNTING FILE AND MUST NOT CHANGE VALUE FROM NOW ON. YOU */N/* MUST ADD ALL NEW MESSAGES TO THE APPROPRIATE SECTION AT THE END OF THIS */N/* MODULE. */#define LOGIN$_FACILITY 211N/* DEFAULT SEVERITY IS FATAL */#define LGI$_JBCMIXUP 13860876#define LGI$_LOGDISABL 13860884#define LGI$_EXQUOTA 13860892#define LGI$_CLIFAIL 13860900#define LGI$_CLIPROT 13860908#define LGI$_CLISYMTBL 13860916#define LGI$_NOTVALID 13860924#define LGI$_FILEACC 13860932#define LGI$_USERAUTH 13860940#define LGI$_INPUTERR 13860948#define LGI$_OUTPUTERR 13860956#define LGI$_CMDINPUT 13860964#define LGI$_OPENIN 13860968#define LGI$_CAPTIVE 13860980#define LGI$_BADHOUR 13860988#define LGI$_USEREXC 13860996#define LGI$_ACNTEXC 13861004#define LGI$_BADDAY 13861012#define LGI$_RESTRICT 13861020#define LGI$_NETUAFACC 13861028#define LGI$_SYSPWDTMO 13861036#define LGI$_EVADE 13861044#define LGI$_DEFCLI 13861052#define LGI$_ACNTEXPIR 13861060#define LGI$_PWDEXPIR 13861068#define LGI$_CONNERR 13861074"#define LGI$_DISRECONNECT 13861084 #define LGI$_CLITBLFAIL 13861092 #define LGI$_CLITBLPROT 13861100 #define LGI$_NOSUCHUSER 13861108#define LGI$_INVPWD 13861116#define LGI$_EXLICENSE 13861124#define LGI$_DISUSER 13861132#define LGI$_AUTOLOGIN 13861140#define LGI$_INVINPUT 13861148#define LGI$_NOTMODEM 13861156#define LGI$_FRCPWDERR 13861164#define LGI$_LICCHKINV 13861172#define LGI$_FISFAIL 13861180!#define LGI$_DECWCAPTIVE 13861188"#define LGI$_NOVAXCLUSTER 13861196N/* SEVERITY OF THIS MESSAGE IS INFORMATIONAL */#define LGI$_FRCPWDHLP 13861203N/*  SEVERITY OF THESE MESSAGES IS SUCCESS */#define LGI$_LICNOTREQ 13861209#define LGI$_LOGOPRCON 13861217#define LGI$_LICCHKVAL 13861225R/* ALL NEW MESSAGES MUST BE ADDED TO ONE OF THE FOLLOWING SECTIONS. YOU CANNOT */P/* ADD A MESSAGE ABOVE AS THIS WILL CHANGE THE VALUES OF THOSE MESSAGES WHICH */N/* FOLLOW YOUR NEW (PRESUMABLY FATAL) MESSAGE. */N/* INFORMATIONAL MESSAGES */"#define LGI$_LOGDISABLOPR 13861267N/* SUCCESS MESSAGES */N#define LGI$_SKIPRELATED 13861665 /* INTERNAL COMMUNICATION ONLY */N/* WARNING MESSAGES */N/* ERROR MESSAGES */N/* */N/* THE FOLLOWING TWO MESSAGES DUPLICATE SET$_ MESSAGES IN SEVERITY AND */N/* TEXT (ALTHOUGH NOT IN CODE VALUE) TO ALLOW TRANSMISSION OF THEIR */N/* VALUE TO SYS$ACM CLIENTS WHO DO NOT HAVE SET$_ MESSAGES CODES IN */N/* THEIR IMAGE. FOR THE PARTICULAR CASES OF LOGINOUT COMMUNICATING */N/* WITH AN LGI-CALLOUT PROVIDER OR SET PASSWORD RETURNING STATUS TO */N/* DCL, THESE LGI$_ CODES GET CONVERTED TO THE CORRESPONDING SET CODES */N/* TO PRESERVE COMPATIBILITY WITH VERSIONS OF VMS PRIOR TO V7.2. */N/*  */ #define LGI$_PWD2NOTSET 13863266#define LGI$_SYSPWDERR 13863274N/* FATAL ERRORS */ #define LGI$_COUNTWRONG 13864068#define LGI$_RDBACCERR 13864076 #define LGI$_NOTALLPRIV 13864084#define LGI$_NOEXTAUTH 13864092#define LGI$_NOLOCAUTH 13864100N/* */N/* FATAL MESSAGES ADDED FOR EXTERNAL AUTHENT ICATION II */N/* */#define LGI$_LOSTDEC 13864108#define LGI$_LOSTLGI 13864116#define LGI$_NOSYSPWD 13864124$#define LGI$_WRONGPRINCIPAL 13864132#define LGI$_LOSTSYNC 13864140N/* */N/* FAILURE MESSAGES ADDED FOR EXTERNAL AUTHENTICATION III */N/*  */!#define LGI$_NULLNETUSER 13864148!#define LGI$_DECWRESTART 13864156N/* */N/* ALL ERROR MESSAGES SHOULD BE ADDED BEFORE THIS POINT. THE MESSAGES */N/* FOLLOWING THE .BASE DIRECTIVE BELOW ARE TEXT OUTPUT BY LOGINOUT */N/* OR THE VMS ACME AND ARE NOT RETURNED TO THE USER. */N/* */N/*  */N/* THE FOLLOWING ARE MESSAGES OUTPUT IN LOGIN.B32 */N/* */#define LGI$_JOBTERM 13869057#define LGI$_JOBLOGOUT 13869065#define LGI$_PROCEND 13869073#define LGI$_ACNTINFO 13869081#define LGI$_ACNTINFO1 13869089#define LGI$_ACNTINFO2 13869097#define LGI$_ACNTINFO3 13869105#define LGI$_ACNTINFO4 13869113#define LGI$_ACNTI NFO5 13869121#define LGI$_PASEXP 13869129#define LGI$_PRIPASEXP 13869137#define LGI$_SECPASEXP 13869145#define LGI$_SETPAS 13869153#define LGI$_SETPRIPAS 13869161#define LGI$_SETSECPAS 13869169#define LGI$_EXPSETPAS 13869177#define LGI$_PRISETPAS 13869185#define LGI$_SECSETPAS 13869193N/* */N/* THE FOLLOWING ARE MESSAGES OUTPUT IN INTERACT.B32 */N/*  */#define LGI$_USERNAME 13869201#define LGI$_PASSWORD 13869209#define LGI$_VAXHELLO 13869217 #define LGI$_ALPHAHELLO 13869225#define LGI$_ONNODE 13869233#define LGI$_LASINTLOG 13869241!#define LGI$_LASNOINTLOG 13869249#define LGI$_LOGFAILS 13869257 #define LGI$_NEWMAILCNT 13869265#define LGI$_NEWMAIL 13869273 #define LGI$_DISCONPROC 13869281!#define LGI$_DISCONPROCS 13869289#define LGI$_DISCONHDR 13869297#define LGI$_DISCONTXT 13869305#define LGI$_CONTOTERM 13869313#define LGI$_CONTOPROC 13869321#define LGI$_YESRESP 13869329#define LGI$_NONERESP 13869337#define LGI$_TERMCONN 13869345#define LGI$_MONDAY 13869353#define LGI$_TUESDAY 13869361#define LGI$_WEDNESDAY 13869369#define LGI$_THURSDAY 13869377#define LGI$_FRIDAY 13869385#define LGI$_SATURDAY 13869393#define LGI$_SUNDAY 13869401N/* */N/* NEW SINGLE SIGN-ON MESSAGES.  */N/* */#define LGI$_PWDSYNCH 13869409 #define LGI$_PWDNOSYNCH 13869417#define LGI$_LOCLOGIN 13869425N/* */N/* MESSAGES ADDED FOR EXTERNAL AUTHENTICATION II */N/* */#define LGI$_PROCSTEP 13869433 #define LG I$_SUBPROGRAM 13869441#define LGI$_OLDPOLICY 13869449!#define LGI$_PWDSYNCHPRI 13869457!#define LGI$_PWDSYNCHSEC 13869465##define LGI$_PWDNOSYNCHPRI 13869473##define LGI$_PWDNOSYNCHSEC 13869481N/* */N/* MESSAGES COPIED FROM SET.MSG SO THEY WILL BE AVAILABLE */N/* TO THIRD PARTY ACME AGENTS. */N/*  */#define LGI$_OLDPASS 13869489#define LGI$_NEWPASS 13869497#define LGI$_CHKPASS 13869505N/* */N/* IA64HELLO WELCOME MESSAGE */N/* */#define LGI$_IA64HELLO 13869513N/* */N/* ANOTHER MESSAGE ADDED FOR EXTERNA L AUTHENTICATION II */N/* */!#define LGI$_PWDCLEARSEC 13869521N/* */N/* ERROR MESSAGES SHOULD BE NOT ADDED AT THIS POINT. THE MESSAGES */N/* FOLLOWING THE .BASE DIRECTIVE ABOVE ARE TEXT OUTPUT BY LOGINOUT */N/* OR THE VMS ACME AND ARE NOT RETURNED TO THE USER. */N/*   */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LGIDEF_LOADED */ wwn/*************************************************************************************************** *****************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]LBRUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $LHIDEF ***/#ifndef __LHIDEF_LOADED#define __LHIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* Library header information array offsets */N/* */ #ifdef __NEW_STARLETtypedef struct _lhidef {N unsigned int lhi$l_type; /* Library type */N unsigned int lhi$l_nindex; /* Number of indices */N unsigned int lhi$l_majorid; /* Library format major id */N unsigned int lhi$l_minorid; /* Library format minor id */V char lhi$t_lbrver [32]; /* ASCIC version of librarian that created */N unsigned int lhi$l_credat; /* Creation date/time */N  int lhidef$$_fill_1; /* ... */N unsigned int lhi$l_updtim; /* Date/time of last update */N int lhidef$$_fill_2; /* ... */N unsigned int lhi$l_updhis; /* VBN of start of update history */N unsigned int lhi$l_freevbn; /* 1st logically deleted block */N unsigned int lhi$l_freeblk; /* Number of deleted blocks */N unsigned char lhi$b_nextrfa [6]; /* RFA of end of library */N unsigned short int lhi$w_rfaxtr; /* Spare word, zeroed */R unsigned int lhi$l_nextvbn; /* Next VBN to allocate at end of file */X unsigned int lhi$l_freidxblk; /* Number of free pre-allocated index blocks */V unsigned int lhi$l_freeidx; /* Listhead for pre-allocated index blocks */Q unsigned int lhi$l_hipreal; /* VBN of highest pre-allocated block */N unsigned int lhi$l_idxblks; /* Number of index blocks in use */N unsigned int lhi$l_idxcnt; /* Number of index entries (total) */Z 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 */l unsigned int lhi$l_maxluhrec; /* Maximum number of library update histories records maintained */O unsigned int lhi$l_numluhrec; /* Number of LUH records in history  */V unsigned int lhi$l_libstatus; /* False if there was an error closing lib */a 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 */N unsigned int lhi$l_idx3heap; /* VBN of third index block */ } LHIDEF;#else /* __OLD_STARLET */struct lhidef {N unsigned int lhi$l_type; /* Library type  */N unsigned int lhi$l_nindex; /* Number of indices */N unsigned int lhi$l_majorid; /* Library format major id */N unsigned int lhi$l_minorid; /* Library format minor id */V char lhi$t_lbrver [32]; /* ASCIC version of librarian that created */N unsigned int lhi$l_credat; /* Creation date/time */N int lhidef$$_fill_1; /* ... */N unsigned int lhi$l_updtim; /* Date/time of last update */N int lhidef$$_fill_2; /* ... */N unsigned int lhi$l_updhis; /* VBN of start of update history */N unsigned int lhi$l_freevbn; /* 1st logically deleted block */N unsigned int lhi$l_freeblk; /* Number of deleted blocks */N unsigned char lhi$b_nextrfa [6]; /* RFA of end of library */N unsigned short int lhi$w_rfaxtr; /* Spare word, zeroed */R unsigned int lhi$l_nextvbn; /* Next VBN to allocate at end of file */X unsigned int lhi$l_freidxblk; /* Number of free pre-allocated index blocks */V unsigned int lhi$l_freeidx; /* Listhead for pre-allocated index blocks */Q unsigned int lhi$l_hipreal; /* VBN of highest pre-allocated block */N unsigned int lhi$l_idxblks; /* Number of index blocks in use */N unsigned int lhi$l_idxcnt;  /* Number of index entries (total) */Z 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 */l unsigned int lhi$l_maxluhrec; /* Maximum number of library update histories records maintained */O unsigned int lhi$l_numluhrec; /* Number of LUH records in history */V unsigned int lhi$l_libstatus; /* False if there was an error closing  lib */a 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 */N unsigned int lhi$l_idx3heap; /* VBN of third index block */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore  /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LHIDEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:52 by OpenVMS SDL EV3-3 */N/* Source: 18-FEB-2010 16:45:43 $1$DGA7304:[STARLET.SRC]LIB$ROUTINES.SDL;1 *//********************************************* ***********************************************************************************//*** MODULE lib$routines ***/#ifndef __LIB_ROUTINES_LOADED#define __LIB_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 varian t_union#endif#endif P/**************************************************************************** *//* * */G/* COPYRIGHT (c) 1992, 1994, 1995, 1996, 1997, 2003, 2010 BY * */D/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */&/* ALL RIGHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */P/*  INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */P/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */P/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */&/* TRANSFERRED. * *//* * */P/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. * *//*  * */P/* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * *//* * */P/**************************************************************************** */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$ADAWI */N/*  */N/* Add Aligned Word with Interlock */N/* */R/* The Add Aligned Word with Interlock routine allows the user to perform an */N/* interlocked add operation using an aligned word. */N/* */#define lib$adawi LIB$ADAWI #ifdef __NEW_STARLETunsign !ed int lib$adawi( short int *add, short int *sum, short int *sign);#else /* __OLD_STARLET */)unsigned int lib$adawi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$ADDX */N/* */N/* Add Two Multiple-Precision Binary Numbers */N/* */N/*" The Add Two Multiple-Precision Binary Numbers routine adds two signed */N/* two's complement integers of arbitrary length. */N/* */#define lib$addx LIB$ADDX #ifdef __NEW_STARLETunsigned int lib$addx( unsigned int *addend_array, unsigned int *augend_array, unsigned int *resultant_array, __optional_params);#else /* __OLD_STARLET */(unsigned int lib$addx(__unknown_params);!#e#ndif /* #ifdef __NEW_STARLET */N/* LIB$ADD_TIMES */N/* */N/* Add Two Quadword Times */N/* */N/* The Add Two Quadword Times routine adds two VMS internal time format */N/* times. $ */N/* */%#define lib$add_times LIB$ADD_TIMES #ifdef __NEW_STARLETunsigned int lib$add_times( unsigned __int64 *time1, unsigned __int64 *time2,# unsigned __int64 *resultant_time);#else /* __OLD_STARLET */-unsigned int lib$add_times(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$ANALYZE_SDESC */N/* % */N/* Analyze String Descriptors */N/* */N/* The Analyze String Descriptors routine extracts the length and the */N/* address at which the data starts for a variety of string descriptor */N/* classes. */N/* & */-#define lib$analyze_sdesc LIB$ANALYZE_SDESC #ifdef __NEW_STARLETunsigned int lib$analyze_sdesc($ unsigned __int64 *input_descriptor,! unsigned short int *data_length, void *data_address);#else /* __OLD_STARLET */1unsigned int lib$analyze_sdesc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$ANALYZE_SDESC_64 */N/* */N/* 'Analyze String Descriptors */N/* */N/* The Analyze String Descriptors routine extracts the length and the */N/* address at which the data starts for a variety of string descriptor */N/* classes. */N/* */3#define lib$analyze_sdesc_64 L(IB$ANALYZE_SDESC_64 #ifdef __NEW_STARLET"unsigned int lib$analyze_sdesc_64($ unsigned __int64 *input_descriptor, unsigned __int64 *data_length, void *(*(data_address)), __optional_params);#else /* __OLD_STARLET */4unsigned int lib$analyze_sdesc_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$ASCII_TO_UID */N/* ) */N/* Convert Text To UID */N/* */N/* The Convert Text to UID routine converts a standard representation */N/* of a UID in an ASCII text string to a binary UID. */N/* */+#define lib$ascii_to_uid LIB$ASCII_TO_UI*D #ifdef __NEW_STARLETunsigned int lib$ascii_to_uid( void *input_string, unsigned int output_uid [4]);#else /* __OLD_STARLET */0unsigned int lib$ascii_to_uid(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$ASN_WTH_MBX */N/* */N/* Assign Channel with Mailbo +x */N/* */Q/* The Assign Channel with Mailbox routine assigns a channel to a specified */N/* device and associates a mailbox with the device. It returns both the */N/* device channel and the mailbox channel. */N/* */)#define lib$asn_wth_mbx LIB$ASN_WTH_MBX #ifdef , __NEW_STARLETunsigned int lib$asn_wth_mbx( void *device_name, int *maximum_message_size, int *buffer_quota,$ unsigned short int *device_channel,& unsigned short int *mailbox_channel);#else /* __OLD_STARLET *//unsigned int lib$asn_wth_mbx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$AST_IN_PROG */N/* */N/* AST in Progress - */N/* */N/* The AST in Progress routine indicates whether an AST is currently in */N/* progress. */N/* */)#define lib$ast_in_prog LIB$AST_IN_PROG#ifdef __NEW_STARLETchar lib$ast_in_prog(void);#else /* __OLD_STARLET */char lib$ast_i.n_prog(void);!#endif /* #ifdef __NEW_STARLET */N/* LIB$ATTACH */N/* */N/* Attach Terminal to Process */N/* */N/* The Attach Terminal to Process routine requests the calling process's */Q/* Command Language Interpreter (CLI) to detach the / terminal of the calling */N/* process and to reattach it to a different process. */N/* */#define lib$attach LIB$ATTACH #ifdef __NEW_STARLETunsigned int lib$attach( unsigned int *process_id);#else /* __OLD_STARLET */*unsigned int lib$attach(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$BBCCI */N/* 0 */N/* Test and Clear Bit with Interlock */N/* */N/* The Test and Clear Bit with Interlock routine tests and clears a */N/* selected bit under memory interlock. */N/* */#define lib$bbcci LIB$BBCCI #i 1fdef __NEW_STARLETunsigned int lib$bbcci( int *position, void *bit_zero_address);#else /* __OLD_STARLET */)unsigned int lib$bbcci(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$BBSSI */N/* */N/* Test and Set Bit with Interlock */N/* 2 */N/* The Test and Set Bit with Interlock routine tests and sets a */N/* selected bit under memory interlock. */N/* */#define lib$bbssi LIB$BBSSI #ifdef __NEW_STARLETunsigned int lib$bbssi( int *position, void *bit_zero_address);#else /* __OLD_STARLET */)unsigned int lib$bbssi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __I 3NITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$BUILD_NODESPEC */N/* */N/* Build a Node-Name Specification */N/* */N/* The Build a Node-Name Specification routine builds a node-name */N/* specification from the prima4ry node name. */N/* *//#define lib$build_nodespec LIB$BUILD_NODESPEC #ifdef __NEW_STARLET unsigned int lib$build_nodespec( void *primary_nodename, void *nodespec, __optional_params );#else /* __OLD_STARLET */2unsigned int lib$build_nodespec(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN5/* LIB$CALLG */N/* */N/* Call Routine with General Argument List (longword argument list) */N/* */Q/* The Call Routine with General Argument List routine calls a routine with */P/* an argument list specified as an array of longwords, the first of which */P/* is a count of 6the remaining longwords. LIB$CALLG is a callable version */N/* of the VAX CALLG instruction. */N/* */#define lib$callg LIB$CALLG #ifdef __NEW_STARLETunsigned int lib$callg( unsigned int *argument_list, int (*user_procedure)(void));#else /* __OLD_STARLET */)unsigned int lib$callg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CALLG_64 7 */N/* */N/* Call Routine with General Argument List (quadword argument list) */N/* */Q/* The Call Routine with General Argument List routine calls a routine with */P/* an argument list specified as an array of quadwords, the first of which */N/* is a count of the remaining quadwords. LI 8B$CALLG_64 is a callable */N/* version of the VAX CALLG instruction. */N/* */##define lib$callg_64 LIB$CALLG_64 #ifdef __NEW_STARLETunsigned int lib$callg_64(# unsigned __int64 argument_list [], int (*user_procedure)(void));#else /* __OLD_STARLET */,unsigned int lib$callg_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CHAR 9 */N/* */N/* Transform Byte to First Character of String */N/* */N/* The Transform Byte to First Character of String routine transforms a */O/* single 8-bit ASCII character to an ASCII string consisting of a single */R/* character followed by trailing spaces, if needed, to fill ou:t the string. */N/* The range of the input byte is 0 through 255. */N/* */#define lib$char LIB$CHAR #ifdef __NEW_STARLETunsigned int lib$char( void *one_character_string, unsigned char *ascii_code);#else /* __OLD_STARLET */(unsigned int lib$char(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#end;ifN/* LIB$COMPARE_NODENAME */N/* */N/* Compare Two Node Names */N/* */N/* The Compare Node Name routine compares two node names */N/* to see if they resolve to the same full name. */N/* < */3#define lib$compare_nodename LIB$COMPARE_NODENAME #ifdef __NEW_STARLET"unsigned int lib$compare_nodename( void *nodename1, void *nodename2," unsigned int *comparison_result);#else /* __OLD_STARLET */4unsigned int lib$compare_nodename(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$COMPARE_UID */N/* = */N/* Compare Two UIDs */N/* */N/* The Compare Two UIDs routine compares the contents */N/* of two UIDs for total lexical ordering. */N/* */)#define lib$compare_uid LIB$COMPARE_UID #ifdef __NEW_STARLETunsigned int l >ib$compare_uid( unsigned int first_uid [4], unsigned int second_uid [4], int *match_result);#else /* __OLD_STARLET *//unsigned int lib$compare_uid(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$COMPRESS_NODENAME */N/* */N/* Compress a Node Name to its Short Form */N/* ? */N/* The Compress a Node Name routine compresses a node name to an */N/* unambiguous short form usable within the naming environment */N/* where the compression is performed. */N/* */5#define lib$compress_nodename LIB$COMPRESS_NODENAME #ifdef __NEW_STARLET#unsigned int lib$compress_nodename( void *nodename, void *compressed_ @nodename, __optional_params);#else /* __OLD_STARLET */5unsigned int lib$compress_nodename(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$CONVERT_DATE_STRING */N/* */N/* Convert Date String to Quadword */N/* A */N/* The Convert Date String to Quadword routine converts an absolute date */N/* string into a VMS internal format date-time quadword. That is, given */N/* an input date/time string of a specified format, */N/* LIB$CONVERT_DATE_STRING converts this string to a VMS internal format */N/* time. */N/* B */9#define lib$convert_date_string LIB$CONVERT_DATE_STRING #ifdef __NEW_STARLET%unsigned int lib$convert_date_string( void *date_string, unsigned __int64 *date_time, __optional_params );#else /* __OLD_STARLET */7unsigned int lib$convert_date_string(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CRC */N/* C */N/* Calculate a Cyclic Redundancy Check (CRC) */N/* */N/* The Calculate a Cyclic Redundancy Check routine calculates the cyclic */N/* redundancy check (CRC) for a data stream. */N/* */#define lib$crc LIB$CRC #ifdef __NEW_STARLETunsigned int lib$crc( int crc_table [], D int *initial_crc, void *stream);#else /* __OLD_STARLET */'unsigned int lib$crc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CRC_TABLE */N/* */N/* Construct a Cyclic Redundancy Check (CRC) Table */N/* */N/* The Construct a Cyclic Redundancy Ch Eeck Table routine constructs a */N/* 16-longword table that uses a cyclic redundancy check polynomial */N/* specification as a bit mask. */N/* */%#define lib$crc_table LIB$CRC_TABLE #ifdef __NEW_STARLETint lib$crc_table(& unsigned int *polynomial_coefficient, int crc_table []);#else /* __OLD_STARLET */$int lib$crc_table(__unknown_params);!#endif /* #ifdFef __NEW_STARLET */N/* LIB$CREATE_DIR */N/* */N/* Create a Directory */N/* */N/* The Create a Directory routine creates a directory or subdirectory. */N/* */'#defGine lib$create_dir LIB$CREATE_DIR #ifdef __NEW_STARLETunsigned int lib$create_dir( void *device_directory_spec, __optional_params );#else /* __OLD_STARLET */.unsigned int lib$create_dir(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$CREATE_USER_VM_ZONE */N/* H*/N/* Create User-Defined Storage Zone */N/* */P/* The Create User-Defined Storage Zone routine creates a new user-defined */N/* storage zone. */N/* */9#define lib$create_user_vm_zone LIB$CREATE_USER_VM_ZONE #ifdef __NEW_STARLET%unsigned int lIib$create_user_vm_zone( unsigned int *zone_id, __optional_params );#else /* __OLD_STARLET */7unsigned int lib$create_user_vm_zone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$CREATE_USER_VM_ZONE_64 */N/* */N/* Create User-Defined Storage Zone J */N/* */P/* The Create User-Defined Storage Zone routine creates a new user-defined */N/* storage zone. */N/* */?#define lib$create_user_vm_zone_64 LIB$CREATE_USER_VM_ZONE_64 #ifdef __NEW_STARLET(unsigned int lib$create_user_vm_zone_64( unsigned __int64 *zone_id, _ K_optional_params );#else /* __OLD_STARLET */:unsigned int lib$create_user_vm_zone_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$CREATE_VM_ZONE */N/* */N/* Create a New Zone */N/* L */N/* The Create a New Zone routine creates a new storage zone according to */N/* specified arguments. */N/* *//#define lib$create_vm_zone LIB$CREATE_VM_ZONE #ifdef __NEW_STARLET unsigned int lib$create_vm_zone( unsigned int *zone_id, __optional_params );#else /* __OLD_STARLET */2unsigned int lib$create_vm_z Mone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$CREATE_VM_ZONE_64 */N/* */N/* Create a New Zone */N/* */N/* The Create a New Zone routine createNs a new storage zone according to */N/* specified arguments. */N/* */5#define lib$create_vm_zone_64 LIB$CREATE_VM_ZONE_64 #ifdef __NEW_STARLET#unsigned int lib$create_vm_zone_64( unsigned __int64 *zone_id, __optional_params );#else /* __OLD_STARLET */5unsigned int lib$create_vm_zone_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef _ O_INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$CRF_INS_KEY */N/* */N/* Insert Key in Cross-Reference Table */N/* */N/* The Insert Key in Cross-Reference Table routine inserts information */N/* about a key into a cross-rPeference table. */N/* */)#define lib$crf_ins_key LIB$CRF_INS_KEY #ifdef __NEW_STARLETint lib$crf_ins_key( int control_table [], void *key_string, int *symbol_value, unsigned int *flags);#else /* __OLD_STARLET */&int lib$crf_ins_key(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CRF_INS_REF */N/* Q */N/* Insert Reference to a Key in the Cross-Reference Table */N/* */N/* The Insert Reference to a Key in the Cross-Reference Table routine */N/* inserts a reference to a key in a cross-reference symbol table. */N/* */)#define lib$crf_ins_ref LIB$CRF_INS_RREF #ifdef __NEW_STARLETint lib$crf_ins_ref( int control_table [], int *longword_integer_key, void *reference_string,! int *longword_integer_reference, int *ref_definition_indicator);#else /* __OLD_STARLET */&int lib$crf_ins_ref(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CRF_OUTPUT */N/* */N/* Output Cross-Reference Table Inf Sormation */N/* */N/* The Output Cross-Reference Table Information routine extracts the */R/* information from the cross-reference tables and formats the output pages. */N/* */'#define lib$crf_output LIB$CRF_OUTPUT #ifdef __NEW_STARLETint lib$crf_output( int control_table [], int *output_line_width, T int *page1, int *page2, int *mode_indicator, int *delete_save_indicator);#else /* __OLD_STARLET */%int lib$crf_output(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$CURRENCY */N/* */N/* Get System Currency Symbol U */N/* */N/* The Get System Currency Symbol routine returns the system's currency */N/* symbol. */N/* */##define lib$currency LIB$CURRENCY #ifdef __NEW_STARLETunsigned int lib$currency( void *currency_string, __optional_params);#else /* __OLD_STARLET */,unsigned intV lib$currency(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVTS_FROM_INTERNAL_TIME */N/* */N/* Convert Internal Time to External Time (S-Floating Point Value) */N/* */N/* The Convert Internal Time to External Time (S-Floating Point Value) */N/* routine converts a delta inter Wnal VMS system time into an external */N/* S-floating time. */N/* */A#define lib$cvts_from_internal_time LIB$CVTS_FROM_INTERNAL_TIME #ifdef __NEW_STARLET)unsigned int lib$cvts_from_internal_time( unsigned int *operation, float *resultant_time, unsigned __int64 *input_time);#else /* __OLD_STARLET */;unsigned int lib$cvts_from_internal_time(__unknoXwn_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVTF_FROM_INTERNAL_TIME */N/* */N/* Convert Internal Time to External Time (F-Floating Point Value) */N/* */N/* The Convert Internal Time to External Time (F-Floating Point Value) */N/* routine converts a delta internal VMS system time Yinto an external */N/* F-floating time. */N/* */A#define lib$cvtf_from_internal_time LIB$CVTF_FROM_INTERNAL_TIME #ifdef __NEW_STARLET)unsigned int lib$cvtf_from_internal_time( unsigned int *operation, float *resultant_time, unsigned __int64 *input_time);#else /* __OLD_STARLET */;unsigned int lib$cvtf_from_internal_time(__unknown_params);!#endifZ /* #ifdef __NEW_STARLET */N/* LIB$CVTS_TO_INTERNAL_TIME */N/* */N/* Convert External Time to Internal Time (S-Floating Point Value) */N/* */N/* The Convert External Time to Internal Time (S-Floating Point Value) */N/* routine converts an external time interval into a VMS internal format [*/N/* S-floating delta time. */N/* */N/* */=#define lib$cvts_to_internal_time LIB$CVTS_TO_INTERNAL_TIME #ifdef __NEW_STARLET'unsigned int lib$cvts_to_internal_time( unsigned int *operation, float *input_time,# unsigned __int64 *resultant_time);#else /* __OLD_STARLET */9unsigned int l\ib$cvts_to_internal_time(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVTF_TO_INTERNAL_TIME */N/* */N/* Convert External Time to Internal Time (F-Floating Point Value) */N/* */N/* The Convert External Time to Internal Time (F-Floating Point Value) */N/* routine converts a ]n external time interval into a VMS internal format */N/* F-floating delta time. */N/* */=#define lib$cvtf_to_internal_time LIB$CVTF_TO_INTERNAL_TIME #ifdef __NEW_STARLET'unsigned int lib$cvtf_to_internal_time( unsigned int *operation, float *input_time,# unsigned __int64 *resultant_time);#else /* __OLD_STARLET */9unsigned int lib$cvtf_to_internal_time(__u^nknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVT_DTB */N/* */N/* Convert Numeric Text to Binary */N/* */N/* The Convert Numeric Text to Binary routine returns a 32-bit binary */N/* representation of the ASCII text string repres_entation of a decimal */N/* number. */N/* */!#define lib$cvt_dtb LIB$CVT_DTB #ifdef __NEW_STARLETunsigned int lib$cvt_dtb( int byte_count, char *numeric_string, int *result);#else /* __OLD_STARLET */+unsigned int lib$cvt_dtb(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVT_DTB_64 ` */N/* */N/* Convert Numeric Text to Binary */N/* */N/* The Convert Numeric Text to Binary routine returns a 64-bit binary */N/* representation of the ASCII text string representation of a decimal */N/* number. */N/* a */'#define lib$cvt_dtb_64 LIB$CVT_DTB_64 #ifdef __NEW_STARLETunsigned int lib$cvt_dtb_64( int byte_count, char *numeric_string, __int64 *result);#else /* __OLD_STARLET */.unsigned int lib$cvt_dtb_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVT_DX_DX */N/* */Nb/* General Data Type Conversion Routine */N/* */P/* The General Data Type Conversion routine converts a VMS standard atomic */Q/* or string datum described by a source descriptor to another VMS standard */N/* atomic or string datum described by a destination descriptor. This */N/* conversion is supported over a subset of the VMS standard data types. */N/* c */%#define lib$cvt_dx_dx LIB$CVT_DX_DX #ifdef __NEW_STARLETunsigned int lib$cvt_dx_dx( unsigned int *source_item, unsigned int *destination_item, __optional_params);#else /* __OLD_STARLET */-unsigned int lib$cvt_dx_dx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVT_FROM_INTERNAL_TIME */N/* d */N/* Convert Internal Time to External Time */N/* */P/* The Convert Internal Time to External Time routine converts an internal */N/* VMS system time (either absolute or delta) into an external time. */N/* */?#define lib$cvt_from_internal_time LIB$CVT_FROM_INTERNAL_TIME #ifdef __NEW_STARLET(unsi egned int lib$cvt_from_internal_time( unsigned int *operation, unsigned int *resultant_time, __optional_params);#else /* __OLD_STARLET */:unsigned int lib$cvt_from_internal_time(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVT_HTB */N/* */N/* Convert Numeric Text to Binary */N/* f */N/* The Convert Numeric Text to Binary routine returns a 32-bit binary */P/* representation of the ASCII text string representation of a hexadecimal */N/* number. */N/* */!#define lib$cvt_htb LIB$CVT_HTB #ifdef __NEW_STARLETunsigned int lib$cvt_htb( int byte_count, char *numeric_str ging, int *result);#else /* __OLD_STARLET */+unsigned int lib$cvt_htb(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVT_HTB_64 */N/* */N/* Convert Numeric Text to Binary */N/* */N/* The Convert Numeric Text to Binary routine returhns a 64-bit binary */P/* representation of the ASCII text string representation of a hexadecimal */N/* number. */N/* */'#define lib$cvt_htb_64 LIB$CVT_HTB_64 #ifdef __NEW_STARLETunsigned int lib$cvt_htb_64( int byte_count, char *numeric_string, __int64 *result);#else /* __OLD_STARLET */.unsigned int lib$cvt_htb_64(__unknown_params);!#eindif /* #ifdef __NEW_STARLET */N/* LIB$CVT_OTB */N/* */N/* Convert Numeric Text to Binary */N/* */N/* The Convert Numeric Text to Binary routine returns a 32-bit binary */N/* representation of the ASCII text string representation of an octalj */N/* number. */N/* */!#define lib$cvt_otb LIB$CVT_OTB #ifdef __NEW_STARLETunsigned int lib$cvt_otb( int byte_count, char *numeric_string, int *result);#else /* __OLD_STARLET */+unsigned int lib$cvt_otb(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVT_OTB_64 */Nk/* */N/* Convert Numeric Text to Binary */N/* */N/* The Convert Numeric Text to Binary routine returns a 64-bit binary */N/* representation of the ASCII text string representation of an octal */N/* number. */N/* l */'#define lib$cvt_otb_64 LIB$CVT_OTB_64 #ifdef __NEW_STARLETunsigned int lib$cvt_otb_64( int byte_count, char *numeric_string, __int64 *result);#else /* __OLD_STARLET */.unsigned int lib$cvt_otb_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVT_TO_INTERNAL_TIME */N/* */N/* Convert Extern mal Time to Internal Time */N/* */N/* The Convert External Time to Internal Time routine converts an */N/* external time interval into a VMS internal format delta time. */N/* */;#define lib$cvt_to_internal_time LIB$CVT_TO_INTERNAL_TIME #ifdef __NEW_STARLET&unsigned int lib$cvt_to_internal_time( n unsigned int *operation, int *input_time,# unsigned __int64 *resultant_time);#else /* __OLD_STARLET */8unsigned int lib$cvt_to_internal_time(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVT_VECTIM */N/* */N/* Convert Seven-Word Vector to Internal Time */N/* o */N/* The Convert Seven-Word Vector to Internal Time routine converts a */N/* seven-word vector into a VMS internal format delta or absolute time. */N/* */'#define lib$cvt_vectim LIB$CVT_VECTIM #ifdef __NEW_STARLETunsigned int lib$cvt_vectim(" unsigned short int input_time [],# unsigned __int64 *resultant_time);#else /* __OLD_STARLET */.unsigned int lib$cvt_vectim(__unknown_parapms);!#endif /* #ifdef __NEW_STARLET */N/* LIB$DATE_TIME */N/* */N/* Date and Time Returned as a String */N/* */N/* The Date and Time Returned as a String routine returns the VMS system */N/* date and time in the semantics of a user-provided string. q */N/* */%#define lib$date_time LIB$DATE_TIME #ifdef __NEW_STARLETunsigned int lib$date_time( void *date_time_string);#else /* __OLD_STARLET */-unsigned int lib$date_time(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$DAY */N/* */N/* Day Numb rer Returned as a Longword Integer */N/* */Q/* The Day Number Returned as a Longword Integer routine returns the number */O/* of days since the system zero date of November 17, 1858, or the number */N/* of days from November 17, 1858, to a user-supplied date. */N/* */#define lib$day LIB$DAY #i sfdef __NEW_STARLETunsigned int lib$day( int *number_of_days, __optional_params );#else /* __OLD_STARLET */'unsigned int lib$day(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$DAY_OF_WEEK */N/* */N/* Show Numeric Day of Week */N/* t */Q/* The Show Numeric Day of Week routine returns the numeric day of the week */P/* for an input time value. If 0 is the input time value, the current day */Q/* of the week is returned. The days are numbered 1 through 7, with Monday */N/* as day 1 and Sunday as day 7. */N/* */)#define lib$day_of_week LIB$DAY_OF_WEEK #ifdef __NEW_STARLETunsigned int u lib$day_of_week( unsigned __int64 *user_time, unsigned int *day_number);#else /* __OLD_STARLET *//unsigned int lib$day_of_week(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$DECODE_FAULT */N/* */N/* Decode Instruction Stream During Fault v */N/* */R/* The Decode Instruction Stream During Fault routine is a tool for building */N/* condition handlers that process instruction fault exceptions. It is */N/* called from a condition handler. */N/* */N/* This routine is not available to native Alpha VMS programs, but is */N/* wavailable to translated VAX images. */N/* */+#define lib$decode_fault LIB$DECODE_FAULT #ifdef __NEW_STARLETunsigned int lib$decode_fault( unsigned int *signal_arguments,# unsigned int *mechanism_arguments, int (*user_procedure)(void), __optional_params );#else /* __OLD_STARLET */0unsigned int lib$decode_fault(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* x LIB$DEC_OVER */N/* */N/* Enable or Disable Decimal Overflow Detection */N/* */N/* The Enable or Disable Decimal Overflow Detection routine enables or */P/* disables decimal overflow detection for the calling routine activation. */N/* The previous decimal o yverflow setting is returned. */N/* */N/* This routine is available on Alpha VMS systems in translated form */N/* and is applicable to translated VAX images only. */N/* */##define lib$dec_over LIB$DEC_OVER #ifdef __NEW_STARLETunsigned int lib$dec_over( unsigned int *new_setting);#else /* __O zLD_STARLET */,unsigned int lib$dec_over(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$DELETE_FILE */N/* */N/* Delete One or More Files */N/* */N/* { The Delete One or More Files routine deletes one or more files. The */N/* specification of the file(s) to be deleted may include wildcards. */N/* LIB$DELETE_FILE is similar in function to the DCL command DELETE. */N/* */)#define lib$delete_file LIB$DELETE_FILE #ifdef __NEW_STARLETunsigned int lib$delete_file( void *filespec, __optional_params );#else /* __OLD_STARLET *//unsigned int lib|$delete_file(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$DELETE_LOGICAL */N/* */N/* Delete Logical Name */N/* */O/* The Delete Logical Name routine requests the calling process's Command */O/* Language Interpreter (CLI) t }o delete a supervisor-mode process logical */P/* name. LIB$DELETE_LOGICAL provides the same function as the DCL command */N/* DEASSIGN. */N/* *//#define lib$delete_logical LIB$DELETE_LOGICAL #ifdef __NEW_STARLET unsigned int lib$delete_logical( void *logical_name, __optional_params);#else /* __OLD_STARLET */2unsigned int lib$delete_logical(__~unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$DELETE_SYMBOL */N/* */N/* Delete CLI Symbol */N/* */N/* The Delete CLI Symbol routine requests the calling process's Command */N/* Language Interpreter (CLI) to delete an existing CLI symbol. */N/* */-#define lib$delete_symbol LIB$DELETE_SYMBOL #ifdef __NEW_STARLETunsigned int lib$delete_symbol( void *symbol, __optional_params);#else /* __OLD_STARLET */1unsigned int lib$delete_symbol(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$DELETE_VM_ZONE  */N/* */N/* Delete Virtual Memory Zone */N/* */N/* The Delete Virtual Memory Zone routine deletes a zone and */N/* returns all pages on VAX or pagelets on Alpha owned by the */N/* zone to the processwide page pool. */N/* *//#define lib$delete_vm_zone LIB$DELETE_VM_ZONE #ifdef __NEW_STARLET unsigned int lib$delete_vm_zone( unsigned int *zone_id);#else /* __OLD_STARLET */2unsigned int lib$delete_vm_zone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$DELETE_VM_ZONE_64 */N/*  */N/* Delete Virtual Memory Zone */N/* */N/* The Delete Virtual Memory Zone routine deletes a zone and */N/* returns all pages on VAX or pagelets on Alpha owned by the */N/* zone to the processwide page pool. */N/*  */5#define lib$delete_vm_zone_64 LIB$DELETE_VM_ZONE_64 #ifdef __NEW_STARLET#unsigned int lib$delete_vm_zone_64( unsigned __int64 *zone_id);#else /* __OLD_STARLET */5unsigned int lib$delete_vm_zone_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$DIGIT_SEP */N/*  */N/* Get Digit Separator Symbol */N/* */N/* The Get Digit Separator Symbol routine returns the system's digit */N/* separator symbol. */N/* */%#define lib$digit_sep LIB$DIGIT_SEP #ifdef __NEW_STARLETunsigned int lib$digit_sep( void *digit_separator_string, __optional_params);#else /* __OLD_STARLET */-unsigned int lib$digit_sep(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$DISABLE_CTRL */N/* */N/* Disable CLI Interception of Control Characters */N/* */P/* The Disable CLI Interception of Control Characters routine requests the */N/* calling process's Command Language Interpreter (CLI) to not intercept */R/* the selected control characters when they are typed during an interactive */N/* terminal session. LIB$DISABLE_CTRL provides the same function as the */N/* DCL command SET NOCONTROL.  */N/* */+#define lib$disable_ctrl LIB$DISABLE_CTRL #ifdef __NEW_STARLETunsigned int lib$disable_ctrl( unsigned int *disable_mask, __optional_params);#else /* __OLD_STARLET */0unsigned int lib$disable_ctrl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$DO_COMMAND */N/*  */N/* Execute Command */N/* */N/* The Execute Command routine stops program execution and directs the */N/* Command Language Interpreter to execute a command which you supply as */N/* the argument. If successful, LIB$DO_COMMAND does not return control */N/* to the calling program. Instead, LIB$DO_COMMAND begins execution of */N/* the specified command. If you want control to return to the caller, */N/* use LIB$SPAWN instead. */N/* */'#define lib$do_command LIB$DO_COMMAND #ifdef __NEW_STARLETunsigned int lib$do_command( void *command_string);#else /* __OLD_STARLET */.unsigned int lib$do_command(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$EDIV  */N/* */N/* Extended-Precision Divide */N/* */N/* The Extended-Precision Divide routine performs extended-precision */N/* division. LIB$EDIV makes the VAX EDIV instruction available as a */N/* callable routine.  */N/* */#define lib$ediv LIB$EDIV #ifdef __NEW_STARLETunsigned int lib$ediv( int *longword_integer_divisor,$ __int64 *quadword_integer_dividend, int *longword_integer_quotient, int *remainder);#else /* __OLD_STARLET */(unsigned int lib$ediv(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$EMODD */N/*  */N/* Extended Multiply and Integerize Routines for D-Floating Point Values */N/* */O/* The Extended Multiply and Integerize routine (D-Floating Point Values) */O/* allows higher-level language users to perform accurate range reduction */N/* of D-floating arguments. */N/*  */N/* D-floating point values are not supported in full precision on Alpha */O/* systems. They are precise to 56 bits on VAX systems, 53 bits on Alpha */N/* systems. */N/* */#define lib$emodd LIB$EMODD #ifdef __NEW_STARLETunsigned int lib$emodd(# double *floating_point_multiplier,% unsigned char *multipli er_extension,% double *floating_point_multiplicand, int *integer_portion, double *fractional_portion);#else /* __OLD_STARLET */)unsigned int lib$emodd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$EMODT */N/* */N/* Extended Multiply and Integerize Routines for T-Floating Point Values */N/*  */O/* The Extended Multiply and Integerize routine (T-Floating Point Values) */O/* allows higher-level language users to perform accurate range reduction */N/* of T-floating arguments. */N/* */N/* */#define lib$emodt LIB$EMODT #ifdef __NEW_STARLETunsigned i nt lib$emodt(# double *floating_point_multiplier,% unsigned char *multiplier_extension,% double *floating_point_multiplicand, int *integer_portion, double *fractional_portion);#else /* __OLD_STARLET */)unsigned int lib$emodt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$EMODS */N/* */N/* Extended Multiply and Integerize Routines for S-Floating Point Values */N/* */O/* The Extended Multiply and Integerize routine (S-Floating Point Values) */O/* allows higher-level language users to perform accurate range reduction */N/* of S-floating arguments. */N/* */#define lib$emods LIB$EMODS #ifdef __NEW_STARLETunsigned int  lib$emods(" float *floating_point_multiplier,% unsigned char *multiplier_extension,$ float *floating_point_multiplicand, int *integer_portion, float *fractional_portion);#else /* __OLD_STARLET */)unsigned int lib$emods(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$EMODF */N/* */N/* Extended Multiply and Integerize Routines for F-Fl oating Point Values */N/* */O/* The Extended Multiply and Integerize routine (F-Floating Point Values) */O/* allows higher-level language users to perform accurate range reduction */N/* of F-floating arguments. */N/* */#define lib$emodf LIB$EMODF #ifdef __NEW_STARLETunsigned int lib$emo df(" float *floating_point_multiplier,% unsigned char *multiplier_extension,$ float *floating_point_multiplicand, int *integer_portion, float *fractional_portion);#else /* __OLD_STARLET */)unsigned int lib$emodf(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$EMODG */N/* */N/* Extended Multiply and Integerize Routines for G-Floating P oint Values */N/* */O/* The Extended Multiply and Integerize routine (G-Floating Point Values) */O/* allows higher-level language users to perform accurate range reduction */N/* of G-floating arguments. */N/* */#define lib$emodg LIB$EMODG #ifdef __NEW_STARLETunsigned int lib$emodg(# d ouble *floating_point_multiplier,* unsigned short int *multiplier_extension,% double *floating_point_multiplicand, int *integer_portion, double *fractional_portion);#else /* __OLD_STARLET */)unsigned int lib$emodg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$EMODH */N/* */N/* Extended Multiply and Integerize Routines for H-Floating  Point Values */N/* */N/* On VAX VMS, the Extended Multiply and Integerize routine (H-Floating */N/* Point Values) allows higher-level language users to perform accurate */N/* range reduction of H-floating arguments. */N/* */#define lib$emodh LIB$EMODH #ifdef __NEW_STARLETunsigned int lib$emodh(# int  floating_point_multiplier [4],* unsigned short int *multiplier_extension,% int floating_point_multiplicand [4], int *integer_portion, int fractional_portion [4]);#else /* __OLD_STARLET */)unsigned int lib$emodh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$EMUL */N/* */N/* Extended-Precision Multiply  */N/* */N/* The Extended-Precision Multiply routine performs extended-precision */N/* multiplication. LIB$EMUL makes the VAX EMUL instruction available as */N/* a callable routine. */N/* */#define lib$emul LIB$EMUL #ifdef __NEW_STARLETunsigned int lib$emul(" int *long word_integer_multiplier,$ int *longword_integer_multiplicand, int *addend, __int64 *product);#else /* __OLD_STARLET */(unsigned int lib$emul(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$ENABLE_CTRL */N/* */N/* Enable CLI Interception of Control Characters */N/*  */O/* The Enable CLI Interception of Control Characters routine requests the */N/* calling process's Command Language Interpreter (CLI) to resume */N/* interception of the selected control characters when they are typed */N/* during an interactive terminal session. LIB$ENABLE_CTRL provides the */N/* same function as the DCL command SET CONTROL. */N/* */)#d efine lib$enable_ctrl LIB$ENABLE_CTRL #ifdef __NEW_STARLETunsigned int lib$enable_ctrl( unsigned int *enable_mask, __optional_params);#else /* __OLD_STARLET *//unsigned int lib$enable_ctrl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$ESTABLISH */N/* */N/* Establish a Condition Handler */N/* */N/* The Establish a Condition Handler routine moves the address of a */N/* condition handling routine (which can be a user-written or a library */R/* routine) to longword 0 of the stack frame of the caller of LIB$ESTABLISH. */N/* */N/* ENTRY lib$establish ALIAS $lib_establish PARAMETER ( */N/* ADDRESS (ENTRY)  NAMED new_handler IN */N/* TYPENAME procedure VALUE ) */N/* RETURNS ADDRESS (ENTRY) NAMED RESULT TYPENAME routine; */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$EXPAND_NODENAME */N/* */N/* Expand a Node Name to its Full Name equivalent */N/* */N/* The Expand a Node Name to its Full Name equivalent routine */N/* expands a node name to its full name equivalent. */N/* */1#define lib$expand_nodename LIB$EXPAND_NODENAME #ifdef __NEW_STARLET!unsigned int lib$expand_nodename( void *nodename, void *fullname,  __optional_params);#else /* __OLD_STARLET */3unsigned int lib$expand_nodename(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$EXTV */N/* */N/* Extract a Field and Sign-Extend */N/*  */N/* The Extract a Field and Sign-Extend routine returns a sign-extended */O/* longword field that has been extracted from the specified variable bit */P/* field. LIB$EXTV makes the VAX EXTV instruction available as a callable */N/* routine. */N/* */#define lib$extv LIB$EXTV #ifdef __NEW_STARLET int li b$extv( int *position, unsigned char *size, void *base_address);#else /* __OLD_STARLET */int lib$extv(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$EXTZV */N/* */N/* Extract a Zero-Extended Field */N/* */N/* The Ex tract a Zero-Extended Field routine returns a longword */N/* zero-extended field that has been extracted from the specified */N/* variable bit field. LIB$EXTZV makes the VAX EXTZV instruction */N/* available as a callable routine. */N/* */#define lib$extzv LIB$EXTZV #ifdef __NEW_STARLETint lib$extzv( int *position, unsigned char *size, v oid *base_address);#else /* __OLD_STARLET */ int lib$extzv(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FFC */N/* */N/* Find First Clear or Set Bit */N/* */O/* The Find First Clear or Set Bit routines search the field specified by */N/* the start position, size, and base for the first clear or set bit. */P/* LIB$FFC and LIB$FFS make the VAX FFC and VAX FFS instructions available */N/* as callable routines. */N/* */N/* On Alpha VMS systems, Alpha instructions perform the */N/* equivalent operations. */N/*  */#define lib$ffc LIB$FFC #ifdef __NEW_STARLETunsigned int lib$ffc( int *position, unsigned char *size, void *base, int *find_position);#else /* __OLD_STARLET */'unsigned int lib$ffc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FFS */N/* */N/* Find First Clear or Set Bit */N/* */O/* The Find First Clear or Set Bit routines search the field specified by */N/* the start position, size, and base for the first clear or set bit. */P/* LIB$FFC and LIB$FFS make the VAX FFC and VAX FFS instructions available */N/* as callable routines. */N/*  */N/* On Alpha VMS systems, Alpha instructions perform the */N/* equivalent operations. */N/* */#define lib$ffs LIB$FFS #ifdef __NEW_STARLETunsigned int lib$ffs( int *position, unsigned char *size, void *base, int *find_position);#else /* __OLD_STARLET */'unsigned int lib$ffs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FID_TO_NAME */N/* */N/* Convert Device and File ID to File Specification */N/* */P/* The Convert Device and File ID to File Specification routine converts a */N/* disk device name and file identifier to a file specification. */N/* */)#define lib$fid_to_name LIB$FID_TO_NAME #ifdef __NEW_STARLETunsigned int lib$fid_to_name( void *device_name, unsigned short int file_id [], void *filespec, __optional_params );#else /* __OLD_STARLET *//unsigned int lib$fid_to_name(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FILE_SCAN */N/*  */N/* File Scan */N/* */N/* The File Scan routine searches an area, such as a directory, for all */N/* files matching the file specification given and transfers program */N/* execution to the specified user-written routine. Wildcards are */N/* acceptable. An action routine is called for each file and/or error */N/* found. LIB$FILE_SCAN allows the search sequence to continue even if */N/* an error occurs while processing a particular file. */N/* CP120606 - Changed fab type from unsigned int * to struct _fabdef * */N/* and data types of arguments to user_success_procedure and */N/* user_error_procedure from void to __unknown_params */N/*  */%#define lib$file_scan LIB$FILE_SCAN  9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETunsigned int lib$file_scan( struct _fabdef *fab,1 int (*user_success_procedure)(__unknown_params),/ int (*user_error_procedure)(__unknown_params), __optional_params);#else /* __OLD_STARLET */-unsigned int lib$file_scan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FILE_SCAN_END */N/* */N/* End-of-File Scan */N/* */O/* The End-of-File Scan routine is called after each sequence of calls to */Q/* LIB$FILE_SCAN. LIB$FILE_SCAN_END deallocates any saved Record Management */R/* Service (RMS) context an d/or deallocates the virtual memory that had been */N/* allocated for holding the related file specification information. */N/* CP - Changed fab type from unsigned int * to struct _fabdef * */N/* */-#define lib$file_scan_end LIB$FILE_SCAN_END  9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETunsigned int lib$f ile_scan_end( __optional_params );#else /* __OLD_STARLET */1unsigned int lib$file_scan_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FIND_FILE */N/* */N/* Find File */N/* */O/* The Find File routine is called with a wildcard file specification for */O/* which it searches. LIB$FIND_FILE returns all file specifications that */N/* satisfy that wildcard file specification. */N/* */%#define lib$find_file LIB$FIND_FILE #ifdef __NEW_STARLETunsigned int lib$find_file( void *filespec, void *resultant_filespec, unsigned int *context, __optional_params );#else /* __OLD_S TARLET */-unsigned int lib$find_file(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FIND_FILE_END */N/* */N/* End of Find File */N/* */Q/* The End of Find File routine is called once after each sequence of calls */N/* to LIB$FIND_FILE. LIB$FIND_FILE_END deallocates any saved Record */Q/* Management Service (RMS) context and deallocates the virtual memory used */N/* to hold the allocated context block. */N/* */-#define lib$find_file_end LIB$FIND_FILE_END #ifdef __NEW_STARLETunsigned int lib$find_file_end( unsigned int *context);#else /* __OLD_STARLET */1unsigned int lib$find_file_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FIND_IMAGE_SYMBOL */N/* */N/* Find Universal Symbol in Shareable Image File */N/* */N/* The Find Universal Symbol in Shareable Image File routine reads */N/* universal symbols from the shareable image file. This routine then */N/* dynamically activates a shareable image into the P0 address space of */N/* a process. */N/* */5#define lib$find_image_symbol LIB$FIND_IMAGE_SYMBOL #ifdef __NEW_STARLET#unsigned int lib$find_image_symbol( void *filename, void *symbol, int *symbol_value, __optional_params );#else /* __OLD_STARLET */5 unsigned int lib$find_image_symbol(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$FIND_VM_ZONE */N/* */N/* Return the Next Valid Zone Identifier */N/* */N/* Th e Return the Next Valid Zone Identifier routine returns the */N/* zone identifier of the next valid zone in the heap management */N/* database. */N/* */+#define lib$find_vm_zone LIB$FIND_VM_ZONE #ifdef __NEW_STARLETunsigned int lib$find_vm_zone( unsigned int *context, unsigned int *zone_id);#else /* __OLD_STARLET */0unsigned i nt lib$find_vm_zone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$FIND_VM_ZONE_64 */N/* */N/* Return the Next Valid Zone Identifier */N/* */N/* The Return the Next Valid Zone Identifier routine returns the */N/* zone identifier of the next valid zone in the heap management */N/* database. */N/* */1#define lib$find_vm_zone_64 LIB$FIND_VM_ZONE_64 #ifdef __NEW_STARLET!unsigned int lib$find_vm_zone_64( unsigned __int64 *context, unsigned __int64 *zone_id);#else /* __OLD_STARLET */3unsigned i nt lib$find_vm_zone_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$FIT_NODENAME */N/* */N/* Fit a Node Name into an output field */N/* */N/* The Fit a Node Name into an output field routine */N/* fits a Node Name into an output field. */N/* */+#define lib$fit_nodename LIB$FIT_NODENAME #ifdef __NEW_STARLETunsigned int lib$fit_nodename( void *nodename, void *output_buffer, __optional_params );#else /* __OLD_STARLET */0unsigned int lib$fit_nodename(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FIXUP_FLT */N/* */N/* Fix Floating Reserved Operand */N/* */P/* The Fix Floating Reserved Operand routine finds the reserved operand of */P/* any F-floating, D-floating, G-floating, or H-floating instruction (with */N/* some exceptions) after a reserved operand fault has been signaled. */N/* LIB$FIXUP_FLT changes the reserved operand from --0.0 to the value of */N/* the new-operand argument, if present; or to +0.0 if new-operand is */N/* absent. */N/* */N/* This routine is available on Alpha VMS systems in translated form */N/* and is applicable to translated VAX images only. */N/* */%#define lib$fixup_flt LIB$FIXUP_FLT #ifdef __NEW_STARLETunsigned int lib$fixup_flt( unsigned int *signal_arguments,# unsigned int *mechanism_arguments, __optional_params);#else /* __OLD_STARLET */-unsigned int lib$fixup_flt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FLT_UNDER */N/*  */N/* Floating-Point Underflow Detection */N/* */N/* The Floating-Point Underflow Detection routine enables or disables */O/* floating-point underflow detection for the calling routine activation. */N/* The previous setting is returned as a function value. */N/*  */N/* This routine is available on Alpha VMS systems in translated form */N/* and is applicable to translated VAX images only. */N/* */%#define lib$flt_under LIB$FLT_UNDER #ifdef __NEW_STARLETunsigned int lib$flt_under( unsigned int *new_setting);#else /* __OLD_STARLET */-unsigned int lib$flt_under(__unknown_params);!#endif /* #ifdef __N EW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$FORMAT_DATE_TIME */N/* */N/* Format Date and/or Time */N/* */R/* The Format Date and/or Time routine allows the user to select at run time */N/* a specific output language and format for a date or time, or both. */N/* */3#define lib$format_date_time LIB$FORMAT_DATE_TIME #ifdef __NEW_STARLET"unsigned int lib$format_date_time( void *date_string, __optional_params );#else /* __OLD_STARLET */4unsigned int lib$format_date_time(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_siz e __short#endifN/* LIB$FORMAT_SOGW_PROT */N/* */N/* Format Protection Mask */N/* */N/* The Format Protection Mask routine translates a protection mask */N/* into a formatted string. */N/*  */3#define lib$format_sogw_prot LIB$FORMAT_SOGW_PROT #ifdef __NEW_STARLET"unsigned int lib$format_sogw_prot(% unsigned short int *protection_mask," unsigned __int64 access_names [],% unsigned __int64 ownership_names [], void *ownership_separator, void *list_separator, void *protection_string, __optional_params);#else /* __OLD_STARLET */4unsigned int lib$format_sogw_prot(__unknown_params);!#endif /* #ifd ef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$FREE_DATE_TIME_CONTEXT */N/* */P/* Free the Context Area Used When Formatting Dates and Times for Input or */N/* Output */N/* */ Q/* The Free the Context Area Used When Formatting Dates and Times for Input */O/* or Output routine frees the virtual memory associated with the context */N/* area used by the date/time input and output Formatting Routines. */N/* */?#define lib$free_date_time_context LIB$FREE_DATE_TIME_CONTEXT #ifdef __NEW_STARLET(unsigned int lib$free_date_time_context( __optional_params);#else /* __OLD_STARLET  */:unsigned int lib$free_date_time_context(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FREE_EF */N/* */N/* Free Event Flag */N/* */R/* The Free Event Flag routine frees a local event flag previously allocated */N /* by LIB$GET_EF. LIB$FREE_EF is the complement of LIB$GET_EF. */N/* */!#define lib$free_ef LIB$FREE_EF #ifdef __NEW_STARLETunsigned int lib$free_ef(" unsigned int *event_flag_number);#else /* __OLD_STARLET */+unsigned int lib$free_ef(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FREE_LUN */N/*  */N/* Free Logical Unit Number */N/* */N/* The Free Logical Unit Number routine releases a logical unit number */Q/* allocated by LIB$GET_LUN to the pool of available numbers. LIB$FREE_LUN */N/* is the complement of LIB$GET_LUN. */N/*  */##define lib$free_lun LIB$FREE_LUN #ifdef __NEW_STARLETunsigned int lib$free_lun( int *logical_unit_number);#else /* __OLD_STARLET */,unsigned int lib$free_lun(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$FREE_TIMER */N/* */N/* Free Timer Storage */N/*  */N/* The Free Timer Storage routine frees the storage allocated */N/* by LIB$INIT_TIMER. */N/* */'#define lib$free_timer LIB$FREE_TIMER #ifdef __NEW_STARLETunsigned int lib$free_timer( void *handle_address);#else /* __OLD_STARLET */.unsigned int lib$free_timer(__unknown_pa rams);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$FREE_VM */N/* */N/* Free Virtual Memory from Program Region */N/* */N/* The Free Virtual Memory from Program Region routine deallocates an */P/* entire block of contiguous bytes that were allocated by a previous call */N/* to LIB$GET_VM. The arguments passed are the same as for LIB$GET_VM. */N/* */!#define lib$free_vm LIB$FREE_VM #ifdef __NEW_STARLETunsigned int lib$free_vm( int *number_of_bytes, void *base_address, __optional_params);#else /* __OLD_STARLET */+unsigned int lib$free_vm(__unknown_params);!#endif / * #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$FREE_VM_64 */N/* */N/* Free Virtual Memory from Program Region */N/* */N/* The Free Virtual Memory from Program Region routine deallocates an  */P/* entire block of contiguous bytes that were allocated by a previous call */N/* to LIB$GET_VM_64. The arguments passed are the same as for */N/* LIB$GET_VM_64. */N/* */'#define lib$free_vm_64 LIB$FREE_VM_64 #ifdef __NEW_STARLETunsigned int lib$free_vm_64( __int64 *number_of_bytes, void *(*(base_address)), __optional_params);#e lse /* __OLD_STARLET */.unsigned int lib$free_vm_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$FREE_VM_PAGE */N/* */N/* Free Virtual Memory Page */N/*  */N/* The Free Virtual Memory Page routine deallocates a block of */N/* contiguous pages on VAX or pagelets on Alpha that were allocated */N/* by previous calls to LIB$GET_VM_PAGE. */N/* */+#define lib$free_vm_page LIB$FREE_VM_PAGE #ifdef __NEW_STARLETunsigned int lib$free_vm_page( int *number_of_pages, void *base_address);#else /* __OLD_STARLET * /0unsigned int lib$free_vm_page(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$FREE_VM_PAGE_64 */N/* */N/* Free Virtual Memory Page */N/* */N/* The Fr ee Virtual Memory Page routine deallocates a block of */N/* contiguous pages on VAX or pagelets on Alpha that were allocated */N/* by previous calls to LIB$GET_VM_PAGE_64. */N/* */1#define lib$free_vm_page_64 LIB$FREE_VM_PAGE_64 #ifdef __NEW_STARLET!unsigned int lib$free_vm_page_64( __int64 *number_of_pages, void *(*(base_address)));#else /* __OLD_STARLET */3unsigned int lib$free_vm_page_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GETDVI */N/* */N/* Get Device/Volume Information */N/* */R/* The Get Device/Volume Information routine provides a simplified interface */Q/* to the  $GETDVI system service. It returns information about the primary */N/* and secondary device characteristics of an I/O device. The calling */N/* process need not have a channel assigned to the device about which it */N/* wants information. */N/* */#define lib$getdvi LIB$GETDVI #ifdef __NEW_STARLETunsigned int lib$getdvi( int *item_code, __optiona l_params );#else /* __OLD_STARLET */*unsigned int lib$getdvi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GETJPI */N/* */N/* Get Job/Process Information */N/* */P/* The Get Job/Process Information routine provides a simplified interface */N/* to the $GETJPI system service. It provides accounting, status, and */N/* identification information about a specified process. */N/* LIB$GETJPI obtains only one item of information in a single call. */N/* */#define lib$getjpi LIB$GETJPI #ifdef __NEW_STARLETunsigned int lib$getjpi( int *item_code, __optional_params );#else /* __OLD_STARLET */*unsigned int lib$getjpi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GETQUI */N/* */N/* Get Queue Information */N/* */Q/* The Get Queue Information routine provides a simplified interface to the */N/* $GETQUI system service. It provides queue, job, file, characteristic, */N/* and form information about a specified process. */N/* LIB$GETQUI obtains only one item of information in a single call. */N/* */#define lib$getqui LIB$GETQUI #ifdef __NEW_STARLETunsigned int lib$getqui( int *function_code, __optional_params );#else /* __OLD_STARLET */*unsigned int lib$getqui(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GETSYI */N/* */N/* Get Systemwide Information */N/* */O/* The Get Systemwide Information routine provides a simplified interface */R/* to the $GETSYI system service. The $GETSYI system service obtains status */N/* and identification information about the system. */N/* LIB$GETSYI returns only one item of information in a single call. */N/* */#define lib$getsyi LIB$GETSYI #ifdef __NEW_STARLETunsigned int lib$getsyi( int *item_code, __optional_params );#else /* __OLD_STARLET */*unsigned int lib$getsyi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_P OINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$GET_ACCNAM */N/* */N/* Get Access Name Table for Protected Object Class */N/* */N/* The Get Access Name Table for Protected Object Class routine returns */N/* a pointer to the access name table for a protected object class that */N/* is specified by name. */N/* */'#define lib$get_accnam LIB$GET_ACCNAM #ifdef __NEW_STARLETunsigned int lib$get_accnam( void *clsnam, void *objnam, unsigned int *accnam);#else /* __OLD_STARLET */.unsigned int lib$get_accnam(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GET_ACCNAM_BY_CONTEXT  */N/* */N/* Get Access Name Table for Protected Object Class */N/* */N/* The Get Access Name Table for Protected Object Class routine returns */N/* a pointer to the access name table for a protected object class that */N/* is specified by a context.  */N/* */=#define lib$get_accnam_by_context LIB$GET_ACCNAM_BY_CONTEXT #ifdef __NEW_STARLET'unsigned int lib$get_accnam_by_context( unsigned int *contxt, unsigned int *accnam);#else /* __OLD_STARLET */9unsigned int lib$get_accnam_by_context(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$GET_COMMAND  */N/* */N/* Get Line from SYS$COMMAND */N/* */Q/* The Get Line from SYS$COMMAND routine gets one record of ASCII text from */N/* the current controlling input device, specified by the logical name */N/* SYS$COMMAND.  */N/* */)#define lib$get_command LIB$GET_COMMAND #ifdef __NEW_STARLETunsigned int lib$get_command( void *resultant_string, __optional_params );#else /* __OLD_STARLET *//unsigned int lib$get_command(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GET_COMMON */N/*  */N/* Get String from Common */N/* */Q/* The Get String from Common routine copies a string in the common area to */N/* the destination string. (The common area is an area of storage which */N/* remains defined across multiple image activations in a process.) The */N/* string length is taken from the first longword of the comm on area. */N/* */'#define lib$get_common LIB$GET_COMMON #ifdef __NEW_STARLETunsigned int lib$get_common( void *resultant_string, __optional_params);#else /* __OLD_STARLET */.unsigned int lib$get_common(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GET_DATE_FORMAT */N/*  */N/* Get the User's Date Input Format */N/* */O/* The Get The User's Date Input Format routine returns information about */N/* the user's choice of a date/time input format. */N/* */1#define lib$get_date_format LIB$GET_DATE_FORMAT #ifdef __NEW_STARLET!unsigned int lib$g et_date_format( void *format_string, __optional_params);#else /* __OLD_STARLET */3unsigned int lib$get_date_format(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GET_EF */N/* */N/* Get Event Flag */N/* */N/*  The Get Event Flag routine allocates one local event flag from a */N/* process-wide pool and returns the number of the allocated flag to the */O/* caller. If no flags are available, LIB$GET_EF returns an error as its */N/* function value. */N/* */#define lib$get_ef LIB$GET_EF #ifdef __NEW_STARLETunsigned int lib$get_ef(" unsigned int *event_f lag_number);#else /* __OLD_STARLET */*unsigned int lib$get_ef(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GET_FOREIGN */N/* */N/* Get Foreign Command Line */N/* */N/* The Get Foreign Command Line routine requests the calling image's */N/* Command Language Interpreter (CLI) to return the contents of the */N/* foreign command line that activated the current image. */N/* */)#define lib$get_foreign LIB$GET_FOREIGN #ifdef __NEW_STARLETunsigned int lib$get_foreign( void *resultant_string, __optional_params );#else /* __OLD_STARLET *//unsigned int lib$get_foreign(__unknown_params);!#endif /* #ifdef _ _NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$GET_FULLNAME_OFFSET */N/* */N/* Get the Offset to the Starting Position of the Most Significant */N/* Part of a Full Name */N/* */N/*  The Get the Offset to the Starting Position of the Most Significant */N/* Part of a Full Name routine gets the offset to the starting */N/* position of the most significant part of a full name. */N/* */9#define lib$get_fullname_offset LIB$GET_FULLNAME_OFFSET #ifdef __NEW_STARLET%unsigned int lib$get_fullname_offset( void *fullname, unsigned short int *offset);#else /* __OLD_STARLET */7unsigned int lib$get_fullname_offset(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GET_HOSTNAME */N/* */N/* Get Host Node Name */N/* */N/* The Get Host Node Name routine returns the host node name of */N/* the local system. */N/* */+#define lib$get_hostname LIB$GET_HOSTNAME #ifdef __NEW_STARLETunsigned int lib$get_hostname( void *hostname, __optional_params );#else /* __OLD_STARLET */0unsigned int lib$get_hostname(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$GET_INPUT */N/* */N/* Get Line from SYS$INPUT */N/* */O/* The Get Line from SYS$INPUT routine gets one record of ASCII text from */N/* the current controlling input device, specified by SYS$INPUT. */N/*  */%#define lib$get_input LIB$GET_INPUT #ifdef __NEW_STARLETunsigned int lib$get_input( void *resultant_string, __optional_params );#else /* __OLD_STARLET */-unsigned int lib$get_input(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GET_LOGICAL */N/* */N/* Get Logical  */N/* */N/* The Get Logical routine gets the logical name information by calling */N/* the system service routine SYS$TRNLNM. */N/* */)#define lib$get_logical LIB$GET_LOGICAL #ifdef __NEW_STARLETunsigned int lib$get_logical( void *logical_name, __optio nal_params );#else /* __OLD_STARLET *//unsigned int lib$get_logical(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GET_LUN */N/* */N/* Get Logical Unit Number */N/* */N/* The Get Logical Unit Number routine allocates on e logical unit number */R/* from a process-wide pool. If a unit is available, its number is returned */O/* to the caller. Otherwise, an error is returned as the function value. */N/* */!#define lib$get_lun LIB$GET_LUN #ifdef __NEW_STARLETunsigned int lib$get_lun( int *logical_unit_number);#else /* __OLD_STARLET */+unsigned int lib$get_lun(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  LIB$GET_MAXIMUM_DATE_LENGTH */N/* */N/* Retrieve the Maximum Length of a Date/Time String */N/* */N/* Given an output format and language, the Retrieve the Maximum Length */Q/* of a Date/Time String routine determines the maximum possible length for */N/* the date-string stri ng returned by LIB$FORMAT_DATE_TIME. */N/* */A#define lib$get_maximum_date_length LIB$GET_MAXIMUM_DATE_LENGTH #ifdef __NEW_STARLET)unsigned int lib$get_maximum_date_length( int *date_length, __optional_params );#else /* __OLD_STARLET */;unsigned int lib$get_maximum_date_length(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GET_SYMBOL  */N/* */N/* Get Value of CLI Symbol */N/* */N/* The Get Value of CLI Symbol routine requests the calling process's */O/* Command Language Interpreter (CLI) to return the value of a CLI symbol */N/* as a string. LIB$GET_SYMBOL then returns the string to the caller. */O/* Optionally, LIB$GET_SYMBOL can return the length of the returned value */N/* and the table in which the symbol was found. */N/* */'#define lib$get_symbol LIB$GET_SYMBOL #ifdef __NEW_STARLETunsigned int lib$get_symbol( void *symbol, void *resultant_string, __optional_params );#else /* __OLD_STARLET */.unsigned int lib$get_symbol(__unknown_params);!#endif /* #ifdef __NEW_STARLET */8/* LIB$GET_UIB_INFO ** IPF only ** */N/* */N/* Returns information from the unwind information block (UIB). */N/* */+#define lib$get_uib_info LIB$GET_UIB_INFO #ifdef __NEW_STARLETunsigned int lib$get_uib_info( void *(*(uib_va)), __optional_params );#else /* __OLD_STARLET */0unsigned int lib$get_uib_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$GET_USERS_LANGUAGE */N/* */N/* Return the User's Language */N/* */O/* The Return the User's Language routine determines the user's choice of */Q/* a natural language. The choice is determined by translating the logical */N/* SYS$LANGUAGE. */N/* */7#define lib$get_users_language LIB$GET_USERS_LANGUAGE #ifdef __NEW_STARLET$unsigned int lib$get_users_language( void *language);#else /* __OLD_STARLET */6unsigned int lib$get_users_language(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$GET_VM */N/* */N/* Allocate Virtual Memory */N/* */N/* The Allocate Virtual Memory routine allocates a specified number of */O/* contiguous bytes in the program region and returns the virtual address */N/* of the first byte allocated. */N/* */#define lib$get_vm LIB$GET_VM #ifdef __NEW_STARLETunsigned int lib$get_vm( int *number_of_bytes, void *base_address, __optional_params);#else /* __OLD_STARLET */*unsigned int lib$get_vm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_point er_size __long#endifN/* LIB$GET_VM_64 */N/* */N/* Allocate Virtual Memory */N/* */N/* The Allocate Virtual Memory routine allocates a specified number of */O/* contiguous bytes in the program region and returns the virtual address */N/* of the first byte allocated. */N/* */%#define lib$get_vm_64 LIB$GET_VM_64 #ifdef __NEW_STARLETunsigned int lib$get_vm_64( __int64 *number_of_bytes, void *(*(base_address)), __optional_params);#else /* __OLD_STARLET */-unsigned int lib$get_vm_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$GET_VM_PAGE */N/* */N/* Get Virtual Memory Page */N/* */N/* The Get Virtual Memory Page routine allocates a specified number of */O/* contiguous pages on VAX and pagelets on Alpha of memory in the program */ N/* region and returns the virtual address of the first allocated page on */N/* VAX and pagelet on Alpha. */N/* */)#define lib$get_vm_page LIB$GET_VM_PAGE #ifdef __NEW_STARLETunsigned int lib$get_vm_page( int *number_of_pages, void *base_address);#else /* __OLD_STARLET *//unsigned int lib$get_vm_page(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$GET_VM_PAGE_64 */N/* */N/* Get Virtual Memory Page */N/* */N/* The Get Virtual Memory Page routine allocates a specified number of */O/* contiguous pages  on VAX and pagelets on Alpha of memory in the program */N/* region and returns the virtual address of the first allocated page on */N/* VAX and pagelet on Alpha. */N/* *//#define lib$get_vm_page_64 LIB$GET_VM_PAGE_64 #ifdef __NEW_STARLET unsigned int lib$get_vm_page_64( __int64 *number_of_pages, void *(*(base_address)));#else /* __OLD_STARLET */2unsigned int lib$get_vm_page_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$ICHAR */N/* */N/* Convert First Character of String to Integer */N/* */N/* The Convert First Character of String to Integer routine converts the */N/* first character of a sou rce string to an 8-bit ASCII integer extended */N/* to a longword. */N/* */#define lib$ichar LIB$ICHAR #ifdef __NEW_STARLETunsigned int lib$ichar( void *source_string);#else /* __OLD_STARLET */)unsigned int lib$ichar(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$INDEX */N/* */N/* Index to Relative Position of Substring */N/* */N/* The Index to Relative Position of Substring routine returns an index, */N/* which is the relative position of the first occurrence of a substring */N/* in the source string. */N/*  */#define lib$index LIB$INDEX #ifdef __NEW_STARLETunsigned int lib$index( void *source_string, void *sub_string);#else /* __OLD_STARLET */)unsigned int lib$index(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$INIT_DATE_TIME_CONTEXT */N/* */Q/* Initialize the Context Area Used in Formatting Dates and Times for Input */N/* or Output */N/* */O/* The Initialize the Context Area Used in Formatting Dates and Times for */O/* Input or Output routine allows the user to initialize the context area */N/* used by LIB$FORMAT_DATE_TIME or LIB$CONVERT_DATE_STRING with specific */N/* strings, instead of through logical name translation.  */N/* */?#define lib$init_date_time_context LIB$INIT_DATE_TIME_CONTEXT #ifdef __NEW_STARLET(unsigned int lib$init_date_time_context( unsigned int *user_context, int *component, void *init_string);#else /* __OLD_STARLET */:unsigned int lib$init_date_time_context(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$INIT_TIMER */N/*  */N/* Initialize Times and Counts */N/* */N/* The Initialize Times and Counts routine stores the current values of */Q/* specified times and counts for use by LIB$SHOW_TIMER or LIB$STAT_TIMER. */N/* */'#define lib$init_timer LIB$INIT_TIMER #ifdef __NEW_STARLETunsigned int lib$init_timer( __optional_params);#else /* __OLD_STARLET */.unsigned int lib$init_timer(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$INSERT_TREE */N/* */N/* Insert Entry in a Balanced Binary Tree  */N/* */O/* The Insert Entry in a Balanced Binary Tree routine inserts a node in a */N/* balanced binary tree. */N/* */)#define lib$insert_tree LIB$INSERT_TREE #ifdef __NEW_STARLETint lib$insert_tree( void *treehead, unsigned int *symbol, unsigned int *flags,# int ( *user_compare_routine)(void),( int (*user_allocation_procedure)(void), void *new_node, __optional_params);#else /* __OLD_STARLET */&int lib$insert_tree(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$INSERT_TREE_64 */N/* */N/* Insert Entry in a Balanced Binary Tree  */N/* */O/* The Insert Entry in a Balanced Binary Tree routine inserts a node in a */N/* balanced binary tree. */N/* *//#define lib$insert_tree_64 LIB$INSERT_TREE_64 #ifdef __NEW_STARLETint lib$insert_tree_64( void *(*(treehead)), unsigned int *symbol,  unsigned int *flags,# int (*user_compare_routine)(void),( int (*user_allocation_procedure)(void), void *(*(new_node)), __optional_params);#else /* __OLD_STARLET */)int lib$insert_tree_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$INSQHI */N/* */N /* Insert Entry at Head of Queue */N/* */O/* The Insert Entry at Head of Queue routine inserts a queue entry at the */N/* head of the specified self-relative interlocked longword queue. */N/* LIB$INSQHI makes the VAX INSQHI instruction available as a callable */N/* routine. */N/*  */#define lib$insqhi LIB$INSQHI #ifdef __NEW_STARLETunsigned int lib$insqhi( unsigned int *entry, __int64 *header, __optional_params);#else /* __OLD_STARLET */*unsigned int lib$insqhi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$INSQHIQ */N/*  */N/* Insert Entry at Head of Queue (Quadword) */N/* */O/* The Insert Entry at Head of Queue routine inserts a queue entry at the */N/* head of the specified self-relative interlocked quadword queue. */N/* LIB$INSQHIQ makes the Alpha unprivileged PALcode instruction INSQHIQ */N/* available as a callable routine.  */N/* */!#define lib$insqhiq LIB$INSQHIQ #ifdef __NEW_STARLETunsigned int lib$insqhiq( unsigned int *entry, int header [4], __optional_params);#else /* __OLD_STARLET */+unsigned int lib$insqhiq(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$INSQTI  */N/* */N/* Insert Entry at Tail of Queue */N/* */O/* The Insert Entry at Tail of Queue routine inserts a queue entry at the */N/* tail of the specified self-relative interlocked longword queue. */N/* LIB$INSQTI makes the VAX INSQTI instruction available as a callable */N/* routine. */N/* */#define lib$insqti LIB$INSQTI #ifdef __NEW_STARLETunsigned int lib$insqti( unsigned int *entry, __int64 *header, __optional_params);#else /* __OLD_STARLET */*unsigned int lib$insqti(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$INSQTIQ */N/* */N/* Insert Entry at Tail of Queue (Quadword) */N/* */O/* The Insert Entry at Tail of Queue routine inserts a queue entry at the */N/* tail of the specified self-relative interlocked quadword queue. */N/* LIB$INSQTIQ makes the Alpha unprivileged PALcode instruction INSQTIQ */N/* available as a callable routine. */N/* */!#define lib$insqtiq LIB$INSQTIQ #ifdef __NEW_STARLETunsigned int lib$insqtiq( unsigned int *entry, int header [4], __optional_params);#else /* __OLD_STARLET */+unsigned int lib$insqtiq(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$INSV  */N/* */N/* Insert a Variable Bit Field */N/* */P/* The Insert a Variable Bit Field routine replaces the variable bit field */P/* specified by the base, position, and size arguments with bits 0 through */N/* of the source field. If the size of the bit field is zero, nothing is */N/* inserted. LIB$INSV makes the VAX INSV instruction available as a */N/* callable routine. */N/* */#define lib$insv LIB$INSV #ifdef __NEW_STARLET int lib$insv( int *longword_integer_source, int *position, unsigned char *size, void *base_address);#else /* __OLD_STARLET */int lib$insv(__unknown_param s);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$INT_OVER */N/* */N/* Integer Overflow Detection */N/* */N/* The Integer Overflow Detection routine enables or disables integer */N/* overflow detection for the calling routine activation. The previous */N/* integer overflow enable setting is returned. */N/* */N/* This routine is available on Alpha VMS systems in translated form */N/* and is applicable to translated VAX images only. */N/* */##define lib$int_over LIB$INT_OVER #ifdef __NEW_STARLETunsigned int lib$int_over( unsigned int *new_setting);#else /* __OLD_STARLET */,unsigned int lib$int_over(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifA/* LIB$I64_CREATE_INVO_CONTEXT ** IPF only ** */N/* */R/* A thread can allocte an invocation conte xt block on the heap by using the */N/* following function format: */N/* */A#define lib$i64_create_invo_context LIB$I64_CREATE_INVO_CONTEXT #ifdef __NEW_STARLET"void *lib$i64_create_invo_context( __optional_params );#else /* __OLD_STARLET */4void *lib$i64_create_invo_context(__unknown_params);!#endif /* #ifdef __NEW_STARLET */@/* LIB$I64_FREE_INVO_CONTEXT ** IPF only ** */N/* */O/* A thread can free an invocation context block to the heap by using the */N/* following function format: */N/* */=#define lib$i64_free_invo_context LIB$I64_FREE_INVO_CONTEXT #ifdef __NEW_STARLETint lib$i64_free_invo_context( void *invo_context);#else /* __OLD_STARLET */0int lib$i64_free_invo_context(__unknown_params);!#endif /* #ifdef __NEW_STARLET */C/* LIB$I64_GET_CURR_INVO_CONTEXT ** IPF only ** */N/* */Y/* A thread can obtain the invocation context of the current procedure by using the */N/* following function format: */N/* */E#define lib$i64_get_curr_invo_context LIB$I64_GET_CURR_INVO_CONTEXT #ifdef __NEW_STARLET+unsigned int lib$i64_get_curr_invo_context( void *invo_context);#else /* __OLD_STARLET */=unsigned int lib$i64_get_curr_invo_context(__unknown_params);!#endif /* #ifdef __NEW_STARLET */B/* LIB$I64_GET_CURR_INVO_HANDLE ** IPF only ** */N/* */V/* A thread can obtain the invocation handle correspond ing to current invocation */Q/* context of the current procedure by using the following function format: */N/* */C#define lib$i64_get_curr_invo_handle LIB$I64_GET_CURR_INVO_HANDLE #ifdef __NEW_STARLET*unsigned int lib$i64_get_curr_invo_handle( unsigned __int64 *invo_handle);#else /* __OLD_STARLET */<unsigned int lib$i64_get_curr_invo_handle(__unknown_params);!#endif /* #ifdef __NEW_STARLET */F/* LIB$I6 4_GET_INVO_CONTEXT ** IPF only ** */N/* */X/* A thread can obtain the invocation context of any active procedure by using the */N/* following function format: */N/* */;#define lib$i64_get_invo_context LIB$I64_GET_INVO_CONTEXT #ifdef __NEW_STARLET&unsigned int lib$i64_get_inv o_context( unsigned __int64 *invo_handle, void *invo_context);#else /* __OLD_STARLET */8unsigned int lib$i64_get_invo_context(__unknown_params);!#endif /* #ifdef __NEW_STARLET */E/* LIB$I64_GET_INVO_HANDLE ** IPF only ** */N/* */Y/* A thread can obtain an invocation handle corresponding to any invocation context */N/* block by using the following function format: ! */N/* */9#define lib$i64_get_invo_handle LIB$I64_GET_INVO_HANDLE #ifdef __NEW_STARLET%unsigned int lib$i64_get_invo_handle( void *invo_context, unsigned __int64 *invo_handle);#else /* __OLD_STARLET */7unsigned int lib$i64_get_invo_handle(__unknown_params);!#endif /* #ifdef __NEW_STARLET */C/* LIB$I64_GET_PREV_INVO_CONTEXT ** IPF only ** */N/* " */Z/* A thread can obtain the invocation context of the procedure context preceding any */N/* other procedure context by using the following function format: */N/* */E#define lib$i64_get_prev_invo_context LIB$I64_GET_PREV_INVO_CONTEXT #ifdef __NEW_STARLET+unsigned int lib$i64_get_prev_invo_context( void *invo_context);#else /* __OLD_STARLET */=unsigned int lib$i64#_get_prev_invo_context(__unknown_params);!#endif /* #ifdef __NEW_STARLET */B/* LIB$I64_GET_PREV_INVO_HANDLE ** IPF only ** */N/* */Y/* A thread can obtain an invocation handle of the procedure context preceding that */Q/* of a specified procedure context by using the following function format: */N/* */C#define lib$i64_get_p $rev_invo_handle LIB$I64_GET_PREV_INVO_HANDLE #ifdef __NEW_STARLET*unsigned int lib$i64_get_prev_invo_handle(" unsigned __int64 *invo_handle_in,$ unsigned __int64 *invo_handle_out);#else /* __OLD_STARLET */<unsigned int lib$i64_get_prev_invo_handle(__unknown_params);!#endif /* #ifdef __NEW_STARLET */@/* LIB$I64_INIT_INVO_CONTEXT ** IPF only ** */N/* */N/* A thread can initialize an invocatio %n context block by using the */N/* following function format: */N/* */=#define lib$i64_init_invo_context LIB$I64_INIT_INVO_CONTEXT #ifdef __NEW_STARLET'unsigned int lib$i64_init_invo_context( void *invo_context, unsigned char invo_version, __optional_params);#else /* __OLD_STARLET */9unsigned int lib$i64_init_invo_context(__unknown_params);!#endif /* #ifd&ef __NEW_STARLET */</* LIB$I64_PREV_INVO_END ** IPF only ** */N/* */V/* This routine should be called at the conclusion of call tracing operations to */W/* free the memory used to process unwind descriptors. The call tracing routines */N/* are LIB$I64_GET_INVO_CONTEXT, LIB$I64_GET_PREV_INVO_CONTEXT, and */N/* LIB$I64_GET_CURR_INVO_CONTEXT. */N/* ' */Z/* To provide efficient call tracing, some unwind information can be tracked in heap */Y/* storage from one call to the next. This heap storage should be freed before you */N/* release or reuse the invocation context block. */N/* */T/* Calling this routine is only necessary if the LIBICB$V_UO_FLAG_CACHE_UNWIND */N (/* flag is set in the LIBICB$Q_UO_FLAGS field of the invocation context */N/* block. This flag causes unwind information to be cached between */N/* calls. */N/* */5#define lib$i64_prev_invo_end LIB$I64_PREV_INVO_END #ifdef __NEW_STARLET#unsigned int lib$i64_prev_invo_end( void *invo_context);#else /* __OLD_STARLET */5unsigned int l)ib$i64_prev_invo_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */@/* LIB$I64_PUT_INVO_REGISTERS ** IPF only ** */N/* */S/* The fields of a given procedure invocation context can be updated with new */X/* register contents by calling a system library function in the following format: */N/* */?#define lib$i64_put_invo_*registers LIB$I64_PUT_INVO_REGISTERS #ifdef __NEW_STARLET(unsigned int lib$i64_put_invo_registers( unsigned __int64 *invo_handle, void *invo_context, __optional_params );#else /* __OLD_STARLET */:unsigned int lib$i64_put_invo_registers(__unknown_params);!#endif /* #ifdef __NEW_STARLET */8/* LIB$I64_SET_FPSR ** IPF only ** */N/* */R/* Given an invocation context block and a quadword + FPSR value in fpsr_copy, */T/* write the fpsr_copy value to the invocation context block FPSR and then use */R/* LIB$I64_PUT_INVO_REGISTERS to write to the actual context. The invocation */N/* context block remains unchanged if the routine fails. */N/* */+#define lib$i64_set_fpsr LIB$I64_SET_FPSR #ifdef __NEW_STARLETunsigned int lib$i64_set_fpsr( void *invo_context, unsigned __int64 *f ,psr_copy);#else /* __OLD_STARLET */0unsigned int lib$i64_set_fpsr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */6/* LIB$I64_GET_FR ** IPF only ** */N/* */V/* Given an invocation context block and floating-point register index such that */T/* 2 <= index < 128, copy the register value to fr_copy. For example, an index */X/* value of 4 fetches the invocation context block FREG[4] value, w-hich represents */N/* the contents of F4 for the context. */N/* */'#define lib$i64_get_fr LIB$I64_GET_FR #ifdef __NEW_STARLETunsigned int lib$i64_get_fr( void *invo_context, unsigned int index, void *fr_copy);#else /* __OLD_STARLET */.unsigned int lib$i64_get_fr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */6/* LIB$I64_SET_FR ** IPF only ** */.N/* */`/* Given an invocation context block, a floating-point register index, and a floatingpoint */U/* register value in fr_copy, writes the corresponding invocation context block */N/* FREG entry, and calls LIB$I64_PUT_INVO_REGISTERS to write the actual */V/* context. The invocation context block remains unchanged if the routine fails. */N/* / */'#define lib$i64_set_fr LIB$I64_SET_FR #ifdef __NEW_STARLETunsigned int lib$i64_set_fr( void *invo_context, unsigned int index, void *fr_copy);#else /* __OLD_STARLET */.unsigned int lib$i64_set_fr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */6/* LIB$I64_GET_GR ** IPF only ** */N/* */O/* Given an invocation context block and general register index such that */S/* 00 < index < 128,) copy the register value to gr_copy, for example, index 4 */Z/* fetches the invocation context block IREG[4] value, which represents the contents */N/* of R4 for the context. */N/* */'#define lib$i64_get_gr LIB$I64_GET_GR #ifdef __NEW_STARLETunsigned int lib$i64_get_gr( void *invo_context, unsigned int index, unsigned __int64 *gr_copy);#e 1lse /* __OLD_STARLET */.unsigned int lib$i64_get_gr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */6/* LIB$I64_SET_GR ** IPF only ** */N/* */N/* Given an invocation context block, a general register index such that */P/* 0 < index < 128, and a quadword value gr_copy, writes the corresponding */T/* invocation context block general register, clears the corresponding NaT bit */P/* and us 2es LIB$I64_PUT_INVO_REGISTERS to write to the actual context. The */N/* invocation context block remains unchanged if the routine fails. */N/* */'#define lib$i64_set_gr LIB$I64_SET_GR #ifdef __NEW_STARLETunsigned int lib$i64_set_gr( void *invo_context, unsigned int index, unsigned __int64 *gr_copy);#else /* __OLD_STARLET */.unsigned int lib$i64_set_gr(__unknown_params);!#endif /* #ifdef __NEW_STARL3ET */6/* LIB$I64_SET_PC ** IPF only ** */N/* */T/* Given an invocation context block and a quadword PC value in pc_copy, write */W/* the pc_copy value to the invocation context block PC and then use LIB$I64_PUT_ */T/* INVO_REGISTERS to write to the actual context. The invocation context block */N/* remains unchanged if the routine fails. */N/* 4 */'#define lib$i64_set_pc LIB$I64_SET_PC #ifdef __NEW_STARLETunsigned int lib$i64_set_pc( void *invo_context, unsigned __int64 *pc_copy);#else /* __OLD_STARLET */.unsigned int lib$i64_set_pc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */C/* LIB$I64_GET_UNWIND_HANDLER_FV ** IPF only ** */N/* */X/* Given a pc_value, find the f 5unction value (address of the procedure descriptor) */[/* for the condition handler, if present, and write it to handler_fv. If not present, */N/* then write 0 to handler_fv. */N/* */E#define lib$i64_get_unwind_handler_fv LIB$I64_GET_UNWIND_HANDLER_FV #ifdef __NEW_STARLET+unsigned int lib$i64_get_unwind_handler_fv( unsigned __int64 *pc_value, unsigned __int64 *han 6dler_fv);#else /* __OLD_STARLET */=unsigned int lib$i64_get_unwind_handler_fv(__unknown_params);!#endif /* #ifdef __NEW_STARLET */>/* LIB$I64_GET_UNWIND_LSDA ** IPF only ** */N/* */N/* Given a pc_value, find the address of the unwind information block */W/* language-specific data area (LSDA), if present, and write it to unwind_lsda_p. */N/* If not present, then write 0 to unwind_lsda_va 7. */N/* */9#define lib$i64_get_unwind_lsda LIB$I64_GET_UNWIND_LSDA #ifdef __NEW_STARLET%unsigned int lib$i64_get_unwind_lsda( unsigned __int64 *pc_value,# unsigned __int64 *unwind_lsda_va);#else /* __OLD_STARLET */7unsigned int lib$i64_get_unwind_lsda(__unknown_params);!#endif /* #ifdef __NEW_STARLET */>/* LIB$I64_GET_UNWIND_OSSD ** IPF only ** */N/* 8 */U/* Given a pc_value, find the address of the unwind information block operating */U/* system-specific data area, if present, and write it to unwind_ossd_p. If not */N/* present, then write 0 to unwind_ossd_p. */N/* */9#define lib$i64_get_unwind_ossd LIB$I64_GET_UNWIND_OSSD #ifdef __NEW_STARLET%unsigned int lib$i64_g 9et_unwind_ossd( unsigned __int64 *pc_value,# unsigned __int64 *unwind_ossd_va);#else /* __OLD_STARLET */7unsigned int lib$i64_get_unwind_ossd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */C/* LIB$I64_IS_AST_DISPATCH_FRAME ** IPF only ** */N/* */N/* Used to determine whether a given PC value */N/* represents the AST dispatch frame. : */N/* */E#define lib$i64_is_ast_dispatch_frame LIB$I64_IS_AST_DISPATCH_FRAME #ifdef __NEW_STARLET+unsigned int lib$i64_is_ast_dispatch_frame( unsigned __int64 *pc_value);#else /* __OLD_STARLET */=unsigned int lib$i64_is_ast_dispatch_frame(__unknown_params);!#endif /* #ifdef __NEW_STARLET */C/* LIB$I64_IS_EXC_DISPATCH_FRAME ** IPF only ** */N/* ; */N/* Used to determine whether a given PC value */N/* represents the exception dispatch frame. */N/* */E#define lib$i64_is_exc_dispatch_frame LIB$I64_IS_EXC_DISPATCH_FRAME #ifdef __NEW_STARLET+unsigned int lib$i64_is_exc_dispatch_frame( unsigned __int64 *pc_value);#else /* __OLD_STARLET */=unsigned int lib$i64_i<s_exc_dispatch_frame(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$LEN */N/* */N/* Length of String Returned as Longword Value */N/* */N/* The Length of String Returned as Longword Value routine returns the */N/* length of a string. = */N/* */#define lib$len LIB$LEN #ifdef __NEW_STARLETunsigned short int lib$len( void *source_string);#else /* __OLD_STARLET */-unsigned short int lib$len(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$LOCC */N/* > */N/* Locate a Character */N/* */N/* The Locate a Character routine locates a character in a string by */O/* comparing successive bytes in the string with the character specified. */O/* The search continues until the character is found or the string has no */O/* more characters. LIB$LOCC makes the VAX LOCC instruction available as */N/* a callab ?le routine. */N/* */#define lib$locc LIB$LOCC #ifdef __NEW_STARLETunsigned int lib$locc( void *character_string, void *source_string);#else /* __OLD_STARLET */(unsigned int lib$locc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$LOCK_IMAGE */N/* @ */N/* Lock Image in working set */N/* */N/* Lock all address ranges associated with a specified image */N/* into the working set. */N/* */'#define lib$lock_image LIB$LOCK_IMAGE #ifdef __NEW_STARLETun Asigned int lib$lock_image(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *va#else unsigned __int64 va#endif);#else /* __OLD_STARLET */.unsigned int lib$lock_image(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$LOOKUP_KEY */N/* B */N/* Look Up Keyword in Table */N/* */O/* The Look Up Keyword In Table routine scans a table of keywords to find */N/* one that matches the keyword or keyword abbreviation specified by */N/* search-string. */N/* */'C#define lib$lookup_key LIB$LOOKUP_KEY #ifdef __NEW_STARLETunsigned int lib$lookup_key( void *search_string,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif unsigned int *key_table_array, __optional_params );#else /* __OLD_STARLET */.unsigned int lib$lookup_key(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINT DER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$LOOKUP_TREE */N/* */N/* Look Up an Entry in a Balanced Binary Tree */N/* */N/* The Look Up an Entry in a Balanced Binary Tree routine looks up an */N/* entry in a balanced binary tree. E */N/* */)#define lib$lookup_tree LIB$LOOKUP_TREE #ifdef __NEW_STARLETunsigned int lib$lookup_tree( void *treehead, unsigned int *symbol,# int (*user_compare_routine)(void), void *new_node);#else /* __OLD_STARLET *//unsigned int lib$lookup_tree(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __longF#endifN/* LIB$LOOKUP_TREE_64 */N/* */N/* Look Up an Entry in a Balanced Binary Tree */N/* */N/* The Look Up an Entry in a Balanced Binary Tree routine looks up an */N/* entry in a balanced binary tree. */N/* G *//#define lib$lookup_tree_64 LIB$LOOKUP_TREE_64 #ifdef __NEW_STARLET unsigned int lib$lookup_tree_64( void *(*(treehead)), unsigned int *symbol,# int (*user_compare_routine)(void), void *(*(new_node)));#else /* __OLD_STARLET */2unsigned int lib$lookup_tree_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$LP_LINES */N/* H */N/* Lines on Each Printer Page */N/* */N/* The Lines on Each Printer Page routine computes the default number of */N/* lines on a printer page. This routine can be used by native-mode VMS */N/* utilities that produce listing files and paginate files. */N/* I */##define lib$lp_lines LIB$LP_LINES#ifdef __NEW_STARLETint lib$lp_lines(void);#else /* __OLD_STARLET */int lib$lp_lines(void);!#endif /* #ifdef __NEW_STARLET */N/* LIB$MATCHC */N/* */N/* Match Characters, Return Relative Position */N/* J */N/* The Match Characters and Return Relative Position routine searches a */O/* source string for a specified substring and returns an index, which is */N/* the relative position of the first occurrence of a substring in the */P/* source string. The relative character positions returned by LIB$MATCHC */N/* are numbered 1, 2, , n. Thus, zero means that the substring was not */N/* found. */N/* K */#define lib$matchc LIB$MATCHC #ifdef __NEW_STARLETunsigned int lib$matchc( void *sub_string, void *source_string);#else /* __OLD_STARLET */*unsigned int lib$matchc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$MATCH_COND */N/* */N/* Match Condition Values L */N/* */N/* The Match Condition Values routine checks to see if a given condition */N/* value matches a list of condition values that you supply. */N/* */ '#define lib$match_cond LIB$MATCH_COND#ifdef __NEW_STARLETunsigned int lib$match_cond(% unsigned int *match_condition_value,' u Mnsigned int *compare_condition_value, __optional_params);#else /* __OLD_STARLET */.unsigned int lib$match_cond(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* LIB$MOVC3 */N/* */N/* Move Characters */N/* */N/* Th Ne Move Characters routine makes the VAX MOVC3 instruction available */R/* as a callable routine. The source item is moved to the destination item. */P/* Overlap of the source and destination items does not affect the result. */N/* */#define lib$movc3 LIB$MOVC3 #ifdef __NEW_STARLETint lib$movc3() unsigned short int *word_integer_length, unsigned int *source, unsigned int *destination);#else /* __OLD_S OTARLET */ int lib$movc3(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$MOVC5 */N/* */N/* Move Characters with Fill */N/* */N/* The Move Characters with Fill routine makes the VAX MOVC5 instruction */N/* available as a cal Plable routine. The source item is moved to the */P/* destination item. Overlap of the source and destination items does not */N/* affect the result. */N/* */#define lib$movc5 LIB$MOVC5 #ifdef __NEW_STARLETint lib$movc5(0 unsigned short int *word_integer_source_length, unsigned int *source, char *fill,5 unsigned short int *word_integer_destination_ Qlength, unsigned int *destination);#else /* __OLD_STARLET */ int lib$movc5(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$MOVTC */N/* */N/* Move Translated Characters */N/* */N/* The Move Translated Characters routine mov Res the source string, */N/* character by character, to the destination string after translating */N/* each character using the specified translation table. */N/* LIB$MOVTC makes the VAX MOVTC instruction available as a callable */N/* routine. */N/* */#define lib$movtc LIB$MOVTC #ifdef __NEW_STARLETunsigned int lib S$movtc( void *source_string, void *fill_character, void *translation_table, void *destination_string);#else /* __OLD_STARLET */)unsigned int lib$movtc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$MOVTUC */N/* */N/* Move Translated Until Character */N/* T */N/* The Move Translated Until Character routine moves the source string, */Q/* character by character, to the destination string after translating each */Q/* character using the specified translation table until the stop character */O/* is encountered. LIB$MOVTUC makes the VAX MOVTUC instruction available */N/* as a callable routine. */N/* U */#define lib$movtuc LIB$MOVTUC #ifdef __NEW_STARLETunsigned int lib$movtuc( void *source_string, void *stop_character, void *translation_table, void *destination_string, __optional_params);#else /* __OLD_STARLET */*unsigned int lib$movtuc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */I/* LIB$MT_DENSITY_CONVERSION */;/* */I/* Convert the DCL command V line qualifiers specfied for */I/* /DENSITY, /COMPACTION, /MEDIA_FORMAT=DENSITY= and */I/* /MEDIA_FORMAT=COMPACTION to a OpenVMS density/compression */I/* code (MT3DEF or MTDEF symbols) and return value indicating */C/* the tape driver owning the device is MTD enhanced or not. */;/* */=#define lib$mt_density_conversion LIB$MT_DENSITY_CONVERSION #ifdef __NEW_STARLET'unsign Wed int lib$mt_density_conversion( unsigned int device_channel,! unsigned int *mt_density_symbol,$ unsigned int *mt3_enhanced_driver);#else /* __OLD_STARLET */9unsigned int lib$mt_density_conversion(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */7/* LIB$MT_DENSITY_VERIFICATION */N/* */I/* Verify a OpenVMS de Xnsity/compression code (MT3DEF or MTDEF */J/* symbols) is indeed an acceptable density/compression code */J/* for both MTD enhanced tape device drivers and non enhanced */I/* tape device drivers. Also return a value indicating */>/* the driver owning the device is MTD enhanced or not. */;/* */A#define lib$mt_density_verification LIB$MT_DENSITY_VERIFICATION #ifdef __NEW_STARLET)unsi Ygned int lib$mt_density_verification( unsigned int device_channel, unsigned int mt_density_symbol,$ unsigned int *mt3_enhanced_driver);#else /* __OLD_STARLET */;unsigned int lib$mt_density_verification(__unknown_params);!#endif /* #ifdef __NEW_STARLET */;/* */;/* */9/* LIB$MT_DENSITY_STRCVT */;/* Z */I/* Copies the string equivalent of a OpenVMS density/compression */I/* code into a user supplied buffer. This works for both MT3DEF */I/* symbols and MTDEF symbols. */;/* */;/* */5#define lib$mt_density_strcvt LIB$MT_DENSITY_STRCVT #ifdef __NEW_STARLET#unsigned int lib$mt_density_strcvt( unsigned int mt_density [_symbol, char *out_string);#else /* __OLD_STARLET */5unsigned int lib$mt_density_strcvt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$MULTF_DELTA_TIME */N/* */N/* Multiply Delta Time by an F_Floating Scalar */N/* */N/* The Multiply Delta Time by a \n F-Floating Scalar routine multiplies a */N/* delta time by an F-floating scalar. */N/* */3#define lib$multf_delta_time LIB$MULTF_DELTA_TIME #ifdef __NEW_STARLET"unsigned int lib$multf_delta_time( float *multiplier, unsigned __int64 *delta_time);#else /* __OLD_STARLET */4unsigned int lib$multf_delta_time(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$]MULTS_DELTA_TIME */N/* */N/* Multiply Delta Time by an S_Floating Scalar */N/* */N/* The Multiply Delta Time by an S-Floating Scalar routine multiplies a */N/* delta time by an S-floating scalar. */N/* ^ */3#define lib$mults_delta_time LIB$MULTS_DELTA_TIME #ifdef __NEW_STARLET"unsigned int lib$mults_delta_time( float *multiplier, unsigned __int64 *delta_time);#else /* __OLD_STARLET */4unsigned int lib$mults_delta_time(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$MULT_DELTA_TIME */N/* */N/* Multip _ly Delta Time by Scalar */N/* */N/* The Multiply Delta Time by Scalar routine multiplies a delta time by */N/* a longword integer scalar. */N/* */1#define lib$mult_delta_time LIB$MULT_DELTA_TIME #ifdef __NEW_STARLET!unsigned int lib$mult_delta_time( int ` *multiplier, unsigned __int64 *delta_time);#else /* __OLD_STARLET */3unsigned int lib$mult_delta_time(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$PARSE_ACCESS_CODE */N/* */N/* Parse Access Encoded Name String */N/* a */N/* The Parse Access Encoded Name String routine parses and translates */N/* a string of access names into a mask for a particular ownership */N/* category. */N/* */5#define lib$parse_access_code LIB$PARSE_ACCESS_CODE #ifdef __NEW_STARLET#unsigned int lib$parse_access_code( b void *access_string," unsigned __int64 access_names [],( unsigned short int *ownership_category,! unsigned short int *access_mask, __optional_params);#else /* __OLD_STARLET */5unsigned int lib$parse_access_code(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$PARSE_SOGW_PROT */N/* */N/* Parse Protection String c */N/* */N/* The Parse Protection String routine parses and translates */N/* a protection string into a protection mask. */N/* */1#define lib$parse_sogw_prot LIB$PARSE_SOGW_PROT #ifdef __NEW_STARLET!unsigned int lib$parse_sogw_prot( void *protection_string," unsigned __int64 access_namdes [],% unsigned short int *protection_mask,$ unsigned short int *ownership_mask, __optional_params);#else /* __OLD_STARLET */3unsigned int lib$parse_sogw_prot(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$PAUSE */N/* */N/* Pause Program Execution e */N/* */N/* The Pause Program Execution routine suspends program execution and */N/* returns control to the calling command level. */N/* */#define lib$pause LIB$PAUSE#ifdef __NEW_STARLETunsigned int lib$pause(void);#else /* __OLD_STARLET */unsigned int lib$pause(void)f;!#endif /* #ifdef __NEW_STARLET */N/* LIB$POLYD */N/* */N/* Evaluate Polynomials */N/* */N/* The Evaluate Polynomials routine (D-floating point values) allows */N/* higher-level language users to evaluate D-floating point valgue */N/* polynomials. */N/* */#define lib$polyd LIB$POLYD #ifdef __NEW_STARLETunsigned int lib$polyd( double *polynomial_argument, short int *degree, double coefficient [], double *floating_point_result);#else /* __OLD_STARLET */)unsigned int lib$polyd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$POLYF h */N/* */N/* Evaluate Polynomials */N/* */N/* The Evaluate Polynomials routine (F-floating point values) allows */N/* higher-level language users to evaluate F-floating point */N/* polynomials. i */N/* */#define lib$polyf LIB$POLYF #ifdef __NEW_STARLETunsigned int lib$polyf( float *polynomial_argument, short int *degree, float coefficient [], float *floating_point_result);#else /* __OLD_STARLET */)unsigned int lib$polyf(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$POLYT */N/* j */N/* Evaluate Polynomials */N/* */N/* The Evaluate Polynomials routine (T-floating point values) allows */N/* higher-level language users to evaluate T-floating point value */N/* polynomials. */N/* k */#define lib$polyt LIB$POLYT #ifdef __NEW_STARLETunsigned int lib$polyt( double *polynomial_argument, short int *degree, double coefficient [], double *floating_point_result);#else /* __OLD_STARLET */)unsigned int lib$polyt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$POLYS */N/* */N/*l Evaluate Polynomials */N/* */N/* The Evaluate Polynomials routine (S-floating point values) allows */N/* higher-level language users to evaluate S-floating point */N/* polynomials. */N/* */#define lib$polys LIB$POLYmS #ifdef __NEW_STARLETunsigned int lib$polys( float *polynomial_argument, short int *degree, float coefficient [], float *floating_point_result);#else /* __OLD_STARLET */)unsigned int lib$polys(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$POLYG */N/* */N/* Evaluate Polynomials n */N/* */N/* The Evaluate Polynomials routine (G-floating point values) allows */N/* higher-level language users to evaluate G-floating point value */N/* polynomials. */N/* */#define lib$polyg LIB$POLYG #ifdef __NEW_STARLETunsigned int lib$polyg( double *polyn oomial_argument, short int *degree, double coefficient [], double *floating_point_result);#else /* __OLD_STARLET */)unsigned int lib$polyg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$POLYH */N/* */N/* Evaluate Polynomials */N/* p */O/* On VAX VMS, the Evaluate Polynomials routine (H-floating point values) */O/* allows higher-level language users to evaluate H-floating point value */N/* polynomials. */N/* */N/* This routine is not available to native Alpha VMS programs, but is */N/* available to translated VAX images. */N q/* */N/* This routine is not available to native Alpha VMS programs, but is */Q/* recognized and handled appropriately by most Digital high-level language */N/* compilers. */N/* */#define lib$polyh LIB$POLYH #ifdef __NEW_STARLETunsigned int lib$polyh( int polynomial_ar rgument [4], short int *degree, int coefficient [] [4], int floating_point_result [4]);#else /* __OLD_STARLET */)unsigned int lib$polyh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$PUT_COMMON */N/* */N/* Put String to Common */N/* s */N/* The Put String to Common routine copies the contents of a string into */N/* the common area. The common area is an area of storage which remains */N/* defined across multiple image activations in a process. Optionally, */N/* LIB$PUT_COMMON returns the actual number of characters copied. */N/* The maximum number of characters that can be copied is 252. */N/* */'#define t lib$put_common LIB$PUT_COMMON #ifdef __NEW_STARLETunsigned int lib$put_common( void *source_string, __optional_params);#else /* __OLD_STARLET */.unsigned int lib$put_common(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$PUT_OUTPUT */N/* */N/* Put Line to SYS$OUTPUT */N/* u */N/* The Put Line to SYS$OUTPUT routine writes a record to the current */N/* controlling output device, specified by SYS$OUTPUT using the RMS $PUT */N/* service. */N/* */'#define lib$put_output LIB$PUT_OUTPUT #ifdef __NEW_STARLETunsigned int lib$put_output( void *message_string);v#else /* __OLD_STARLET */.unsigned int lib$put_output(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$RADIX_POINT */N/* */N/* Radix Point Symbol */N/* */P/* The Radix Point Symbol routine returns the system's radix point symb wol. */O/* This symbol is used inside a digit string to separate the integer part */O/* from the fraction part. This routine works by attempting to translate */P/* the logical name SYS$RADIX_POINT as a process, group, or system logical */N/* name. */N/* */)#define lib$radix_point LIB$RADIX_POINT #ifdef __NEW_STARLETunsigned int lib$radixx_point( void *radix_point_string, __optional_params);#else /* __OLD_STARLET *//unsigned int lib$radix_point(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$REMQHI */N/* */N/* Remove Entry from Head of Queue */N/* y */N/* The Remove Entry from Head of Queue routine removes an entry from the */N/* head of the specified self-relative interlocked longword queue. */N/* LIB$REMQHI makes the VAX REMQHI instruction available as */N/* a callable routine. */N/* */#define lib$remqhi LIB$REMQHIz #ifdef __NEW_STARLETunsigned int lib$remqhi( __int64 *header, void *remque_address, __optional_params);#else /* __OLD_STARLET */*unsigned int lib$remqhi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$REMQHIQ */N/* */N/* Remove Entry from Head of Qu{eue (Quadword) */N/* */N/* The Remove Entry from Head of Queue routine removes an entry from the */N/* head of the specified self-relative interlocked quadword queue. */N/* LIB$REMQHIQ makes the Alpha unprivileged PALcode instruction REMQHIQ */N/* available as a callable routine. */N/* | */!#define lib$remqhiq LIB$REMQHIQ #ifdef __NEW_STARLETunsigned int lib$remqhiq( int header [4], void *(*(remque_address)), __optional_params);#else /* __OLD_STARLET */+unsigned int lib$remqhiq(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$REMQTI */N/* } */N/* Remove Entry from Tail of Queue */N/* */N/* The Remove Entry from Tail of Queue routine removes an entry from the */N/* tail of the specified self-relative interlocked longword queue. */N/* LIB$REMQTI makes the VAX REMQTI instruction available as a */N/* callable routine. ~*/N/* */#define lib$remqti LIB$REMQTI #ifdef __NEW_STARLETunsigned int lib$remqti( __int64 *header, void *remque_address, __optional_params);#else /* __OLD_STARLET */*unsigned int lib$remqti(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$REMQTIQ */N/* */N/* Remove Entry from Tail of Queue (Quadword) */N/* */N/* The Remove Entry from Tail of Queue routine removes an entry from the */N/* tail of the specified self-relative interlocked quadword queue. */N/* LIB$REMQTIQ makes the Alpha unprivileged PALcode instruction REMQTIQ */N/* available as a callable routine. */N/* */!#define lib$remqtiq LIB$REMQTIQ #ifdef __NEW_STARLETunsigned int lib$remqtiq( int header [4], void *(*(remque_address)), __optional_params);#else /* __OLD_STARLET */+unsigned int lib$remqtiq(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$RENAME_FILE */N/*  */N/* Rename One or More Files */N/* */N/* The Rename One or More Files routine changes the names of one or more */N/* files. The specification of the files to be renamed may include */N/* wildcards. LIB$RENAME_FILE is similar in function to the DCL command */N/* RENAME.  */N/* */)#define lib$rename_file LIB$RENAME_FILE #ifdef __NEW_STARLETunsigned int lib$rename_file( void *old_filespec, void *new_filespec, __optional_params );#else /* __OLD_STARLET *//unsigned int lib$rename_file(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$RESERVE_EF */N/*  */N/* Reserve Event Flag */N/* */N/* The Reserve Event Flag routine allocates a local event flag number */N/* specified by event-flag-number. */N/* */'#define lib$reserve_ef LIB$RESERVE_EF #ifdef  __NEW_STARLETunsigned int lib$reserve_ef(" unsigned int *event_flag_number);#else /* __OLD_STARLET */.unsigned int lib$reserve_ef(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$RESET_VM_ZONE */N/* */N/* Reset Virtual Memory Zone  */N/* */N/* The Reset Virtual Memory Zone routine frees all blocks of memory that */N/* were previously allocated from the zone. */N/* */-#define lib$reset_vm_zone LIB$RESET_VM_ZONE #ifdef __NEW_STARLETunsigned int lib$reset_vm_zone( unsigned int *zone_id);#else /* __OLD_STARLET */1unsigned i nt lib$reset_vm_zone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$RESET_VM_ZONE_64 */N/* */N/* Reset Virtual Memory Zone */N/* */N/* The Reset Virtual Memory Zone routine frees all blocks of memory that */N/* were previously allocated from the zone. */N/* */3#define lib$reset_vm_zone_64 LIB$RESET_VM_ZONE_64 #ifdef __NEW_STARLET"unsigned int lib$reset_vm_zone_64( unsigned __int64 *zone_id);#else /* __OLD_STARLET */4unsigned int lib$reset_vm_zone_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$REVERT  */N/* */N/* Revert to the Handler of the Routine Activator */N/* */O/* The Revert to the Handler of the Routine Activator routine deletes the */O/* condition handler established by LIB$ESTABLISH by clearing the address */N/* pointing to the condition handler from the activated routine's stack */N/* frame. */N/* */N/* ENTRY lib$revert ALIAS $lib_revert */N/* RETURNS ADDRESS NAMED RESULT TYPENAME address; */N/* LIB$RUN_PROGRAM */N/*  */N/* Run New Program */N/* */O/* The Run New Program routine causes the current program to stop running */N/* and begins execution of another program. */N/* */)#define lib$run_program LIB$RUN_PROGRAM #ifdef __NEW_STARLETunsigned int lib$run_program ( void *program_name);#else /* __OLD_STARLET *//unsigned int lib$run_program(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SCANC */N/* */N/* Scan for Characters and Return Relative Position */N/* */P/* The Scan for Characters and Return Rel ative Position routine is used to */N/* find a specified set of characters in the source string. */N/* LIB$SCANC makes the VAX SCANC instruction available as a */N/* callable routine. */N/* */#define lib$scanc LIB$SCANC #ifdef __NEW_STARLETunsigned int lib$scanc( void *source_string, unsigned char table_array [],# unsigne d char *byte_integer_mask);#else /* __OLD_STARLET */)unsigned int lib$scanc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SCOPY_DXDX */N/* */N/* Copy Source String Passed by Descriptor to Destination */N/* */N/* The Copy Source String Passed by Descripto r to Destination routine */N/* copies a source string passed by descriptor to a destination string. */N/* */'#define lib$scopy_dxdx LIB$SCOPY_DXDX #ifdef __NEW_STARLETunsigned int lib$scopy_dxdx( void *source_string, void *destination_string);#else /* __OLD_STARLET */.unsigned int lib$scopy_dxdx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SCOPY_R_DX  */N/* */N/* Copy Source String Passed by Reference to Destination String */N/* */Q/* The Copy Source String Passed by Reference to Destination String routine */N/* copies a source string passed by reference to a destination string. */N/*  */'#define lib$scopy_r_dx LIB$SCOPY_R_DX #ifdef __NEW_STARLETunsigned int lib$scopy_r_dx(0 unsigned short int *word_integer_source_length, char *source_string, void *destination_string);#else /* __OLD_STARLET */.unsigned int lib$scopy_r_dx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SCOPY_R_DX_64 */N/* */N/* Copy Source String  Passed by Reference to Destination String */N/* */Q/* The Copy Source String Passed by Reference to Destination String routine */N/* copies a source string passed by reference to a destination string. */N/* */-#define lib$scopy_r_dx_64 LIB$SCOPY_R_DX_64 #ifdef __NEW_STARLETunsigned int lib$scopy_r_dx_64(. unsigned __int64 *quad_integer_source_length, char *source_string, void *destination_string);#else /* __OLD_STARLET */1unsigned int lib$scopy_r_dx_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SET_LOGICAL */N/* */N/* Set Logical Name */N/*  */N/* The Set Logical Name routine requests the calling process's Command */N/* Language Interpreter (CLI) to define or redefine a supervisor-mode */O/* process logical name. It provides the same function as the DCL DEFINE */N/* command. */N/* */)#define lib$set_logical LIB$SET_LOGICAL #ifdef __NEW_STARLETunsigned int lib$set _logical( void *logical_name, __optional_params );#else /* __OLD_STARLET *//unsigned int lib$set_logical(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SET_SYMBOL */N/* */N/* Set Value of CLI Symbol */N/* */N/* The Set Value of CLI Symbol routine requests the calling process's */O/* Command Language Interpreter (CLI) to define or redefine a CLI symbol. */N/* */'#define lib$set_symbol LIB$SET_SYMBOL #ifdef __NEW_STARLETunsigned int lib$set_symbol( void *symbol, void *value_string, __optional_params);#else /* __OLD_STARLET */.unsigned int lib$set_symbol(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SFREE1_DD */N/* */N/* Free One Dynamic String */N/* */O/* The Free One Dynamic String routine returns the dynamically allocated */N/* storage for a dynamic string. */N/*  */%#define lib$sfree1_dd LIB$SFREE1_DD #ifdef __NEW_STARLETunsigned int lib$sfree1_dd(' unsigned __int64 *descriptor_address);#else /* __OLD_STARLET */-unsigned int lib$sfree1_dd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SFREEN_DD */N/* */N/* Free One or More Dynamic Strings  */N/* */Q/* The Free One or More Dynamic Strings routine returns one or more dynamic */N/* strings to free storage. */N/* */%#define lib$sfreen_dd LIB$SFREEN_DD #ifdef __NEW_STARLETunsigned int lib$sfreen_dd(% unsigned int *number_of_descriptors,- unsigned __ int64 first_descriptor_array []);#else /* __OLD_STARLET */-unsigned int lib$sfreen_dd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SGET1_DD */N/* */N/* Get One Dynamic String */N/* */O/* The Get One Dynamic String routi ne allocates dynamic virtual memory to */N/* the string descriptor you specify. */N/* */##define lib$sget1_dd LIB$SGET1_DD #ifdef __NEW_STARLETunsigned int lib$sget1_dd() unsigned short int *word_integer_length,$ unsigned __int64 *descriptor_part);#else /* __OLD_STARLET */,unsigned int lib$sget1_dd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SGET1_DD_64 */N/* */N/* Get One Dynamic String */N/* */O/* The Get One Dynamic String routine allocates dynamic virtual memory to */N/* the string descriptor you specify. */N/*  */)#define lib$sget1_dd_64 LIB$SGET1_DD_64 #ifdef __NEW_STARLETunsigned int lib$sget1_dd_64(' unsigned __int64 *quad_integer_length,$ unsigned __int64 *descriptor_part);#else /* __OLD_STARLET *//unsigned int lib$sget1_dd_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SHOW_TIMER */N/* */N/* Show Accumulated Times and Counts */N/* */O/* The Show Accumulated Times and Counts routine returns times and counts */O/* accumulated since the last call to LIB$INIT_TIMER and displays them on */N/* SYS$OUTPUT. (LIB$INIT_TIMER must be called prior to invoking this */N/* routine.) A user-supplied action routine may change this default */N/* behavior.  */N/* */'#define lib$show_timer LIB$SHOW_TIMER #ifdef __NEW_STARLETunsigned int lib$show_timer( __optional_params );#else /* __OLD_STARLET */.unsigned int lib$show_timer(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$SHOW_VM  */N/* */N/* Show Virtual Memory Statistics */N/* */N/* The Show Virtual Memory Statistics routine returns the statistics */N/* accumulated from calls to LIB$GET_VM, LIB$FREE_VM, LIB$GET_VM_PAGE, */N/* and LIB$FREE_VM_PAGE. */N/*  */!#define lib$show_vm LIB$SHOW_VM #ifdef __NEW_STARLETunsigned int lib$show_vm( __optional_params );#else /* __OLD_STARLET */+unsigned int lib$show_vm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$SHOW_VM_64 */N/*  */N/* Show Virtual Memory Statistics */N/* */N/* The Show Virtual Memory Statistics routine returns the statistics */N/* accumulated from calls to LIB$GET_VM_64, LIB$FREE_VM_64, */N/* LIB$GET_VM_PAGE_64, and LIB$FREE_VM_PAGE_64. */N/*  */'#define lib$show_vm_64 LIB$SHOW_VM_64 #ifdef __NEW_STARLETunsigned int lib$show_vm_64( __optional_params );#else /* __OLD_STARLET */.unsigned int lib$show_vm_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$SHOW_VM_ZONE */N/* */N/* Return Information About a Zone */N/* */R/* The Return Information About a Zone routine returns formatted information */Q/* about the specified zone, detailing such information as the zone's name, */N/* characteristics, and areas, and then passes the information to the */N/* specified or default action routine. */N/*  */+#define lib$show_vm_zone LIB$SHOW_VM_ZONE #ifdef __NEW_STARLETunsigned int lib$show_vm_zone( unsigned int *zone_id, __optional_params );#else /* __OLD_STARLET */0unsigned int lib$show_vm_zone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$SHOW_VM_ZONE_64 */N/*  */N/* Return Information About a Zone */N/* */R/* The Return Information About a Zone routine returns formatted information */Q/* about the specified zone, detailing such information as the zone's name, */N/* characteristics, and areas, and then passes the information to the */N/* specified or default action routine. */N/* */1#define lib$show_vm_zone_64 LIB$SHOW_VM_ZONE_64 #ifdef __NEW_STARLET!unsigned int lib$show_vm_zone_64( unsigned __int64 *zone_id, __optional_params );#else /* __OLD_STARLET */3unsigned int lib$show_vm_zone_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SIGNAL */N/*  */N/* Signal Exception Condition */N/* */Q/* The Signal Exception Condition routine generates a signal that indicates */Q/* that an exception condition has occurred in your program. If a condition */R/* handler does not take corrective action and the condition is severe, then */N/* your program will exit.  */N/* */#define lib$signal LIB$SIGNAL #ifdef __NEW_STARLETint lib$signal( unsigned int condition_value, __optional_params );#else /* __OLD_STARLET */!int lib$signal(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SIG_TO_RET */N/*  */N/* Signal Converted to a Return Status */N/* */N/* The Signal Converted to a Return Status routine converts any signaled */R/* condition value to a value returned as a function. The signaled condition */N/* is returned to the caller of the user routine that established the */P/* handler that is calling LIB$SIG_TO_RET. This routine may be established */N /* as or called from a condition handler. */N/* */'#define lib$sig_to_ret LIB$SIG_TO_RET #ifdef __NEW_STARLETunsigned int lib$sig_to_ret( unsigned int *signal_arguments,$ unsigned int *mechanism_arguments);#else /* __OLD_STARLET */.unsigned int lib$sig_to_ret(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SIG_TO_STOP  */N/* */N/* Convert a Signaled Condition to a Signaled Stop */N/* */O/* The Convert a Signaled Condition to a Signaled Stop routine converts a */N/* signaled condition to a signaled condition that cannot be continued. */N/* */)#define  lib$sig_to_stop LIB$SIG_TO_STOP #ifdef __NEW_STARLETunsigned int lib$sig_to_stop( unsigned int *signal_arguments,$ unsigned int *mechanism_arguments);#else /* __OLD_STARLET *//unsigned int lib$sig_to_stop(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$SIM_TRAP */N/*  */N/* Simulate Floating Trap */N/* */P/* The Simulate Floating Trap routine converts floating faults to floating */R/* traps. It can be enabled as a condition handler or can be called by one. */N/* */N/* This routine is not available to native Alpha VMS programs, but is */N/* available to translated VAX images. */N/* */##define lib$sim_trap LIB$SIM_TRAP #ifdef __NEW_STARLETunsigned int lib$sim_trap( unsigned int *signal_arguments,$ unsigned int *mechanism_arguments);#else /* __OLD_STARLET */,unsigned int lib$sim_trap(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __lo ng#endifN/* LIB$SKPC */N/* */N/* Skip Equal Characters */N/* */N/* The Skip Equal Characters routine compares each character of a given */O/* string with a given character and returns the relative position of the */N/* first nonequal character as an index. LIB$SKPC makes the VAX SKPC */N/* instruction available as a callable routine. */N/* */#define lib$skpc LIB$SKPC #ifdef __NEW_STARLETunsigned int lib$skpc( void *character_string, void *source_string);#else /* __OLD_STARLET */(unsigned int lib$skpc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SPANC  */N/* */N/* Skip Selected Characters */N/* */P/* The Skip Selected Characters routine is used to skip a specified set of */N/* characters in the source string. LIB$SPANC makes the VAX SPANC */N/* instruction available as a callable routine.  */N/* */#define lib$spanc LIB$SPANC #ifdef __NEW_STARLETunsigned int lib$spanc( void *source_string, unsigned char table_array [],# unsigned char *byte_integer_mask);#else /* __OLD_STARLET */)unsigned int lib$spanc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SPAWN */N/*  */N/* Spawn Subprocess */N/* */O/* The Spawn Subprocess routine requests the command language interpreter */N/* (CLI) of the calling process to spawn a subprocess for executing CLI */R/* commands. LIB$SPAWN provides the same function as the DCL SPAWN command. */N/*  */#define lib$spawn LIB$SPAWN #ifdef __NEW_STARLETunsigned int lib$spawn( __optional_params );#else /* __OLD_STARLET */)unsigned int lib$spawn(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$STAT_TIMER */N/* */N/* Statistics, Return Accumulated Times and Counts */N/*  */N/* The Statistics, Return Accumulated Times and Counts routine returns */N/* to its caller one of five available statistics accumulated since the */O/* last call to LIB$INIT_TIMER. Unlike LIB$SHOW_TIMER, which formats the */N/* values for output, LIB$STAT_TIMER returns the value as an unsigned */N/* longword or quadword. */N/*  */'#define lib$stat_timer LIB$STAT_TIMER #ifdef __NEW_STARLETunsigned int lib$stat_timer( int *code, unsigned int *value_argument, __optional_params);#else /* __OLD_STARLET */.unsigned int lib$stat_timer(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$STAT_VM */N/*  */N/* Return Virtual Memory Statistics */N/* */O/* The Return Virtual Memory Statistics routine returns to its caller one */N/* of six statistics available from calls to LIB$GET_VM/LIB$FREE_VM and */N/* LIB$GET_VM_PAGE/LIB$FREE_VM_PAGE. Unlike LIB$SHOW_VM, which formats */N/* the values for output and displays them on SYS$OUTPUT, LIB$STAT_VM */O/* returns the statistic in the value-argument argument. Only one of the */N/* statistics is returned by each call to LIB$STAT_VM. */N/* */!#define lib$stat_vm LIB$STAT_VM #ifdef __NEW_STARLETunsigned int lib$stat_vm( int *code, unsigned int *value_argument);#else /* __OLD_STARLET */+unsigned int lib$stat_vm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$STAT_VM_64 */N/* */N/* Return Virtual Memory Statistics */N/* */R/* The Return Virtual Memory Statistics routine returns to its caller one of */P/* six statistics available from calls to LIB$GET_VM_64/LIB$FREE_VM_64 and */S/* LIB$GET_VM_PAGE_64/LIB$FREE_VM_PAGE_64. Unlike LIB$SHOW_VM, which formats */N/* the values for output and displays them on SYS$OUTPUT, LIB$STAT_VM_64 */O/* returns the statistic in the value-argument argument. Only one of the */N/* statistics is returned by each call to LIB$STAT_VM_64. */N/* */'#define lib$stat_vm_64 LIB$STAT_ VM_64 #ifdef __NEW_STARLETunsigned int lib$stat_vm_64( __int64 *code,# unsigned __int64 *value_argument);#else /* __OLD_STARLET */.unsigned int lib$stat_vm_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$STAT_VM_ZONE */N/* */N/* Return Information About a Zone */N/*  */N/* The Return Information About a Zone routine returns a single piece of */N/* information about the specified zone. */N/* */N/* Edit: Routine LIB$STAT_VM_ZONE is not yet implemented. */N/* */N/* ENTRY lib$stat_vm_zone ALIAS $lib_stat_vm_zone PARAMETER ( */N/* LONGWORD UNSIGNED NAMED zone_id IN */N/* TYPENAME identifier REFERENCE, */N/* LONGWORD NAMED item_code IN */N/* TYPENAME longword_signed REFERENCE, */N/* LONGWORD NAMED resultant_value OUT OPTIONAL */N/* TYPENAME longword_signed REFERENCE, */N/*  CHARACTER RTL_STR_DESC NAMED resultant_string OUT OPTIONAL */N/* TYPENAME char_string, */N/* WORD UNSIGNED NAMED resultant_length OUT OPTIONAL */N/* TYPENAME word_unsigned REFERENCE ) */N/* RETURNS LONGWORD UNSIGNED TYPENAME cond_value; */N/* LIB$STOP */N/*  */N/* Stop Execution and Signal the Condition */N/* */O/* The Stop Execution and Signal the Condition routine generates a signal */Q/* that indicates that an exception condition has occurred in your program. */O/* Exception conditions signaled by LIB$STOP cannot be continued from the */N/* point of the signal.  */N/* */#define lib$stop LIB$STOP #ifdef __NEW_STARLET int lib$stop( unsigned int condition_value, __optional_params );#else /* __OLD_STARLET */int lib$stop(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SUBX */N/* */N/* Mu ltiple-Precision Binary Subtraction */N/* */O/* The Multiple-Precision Binary Subtraction routine performs subtraction */N/* on signed two's complement integers of arbitrary length. */N/* */#define lib$subx LIB$SUBX #ifdef __NEW_STARLETunsigned int lib$subx( unsigned int *minuend_array,  unsigned int *subtrahend_array, unsigned int *difference_array, __optional_params);#else /* __OLD_STARLET */(unsigned int lib$subx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SUB_TIMES */N/* */N/* Subtract Two Quadword Times */N/*  */N/* The Subtract Two Quadword Times routine subtracts two VMS */N/* internal-time-format times. */N/* */%#define lib$sub_times LIB$SUB_TIMES #ifdef __NEW_STARLETunsigned int lib$sub_times( unsigned __int64 *time1, unsigned __int64 *time2,# unsigned __int64 *resultant_time);#else /* __OLD_STARLET */-unsigned int lib$sub_times(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SYS_ASCTIM */N/* */N/* Invoke $ASCTIM to Convert Binary Time to ASCII String */N/* */T/* The Invoke $ASCTIM to Convert Binary Time to ASCII String routine calls the */V/* system service $ASCTIM to convert a binary date and time value, returning the */N/* ASCII string using the semantics of the caller's string. */N/* */'#define lib$sys_asctim LIB$SYS_ASCTIM #ifdef __NEW_STARLETunsigned int lib$sys_asctim(& unsigned short int *resultant_length, void *time_string, __optional_params );#else /* __OLD_STARLET */.unsigned int lib$sys_asctim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SYS_FAO */N/* */N/* Invoke $FAO System Service to Format Output */N/* */N/* The Invoke $FAO System Service to Format Output routine calls $FAO, */O/* returning a string in the semantics you provide. If called with other */N/* than a fixed-length string for output, the length of the resultant */N/* string is limited to 256 bytes and truncation will occur. */N/* */!#define lib$sys_fao LIB$SYS_FAO #ifdef __NEW_STARLETunsigned int lib$sys_fao( void *character_string,& unsigned short int *resultant_length, void *resultant_string, __optional_params);#else /* __OLD_STARLET */+unsigned int lib$sys_fao(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SYS_FAOL */N/* */N/* Invoke $FAOL System Service to Format Output */N/* */N/* The Invoke $FAOL System Service to Format Output routine calls the */N/* system service routine $FAOL, returning the string in the semantics */N/* you provid e. If called with other than a fixed-length string for */N/* output, the length of the resultant string is limited to 256 bytes */N/* and truncation will occur. */N/* */##define lib$sys_faol LIB$SYS_FAOL #ifdef __NEW_STARLETunsigned int lib$sys_faol( void *character_string,& unsigned short int *resultant_length, void *resultant_string,+ unsigned int *dir ective_argument_address);#else /* __OLD_STARLET */,unsigned int lib$sys_faol(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SYS_FAOL_64 */N/* */N/* Invoke $FAOL System Service to Format Output */N/* */N/* The Invoke $FAOL System Service to Format Output routine calls the */N/* system service routine $FAOL, returning the string in the semantics */N/* you provide. If called with other than a fixed-length string for */N/* output, the length of the resultant string is limited to 256 bytes */N/* and truncation will occur. */N/* */)#define lib$sys_faol_64 LIB$SYS_FAOL_64 #ifdef __NEW_STARLETunsi gned int lib$sys_faol_64( void *character_string,& unsigned short int *resultant_length, void *resultant_string,/ unsigned __int64 *directive_argument_address);#else /* __OLD_STARLET *//unsigned int lib$sys_faol_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SYS_GETMSG */N/* */N/* Invoke $GETMSG System Service to Get Message Text  */N/* */N/* The Invoke $GETMSG System Service to Get Message Text routine calls */N/* the System Service $GETMSG and returns a message string into */N/* destination-string using the semantics of the caller's string. */N/* */'#define lib$sys_getmsg LIB$SYS_GETMSG #ifdef __NEW_STARLETunsigned int lib$sys _getmsg( unsigned int *message_id,$ unsigned short int *message_length, void *destination_string, __optional_params );#else /* __OLD_STARLET */.unsigned int lib$sys_getmsg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$SYS_TRNLOG */N/* */N/* Invoke $TRNLOG System Service to Translate Logical Name */N/*  */N/* The Invoke $TRNLOG System Service to Translate Logical Name routine */N/* uses the system service $TRNLOG to translate a logical name. */N/* LIB$SYS_TRNLOG returns the logical name's translation using the */N/* semantics of the caller's string. */N/* */'#define lib$sys_trnlog LIB$SYS_TRNLOG #ifd ef __NEW_STARLETunsigned int lib$sys_trnlog( void *logical_name,. unsigned short int *word_integer_dest_length, void *destination_string, __optional_params );#else /* __OLD_STARLET */.unsigned int lib$sys_trnlog(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$TPARSE/LIB$TABLE_PARSE */N/* */N/* Table-Driven Finite-State Parser  */N/* */N/* The Table-Driven Finite State Parser routine is a general-purpose, */N/* table-driven parser implemented as a finite-state automaton, with */N/* extensions that make it suitable for a wide range of applications. */N/* It parses a string and returns a message indicating whether or not */N/* the input string is valid. */N/*  */N/* LIB$TPARSE performs this function on VAX VMS. */N/* */N/* LIB$TABLE_PARSE performs this function on Alpha VMS and is available */P/* only on Alpha VMS. LIB$TPARSE is available in translated form on Alpha */P/* VMS. LIB$TABLE_PARSE differs from LIB$TPARSE only in the way that user */N/* specified action routine s are called. */N/* */)#define lib$table_parse LIB$TABLE_PARSE #ifdef __NEW_STARLETunsigned int lib$table_parse( unsigned int *argument_block, unsigned int *state_table, unsigned int *key_table);#else /* __OLD_STARLET *//unsigned int lib$table_parse(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* ENTRY lib$tparse ALIAS $lib_tparse PARAMETER (  */N/* ANY NAMED argument_block IN OUT */N/* TYPENAME any REFERENCE, */N/* ANY NAMED state_table IN */N/* TYPENAME any REFERENCE, */N/* ANY NAMED key_table IN */N/* TYPENAME any REFERENCE ) */N/* RETURNS LON GWORD UNSIGNED TYPENAME cond_value; */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$TRAVERSE_TREE */N/* */N/* Traverse a Balanced Binary Tree */N/* */N/* The Traverse a Balanced Binary Tree routine calls an action routine */N/* for each node in a binary tree. */N/* */-#define lib$traverse_tree LIB$TRAVERSE_TREE #ifdef __NEW_STARLETunsigned int lib$traverse_tree( void *treehead,$ int (*user_action_procedure)(void), __optional_params);#else /* __OLD_STARLET */1unsigned int lib$traverse_tree(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$TRAVERSE_TREE_64 */N/* */N/* Traverse a Balanced Binary Tree */N/* */N/* The Traverse a Balanced Binary Tree routine calls an action routine */N/* for each node in  a binary tree. */N/* */3#define lib$traverse_tree_64 LIB$TRAVERSE_TREE_64 #ifdef __NEW_STARLET"unsigned int lib$traverse_tree_64( void *(*(treehead)),$ int (*user_action_procedure)(void), __optional_params);#else /* __OLD_STARLET */4unsigned int lib$traverse_tree_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$TRA_ASC_EBC  */N/* */N/* Translate ASCII to EBCDIC */N/* */N/* The Translate ASCII to EBCDIC routine translates an ASCII string */N/* to an EBCDIC string. */N/* */)#define lib$tra_asc_ebc LIB$TRA_ASC_EBC #ifdef __NEW_STARLETunsigned int lib$tra_asc_ebc( void *source_string,! void *byte_integer_dest_string);#else /* __OLD_STARLET *//unsigned int lib$tra_asc_ebc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$TRA_EBC_ASC */N/* */N/* Translate EBCDIC to ASCII  */N/* */N/* The Translate EBCDIC to ASCII routine translates an EBCDIC string */N/* to an ASCII string. */N/* */)#define lib$tra_ebc_asc LIB$TRA_EBC_ASC #ifdef __NEW_STARLETunsigned int lib$tra_ebc_asc(" void *byte_integer_source_string, void *destination_string);#else /* __OLD_STARLET *//unsigned int lib$tra_ebc_asc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$TRIM_FILESPEC */N/* */N/* Fit Long File Specification into Fixed Field */N/* */N/* The Fit Long File Specification into Fixed Field routine takes a file */N/* specification, such as an RMS resultant name string, and shortens it */N/* (if necessary) so that it fits into a field of fixed width. */N/* */-#define lib$trim_filespec LIB$TRIM_FILESPEC #ifdef __NEW_STARLETunsigned int lib$trim_filespec( void *old_filespec, void *new_filespec, __optional_params );#else /* __OLD_STARLET */1unsigned int lib$trim_filespec(__unknown_params);!#end if /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* LIB$TRIM_FULLNAME */N/* */N/* Trim a Full Name to Fit into a Desired Output Field */N/* */N/* The Trim a Full Name to Fit into a Desired Output Field routine */N/* trims a full name to fit into a desired output field. */N/* */-#define lib$trim_fullname LIB$TRIM_FULLNAME #ifdef __NEW_STARLETunsigned int lib$trim_fullname( void *fullname, void *trimmed_nodename, __optional_params );#else /* __OLD_STARLET */1unsigned int lib$trim_fullname(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$UID_TO_ASCII  */N/* */N/* Convert a UID to Text */N/* */N/* The Convert a UID to Text routine converts a UID to */N/* standard representation ina an ASCII text string. */N/*  */+#define lib$uid_to_ascii LIB$UID_TO_ASCII #ifdef __NEW_STARLETunsigned int lib$uid_to_ascii( unsigned int input_uid [4], void *output_string);#else /* __OLD_STARLET */0unsigned int lib$uid_to_ascii(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$UNLOCK_IMAGE */N/* */N/* Unlock Image from working set  */N/* */N/* Unlock all address ranges associated with a specified image */N/* from the working set. */N/* */+#define lib$unlock_image LIB$UNLOCK_IMAGE #ifdef __NEW_STARLETunsigned int lib$unlock_image(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *va#else unsigned __int64 va#endif);#else /* __OLD_STARLET */0unsigned int lib$unlock_image(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$VERIFY_VM_ZONE */N/* */N/* Verify a Zone  */N/* */N/* The Verify a Zone routine performs verification of a zone. */N/* *//#define lib$verify_vm_zone LIB$VERIFY_VM_ZONE #ifdef __NEW_STARLET unsigned int lib$verify_vm_zone(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr  size default to 32-bit pointers */#endif unsigned int *zone_id);#else /* __OLD_STARLET */2unsigned int lib$verify_vm_zone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$VERIFY_VM_ZONE_64 */N/* */N/* Verify a Zone  */N/* */N/* The Verify a Zone routine performs verification of a zone. */N/* */5#define lib$verify_vm_zone_64 LIB$VERIFY_VM_ZONE_64 #ifdef __NEW_STARLET#unsigned int lib$verify_vm_zone_64( unsigned __int64 *zone_id);#else /* __OLD_STARLET */5unsigned int lib$verify_vm_zone_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$WAIT */N/* */N/* Wait a Specified Period of Time */N/* */O/* The Wait a Specified Period of Time routine places the current process */N/* into hibernation for the number of seconds specified in its argument. */N/*  */#define lib$wait LIB$WAIT #ifdef __NEW_STARLETunsigned int lib$wait( float *seconds, __optional_params );#else /* __OLD_STARLET */(unsigned int lib$wait(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __LIB_ROUTINES_LOADED */ ww U/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]LIBCLIDEF.SDI;1 *//********************************************************************************* ***********************************************//*** MODULE $LIBCLIDEF ***/#ifndef __LIBCLIDEF_LOADED#define __LIBCLIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* Definitions f or LIB$ CLI callback procedures */#define LIB$K_CLI_LOCAL_SYM 1#define LIB$K_CLI_GLOBAL_SYM 2 #define LIB$M_CLI_CTRLT 0x100000!#define LIB$M_CLI_CTRLY 0x2000000 #ifdef __NEW_STARLET!typedef struct _cli$ctrl_fields {N unsigned lib$v_fill_a_s : 20; /* Ctrl-A to Ctrl-S are unused */! unsigned lib$v_cli_ctrlt : 1;N unsigned lib$v_fill_u_x : 4; /* Ctrl-U to Ctrl-X are unused */! unsigned lib$v_cli_ctrly : 1; unsigned lib$v_fill_0_ : 6; } CLI$CTRL_FIELDS;#else /* __OLD_STARLET */struct cli$ctrl_fields {N unsigned lib$v_fill_a_s : 20; /* Ctrl-A to Ctrl-S are unused */! unsigned lib$v_cli_ctrlt : 1;N unsigned lib$v_fill_u_x : 4; /* Ctrl-U to Ctrl-X are unused */! unsigned lib$v_cli_ctrly : 1; unsigned lib$v_fill_0_ : 6; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LIBCLIDEF_LOADED */ ww+/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA730 4:[STARLET_H.SRC]LIBDCFDEF.SDI;1 *//********************************************************************************************************************************//*** MODULE $LIBDCFDEF ***/#ifndef __LIBDCFDEF_LOADED#define __LIBDCFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* Definitions for LIB$DECODE_FAULT */N/* */N/* Operand definition codes */N/* */#define LIB$M_DCFACC 0x7#define LIB$M_DCFTYP 0xF8 #ifdef __NEW_STARLET#ty pedef struct _lib$b_dcf_operand {N unsigned lib$v_dcfacc : 3; /* Operand access type */N unsigned lib$v_dcftyp : 5; /* Operand data type */ } LIB$B_DCF_OPERAND;#else /* __OLD_STARLET */struct lib$b_dcf_operand {N unsigned lib$v_dcfacc : 3; /* Operand access type */N unsigned lib$v_dcftyp : 5; /* Operand data type */ } ;%#endif /* #ifdef __NEW_STARLET */N/*  */N/* Operand access type codes */N/* */N#define LIB$K_DCFACC_R 1 /* Operand is to be read */N#define LIB$K_DCFACC_M 2 /* Operand is to be modified */N#define LIB$K_DCFACC_W 3 /* Operand is to be written */N#define LIB$K_DCFACC_A 4 /* Operand is an address */]#define LIB$K_DCFACC_V 5 /* Operand is a field (may be register or address) */N#define LIB$K_DCFACC_B 6 /* Operand is a branch displacement */N/* */N/* Operand data type codes */N/* */N#define LIB$K_DCFTYP_B 1 /* Operand is a byte */N#define LIB$K_DCFTYP_W 2 /* Operand is a word */N#define LIB$K_DCFTYP_L 3 /* Operand is a longword */N#define LIB$K_DCFTYP_Q 4 /* Operand is a quadword */N#define LIB$K_DCFTYP_O 5 /* Operand is an octaword */N#define LIB$K_DCFTYP_F 6 /* Operand is an F_floating */N#define LIB$K_DCFTYP_D 7 /* Operand is a D_floating */N#define LIB$K_DCFTYP_G 8 /* Operand is a G_floating */N#define LIB$K_DCFTYP_H 9 /* Operand is an H_floating */N/* */N/* Combined operand access and data type codes */N/* */#define LIB$K_DCFOPR_AB 8#define LIB$K_DCFOPR_RB 9#define LIB$K_DCFOPR_MB 10#define LIB$K_DCFOPR_WB 11#define LIB$K_DCFOPR_VB 12#define LIB$K_DCFOPR_BB 13#define LIB$K_DCFOPR_AW 16#define LIB$K_DCFOPR_RW 17#define LIB$K_DCFOPR_MW 18#define LIB$K_DCFOPR_WW 19#define LIB$K_DCFOPR_VW 20#define LIB$K_DCFOPR_BW 21#define LIB$K_DCFOPR_AL 24#define LIB$K_DCFOPR_RL 25#define LIB$K_DCFOPR_ML 26#define LIB$K_DCFOPR_WL 27#define LIB$K_DCFOPR_VL 28#define LIB$K_DCFOPR_BL 29#define LIB$K_DCFOPR_AQ 32#define LIB$K_DCFOPR_RQ 33#define LIB$K_DCFOPR_MQ 34#define LIB$K_DCFOPR_WQ 35#define LIB$K_DCFOPR_VQ 36#define LIB$K_DCFOPR_AO 40#define LIB$K_DCFOPR_RO 41#define LIB$K_DCFOPR_MO 42#define LIB$K_DCFOPR_WO 43#define LIB$K_DCFOPR_VO 44#define LIB$K_DCFOPR_AF 48#define LIB$K_DCFOPR_RF 49#define LIB$K_DCFOPR_MF 50#define LIB$K_DCFOPR_WF 51#define LIB$K_DCFOPR_VF 52#define LIB$K_DCFOPR_AD 56#define LIB$K_DCFOPR_RD 57#define LIB$K_DCFOPR_MD 58#define LIB$K_DCFOPR_WD 59#define LIB$K_DCFOPR_VD 60#define LIB$K_DCFOPR_AG 64#define LIB$K_DCFOPR_RG 65#define LIB$K_DCFOPR_MG 66#define LIB$K_DCFOPR_WG 67#define LIB$K_DCFOPR_VG 68#define LIB$K_DCFOPR_AH 72#define LIB$K_DCFOPR_RH 73#define LIB$K_DCFOPR_MH 74#define LIB$K_DCFOPR_WH 75#define LIB$K_DCFOPR_VH 76#define LIB$K_DCFOPR_END 0N/* */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore  /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LIBDCFDEF_LOADED */ ww;/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// ----------------------- ------------------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * * */P/* * Confidential computer software.  Valid license from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license.  * */P/* * * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty. * */P/* * * */P/* ************************************************************************* *//* ******************************************************************************************************************************** */@/* Created: 5-Apr-201 2 13:00:55 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:55 $1$DGA7304:[STARLET_H.SRC]LIBMSG.SDL;1 *//* ******************************************************************************************************************************** */  /* .MACRO $LIBDEF,$GBL */ /* $DEFINI LIB,$GBL *//* */S/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:55.23 *//* *//* FILE: LIBMSG.MSG *//* */S/* ****************************************** ********************************** *//* * * */E/* * COPYRIGHT (C) 1978, 1980, 1982, 1984, 1986, 1991 BY * */G/* * DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */)/* * ALL RIGHTS RESERVED. * *//* * * */S/* * THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */S/* * ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */S/* * INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS S OFTWARE OR ANY OTHER * */S/* * COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */S/* * OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */"/* * TRANSFERRED. * *//* * * */S/* * THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */S/* * AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */"/* * CORPORATION. * *//* * * */S/* *  DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */H/* * SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * * *//* * * */S/* **************************************************************************** *//* *//* */D/* 1-013 - ADD LIB$_KEYALRINS, LIB$_KEYNOTFOU. SBL 20-MAR-1981 */-/* 1-014 - ADD LIB$_INVCVT. FM 24-MAR-81 */P/* 1-015 - ADD LIB$_INVDTYDSC, LIB$_INVCLADSC, LIB$_INVCLADTY, LIB$_INVNBDS */;/* LIB$_DESSTROVF, LIB$_OUTSTRTRU. FM 21-APR-81 */R/* 2-001 - CONVERT TO MESSAGE UTILITY SOURCE FORMAT. ADAPTED FROM LIBMSG.MDL */)/* VERSION 1-015. SBL 23-APR-1981 */C/* 2-002 - USE LIB$ FACILITY FOR LIB$_NORMAL. SBL 27-APR-1981 */U/* 2-003 - ADD LIB$_INTOVF, LIB$_FLTOVF, LIB$_FLTUND, LIB$_DECOVF, LIB$_ROPRAND. */3/* 2-004 - ADD LIB$_WRONUMARG. RKR 4-SEP-1981 */D/* 2-005 - ADD MESSAGES FOR LIB$CLI_CALLBACK. SBL 14-SEPT-1981 */R/* 2-006 - ADD LIB$_INVSYMNAM, MESSAGES FOR LIB$EXTEND_RANGE. SBL 1-OCT-1981 */A/* 2-007 - ADD LIB$_WASSET AND LIB$_WASCLR. SBL 16-OCT-1981 */@/* 2-008 - CORRECT TYPO IN LIB$_UNAEXTRAN. SBL 30-OCT-1981 */Y/* 2-009 - REMOVE LIB$_WASSET AND LIB$_WASCLR. ADD LIB$_ATTREQREF. SBL 21-DEC-1981 */F/* 2-010 - REMOVE MESSAGES FOR LIB$EXTEND_RANGE. SBL 22-DEC-1981 */./* 2-011 - CORRECT TYPO. SBL 23-DEC-1981 */U/* 2-012 - ADD LIB$_INVFILSPE FOR FILE MANIPULATION PROCEDURES. MLJ 30-DEC-1981 */?/* 2-013 - ADD L IB$_ERRROUCAL AND .TITLE. SBL 28-AUG-1982 */K/* 2-014 - ADD LIB$_INVXAB, LIB$_FILFAIMAT, LIB$_NEGANS, LIB$_QUIPRO, */)/* LIB$_QUICONACT. TSK 20-SEP-1982 */1/* 2-015 - ADD LIB$_RESTART. SBL 1-MAR-1983 */F/* 2-016 - ADD LIB$_NO_STRACT FOR SCREEN PACKAGE. PLL 19-JUL-1983 */N/* 2-017 - ADD SEVERAL NEW MESSAGES FOR LIB$$READ_OBJECT. BLS 25-FEB-1984 */G/* 2-018 - ADD NEW MESSAGES FOR FUTURE LIB$VM. BLS 11-APR-1984 */1/* 2-019 - ADD LIB$_NOTIMP. MDL 11-JUL-1985 */3/* 2-020 - ADD LIB$_BADZONE. SMM 09-APR-1986 *//* */H/* 2-021 - ADD ERROR MESSAGES FOR DATE/TIME ROUTINES. LIB$_IVTIME, */J/* LIB$_ONEDELTIM, LIB$_NEGTIM, LIB$_INVARGORD, LIB$_INVOPER, */9/* LIB$_ABSTIMREQ, LIB$_DELTIMREQ JWN 14-NOV-1986 */L/* 2-022 - ADD SEVERAL NEW MESSAGES FOR LIB$DATE_FORMAT AKS 20-NOV-1986 */Q/* 2-023 - ADD NEW MESSAGES AND UPDATES FOR LIB$DATE_STRING. EGM 12-JAN-1987 */R/* 2-024 - ADD NEW MESSAGES FOR VAXC MEMORY MANAGEMENT SUPPORT AKS 3-OCT-1 988 */O/* 2-025 - ADD LITERALS FOR SHR$_ SYMBOLS USED BY LIBRTL. KC 16-OCT-1989. *///* X-5 - MAH MARK A. HOWELL 3-AUG-1990 *//* ADD LIB$UID MESSAGES *///* X-7 - CW CHRIS WHITAKER 25-FEB-1991 */&/* ROLL LIB UID SUPPORT FORWARD */6/* X-8 - CORRECT TEXT FOR FLTUND. GAS 16-SEP-1991 */./* X-3 RAB RICHARD A. BISHOP 29-JAN-1992 */6/* MERGE INTO ALPHA THE POST-V5.4 CHANGES IN VMS. */>/* SINCE THERE HAVE BEEN NO CHANGES IN THE ALPHA VERSION */>/* OF THIS FILE SINCE V5.4 (OTHER THAN AUDIT TRAIL), THE */9/* PRECEDING AUDIT TRAIL IS FROM THE VMS MASTERPACK. *//* *///* X-4 JAH0090 JOHN A HARNEY 28-MAR-1994 */+/* ADD MESSAGE FOR LIB$BUILD_NODESPEC: */B/* NODTOOLNG - PRIMARY NODE NAME TOO LONG AFTER BEING QUOTED */(/* ADD MESSAGE FOR LIB$GET_HOSTNAME */+/* NOHOSNAM - NO HOST NODE NAME FOUND *//* - *//* + */D/* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: *//* *//* LIB$_ABCMNOXYZ *//* */Q/* I N ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */S/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR */8/* MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS. *//* */R/* THE NAMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD APPEAR */</* IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION. *//* *//* ;.MACRO-32 PROGRAMMING: *//* *//* THE;.MACROS CALL: *//* *//* $LIBDEF *//* */B/* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */@/* THE RUN-TIME LIBRARY DECLARES THESE SYMBOLS AS EXTERNAL; */F/* THE;.MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER. *//* - */#/* ; SET LH TO 21 (DECIMAL). */#define LIB$_FACILITY 21#define LIB$_NORMAL 1409025#define LIB$_STRTRU 1409041#define LIB$_ONEENTQUE 1409049;/* ; LIB$INSQHI, LIB$INSQTI, LIB$REMQHI, LIB$REMQTI */#define LIB$_KEYALRINS 1409057/* ; LIB$INSERT_TREE */#define LIB$_ERRROUC AL 1409065,/* ; LIB$DELETE_FILE, LIB$RENAME_FILE */#define LIB$_RESTART 1409073/* ; LIB$DECODE_FAULT */>/* ; NOTE: ERROR CODES MUST NOT OVERLAP SUCESS CODES!!! */0/* ; SET SUB-SYSTEM SPECIFIC BIT FOR NOW. */#/* ; SET LH TO 21 (DECIMAL). */6/* ; SO THAT EACH CODE WILL BE AN WARNING CODE. */0/* ; SET SUB-SYSTEM SPECIFIC BIT FOR NOW. */#define LIB$_BADSTA 1409540/* ; LIB$FIXUP_FLT */#define LIB$_FATERRLIB 1409548/* ; LIB$VM_GET */#define LI B$_INSVIRMEM 1409556)/* ; LIB$VM_GET, LIB$LOOKUP_KEY */#define LIB$_INPSTRTRU 1409564/* ; LIB$GET_INPUT */#define LIB$_INVSTRDES 1409572/* ; LIB$SCOPY_XXXX */#define LIB$_INTLOGERR 1409580#define LIB$_INVARG 1409588/* ; LIB$LOOKUP_KEY */#define LIB$_AMBKEY 1409596/* ; LIB$LOOKUP_KEY */#define LIB$_UNRKEY 1409604#define LIB$_PUSSTAOVE 1409612/* ; LIB$FIXUP_FLT */#define LIB$_USEFLORES 1409620/* ; LIB$LOOKUP_KEY */#d efine LIB$_SIGNO_ARG 1409628#/* ; LIB$SIGNAL, LIB$STOP */#define LIB$_BADBLOADR 1409636(/* ; LIB$FREE_VM, LIB$VM_FREE[_P] */#define LIB$_BADBLOSIZ 1409644/* ; LIB$GET_VM */#define LIB$_NOTFOU 1409652/* ; LIB$FFS, LIB$FFC */#define LIB$_ATTCONSTO 1409660 /* ; LIB$SIGNAL, LIB$STOP */#define LIB$_SYNTAXERR 1409668#define LIB$_INVTYPE 1409676/* ; LIB$TPARSE */#define LIB$_INSEF 1409684/* ; LIB$GET_EF */#define LIB$_EF_ALRFRE 1409692/* ; LIB$FREE_EF */#define LIB$_EF_ALRRES 1409700/* ; LIB$RESERVE_EF */#define LIB$_EF_RESSYS 1409708'/* ; LIB$FREE_EF, LIB$RESERVE_EF */#define LIB$_INSLUN 1409716/* ; LIB$GET_LUN */#define LIB$_LUNALRFRE 1409724/* ; LIB$FREE_LUN */#define LIB$_LUNRESSYS 1409732)/* ; LIB$FREE_LUN, LIB$RESERVE_LUN */#define LIB$_SCRBUFOVF 1409740/* ; SCR PACKAGE */#define LIB$_INVSCRPOS 1409748/* ; SCR PACKAGE */#define LIB$_SECINTFAI 1409756:/* ; LIB$INSQHI, LIB$INSQTI, LIB$REMQHI, LIB$REMQTI */#define LIB$_INVCHA 1409764,/* ; LIB$TRA_ASC_EBC, LIB$TRA_EBC_ASC */#define LIB$_QUEWASEMP 1409772"/* ; LIB$REMQHI, LIB$REMQTI */#define LIB$_STRIS_INT 1409780/* ; LIB$SCOPY, ETC. */#define LIB$_KEYNOTFOU 1409788/* ; LIB$LOOKUP_TREE */#define LIB$_INVCVT 1409796/* ; LIB$CVTDXDX */#define LIB$_INVDTYDSC 1409804/* ; LIB$CVTDXDX */#define LIB$_INVCLADSC 1409812/* ; LIB$CVTDXDX */#define LIB$_INVCLADTY 1409820/* ; LIB$CVTDXDX */#define LIB$_INVNBDS 1409828/* ; LIB$CVTDXDX */#define LIB$_DESSTROVF 1409836/* ; LIB$CVTDXDX */#define LIB$_INTOVF 1409844/* ; LIB$CVTDXDX */#define LIB$_DECOVF 1409852/* ; LIB$CVTDXDX */#define LIB$_FLTOVF 1409860/* ; LIB$CVTDXDX */#define LIB$_FLTUND 1409868/* ; LIB$CVTDXDX */#define LIB$_ROPRAND 1409876/* ; LIB$CVTDXDX */#define LIB$_WRONUMARG 1409884/* ; LIB$ANALYZE_SDESC */#define LIB$_NOSUCHSYM 1409892/* ; LIB$CLI_CALLBACK */#define LIB$_INSCLIMEM 1409900/* ; LIB$CLI_CALLBACK */#define LIB$_AMBSYMDEF 1409908/* ; LIB$CLI_CALLBACK */#define LIB$_NOCLI 1409916/* ; LIB$CLI_CALLBACK */#define LIB$_UNECLIERR 1409924/* ; LIB$CLI_CALLBACK */#define LIB$_INVSYMNAM 1409932/* ; LIB$CLI_CALLBACK */#define LIB$_ATTREQREF 1409940/* ; LIB$ATTACH */#define LIB$_INVFILSPE 14099483/* ; LIB$FID_TO_NAME, LIB$EXTRACT_CONCEALED, */>/* ; LIB$SET_FILE_PROT, LIB$UNLOCK_FILE, LIB$CREATE_DIR */#define LIB$_INVXAB 1409956/* ; LIB$QUAL_FILE_PARSE */#define LIB$_NO_STRACT 1409964/* ; SCR PACKAGE */#define LIB$_BADTAGVAL 1409972/* ; LIB$VM */#define LIB$_INVOPEZON 1409980/* ; LIB$VM */#define LIB$_PAGLIMEXC 1409988/* ; LIB$VM */#define LIB$_NOTIMP 1409996/* ; LIB$NOT_IMPLEMENTED */#define LIB$_BADZONE 1410004B/* ; LIB$VERIFY_VM_ZONE, LIB$SHOW_VM_ZONE, LIB$STAT_VM_ZONE *//* ; LIB$FIND_VM_ZONE */#define LIB$_IVTIME 1410012@/* ; LIB$ADD_TIMES, LIB$SUB_TIMES, LIB$MULIPLY_DELTA_TIME */?/* ; LIB$MULTIPLY_DELTA_TIME_F, LIB$CVT_TO_INTERNAL_TIME */?/* ; LIB$CVT_FROM_INTERNAL_TIME, LIB$CONVERT_DATE_STRING */#define LIB$_ONEDELTIM 1410020/* ; LIB$ADD_TIMES */#define LIB$_NEGTIM 1410028/* ; LIB$SUB_TIMES */#define LIB$_INVARGORD 1410036/* ; LIB$SUB_TIMES */#define LIB$_ABSTIMREQ 1410044&/* ; LIB$CVT_FROM_INTERNAL_TIME */#define LIB$ _DELTIMREQ 1410052&/* ; LIB$CVT_FROM_INTERNAL_TIME */#define LIB$_INVOPER 1410060%/* ; LIB$CVT_XXX_INTERNAL_TIME */#define LIB$_REENTRANCY 1410068</* ;LIB$FORMAT_DATE_TIME, LIB$INIT_DATE_TIME_CONTEXT, */7/* ;LIB$CONVERT_DATE_STRING, LIB$GET_DATE_FORMAT */#define LIB$_UNRFORCOD 14100769/* ;LIB$FORMAT_DATE_TIME, LIB$CONVERT_DATE_STRING, *//* ;LIB$GET_DATE_FORMAT */#define LIB$_ILLINISTR 1410084%/* ;LIB$INIT_DATE_TIME_CONTEXT */ #define LIB$_NUMELEMENTS 1410092%/* ;LIB$INIT_DATE_TIME_CONTEXT */#define LIB$_ELETOOLON 1410100%/* ;LIB$INIT_DATE_TIME_CONTEXT */!#define LIB$_ILLCOMPONENT 1410108%/* ;LIB$INIT_DATE_TIME_CONTEXT */#define LIB$_AMBDATTIM 1410116"/* ;LIB$CONVERT_DATE_STRING */#define LIB$_INCDATTIM 1410124"/* ;LIB$CONVERT_DATE_STRING */#define LIB$_ILLFORMAT 14101327/* ;LIB$CONVERT_DATE_STRING, LIB$GET_DATE_FORMAT */#define LIB$_UNSUPVER 1410140?/* ; LIB$ASCII_TO_UID, LIB$COMPARE_UID, LIB$UID_TO_ASCII */#define LIB$_BADFORMAT 1410148/* ; LIB$ASCII_TO_UID */#define LIB$_NODTOOLNG 1410156/* ; LIB$BUILD_NODESPEC */#define LIB$_NOHOSNAM 1410164/* ; LIB$GET_HOSTNAME */#define LIB$_OUTSTRTRU 1413120/* ; LIB$CVTDXDX */#define LIB$_FILFAIMAT 1413128/* ; LIB$QUAL_FILE_MATCH */#define LIB$_NEGANS 1413136/* ; LIB$CONFIRM_ACT */#define LIB$_QUIPRO 14131440/* ; LIB$CONFIRM_ACT, LIB$QUAL_FILE_MATCH */#define LIB$_QUICONACT 14131520/* ; LIB$CONFIRM_ACT, LIB$QUAL_FILE_MATCH */#define LIB$_ENGLUSED 14131609/* ;LIB$FORMAT_DATE_TIME, LIB$CONVERT_DATE_STRING, *//* ;LIB$GET_DATE_FORMAT */#define LIB$_DEFFORUSE 14131689/* ;LIB$FORMAT_DATE_TIME, LIB$CONVERT_DATE_STRING, *//* ;LIB$GET_DATE_FORMAT */#define LIB$_MEMALRFRE 1413176/* ;LIB$VM_FREE */#define LIB$_BADCCC 1425408/* ; LIB$$READ_OBJECT */#define LIB$_EOMERROR 1425416/* ; LIB$$READ_OBJECT */#define LIB$_EOMFATAL 1425424/*  ; LIB$$READ_OBJECT */#define LIB$_EOMWARN 1425432/* ; LIB$$READ_OBJECT */#define LIB$_GSDTYP 1425440/* ; LIB$$READ_OBJECT */#define LIB$_ILLFMLCNT 1425448/* ; LIB$$READ_OBJECT */#define LIB$_ILLMODNAM 1425456/* ; LIB$$READ_OBJECT */#define LIB$_ILLPSCLEN 1425464/* ; LIB$$READ_OBJECT */#define LIB$_ILLRECLEN 1425472/* ; LIB$$READ_OBJECT */#define LIB$_ILLRECLN2 1425480/* ; LIB$$READ_OBJECT */#define LIB$_ILLRECTYP 1425488/* ; LIB$$READ_OBJECT */#define LIB$_ILLRECTY2 1425496/* ; LIB$$READ_OBJECT */#define LIB$_ILLSYMLEN 1425504/* ; LIB$$READ_OBJECT */#define LIB$_NOEOM 1425512/* ; LIB$$READ_OBJECT */#define LIB$_RECTOOSML 1425520/* ; LIB$$READ_OBJECT */#define LIB$_SEQUENCE 1425528/* ; LIB$$READ_OBJECT */#define LIB$_SEQUENCE2 1425536/* ; LIB$$READ_OBJECT */#define LIB$_STRLVL 1425544/* ; LIB$$READ_OBJECT */#define LIB$_NOWILD 1380650#define LIB$_ACTIMAGE 1381050#define LIB$_OPENIN 1380506#define LIB$_CLOSEIN 1380432#define LIB$_READERR 1380530 /* $DEFEND LIB,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]LIBMSG.SDI;1 */ /********************************************************************************************************************************//*** MODULE $LIBDEF ***/#ifndef __LIBDEF_LOADED#define __LIBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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#e lse#define __union variant_union#endif#endif N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:39.53 */N/* */N/* FILE: LIBMSG.MSG */N/* */Q/******************************************* ********************************** *//** * */C/** COPYRIGHT (C) 1978, 1980, 1982, 1984, 1986, 1991 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY  OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY  FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/* */N/* */N/* 1-013 - ADD LIB$_KEYALRINS, LIB$_KEYNOTFOU. SBL 20-MAR-1981 */G/* 1-014 - ADD LIB!$_INVCVT. FM 24-MAR-81 */N/* 1-015 - ADD LIB$_INVDTYDSC, LIB$_INVCLADSC, LIB$_INVCLADTY, LIB$_INVNBDS */I/* LIB$_DESSTROVF, LIB$_OUTSTRTRU. FM 21-APR-81 */P/* 2-001 - CONVERT TO MESSAGE UTILITY SOURCE FORMAT. ADAPTED FROM LIBMSG.MDL */I/* VERSION 1-015. SBL 23-APR-1981 */N/* 2-002 - USE LIB$ FACILITY FOR LIB$_NORMAL. SBL 27-APR-1981 */S/* 2-003 - ADD LIB$_INTOVF, LIB$_FLTOVF, LIB$_FLTUND, LI"B$_DECOVF, LIB$_ROPRAND. */N/* 2-004 - ADD LIB$_WRONUMARG. RKR 4-SEP-1981 */N/* 2-005 - ADD MESSAGES FOR LIB$CLI_CALLBACK. SBL 14-SEPT-1981 */P/* 2-006 - ADD LIB$_INVSYMNAM, MESSAGES FOR LIB$EXTEND_RANGE. SBL 1-OCT-1981 */N/* 2-007 - ADD LIB$_WASSET AND LIB$_WASCLR. SBL 16-OCT-1981 */N/* 2-008 - CORRECT TYPO IN LIB$_UNAEXTRAN. SBL 30-OCT-1981 */W/* 2-009 - REMOVE LIB$_WASSET AND LIB$_WASCLR. ADD LIB$_ATTREQREF. SBL 2#1-DEC-1981 */N/* 2-010 - REMOVE MESSAGES FOR LIB$EXTEND_RANGE. SBL 22-DEC-1981 */N/* 2-011 - CORRECT TYPO. SBL 23-DEC-1981 */S/* 2-012 - ADD LIB$_INVFILSPE FOR FILE MANIPULATION PROCEDURES. MLJ 30-DEC-1981 */N/* 2-013 - ADD LIB$_ERRROUCAL AND .TITLE. SBL 28-AUG-1982 */N/* 2-014 - ADD LIB$_INVXAB, LIB$_FILFAIMAT, LIB$_NEGANS, LIB$_QUIPRO, */I/* LIB$_QUICONACT. TSK 20-SEP-1982 */N/* 2-015$ - ADD LIB$_RESTART. SBL 1-MAR-1983 */N/* 2-016 - ADD LIB$_NO_STRACT FOR SCREEN PACKAGE. PLL 19-JUL-1983 */N/* 2-017 - ADD SEVERAL NEW MESSAGES FOR LIB$$READ_OBJECT. BLS 25-FEB-1984 */N/* 2-018 - ADD NEW MESSAGES FOR FUTURE LIB$VM. BLS 11-APR-1984 */N/* 2-019 - ADD LIB$_NOTIMP. MDL 11-JUL-1985 */N/* 2-020 - ADD LIB$_BADZONE. SMM 09-APR-1986 */N/* % */N/* 2-021 - ADD ERROR MESSAGES FOR DATE/TIME ROUTINES. LIB$_IVTIME, */N/* LIB$_ONEDELTIM, LIB$_NEGTIM, LIB$_INVARGORD, LIB$_INVOPER, */I/* LIB$_ABSTIMREQ, LIB$_DELTIMREQ JWN 14-NOV-1986 */N/* 2-022 - ADD SEVERAL NEW MESSAGES FOR LIB$DATE_FORMAT AKS 20-NOV-1986 */O/* 2-023 - ADD NEW MESSAGES AND UPDATES FOR LIB$DATE_STRING. EGM 12-JAN-1987 */P/* 2-024 - ADD NEW MESSAGES FOR VAXC MEMORY MANAGEMENT SUPPORT & AKS 3-OCT-1988 */N/* 2-025 - ADD LITERALS FOR SHR$_ SYMBOLS USED BY LIBRTL. KC 16-OCT-1989. */./* X-5 - MAH MARK A. HOWELL 3-AUG-1990 */I/* ADD LIB$UID MESSAGES */-/* X-7 - CW CHRIS WHITAKER 25-FEB-1991 */I/* ROLL LIB UID SUPPORT FORWARD */M/* X-8 - CORRECT TEXT FOR FLTUND. GAS 16-SEP-1991 */</* X-3 RAB RICHARD A. BISHOP 29-JAN-1992 */I/* MERGE INTO AL'PHA THE POST-V5.4 CHANGES IN VMS. */I/* SINCE THERE HAVE BEEN NO CHANGES IN THE ALPHA VERSION */I/* OF THIS FILE SINCE V5.4 (OTHER THAN AUDIT TRAIL), THE */I/* PRECEDING AUDIT TRAIL IS FROM THE VMS MASTERPACK. */N/* */=/* X-4 JAH0090 JOHN A HARNEY 28-MAR-1994 */I/* ADD MESSAGE FOR LIB$BUILD_NODESPEC: */(B/* NODTOOLNG - PRIMARY NODE NAME TOO LONG AFTER BEING QUOTED */I/* ADD MESSAGE FOR LIB$GET_HOSTNAME */B/* NOHOSNAM - NO HOST NODE NAME FOUND */N/*- */N/*+ */N/* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */N/* ) */I/* LIB$_ABCMNOXYZ */N/* */O/* IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */Q/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR */N/* MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS. */N/* **/P/* THE NAMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD APPEAR */N/* IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION. */N/* */N/* MACRO-32 PROGRAMMING: */N/* */N/* THE MACROS CALL: */N/* + */I/* $LIBDEF */N/* */N/* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */N/* THE RUN-TIME LIBRARY DECLARES THESE SYMBOLS AS EXTERNAL; */N/* THE MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER. */N/*- , */;/* ; SET LH TO 21 (DECIMAL). */#define LIB$_FACILITY 21#define LIB$_NORMAL 1409025#define LIB$_STRTRU 1409041#define LIB$_ONEENTQUE 1409049;/* ; LIB$INSQHI, LIB$INSQTI, LIB$REMQHI, LIB$REMQTI */#define LIB$_KEYALRINS 1409057;/* ; LIB$INSERT_TREE */#define LIB$_ERRROUCAL 1409065;/* ; LIB$DELETE_FILE, LIB$RENAME_FILE */#define LIB$_RESTART 1409073;/* ; LIB$DECOD -E_FAULT */</* ; NOTE: ERROR CODES MUST NOT OVERLAP SUCESS CODES!!! */;/* ; SET SUB-SYSTEM SPECIFIC BIT FOR NOW. */;/* ; SET LH TO 21 (DECIMAL). */;/* ; SO THAT EACH CODE WILL BE AN WARNING CODE. */;/* ; SET SUB-SYSTEM SPECIFIC BIT FOR NOW. */#define LIB$_BADSTA 1409540;/* ; LIB$FIXUP_FLT */#define LIB$_FATERRLIB 1409548;/* ; LIB$VM_GET . */#define LIB$_INSVIRMEM 1409556;/* ; LIB$VM_GET, LIB$LOOKUP_KEY */#define LIB$_INPSTRTRU 1409564;/* ; LIB$GET_INPUT */#define LIB$_INVSTRDES 1409572;/* ; LIB$SCOPY_XXXX */#define LIB$_INTLOGERR 1409580#define LIB$_INVARG 1409588;/* ; LIB$LOOKUP_KEY */#define LIB$_AMBKEY 1409596;/* ; LIB$LOOKUP_KEY / */#define LIB$_UNRKEY 1409604#define LIB$_PUSSTAOVE 1409612;/* ; LIB$FIXUP_FLT */#define LIB$_USEFLORES 1409620;/* ; LIB$LOOKUP_KEY */#define LIB$_SIGNO_ARG 1409628;/* ; LIB$SIGNAL, LIB$STOP */#define LIB$_BADBLOADR 1409636;/* ; LIB$FREE_VM, LIB$VM_FREE[_P] */#define LIB$_BADBLOSIZ 1409644;/* ; LIB$GET_VM 0 */#define LIB$_NOTFOU 1409652;/* ; LIB$FFS, LIB$FFC */#define LIB$_ATTCONSTO 1409660;/* ; LIB$SIGNAL, LIB$STOP */#define LIB$_SYNTAXERR 1409668#define LIB$_INVTYPE 1409676;/* ; LIB$TPARSE */#define LIB$_INSEF 1409684;/* ; LIB$GET_EF */#define LIB$_EF_ALRFRE 1409692;/* ; LIB$FREE_EF 1 */#define LIB$_EF_ALRRES 1409700;/* ; LIB$RESERVE_EF */#define LIB$_EF_RESSYS 1409708;/* ; LIB$FREE_EF, LIB$RESERVE_EF */#define LIB$_INSLUN 1409716;/* ; LIB$GET_LUN */#define LIB$_LUNALRFRE 1409724;/* ; LIB$FREE_LUN */#define LIB$_LUNRESSYS 1409732;/* ; LIB$FREE_LUN, LIB$RESERVE_LUN */#define LIB$_SCRBUFOVF 14097 240;/* ; SCR PACKAGE */#define LIB$_INVSCRPOS 1409748;/* ; SCR PACKAGE */#define LIB$_SECINTFAI 1409756;/* ; LIB$INSQHI, LIB$INSQTI, LIB$REMQHI, LIB$REMQTI */#define LIB$_INVCHA 1409764;/* ; LIB$TRA_ASC_EBC, LIB$TRA_EBC_ASC */#define LIB$_QUEWASEMP 1409772;/* ; LIB$REMQHI, LIB$REMQTI */#define LIB$_STRIS_INT 1409780;/* ; LIB$SCOPY, ETC. 3 */#define LIB$_KEYNOTFOU 1409788;/* ; LIB$LOOKUP_TREE */#define LIB$_INVCVT 1409796;/* ; LIB$CVTDXDX */#define LIB$_INVDTYDSC 1409804;/* ; LIB$CVTDXDX */#define LIB$_INVCLADSC 1409812;/* ; LIB$CVTDXDX */#define LIB$_INVCLADTY 1409820;/* ; LIB$CVTDXDX */#define LI 4B$_INVNBDS 1409828;/* ; LIB$CVTDXDX */#define LIB$_DESSTROVF 1409836;/* ; LIB$CVTDXDX */#define LIB$_INTOVF 1409844;/* ; LIB$CVTDXDX */#define LIB$_DECOVF 1409852;/* ; LIB$CVTDXDX */#define LIB$_FLTOVF 1409860;/* ; LIB$CVTDXDX */#define LIB$_FLTUND 1409868;/* ; LIB$CVTDXDX 5 */#define LIB$_ROPRAND 1409876;/* ; LIB$CVTDXDX */#define LIB$_WRONUMARG 1409884;/* ; LIB$ANALYZE_SDESC */#define LIB$_NOSUCHSYM 1409892;/* ; LIB$CLI_CALLBACK */#define LIB$_INSCLIMEM 1409900;/* ; LIB$CLI_CALLBACK */#define LIB$_AMBSYMDEF 1409908;/* ; LIB$CLI_CALLBACK */ 6#define LIB$_NOCLI 1409916;/* ; LIB$CLI_CALLBACK */#define LIB$_UNECLIERR 1409924;/* ; LIB$CLI_CALLBACK */#define LIB$_INVSYMNAM 1409932;/* ; LIB$CLI_CALLBACK */#define LIB$_ATTREQREF 1409940;/* ; LIB$ATTACH */#define LIB$_INVFILSPE 1409948;/* ; LIB$FID_TO_NAME, LIB$EXTRACT_CONCEALED, */</* ; LIB$SET_FILE_PROT, LIB$UNLOCK_FIL 7E, LIB$CREATE_DIR */#define LIB$_INVXAB 1409956;/* ; LIB$QUAL_FILE_PARSE */#define LIB$_NO_STRACT 1409964;/* ; SCR PACKAGE */#define LIB$_BADTAGVAL 1409972;/* ; LIB$VM */#define LIB$_INVOPEZON 1409980;/* ; LIB$VM */#define LIB$_PAGLIMEXC 1409988;/* ; LIB$VM */#define LIB$_NOT 8IMP 1409996;/* ; LIB$NOT_IMPLEMENTED */#define LIB$_BADZONE 1410004@/* ; LIB$VERIFY_VM_ZONE, LIB$SHOW_VM_ZONE, LIB$STAT_VM_ZONE */;/* ; LIB$FIND_VM_ZONE */#define LIB$_IVTIME 1410012>/* ; LIB$ADD_TIMES, LIB$SUB_TIMES, LIB$MULIPLY_DELTA_TIME */=/* ; LIB$MULTIPLY_DELTA_TIME_F, LIB$CVT_TO_INTERNAL_TIME */=/* ; LIB$CVT_FROM_INTERNAL_TIME, LIB$CONVERT_DATE_STRING */#define LIB$_ONEDELTIM 1410020;/* ; LIB$ADD_TIM 9ES */#define LIB$_NEGTIM 1410028;/* ; LIB$SUB_TIMES */#define LIB$_INVARGORD 1410036;/* ; LIB$SUB_TIMES */#define LIB$_ABSTIMREQ 1410044;/* ; LIB$CVT_FROM_INTERNAL_TIME */#define LIB$_DELTIMREQ 1410052;/* ; LIB$CVT_FROM_INTERNAL_TIME */#define LIB$_INVOPER 1410060;/* ; LIB$CVT_XXX_INTERNAL_TIME * :/#define LIB$_REENTRANCY 1410068;/* ;LIB$FORMAT_DATE_TIME, LIB$INIT_DATE_TIME_CONTEXT, */;/* ;LIB$CONVERT_DATE_STRING, LIB$GET_DATE_FORMAT */#define LIB$_UNRFORCOD 1410076;/* ;LIB$FORMAT_DATE_TIME, LIB$CONVERT_DATE_STRING, */;/* ;LIB$GET_DATE_FORMAT */#define LIB$_ILLINISTR 1410084;/* ;LIB$INIT_DATE_TIME_CONTEXT */ #define LIB$_NUMELEMENTS 1410092;/* ;LIB$INIT_DATE_TIME_CONTEXT */ ;#define LIB$_ELETOOLON 1410100;/* ;LIB$INIT_DATE_TIME_CONTEXT */!#define LIB$_ILLCOMPONENT 1410108;/* ;LIB$INIT_DATE_TIME_CONTEXT */#define LIB$_AMBDATTIM 1410116;/* ;LIB$CONVERT_DATE_STRING */#define LIB$_INCDATTIM 1410124;/* ;LIB$CONVERT_DATE_STRING */#define LIB$_ILLFORMAT 1410132;/* ;LIB$CONVERT_DATE_STRING, LIB$GET_DATE_FORMAT */#define LIB$_UNSUPVER 1410140 <=/* ; LIB$ASCII_TO_UID, LIB$COMPARE_UID, LIB$UID_TO_ASCII */#define LIB$_BADFORMAT 1410148;/* ; LIB$ASCII_TO_UID */#define LIB$_NODTOOLNG 1410156;/* ; LIB$BUILD_NODESPEC */#define LIB$_NOHOSNAM 1410164;/* ; LIB$GET_HOSTNAME */#define LIB$_OUTSTRTRU 1413120;/* ; LIB$CVTDXDX */#define LIB$_FILFAIMAT 1413128;/* ; LIB$QUAL_FILE_MATCH = */#define LIB$_NEGANS 1413136;/* ; LIB$CONFIRM_ACT */#define LIB$_QUIPRO 1413144;/* ; LIB$CONFIRM_ACT, LIB$QUAL_FILE_MATCH */#define LIB$_QUICONACT 1413152;/* ; LIB$CONFIRM_ACT, LIB$QUAL_FILE_MATCH */#define LIB$_ENGLUSED 1413160;/* ;LIB$FORMAT_DATE_TIME, LIB$CONVERT_DATE_STRING, */;/* ;LIB$GET_DATE_FORMAT */#define LIB$_DEFFORUSE 1413168;/* ;LIB$ >FORMAT_DATE_TIME, LIB$CONVERT_DATE_STRING, */;/* ;LIB$GET_DATE_FORMAT */#define LIB$_MEMALRFRE 1413176;/* ;LIB$VM_FREE */#define LIB$_BADCCC 1425408;/* ; LIB$$READ_OBJECT */#define LIB$_EOMERROR 1425416;/* ; LIB$$READ_OBJECT */#define LIB$_EOMFATAL 1425424;/* ; LIB$$READ_OBJECT */#define LIB$_EOMWA ?RN 1425432;/* ; LIB$$READ_OBJECT */#define LIB$_GSDTYP 1425440;/* ; LIB$$READ_OBJECT */#define LIB$_ILLFMLCNT 1425448;/* ; LIB$$READ_OBJECT */#define LIB$_ILLMODNAM 1425456;/* ; LIB$$READ_OBJECT */#define LIB$_ILLPSCLEN 1425464;/* ; LIB$$READ_OBJECT */#define LIB$_ILLRECLEN 1425472;/* ; LIB$$READ_OBJECT @ */#define LIB$_ILLRECLN2 1425480;/* ; LIB$$READ_OBJECT */#define LIB$_ILLRECTYP 1425488;/* ; LIB$$READ_OBJECT */#define LIB$_ILLRECTY2 1425496;/* ; LIB$$READ_OBJECT */#define LIB$_ILLSYMLEN 1425504;/* ; LIB$$READ_OBJECT */#define LIB$_NOEOM 1425512;/* ; LIB$$READ_OBJECT */#def Aine LIB$_RECTOOSML 1425520;/* ; LIB$$READ_OBJECT */#define LIB$_SEQUENCE 1425528;/* ; LIB$$READ_OBJECT */#define LIB$_SEQUENCE2 1425536;/* ; LIB$$READ_OBJECT */#define LIB$_STRLVL 1425544;/* ; LIB$$READ_OBJECT */#define LIB$_NOWILD 1380650#define LIB$_ACTIMAGE 1381050#define LIB$_OPENIN 1380506#define LIB$_CLOSEIN 1380432#define LIB$_RBEADERR 1380530 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LIBDEF_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */ww{f/***************************************************************************** C***************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */L/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]LIBDTDEF.SDI;1 *//********************************************************************************************************************************//*** MODULE $LIBDTDEF ***/#ifndef __LIBDTDEF_LOADED#define __LIBDTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __membDer_alignment __save#pragma __nomember_alignmentR#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 ...#endEif #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 N/* */N/* Interface definitions for LIB$DT (date/time) package */N/* */N/* F */N/* Request codes for LIB$INIT_DATE_TIME_CONTEXT */N/* */N#define LIB$K_MONTH_NAME 0 /*Pre-init the month names */N#define LIB$K_MONTH_NAME_ABB 3 /*Pre-init the month names */N#define LIB$K_WEEKDAY_NAME 6 /*Pre-init the week names */N#define LIB$K_WEEKDAY_NAME_ABB 9G /*Pre-init the week names */N#define LIB$K_MERIDIEM_INDICATOR 12 /*Pre-init the AM/PM names */N#define LIB$K_OUTPUT_FORMAT 1 /*Pre-init the format */N#define LIB$K_INPUT_FORMAT 2 /*Pre-init the format */N#define LIB$K_RELATIVE_DAY_NAME 15 /*Pre-init "TODAY", etc. */N#define LIB$K_FORMAT_MNEMONICS 18 /*Pre-init MM, DD, YYYY, etc. */N#define LIB$K_LANGUAGE 4 /*Pre-init user's Hlanguage */N/* */N/* Operation codes (flags) for date time conversion routines. */N/* NOTE: any new operation codes MUST be added just BEFORE MAX_OPERATION */N/* */W#define LIB$K_MONTH_OF_YEAR 1 /* requests output in units of month of year */S#define LIB$K_DAY_OF_YEAR 2 /* requests output in days of yearI 1-366 */U#define LIB$K_HOUR_OF_YEAR 3 /* requests output in hours of year 1-8784 */Y#define LIB$K_MINUTE_OF_YEAR 4 /* requests output in minutes of year 1-527040 */[#define LIB$K_SECOND_OF_YEAR 5 /* requests output in seconds of year 1-31622400 */R#define LIB$K_DAY_OF_MONTH 6 /* request output in days of month 1-31 */T#define LIB$K_HOUR_OF_MONTH 7 /* request output in hours of month 1-744 */X#define LIB$K_MINUTE_OF_MONTH 8 /* requestJ output in minutes of month 1-44640 */[#define LIB$K_SECOND_OF_MONTH 9 /* requests output in seconds of month 1-2678400 */a#define LIB$K_DAY_OF_WEEK 10 /* requests output in days of week 1-7 with monday = 1 */T#define LIB$K_HOUR_OF_WEEK 11 /* requests output in hours of week 1-168 */Q#define LIB$K_MINUTE_OF_WEEK 12 /* requests in minutes of week 1-10080 */Y#define LIB$K_SECOND_OF_WEEK 13 /* requests output in seconds of week 1-604800 */R#define LIKB$K_HOUR_OF_DAY 14 /* requests output in hours of day 1-24 */V#define LIB$K_MINUTE_OF_DAY 15 /* requests output in minutes of day 1-1440 */V#define LIB$K_SECOND_OF_DAY 16 /* requests output in seconds of day 1-3600 */U#define LIB$K_MINUTE_OF_HOUR 17 /* requests output in minutes of hour 1-60 */W#define LIB$K_SECOND_OF_HOUR 18 /* requests output in minutes of hour 1-3600 */X#define LIB$K_SECOND_OF_MINUTE 19 /* requests output in seconds of minutLes 1-60 */T#define LIB$K_JULIAN_DATE 20 /* requests output as a julian day number */R#define LIB$K_DELTA_WEEKS 21 /* input/output in terms of delta weeks */Q#define LIB$K_DELTA_DAYS 22 /* input/output in terms of delta days */R#define LIB$K_DELTA_HOURS 23 /* input/output in terns of delta hours */T#define LIB$K_DELTA_MINUTES 24 /* input/output in terms of delta minutes */T#define LIB$K_DELTA_SECONDS 25 /* input/output in terms of deMlta seconds */]#define LIB$K_DELTA_WEEKS_F 26 /* input/output in terms of fractional delta weeks */\#define LIB$K_DELTA_DAYS_F 27 /* input/output in terms of fractional delta days */]#define LIB$K_DELTA_HOURS_F 28 /* input/output in terms of fractional delta hours */`#define LIB$K_DELTA_MINUTES_F 29 /* input/output in terms of fractional delta minutess */_#define LIB$K_DELTA_SECONDS_F 30 /* input/output in terms of fractional delta seconds */N#define NLIB$K_MAX_OPERATION 31 /* 1+ max # of conversion flags */N/* */N/* Masks for outputting date or time fields only */N/* */#define LIB$M_TIME_FIELDS 0x1#define LIB$M_DATE_FIELDS 0x2 #ifdef __NEW_STARLET!typedef struct _dt_print_fields {N unsigned lib$v_time_fields : 1; /* Force printing of time fi Oelds */N unsigned lib$v_date_fields : 1; /* Force printing of date fields */ unsigned lib$v_fill_0_ : 6; } DT_PRINT_FIELDS;#else /* __OLD_STARLET */struct dt_print_fields {N unsigned lib$v_time_fields : 1; /* Force printing of time fields */N unsigned lib$v_date_fields : 1; /* Force printing of date fields */ unsigned lib$v_fill_0_ : 6; } ;%#endif /* #ifdef __NEW_STARLET */N/* P */N/* Masks for input defaulting flag longword */N/* */#define LIB$M_YEAR 0x1#define LIB$M_MONTH 0x2#define LIB$M_DAY 0x4#define LIB$M_HOUR 0x8#define LIB$M_MINUTE 0x10#define LIB$M_SECOND 0x20#define LIB$M_HUNDREDTHS 0x40 #ifdef __NEW_STARLET#typedef struct _dt_default_fields {N unsigned lib$v_year : 1; /* Allow the year to be defaulQted */N unsigned lib$v_month : 1; /* Allow the month to be defaulted */N unsigned lib$v_day : 1; /* Allow the day to be defaulted */N unsigned lib$v_hour : 1; /* Allow the hour to be defaulted */N unsigned lib$v_minute : 1; /* Allow the minute to be defaulted */N unsigned lib$v_second : 1; /* Allow the second to be defaulted */N unsigned lib$v_hundredths : 1; /* Allow the fract to be defaulted */ unsigned lib R$v_fill_1_ : 1; } DT_DEFAULT_FIELDS;#else /* __OLD_STARLET */struct dt_default_fields {N unsigned lib$v_year : 1; /* Allow the year to be defaulted */N unsigned lib$v_month : 1; /* Allow the month to be defaulted */N unsigned lib$v_day : 1; /* Allow the day to be defaulted */N unsigned lib$v_hour : 1; /* Allow the hour to be defaulted */N unsigned lib$v_minute : 1; /* Allow the minute to be defaulted */N S unsigned lib$v_second : 1; /* Allow the second to be defaulted */N unsigned lib$v_hundredths : 1; /* Allow the fract to be defaulted */ unsigned lib$v_fill_1_ : 1; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#e Tndif#pragma __standard #endif /* __LIBDTDEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MOD UULE $LIBFILDEF ***/#ifndef __LIBFILDEF_LOADED#define __LIBFILDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 V#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 N/* Interface definitions for LIB$*_FILE W */N/* */N/* LIB$FIND_FILE flag definitions */N#define LIB$M_FIL_NOWILD 1 /* No wild carding allow */N#define LIB$M_FIL_MULTIPLE 2 /* Multiple input files */N/* LIB$RENAME_FILE flag definitions */N#define LIB$M_FIL_CUR_VER 1 /* Current version used */N#define LIB$M_FIL_INXH_SECUR 2 /* Inherit security */N/* LIB$DELETE_FILE & LIB$FIND_FILE & LIB$RENAME_FILE flag definition */N#define LIB$M_FIL_LONG_NAMES 4 /* Handle long file names */N#define LIB$M_FIL_IGNORE_ACCESS 8 /* Ignore write access on delete */P#define LIB$M_FIL_OPEN_SPECIAL 16 /* Correspands to NAML$V_OPEN_SPECIAL */T/* NOTE: Symlink search mode encodings are coordinated across $JPIDEF, $LIBCQDEF, */N/* $LIBFILDEF, $PPROPDEF, and $NAMLDEF Y. */N#define LIB$M_FIL_SYMLINK_DEFAULT 0 /* use process default */N#define LIB$M_FIL_SYMLINK_NONE 32 /* use no symlinks */N#define LIB$M_FIL_SYMLINK_ALL 64 /* use symlinks always */N#define LIB$M_FIL_SYMLINK_NOELLIPS 96 /* use symlinks except in ellipsis */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __requiredZ_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LIBFILDEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//***************** [***************************************************************************************************************//*** MODULE $LIBFISDEF ***/#ifndef __LIBFISDEF_LOADED#define __LIBFISDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined requ\ired 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#def]ine __union variant_union#endif#endif N/* Interface definitions for LIB$FIND_IMAGE_SYMBOL */N/* */N/* LIB$FIND_IMAGE_SYMBOL flag definitions */#define LIB$M_FIS_PARANOID 0x1 #define LIB$M_FIS_NOTRANSLOG 0x8 #define LIB$M_FIS_MIXEDCASE 0x10#define LIB$M_FIS_TV_AV 0x20 #ifdef __NEW_STARLETtypedef struct _lib$fis_flags {O unsigned lib$v_fis_paran ^oid : 1; /* Force paranoid bit on for $IMGACT */" unsigned lib$v_fis_fill_2 : 2;T unsigned lib$v_fis_notranslog : 1; /* $IMGACT lookup on untranslated logical */N unsigned lib$v_fis_mixedcase : 1; /* Mixed case symbols */O unsigned lib$v_fis_tv_av : 1; /* Append "_TV_AV" to the image name */ unsigned lib$v_fill_80_ : 2; } LIB$FIS_FLAGS;#else /* __OLD_STARLET */struct lib$fis_flags {O unsigned lib$v_fis_paranoid : 1; /* Force paranoi _d bit on for $IMGACT */" unsigned lib$v_fis_fill_2 : 2;T unsigned lib$v_fis_notranslog : 1; /* $IMGACT lookup on untranslated logical */N unsigned lib$v_fis_mixedcase : 1; /* Mixed case symbols */O unsigned lib$v_fis_tv_av : 1; /* Append "_TV_AV" to the image name */ unsigned lib$v_fill_80_ : 2; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas `supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LIBFISDEF_LOADED */ ww)/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// a'CC header begins here'.//P// -----------------------------------------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * b * */P/* * Confidential computer software. Valid license from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * c*/P/* * commercial license. * */P/* * * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are dset forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty. * */P/* * * */P/* ************************************************************************* *//* ****************************************************************************************************** e************************** */@/* Created: 5-Apr-2012 13:00:54 by OpenVMS SDL EV3-3 */P/* Source: 17-JUN-2004 16:11:31 $1$DGA7304:[STARLET_H.SRC]LIBICBDEF.SDL;1 *//* ******************************************************************************************************************************** */  /* .MACRO $LIBICBDEF,$GBL */ /* $DEFINI LIBICB,$GBL */#define LIB$K_PROC_VALUE_NULL 0 #define LIB$K_INVO_HANDLE_NULL 0##define LIBICB$K_INVO_HANDLE_SIZE 8'#define LIBICB$K_I fNVO_CONTEXT_VERSION 2%/* The header quadword contains: */%#define LIBICB$M_FFLAGS_BITS 0xFFFFFF$#define LIBICB$M_BOTTOM_OF_STACK 0x1$#define LIBICB$M_HANDLER_PRESENT 0x2 #define LIBICB$M_IN_PROLOGUE 0x4 #define LIBICB$M_IN_EPILOGUE 0x8'#define LIBICB$M_HAS_MEM_STK_FRAME 0x10'#define LIBICB$M_HAS_REG_STK_FRAME 0x20+#define LIBICB$K_INVO_CONTEXT_T_LENGTH 1888%#define LIBICB$K_SDA_COPY_LENGTH 1960)#define LIBICB$M_UO_FLAG_CACHE_UNWIND 0x1+#define LIBICB$M_UO_FLAG_EMULATION_MODE 0x2 g#define LIBICB$K_UO_LENGTH 88/* */)#define LIBICB$m_using_client_memread 0x1#define LIBICB$m_my_mode 0x6&#define LIBICB$K_CONTEXT_BLK_SIZE 2080F/* The following is an "internal" area that's reserved for use by */%#define LIBICB$K_REGION_BLK_SIZE 1096(#define LIBICB$K_REGIONLABEL_BLK_SIZE 32)#define LIBICB$K_DESCRIPTOR_BLK_SIZE 1280/* Action codes: */\#define LIBICB$K_ACTION_KP_FIND_UNWIND 1 /* override call to exe$kp_find_unwind_context *//* prototype: */V/* uint6h4 sp = action_routine (enum action_code code, uint64 sp, uint64 ident); */[#define LIBICB$K_ACTION_USE_DEFAULT -1 /* action routine return value to "use default" */@/* Alert codes: (matches _UNW_ReturnCode enum in unwind.h) */S#define LIBICB$K_AC_STEP_KRNL_SAV_STATE -2 /* _UNW_STEP_KERNEL_SAVE_STATE = -2 */@#define LIBICB$K_AC_STEP_BOTTOM -1 /* _UNW_STEP_BOTTOM */:#define LIBICB$K_AC_OK 0 /* _UNW_OK = 0 */>#define LIBICB$K_AC_STEP_ERROR 1 /* _UNW_STEP_ERRO iR */B#define LIBICB$K_AC_STEP_INVALID_IP 2 /* _UNW_STEP_INVALID_IP */B#define LIBICB$K_AC_STEP_INVALID_SP 3 /* _UNW_STEP_INVALID_SP */B#define LIBICB$K_AC_STEP_INVALID_GR 4 /* _UNW_STEP_INVALID_GR */D#define LIBICB$K_AC_STEP_INVALID_PFS 5 /* _UNW_STEP_INVALID_PFS */D#define LIBICB$K_AC_STEP_INVALID_RSC 6 /* _UNW_STEP_INVALID_RSC */D#define LIBICB$K_AC_STEP_INVALID_BSP 7 /* _UNW_STEP_INVALID_BSP */J#define LIBICB$K_AC_STEP_INV_BSPSTORE 8 /* _UNW_STEP_INVALID_BSPSTORE */D#define LIjBICB$K_AC_STEP_INVALID_CFM 9 /* _UNW_STEP_INVALID_CFM */C#define LIBICB$K_AC_STEP_INVALID_BR 10 /* _UNW_STEP_INVALID_BR */M#define LIBICB$K_AC_STEP_BAD_BSP_ALIGN 11 /* _UNW_STEP_BAD_BSP_ALIGNMENT */G#define LIBICB$K_AC_STEP_INVALID_RNAT 12 /* _UNW_STEP_INVALID_RNAT */W#define LIBICB$K_AC_STEP_NODSC4_NONLEAF 13 /* _UNW_STEP_NO_DESCRIPTOR_FOR_NON_LEAF */M#define LIBICB$K_AC_STEP_CORRUPT_DESC 14 /* _UNW_STEP_CORRUPT_DESCRIPTOR */L#define LIBICB$K_AC_STEP_RSE_NOT_FLUSHD 15 /* _UNWk_STEP_RSE_NOT_FLUSHED */K#define LIBICB$K_AC_STEP_SIGNAL_CONTEXT 16 /* _UNW_STEP_SIGNAL_CONTEXT */L#define LIBICB$K_AC_STEP_BAD_STATE 17 /* _UNW_STEP_NOT_ALLOWED_IN_STATE */O#define LIBICB$K_AC_INIT_RANGE_ERROR 18 /* _UNW_INITIALIZATION_RANGE_ERROR */G#define LIBICB$K_AC_QUERY_RANGE_ERROR 19 /* _UNW_QUERY_RANGE_ERROR */K#define LIBICB$K_AC_QUERY_INVALID_ERROR 20 /* _UNW_QUERY_INVALID_ERROR */J#define LIBICB$K_AC_SET_BAD_STATE 21 /* _UNW_SET_NOT_ALLOWED_IN_STATE */K#define LIBICBl$K_AC_CURR_CTXT_FAILED 22 /* _UNW_CURRENT_CONTEXT_FAILED */\#define LIBICB$K_AC_CURR_CTXT_BAD_STATE 23 /* _UNW_CURRENT_CONTEXT_NOT_ALLOWED_IN_STATE */N#define LIBICB$K_AC_MEMORY_ALLOC_ERROR 24 /* _UNW_MEMORY_ALLOCATION_ERROR */N#define LIBICB$K_AC_CLEAR_BAD_STATE 25 /* _UNW_CLEAR_NOT_ALLOWED_IN_STATE */N#define LIBICB$K_AC_QUERY_BAD_STATE 26 /* _UNW_QUERY_NOT_ALLOWED_IN_STATE */A#define LIBICB$K_AC_INTERNAL_ERROR 27 /* _UNW_INTERNAL_ERROR */V#define LIBICB$K_AC_STEP_I_ABI_MISMATCH m28 /* _UNW_STEP_INTERRUPTION_ABI_MISMATCH */?#define LIBICB$K_AC_UNALIGNED_ICB 29 /* _UNW_UNALIGNED_ICB */H#define LIBICB$K_AC_READ_MEM_FAILURE 30 /* _UNW_READ_MEMORY_FAILURE */J#define LIBICB$K_AC_WRITE_MEM_FAILURE 31 /* _UNW_WRITE_MEMORY_FAILURE */L#define LIBICB$K_AC_WRITE_REG_FAILURE 32 /* _UNW_WRITE_REGISTER_FAILURE */_#define LIBICB$K_AC_UO_INCON_CALLBACK 33 /* _UNW_USER_OVERRIDE_INCONSISTENT_CALLBACK_PARAM */H#define LIBICB$K_AC_PUT_REG_INVALID 34 /* _UNW_PUT_REGISTER_INVA nLID */+#define LIBICB$K_INVO_CONTEXT_BLK_SIZE 2112&#define LIBICB$S_INVO_CONTEXT_BLK 2112/* */A/* The length of the structure in bytes (a longword field), */6/* The frame flags (a 3 byte field of bits), and */,/* The version number (a 1 byte field) */#define LIBICB$S_HEADER 8H#define LIBICB$IH_HEADER 0 /* Header (length, flags, version) */!#define LIBICB$L_CONTEXT_LENGTH 0#define LIBICB$S_FRAMEFLAGS 3#define LIBICB$R_FRAMEFLAGS 4#define LIBICB$V_FFLAGS_BITS 0 o"#define LIBICB$V_BOTTOM_OF_STACK 0"#define LIBICB$V_HANDLER_PRESENT 1#define LIBICB$V_IN_PROLOGUE 2#define LIBICB$V_IN_EPILOGUE 3$#define LIBICB$V_HAS_MEM_STK_FRAME 4$#define LIBICB$V_HAS_REG_STK_FRAME 5 #define LIBICB$B_BLOCK_VERSION 72/* ***** Start of context_t ****************** *//* */T/* a context_t structure should be octaword (16-byte) aligned, and is passed by */O/* reference to the "get initial context" callback routine and establishes */Z/* the "current" state of pthe machine and forms the inital context for for unwinding. *//* */#define LIBICB$S_IREG 1024J#define LIBICB$IH_IREG 16 /* General (integer) Registers */!/* 32 static registers, plus */+/* up to 96 stacked/rotating registers */#define LIBICB$S_i_used0 8,#define LIBICB$ih_i_used0 16 /* R0 */#define LIBICB$S_GP 8Q#define LIBICB$IH_GP 24 /* synonym for R1 (Global Data Pointer) */#define LIBICB$S_SP 8S#define LIBICB$IH_SP 112 /* q synonym for R12 (Memory Stack Pointer) */#define LIBICB$S_TP 8M#define LIBICB$IH_TP 120 /* synonym for R13 (Thread Pointer) */#define LIBICB$S_AI 8\#define LIBICB$IH_AI 216 /* synonym for R25 (Argument Information register) */#define LIBICB$S_GRNAT 16Y#define LIBICB$IH_GRNAT 1040 /* General Register NaT Collection Registers */#define LIBICB$S_F2_F31 480B#define LIBICB$FO_F2_F31 1056 /* Floating Point Registers. */+/* 32 static float ring point registers. */1/* Floating Point Registers are 82 bits wide */%/* but stored here in octawords. */#define LIBICB$S_F32_F127 8R#define LIBICB$PH_F32_F127 1536 /* Pointer to upper Floating Register save */!/* area. Zero if not saved. */#define LIBICB$S_BRANCH 649#define LIBICB$IH_BRANCH 1544 /* Branch Registers */#/* Application Registers (ARs) *//* */#define LIBICB$S_RSC 8S#define LIBICB$IH_RSC 1608 /* Register Stack Configuration Regist ser */#define LIBICB$S_BSP 8C#define LIBICB$IH_BSP 1616 /* Backing store pointer */#define LIBICB$S_BSPSTORE 8F#define LIBICB$IH_BSPSTORE 1624 /* Backing store write pointer */#define LIBICB$S_RNAT 8J#define LIBICB$IH_RNAT 1632 /* RSE NaT Collection Register */#define LIBICB$S_CCV 8O#define LIBICB$IH_CCV 1640 /* Compare & Exchange Value Register */#define LIBICB$S_UNAT 8K#define LIBICB$IH_UNAT 1648 /* User NaT Collection Regi tster */#define LIBICB$S_FPSR 8d#define LIBICB$FH_FPSR 1656 /* OBSOLETE - do not rely on the contents of this field. */#define LIBICB$S_PFS 8E#define LIBICB$IH_PFS 1664 /* Previous Function State */#define LIBICB$S_LC 8@#define LIBICB$IH_LC 1672 /* Loop Count Register */#define LIBICB$S_EC 8D#define LIBICB$IH_EC 1680 /* Epilogue Count Register */#define LIBICB$S_CSD 8<#define LIBICB$IH_CSD 1688 /* Copy of AR.CSD */#d uefine LIBICB$S_SSD 8<#define LIBICB$IH_SSD 1696 /* Copy of AR.SSD *//* *//* End ARs */#define LIBICB$S_PRED 8U#define LIBICB$Q_PRED 1704 /* Predicate Collection Register, PR0-PR63 */#define LIBICB$S_PC 8T#define LIBICB$IH_PC 1712 /* Current PC (Instruction Pointer + slot) */#define LIBICB$S_CFM 8B#define LIBICB$IH_CFM 1720 /* Current Frame Marker */#define LIBICB$S_SOF 7A#define LIBICB$V_SOF 0 /* Size of stac vk frame */#define LIBICB$S_SOL 7S#define LIBICB$V_SOL 7 /* Size of locals portion of stack frame */#define LIBICB$S_SOR 4U#define LIBICB$V_SOR 14 /* Size of rotating portion of stack frame */#define LIBICB$S_RRB_GR 7Z#define LIBICB$V_RRB_GR 18 /* Register Rename Base for General Registers */#define LIBICB$S_RRB_FR 7a#define LIBICB$V_RRB_FR 25 /* Register Rename Base for Floating-point Registers */#define LIBICB$S_RRB_PwR 6\#define LIBICB$V_RRB_PR 32 /* Register Rename Base for Predicate Registers */#define LIBICB$S_UM 8G#define LIBICB$IH_UM 1728 /* User Mask bits of the PSR. */K#define LIBICB$V_BE 1 /* Big-endian memory access enable */K#define LIBICB$V_UP 2 /* User performance monitor enable */R#define LIBICB$V_AC 3 /* Alignment check data memory references */\#define LIBICB$V_MFL 4 /* Lower (F2-F31) Floating-poxint registers written */^#define LIBICB$V_MFH 5 /* Upper (F32-F127) Floating-point registers written */#define LIBICB$S_next_bsp 8\#define LIBICB$ih_next_bsp 1736 /* Next frame's Backing Store Pointer (Internal use) */#define LIBICB$S_next_pfs 8[#define LIBICB$ih_next_pfs 1744 /* Next frame's Previous Frame State (Internal use) */G/* The following two locations are used when walking from an inner */T/* mode stack to an outer mode and context has been saved in y a INTSK structure, */`/* but the outer mode stacked registers have bee saved on the inner mode RSE backing store. *//* */#define LIBICB$S_bspbase 8X#define LIBICB$ih_bspbase 1752 /* Base for outer mode stacked registers saved in */3/* inner mode RSE backing store (Internal use) */#define LIBICB$S_intstk_rnat 8T#define LIBICB$ih_intstk_rnat 1760 /* RNAT as saved in INTSTK (Internal use) */F/* the following "valid" bitmasks are used to record the validity */,/* of a gi zven register for this context */#define LIBICB$S_GR_VALID 16H#define LIBICB$O_GR_VALID 1768 /* General Register validity mask */O#define LIBICB$L_FR_VALID 1784 /* F2 - F31 validity mask (bit 2 for F2) */##define LIBICB$l_fr_valid_fill 1788#define LIBICB$S_BR_VALID 8G#define LIBICB$Q_BR_VALID 1792 /* Branch Register validity mask */#define LIBICB$S_AR_VALID 8L#define LIBICB$Q_AR_VALID 1800 /* Application Register validity mask */P#define LIBICB$V_RSC_VALID 0 /{* Register Stack Configuration Register */@#define LIBICB$V_BSP_VALID 1 /* Backing store pointer */K#define LIBICB$V_BSPSTORE_VALID 2 /* Backing store write pointer */G#define LIBICB$V_RNAT_VALID 3 /* RSE NaT Collection Register */L#define LIBICB$V_CCV_VALID 4 /* Compare & Exchange Value Register */H#define LIBICB$V_UNAT_VALID 5 /* User NaT Collection Register */K#define LIBICB$V_FPSR_VALID 6 /* Floating Point Status Register. */B#define LIBI |CB$V_PFS_VALID 7 /* Previous Function State */=#define LIBICB$V_LC_VALID 8 /* Loop Count Register */A#define LIBICB$V_EC_VALID 9 /* Epilogue Count Register */9#define LIBICB$V_CSD_VALID 10 /* Copy of AR.CSD */9#define LIBICB$V_SSD_VALID 11 /* Copy of AR.SSD */#define LIBICB$S_OTHER_VALID 8C#define LIBICB$Q_OTHER_VALID 1808 /* PC, CFM validity mask */4#define LIBICB$V_PC_VALID 0 /* Current PC */?#define LIBICB$V_CFM_VALID 1 /* Cu }rrent Frame Marker */A#define LIBICB$V_UM_VALID 2 /* User Mask field of PSR. */#define LIBICB$S_PR_VALID 8J#define LIBICB$Q_PR_VALID 1816 /* Predicate Register validity mask */&#define LIBICB$S_ORIGINAL_SPILL_ADDR 8i#define LIBICB$IH_ORIGINAL_SPILL_ADDR 1824 /* Original address of GR spill area (&LIBICB$IH_IREG[0]) */2/* (needed for NaT bit podition calculations) */#define LIBICB$S_true_psp 8M#define LIBICB$ih_true_psp 1832 /* True Previous SP (for Invo Handle) */~#define LIBICB$S_spare_03 8#define LIBICB$ih_spare_03 1840#define LIBICB$S_spare_04 8#define LIBICB$ih_spare_04 1848#define LIBICB$S_spare_05 8#define LIBICB$ih_spare_05 1856#define LIBICB$S_spare_06 8#define LIBICB$ih_spare_06 1864#define LIBICB$S_spare_07 8#define LIBICB$ih_spare_07 1872#define LIBICB$S_spare_08 8#define LIBICB$ih_spare_08 1880/* */?/* ******* End of context_t structure ********************* */#define LIBICB$S_PSP 8R#define LIBICB$IH_PS P 1888 /* SP at entry to routine (Previous SP) */#define LIBICB$S_psp_valid 8<#define LIBICB$ih_psp_valid 1896 /* PreviousSP valid */#define LIBICB$S_RETURN_PC 8>#define LIBICB$IH_RETURN_PC 1904 /* Return PC for SDA. */#define LIBICB$S_PREV_BSP 8J#define LIBICB$IH_PREV_BSP 1912 /* BSP of preceding frame for SDA. */#define LIBICB$S_CHFCTX_ADDR 8a#define LIBICB$PH_CHFCTX_ADDR 1920 /* Pointer to condition handler facility context block */#define LIBICB$S_O THER 8_#define LIBICB$PH_OTHER 1928 /* Pointer to other interesting structure (if any) */#define LIBICB$S_OSSD 8Y#define LIBICB$IH_OSSD 1936 /* Copy of OSSD from Unwind Information Block */#define LIBICB$S_HANDLER_FV 8M#define LIBICB$IH_HANDLER_FV 1944 /* Condition Handler Function Value */#define LIBICB$S_LSDA 8Q#define LIBICB$PH_LSDA 1952 /* Virtual Address of LSD area of UIB */#define LIBICB$S_desc 8e#define LIBICB$ph_desc 1960  /* Pointer to _Unwind_Descriptor structure (Internal use) */#define LIBICB$S_history 8]#define LIBICB$ph_history 1968 /* Pointer to _Unwind_History structure (Internal use) */?/* ******* Start of User Override ************************* *//* */J/* The following locations can be used to alter the default behavior */F/* Typically this would be used for cross-process unwinding, and */</* specifying an alternative memory allocation scheme. */C#define LIBICB$R_UO_BASE 1 976 /* base of User Override area */#define LIBICB$S_UO_FLAGS 8;#define LIBICB$Q_UO_FLAGS 1976 /* operational flags */'#define LIBICB$V_UO_FLAG_CACHE_UNWIND 0./* cache unwind information between calls */"/* for effiecient stack walk. */C#define LIBICB$V_UO_FLAG_EMULATION_MODE 1 /* Internal use only */#define LIBICB$S_UO_IDENT 8Q#define LIBICB$IH_UO_IDENT 1984 /* user context variable, passed by value */+/* to the following callback routines. */#define LIBICB $S_UO_READ_MEM 8S#define LIBICB$PH_UO_READ_MEM 1992 /* Pointer to user "read memory" routine */#define LIBICB$S_UO_GETUEINFO 8e#define LIBICB$PH_UO_GETUEINFO 2000 /* Pointer to user "get Unwind Entry Information" routine */ #define LIBICB$S_UO_GETCONTEXT 8]#define LIBICB$PH_UO_GETCONTEXT 2008 /* Pointer to user "get Initial Context" routine */#define LIBICB$S_UO_WRITE_MEM 8S#define LIBICB$PH_UO_WRITE_MEM 2016 /* Pointer to user "put memory" routine */#define LIBICB $S_UO_WRITE_REG 8U#define LIBICB$PH_UO_WRITE_REG 2024 /* Pointer to user "put register" routine */#define LIBICB$S_UO_MALLOC 8L#define LIBICB$PH_UO_MALLOC 2032 /* Pointer to user "malloc" routine */#define LIBICB$S_UO_FREE 8H#define LIBICB$PH_UO_FREE 2040 /* Pointer to user "free" routine */$#define LIBICB$S_UO_ACTION_ROUTINE 8\#define LIBICB$PH_UO_ACTION_ROUTINE 2048 /* Pointer to user "action" routine - actions */2/* are defined by "action codes" (see below). */#def ine LIBICB$S_spare_10 8#define LIBICB$ih_spare_10 2056D/* ******* End of User Override area *************************** */F/* the following locations are used internally, and should not be *//* modified by the user */&#define LIBICB$S_most_recent_context 8P#define LIBICB$ph_most_recent_context 2064 /* Most recent user context used */J#define LIBICB$l_internal_flags 2072 /* internal operational flags */'#define LIBICB$v_using_client_memread 0#define LIBICB$S_my_mode 2#defin e LIBICB$v_my_mode 1F#define LIBICB$l_interface_state 2076 /* enum InterfaceUsageState */9#define LIBICB$l_ip_source 2080 /* enum IP_SOURCE */H/* The alert code can be examined to a more detailed failure status */@#define LIBICB$L_ALERT_CODE 2084 /* enum _UNW_ReturnCode */#define LIBICB$S_spare_11 8#define LIBICB$ih_spare_11 2088;/* the operating system. It's size may vary over time. */"#define LIBICB$S_SYSTEM_DEFINED 16%#define LIBICB$IH_SYSTEM_DEFINED 2096/* */] /* Action codes are passed as the first parameter to the UO_ACTION_ROUTINE to indicate */_/* an action to be performed. The remaining parameters to the action routine are action */O/* dependent, and usually include the ident value as the last parameter. *//* */#/* Action routine prototype: *//* */]/* uint64 return_value = action_routine (enum action_code code, ..., uint64 ident); *//* */Z/* A return_value of ACTION_USE_DEFAULT indicates that the act ion was not performed */U/* and the calling standard routines should fall back to "default" processing. */3/* Other return values are action dependent. *//* */8/* Write Register callback routine - WhichReg enum. *//* */D/* The Write Register callback routine is only used when a live */C/* register in another (remote) process needs to be written as */9/* a result of a call to LIB$I64_PUT_INVO_REGISTERS. */C/* It is permissible to implement a subset of these regist ers, */G/* or not implement it at all if you are sure that these registers */;/* have been saved to memory before PUT_INVO is called *//* */"/* For the General Registers: */</* whichReg = LIBICB$K_WhichReg_GR0 + register number */*/* value_1 = 64-bit register value */./* value_2 = 0, or 1 for NaT bit value *//* */#define LIBICB$K_WhichReg_GR0 0/* */#/* For the Floating Registers: */E/* whichReg = LIBICB$K_WhichReg_FR0 + floating register number */5/* value_1 = 64-bit lower floating fill value */5/* value_2 = 64-bit upper floating fill value *//* */!#define LIBICB$K_WhichReg_FR0 128/* */$/* For the Predicate Registers: */F/* whichReg = LIBICB$K_WhichReg_PR0 + predicate register number */0/* value_1 = 0, or 1 rgister (bit) value *//* value_2 = ignored *//* */!#define LIBICB$K_WhichReg_PR0 256/* */!/* For the Branch Registers: */C/* whichReg = LIBICB$K_WhichReg_BR0 + branch register number */*/* value_1 = 64-bit register value *//* value_2 = ignored *//* */!#define LIBICB$K_WhichReg_BR0 320/* *///* For the Floating Point Status Register: */+/* whichReg = LIBICB$K_WhichReg_FPSR */*/* value_1 = 64-bit register value *//* value_2 = ignored *//* */"#define LIBICB$K_WhichReg_FPSR 328 /* $DEFEND LIBICB,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins h ere *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]LIBICB.SDI;1 *//********************************************************************************************************************************/"/*** MODULE LIBICB IDENT V2.0 ***/#ifndef __LIBICB_LOADED#define __LIBICB_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #define LIB$K_PROC_VALUE_NULL 0 #define LIB$K_INVO_HANDLE_NULL 0##define LIBICB$K_INVO_HANDLE_SIZE 8'#define LIBICB$K_INVO_CONTEXT_VERSION 2N/* The h eader quadword contains: */%#define LIBICB$M_FFLAGS_BITS 0xFFFFFF$#define LIBICB$M_BOTTOM_OF_STACK 0x1$#define LIBICB$M_HANDLER_PRESENT 0x2 #define LIBICB$M_IN_PROLOGUE 0x4 #define LIBICB$M_IN_EPILOGUE 0x8'#define LIBICB$M_HAS_MEM_STK_FRAME 0x10'#define LIBICB$M_HAS_REG_STK_FRAME 0x20+#define LIBICB$K_INVO_CONTEXT_T_LENGTH 1888%#define LIBICB$K_SDA_COPY_LENGTH 1960)#define LIBICB$M_UO_FLAG_CACHE_UNWIND 0x1+#define LIBICB$M_UO_FLAG_EMULATION_M ODE 0x2#define LIBICB$K_UO_LENGTH 88N/* */)#define LIBICB$M_USING_CLIENT_MEMREAD 0x1#define LIBICB$M_MY_MODE 0x6&#define LIBICB$K_CONTEXT_BLK_SIZE 2080N/* The following is an "internal" area that's reserved for use by */%#define LIBICB$K_REGION_BLK_SIZE 1096(#define LIBICB$K_REGIONLABEL_BLK_SIZE 32)#define LIBICB$K_DESCRIPTOR_BLK_SIZE 1280N/* Action codes:  */Z#define LIBICB$K_ACTION_KP_FIND_UNWIND 1 /* override call to exe$kp_find_unwind_context */N/* prototype: */T/* uint64 sp = action_routine (enum action_code code, uint64 sp, uint64 ident); */Z#define LIBICB$K_ACTION_USE_DEFAULT -1 /* action routine return value to "use default" */N/* Alert codes: (matches _UNW_ReturnCode enum in unwind.h) */Q#define LIBICB$K_AC_STEP_KRNL_SAV_STATE -2 /* _UNW_STEP_KERNEL_SAVE_STATE = -2 */N#define LIBICB$K_AC_STEP_BOTTOM -1 /* _UNW_STEP_BOTTOM */N#define LIBICB$K_AC_OK 0 /* _UNW_OK = 0 */N#define LIBICB$K_AC_STEP_ERROR 1 /* _UNW_STEP_ERROR */N#define LIBICB$K_AC_STEP_INVALID_IP 2 /* _UNW_STEP_INVALID_IP */N#define LIBICB$K_AC_STEP_INVALID_SP 3 /* _UNW_STEP_INVALID_SP */N#define LIBICB$K_AC_STEP_INVALID_GR 4 /* _UNW_STEP_INVALID_GR */N#define LIBICB$K_AC_STEP_INVALID_PFS 5 /* _UNW_STEP_INVALID_PFS */N#define LIBICB$K_AC_STEP_INVALID_RSC 6 /* _UNW_STEP_INVALID_RSC */N#define LIBICB$K_AC_STEP_INVALID_BSP 7 /* _UNW_STEP_INVALID_BSP */N#define LIBICB$K_AC_STEP_INV_BSPSTORE 8 /* _UNW_STEP_INVALID_BSPSTORE */N#define LIBICB$K_AC_STEP_INVALID_CFM 9 /* _UNW_STEP_INVALID_CFM */N#define LIBICB$K_AC_STEP_INVALID_BR 10 /* _UNW_STEP_INVALID_BR */N#define LIBICB$K_AC_STEP_BAD_BSP_ALIGN 11 /* _UNW_STEP_BAD_BSP_ALIGNMENT */N#define LIBICB$K_AC_STEP_INVALID_RNAT 12 /* _UNW_STEP_INVALID_RNAT */U#define LIBICB$K_AC_STEP_NODSC4_NONLEAF 13 /* _UNW_STEP_NO_DESCRIPTOR_FOR_NON_LEAF */N#define LIBICB$K_AC_STEP_CORRUPT_DESC 14 /* _UNW_STEP_CORRUPT_DESCRIPTOR */N#define LIBICB$K_AC_STEP_RSE_NOT_FLUSHD 15 /* _UNW_STEP_RSE_NOT_FLUSHED */N#define LIBICB$K_AC_STEP_SIGNAL_CONTEXT 16 /* _UNW_STEP_SIGNAL_CONTEXT */N#define LIBICB$K_AC_STEP_BAD_STATE 17 /* _UNW_STEP_NOT_ALLOWED_IN_STATE */N#define LIBICB$K_AC_INIT_RANGE_ERROR 18 /* _UNW_INITIALIZATION_RANGE_ERROR */N#define LIBICB$K_AC_QUERY_RANGE_ERROR 19 /* _UNW_QUERY_RANGE_ERROR */N#define LIBICB$K_AC_QUERY_INVALID_ERROR 20 /* _UNW_QUERY_INVALID_ERROR */N#define LIBICB$K_AC_SET_BAD_STATE 21 /* _UNW_SET_NOT_ALLOWED_IN_STATE */N#define LIBICB$K_AC_CURR_CTXT_FAILED 22 /* _UNW_CURRENT_CONTEXT_FAILED */Z#define LIBICB$K_AC_CURR_CTXT_BAD_STATE 23 /* _UNW_CURRENT_CONTEXT_NOT_ALLOWED_IN_STATE */N#define LIBICB$K_AC_MEMORY_ALLOC_ERROR 24 /* _UNW_MEMORY_ALLOCATION_ERROR */N#define LIBICB$K_AC_CLEAR_BAD_STATE 25 /* _UNW_CLEAR_NOT_ALLOWED_IN_STATE */N#define LIBICB$K_AC_QUERY_BAD_STATE 26 /* _UNW_QUERY_NOT_ALLOWED_IN_STATE */N#define LIBICB$K_AC_INTERNAL_ERROR 27 /* _UNW_INTERNAL_ERROR */T#define LIBICB$K_AC_STEP_I_ABI_MISMATCH 28 /* _UNW_STEP_INTERRUPTION_ABI_MISMATCH */N#define LIBICB$K_AC_UNALIGNED_ICB 29 /* _UNW_UNALIGNED_ICB */N #define LIBICB$K_AC_READ_MEM_FAILURE 30 /* _UNW_READ_MEMORY_FAILURE */N#define LIBICB$K_AC_WRITE_MEM_FAILURE 31 /* _UNW_WRITE_MEMORY_FAILURE */N#define LIBICB$K_AC_WRITE_REG_FAILURE 32 /* _UNW_WRITE_REGISTER_FAILURE */]#define LIBICB$K_AC_UO_INCON_CALLBACK 33 /* _UNW_USER_OVERRIDE_INCONSISTENT_CALLBACK_PARAM */N#define LIBICB$K_AC_PUT_REG_INVALID 34 /* _UNW_PUT_REGISTER_INVALID */+#define LIBICB$K_INVO_CONTEXT_BLK_SIZE 2112 #ifdef __NEW_STARLETc#if !defined(__NOB ASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __octaword#else#pragma __nomember_alignment#endif"typedef struct _invo_context_blk {N/* */I/* The length of the structure in bytes (a longword field), */I/* The frame flags (a 3 byte field of bits), and */I/* The version number (a 1 byte field)  */#pragma __nomember_alignment __union {N __int64 libicb$ih_header; /* Header (length, flags, version) */ __struct {1 unsigned int libicb$l_context_length; __union {3 unsigned libicb$v_fflags_bits : 24; __struct {: unsigned libicb$v_bottom_of_stack : 1;: unsigned libicb$v_handler_present : 1;6 unsigned libicb$v_in_prologue : 1;6  unsigned libicb$v_in_epilogue : 1;< unsigned libicb$v_has_mem_stk_frame : 1;< unsigned libicb$v_has_reg_stk_frame : 1;2 unsigned libicb$v_fill_0_ : 2;+ } libicb$r_fflags_desc;& } libicb$r_frameflags;1 unsigned char libicb$b_block_version; } libicb$r_hdr_desc; } libicb$r_hdr;Y __int64 libicb$ih_spare_01; /* Start of context_t must be octaword aligned */N/****** Start of context_t ****************** */N/* */R/* a context_t structure should be octaword (16-byte) aligned, and is passed by */N/* reference to the "get initial context" callback routine and establishes */X/* the "current" state of the machine and forms the inital context for for unwinding. */N/* */ __union {N __int64 libicb$ih_ireg [128]; /* General (integer) Registers */N/* 32 static registers, plus */N/* up to 96 stacked/rotating registers */ __struct {N __int64 libicb$ih_i_used0; /* R0 */R __int64 libicb$ih_gp; /* synonym for R1 (Global Data Pointer) */N __int64 libicb$ih_i_used1 [10]; /* R2 - R11  */T __int64 libicb$ih_sp; /* synonym for R12 (Memory Stack Pointer) */N __int64 libicb$ih_tp; /* synonym for R13 (Thread Pointer) */N __int64 libicb$ih_i_used2 [11]; /* R14 - R24 */] __int64 libicb$ih_ai; /* synonym for R25 (Argument Information register) */N __int64 libicb$ih_i_used3 [102]; /* R26 - R127 */! } libicb$r_i_overlay; } libicb$r_i_reg;W __int64 libicb$ih_grnat [2]; /* General Register NaT Collection Registers */N int libicb$fo_f2_f31 [30] [4]; /* Floating Point Registers. */N/* 32 static floating point registers. */N/* Floating Point Registers are 82 bits wide */N/* but stored here in octawords. */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_point er_size __long /* And set ptr size default to 64-bit pointers */U void *libicb$ph_f32_f127; /* Pointer to upper Floating Register save */#else% unsigned __int64 libicb$ph_f32_f127;#endifN/* area. Zero if not saved. */N __int64 libicb$ih_branch [8]; /* Branch Registers */N/* Application Registers (ARs) */N/*  */S __int64 libicb$ih_rsc; /* Register Stack Configuration Register */N __int64 libicb$ih_bsp; /* Backing store pointer */N __int64 libicb$ih_bspstore; /* Backing store write pointer */N __int64 libicb$ih_rnat; /* RSE NaT Collection Register */O __int64 libicb$ih_ccv; /* Compare & Exchange Value Register */N __int64 libicb$ih_unat; /* User NaT Collection Register  */c __int64 libicb$fh_fpsr; /* OBSOLETE - do not rely on the contents of this field. */N __int64 libicb$ih_pfs; /* Previous Function State */N __int64 libicb$ih_lc; /* Loop Count Register */N __int64 libicb$ih_ec; /* Epilogue Count Register */N __int64 libicb$ih_csd; /* Copy of AR.CSD */N __int64 libicb$ih_ssd; /* Copy of AR.SSD */N/* */N/* End ARs */U __int64 libicb$q_pred; /* Predicate Collection Register, PR0-PR63 */U __int64 libicb$ih_pc; /* Current PC (Instruction Pointer + slot) */ __union {N __int64 libicb$ih_cfm; /* Current Frame Marker */ __struct {N unsigned libicb$v_sof : 7; /* Size of stack frame */T unsigned libicb$v_sol : 7; /* Size of locals portion of stack frame */V unsigned libicb$v_sor : 4; /* Size of rotating portion of stack frame */Z unsigned libicb$v_rrb_gr : 7; /* Register Rename Base for General Registers */a unsigned libicb$v_rrb_fr : 7; /* Register Rename Base for Floating-point Registers */\ unsigned libicb$v_rrb_pr : 6; /* Register Rename Base for Predicate Registers */* un signed libicb$v_fill_1_ : 2; } libicb$r_cfm_s; } libicb$r_cfm_u; __union {N __int64 libicb$ih_um; /* User Mask bits of the PSR. */ __struct {N unsigned libicb$v_rv : 1; /* Reserved */N unsigned libicb$v_be : 1; /* Big-endian memory access enable */N unsigned libicb$v_up : 1; /* User performance monitor enable */T unsigned libicb$v_ac : 1; /* Alignment check data memory references */] unsigned libicb$v_mfl : 1; /* Lower (F2-F31) Floating-point registers written */_ unsigned libicb$v_mfh : 1; /* Upper (F32-F127) Floating-point registers written */* unsigned libicb$v_fill_2_ : 2; } libicb$r_um_s; } libicb$r_um_u;_ __int64 libicb$ih_next_bsp; /* Next frame's Backing Store Pointer (Internal use) */^ __int64 libicb$ih_next_pfs; /* Next frame's Previous Frame State (Internal use) */N/* The following two locations are used when walking from an inner */R/* mode stack to an outer mode and context has been saved in a INTSK structure, */^/* but the outer mode stacked registers have bee saved on the inner mode RSE backing store. */N/* */\ __int64 libicb$ih_bspbase; /* Base for outer mode stacked registers saved in */N/* inner mode RSE backing store (Internal use)  */T __int64 libicb$ih_intstk_rnat; /* RNAT as saved in INTSTK (Internal use) */N/* the following "valid" bitmasks are used to record the validity */N/* of a given register for this context */N int libicb$o_gr_valid [4]; /* General Register validity mask */S int libicb$l_fr_valid; /* F2 - F31 validity mask (bit 2 for F2) */ int libicb$l_fr_valid_fill;N __int64 libicb$q_br_valid; /*  Branch Register validity mask */ __union {P __int64 libicb$q_ar_valid; /* Application Register validity mask */ __struct {X unsigned libicb$v_rsc_valid : 1; /* Register Stack Configuration Register */N unsigned libicb$v_bsp_valid : 1; /* Backing store pointer */S unsigned libicb$v_bspstore_valid : 1; /* Backing store write pointer */O unsigned libicb$v_rnat_valid : 1; /* RSE NaT Collection Register */T  unsigned libicb$v_ccv_valid : 1; /* Compare & Exchange Value Register */P unsigned libicb$v_unat_valid : 1; /* User NaT Collection Register */S unsigned libicb$v_fpsr_valid : 1; /* Floating Point Status Register. */N unsigned libicb$v_pfs_valid : 1; /* Previous Function State */N unsigned libicb$v_lc_valid : 1; /* Loop Count Register */N unsigned libicb$v_ec_valid : 1; /* Epilogue Count Register */N unsigned l ibicb$v_csd_valid : 1; /* Copy of AR.CSD */N unsigned libicb$v_ssd_valid : 1; /* Copy of AR.SSD */* unsigned libicb$v_fill_3_ : 4;" } libicb$r_ar_valid_s; } libicb$r_ar_valid_u; __union {N __int64 libicb$q_other_valid; /* PC, CFM validity mask */ __struct {N unsigned libicb$v_pc_valid : 1; /* Current PC */N unsigned libicb$v_cfm_valid : 1; /* Current Fr ame Marker */N unsigned libicb$v_um_valid : 1; /* User Mask field of PSR. */* unsigned libicb$v_fill_4_ : 5;% } libicb$r_other_valid_s;! } libicb$r_other_valid_u;N __int64 libicb$q_pr_valid; /* Predicate Register validity mask */g __int64 libicb$ih_original_spill_addr; /* Original address of GR spill area (&LIBICB$IH_IREG[0]) */N/* (needed for NaT bit podition calculations) */P __int64 libicb $ih_true_psp; /* True Previous SP (for Invo Handle) */ __int64 libicb$ih_spare_03; __int64 libicb$ih_spare_04; __int64 libicb$ih_spare_05; __int64 libicb$ih_spare_06; __int64 libicb$ih_spare_07; __int64 libicb$ih_spare_08;N/* */N/******** End of context_t structure ********************* */R __int64 libicb$ih_psp; /* SP at entry to routine (Previous SP) */N __int64 libicb$ih_psp_valid; /* PreviousSP valid */N __int64 libicb$ih_return_pc; /* Return PC for SDA. */N __int64 libicb$ih_prev_bsp; /* BSP of preceding frame for SDA. */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */a void *libicb$ph_chfctx_addr; /* Pointer to condition handler facility con text block */#else( unsigned __int64 libicb$ph_chfctx_addr;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */] void *libicb$ph_other; /* Pointer to other interesting structure (if any) */#else" unsigned __int64 libicb$ph_other;#endifX __int64 libicb$ih_ossd; /* Copy of OSSD from Unwind Information Block */N __int64 libicb $ih_handler_fv; /* Condition Handler Function Value */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */P void *libicb$ph_lsda; /* Virtual Address of LSD area of UIB */#else! unsigned __int64 libicb$ph_lsda;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And se t ptr size default to 64-bit pointers */d void *libicb$ph_desc; /* Pointer to _Unwind_Descriptor structure (Internal use) */#else! unsigned __int64 libicb$ph_desc;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */a void *libicb$ph_history; /* Pointer to _Unwind_History structure (Internal use) */#else$ unsigned __int64 libicb$p h_history;#endifN/******** Start of User Override ************************* */N/* */N/* The following locations can be used to alter the default behavior */N/* Typically this would be used for cross-process unwinding, and */N/* specifying an alternative memory allocation scheme. */ __union {N int libicb$r_uo_base; /* base of User Override area  */N __int64 libicb$q_uo_flags; /* operational flags */ __struct {7 unsigned libicb$v_uo_flag_cache_unwind : 1;N/* cache unwind information between calls */N/* for effiecient stack walk. */Q unsigned libicb$v_uo_flag_emulation_mode : 1; /* Internal use only */* unsigned libicb$v_fill_5_ : 6;$ } libicb$r_uo_flag_bits; } libicb$r_op_flags;T __int64 libicb$ih_uo_ident; /* user context variable, passed by value */N/* to the following callback routines. */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */S void *libicb$ph_uo_read_mem; /* Pointer to user "read memory" routine */#else( unsigned __int64 libicb$ph_uo_read_mem;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */d void *libicb$ph_uo_getueinfo; /* Pointer to user "get Unwind Entry Information" routine */#else) unsigned __int64 libicb$ph_uo_getueinfo;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit point ers */[ void *libicb$ph_uo_getcontext; /* Pointer to user "get Initial Context" routine */#else* unsigned __int64 libicb$ph_uo_getcontext;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */R void *libicb$ph_uo_write_mem; /* Pointer to user "put memory" routine */#else) unsigned __int64 libicb$ph_uo_write_mem;#endifR#ifdef __INITIAL_POINTER _SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */T void *libicb$ph_uo_write_reg; /* Pointer to user "put register" routine */#else) unsigned __int64 libicb$ph_uo_write_reg;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *libicb$ph_uo_malloc;  /* Pointer to user "malloc" routine */#else& unsigned __int64 libicb$ph_uo_malloc;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *libicb$ph_uo_free; /* Pointer to user "free" routine */#else$ unsigned __int64 libicb$ph_uo_free;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */Y void *libicb$ph_uo_action_routine; /* Pointer to user "action" routine - actions */#else. unsigned __int64 libicb$ph_uo_action_routine;#endifN/* are defined by "action codes" (see below). */ __int64 libicb$ih_spare_10;N/******** End of User Override area *************************** */N/* the following locations are used internally, and should not be  */N/* modified by the user */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *libicb$ph_most_recent_context; /* Most recent user context used */#else0 unsigned __int64 libicb$ph_most_recent_context;#endif __union {N int libicb$l_internal_flags; /* internal operational flags */  __struct {7 unsigned libicb$v_using_client_memread : 1;* unsigned libicb$v_my_mode : 2;* unsigned libicb$v_fill_6_ : 5;% } libicb$r_int_flag_bits; } libicb$r_int_flags;N int libicb$l_interface_state; /* enum InterfaceUsageState */N int libicb$l_ip_source; /* enum IP_SOURCE */N/* The alert code can be examined to a more detailed failure status */N int libicb$l_alert_cod e; /* enum _UNW_ReturnCode */ __int64 libicb$ih_spare_11; N/* the operating system. It's size may vary over time. */) __int64 libicb$ih_system_defined [2];N/* */[/* Action codes are passed as the first parameter to the UO_ACTION_ROUTINE to indicate */]/* an action to be performed. The remaining parameters to the action routine are action */N/* dependent, and usually include the ident value as the last parameter. */N/* */N/* Action routine prototype: */N/* */[/* uint64 return_value = action_routine (enum action_code code, ..., uint64 ident); */N/* */X/* A return_value of ACTION_US E_DEFAULT indicates that the action was not performed */S/* and the calling standard routines should fall back to "default" processing. */N/* Other return values are action dependent. */N/* */ } INVO_CONTEXT_BLK; #if !defined(__VAXC)6#define libicb$ih_header libicb$r_hdr.libicb$ih_headerV#define libicb$l_context_length libicb$r_hdr.libicb$r_hdr_desc.libicb$l_context_lengthN#define libicb$r_frameflags libicb$r_hdr.libicb$r_hdr_desc.libicb$r_frameflagsE#define libicb$v_fflags_bits libicb$r_frameflags.libicb$v_fflags_bitsb#define libicb$v_bottom_of_stack libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_bottom_of_stackb#define libicb$v_handler_present libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_handler_presentZ#define libicb$v_in_prologue libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_in_prologueZ#define libicb$v_in_epilogue libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_in_epiloguef#define libicb$v_has_mem_stk_frame libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_has_mem_stk_framef#define libicb$v_has_reg_stk_frame libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_has_reg_stk_frameT#define libicb$b_block_version libicb$r_hdr.libicb$r_hdr_desc.libicb$b_block_version4#define libicb$ih_ireg libicb$r_i_reg.libicb$ih_iregM#define libicb$ih_i_used0 libicb$r_i_reg.libicb$r_i_overlay.libicb$ih_i_used0C#define libicb$ih_gp libicb$r_i_reg.libicb$r_i_overlay .libicb$ih_gpC#define libicb$ih_sp libicb$r_i_reg.libicb$r_i_overlay.libicb$ih_spC#define libicb$ih_tp libicb$r_i_reg.libicb$r_i_overlay.libicb$ih_tpC#define libicb$ih_ai libicb$r_i_reg.libicb$r_i_overlay.libicb$ih_ai2#define libicb$ih_cfm libicb$r_cfm_u.libicb$ih_cfm?#define libicb$v_sof libicb$r_cfm_u.libicb$r_cfm_s.libicb$v_sof?#define libicb$v_sol libicb$r_cfm_u.libicb$r_cfm_s.libicb$v_sol?#define libicb$v_sor libicb$r_cfm_u.libicb$r_cfm_s.libicb$v_sorE#define libicb$v_rrb_gr libicb $r_cfm_u.libicb$r_cfm_s.libicb$v_rrb_grE#define libicb$v_rrb_fr libicb$r_cfm_u.libicb$r_cfm_s.libicb$v_rrb_frE#define libicb$v_rrb_pr libicb$r_cfm_u.libicb$r_cfm_s.libicb$v_rrb_pr/#define libicb$ih_um libicb$r_um_u.libicb$ih_um;#define libicb$v_be libicb$r_um_u.libicb$r_um_s.libicb$v_be;#define libicb$v_up libicb$r_um_u.libicb$r_um_s.libicb$v_up;#define libicb$v_ac libicb$r_um_u.libicb$r_um_s.libicb$v_ac=#define libicb$v_mfl libicb$r_um_u.libicb$r_um_s.libicb$v_mfl=#define libicb$v_mfh libicb$r_um_u.libicb$r_um_s.libicb$v_mfh?#define libicb$q_ar_valid libicb$r_ar_valid_u.libicb$q_ar_validU#define libicb$v_rsc_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_rsc_validU#define libicb$v_bsp_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_bsp_valid_#define libicb$v_bspstore_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_bspstore_validW#define libicb$v_rnat_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_rnat_validU#define libicb$v_ccv_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_ccv_validW#define libicb$v_unat_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_unat_validW#define libicb$v_fpsr_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_fpsr_validU#define libicb$v_pfs_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_pfs_validS#define libicb$v_lc_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_lc_validS#define libicb$v_ec_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_ec_validU#define libicb$v_csd_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_csd_validU#define libicb$v_ssd_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_ssd_validH#define libicb$q_other_valid libicb$r_other_valid_u.libicb$q_other_validY#define libicb$v_pc_valid libicb$r_other_valid_u.libicb$r_other_valid_s.libicb$v_pc_valid[#define libicb$v_cfm_valid libicb$r_other_valid_u.libicb$r_other_valid_s.libicb$v_cfm_validY#define libicb$v_um_valid libicb$r_other_valid_u.libicb$r_other_valid_s.libicb$v_um_valid;#define libicb$r_uo_base libicb$r_op_flags.libicb$r_uo_base=#define libicb$q_uo_flags libicb$r_op_flags.libicb$q_uo_flagsk#define libicb$v_uo_flag_cache_unwind libicb$r_op_flags.libicb$r_uo_flag_bits.libicb$v_uo_flag_cache_unwindo#define libicb$v_uo_flag_emulation_mode libicb$r_op_flags.libicb$r_uo_flag_bits.libicb$v_uo_flag_emulation_modeJ#define libicb$l_internal_flags libicb$r_int_flags.libicb$l_internal_flagsm#define libicb$v_using_client_memread libicb$r_int_flags.libicb$r_in t_flag_bits.libicb$v_using_client_memreadS#define libicb$v_my_mode libicb$r_int_flags.libicb$r_int_flag_bits.libicb$v_my_mode"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __octaword#else#pragma __nomember_alignment#endifstruct invo_context_blk {N/* */I/* Th e length of the structure in bytes (a longword field), */I/* The frame flags (a 3 byte field of bits), and */I/* The version number (a 1 byte field) */#pragma __nomember_alignment __union {N __int64 libicb$ih_header; /* Header (length, flags, version) */ __struct {1 unsigned int libicb$l_context_length; __union {3 unsigned libicb$v_fflags_bits : 24;  __struct {: unsigned libicb$v_bottom_of_stack : 1;: unsigned libicb$v_handler_present : 1;6 unsigned libicb$v_in_prologue : 1;6 unsigned libicb$v_in_epilogue : 1;< unsigned libicb$v_has_mem_stk_frame : 1;< unsigned libicb$v_has_reg_stk_frame : 1;2 unsigned libicb$v_fill_0_ : 2;+ } libicb$r_fflags_desc;& } libicb$r_f rameflags;1 unsigned char libicb$b_block_version; } libicb$r_hdr_desc; } libicb$r_hdr;Y __int64 libicb$ih_spare_01; /* Start of context_t must be octaword aligned */N/****** Start of context_t ****************** */N/* */R/* a context_t structure should be octaword (16-byte) aligned, and is passed by */N/* reference to the "get initial context" call back routine and establishes */X/* the "current" state of the machine and forms the inital context for for unwinding. */N/* */ __union {N __int64 libicb$ih_ireg [128]; /* General (integer) Registers */N/* 32 static registers, plus */N/* up to 96 stacked/rotating registers */ __struct {N __int64 libicb$ih_i_used0; /* R0 */R __int64 libicb$ih_gp; /* synonym for R1 (Global Data Pointer) */N __int64 libicb$ih_i_used1 [10]; /* R2 - R11 */T __int64 libicb$ih_sp; /* synonym for R12 (Memory Stack Pointer) */N __int64 libicb$ih_tp; /* synonym for R13 (Thread Pointer) */N __int64 libicb$ih_i_used2 [11]; /* R14 - R24 */] __int64 libicb$ih_ai; /* synonym for R25 (Argument Information register) */N __int64 libicb$ih_i_used3 [102]; /* R26 - R127 */! } libicb$r_i_overlay; } libicb$r_i_reg;W __int64 libicb$ih_grnat [2]; /* General Register NaT Collection Registers */N int libicb$fo_f2_f31 [30] [4]; /* Floating Point Registers. */N/* 32 static floating point registers. */N/* Floating Point Registers are 82 bits wide  */N/* but stored here in octawords. */V unsigned __int64 libicb$ph_f32_f127; /* Pointer to upper Floating Register save */N/* area. Zero if not saved. */N __int64 libicb$ih_branch [8]; /* Branch Registers */N/* Application Registers (ARs) */N/*  */S __int64 libicb$ih_rsc; /* Register Stack Configuration Register */N __int64 libicb$ih_bsp; /* Backing store pointer */N __int64 libicb$ih_bspstore; /* Backing store write pointer */N __int64 libicb$ih_rnat; /* RSE NaT Collection Register */O __int64 libicb$ih_ccv; /* Compare & Exchange Value Register */N __int64 libicb$ih_unat; /* User NaT Collection Register */c __int64 libicb$fh_fpsr; /* OBSOLETE - do not rely on the contents of this field. */N __int64 libicb$ih_pfs; /* Previous Function State */N __int64 libicb$ih_lc; /* Loop Count Register */N __int64 libicb$ih_ec; /* Epilogue Count Register */N __int64 libicb$ih_csd; /* Copy of AR.CSD */N __int64 libicb$ih_ssd; /* Copy of AR.SSD */N/*  */N/* End ARs */U int libicb$q_pred [2]; /* Predicate Collection Register, PR0-PR63 */U __int64 libicb$ih_pc; /* Current PC (Instruction Pointer + slot) */ __union {N __int64 libicb$ih_cfm; /* Current Frame Marker */ __struct {N unsigned libicb$v_sof : 7; /* Size of stack frame  */T unsigned libicb$v_sol : 7; /* Size of locals portion of stack frame */V unsigned libicb$v_sor : 4; /* Size of rotating portion of stack frame */Z unsigned libicb$v_rrb_gr : 7; /* Register Rename Base for General Registers */a unsigned libicb$v_rrb_fr : 7; /* Register Rename Base for Floating-point Registers */\ unsigned libicb$v_rrb_pr : 6; /* Register Rename Base for Predicate Registers */* unsigned libicb$v_fill _1_ : 2; } libicb$r_cfm_s; } libicb$r_cfm_u; __union {N __int64 libicb$ih_um; /* User Mask bits of the PSR. */ __struct {N unsigned libicb$v_rv : 1; /* Reserved */N unsigned libicb$v_be : 1; /* Big-endian memory access enable */N unsigned libicb$v_up : 1; /* User performance monitor enable */T unsigned libicb$v_ac : 1; /* Alignment check data memory referen ces */] unsigned libicb$v_mfl : 1; /* Lower (F2-F31) Floating-point registers written */_ unsigned libicb$v_mfh : 1; /* Upper (F32-F127) Floating-point registers written */* unsigned libicb$v_fill_2_ : 2; } libicb$r_um_s; } libicb$r_um_u;_ __int64 libicb$ih_next_bsp; /* Next frame's Backing Store Pointer (Internal use) */^ __int64 libicb$ih_next_pfs; /* Next frame's Previous Frame State (Internal use) */N/* The following two locations are used when walking from an inner */R/* mode stack to an outer mode and context has been saved in a INTSK structure, */^/* but the outer mode stacked registers have bee saved on the inner mode RSE backing store. */N/* */\ __int64 libicb$ih_bspbase; /* Base for outer mode stacked registers saved in */N/* inner mode RSE backing store (Internal use) */T  __int64 libicb$ih_intstk_rnat; /* RNAT as saved in INTSTK (Internal use) */N/* the following "valid" bitmasks are used to record the validity */N/* of a given register for this context */N int libicb$o_gr_valid [4]; /* General Register validity mask */S int libicb$l_fr_valid; /* F2 - F31 validity mask (bit 2 for F2) */ int libicb$l_fr_valid_fill;N int libicb$q_br_valid [2]; /* Branch Register val idity mask */ __union {P int libicb$q_ar_valid [2]; /* Application Register validity mask */ __struct {X unsigned libicb$v_rsc_valid : 1; /* Register Stack Configuration Register */N unsigned libicb$v_bsp_valid : 1; /* Backing store pointer */S unsigned libicb$v_bspstore_valid : 1; /* Backing store write pointer */O unsigned libicb$v_rnat_valid : 1; /* RSE NaT Collection Register */T unsigned libicb$v_ccv_valid : 1; /* Compare & Exchange Value Register */P unsigned libicb$v_unat_valid : 1; /* User NaT Collection Register */S unsigned libicb$v_fpsr_valid : 1; /* Floating Point Status Register. */N unsigned libicb$v_pfs_valid : 1; /* Previous Function State */N unsigned libicb$v_lc_valid : 1; /* Loop Count Register */N unsigned libicb$v_ec_valid : 1; /* Epilogue Count Register */N unsigned libicb$v_csd_valid : 1; /* Copy of AR.CSD */N unsigned libicb$v_ssd_valid : 1; /* Copy of AR.SSD */* unsigned libicb$v_fill_3_ : 4;" } libicb$r_ar_valid_s; } libicb$r_ar_valid_u; __union {N int libicb$q_other_valid [2]; /* PC, CFM validity mask */ __struct {N unsigned libicb$v_pc_valid : 1; /* Current PC */N unsigned libicb$v_cfm_valid : 1; /* Current Frame Marker */N unsigned libicb$v_um_valid : 1; /* User Mask field of PSR. */* unsigned libicb$v_fill_4_ : 5;% } libicb$r_other_valid_s;! } libicb$r_other_valid_u;N int libicb$q_pr_valid [2]; /* Predicate Register validity mask */g __int64 libicb$ih_original_spill_addr; /* Original address of GR spill area (&LIBICB$IH_IREG[0]) */N/* (needed for NaT bit podition calculations) */P __int64 libicb$ih_true_psp;  /* True Previous SP (for Invo Handle) */ __int64 libicb$ih_spare_03; __int64 libicb$ih_spare_04; __int64 libicb$ih_spare_05; __int64 libicb$ih_spare_06; __int64 libicb$ih_spare_07; __int64 libicb$ih_spare_08;N/* */N/******** End of context_t structure ********************* */R __int64 libicb$ih_psp; /* SP at entry to routine (Previous SP) */N __int64 libicb$ih_psp_valid; /* PreviousSP valid */N __int64 libicb$ih_return_pc; /* Return PC for SDA. */N __int64 libicb$ih_prev_bsp; /* BSP of preceding frame for SDA. */e unsigned __int64 libicb$ph_chfctx_addr; /* Pointer to condition handler facility context block */] unsigned __int64 libicb$ph_other; /* Pointer to other interesting structure (if any) */X __int64 libicb$ih_ossd; /* Copy of OSSD from Unwind Information Block */N __int64 libicb$ih_handler_fv; /* Condition Handler Function Value */P unsigned __int64 libicb$ph_lsda; /* Virtual Address of LSD area of UIB */d unsigned __int64 libicb$ph_desc; /* Pointer to _Unwind_Descriptor structure (Internal use) */a unsigned __int64 libicb$ph_history; /* Pointer to _Unwind_History structure (Internal use) */N/******** Start of User Override ************************* */N/*  */N/* The following locations can be used to alter the default behavior */N/* Typically this would be used for cross-process unwinding, and */N/* specifying an alternative memory allocation scheme. */ __union {N int libicb$r_uo_base; /* base of User Override area */N int libicb$q_uo_flags [2]; /* operational flags */ __struct {7 unsigned libicb$v_uo_flag_ca che_unwind : 1;N/* cache unwind information between calls */N/* for effiecient stack walk. */Q unsigned libicb$v_uo_flag_emulation_mode : 1; /* Internal use only */* unsigned libicb$v_fill_5_ : 6;$ } libicb$r_uo_flag_bits; } libicb$r_op_flags;T __int64 libicb$ih_uo_ident; /* user context variable, passed by value */N/* to the following callback routines.  */W unsigned __int64 libicb$ph_uo_read_mem; /* Pointer to user "read memory" routine */i unsigned __int64 libicb$ph_uo_getueinfo; /* Pointer to user "get Unwind Entry Information" routine */a unsigned __int64 libicb$ph_uo_getcontext; /* Pointer to user "get Initial Context" routine */W unsigned __int64 libicb$ph_uo_write_mem; /* Pointer to user "put memory" routine */Y unsigned __int64 libicb$ph_uo_write_reg; /* Pointer to user "put register" routine */P unsigned __int64 libicb$ph_uo_malloc; /* Pointer to user "malloc" routine */N unsigned __int64 libicb$ph_uo_free; /* Pointer to user "free" routine */c unsigned __int64 libicb$ph_uo_action_routine; /* Pointer to user "action" routine - actions */N/* are defined by "action codes" (see below). */ __int64 libicb$ih_spare_10;N/******** End of User Override area *************************** */N/* the following locations are used inte rnally, and should not be */N/* modified by the user */W unsigned __int64 libicb$ph_most_recent_context; /* Most recent user context used */ __union {N int libicb$l_internal_flags; /* internal operational flags */ __struct {7 unsigned libicb$v_using_client_memread : 1;* unsigned libicb$v_my_mode : 2;* unsigned libicb$v_fill_6_ : 5;% } libicb$r_int_flag_ bits; } libicb$r_int_flags;N int libicb$l_interface_state; /* enum InterfaceUsageState */N int libicb$l_ip_source; /* enum IP_SOURCE */N/* The alert code can be examined to a more detailed failure status */N int libicb$l_alert_code; /* enum _UNW_ReturnCode */ __int64 libicb$ih_spare_11;#if defined(__VAXC) char libicb$t_align_2[];#elseW/* Warning: empty char[] member for libicb$t_align_2 at end of structure not created */"#endif /* #if defined(__VAXC) */N/* the operating system. It's size may vary over time. */) __int64 libicb$ih_system_defined [2];N/* */[/* Action codes are passed as the first parameter to the UO_ACTION_ROUTINE to indicate */]/* an action to be performed. The remaining parameters to the action routine are action */N/* dependent, and usually include the ident value as the last parameter. */N/* */N/* Action routine prototype: */N/* */[/* uint64 return_value = action_routine (enum action_code code, ..., uint64 ident); */N/* */X/* A return_value of ACTION_USE_DEFAULT indicate s that the action was not performed */S/* and the calling standard routines should fall back to "default" processing. */N/* Other return values are action dependent. */N/* */ } ; #if !defined(__VAXC)6#define libicb$ih_header libicb$r_hdr.libicb$ih_headerV#define libicb$l_context_length libicb$r_hdr.libicb$r_hdr_desc.libicb$l_context_lengthd#define libicb$v_fflags_bits libicb$r_hdr.libicb$r_hdr_desc.libicb$r_frameflags.libicb$v_fflags_bits#define libicb$v_bottom_of_stack libicb$r_hdr.libicb$r_hdr_desc.libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_bottom_of_stack#define libicb$v_handler_present libicb$r_hdr.libicb$r_hdr_desc.libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_handler_presenty#define libicb$v_in_prologue libicb$r_hdr.libicb$r_hdr_desc.libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_in_prologuey#define libicb$v_in_epilogue libicb$r_hdr.libicb$r_hdr_desc.libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_in_epilogue#define libicb$v_has_mem_stk_frame libicb$r_hdr.libicb$r_hdr_desc.libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_has_mem_stk_fra\me#define libicb$v_has_reg_stk_frame libicb$r_hdr.libicb$r_hdr_desc.libicb$r_frameflags.libicb$r_fflags_desc.libicb$v_has_reg_stk_fra\meT#define libicb$b_block_version libicb$r_hdr.libicb$r_hdr_desc.libicb$b_block_version4#define libicb$ih_ireg libicb$r_i_reg.libicb$ih_iregM#define libicb$ih_i_used0 libicb$r_i_reg.libicb$r_i_overlay.libicb$ih_i_used0C#define libicb$ih_gp libicb$r_i_reg.libicb$r_i_overlay.libicb$ih_gpC#define libicb$ih_sp libicb$r_i_reg.libicb$r_i_overlay.libicb$ih_spC#define libicb$ih_tp libicb$r_i_reg.libicb$r_i_overlay.libicb$ih_tpC#define libicb$ih_ai libicb$r_i_reg.libicb$r_i_overlay.libicb$ih_ai2#define libicb$ih_cfm libicb$r_cfm_u.libicb$ih_cfm?#define libicb$v_sof libicb$r_cfm_u.libicb$r_cfm_s.libicb$v_sof?#define libicb$v_sol libicb$r_cfm_u.libicb$r_cfm_s .libicb$v_sol?#define libicb$v_sor libicb$r_cfm_u.libicb$r_cfm_s.libicb$v_sorE#define libicb$v_rrb_gr libicb$r_cfm_u.libicb$r_cfm_s.libicb$v_rrb_grE#define libicb$v_rrb_fr libicb$r_cfm_u.libicb$r_cfm_s.libicb$v_rrb_frE#define libicb$v_rrb_pr libicb$r_cfm_u.libicb$r_cfm_s.libicb$v_rrb_pr/#define libicb$ih_um libicb$r_um_u.libicb$ih_um;#define libicb$v_be libicb$r_um_u.libicb$r_um_s.libicb$v_be;#define libicb$v_up libicb$r_um_u.libicb$r_um_s.libicb$v_up;#define libicb$v_ac libicb$r_um_u.libicb$r_um_s.libicb$v_ac=#define libicb$v_mfl libicb$r_um_u.libicb$r_um_s.libicb$v_mfl=#define libicb$v_mfh libicb$r_um_u.libicb$r_um_s.libicb$v_mfh?#define libicb$q_ar_valid libicb$r_ar_valid_u.libicb$q_ar_validU#define libicb$v_rsc_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_rsc_validU#define libicb$v_bsp_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_bsp_valid_#define libicb$v_bspstore_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_bspstore_validW#define libicb$v_rnat_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_rnat_validU#define libicb$v_ccv_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_ccv_validW#define libicb$v_unat_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_unat_validW#define libicb$v_fpsr_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_fpsr_validU#define libicb$v_pfs_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_pfs_validS#define libicb$v_lc_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_lc_validS#define libicb$v_ec_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_ec_validU#define libicb$v_csd_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_csd_validU#define libicb$v_ssd_valid libicb$r_ar_valid_u.libicb$r_ar_valid_s.libicb$v_ssd_validH#define libicb$q_other_valid libicb$r_other_valid_u.libicb$q_other_validY#define libicb$v_pc_valid libicb$r_other_valid_u.libicb$r_other_valid_s.libicb$v_pc_valid[#define libicb$v_cfm_valid libicb$r_other_valid_u.libicb$r_other_valid_s.libicb$v_cfm_validY#define libicb$v_um_valid libicb$r_other_valid_u.libicb$r_other_valid_s.libicb$v_um_valid;#define libicb$r_uo_base libicb$r_op_flags.libicb$r_uo_base=#define libicb$q_uo_flags libicb$r_op_flags.libicb$q_uo_flagsk#define libicb$v_uo_flag_cache_unwind libicb$r_op_flags.libicb$r_uo_flag_bits.libicb$v_uo_flag_cache_unwindo#define libicb$v_uo_flag_emulation_mode libicb$r_op_flags.libicb$r_uo_flag_bits.libicb$v_uo_flag_emulation_modeJ#define libicb$l_internal_flags libicb$r_int_flags.libicb$l_internal_flagsm#define libicb$v_using_client_memread libicb$r_int_flags.libicb$r_int_flag_bits.libicb$v_using_client_memreadS#define libicb$v_my_mode libicb$r_int_flags.libicb$r_int_flag_bits.libicb$v_my_mode"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* Write Register callback routine - WhichReg enum. */N/* */N/* The Write Register callback routine is only used when a live */N/* register in another (remote) process needs to be written as */N/* a result of a call to LIB$I64_PUT_INVO_REGISTERS. */N/* It is permissible to implement a subset of these registers, */N/* or not implement it at all if you are sure that these registers */N/* have been saved to memory before PUT_INVO is called */N/*  */N/* For the General Registers: */N/* whichReg = LIBICB$K_WhichReg_GR0 + register number */N/* value_1 = 64-bit register value */N/* value_2 = 0, or 1 for NaT bit value */N/* */#define LIBICB$K_WHICHREG_GR0 0N/*  */N/* For the Floating Registers: */N/* whichReg = LIBICB$K_WhichReg_FR0 + floating register number */N/* value_1 = 64-bit lower floating fill value */N/* value_2 = 64-bit upper floating fill value */N/* */!#define LIBICB$K_WHICHREG_FR0 128N/*  */N/* For the Predicate Registers: */N/* whichReg = LIBICB$K_WhichReg_PR0 + predicate register number */N/* value_1 = 0, or 1 rgister (bit) value */N/* value_2 = ignored */N/* */!#define LIBICB$K_WHICHREG_PR0 256N/*  */N/* For the Branch Registers: */N/* whichReg = LIBICB$K_WhichReg_BR0 + branch register number */N/* value_1 = 64-bit register value */N/* value_2 = ignored */N/* */!#define LIBICB$K_WHICHREG_BR0 320N/*  */N/* For the Floating Point Status Register: */N/* whichReg = LIBICB$K_WhichReg_FPSR */N/* value_1 = 64-bit register value */N/* value_2 = ignored */N/* */"#define LIBICB$K_WHICHREG_FPSR 328 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LIBICB_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */wwo/*********************************************************************************************** *********************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */L/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]LIBVMDEF.SDI;1 *//********************************************************************************************************************************//*** MODULE $LIBVMDEF ***/#ifndef __LIBVMDEF_LOADED#define __LIBVMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* Interface definitions for LIB$VM package */N/* */N/* LIB$CREATE_VM_ZONE algorithm codes */N#define LIB$K_VM_FIRST_FIT 1 /* First fit */]#define LIB$K_VM_QUICK_FIT 2 /* Quick fit, with fixed queues of preferred sizes */R#define LIB$K_VM_FREQ_SIZES 3 /* First fit, with frequent sizes cache */N#define LIB$K_VM_FIXED 4 /* Fixed size blocks */N/* LIB$CREATE_VM_ZONE flag definitions */N#define LIB$M_VM_BOUNDARY_TAGS 1 /* Boundary tagged blocks */N#define LIB$M_VM_GET_FILL0 2  /* 0-fill for LIB$GET_VM */N#define LIB$M_VM_GET_FILL1 4 /* 1-fill for LIB$GET_VM */N#define LIB$M_VM_FREE_FILL0 8 /* 0-fill for LIB$FREE_VM */N#define LIB$M_VM_FREE_FILL1 16 /* 1-fill for LIB$FREE_VM */U#define LIB$M_VM_EXTEND_AREA 32 /* Add extent to existing area if possible */P#define LIB$M_VM_NO_EXTEND 64 /* Area is not allowed to be extended */V#define LIB$M_VM_TAIL_LARGE 128 /* Add larger than normal areas at the tail */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LIBVMDEF_LOADED */ ww/************************************************************************************************************* *******************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $LIBWAITDEF ***/#ifndef __LIBWAITDEF_LOADED#define __LIBWAITDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* Interface definitions for LIB$WAIT */N/* */N/* LIB$WAIT floating-point format codes (must equal CVT$K_VAX_F,... codes) */N#define LIB$K_VAX_F 0  /* VAX F Floating point data */N#define LIB$K_VAX_D 1 /* VAX D Floating point data */N#define LIB$K_VAX_G 2 /* VAX G Floating point data */N#define LIB$K_VAX_H 3 /* VAX H Floating point data */N#define LIB$K_IEEE_S 4 /* IEEE S Floating point data */N#define LIB$K_IEEE_T 5 /* IEEE T Floating point data */N/* LIB$WAIT option definitions  */N#define LIB$K_WAKE 0 /* WAKE option, interruptable */N#define LIB$K_NOWAKE 1 /* NOWAKE option, non-interruptable */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LIBWAITDEF_LOADE D */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */N/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]LICENSEMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $LICENSEDEF ***/#ifndef __LICENSEDEF_LOADED#def ine __LICENSEDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:57:59.79 */N/* */O/* ************************************************************************* */O/* * * */O/* * COPYRIGHT 2003 HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P. * */O/* * * */O/* * CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM HP AND/OR * */O/* * ITS SUBSIDIARIES REQUIRED FOR POSSESSION, USE, OR COPYING. * */O/* * * */O/* * CONSISTENT WITH FAR 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE, * */O/* * COMPUTER SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL * */O/* * ITEMS ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD * */O/* * COMMERCIAL LICENSE.  * */O/* * * */O/* * NEITHER HP NOR ANY OF ITS SUBSIDIARIES SHALL BE LIABLE FOR TECHNICAL * */O/* * OR EDITORIAL ERRORS OR OMISSIONS CONTAINED HEREIN. THE INFORMATION * */O/* * IN THIS DOCUMENT IS PROVIDED "as is" WITHOUT WARRANTY OF ANY KIND AND * */O/* * IS SUBJECT TO CHANGE WITHOUT NOTICE. THE WARRANTIES FOR HP PRODUCTS * */O/* * ARE SET FORTH IN THE EXPRESS LIMITED WARRANTY STATEMENTS ACCOMPANYING * */O/* * SUCH PRODUCTS. NOTHING HEREIN SHOULD BE CONSTRUED AS CONSTITUTING AN * */O/* * ADDITIONAL WARRANTY. * */O/* * * */O/* ************************************************************************* */N/*++ */N/* */N/* FACILITY:  */N/* */I/* VAX/VMS LICENSING SYSTEM SERVICES */N/* */N/* ABSTRACT: */N/* */K/* THIS MODULE DEFINES THE STATUS CODES FOR THE VARIOU S ERROR CONDITIONS */I/* THAT CAN OCCUR WHILE ATTEMPTING TO DO LICENSING CHECKS FOR A */I/* DSLA LICENSED SOFTWARE PRODUCT. */N/* */N/* AUTHOR: */N/* */I/* TRUDY C. MATTHEWS */N/*   */N/* CREATION DATE: */N/* */I/* 26 JANUARY 1987 */N/* */N/* MODIFIED BY: */N/*  */2/* X-10 GP030104 GUY PELEG 01-MAR-2004 */B/* ADD NONCOMPLIANCE. */N/* */1/* X-9 GP121003 GUY PELEG 10-DEC-2003 */B/* UPDATE ILLPRODUCER TO INCLUDE HP. */N/* */6/* X-8 EAG2 ERIC ABIS 3-JUN-1998 */C/* ADDED USE R_MODE. */C/* */5/* X-7 EA12 ERIC ABIS 4-APR-1995 */B/* ADDED INVALID_TOKEN. */B/* */6/* X-6 EA001 ERIC ABIS 29-APR-1991 */B/* ADDED MESSAGE FOR PRODUCTS WITH RESERVE LISTS. IT IS */B/* PUT IN THE PLACE OF THE CURRENTLY UNUSED INVALID_HW_ID */B/* MESSAGE BECAUSE THE SEPARATE RELEASE OF LMF 1.1 REQUIRED */B/* THE PATCHING OF SYSMSG.EXE. THIS PATCH REPLACED */B/* INVALID_HW_ID WITH NOTINRSRVLIST. FUTURE RELEASES OF */B/* VMS, IF THEY INCLUDE LMF 1.1, WILL NOT HAVE TO PATCH */B/* AND NOTINRSRVLIST WILL RETAIN ITS VALUE. THE UNUSED */B/* INVALID_HW_ID WILL GET A NEW MESSAGE NUMBER AND THE */B/* IMPACT SHOULD BE MINIMAL */N/*  */6/* X-5 JWN009 JOHN W. NOGRADY 03-NOV-1987 */B/* UPDATE MESSAGE TEXT AND ALLOW FOR "room to grow". */N/* */6/* X-4 JWN001 JOHN W. NOGRADY 14-OCT-1987 */B/* ADD MESSAGES NOAUTH AND SYSMGR. THESE MESSAGES WILL */B/* BE THE FIRST TWO VALUES IN THE MESSAGE VECTOR USED IN */B/* THE ROUTINE $LOOKUP_LICENSE.  */N/* */1/* X-3 DKH001 KEN HOBDAY 19-SEP-1987 */B/* ADD ADDITIONAL MESSAGES FOR LMF$GRANT_LICENSE */N/* */8/* X-2 TCM0002 TRUDY C. MATTHEWS 09-MAR-1987 */B/* REMOVE WORD WARRANTY FROM LICENSE STATUS MESSAGES. */N/* */8/* X-1 T CM0001 TRUDY C. MATTHEWS 26-JAN-1987 */B/* INITIAL VERSION. */N/*-- */#define LICENSE_FACILITY 2708N/* SUCCESS CODES */N/* THESE CODES RETURN INFORMATION */!#define LICENSE$_SYSMGR 177505059(#define LICENSE$_NONCOMPLIANCE 177505067N/* THESE CODES RETURN SLIGHTLY DISMAYI NG INFORMATION */N/* THESE CODES INDICATE UNRECOVERABLE ERRORS */!#define LICENSE$_NOAUTH 177507058N/* ALL OF THESE ARE FATAL */$#define LICENSE$_NOLICENSE 177507860##define LICENSE$_EXCEEDED 177507868&#define LICENSE$_NOT_STARTED 177507876'#define LICENSE$_INVALID_DATE 177507884*#define LICENSE$_INVALID_VERSION 177507892%#define LICENSE$_TERMINATED 177507900(#define LICENSE$_NOTINRSRV LIST 177507908N/*+ */N/* RETURNED BY SYS$LOOKUP_LICENSE */N/*- */##define LICENSE$_BADPARAM 177507916&#define LICENSE$_ILLPRODUCER 177507924$#define LICENSE$_WRONUMARG 177507932(#define LICENSE$_INVALID_HW_ID 177507940(#define LICENSE$_INVALID_TOKEN 177507948N/*+  */N/* NEW MESSAGES */N/*- */$#define LICENSE$_USER_MODE 177507956 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LICENSEDEF_LOADED */ ww2/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $LKIDEF ***/#ifndef __LKIDEF_LOADED#define __LKIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/*  */N/* Get Lock Information Data Identifier Definitions */N/* */N/* **** NOTE **** */I/* The LKIDEF structure is defined multiple times to accomidate C! */N/* */N/* New items can not be added to the end of LKIDEF or LKIDEF_BR */I/* since this require all users to re-link. GETLKI can return */I/* multiples of these structures concatenated and thus any */I/* new items returned should really be placed in a new structure. */N/*- */ Y#define LKI$K_LENGTH 24 /*LENGTH OF LIST BLOCK WITHOUT BYTE RANGE INFO */Y#define LKI$C_LENGTH 24 /*LENGTH OF LIST BLOCK WIT HOUT BYTE RANGE INFO */ #ifdef __NEW_STARLETtypedef struct _lkidef { __union {N unsigned int lki$l_mstlkid; /*LOCK ID ON MASTER */N unsigned int lki$l_lockid; /*OLD SYMBOL */ } lki$r_u1;N unsigned int lki$l_pid; /*PROCESS ID */ __union {N unsigned int lki$l_mstcsid; /*CSID OF MASTER */N unsigned int lki$l_sysid; /*OLD SYMBOL  */ } lki$r_u2;N unsigned char lki$b_rqmode; /*REQUEST MODE */N unsigned char lki$b_grmode; /*GRANTED MODE */N char lki$b_queue; /*LOCK QUEUE */N char lki$$$_spare; /*SPARE BYTE */ __union {N unsigned int lki$l_lkid; /*LOCK ID ON PROCESS NODE */N unsigned int lki$l_remlkid; /*OLD SYMBOL */ } lki$r_u3; __union {N unsigned int lki$l_csid; /*CSID OF PROCESS NODE */N unsigned int lki$l_remsysid; /*OLD SYMBOL */ } lki$r_u4; } LKIDEF; #if !defined(__VAXC),#define lki$l_mstlkid lki$r_u1.lki$l_mstlkid*#define lki$l_lockid lki$r_u1.lki$l_lockid,#define lki$l_mstcsid lki$r_u2.lki$l_mstcsid(#define lki$l_sysid lki$r_u2.lki$l_sysid&#define lki$l_lkid lki$r_u3. lki$l_lkid,#define lki$l_remlkid lki$r_u3.lki$l_remlkid&#define lki$l_csid lki$r_u4.lki$l_csid.#define lki$l_remsysid lki$r_u4.lki$l_remsysid"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct lkidef { __union {N unsigned int lki$l_mstlkid; /*LOCK ID ON MASTER */N unsigned int lki$l_lockid; /*OLD SYMBOL */ } lki$r_u1;N unsigned int lki$l_pid; /*PROCESS ID  */ __union {N unsigned int lki$l_mstcsid; /*CSID OF MASTER */N unsigned int lki$l_sysid; /*OLD SYMBOL */ } lki$r_u2;N unsigned char lki$b_rqmode; /*REQUEST MODE */N unsigned char lki$b_grmode; /*GRANTED MODE */N char lki$b_queue; /*LOCK QUEUE */N char lki$$$_spare; /*SPARE BYTE  */ __union {N unsigned int lki$l_lkid; /*LOCK ID ON PROCESS NODE */N unsigned int lki$l_remlkid; /*OLD SYMBOL */ } lki$r_u3; __union {N unsigned int lki$l_csid; /*CSID OF PROCESS NODE */N unsigned int lki$l_remsysid; /*OLD SYMBOL */ } lki$r_u4; } ; #if !defined(__VAXC),#define lki$l_mstlkid lki$r_u1.lki$l_mstlkid*#define lki$l_lockid lki$r_u1.lki$l_lockid,#define lki$l_mstcsid lki$r_u2.lki$l_mstcsid(#define lki$l_sysid lki$r_u2.lki$l_sysid&#define lki$l_lkid lki$r_u3.lki$l_lkid,#define lki$l_remlkid lki$r_u3.lki$l_remlkid&#define lki$l_csid lki$r_u4.lki$l_csid.#define lki$l_remsysid lki$r_u4.lki$l_remsysid"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* Define the structure for returning Byte Range  information. */N/* This is an extention of the LKIDEF structure. *//* /* ITEM LIST BLOCKS */V#define LKI$K_BR_LENGTH 56 /*LENGTH OF LIST BLOCK WITH BYTE RANGE INFO */V#define LKI$C_BR_LENGTH 56 /*LENGTH OF LIST BLOCK WITH BYTE RANGE INFO */ #ifdef __NEW_STARLETtypedef struct _lkidef_br { LKIDEF lki$r_lki_base;N unsigned __int64 lki$q_rqstart; /* REQUEST RANGE START */N unsigned __int64 ! lki$q_rqlength; /* REQUEST RANGE LENGTH */N unsigned __int64 lki$q_grstart; /* GRANTED RANGE START */N unsigned __int64 lki$q_grlength; /* GRANTED RANGE LENGTH */ } LKIDEF_BR;#else /* __OLD_STARLET */struct lkidef_br {! struct lkidef lki$r_lki_base;N unsigned int lki$q_rqstart [2]; /* REQUEST RANGE START */N unsigned int lki$q_rqlength [2]; /* REQUEST RANGE LENGTH */N unsigned int lki"$q_grstart [2]; /* GRANTED RANGE START */N unsigned int lki$q_grlength [2]; /* GRANTED RANGE LENGTH */ } ;%#endif /* #ifdef __NEW_STARLET */ N/* DEFINE NAMSPACE FIELDS */#define LKI$M_SYSNAM 0x80000000 #ifdef __NEW_STARLETtypedef struct _namspace { __union { __struct {N unsigned short int lki$w_group; /*GROUP OF OWNER UIC */N unsigned char #lki$b_rmod; /*ACCESS MODE OF REQUEST */N unsigned char lki$b_status; /*STATUS OF RESOURCE */$ } lki$r_namspace_fields; __struct {N unsigned lki$$_fill : 31; /* SPARE */N unsigned lki$v_sysnam : 1; /* SYSTEM WIDE RSB */ } lki$r_status_bits; } lki$r_namspace_union; } NAMSPACE; #if !defined(__VAXC)J#define lki$w_group lki$r_namspace_union $.lki$r_namspace_fields.lki$w_groupH#define lki$b_rmod lki$r_namspace_union.lki$r_namspace_fields.lki$b_rmodL#define lki$b_status lki$r_namspace_union.lki$r_namspace_fields.lki$b_status@#define lki$r_status_bits lki$r_namspace_union.lki$r_status_bits3#define lki$v_sysnam lki$r_status_bits.lki$v_sysnam"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct namspace { __union { __struct {N unsigned short int lki$w_group; /*GROUP OF OWNER UIC % */N unsigned char lki$b_rmod; /*ACCESS MODE OF REQUEST */N unsigned char lki$b_status; /*STATUS OF RESOURCE */$ } lki$r_namspace_fields; __struct {N unsigned lki$$_fill : 31; /* SPARE */N unsigned lki$v_sysnam : 1; /* SYSTEM WIDE RSB */ } lki$r_status_bits; } lki$r_namspace_union; } ; #if !defined(__VAXC)J#define lk &i$w_group lki$r_namspace_union.lki$r_namspace_fields.lki$w_groupH#define lki$b_rmod lki$r_namspace_union.lki$r_namspace_fields.lki$b_rmodL#define lki$b_status lki$r_namspace_union.lki$r_namspace_fields.lki$b_statusH#define lki$v_sysnam lki$r_namspace_union.lki$r_status_bits.lki$v_sysnam"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* DEFINE STATE FIELDS */ #ifdef __NEW_STARLETtypedef struct _statef {N ' unsigned char lki$b_state_rqmode; /*REQUEST MODE */N unsigned char lki$b_state_grmode; /*GRANTED MODE */N char lki$b_state_queue; /*LOCK STATE CODE */ } STATEF;#else /* __OLD_STARLET */struct statef {N unsigned char lki$b_state_rqmode; /*REQUEST MODE */N unsigned char lki$b_state_grmode; /*GRANTED MODE */N char lki$b_state_queue; /* (LOCK STATE CODE */ } ;%#endif /* #ifdef __NEW_STARLET */#define LKIUSR$K_LENGTH 20#define LKIUSR$C_LENGTH 20]#define LKIUSR$K_BLOCKER_START 20 /* OFFSET TO THE START OF THE RETURNED INFORMATION */ #ifdef __NEW_STARLETtypedef struct _lkiusrdef {N unsigned __int64 lkiusr$q_start; /* START OF THE REQUESTED RANGE */N unsigned __int64 lkiusr$q_length; /* LENGTH OF THE REQUESTED RANGE */N unsigned char lkiusr$b_rqmode; /* REQUEST )ED MODE */_ unsigned char lkiusr$b_ignore_own; /* FLAG TO IGNORE LOCKS OWNED BY THE CALLING PROCESS */N short int lki$$_fill_1; /* reserved */ } LKIUSRDEF;#else /* __OLD_STARLET */struct lkiusrdef {N unsigned int lkiusr$q_start [2]; /* START OF THE REQUESTED RANGE */N unsigned int lkiusr$q_length [2]; /* LENGTH OF THE REQUESTED RANGE */N unsigned char lkiusr$b_rqmode; /* REQUESTED MODE * */_ unsigned char lkiusr$b_ignore_own; /* FLAG TO IGNORE LOCKS OWNED BY THE CALLING PROCESS */N short int lki$$_fill_1; /* reserved */ } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _rngdef {N unsigned __int64 lki$_rng_q_rqstart; /* REQUEST RANGE START */N unsigned __int64 lki$_rng_q_rqlength; /* REQUEST RANGE LENGTH */N unsigned __int64 lki$_rng_q_grstart; /* GRANTED RA +NGE START */N unsigned __int64 lki$_rng_q_grlength; /* GRANTED RANGE LENGTH */ } RNGDEF;#else /* __OLD_STARLET */struct rngdef {N unsigned int lki$_rng_q_rqstart [2]; /* REQUEST RANGE START */N unsigned int lki$_rng_q_rqlength [2]; /* REQUEST RANGE LENGTH */N unsigned int lki$_rng_q_grstart [2]; /* GRANTED RANGE START */N unsigned int lki$_rng_q_grlength [2]; /* GRANTED RANGE LENGTH */ } ;%#end,if /* #ifdef __NEW_STARLET */N/*LOCK STATE CODE VALUES */N#define LKI$C_GRANTED 1 /* GRANTED */N#define LKI$C_CONVERT 0 /* CONVERSION */N#define LKI$C_WAITING -1 /* WAITING */N#define LKI$C_RETRY -2 /* RETRY REQUEST */N#define LKI$C_SCSWAIT -3 /* SCS WAIT - */N#define LKI$C_RSPNOTQED -4 /* RESPONSE NOT QUEUED */N#define LKI$C_RSPQUEUED -5 /* RESPONSE QUEUED */N#define LKI$C_RSPGRANTD -6 /* RESPONSE GRANTED */N#define LKI$C_RSPDOLOCL -7 /* RESPONSE DO LOCALLY */N#define LKI$C_RSPRESEND -8 /* RESPONSE RESEND */N/* DEFINE TABLE NUMBERS */N/* STRUCTURE COD.ES MUST START AT 1 */N#define LKI$C_LKBTYPE 1 /* ITEM IN LKB */N#define LKI$C_RSBTYPE 2 /* ITEM IN RSB */N#define LKI$C_LISTEND 0 /* DEFINE ITMLST TERMINATOR */N/* ITEM IDENTIFIERS FOR LKB */N#define LKI$_PID 256 /* PROCESS ID */N#define LKI$_STATE 257 /*/ CURRENT LOCK STATE */N#define LKI$_PARENT 258 /* ID OF PARENT LOCK */N#define LKI$_LCKREFCNT 259 /* SUB-LOCK REFERENCE COUNT */N#define LKI$_LOCKID 260 /* LOCK ID */N#define LKI$_REMLKID 261 /* REMOTE LOCK ID */N#define LKI$_MSTLKID 262 /* LOCK ID ON RESOURCE MASTER */N#define LKI$_LKID 263 /* LOCK ID ON PROCESS NODE 0 */N#define LKI$_CSID 264 /* CSID OF PROCESS NODE */N#define LKI$_BRL 265 /* IS THE LOCK A BYTE RANGE LOCK */,/** , TSKID /* TASK ID FOR MULTITASK */N#define LKI$_RANGE 266 /* Range of request */N#define LKI$_LASTLKB 267 /* MAX INDEX IN LKB TABLE */N/* ITEM IDENTIFIERS FOR RSB */N#define LKI$_NAMSPACE 512 /* RESOU1RCE NAME SPACE */N#define LKI$_RESNAM 513 /* RESOURCE NAME */N#define LKI$_RSBREFCNT 514 /* SUB-RESOURCE REFERENCE COUNT */N#define LKI$_VALBLK 515 /* VALUE BLOCK */O#define LKI$_SYSTEM 516 /* SYSTEM ID OF SYSTEM WITH RESOURCE */N#define LKI$_LCKCOUNT 517 /* COUNT OF LOCKS ON RESOURCE */S#define LKI$_BLOCKEDBY 518 /* LIST OF LOCKS BLOCKED BY CURR2ENT LOCK */Q#define LKI$_BLOCKING 519 /* LIST OF LOCKS BLOCKING CURRENT LOCK */N#define LKI$_LOCKS 520 /* LIST OF ALL LOCKS ON RESOURCE */P#define LKI$_CVTCOUNT 521 /* COUNT OF LOCKS ON CONVERSION QUEUE */N#define LKI$_WAITCOUNT 522 /* COUNT OF LOCKS ON WAIT QUEUE */N#define LKI$_GRANTCOUNT 523 /* COUNT OF LOCKS ON GRANT QUEUE */N#define LKI$_MSTCSID 524 /* CSID OF RESOURCE MASTER */N#defin3e LKI$_VALBLKST 525 /* VALUE BLOCK STATUS */d#define LKI$_BLOCKEDBY_BR 526 /* LIST OF LOCKS BLOCKED BY CURRENT LOCK WITH BYTE RANGES */f#define LKI$_BLOCKING_BR 527 /* LIST OF LOCKS BLOCKING THE CURRENT LOCK WITH BYTE RANGES */d#define LKI$_LOCKS_BR 528 /* LIST OF LOCKS ALL LOCKS ON A RESOURCE WITH BYTE RANGES */_#define LKI$_BLOCKER_BR 529 /* LOCK THAT WILL BLOCK THE REQUESTED RANGE AND MODE */N#define LKI$_XVALBLK 530 4 /* EXTENDED VALUE BLOCK */N#define LKI$_XVALNOTVALID 531 /* VALIDITY OF EXTENDED VALUE BLOCK */_#define LKI$_LASTRSB 532 /* MAX INDEX IN RSB (MUST BE LAST internal use only) */N#define LKISND$K_HDRLEN 16 /*LENGTH OF HEADER */N#define LKISND$C_HDRLEN 16 /*LENGTH OF HEADER */ #ifdef __NEW_STARLETtypedef struct _lkisnddef {O/* Format for local system buffer header when sending an i5nformation request */N/* to a remote system. */N unsigned short int lkisnd$w_retsize; /* size of return info */N unsigned short int lkisnd$w_status; /* status of operation */N unsigned short int lkisnd$w_flags; /* flags */N unsigned short int lkisnd$w_seqnum; /* rebuild seqnm */N unsigned short int lkisnd$w_size; /* size of structure */N 6 unsigned char lkisnd$b_type; /* type of stucture */N unsigned char lkisnd$b_fill_2; /* */N unsigned char lkisnd$b_item_length; /* len of item info */N unsigned char lkisnd$b_fill_3; /* */N unsigned short int lkisnd$w_fill_4; /* */ } LKISNDDEF;#else /* __OLD_STARLET */struct lkisnddef {O/* Format for local system buffer head7er when sending an information request */N/* to a remote system. */N unsigned short int lkisnd$w_retsize; /* size of return info */N unsigned short int lkisnd$w_status; /* status of operation */N unsigned short int lkisnd$w_flags; /* flags */N unsigned short int lkisnd$w_seqnum; /* rebuild seqnm */N unsigned short int lkisnd$w_size; /* size of structure 8 */N unsigned char lkisnd$b_type; /* type of stucture */N unsigned char lkisnd$b_fill_2; /* */N unsigned char lkisnd$b_item_length; /* len of item info */N unsigned char lkisnd$b_fill_3; /* */N unsigned short int lkisnd$w_fill_4; /* */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __resto9reR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LKIDEF_LOADED */ ww /********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 * :/M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $LKSBDEF ***/#ifndef __LKSBDEF_LOADED#define __LKSBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pr;agmas 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 N/*+ */N/* Define Lock Status Block */N/*- */  #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or = C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _lksb {#pragma __nomember_alignmentN unsigned short int lksb$w_status; /* Status */N unsigned short int lksb$w_reserved; /* Reserved */N unsigned int lksb$l_lkid; /* Lock identification */N unsigned char lksb$b_valblk [16]; /* Lock value block */ } LKSB;#else /* __OLD_S >TARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _lksb {#pragma __nomember_alignmentN unsigned short int lksb$w_status; /* Status */N unsigned short int lksb$w_reserved; /* Reserved */N unsigned int lksb$l_lkid; /* Lock identification */N unsign ?ed char lksb$b_valblk [16]; /* Lock value block */ } lksb;%#endif /* #ifdef __NEW_STARLET */N#define LKSB$K_LENGTH 24 /* Length of LKSB */N#define LKSB$C_LENGTH 24 /* Length of LKSB */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypede @f struct _xlksb {#pragma __nomember_alignmentN unsigned short int xlksb$w_status; /* Status */N unsigned short int xlksb$w_reserved; /* Reserved */N unsigned int xlksb$l_lkid; /* Lock identification */N unsigned char xlksb$b_xvalblk [64]; /* Lock value block */ } XLKSB;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 Aor C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _xlksb {#pragma __nomember_alignmentN unsigned short int xlksb$w_status; /* Status */N unsigned short int xlksb$w_reserved; /* Reserved */N unsigned int xlksb$l_lkid; /* Lock identification */N unsigned char xlksb$b_xvalblk [64]; /* Lock value block */ } xlksb;%#endif /* #i Bfdef __NEW_STARLET */N#define XLKSB$K_LENGTH 72 /* Length of XLKSB */N#define XLKSB$C_LENGTH 72 /* Length of XLKSB */ )#if defined (__ALPHA) || defined (__ia64)# ifdef __INITIAL_POINTER_SIZEM# pragma __required_pointer_size __save /* Save current pointer size */G# pragma __required_pointer_size 64 /* Pointers are 64-bits */K typedef struct _lksb * LKSB_PQ; /* 64-bit pointer to an LKSB */Y typCedef struct _lksb ** LKSB_PPQ; /* 64-bit pointer to a pointer to an LKSB */M typedef struct _xlksb * XLKSB_PQ; /* 64-bit pointer to an LKSB */Z typedef struct _xlksb ** XLKSB_PPQ; /* 64-bit pointer to a pointer to an LKSB */S# pragma __required_pointer_size __restore /* Return to previous pointer size */# elseW typedef unsigned __int64 LKSB_PQ; /* Same size as a 64-bit pointer to an LKSB */d typedef unsigned __int64 LKSB_PPQ; /* Same size as a 64-bi Dt pointer to a pointer to an LKSB */X typedef unsigned __int64 XLKSB_PQ; /* Same size as a 64-bit pointer to an LKSB */e typedef unsigned __int64 XLKSB_PPQ; /* Same size as a 64-bit pointer to a pointer to an LKSB */# endif#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus E }#endif#pragma __standard #endif /* __LKSBDEF_LOADED */ ww;/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//******************************************************************************************************************************* F*//*** MODULE $LMFDEF ***/#ifndef __LMFDEF_LOADED#define __LMFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 */#endifG #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 #define LMF$_PROD_TOKEN 1#define LMF$_HW_ID 2#define LMF$_PROD_VEHRSION 3#define LMF$_PROD_DATE 4#define LMF$_CHARGE_TYPE 5#define LMF$_UNITS_IN_USE 6#define LMF$_USERNAME 7#define LMF$_CHECK_TOKEN 8#define LMF$_CHECK_HWID 9#define LMF$_NO_RELEASE 10#define LMF$C_PRDNAMLEN 24#define LMF$K_PRDNAMLEN 24#define LMF$C_PRDUCERLEN 24#define LMF$K_PRDUCERLEN 24#define LMF$C_CONTEXTLEN 16#define LMF$K_CONTEXTLEN 16#define LMF$C_TOKENLEN 31#define LMF$K_TOKENLEN 31#define LMF$C_HW_IDLEN 31#define LMF$K_HW_IDLEN 31#define LMF$C_IVERSIONLEN 4#define LMF$K_VERSIONLEN 4#define LMF$K_DATELEN 8#define LMF$C_DATELEN 8!#define LMF$M_RETURN_FAILURES 0x1$#define LMF$M_BROADCAST_FAILURES 0x2!#define LMF$M_OUTPUT_FAILURES 0x4#define LMF$M_KERNEL_GRANT 0x8-#define LMF$M_LOOKUP_LICENSE_SPARE 0xFFFFFFF0 #ifdef __NEW_STARLETtypedef struct _dvspm_masks {N unsigned lmf$v_return_failures : 1; /* return status .vs. signal */N unsigned lmf$v_broadcast_failures : 1; /* do an OPCOM */N Junsigned lmf$v_output_failures : 1; /* do a PUTMSG */N unsigned lmf$v_kernel_grant : 1; /* grant in kernel mode */N unsigned lmf$v_lookup_license_spare : 28; /* spare area */ } DVSPM_MASKS;#else /* __OLD_STARLET */struct dvspm_masks {N unsigned lmf$v_return_failures : 1; /* return status .vs. signal */N unsigned lmf$v_broadcast_failures : 1; /* do an OPCOM */N unsigned lmf$v_output_failures : K 1; /* do a PUTMSG */N unsigned lmf$v_kernel_grant : 1; /* grant in kernel mode */N unsigned lmf$v_lookup_license_spare : 28; /* spare area */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus L }#endif#pragma __standard #endif /* __LMFDEF_LOADED */ ww[k/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//* M** MODULE $LNKDEF ***/#ifndef __LNKDEF_LOADED#define __LNKDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N#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 N/* O*/N/* Linker Options Record (LNK) */N/* */N#define LNK$C_OLB 0 /* object library spec */N#define LNK$C_SHR 1 /* shareable image library spec */R#define LNK$C_OLI 2 /* object library with inclusion list */N#define LNK$C_OBJ 3 /* object file or symbol table file */N#define LNK$C_SHA P4 /* individually specified shr img */N#define LNK$C_MAXRECTYP 4 /* highest current record type */#define LNK$M_SELSER 0x1#define LNK$M_LIBSRCH 0x2 #ifdef __NEW_STARLETtypedef struct _lnkdef {N unsigned char lnk$b_rectyp; /* record type LNK */N unsigned char lnk$b_lnktyp; /* sub record type */ __union {' unsigned short int lnk$w_flags; __struct {N unsignQed lnk$v_selser : 1; /* selectively searched (LNK$C_OBJ) */' unsigned lnk$v_libsrch : 1;( unsigned lnk$v_fill_14_ : 6; } lnk$r_flags_bits; } lnk$r_flags_overlay; __union {N unsigned short int lnk$w_namlng; /* length of filespec name */ __struct {% char lnkdef$$_fill_1 [2];" } lnk$r_namlng_fields; } lnk$r_namlng_overlay; } LNKDEF; #if !defined(__VAXC)3#define lnk$w_flags lnk$ Rr_flags_overlay.lnk$w_flagsF#define lnk$v_selser lnk$r_flags_overlay.lnk$r_flags_bits.lnk$v_selserH#define lnk$v_libsrch lnk$r_flags_overlay.lnk$r_flags_bits.lnk$v_libsrch6#define lnk$w_namlng lnk$r_namlng_overlay.lnk$w_namlng"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct lnkdef {N unsigned char lnk$b_rectyp; /* record type LNK */N unsigned char lnk$b_lnktyp; /* sub record type */ __union {' Sunsigned short int lnk$w_flags; __struct {N unsigned lnk$v_selser : 1; /* selectively searched (LNK$C_OBJ) */' unsigned lnk$v_libsrch : 1;( unsigned lnk$v_fill_14_ : 6; } lnk$r_flags_bits; } lnk$r_flags_overlay; __union {N unsigned short int lnk$w_namlng; /* length of filespec name */ __struct {% char lnkdef$$_fill_1 [2];" } lnk$r_namlng_fields; } lnk$r_namlng_oveTrlay; } ; #if !defined(__VAXC)3#define lnk$w_flags lnk$r_flags_overlay.lnk$w_flagsF#define lnk$v_selser lnk$r_flags_overlay.lnk$r_flags_bits.lnk$v_selserH#define lnk$v_libsrch lnk$r_flags_overlay.lnk$r_flags_bits.lnk$v_libsrch6#define lnk$w_namlng lnk$r_namlng_overlay.lnk$w_namlng"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */bU#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LNKDEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//*** V*****************************************************************************************************************************//*** MODULE $LNMDEF ***/#ifndef __LNMDEF_LOADED#define __LNMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defineWd 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#elseX#define __union variant_union#endif#endif #define LNM$M_NO_ALIAS 0x1#define LNM$M_CONFINE 0x2#define LNM$M_CRELOG 0x4#define LNM$M_TABLE 0x8#define LNM$M_CONCEALED 0x100#define LNM$M_TERMINAL 0x200#define LNM$M_EXISTS 0x400#define LNM$M_SHAREABLE 0x10000!#define LNM$M_CLUSTERWIDE 0x20000!#define LNM$M_DCL_REQUEST 0x40000!#define LNM$M_CREATE_IF 0x1000000"#define LNM$M_CASE_BLIND 0x2000000##define LNM$M_INTERLOCKED 0x4000000$#define LNM$M_LOCAL_ACTION 0x8000000 Y #ifdef __NEW_STARLETtypedef struct _lnmdef {N/* Logical name attributes -- bits 0-7 */N unsigned lnm$v_no_alias : 1; /* Do not allow outer mode alias */N unsigned lnm$v_confine : 1; /* Do not copy into subprocess */N unsigned lnm$v_crelog : 1; /* Created with old $CRELOG service */N unsigned lnm$v_table : 1; /* This is a table name */N unsigned lnm$v_fill_0 : 4; /* Fill out loZgical name byte */N/* Logical name translation attributes -- bits 8-15 */R unsigned lnm$v_concealed : 1; /* Do not display result of translation */V unsigned lnm$v_terminal : 1; /* Do not retranslate result of translation */R unsigned lnm$v_exists : 1; /* Translation does exist at this index */N unsigned lnm$v_fill_1 : 5; /* Fill out translation byte */N/* Logical name table characteristics -- bits 16-23 [ */X unsigned lnm$v_shareable : 1; /* Logical name table is shareable (S0 space) */T unsigned lnm$v_clusterwide : 1; /* This is a clusterwide table (or name) */N/* Only supported as returned $TRNLNM attribute */T unsigned lnm$v_dcl_request : 1; /* $CRELNM or $CRELNT request made by DCL */N unsigned lnm$v_fill_2 : 1; /* Reserved bit numbers 18-19 */N unsigned lnm$v_fill_3 : 4; /* Fill out table byte \ */N/* System service options -- bits 24-31 */T unsigned lnm$v_create_if : 1; /* May map to existing logical name table */R unsigned lnm$v_case_blind : 1; /* Perform case-insensitive translation */c unsigned lnm$v_interlocked : 1; /* Translate clusterwide name with LNM$CWLOGICALS locked */V unsigned lnm$v_local_action : 1; /* A local operation on a clusterwide name */N/* done in response to a request from another node ] */N/* Only supported from kernel mode */N unsigned lnm$v_fill_4 : 4; /* Fill out options byte */ } LNMDEF;#else /* __OLD_STARLET */struct lnmdef {N/* Logical name attributes -- bits 0-7 */N unsigned lnm$v_no_alias : 1; /* Do not allow outer mode alias */N unsigned lnm$v_confine : 1; /* Do not copy into subprocess */N unsigned l^nm$v_crelog : 1; /* Created with old $CRELOG service */N unsigned lnm$v_table : 1; /* This is a table name */N unsigned lnm$v_fill_0 : 4; /* Fill out logical name byte */N/* Logical name translation attributes -- bits 8-15 */R unsigned lnm$v_concealed : 1; /* Do not display result of translation */V unsigned lnm$v_terminal : 1; /* Do not retranslate result of translation */R unsigned lnm$v_exists : _1; /* Translation does exist at this index */N unsigned lnm$v_fill_1 : 5; /* Fill out translation byte */N/* Logical name table characteristics -- bits 16-23 */X unsigned lnm$v_shareable : 1; /* Logical name table is shareable (S0 space) */T unsigned lnm$v_clusterwide : 1; /* This is a clusterwide table (or name) */N/* Only supported as returned $TRNLNM attribute */T unsigned lnm$v_dcl_request : 1`; /* $CRELNM or $CRELNT request made by DCL */N unsigned lnm$v_fill_2 : 1; /* Reserved bit numbers 18-19 */N unsigned lnm$v_fill_3 : 4; /* Fill out table byte */N/* System service options -- bits 24-31 */T unsigned lnm$v_create_if : 1; /* May map to existing logical name table */R unsigned lnm$v_case_blind : 1; /* Perform case-insensitive translation */c unsigned lnm$v_interlocked : 1; /* Taranslate clusterwide name with LNM$CWLOGICALS locked */V unsigned lnm$v_local_action : 1; /* A local operation on a clusterwide name */N/* done in response to a request from another node */N/* Only supported from kernel mode */N unsigned lnm$v_fill_4 : 4; /* Fill out options byte */ } ;%#endif /* #ifdef __NEW_STARLET */i#define LNM$C_TABNAMLEN 31 /* Maximum length of a name cobntained within a directory table */W#define LNM$C_NAMLENGTH 255 /* Maximum logical name / translation length */R#define LNM$C_MAXDEPTH 10 /* Maximum logical name recursion depth */N#define LNM$_INDEX 1 /* Translation index */N#define LNM$_STRING 2 /* Translation string */N#define LNM$_ATTRIBUTES 3 /* Attribute bits */N#define LNM$_TABLE 4 /* Logical namce table name */N#define LNM$_LENGTH 5 /* Length of translation string */N#define LNM$_ACMODE 6 /* Access mode of name */N#define LNM$_MAX_INDEX 7 /* Maximum translation index */N#define LNM$_PARENT 8 /* Parent logical name table name */N#define LNM$_LNMB_ADDR 9 /* Return LNM block address */N/* internal use by MTL */Nd/* and mailbox UCB */Z#define LNM$_AGENT_ACMODE 10 /* Probes to be done at a different access mode */N/* Define item list codes */N#define LNM$_CHAIN -1 /* Chain to next list */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Reestore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LNMDEF_LOADED */ ww/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// --------------------------------- f--------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * * */P/* * Confidential computer software. Valid licgense from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. h * */P/* * * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying i* */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty. * */P/* * * */P/* ************************************************************************* *//* ******************************************************************************************************************************** */@/* Created: 5-Apr-2012 13:00:55 j by OpenVMS SDL EV3-3 */P/* Source: 13-AUG-2004 16:12:51 $1$DGA7304:[STARLET_H.SRC]LOGTYPDEF.SDL;1 *//* ******************************************************************************************************************************** */  /* .MACRO $LOGTYPDEF,$GBL */ /* $DEFINI LOGTYP,$GBL *//* *//* Entry type definitions *//* */?#define LOGTYP$C_SS_ENTRY 0 /* Standard service entry */=#define LOGTYP$C_SS_EXIT 1 /* Standard service exit */@#define kLOGTYP$C_PS_ENTRY 2 /* Protected service entry */>#define LOGTYP$C_PS_EXIT 3 /* Protected service exit */7#define LOGTYP$C_STARTUP 4 /* Startup logging */9#define LOGTYP$C_STOP 5 /* Stop logging */N#define LOGTYP$C_UNLOAD 6 /* Stop logging and delete buffers */O#define LOGTYP$C_FILE_OPENED 7 /* Internal file open kernel mode part */#define LOGTYP$C_EOBUF -1#define LOGTYP$M_ARGS 0x1#define LOGTYP$M_FILE 0x2#define LOGTYP$S_logltyp$flags 4#define LOGTYP$V_ARGS 0#define LOGTYP$V_FILE 1 /* $DEFEND LOGTYP,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//*********** m*********************************************************************************************************************//*** MODULE $LOGTYPDEF ***/#ifndef __LOGTYPDEF_LOADED#define __LOGTYPDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-definend 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 o#define __union variant_union#endif#endif N/* */N/* Entry type definitions */N/* */N#define LOGTYP$C_SS_ENTRY 0 /*Standard service entry */N#define LOGTYP$C_SS_EXIT 1 /*Standard service exit */N#define LOGTYP$C_PS_ENTRY 2 /*Protected pservice entry */N#define LOGTYP$C_PS_EXIT 3 /*Protected service exit */N#define LOGTYP$C_STARTUP 4 /*Startup logging */N#define LOGTYP$C_STOP 5 /*Stop logging */N#define LOGTYP$C_UNLOAD 6 /*Stop logging and delete buffers */P#define LOGTYP$C_FILE_OPENED 7 /*Internal file open kernel mode part */#define LOGTYP$C_EOBUF -1#define LOGTYP$M_ARGS 0x1#define LOGTYP$M_FILqE 0x2 #ifdef __NEW_STARLETtypedef struct _logtyp$flags { unsigned logtyp$v_args : 1; unsigned logtyp$v_file : 1;" unsigned logtyp$v_fill_1 : 30; } LOGTYP$FLAGS;#else /* __OLD_STARLET */struct logtyp$flags { unsigned logtyp$v_args : 1; unsigned logtyp$v_file : 1;" unsigned logtyp$v_fill_1 : 30; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size rpragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LOGTYPDEF_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */wwU/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */ sM/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFFL.SDI;1 *//********************************************************************************************************************************//*** MODULE $LPDEF ***/#ifndef __LPDEF_LOADED#define __LPDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas sutpported */\#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#endifu#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* LINE PRINTER CHARACTERISTICS DEFINITIONS */N/*- */#define LP$M_CR 0x1#define LP$M_MECHFORM 0x2#define LP$M_PRINTALL 0x4#define LP$M_DAVFU 0x8#define LP$M_WRAP 0x10#defvine LP$M_TRUNCATE 0x20#define LP$M_TAB 0x40#define LP$M_LOWER 0x80#define LP$M_PASSALL 0x100#define LP$M_FALLBACK 0x200#define LP$M_SIXELS 0x400#define LP$M_BITMAPPED 0x800#define LP$M_POLLED 0x1000!#define LP$M_BIDIRECTIONAL 0x2000#define LP$M_PAGE_L 0xFF000000#define LP$_LP11 1#define LP$_LA11 2#define LP$_LA180 3#define LP$_PC_PRINTER 8 #ifdef __NEW_STARLETtypedef union _lpdef { __struct {N unsigned lp$v_cr : 1; /* CARRIAGE RETURN NEEDEwD */N unsigned lp$v_mechform : 1; /* MECHANICAL FORM FEED */Q unsigned lp$v_printall : 1; /* NON PRINTABLE CHAR. ACCEPT(DMF-32) */N unsigned lp$v_davfu : 1; /* DAVFU AVAIL. */N unsigned lp$v_wrap : 1; /* CHAR. WRAP MODE */O unsigned lp$v_truncate : 1; /* TRUNCATE output at carriage width */N unsigned lp$v_tab : 1; /* TAB needed */N x unsigned lp$v_lower : 1; /* PRINTER HAS LOWER CASE */N unsigned lp$v_passall : 1; /* PASSALL MODE */N unsigned lp$v_fallback : 1; /* FALLBACK MODE */N unsigned lp$v_sixels : 1; /* HANDLES SIXELS */N unsigned lp$v_bitmapped : 1; /* HANDLES BIT MAPS */N unsigned lp$v_polled : 1; /* Printer will poll device */N unsigned lp$v_bidirect yional : 1; /* Bidirectional USB printer */N unsigned lpdef$$_fill_2 : 10; /* SPARE UNUSED BITS */N unsigned lp$v_page_l : 8; /* PAGE LENGTH */ } lp$r_lpdef_bits; } LPDEF; #if !defined(__VAXC)'#define lp$v_cr lp$r_lpdef_bits.lp$v_cr3#define lp$v_mechform lp$r_lpdef_bits.lp$v_mechform3#define lp$v_printall lp$r_lpdef_bits.lp$v_printall-#define lp$v_davfu lp$r_lpdef_bits.lp$v_davfu+#define lp$v_wrap lp$r_lpdef_b zits.lp$v_wrap3#define lp$v_truncate lp$r_lpdef_bits.lp$v_truncate)#define lp$v_tab lp$r_lpdef_bits.lp$v_tab-#define lp$v_lower lp$r_lpdef_bits.lp$v_lower1#define lp$v_passall lp$r_lpdef_bits.lp$v_passall3#define lp$v_fallback lp$r_lpdef_bits.lp$v_fallback/#define lp$v_sixels lp$r_lpdef_bits.lp$v_sixels5#define lp$v_bitmapped lp$r_lpdef_bits.lp$v_bitmapped/#define lp$v_polled lp$r_lpdef_bits.lp$v_polled=#define lp$v_bidirectional lp$r_lpdef_bits.lp$v_bidirectional/#define lp$v_page_ {l lp$r_lpdef_bits.lp$v_page_l"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ union lpdef { __struct {N unsigned lp$v_cr : 1; /* CARRIAGE RETURN NEEDED */N unsigned lp$v_mechform : 1; /* MECHANICAL FORM FEED */Q unsigned lp$v_printall : 1; /* NON PRINTABLE CHAR. ACCEPT(DMF-32) */N unsigned lp$v_davfu : 1; /* DAVFU AVAIL. */N unsigned lp$v_wrap : 1; /* C|HAR. WRAP MODE */O unsigned lp$v_truncate : 1; /* TRUNCATE output at carriage width */N unsigned lp$v_tab : 1; /* TAB needed */N unsigned lp$v_lower : 1; /* PRINTER HAS LOWER CASE */N unsigned lp$v_passall : 1; /* PASSALL MODE */N unsigned lp$v_fallback : 1; /* FALLBACK MODE */N unsigned lp$v_sixels : 1; /* HANDLES SIXELS } */N unsigned lp$v_bitmapped : 1; /* HANDLES BIT MAPS */N unsigned lp$v_polled : 1; /* Printer will poll device */N unsigned lp$v_bidirectional : 1; /* Bidirectional USB printer */N unsigned lpdef$$_fill_2 : 10; /* SPARE UNUSED BITS */N unsigned lp$v_page_l : 8; /* PAGE LENGTH */ } lp$r_lpdef_bits; } ; #if !defined(__VAXC)'#define lp$v_cr lp$r_lpdef_bit ~s.lp$v_cr3#define lp$v_mechform lp$r_lpdef_bits.lp$v_mechform3#define lp$v_printall lp$r_lpdef_bits.lp$v_printall-#define lp$v_davfu lp$r_lpdef_bits.lp$v_davfu+#define lp$v_wrap lp$r_lpdef_bits.lp$v_wrap3#define lp$v_truncate lp$r_lpdef_bits.lp$v_truncate)#define lp$v_tab lp$r_lpdef_bits.lp$v_tab-#define lp$v_lower lp$r_lpdef_bits.lp$v_lower1#define lp$v_passall lp$r_lpdef_bits.lp$v_passall3#define lp$v_fallback lp$r_lpdef_bits.lp$v_fallback/#define lp$v_sixels lp$r_lpdef_bits.lp$v _sixels5#define lp$v_bitmapped lp$r_lpdef_bits.lp$v_bitmapped/#define lp$v_polled lp$r_lpdef_bits.lp$v_polled=#define lp$v_bidirectional lp$r_lpdef_bits.lp$v_bidirectional/#define lp$v_page_l lp$r_lpdef_bits.lp$v_page_l"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LPDEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//***************************************************************************** ***************************************************//*** MODULE $LPRODEF ***/#ifndef __LPRODEF_LOADED#define __LPRODEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*  */N/* GSD entry - Module Local Procedure definition */N/* */#define LPRO$K_NAME 15#define LPRO$C_NAME 15 #ifdef __NEW_STARLETtypedef struct _lprodef { __union {N unsigned char lpro$b_gsdtyp; /*Maps over LSY$B_GSDTYP */ __struct {" char lprodef$$_fill_1;# } lpro$r_gsdtyp_fields; } lpro$r_gsdtyp_overlay;N unsigned char lpro$b_datyp; /*Maps over LSY$B_DATYP */N unsigned short int lpro$w_flags; /*Maps over LSY$W_FLAGS */Q unsigned short int lpro$w_envindx; /*Environment index symbol defined in */N unsigned short int lpro$w_psindx; /*Maps over LSDF$W_PSINDX */N unsigned int lpro$l_addrs; /*Entry point address, maps */N/* over LSDF$L_VALUE  */N unsigned short int lpro$w_mask; /*Entry point mask */N unsigned char lpro$b_namlng; /*Length of name */N char lpro$t_name [31]; /*Symbol name */ } LPRODEF; #if !defined(__VAXC)9#define lpro$b_gsdtyp lpro$r_gsdtyp_overlay.lpro$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct lprodef { __union {N unsigned char lpro$b_gsdtyp;  /*Maps over LSY$B_GSDTYP */ __struct {" char lprodef$$_fill_1;# } lpro$r_gsdtyp_fields; } lpro$r_gsdtyp_overlay;N unsigned char lpro$b_datyp; /*Maps over LSY$B_DATYP */N unsigned short int lpro$w_flags; /*Maps over LSY$W_FLAGS */Q unsigned short int lpro$w_envindx; /*Environment index symbol defined in */N unsigned short int lpro$w_psindx; /*Maps over LSDF$W_PSINDX */N unsi gned int lpro$l_addrs; /*Entry point address, maps */N/* over LSDF$L_VALUE */N unsigned short int lpro$w_mask; /*Entry point mask */N unsigned char lpro$b_namlng; /*Length of name */N char lpro$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define lpro$b_gsdtyp lpro$r_gsdtyp_overlay.lpro$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LPRODEF_LOADED */ ww+g/***************************************************************************************** ***************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $LSDFDEF ***/#ifndef __LSDFDEF_LOADED#define __LSDFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* Module-local Symbol definition */N/* */#define LSDF$K_NAME 13 #define LSDF$C_NAME 13 #ifdef __NEW_STARLETtypedef struct _lsdfdef { __union {N unsigned char lsdf$b_gsdtyp; /*Maps over LSY$B_GSDTYP */ __struct {" char lsdfdef$$_fill_1;# } lsdf$r_gsdtyp_fields; } lsdf$r_gsdtyp_overlay;N unsigned char lsdf$b_datyp; /*Maps over LSY$B_DATYP */N unsigned short int lsdf$w_flags; /*Maps over LSY$W_FLAGS */Q unsigned short int lsdf$w_envindx; /* Environment index symbol defined in */N unsigned short int lsdf$w_psindx; /*Owning psect number */N unsigned int lsdf$l_value; /*Value of symbol */N unsigned char lsdf$b_namlng; /*Length of name */N char lsdf$t_name [31]; /*Symbol name */ } LSDFDEF; #if !defined(__VAXC)9#define lsdf$b_gsdtyp lsdf$r_gsdtyp_overlay.lsdf$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #e lse /* __OLD_STARLET */struct lsdfdef { __union {N unsigned char lsdf$b_gsdtyp; /*Maps over LSY$B_GSDTYP */ __struct {" char lsdfdef$$_fill_1;# } lsdf$r_gsdtyp_fields; } lsdf$r_gsdtyp_overlay;N unsigned char lsdf$b_datyp; /*Maps over LSY$B_DATYP */N unsigned short int lsdf$w_flags; /*Maps over LSY$W_FLAGS */Q unsigned short int lsdf$w_envindx; /*Environment index symbol defin ed in */N unsigned short int lsdf$w_psindx; /*Owning psect number */N unsigned int lsdf$l_value; /*Value of symbol */N unsigned char lsdf$b_namlng; /*Length of name */N char lsdf$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define lsdf$b_gsdtyp lsdf$r_gsdtyp_overlay.lsdf$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LSDFDEF_LOADED */ ww;/********************************************************************************************************************************/=/* Created: 5-Apr -2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $LSRFDEF ***/#ifndef __LSRFDEF_LOADED#define __LSRFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* Module-local Symbol reference (LSY$M_DEF in LSY$W_FLAGS is 0) */N/* */#define LSRF$K_NAME 7#define LSRF$C_NAME 7 #ifdef __NEW_STARLETtypedef st ruct _lsrfdef { __union {N unsigned char lsrf$b_gsdtyp; /*Maps over LSY$B_GSDTYP */ __struct {" char lsrfdef$$_fill_1;# } lsrf$r_gsdtyp_fields; } lsrf$r_gsdtyp_overlay;N unsigned char lsrf$b_datyp; /*Maps over LSY$B_DATYP */N unsigned short int lsrf$w_flags; /*Maps over LSY$W_FLAGS */N unsigned short int lsrf$w_envindx; /*Maps over LSY$W_ENVINDX */N unsigned char lsrf$b_namlng; /*Length of symbol name */N char lsrf$t_name [31]; /*Symbol name */ } LSRFDEF; #if !defined(__VAXC)9#define lsrf$b_gsdtyp lsrf$r_gsdtyp_overlay.lsrf$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct lsrfdef { __union {N unsigned char lsrf$b_gsdtyp; /*Maps over LSY$B_GSDTYP */ __struct {" char lsrfdef$$_fill_1;# } lsrf$r_g sdtyp_fields; } lsrf$r_gsdtyp_overlay;N unsigned char lsrf$b_datyp; /*Maps over LSY$B_DATYP */N unsigned short int lsrf$w_flags; /*Maps over LSY$W_FLAGS */N unsigned short int lsrf$w_envindx; /*Maps over LSY$W_ENVINDX */N unsigned char lsrf$b_namlng; /*Length of symbol name */N char lsrf$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define lsrf$b_gsdtyp lsrf$r_gsdtyp_overlay.lsrf$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LSRFDEF_LOADED */ ww[/******************************* *************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $LSYDEF ***/#ifndef __LSYDEF_LOADED#define __LSYDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* LSY - Module-Local symbol definition */N/*  */P/* Common to definitions, references, entry points, and procedure definitions */N/* */#define LSY$M_WEAK 0x1#define LSY$M_DEF 0x2#define LSY$M_UNI 0x4#define LSY$M_REL 0x8 #ifdef __NEW_STARLETtypedef struct _lsydef { __union {N unsigned char lsy$b_gsdtyp; /*Type field */ __struct {! char lsydef$$_fill_1;"  } lsy$r_gsdtyp_fields; } lsy$r_gsdtyp_overlay;N unsigned char lsy$b_datyp; /*Symbol type */ __union {N unsigned short int lsy$w_flags; /*Symbol flags */ __struct {N unsigned lsy$v_weak : 1; /*Weak symbol (not used) */N unsigned lsy$v_def : 1; /*Defined symbol */N unsigned lsy$v_uni : 1; /*Universal (not used) */N  unsigned lsy$v_rel : 1; /*Relocatable */( unsigned lsy$v_fill_21_ : 4; } lsy$r_flags_bits; } lsy$r_flags_overlay;N unsigned short int lsy$w_envindx; /*Environment index */ } LSYDEF; #if !defined(__VAXC)6#define lsy$b_gsdtyp lsy$r_gsdtyp_overlay.lsy$b_gsdtyp3#define lsy$w_flags lsy$r_flags_overlay.lsy$w_flagsB#define lsy$v_weak lsy$r_flags_overlay.lsy$r_flags_bits.lsy$v_weak@#define lsy$v_def lsy$r_flags_overlay.lsy$r_flags_bits.lsy$v_def@#define lsy$v_uni lsy$r_flags_overlay.lsy$r_flags_bits.lsy$v_uni@#define lsy$v_rel lsy$r_flags_overlay.lsy$r_flags_bits.lsy$v_rel"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct lsydef { __union {N unsigned char lsy$b_gsdtyp; /*Type field */ __struct {! char lsydef$$_fill_1;" } lsy$r_gsdtyp_fields; } lsy$r_gsdtyp_overlay;N unsigned char ls y$b_datyp; /*Symbol type */ __union {N unsigned short int lsy$w_flags; /*Symbol flags */ __struct {N unsigned lsy$v_weak : 1; /*Weak symbol (not used) */N unsigned lsy$v_def : 1; /*Defined symbol */N unsigned lsy$v_uni : 1; /*Universal (not used) */N unsigned lsy$v_rel : 1; /*Relocatable */(  unsigned lsy$v_fill_21_ : 4; } lsy$r_flags_bits; } lsy$r_flags_overlay;N unsigned short int lsy$w_envindx; /*Environment index */ } ; #if !defined(__VAXC)6#define lsy$b_gsdtyp lsy$r_gsdtyp_overlay.lsy$b_gsdtyp3#define lsy$w_flags lsy$r_flags_overlay.lsy$w_flagsB#define lsy$v_weak lsy$r_flags_overlay.lsy$r_flags_bits.lsy$v_weak@#define lsy$v_def lsy$r_flags_overlay.lsy$r_flags_bits.lsy$v_def@#define lsy$v_uni lsy$r_flags_overlay.lsy$r_flags_bits.lsy$v_uni@#define lsy$v_rel lsy$r_flags_overlay.lsy$r_flags_bits.lsy$v_rel"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __LSYDEF_LOADED */ ww {*/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $MACIDDEF ***/#ifndef __MACIDDEF_LOADED#define __MACIDDEF_LOADED 1  G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/*  */N/* Module $UICDEF defines the rightslist identifier space from %XA0000000 */N/* thru %XA3FFFFFF as being reserved for use by SEVMS. */N/* */N/* This space has been segmented as: */N/* */I/* %XA0000000 thru %XA000FFFF for MAC secrecy level identifiers */I/* %XA0010000 thru %XA001FFFF for MAC secrecy category identifiers */I/* %XA0020000 thru %XA002FFFF for MAC integrity level identifiers */I/* %XA0030000 thru %XA003FFFF for MAC integrity category identifiers */N/* */O/* to provide 64K identifiers within each grouping. This allows for growth */N/* consistent with variable format (i.e. type DYN_CAT) class blocks. */N/*  */N/*- */#define MACID$M_ID_NUM 0xFFFF##define MACID$M_LVL_CAT_SEL 0x10000N#define MACID$K_LVL 0 /* Level ID sub-group */N#define MACID$K_CAT 1 /* Category ID sub-group */##define MACID$M_SEC_INT_SEL 0x20000N#define MACID$K_SEC 0 /* Secrecy ID group */N#define MACID$K_INT 1 /* Integrity ID g roup */#define MACID$M_MBZ 0x3FC0000"#define MACID$M_FMT_SEL 0xFC000000N#define MACID$K_SEVMS_ID 40 /* Format specifier for SEVMS */N/* identifiers as defined by $UICDEF */ #ifdef __NEW_STARLETtypedef union _fill_0_ {" unsigned int macid$l_maciddef; __struct {N unsigned macid$v_id_num : 16; /* Group relative ID number */T unsigned macid$v_lvl_cat_sel : 1; /* Level/Category ID sub-gro up selector */S unsigned macid$v_sec_int_sel : 1; /* Secrecy/Integrity ID group selector */! unsigned macid$v_mbz : 8;N unsigned macid$v_fmt_sel : 6; /* Composite overlay of $UICDEF */N/* ID_TYPE + ASSIGN_CODE fields */ } macid$r_fill_1_; } FILL_0_; #if !defined(__VAXC)5#define macid$v_id_num macid$r_fill_1_.macid$v_id_num?#define macid$v_lvl_cat_sel macid$r_fill_1_.macid$v_lvl_cat_sel?#define macid$v_ sec_int_sel macid$r_fill_1_.macid$v_sec_int_sel/#define macid$v_mbz macid$r_fill_1_.macid$v_mbz7#define macid$v_fmt_sel macid$r_fill_1_.macid$v_fmt_sel"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef union _fill_0_ {" unsigned int macid$l_maciddef; __struct {N unsigned macid$v_id_num : 16; /* Group relative ID number */T unsigned macid$v_lvl_cat_sel : 1; /* Level/Category ID sub-group selector */S unsigned macid$v_sec_i nt_sel : 1; /* Secrecy/Integrity ID group selector */! unsigned macid$v_mbz : 8;N unsigned macid$v_fmt_sel : 6; /* Composite overlay of $UICDEF */N/* ID_TYPE + ASSIGN_CODE fields */ } macid$r_fill_1_; } fill_0_; #if !defined(__VAXC)5#define macid$v_id_num macid$r_fill_1_.macid$v_id_num?#define macid$v_lvl_cat_sel macid$r_fill_1_.macid$v_lvl_cat_sel?#define macid$v_sec_int_sel macid$r_fill_1_.macid$v_sec_int_sel/#define macid$v_mbz macid$r_fill_1_.macid$v_mbz7#define macid$v_fmt_sel macid$r_fill_1_.macid$v_fmt_sel"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MACIDDEF _LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */Q/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]MAIL$ROUTINES.SDI;1 *//********************************************************************************************************************************/(/*** MODULE MAIL$ROUTINES IDENT X-1 ***/#ifndef __MA IL_ROUTINES_LOADED #define __MAIL_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/*  */N/* This package defines the interfaces to the callable OpenVMS MAIL */N/* routines as documented in the OpenVMS Utility Routines Reference */N/* Manual. */N/* */N/* */N/* Mail File routines  */N/* */N/* */N/* MAILFILE_BEGIN - Initiates mail file processing */N/* */N/* status = MAIL$MAILFILE_BEGIN (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */1#define mail$mailfile_begin MAIL$MAILFILE_BEGIN #ifdef __NEW_STARLET!unsigned int mail$mailfile_begin( unsigned int *context, unsigned int *in_item_list, unsigne d int *out_item_list);#else /* __OLD_STARLET */3unsigned int mail$mailfile_begin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MAILFILE_CLOSE - Closes the currently open mail file */N/* */N/* status = MAIL$MAILFILE_CLOSE (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */1#define mail$mailfile_close MAIL$MAILFILE_CLOSE #ifdef __NEW_STARLET!unsigned int mail$mailfile_close( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */3unsigned int mail$mailfile_close(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MAILFILE_COMPRESS - Compresses a mail file */N/* */N/* status = MAIL$MAILFILE_COMPRESS (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */7#define mail$mailfile_compress MAIL$MAILFILE_COMPRESS #ifdef __NEW_STARLET$unsigned int mail$mailfile_compress(  unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */6unsigned int mail$mailfile_compress(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MAILFILE_END - Terminates mail file processing */N/* */N/* status = MAIL$MAILFILE_END (context, in_item_list, out_ item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */-#define mail$mailfile_end MAIL$MAILFILE_END #ifdef __NEW_STARLETunsigned i nt mail$mailfile_end( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */1unsigned int mail$mailfile_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MAILFILE_INFO_FILE - Obtains information about a specified mail file */N/* */N/* status = MAIL$MAILFILE_INFO_FILE (c ontext, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */9#define mail$mailfile_info_file MAIL$MAILFILE_INFO_FILE  #ifdef __NEW_STARLET%unsigned int mail$mailfile_info_file( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */7unsigned int mail$mailfile_info_file(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MAILFILE_MODIFY - Modifies the information in an indexed mail file */N/*  */N/* status = MAIL$MAILFILE_MODIFY (context, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */3#define mail$mailfi le_modify MAIL$MAILFILE_MODIFY #ifdef __NEW_STARLET"unsigned int mail$mailfile_modify( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */4unsigned int mail$mailfile_modify(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MAILFILE_OPEN - Opens a specified mail file for processing */N/*  */N/* status = MAIL$MAILFILE_OPEN (context, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/*  *//#define mail$mailfile_open MAIL$MAILFILE_OPEN #ifdef __NEW_STARLET unsigned int mail$mailfile_open( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */2unsigned int mail$mailfile_open(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MAILFILE_PURGE_WASTE - Purges the wastebasket of a mail file */N/*  */O/* status = MAIL$MAILFILE_PURGE_WASTE (context, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/*  */=#define mail$mailfile_purge_waste MAIL$MAILFILE_PURGE_WASTE #ifdef __NEW_STARLET'unsigned int mail$mailfile_purge_waste( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */9unsigned int mail$mailfile_purge_waste(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Message routines  */N/* */N/* */N/* MESSAGE_BEGIN - Begin message processing */N/* */N/* status = MAIL$MESSAGE_BEGIN (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* *//#define mail$message_begin MAIL$MESSAGE_BEGIN #ifdef __NEW_STARLET unsigned int mail$message_begin( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */2unsigned int mail$message_begin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MESSAGE_COPY - Copies messages between files or folders */N/* */N/* status = MAIL$MESSAGE_COPY (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */-#define mail$message_copy MAIL$MESSAGE_COPY #ifdef __NEW_STARLETunsigned int mail$message_copy( unsigned int *context, unsigned int *in_item_l ist, unsigned int *out_item_list);#else /* __OLD_STARLET */1unsigned int mail$message_copy(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MESSAGE_DELETE - Deletes a message */N/* */N/* status = MAIL$MESSAGE_DELETE (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */1#define mail$message_delete MAIL$MESSAGE_DELETE #ifdef __NEW_STARLET!unsigned int mail$message_delete( unsigned int *context,  unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */3unsigned int mail$message_delete(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MESSAGE_END - Ends message processing */N/* */N/* status = MAIL$MESSAGE_END (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */+#define mail$message_end MAIL$MESSAGE_END #ifdef __NEW_STARLETunsigned int mail$message_end( unsig ned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */0unsigned int mail$message_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MESSAGE_GET - Retrieves a message from the set of selected messages */N/* */N/* status = MAIL$MESSAGE_GET (context, in_item_list, out_item_list)  */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */+#define mail$message_get MAIL$MESSAGE_GET #ifdef __NEW_STARLETunsigned int mail$messag e_get( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */0unsigned int mail$message_get(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MESSAGE_INFO - Obtains information about a specified message */N/* */N/* status = MAIL$MESSAGE_INFO (context, in_item_list, ou t_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */-#define mail$message_info MAIL$MESSAGE_INFO #ifdef __NEW_STARLETunsigned  int mail$message_info( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */1unsigned int mail$message_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MESSAGE_MODIFY = Modifies message information */N/* */N/* status = MAIL$MESSAGE_MODIFY (con text, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */1#define mail$message_modify MAIL$MESSAGE_MODIFY #ifdef  __NEW_STARLET!unsigned int mail$message_modify( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */3unsigned int mail$message_modify(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* MESSAGE_SELECT - Selects messages from the current mail file */N/* */N/* status = MAIL$MESSAGE_SELECT (context, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */1#define mail$message_select MAIL $MESSAGE_SELECT #ifdef __NEW_STARLET!unsigned int mail$message_select( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */3unsigned int mail$message_select(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* Send routines */N/*  */N/* */N/* SEND_ABORT - Cancels a current send operation */N/* */N/* status = MAIL$SEND_ABORT (context, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in _item_list - Input item list */N/* out_item_list - Output item list */N/* */)#define mail$send_abort MAIL$SEND_ABORT #ifdef __NEW_STARLETunsigned int mail$send_abort( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET *//unsigned int mail$send_abort(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SEND_ADD_ADDRESS - Adds an address to the address list */N/* */N/* status = MAIL$SEND_ADD_ADDRESS (context, in_item_list, out_item_list) */N/* */N/* context - Context value  */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */5#define mail$send_add_address MAIL$SEND_ADD_ADDRESS #ifdef __NEW_STARLET#unsigned int mail$send_add_address( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */5unsigned int mail$send_add_address(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SEND_ADD_ATTRIBUTE - Adds an attribute to the current message */N/* */N/* status = MAIL$SEND_ADD_ATTRIBUTE (context, in_item_list, out_item_list) */N/* */N/* context - Context value  */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */9#define mail$send_add_attribute MAIL$SEND_ADD_ATTRIBUTE #ifdef __NEW_STARLET%unsigned int mail$send_add_attribute( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */7unsigned int mail$send_add_attribute(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SEND_BEGIN - Initiates processing to send a message */N/* */N/* status = MAIL$SEND_BEGIN (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */)#define mail$send_begin MAIL$SEND_BEGIN #ifdef __NEW_STARLETunsigned int mail$send_begin( unsigned int *context, unsigned int *in_item_list, unsigned int *out_ite m_list);#else /* __OLD_STARLET *//unsigned int mail$send_begin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SEND_ADD_BODYPART - Builds the body of a message */N/* */N/* status = MAIL$SEND_ADD_BODYPART (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */7#define mail$send_add_bodypart MAIL$SEND_ADD_BODYPART #ifdef __NEW_STARLET$unsigned int mail$send_add_bodypart( unsigned int *context, unsigned int *in_it em_list, unsigned int *out_item_list);#else /* __OLD_STARLET */6unsigned int mail$send_add_bodypart(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SEND_END - Terminates send processing */N/* */N/* status = MAIL$SEND_END (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */%#define mail$send_end MAIL$SEND_END #ifdef __NEW_STARLETunsigned int mail$send_end( unsigned int *context, unsigne d int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */-unsigned int mail$send_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SEND_MESSAGE - Begins actual sending of a message */N/* */N/* status = MAIL$SEND_MESSAGE (context, in_item_list, out_item_list) */N/*  */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output item list */N/* */-#define mail$send_message MAIL$SEND_MESSAGE #ifdef __NEW_STARLETunsigned int mail$send_message( unsigned int *con text, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */1unsigned int mail$send_message(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* User data base routines */N/* */N/* */N/* USER_BEGIN - Initiates access to the common user data base */N/* */N/* status = MAIL$USER_BEGIN (context, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_list - Output  item list */N/* */)#define mail$user_begin MAIL$USER_BEGIN #ifdef __NEW_STARLETunsigned int mail$user_begin( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET *//unsigned int mail$user_begin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* USER_DELETE_INFO - Remove a user record from the common data base */N/* */N/* status = MAIL$USER_DELETE_INFO (context, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list */N/* out_item_l ist - Output item list */N/* */5#define mail$user_delete_info MAIL$USER_DELETE_INFO #ifdef __NEW_STARLET#unsigned int mail$user_delete_info( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */5unsigned int mail$user_delete_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* USER_END - terminates access to the common user data base */N/* */N/* status = MAIL$USER_END (context, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list  */N/* out_item_list - Output item list */N/* */%#define mail$user_end MAIL$USER_END #ifdef __NEW_STARLETunsigned int mail$user_end( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */-unsigned int mail$user_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* USER_GET_INFO - Obtains information about a user */N/* */N/* status = MAIL$USER_GET_INFO (context, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item list  */N/* out_item_list - Output item list */N/* *//#define mail$user_get_info MAIL$USER_GET_INFO #ifdef __NEW_STARLET unsigned int mail$user_get_info( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */2unsigned int mail$user_get_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  */N/* USER_SET_INFO - Adds or modifies information about a user */N/* */N/* status = MAIL$USER_SET_INFO (context, in_item_list, out_item_list) */N/* */N/* context - Context value */N/* in_item_list - Input item l ist */N/* out_item_list - Output item list */N/* *//#define mail$user_set_info MAIL$USER_SET_INFO #ifdef __NEW_STARLET unsigned int mail$user_set_info( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list);#else /* __OLD_STARLET */2unsigned int mail$user_set_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard ##endif /* __MAIL_ROUTINES_LOADED */ ww/********************************************************************************************************************************/ =/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $MAILDEF ***/#ifndef __MAILDEF_LOADED#define __MAILDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* Definitions needed for callable mail. */N/* */N/*  */N/* NOTE: New item codes must be appended to the end of */N/* each category so users will not have to relink. */N/* We allow 1024 entries in eatch category. */N/* */N/* */N/* Send input codes */N/*  */#define MAIL$_SEND_SPARE_0 1N#define MAIL$_SEND_FOREIGN 2 /* Send foreign format message */N#define MAIL$_SEND_CC_LINE 3 /* CC text specification */N#define MAIL$_SEND_DEFAULT_NAME 4 /* Default file name for send */S#define MAIL$_SEND_DEFAULT_TRANSPORT 5 /* Default transport used for addressees */P#define MAIL$_SEND_ERROR_ENTRY 6 /* Entry point for send error routine */P#define MAIL$_SEND_FILENAME 7 /* Specification of file name to send */N#define MAIL$_SEND_FROM_LINE 8 /* From text specification */W#define MAIL$_SEND_NO_DEFAULT_TRANSPORT 9 /* Don't use any default transport on send */N#define MAIL$_SEND_PERS_NAME 10 /* Personal name text for message */N#define MAIL$_SEND_RECORD 11 /* Record to be sent */N#define MAIL$_SEND_RESULTSPEC 12 /* Resultant filespec bodypart */U#define MAIL$_SEND_SERVER 13 /* Operate in server mode (signal success) */N#define MAIL$_SEND_SUBJECT 14 /* Subject text specification */R#define MAIL$_SEND_SUCCESS_ENTRY 15 /* Entry point for send success routine */N#define MAIL$_SEND_TO_LINE 16 /* To line text specification */N#define MAIL$_SEND_UFLAGS 17 /* User flags (for header) to send */X#define MAIL$_SEND_USER_DATA 18 /* User specified context for action routines */N#define MAIL$_SEND_USERNAME 19 /* Username to add to the "To" list */N#define MAIL$_SEND_USERNAME_TYPE 20 /* Username type - TO or CC */N#define MAIL$_SEND_FID 21 /* FID of file to send */P#define MAIL$_SEND_NO_PERS_NAME 22 /* Send message without personal name */N#define MAIL$_SEND_SIGFILE 23 /* Signature file */N#define MAIL$_SEND_NO_SIGFILE 24 /* Signature file */N#define MAIL$_SEND_PARSE_QUOTES 25  /* Reply String Parsing Quotes */N/* */N/* Send output codes */N/* */N#define MAIL$_SEND_COPY_REPLY 26 /* Copy self reply set in profile */N#define MAIL$_SEND_COPY_SEND 27 /* Copy self send set in profile */N#define MAIL$_SEND_USER 28 /* Username of caller  */N#define MAIL$_SEND_COPY_FORWARD 29 /* Copy self forward set in profile */W#define MAIL$_SEND_RECIP_FOLDER 30 /* Recipient folder name to send the mail to */ #define MAIL$_SEND_OUT_SPARE3 31 #define MAIL$_SEND_OUT_SPARE4 32 #define MAIL$_SEND_OUT_SPARE5 33#define MAIL$K_SEND_MIN_ITEM 1#define MAIL$K_SEND_MAX_ITEM 33#define MAIL$K_SEND_ITEMS 33N/* */N/* file input codes  */N/* */##define MAIL$_MAILFILE_SPARE_0 1025N#define MAIL$_MAILFILE_DEFAULT_NAME 1026 /* Default filespec to open */^#define MAIL$_MAILFILE_FOLDER_ROUTINE 1027 /* Entry point of routine to process foldernames */_#define MAIL$_MAILFILE_FULL_CLOSE 1028 /* Do a PURGE, CONVERT/RECLAIM if necessary on close */N#define MAIL$_MAILFILE_NAME 1029 /* File spec to open  */N#define MAIL$_MAILFILE_RECLAIM 1030 /* Do RECLAIM on PURGE command */X#define MAIL$_MAILFILE_USER_DATA 1031 /* User specified context for action routines */P#define MAIL$_MAILFILE_WASTEBASKET_NAME 1032 /* New wastebasket name for file */N#define MAIL$_MAILFILE_COLLATE_SEQ 1033 /* I18N collating sequence */%#define MAIL$_MAILFILE_IN_SPARE2 1034%#define MAIL$_MAILFILE_IN_SPARE3 1035%#define MAIL$_MAILFILE_IN_SPARE4 1036%#define MAIL$_MAILFILE_IN_SPARE5 1037%#define MAIL$_MAILFILE_IN_SPARE6 1038%#define MAIL$_MAILFILE_IN_SPARE7 1039%#define MAIL$_MAILFILE_IN_SPARE8 1040%#define MAIL$_MAILFILE_IN_SPARE9 1041&#define MAIL$_MAILFILE_IN_SPARE10 1042&#define MAIL$_MAILFILE_IN_SPARE11 1043&#define MAIL$_MAILFILE_IN_SPARE12 1044&#define MAIL$_MAILFILE_IN_SPARE13 1045&#define MAIL$_MAILFILE_IN_SPARE14 1046&#define MAIL$_MAILFILE_IN_SPARE15 1047&#define MAIL$_MAILFILE_IN_SPARE16 1048&#define MAIL$_MAILFILE_IN_SPARE17 1049&#define MAIL$_MAILFILE_IN_SPARE18 1050&#define MAIL$_MAILFILE_IN_SPARE19 1051&#define MAIL$_MAILFILE_IN_SPARE20 1052N/* */N/* file output codes */N/* */O#define MAIL$_MAILFILE_DATA_RECLAIM 1053 /* Number of data buckets reclaimed */N#define MAIL$_MAILFILE_DATA_SCAN 1054 /* Number of data buckets scanned */Q#define MAIL$_MAILFILE_DELETED_BYTES 1055 /* Number of free bytes in mail file */Q#define MAIL$_MAILFILE_INDEX_RECLAIM 1056 /* Number of index buckets reclaimed */Q#define MAIL$_MAILFILE_MAIL_DIRECTORY 1057 /* Mail sub-directory specification */N#define MAIL$_MAILFILE_MESSAGES_DELETED 1058 /* Number of messages deleted */N#define MAIL$_MAILFILE_RESULTSPEC 1059 /* Resultant file spec */N#define MAIL$_MAILFILE_TOTAL_RECLAIM 1060 /* Total buckets reclaimed */N#define MAIL$_MAILFILE_WASTEBASK ET 1061 /* Wastebasket name */N#define MAIL$_MAILFILE_INDEXED 1062 /* ISAM file */&#define MAIL$_MAILFILE_OUT_SPARE2 1063&#define MAIL$_MAILFILE_OUT_SPARE3 1064&#define MAIL$_MAILFILE_OUT_SPARE4 1065&#define MAIL$_MAILFILE_OUT_SPARE5 1066&#define MAIL$_MAILFILE_OUT_SPARE6 1067&#define MAIL$_MAILFILE_OUT_SPARE7 1068&#define MAIL$_MAILFILE_OUT_SPARE8 1069&#define MAIL$_MAILFILE_OUT_SPARE9 1070'#define MAIL$_MAILFILE_OUT_SPARE10 1071'#define MAIL$_MA ILFILE_OUT_SPARE11 1072'#define MAIL$_MAILFILE_OUT_SPARE12 1073'#define MAIL$_MAILFILE_OUT_SPARE13 1074'#define MAIL$_MAILFILE_OUT_SPARE14 1075'#define MAIL$_MAILFILE_OUT_SPARE15 1076'#define MAIL$_MAILFILE_OUT_SPARE16 1077'#define MAIL$_MAILFILE_OUT_SPARE17 1078'#define MAIL$_MAILFILE_OUT_SPARE18 1079'#define MAIL$_MAILFILE_OUT_SPARE19 1080'#define MAIL$_MAILFILE_OUT_SPARE20 1081%#define MAIL$K_MAILFILE_MIN_ITEM 1025%#define MAIL$K_MAILFILE_MAX_ITEM 1081 #define MAIL$K_MAILFILE_ITEMS 57N/* */N/* message input codes */N/* */"#define MAIL$_MESSAGE_SPARE_0 2048N#define MAIL$_MESSAGE_BACK 2049 /* Get previous message */N#define MAIL$_MESSAGE_BEFORE 2050 /* Select messages BEFORE date */U#define MAIL$_MESSAGE_CC_SUBSTRING 2051 /* Select messages containing CC substring */N#define MAIL$_MESSAGE_CONTINUE 2052 /* Read next record */N#define MAIL$_MESSAGE_FILE_ACTION 2053 /* File create action routine */N#define MAIL$_MESSAGE_FOLDER_ACTION 2054 /* Folder create action routine */N#define MAIL$_MESSAGE_DEFAULT_NAME 2055 /* Default file name */N#define MAIL$_MESSAGE_DELETE 2056 /* Delete message */N#define MAIL$_MESSAGE_ERASE 2057 /* Erase message */N#define MAIL$_MESSAGE_FILE_CTX 2058 /* File level context */N#define MAIL$_MESSAGE_FILENAME 2059 /* File name specification */N#define MAIL$_MESSAGE_FLAGS 2060 /* Header flags specification */N#define MAIL$_MESSAGE_FOLDER 2061 /* Folder name specification */Y#define MAIL$_MESSAGE_FROM_SUBSTRING 2062 /* Select messages containing FROM substring */N#define MAIL$_MESSAGE_ID 2063 /* ID of message */N#define MAIL$_MESSAGE_NEXT 2064 /* Retrive NEXT message */N#define MAIL$_MESSAGE_SINCE 2065 /* Select messages SINCE date */Y#define MAIL$_MESSAGE_SUBJ_SUBSTRING 2066 /* Select messages containing SUBJ substring */U#define MAIL$_MESSAGE_TO_SUBSTRING 2067 /* Select messages containing TO substring */N#define MAIL$_MESSAGE_UFLAGS 2068 /* User flags specification */N#define MAIL$_MESSAGE_AUTO_NEWMAIL 2069 /* Move newmail to MAIL auto */N#define MAIL$_ME SSAGE_USER_DATA 2070 /* User context for action routines */Z#define MAIL$_MESSAGE_FLAGS_MBZ 2071 /* Select messages with these flags set at zero */N#define MAIL$_MESSAGE_MIN_CLASS 2072 /* Min access class for message */N#define MAIL$_MESSAGE_MAX_CLASS 2073 /* Max access class for message */$#define MAIL$_MESSAGE_IN_SPARE1 2074$#define MAIL$_MESSAGE_IN_SPARE2 2075$#define MAIL$_MESSAGE_IN_SPARE3 2076$#define MAIL$_MESSAGE_IN_SPARE4 2077$#define MAIL$_MESSAGE_IN_SPARE5 2078$ #define MAIL$_MESSAGE_IN_SPARE6 2079$#define MAIL$_MESSAGE_IN_SPARE7 2080$#define MAIL$_MESSAGE_IN_SPARE8 2081$#define MAIL$_MESSAGE_IN_SPARE9 2082%#define MAIL$_MESSAGE_IN_SPARE10 2083%#define MAIL$_MESSAGE_IN_SPARE11 2084%#define MAIL$_MESSAGE_IN_SPARE12 2085%#define MAIL$_MESSAGE_IN_SPARE13 2086%#define MAIL$_MESSAGE_IN_SPARE14 2087%#define MAIL$_MESSAGE_IN_SPARE15 2088%#define MAIL$_MESSAGE_IN_SPARE16 2089%#define MAIL$_MESSAGE_IN_SPARE17 2090%#define MAIL$_MESSAGE_IN_SPARE18 2 091%#define MAIL$_MESSAGE_IN_SPARE19 2092%#define MAIL$_MESSAGE_IN_SPARE20 2093N/* */N/* message output codes */N/* */N#define MAIL$_MESSAGE_CC 2094 /* CC text of message */N#define MAIL$_MESSAGE_CURRENT_ID 2095 /* ID of current message */N#define MAIL$_MESSAGE_DATE 2096 /* Date of current message */N#define MAIL$_MESSAGE_EXTID 2097 /* Filespec of external message */N#define MAIL$_MESSAGE_FILE_CREATED 2098 /* Mailfile created... */N#define MAIL$_MESSAGE_FOLDER_CREATED 2099 /* Folder created... */N#define MAIL$_MESSAGE_FROM 2100 /* From text of message */N#define MAIL$_MESSAGE_RECORD 2101 /* Record from message */N#define MAIL$_MESSAGE_RECORD_TYPE 2102 /* Type of record, header or text */N#define MAIL$_MESSAGE_REPLY_PATH 2103 /* Reply path of sender */N#define MAIL$_MESSAGE_RESULTSPEC 2104 /* Resultant file spec */N#define MAIL$_MESSAGE_RETURN_FLAGS 2105 /* Message header system flags */N#define MAIL$_MESSAGE_RETURN_UFLAGS 2106 /* Message header user flags */N#define MAIL$_MESSAGE_SELECTED 2107 /* Number of messages selected */N#define MAIL$_MESSAGE_SENDER 2108 /* Sender name  */N#define MAIL$_MESSAGE_SIZE 2109 /* Size of the current message */N#define MAIL$_MESSAGE_SUBJECT 2110 /* Subject text of the message */N#define MAIL$_MESSAGE_TO 2111 /* To text of the message */N#define MAIL$_MESSAGE_BUFFER 2112 /* Buffer address */N#define MAIL$_MESSAGE_RETURN_CLASS 2113 /* Class of current message */N#define MAIL$_MESSAGE_BINARY_DATE 2114 /* Binary date/time quadword */!#define MAIL$_MESSAGE_SPARE4 2115N#define MAIL$_MESSAGE_PARSE_QUOTES 2116 /* Reply String Parsing Quotes */!#define MAIL$_MESSAGE_SPARE6 2117!#define MAIL$_MESSAGE_SPARE7 2118!#define MAIL$_MESSAGE_SPARE8 2119!#define MAIL$_MESSAGE_SPARE9 2120"#define MAIL$_MESSAGE_SPARE10 2121"#define MAIL$_MESSAGE_SPARE11 2122"#define MAIL$_MESSAGE_SPARE12 2123"#define MAIL$_MESSAGE_SPARE13 2124"#define MAIL$_MESSAGE_SPARE14 2125"#define MAIL$_MESSAGE_SPARE15 2126"#define MAIL$_MESSAGE_SPARE16 2127"#define MAIL $_MESSAGE_SPARE17 2128"#define MAIL$_MESSAGE_SPARE18 2129"#define MAIL$_MESSAGE_SPARE19 2130N/* */N/* Constants returned */N/* */N#define MAIL$_MESSAGE_NULL 2131 /* Null bodypart */N#define MAIL$_MESSAGE_HEADER 2132 /* Header record returned */N#define MA IL$_MESSAGE_TEXT 2133 /* Text record returned */"#define MAIL$_MESSAGE_SPARE20 2134$#define MAIL$K_MESSAGE_MIN_ITEM 2048$#define MAIL$K_MESSAGE_MAX_ITEM 2134#define MAIL$K_MESSAGE_ITEMS 87N/* */N/* user input codes */N/* */#define MAIL$_USER_SPARE_0 3072N#define MAIL$_US ER_FIRST 3073 /* Retrive first user record */N#define MAIL$_USER_NEXT 3074 /* Retrive next user record */N#define MAIL$_USER_USERNAME 3075 /* Retrive record for username */N#define MAIL$_USER_SET_AUTO_PURGE 3076 /* Set auto-purge */N#define MAIL$_USER_SET_NO_AUTO_PURGE 3077 /* Clear auto-purge */N#define MAIL$_USER_SET_SUB_DIRECTORY 3078 /* Set sub-dir field */N#define MAIL$_USER_SET_NO_SUB_DIRECTORY 30 79 /* Clear sub-dir field */N#define MAIL$_USER_SET_FORWARDING 3080 /* Set forwarding address */N#define MAIL$_USER_SET_NO_FORWARDING 3081 /* Clear forwarding address */N#define MAIL$_USER_SET_PERSONAL_NAME 3082 /* Set personal name */N#define MAIL$_USER_SET_NO_PERSONAL_NAME 3083 /* Clear personal name */N#define MAIL$_USER_SET_COPY_SEND 3084 /* Set copy-send */N#define MAIL$_USER_SET_NO_COPY_SEND 3085 /* Clear copy send   */N#define MAIL$_USER_SET_COPY_REPLY 3086 /* Set copy reply */N#define MAIL$_USER_SET_NO_COPY_REPLY 3087 /* Clear copy reply */N#define MAIL$_USER_SET_NEW_MESSAGES 3088 /* Set new message count */N#define MAIL$_USER_CREATE_IF 3089 /* Create record if does not exist */N#define MAIL$_USER_SET_MAILPLUS 3090 /* Set M+ */N#define MAIL$_USER_SET_NO_MAILPLUS 3091 /* Clear M+ */N#define MAIL$_USER_SET_TRANSPORT 3092 /* Set transport field */N#define MAIL$_USER_SET_NO_TRANSPORT 3093 /* Clear transport field */N#define MAIL$_USER_SET_EDITOR 3094 /* Set editor field */N#define MAIL$_USER_SET_NO_EDITOR 3095 /* Clear editor field */N#define MAIL$_USER_SET_QUEUE 3096 /* Set queue field */N#define MAIL$_USER_SET_NO_QUEUE 3097 /* Clear queue field */N#define MAIL$_USER_SET_USER1 3098 /* Set user1 field */N#define MAIL$_USER_SET_NO_USER1 3099 /* Clear user1 field */N#define MAIL$_USER_SET_USER2 3100 /* Set user2 field */N#define MAIL$_USER_SET_NO_USER2 3101 /* Clear user2 field */N#define MAIL$_USER_SET_USER3 3102 /* Set user3 field */N#define MAIL$_USER_SET_NO_USER3 3103 /* Clear user3 field */N#define MAIL$_USER_SET_FORM 3104 /* Set form field  */N#define MAIL$_USER_SET_NO_FORM 3105 /* Clear form field */N#define MAIL$_USER_SET_COPY_FORWARD 3106 /* Set copy self forward */N#define MAIL$_USER_SET_NO_COPY_FORWARD 3107 /* Clear copy self forward */N#define MAIL$_USER_SET_CC_PROMPT 3108 /* Set CC prompting */N#define MAIL$_USER_SET_NO_CC_PROMPT 3109 /* Clear CC prompting */N#define MAIL$_USER_SET_SIGFILE 3110 /* Set signature file */N#define MAIL$_USER_SET_NO_SIGFILE 3111 /* Clear signature file */!#define MAIL$_USER_IN_SPARE1 3112!#define MAIL$_USER_IN_SPARE2 3113!#define MAIL$_USER_IN_SPARE3 3114!#define MAIL$_USER_IN_SPARE4 3115!#define MAIL$_USER_IN_SPARE5 3116!#define MAIL$_USER_IN_SPARE6 3117!#define MAIL$_USER_IN_SPARE7 3118!#define MAIL$_USER_IN_SPARE8 3119!#define MAIL$_USER_IN_SPARE9 3120"#define MAIL$_USER_IN_SPARE10 3121"#define MAIL$_USER_IN_SPARE11 3122"#define MAIL$_USER_IN_SPARE12 3123"#defin e MAIL$_USER_IN_SPARE13 3124"#define MAIL$_USER_IN_SPARE14 3125"#define MAIL$_USER_IN_SPARE15 3126"#define MAIL$_USER_IN_SPARE16 3127"#define MAIL$_USER_IN_SPARE17 3128"#define MAIL$_USER_IN_SPARE18 3129"#define MAIL$_USER_IN_SPARE19 3130"#define MAIL$_USER_IN_SPARE20 3131N/* */N/* Output item parameters */N/*  */N#define MAIL$_USER_MAILPLUS 3132 /* M+ field */N#define MAIL$_USER_TRANSPORT 3133 /* Transport field */N#define MAIL$_USER_EDITOR 3134 /* Editor field */N#define MAIL$_USER_QUEUE 3135 /* Queue field */N#define MAIL$_USER_USER1 3136 /* User1 field */N#define MAIL$_USER_USER2 3137 /* User2 field */N#define MAIL$_USER_USER3 3138 /* User3 field */N#define MAIL$_USER_FORM 3139 /* Form field */N#define MAIL$_USER_COPY_FORWARD 3140 /* Copy forward flag */N#define MAIL$_USER_SIGFILE 3141 /* Signature file */N#define MAIL$_USER_RETURN_USERNAME 3142 /* Username of current record */N#define MAIL$_USER_AUTO_PURGE 3143 /* Auto purge flag */N#define MAIL$_USER_SUB_DIRECTORY 3144 /* Sub-dir spec */N#define MAIL$_USER_FULL_DIRECTORY 3145 /* Full directory spec */N#define MAIL$_USER_NEW_MESSAGES 3146 /* New message count */N#define MAIL$_USER_FORWARDING 3147 /* Forwarding field */N#define MAIL$_USER_PERSONAL_NAME 3148 /* Personal name field */N#define MAIL$_USER_COPY_SEND 3149 /* Copy send flag */N#define MAIL$_USER_COPY_REPLY 3150 /* Copy reply flag  */N#define MAIL$_USER_CAPTIVE 3151 /* User is captive */N#define MAIL$_USER_CC_PROMPT 3152 /* CC prompting flag */"#define MAIL$_USER_OUT_SPARE2 3153"#define MAIL$_USER_OUT_SPARE3 3154"#define MAIL$_USER_OUT_SPARE4 3155"#define MAIL$_USER_OUT_SPARE5 3156"#define MAIL$_USER_OUT_SPARE6 3157"#define MAIL$_USER_OUT_SPARE7 3158"#define MAIL$_USER_OUT_SPARE8 3159"#define MAIL$_USER_OUT_SPARE9 3160##define MAIL$_USER_OUT_SPARE10 3161##define MAIL$_USER_OUT_SPARE11 3162##define MAIL$_USER_OUT_SPARE12 3163##define MAIL$_USER_OUT_SPARE13 3164##define MAIL$_USER_OUT_SPARE14 3165##define MAIL$_USER_OUT_SPARE15 3166##define MAIL$_USER_OUT_SPARE16 3167##define MAIL$_USER_OUT_SPARE17 3168##define MAIL$_USER_OUT_SPARE18 3169##define MAIL$_USER_OUT_SPARE19 3170##define MAIL$_USER_OUT_SPARE20 3171!#define MAIL$K_USER_MIN_ITEM 3072!#define MAIL$K_USER_MAX_ITEM 3171#define MAIL$K_USER_ITEMS 100N/*  */N/* Special items */N/* */N#define MAIL$_NOOP 4097 /* Do nothing - used for testing */N#define MAIL$_NOSIGNAL 4098 /* Don't signal errors */O#define MAIL$_NOPROBE 4099 /* Don't probe the item list buffers */T#define MAIL$_TLD_INPUT 4100 /* This item is a tld to be used as input */R#define MAIL$_TLD_OUTPUT 4101 /* This item describes a buffer to fill */N/* */N/* Username types for mail$send_add_address */N/* */N#define MAIL$_TO 1 /* Address part of the TO line */N#define MAIL$_CC 2 /* Address part of the CC line */#define MAIL$_SPARE1 3#define MAIL$_SPARE2 4N/* */N/* Define the flag values for mail system flags */N/* */#define MAIL$M_NEWMSG 0x1#define MAIL$M_REPLIED 0x2#define MAIL$M_DWMAIL 0x4#define MAIL$M_EXTMSG 0x8#define MAIL$M_EXTFNF 0x10#define MAIL$M_NOTRANS 0x20#define MAIL$M_EXTNSTD 0x40#d efine MAIL$M_MARKED 0x80#define MAIL$M_RECMODE 0x100 #ifdef __NEW_STARLETtypedef struct _flagsdef { __union {N unsigned short int mail$w_flags; /*Flags word */ __struct {N unsigned mail$v_newmsg : 1; /*This is a new message */N unsigned mail$v_replied : 1; /*This message has been replied to */N unsigned mail$v_dwmail : 1; /*DW mail flag */N unsigned mail$v_extmsg : 1; /*Message text in external file */N unsigned mail$v_extfnf : 1; /*External message file not found */N unsigned mail$v_notrans : 1; /*No translator for this message */O unsigned mail$v_extnstd : 1; /*External file is not var-seq file */N unsigned mail$v_marked : 1; /*This message has been marked */X unsigned mail$v_recmode : 1; /*This message should be read in record mode */( unsigned mail$v_fill_4_ : 7;  } mail$r_fill_3_; } mail$r_fill_2_; } FLAGSDEF; #if !defined(__VAXC)0#define mail$w_flags mail$r_fill_2_.mail$w_flagsA#define mail$v_newmsg mail$r_fill_2_.mail$r_fill_3_.mail$v_newmsgC#define mail$v_replied mail$r_fill_2_.mail$r_fill_3_.mail$v_repliedA#define mail$v_dwmail mail$r_fill_2_.mail$r_fill_3_.mail$v_dwmailA#define mail$v_extmsg mail$r_fill_2_.mail$r_fill_3_.mail$v_extmsgA#define mail$v_extfnf mail$r_fill_2_.mail$r_fill_3_.mail$v_extfnfC#define mail$v_notra ns mail$r_fill_2_.mail$r_fill_3_.mail$v_notransC#define mail$v_extnstd mail$r_fill_2_.mail$r_fill_3_.mail$v_extnstdA#define mail$v_marked mail$r_fill_2_.mail$r_fill_3_.mail$v_markedC#define mail$v_recmode mail$r_fill_2_.mail$r_fill_3_.mail$v_recmode"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct flagsdef { __union {N unsigned short int mail$w_flags; /*Flags word */ __struct {N unsigned mail$v_newmsg : 1; /*This is a new message */N unsigned mail$v_replied : 1; /*This message has been replied to */N unsigned mail$v_dwmail : 1; /*DW mail flag */N unsigned mail$v_extmsg : 1; /*Message text in external file */N unsigned mail$v_extfnf : 1; /*External message file not found */N unsigned mail$v_notrans : 1; /*No translator for this message */O unsigned mail$v_extnstd : 1; /*External file is not var-seq file */N unsigned mail$v_marked : 1; /*This message has been marked */X unsigned mail$v_recmode : 1; /*This message should be read in record mode */( unsigned mail$v_fill_4_ : 7; } mail$r_fill_3_; } mail$r_fill_2_; } ; #if !defined(__VAXC)0#define mail$w_flags mail$r_fill_2_.mail$w_flagsA#define mail$v_newmsg mail$r_fill_2_.mail$r_fill_3_.mail$v_newmsgC#define mail$v_replied mail$r_fill_2_.mail$r_fill_3_.mail$v_re !pliedA#define mail$v_dwmail mail$r_fill_2_.mail$r_fill_3_.mail$v_dwmailA#define mail$v_extmsg mail$r_fill_2_.mail$r_fill_3_.mail$v_extmsgA#define mail$v_extfnf mail$r_fill_2_.mail$r_fill_3_.mail$v_extfnfC#define mail$v_notrans mail$r_fill_2_.mail$r_fill_3_.mail$v_notransC#define mail$v_extnstd mail$r_fill_2_.mail$r_fill_3_.mail$v_extnstdA#define mail$v_marked mail$r_fill_2_.mail$r_fill_3_.mail$v_markedC#define mail$v_recmode mail$r_fill_2_.mail$r_fill_3_.mail$v_recmode"#endif /* #if !"defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MAILDEF_LOADED */ wwkt /*************************************************************************************** #*****************************************/=/* Created: 5-Apr-2012 13:00:44 by OpenVMS SDL EV3-3 */K/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]MAILMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $MAILMSGDEF ***/#ifndef __MAILMSGDEF_LOADED#define __MAILMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_a$lignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:57:53.28 */N/* */N/* & */J/* VERSION: 'X-14' */N/* */Q/***************************************************************************** *//** * */C/** COPYRIGHT (C) 1978, 1980, 1982, 1984, 1992 - 1996 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. ' * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** ( * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/*******************************************************************)********** */N/*++ */N/* */N/* FACILITY: VMS SYSTEM MACRO LIBRARIES */N/* */N/* ABSTRACT: */N/* */I/* THIS FI*LE CONTAINS THE MDL SOURCE FOR MAIL MESSAGES */N/* */N/* ENVIRONMENT: */N/* */I/* N/A */N/* */N/* + */N/* */H/* AUTHOR: THE VMS GROUP CREATION DATE: 8-JUN-1978 */N/* */N/* MODIFICATION HISTORY: */N/* */=/* X-14 RKS020909 RANJAN KUMAR SARANGI 09-FEB-2009 */B/* MODIFIED, DIRHD0 MESSAGE FORMAT FOR MAIL HEADER */B/* ALIGNMENT(PTR-75-120-515). */N/* */N/* X-13 SD070507 SAMWEDANA DEVPA 05-JUL-2007 */B/* MODIFIED DIRHD0 MESSAGE FORMAT. */N/* */5/* X-12 SG088 SHEELA GAYATRI 20-FEB-1996 */B/* ADD KEYNOTDEF -& INVKEYNAM MESSAGES. */N/* */5/* X-11 SG082 SHEELA GAYATRI 09-FEB-1996 */B/* ADD ILLEDTNAM MESSAGE. REMOVE X-10. */N/* */9/* X-10 SG067 SHEELA GAYATRI 13-NOV-1995 */B/* ADD CDASUPPORT MESSAGE FOR EAGLE/THETA FOR MAIL/OLD */B/* SUPPORT FOR DDIF/DTIF FILES. THIS MESSA .GE WILL */B/* BECOME REDUNDANT IN GRYPHON, WHEN SUPPORT FOR */B/* DDIF/DTIF FILE PROCESSING IS ADDED. */N/* */6/* X-9 ROP1002 ROBERT POSNIAK 7-JUN-1995 */B/* ADD SHOWNOSIG, SHOWSIG AND BADLOGVAL MESSAGES. */N/* */5/* X-8 MB0020 MARINA BUCKLEY 12-OCT-1994 */B/* MO/DIFY THE TEXT OF THE CODERR FATAL ERROR. */N/* */5/* X-7 MB0011 MARINA BUCKLEY 16-JUN-1994 */B/* ADD MAIL$_LISTTOOLONG ERROR MESSAGE TO BE RETURNED */B/* FROM CALLABLE MAIL ROUTINE MAIL$SEND_ADD_ADDRESS IF */B/* USER CALLS IT MULTIPLE TIMES RESULTING IN AN ADDRESS */B/* LIST THAT EXCEEDS THE MAXIMUM. */N/* 0 */4/* X-6 TNS004 TOM SCARPELLI 11-APR-1994 */B/* ADD I18N CHANGES. */N/* */4/* X-5 RAB RICHARD A. BISHOP 17-AUG-1993 */B/* PICK UP MAIL$_DELETED AND MAIL$_FFMTMSG FROM VAX: */N/* */3/* X-22 CCD027 CAREY DONAT 11-AUG-1993 */B/* 1REMOVE FROM MIDDLE OF FFMTMSG */N/* */3/* X-21 CCD027 CAREY DONAT 13-JUL-1993 */B/* ADD FFMTMSG INFORMATIONAL MESSAGE FOR FOREIGN FILES */B/* WHERE TRANLATOR EXISTS */N/* */3/* X-20 CCD007 CAREY DONAT 08-FEB-1993 */B/* ADD DELETED MESSAGE FOR COMPRESS T2EMP FILE SUCCESSFULLY */B/* DELETED */N/* */G/* ***** OLD AUDIT TRAIL FOLLOWS */N/* */6/* X-6 LAF0001 LISA A. FARLEY 02-JUL-1992 */B/* FIX FOR QAR #3161. ADDED MESSAGE INVRANGE TO LET THE */B/* USER KNOW WHEN THE RANGE SPECIFIED FOR A DELET 3E IS */B/* INVALID. */N/* */7/* X-5 MFS0069 MARK F. SCANLON 26-JUN-1992 */B/* QAR 2682. REMOVED FAO FROM MESSAGE NAMTOOBIG. */N/* */4/* X-4 RAB RICHARD A. BISHOP 21-MAY-1992 */B/* MERGE ANOTHER SYMBVOL FROM THE VAX/VMS COPY: */N/* 4 */E/* X-19 DAC060 DAVE CANTOR 15-APR-1992 */N/* CORRECTED TEXT OF NOUSERSPEC AT REQUEST OF DOC. GROUP */N/* */E/* X-18 DAC058 DAVE CANTOR 02-APR-1992 */N/* SUPPLY ERROR MESSAGE FOR DCL COMMAND $ MAIL FILENAME */N/* FOLLOWED BY NO ADDRESSEE SUPPLIED. (5NOUSERSPEC) */N/* */4/* X-3 RAB RICHARD A. BISHOP 29-JAN-1992 */B/* MERGE INTO ALPHA THE POST-V5.4 CHANGES IN VMS. */B/* SINCE THERE HAVE BEEN NO CHANGES IN THE ALPHA VERSION */B/* OF THIS FILE SINCE V5.4 (OTHER THAN AUDIT TRAIL), WHAT */B/* FOLLOWS IS THE AUDIT TRAIL FROM THE VMS MASTERPACK. */N/* 6 */I/* =============================================================== */N/* */6/* X-17 DRB0084 DAWN R. BANKS 8-AUG-1991 */B/* ADD MESSAGES TO SUPPORT DDIF/DTIF DOTS PACKING. */N/* */8/* X-16 ROP0423 ROBERT POSNIAK 17-MAR-1988 */B/* CHANGE THE TEXT OF FORMSG. */N/* 7 */7/* X-15 ROP0342 ROBERT POSNIAK 10-AUG-1987 */B/* ADD SHOW220, SHOW 225. */N/* */7/* X-14 ROP0321 ROBERT POSNIAK 23-JUL-1987 */B/* ADD NOACCPTMSG MESSAGE. */N/* */7/* X-13 ROP0297 ROBERT POSN8IAK 2-MAR-1987 */B/* MAKE DIRHD0 TAKE AS A PARAMETER THE NUMBER OF */B/* SPACES BETWEEN DATE AND SUBJECT FIELDS. */N/* */7/* X-12 ROP0283 ROBERT POSNIAK 24-FEB-1987 */B/* ADD MAILFOLD AND WASTEFOLD MESSAGES. */N/* */7/* X-11 ROP0249 ROBERT POSNIAK 9-FEB-1987 * 9/B/* MAKE MAIL COPY OF THE SHARED MESSAGES */B/* USED BY THE MAIL FACILITY. */N/* */8/* X-10 ROP0205 ROBERT POSNIAK 14-NOV-1986 */B/* ADD SHOW210 AND SHOW215. */N/* */7/* X-9 ROP0195 ROBERT POSNIAK 11-NOV-1986 */B/* ADD YES. : */N/* */7/* X-8 ROP0179 ROBERT POSNIAK 27-OCT-1986 */B/* ADD UPGRADE FOR ROLLING UPGRADE IN PROGRESS. */N/* */F/* X-7 ROP */B/* ADD ERRACTRNS */N/* ; */F/* X-6 ROP */B/* ADD SHOW200, SHOW205 */B/* ADD FORMSG, NOTFORMSG */N/* */F/* X-5 ROP */B/* FIX SHOW10 TO USE ONLY DESCRIPTORS. REMOVE RECLSTAT */B/* ADD PROMPT. CHANGE INFO50 T<O TAKE A DESCRIPTOR AS */B/* INPUT. ADD INFO12,INFO14, CRENEWFILE. */B/* ADD SHOW15,SHOW25, AND SHOW35 TO DISPLAY PRINT */B/* QUEUE/FORM AND FORWARD */N/* */F/* X-4 ROP */B/* ADD MSGSENT, MSGSENTAT */N/* = */F/* X-3 ROP */B/* ADD ILLTPRT,INVITMVAL */N/* */F/* X-2 ROP */B/* TAKE QUOTES OUT OF ILLPERNAM MESSAGE. */N/* */(/* V04-000 RP 28-OCT-1985 > */B/* NEW MESSAGE FOR WRONG FILE. ADD ERROR ERACTED */N/* */:/* V03-015 ROP0004 ROBERT POSNIAK 6-JUN-1984 */B/* NEW MESSGE FOR OVERSIZED RECORD. NEW MESSAGE FOR */B/* REENTERING LINE. */N/* */</* V03-014 BLS0272 BENN SCHREIBER 18-FEB-1984 13:36:12 */B/* NEW ME?SSAGE FOR INCORRECT PROTOCOL VERSION. */N/* */:/* V03-013 BLS0263 BENN SCHREIBER 5-FEB-1984 */B/* NEW MESSAGE FOR CAPTIVE ACCOUNT TRYING TO SPAWN. */N/* */:/* V03-012 BLS0255 BENN SCHREIBER 28-DEC-1983 */B/* NEW MESSAGES FOR SHOW KEY, AND FOR TIME IN NOTIFY MESSAGE */N/* @ */:/* V03-011 BLS0250 BENN SCHREIBER 8-DEC-1983 */B/* NEW MESSAGE FOR EDITOR NOT CALLABLE. NEW MESSAGE FOR */B/* ISAM FILE FOUND WHEN SEQUENTIAL EXPECTED. */N/* */:/* V03-010 BLS0246 BENN SCHREIBER 28-NOV-1983 */B/* NEW MESSAGE ASKING IF WANT TO CREATE NEW FOLDER. */N/* A */:/* V03-009 BLS0229 BENN SCHREIBER 16-JUL-1983 */B/* NEW MESSAGE "you have new mail". */N/* */:/* V03-008 BLS0227 BENN SCHREIBER 1-JUL-1983 */B/* NEW MESSAGES FOR SENDERR AND NOSUCHUSR THAT INCLUDE */B/* THE NODE NAME. */N/* B*/:/* V03-007 BLS0225 BENN SCHREIBER 17-JUN-1983 */B/* NEW MESSAGE FOR BETTER PERSONAL NAME CHECKING */N/* */:/* V03-006 BLS0222 BENN SCHREIBER 15-MAY-1983 */B/* NEW MESSAGE FOR RECLAIMING SPACE */N/* */:/* V03-005 BLS0220 BENN SCHREIBER 30-APR-1983 */B/* NEW MESSAGES FOR NEW FCEATURES */N/* */:/* V03-004 BLS0217 BENN SCHREIBER 12-APR-1983 */B/* CHANGE TEXT OF DELSPACE. ADD NEW MESSAGE FOR NON-EXISTANT */B/* FOLDER SELECTED. ADD MESSAGE FOR EXTERNAL MESSAGE TEXT. */N/* */:/* V03-003 BLS0211 BENN SCHREIBER 13-MAR-1983 */B/* NEW MESSAGES FOR ISAM FILES, AND TEXT THAT U DSED TO */B/* BE EMBEDDED IN THE PROGRAM. */N/* */:/* V03-002 BLS0202 BENN SCHREIBER 5-JAN-1983 */B/* NEW MESSAGES FOR ILLEGAL STRING LENGTH AND ILLEGAL */B/* CHARACTER IN STRING */N/* */:/* V03-001 BLS0177 BENN SCHREIBER 24-JUN-1982 */B/*E NEW MESSAGE FOR USER WHO HAS DISMAIL SET. NEW MESSAGE */B/* IF LOOP DETECTED IN FORWARDING VIA LOGICAL NAMES OR */B/* SET FORWARD. */N/* */N/*-- */N/* */N/* DEFINE MAIL RELATED ERROR/STATUS VALUES F */N/* */N/* */N/* DEFINE ERROR MESSAGES */N/* */#define MAIL$_FACILITY 126#define MAIL$_CODERR 8290316#define MAIL$_UPGRADE 8290324#define MAIL$_UAFGETERR 8290330#define MAIL$_UAFOPNERR 8290338#define MAILG$_NOSUCHUSR 8290346#define MAIL$_NOTREADIN 8290354#define MAIL$_LOGLINK 8290362#define MAIL$_CREPRIJOB 8290370#define MAIL$_SENDERR 8290378#define MAIL$_NOMOREMSG 8290386#define MAIL$_NOMSGS 8290394#define MAIL$_USERSPEC 8290402#define MAIL$_SENDABORT 8290410#define MAIL$_EDITPROC 8290418#define MAIL$_INVCMD 8290426#define MAIL$_NOTFOUND 8290434#define MAIL$_NETIOERR 8290442#define MAIL$_USERDSABL 8290450#define MAIL$_FORWLOOP 8290458#define MAIL$_NAMTOOBIG 829046H6#define MAIL$_ILLCHAR 8290474#define MAIL$_DATIMUSED 8290482#define MAIL$_NOTISAM 8290490#define MAIL$_DELMSG 8290498#define MAIL$_DELWASTE 8290506#define MAIL$_NOFOLDER 8290514#define MAIL$_NOTEXIST 8290522#define MAIL$_NOTSUBDIR 8290530#define MAIL$_ILLSUBDIR 8290538#define MAIL$_ILLFOLNAM 8290546#define MAIL$_NOMSGPRI 8290554#define MAIL$_ALTPRIJOB 8290562#define MAIL$_ILLPERNAM 8290570!#define MAIL$_NOSUCHUSRAT 8290578#define MAIL$_SENDERRAT 8290586#definIe MAIL$_CONABORT 8290594#define MAIL$_NOTCALEDT 8290602"#define MAIL$_FILECONFUSED 8290610#define MAIL$_CAPTIVE 8290618#define MAIL$_IVPROTVAL 8290626#define MAIL$_RECTOBIG 8290634#define MAIL$_ILLCTXADR 8290642#define MAIL$_WRONGCTX 8290650#define MAIL$_FAILGETVM 8290658#define MAIL$_INVITMCOD 8290666#define MAIL$_MISREQITM 8290674#define MAIL$_INVITMLEN 8290682#define MAIL$_FILEOPEN 8290690 #define MAIL$_NOFILEOPEN 8290698#define MAIL$_CONITMCOD 8290706#define MAJIL$_NOMORECTX 8290714#define MAIL$_WRONGFILE 8290722#define MAIL$_ILLTPRT 8290730#define MAIL$_INVITMVAL 8290738#define MAIL$_ERACTED 8290746#define MAIL$_FORMSG 8290754#define MAIL$_NOTFORMSG 8290762#define MAIL$_ERRACTRNS 8290770#define MAIL$_BADVALUE 8290778#define MAIL$_CLOSEDEL 8290786#define MAIL$_FILNOTDEL 8290794#define MAIL$_OPENIN 8290802#define MAIL$_OPENOUT 8290810#define MAIL$_PARSEFAIL 8290818#define MAIL$_READERR 8290826 #define MAIL$_SEARCHFAIL 8K290834#define MAIL$_SYSERROR 8290842#define MAIL$_NOSYSNAM 8290850#define MAIL$_NOSYSPRV 8290858#define MAIL$_PROTOCOL 8290866 #define MAIL$_NOACCPTMSG 8290874#define MAIL$_DOTSPACK 8290882 #define MAIL$_DOTSUNPACK 8290890 #define MAIL$_NOUSERSPEC 8290898#define MAIL$_INVRANGE 8290906!#define MAIL$_LISTTOOLONG 8290914#define MAIL$_SELECTED 8306307#define MAIL$_DELMSGS 8306315#define MAIL$_CVTFILE 8306323#define MAIL$_DELSPACE 8306331#define MAIL$_NEWFOLDER 8306339!#definLe MAIL$_RECLPLSWAIT 8306347#define MAIL$_REENTER 8306355#define MAIL$_DELETED 8306363#define MAIL$_FFMTMSG 8306371#define MAIL$_MOREMSG 8314304N#define MAIL$_DIRHD0 8314312 /*SD070507!RKS020909 */#define MAIL$_DIRHD10 8314320#define MAIL$_DIRHD20 8314328#define MAIL$_DIRDEL10 8314336#define MAIL$_ISUB10 8314344#define MAIL$_ISUB20 8314352#define MAIL$_ISUB30 8314360#define MAIL$_PRESRET 8314368 #define MAIL$_YOUHAVENEW 8314376#define MAIL$_MAMIL10 8314384#define MAIL$_MAIL20 8314392#define MAIL$_WANTOSEND 8314400#define MAIL$_NOTIFY10 8314408#define MAIL$_NOTIFY20 8314416 #define MAIL$_JOBENTERED 8314424#define MAIL$_SHOW10 8314432#define MAIL$_SHOW20 8314440#define MAIL$_SHOW30 8314448#define MAIL$_SHOW40 8314456#define MAIL$_SHOW50 8314464#define MAIL$_SHOW60 8314472#define MAIL$_SHOW70 8314480#define MAIL$_SHOW80 8314488#define MAIL$_SHOW90 8314496#define MAIL$_SHOW100 8314504#define MAIL$_SHOW110 831451N2#define MAIL$_EDIT10 8314520#define MAIL$_INFO10 8314528#define MAIL$_INFO20 8314536#define MAIL$_INFO30 8314544#define MAIL$_SEND 8314552#define MAIL$_REPLY 8314560#define MAIL$_SHOW120 8314568#define MAIL$_SHOW130 8314576#define MAIL$_INFO50 8314584#define MAIL$_SHOW140 8314592#define MAIL$_SHOW150 8314600#define MAIL$_SHOW160 8314608#define MAIL$_ISUB50 8314616#define MAIL$_MAIL30 8314624#define MAIL$_RETCONT 8314632#define MAIL$_NEWSEQ 8314640#define MAILO$_MAILDIR 8314648#define MAIL$_MAILFILE 8314656 #define MAIL$_MAILFOLDER 8314664#define MAIL$_MAIL40 8314672 #define MAIL$_CRENEWFOLD 8314680#define MAIL$_NONEWMAIL 8314688#define MAIL$_SHOWKEY10 8314696#define MAIL$_SHOWKEY20 8314704#define MAIL$_SHOWKEY30 8314712#define MAIL$_SHOWKEY40 8314720#define MAIL$_SHOWKEY50 8314728#define MAIL$_SHOWKEY60 8314736#define MAIL$_SHOWKEY70 8314744#define MAIL$_NOTIFY30 8314752#define MAIL$_NOTIFY40 8314760#define MAIL$_NOPARE PNT 8314768#define MAIL$_FILEMPTY 8314776#define MAIL$_NONEFOUND 8314784#define MAIL$_NOMOREREC 8314792N/* */N/* THE FOLLOWING MESSAGE IS USED FOR COMMUNICATION */N/* BETWEEN MAILSHR AND MAILSHRP. IT DOES NOT NEED TO BE DOCUMENTED. */N/* */#define MAIL$_USERFWD 8314800#define MAIL$_PROMPT 8314808#define MAILQ$_INFO12 8314816#define MAIL$_INFO14 8314824#define MAIL$_INFO16 8314832#define MAIL$_INFO18 8314840 #define MAIL$_CRENEWFILE 8314848#define MAIL$_SHOW15 8314856#define MAIL$_SHOW25 8314864#define MAIL$_SHOW35 8314872#define MAIL$_FORWARD 8314880#define MAIL$_SHOW200 8314888#define MAIL$_SHOW205 8314896#define MAIL$_SHOW210 8314904#define MAIL$_SHOW215 8314912#define MAIL$_CLOSEIN 8314920#define MAIL$_CLOSEOUT 8314928#define MAIL$_INVQUAVAL 8314936#define MAIL$_WRRITEERR 8314944#define MAIL$_SHOW220 8314952#define MAIL$_SHOW225 8314960#define MAIL$_HPROMPT 8314968#define MAIL$_SHOWNOSIG 8314976#define MAIL$_SHOWSIG 8314984#define MAIL$_BADLOGVAL 8314992#define MAIL$_MSGTEXT 8322305#define MAIL$_MSGINFO 8322313#define MAIL$_MSGSENT 8322321#define MAIL$_MSGSENTAT 8322329#define MAIL$_YES 8322337#define MAIL$_COPIEDR 8322345#define MAIL$_CREATED 8322353#define MAIL$_RENAMED 8322361#define MAIL$_TEXT 8322369N/* S */N/* THE FOLLOWING TWO ARE FOLDER NAMES CREATED BY MAIL */N/* */#define MAIL$_MAILFOLD 8322377#define MAIL$_WASTEFOLD 8322385#define MAIL$_ILLEDTNAM 8322394#define MAIL$_KEYNOTDEF 8322402#define MAIL$_INVKEYNAM 8322410 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmaTs supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MAILMSGDEF_LOADED */ ww /********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARD UEFMP.SDI;1 *//********************************************************************************************************************************/&/*** MODULE $MAPPINGDEF IDENT X-2 ***/#ifndef __MAPPINGDEF_LOADED#define __MAPPINGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_sVize __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 !definWed(__VAXC)#define __union union#else#define __union variant_union#endif#endif #define MAPPING$K_ADD 1#define MAPPING$K_CREATE 2#define MAPPING$K_DEFINE 3#define MAPPING$K_DELETE 4#define MAPPING$K_MODIFY 5#define MAPPING$K_SCAN 6#define MAPPING$K_LOOKUP 7#define MAPPING$K_PERFORMANCE 8$#define MAPPING$K_ZERO_PERFORMANCE 9#define MAPPING$K_STOP 10#define MAPPING$K_START 11%#define MAPPING$K_MAX_MAPPING_CODE 12#define MAPPING$K_END 100#define MAPPING$K_TYPEX 101!#define MAPPING$K_REMOTE_AREA 102!#define MAPPING$K_REMOTE_NAME 103 #define MAPPING$K_LOCAL_NAME 104#define MAPPING$K_FLAGS 105#define MAPPING$K_USER_DATA 106&#define MAPPING$K_USER_DATA_LENGTH 107!#define MAPPING$K_WILDCARD_MC 108!#define MAPPING$K_WILDCARD_SC 109!#define MAPPING$K_WILDCARD_TC 110!#define MAPPING$K_WILDCARD_TS 111!#define MAPPING$K_DEFINE_NAME 112"#define MAPPING$K_DEFINE_FLAGS 113!#define MAPPING$K_SCAN_BUFFER 114##define MAPPING$K_PROPOSED_NAME 115# Y#define MAPPING$K_WC_RESOLUTION 116'#define MAPPING$K_MAX_MAPPING_ITEMS 117'#define MAPPING$K_WC_MUST_BE_UNIQUE 200&#define MAPPING$K_WC_MATCH_LONGEST 201'#define MAPPING$K_WC_MATCH_SHORTEST 202)#define MAPPING$K_WC_MATCH_MOST_TERMS 203+#define MAPPING$K_WC_MATCH_FEWEST_TERMS 204'#define MAPPING$K_WC_MATCH_LEFTMOST 205(#define MAPPING$K_WC_MATCH_RIGHTMOST 206$#define MAPPING$K_MAX_MAPPING_WC 207&#define MAPPING$K_ANY_TYPE -2147483648&#define MAPPING$K_TCP_USER -2147483391'#define MAZPPING$K_TCP_GROUP -2147483390'#define MAPPING$K_TCP_PROXY -2147483389)#define MAPPING$K_DCE_MAPPING -2147483135'#define MAPPING$K_DCE_PROXY -2147483134-#define MAPPING$K_PATHWORKS_PROXY -2147482879*#define MAPPING$K_DECNET_PROXY -2147482623.#define MAPPING$K_KERBEROS_MAPPING -2147482367  '#define MAPPING$K_PERFORMANCE_LENGTH 56 #ifdef __NEW_STARLET%typedef struct _mapping$performance {* unsigned int mapping$l_total_messages;, unsigned int mapping$l_total_exceptions; [ unsigned int mapping$l_adds;# unsigned int mapping$l_creates;$ unsigned int mapping$l_definess;# unsigned int mapping$l_deletes;# unsigned int mapping$l_modifys;! unsigned int mapping$l_scans;# unsigned int mapping$l_lookups;' unsigned int mapping$l_performance;! unsigned int mapping$l_stops;" unsigned int mapping$l_starts;" unsigned int mapping$l_audits;, unsigned int mapping$l_invalid_messages; } MAPPING$PERFORMANCE;#else /* __OLD_STA\RLET */struct mapping$performance {* unsigned int mapping$l_total_messages;, unsigned int mapping$l_total_exceptions; unsigned int mapping$l_adds;# unsigned int mapping$l_creates;$ unsigned int mapping$l_definess;# unsigned int mapping$l_deletes;# unsigned int mapping$l_modifys;! unsigned int mapping$l_scans;# unsigned int mapping$l_lookups;' unsigned int mapping$l_performance;! unsigned int mapping$l_stops;" unsigned int mapping$l_starts;" ] unsigned int mapping$l_audits;, unsigned int mapping$l_invalid_messages; } ;%#endif /* #ifdef __NEW_STARLET */"#define MAPPING$M_LOCAL_UNIQUE 0x1##define MAPPING$M_REMOTE_UNIQUE 0x2 #define MAPPING$M_DEFAULT_IN 0x4!#define MAPPING$M_DEFAULT_OUT 0x8$#define MAPPING$M_NO_DEFAULT_IN 0x10%#define MAPPING$M_NO_DEFAULT_OUT 0x20#define MAPPING$M_MODIFY 0x40!#define MAPPING$M_DEFINITION 0x80"#define MAPPING$M_CASE_BLIND 0x100 #define MAPPING$M_WILDCARD 0x200"#define MAPPING$^M_FIND_LOCAL 0x400##define MAPPING$M_FIND_REMOTE 0x800##define MAPPING$M_FILL_1 0xFFFFF000"#define MAPPING$K_HEADER_LENGTH 40 #ifdef __NEW_STARLET typedef struct _mapping$header {" unsigned int mapping$l_length;# unsigned int mapping$l_context; __union {% unsigned int mapping$l_flags; __struct {0 unsigned mapping$v_local_unique : 1;1 unsigned mapping$v_remote_unique : 1;. unsigned mapping$v_default_in : 1;/ _unsigned mapping$v_default_out : 1;1 unsigned mapping$v_no_default_in : 1;2 unsigned mapping$v_no_default_out : 1;* unsigned mapping$v_modify : 1;. unsigned mapping$v_definition : 1;. unsigned mapping$v_case_blind : 1;, unsigned mapping$v_wildcard : 1;. unsigned mapping$v_find_local : 1;/ unsigned mapping$v_find_remote : 1;+ unsigned mapping$v_fill_1 : 20; } mapping$r_fill_8_;` } mapping$r_fill_7_; unsigned int mapping$l_type;% unsigned int mapping$l_wildflags;% unsigned int mapping$l_wildmulti;& unsigned int mapping$l_wildsingle;$ unsigned int mapping$l_wildterm;# unsigned int mapping$l_termsep;" unsigned int mapping$l_unused; } MAPPING$HEADER; #if !defined(__VAXC)9#define mapping$l_flags mapping$r_fill_7_.mapping$l_flagsY#define mapping$v_local_unique mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_local_unique[#define amapping$v_remote_unique mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_remote_uniqueU#define mapping$v_default_in mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_default_inW#define mapping$v_default_out mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_default_out[#define mapping$v_no_default_in mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_no_default_in]#define mapping$v_no_default_out mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_no_default_outM#define mapping$v_modify mapping$r_fill_7_.mapping$rb_fill_8_.mapping$v_modifyU#define mapping$v_definition mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_definitionU#define mapping$v_case_blind mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_case_blindQ#define mapping$v_wildcard mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_wildcardU#define mapping$v_find_local mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_find_localW#define mapping$v_find_remote mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_find_remoteM#define mapping$v_fill_1 mapping$r_fill_c7_.mapping$r_fill_8_.mapping$v_fill_1"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct mapping$header {" unsigned int mapping$l_length;# unsigned int mapping$l_context; __union {% unsigned int mapping$l_flags; __struct {0 unsigned mapping$v_local_unique : 1;1 unsigned mapping$v_remote_unique : 1;. unsigned mapping$v_default_in : 1;/ unsigned mapping$v_default_out : 1;1 unsi dgned mapping$v_no_default_in : 1;2 unsigned mapping$v_no_default_out : 1;* unsigned mapping$v_modify : 1;. unsigned mapping$v_definition : 1;. unsigned mapping$v_case_blind : 1;, unsigned mapping$v_wildcard : 1;. unsigned mapping$v_find_local : 1;/ unsigned mapping$v_find_remote : 1;+ unsigned mapping$v_fill_1 : 20; } mapping$r_fill_8_; } mapping$r_fill_7_; unsigned int mapping e$l_type;% unsigned int mapping$l_wildflags;% unsigned int mapping$l_wildmulti;& unsigned int mapping$l_wildsingle;$ unsigned int mapping$l_wildterm;# unsigned int mapping$l_termsep;" unsigned int mapping$l_unused; } ; #if !defined(__VAXC)9#define mapping$l_flags mapping$r_fill_7_.mapping$l_flagsY#define mapping$v_local_unique mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_local_unique[#define mapping$v_remote_unique mapping$r_fill_7_.mapping$r_fill_8_.mapping$fv_remote_uniqueU#define mapping$v_default_in mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_default_inW#define mapping$v_default_out mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_default_out[#define mapping$v_no_default_in mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_no_default_in]#define mapping$v_no_default_out mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_no_default_outM#define mapping$v_modify mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_modifyU#define mapping$v_definition mapping$r_fgill_7_.mapping$r_fill_8_.mapping$v_definitionU#define mapping$v_case_blind mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_case_blindQ#define mapping$v_wildcard mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_wildcardU#define mapping$v_find_local mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_find_localW#define mapping$v_find_remote mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_find_remoteM#define mapping$v_fill_1 mapping$r_fill_7_.mapping$r_fill_8_.mapping$v_fill_1"#endif /* #if !defined(__VAhXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLET'typedef struct _mapping$generic_desc1 {- unsigned short int mapping$w_desc_length;' unsigned short int mapping$w_fill1; char mapping$t_desc_data; } MAPPING$GENERIC_DESC1;#else /* __OLD_STARLET */struct mapping$generic_desc1 {- unsigned short int mapping$w_desc_length;' unsigned short int mapping$w_fill1; char mapping$t_desc_data; } ;%#endif /* #ifdef __NEW_STARLET */i $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MAPPINGDEF_LOADED */ wwۅ /********************************************************************************************************************************/=/* Created: 5-A jpr-2012 13:00:44 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:41 $1$DGA7304:[STARLET_H.SRC]LBRUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $MHDDEF ***/#ifndef __MHDDEF_LOADED#define __MHDDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SkIZE /* 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#elsle#define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* Module header */N/* */N#define MHD$C_MHDID 173 /* Value that must be in the ident */S#defmine MHD$K_REFLNG 8 /* Length of record to end of ref count */S#define MHD$C_REFLNG 8 /* Length of record to end of ref count */N#define MHD$K_INSTIME 8 /* Label for start of insert time */N#define MHD$C_INSTIME 8 /* Label for start of insert time */S#define MHD$K_USRDAT 16 /* Start of user additional header data */S#define MHD$C_USRDAT 16 /* Start of user additional header data */N#defin ne MHD$K_MHDLEN 16 /* Length of fixed part of MHD */N#define MHD$C_MHDLEN 16 /* Length of fixed part of MHD */#define MHD$M_SELSRC 0x1#define MHD$M_OBJTIR 0x2#define MHD$M_WKSYM 0x4N#define MHD$K_OBJIDENT 18 /* */N#define MHD$C_OBJIDENT 18 /* */N#define MHD$K_OREFOFFSET 52 /* Offset of the other ref. count */N#define MHD$C_OREFOFFSET 52 o /* Offset of the other ref. count */ #ifdef __NEW_STARLETtypedef struct _mhddef {N unsigned char mhd$b_lbrflag; /* Librarian-controlled flag byte */N unsigned char mhd$b_id; /* Ident */N short int mhddef$$_fill_1; /* Reserved word */N unsigned int mhd$l_refcnt; /* Reference count */N unsigned int mhd$l_datim; /* Date/time inserted */ __un pion {N int mhddef$$_fill_2; /* ... */ __struct {% char mhddef$$_fill_3 [4];" } mhd$r_fill_2_fields; } mhd$r_fill_2_overlay; __union {N unsigned char mhd$b_objstat; /* Status of object module */ __struct {N unsigned mhd$v_selsrc : 1; /* Selective search */N unsigned mhd$v_objtir : 1; /* Module contains TIR records */[ q unsigned mhd$v_wksym : 1; /* Module contains other non-group global symbol */' unsigned mhd$v_fill_1_ : 5;! } mhd$r_objstat_bits; } mhd$r_objstat_overlay; __union {N unsigned char mhd$b_objidlng; /* Length of ident */ __struct {! char mhddef$$_fill_4;$ } mhd$r_objidlng_fields;! } mhd$r_objidlng_overlay;V char mhddef$$_fill_5 [31]; /* Object module ident data or GSMATCH a rrea */N char mhddef$$_fill_6 [3]; /* space */N unsigned int mhd$l_otherefcnt; /* Other reference count */N unsigned int mhd$l_modsize; /* Module size */N unsigned int mhd$l_fill_7; /* part of module size. */ } MHDDEF; #if !defined(__VAXC)D#define mhd$r_fill_2_fields mhd$r_fill_2_overlay.mhd$r_fill_2_fields9#define mhd$b_objstat mhd$r_objstat_overlay.mhd$b_objstatC#defin se mhd$r_objstat_bits mhd$r_objstat_overlay.mhd$r_objstat_bits4#define mhd$v_selsrc mhd$r_objstat_bits.mhd$v_selsrc4#define mhd$v_objtir mhd$r_objstat_bits.mhd$v_objtir2#define mhd$v_wksym mhd$r_objstat_bits.mhd$v_wksym<#define mhd$b_objidlng mhd$r_objidlng_overlay.mhd$b_objidlngJ#define mhd$r_objidlng_fields mhd$r_objidlng_overlay.mhd$r_objidlng_fields"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct mhddef {N unsigned char mhd$b_lbrflag; /* Librarian-c tontrolled flag byte */N unsigned char mhd$b_id; /* Ident */N short int mhddef$$_fill_1; /* Reserved word */N unsigned int mhd$l_refcnt; /* Reference count */N unsigned int mhd$l_datim; /* Date/time inserted */ __union {N int mhddef$$_fill_2; /* ... */ __struct {% char mhddef$$_fill_3 [4];" u } mhd$r_fill_2_fields; } mhd$r_fill_2_overlay; __union {N unsigned char mhd$b_objstat; /* Status of object module */ __struct {N unsigned mhd$v_selsrc : 1; /* Selective search */N unsigned mhd$v_objtir : 1; /* Module contains TIR records */[ unsigned mhd$v_wksym : 1; /* Module contains other non-group global symbol */' unsigned mhd$v_fill_1_ : 5;! } mhd$r_objs vtat_bits; } mhd$r_objstat_overlay; __union {N unsigned char mhd$b_objidlng; /* Length of ident */ __struct {! char mhddef$$_fill_4;$ } mhd$r_objidlng_fields;! } mhd$r_objidlng_overlay;V char mhddef$$_fill_5 [31]; /* Object module ident data or GSMATCH area */N char mhddef$$_fill_6 [3]; /* space */N unsigned int mhd$l_otherefcnt; /* Other reference count w */N unsigned int mhd$l_modsize; /* Module size */N unsigned int mhd$l_fill_7; /* part of module size. */ } ; #if !defined(__VAXC)9#define mhd$b_objstat mhd$r_objstat_overlay.mhd$b_objstatJ#define mhd$v_selsrc mhd$r_objstat_overlay.mhd$r_objstat_bits.mhd$v_selsrcJ#define mhd$v_objtir mhd$r_objstat_overlay.mhd$r_objstat_bits.mhd$v_objtirH#define mhd$v_wksym mhd$r_objstat_overlay.mhd$r_objstat_bits.mhd$v_wksym<#define xmhd$b_objidlng mhd$r_objidlng_overlay.mhd$b_objidlng"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MHDDEF_LOADED */ ww /******************* y*************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $MHDEF ***/#ifndef __MHDEF_LOADED#define __MHDEF_LOADED 1 G#pragma __nostandard /* This file uses znon-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __unknow{n_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 N/* */N/* Module header record (MHD) */N/* | */N#define MHD$C_MHD 0 /*Main header record */N#define MHD$C_LNM 1 /*Language name and version */N#define MHD$C_SRC 2 /*Source file specification */N#define MHD$C_TTL 3 /*Title text of module */N#define MHD$C_CPR 4 /*Copyright notice */N#define MHD$C_MTC 5 /*Maintenence status } */N#define MHD$C_GTX 6 /*General text */N#define MHD$C_MAXHDRTYP 6 /*Maximum allowable type */ #ifdef __NEW_STARLETtypedef struct _mhdef {N unsigned char mhd$b_rectyp; /*Record type (OBJ$C_MHD) */N unsigned char mhd$b_hdrtyp; /*Type field for MHD */N/*Types of header records */N unsigned char mhd$b_strlvl; ~/*Structure level */N unsigned short int mhd$w_recsiz; /*Maximum record size */N unsigned char mhd$b_namlng; /*Module name length */N char mhd$t_name [31]; /*Module name */ } MHDEF;#else /* __OLD_STARLET */struct mhdef {N unsigned char mhd$b_rectyp; /*Record type (OBJ$C_MHD) */N unsigned char mhd$b_hdrtyp; /*Type field for MHD */N/*Ty pes of header records */N unsigned char mhd$b_strlvl; /*Structure level */N unsigned short int mhd$w_recsiz; /*Maximum record size */N unsigned char mhd$b_namlng; /*Module name length */N char mhd$t_name [31]; /*Module name */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MHDEF_LOADED */ wwJ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR -2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************/!/*** MODULE MMEDEF IDENT X-3 ***/#ifndef __MMEDEF_LOADED#define __MMEDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #define MME$_UNLOAD 1#define MME$_ALLOC 2#define MME$_BACKUP_FILE 3#define MME$_CLOSE_READ 4#define MME$_CLOSE_WRITE 5"#define MME$_CONTINUATION_VOLUME 6#define MME$_DEALLOCATE 7#define MME$_DEVICE_AVAIL 8#define MME$_DEVICE_UNAVAIL 9#define MME$_DISMOUNT 10#define MME$_DISPLAY_MESSAGE 11#define MME$_EOV_READ 12#define MME$_EOV_WRITE 13#define MME$_INITIALIZE 14#define MME$_MOUNT 15#define MME$_MOUNT_REQUEST 16#define MME$_NEWVOL_REQUEST 17#define MME$_NOTIFY_DEVICE 18#define MME$_OPCOM_ACP 19#define MME$_OPCOM_MOUNT 20#define MME$_OPEN_READ 21#define MME$_OPEN_WRITE 22#define MME$_VOLUME_ONLINE 23#define MME$_BACKUP_END 24#define MME$_BACKUP_START 25#define MME$_WRITE_REQUEST 26#define MME$_MOUNT_END 27#define MME$_INIT_END 28#define MME$_NEWVOL_END 29#define MME$_DISMNT_PROC_DEL 30#define MME$S_ACMODE 4#define MME$S_BLOCKSIZE 4#define MME$S_DENSITY 4#define MME$S_DEVICE_CONTEXT 4#define MME$S_DMT_FLAGS 4#define MME$S_ERASE 4#define MME$S_EXPIRATION 8#define MME$S_FILESEQNO 4#define MME$S_FILESECNO 4#define MME$S_IO_FUNCTION 4#define MME$S_LABEL_ACCESS 1#define MME$S_MOUNT_CONTEXT 4#define MME$S_MNT_FLAGS 8#define MME$S_OBJCNT 4#define MME$S_OVR_ACCESS 4#define MME$S_OVR_EXP 4#define MME$S_OVR_VOLO 4#define MME$S_OWNER_UIC 4#define MME$S_PID 4#define MME$S_RECORDSIZ 4#define MME$S_RESPONSEREQ 4#define MME$S_SETNEW1 4#define MME$S_SETNEW2 4#define MME$S_VPROT 4#define MME$S_FILE_ID 6#define MME$S_GROUPSIZE 4#define MME$S_PROTECTION 4#define MME$S_STATUS 4#define MME$S_ASSIGNMENT_UNIT 4#define MME$S_CARTRIDGE_SIDE 4#define MME$S_DISPOSITION 4#define MME$S_RECFORMAT 1N/* MME action routine argument item codes */#define MME$_ACMODE 1#define MME$_BLOCKSIZE 2#define MME$_COMMENT 3#define MME$_DENSITY 4#define MME$_DEVICE_CONTEXT 5#define MME$_DMT_FLAGS 6#define MME$_EOF1 7#define MME$_EOF2 8#define MME$_EOF3 9#define MME$_EOF4 10#define MME$_EOV1 11#define MME$_EOV2 12#define MME$_EOV3 13#define MME$_EOV4 14#define MME$_ERASE 15#define MME$_FIB 16#define MME$_FILESEQNO 17#define MME$_HDR1 18#define MME$_HDR2 19#define MME$_HDR3 20#define MME$_HDR4 21#define MME$_IO_FUNCTION 22#define MME$_LABEL_ACCESS 23#define MME$_LABEL_VOLO 24#define MME$_MOUNT_CONTEXT 25#define MME$_MNT_FLAGS 26#define MME$_MSG1 27#define MME$_MSG2 28#define MME$_NEWDEVNAM 29#define MME$_NEWMSG1 30#define MME$_NEWMSG2 31#define MME$_NEWVOLNAM 32#define MME$_NXTVOL 33#define MME$_OBJCNT 34#define MME$_OVR_ACCESS 35#define MME$_OVR_EXP 36#define MME$_OVR_VOLO 37#define MME$_OWNER_UIC 38#define MME$_PHYDEVNAM 39#define MME$_PID 40#define MME$_PREV_VOL 41#define MME$_PROCESSOR 42#define MME$_RECORDSIZ 43#define MME$_REQDEVNAM 44#define MME$_RESPONSEREQ 45#define MME$_SETNEW1 46#define MME$_SETNEW2 47#define MME$_VOL1 48#define MME$_VOL2 49#define MME$_VOLNAM 50#define MME$_VPROT 51!#define MME$_BACKUP_FILE_FLAGS 52#define MME$_BACKUP_FLAGS 53#define MME$_EXPIRATION 54#define MME$_FILENAME 55#define MME$_FILE_ID 56#define MME$_GROUPSIZE 57#define MME$_IN_SAVE 58 #define MME$_IN_SPECIFICATION 59#define MME$_IN_VOLUME 60#define MME$_OUT_SAVE 61#define MME$_PROTECTION 62#define MME$_STATUS 63#define MME$_ASSIGNMENT_UNIT 64#define MME$_CART_MEDIA_NAME 65#define MME$_CARTRIDGE_NAME 66#define MME$_CARTRIDGE_SIDE 67#define MME$_COLLECTION 68#define MME$_DEVICE_TYPE 69#define MME$_DISPOSITION 70#define MME$_LOCATION 71#define MME$_MEDIA_NAME 72#define MME$_LABEL_TYPE 73#define MME$_EXPDATE 74#define MME$_CREDATE 75#define MME$_RECFORMAT 76#define MME$_FILESECNO 77#define MME$_REPLY 78#define MME$M_IMAGE 0x1#define MME$M_CRC 0x2#define MME$M_DELETE 0x4#define MME$M_IGN_INTERLOCK 0x8#define MME$M_IGN_LABEL 0x10#define MME$M_IGN_NOBACKUP 0x20#define MME$M_INTERCHANGE 0x40#define MME$M_RECORD 0x80#define MME$M_REWIND 0x100#define MME$M_VERIFY 0x200#define MME$M_PHYSICAL 0x400#define MME$M_COMPACTION 0x800 #ifdef __NEW_STARLETtypedef struct _backup_flags {N __union { /* Flag mask for MME$_BACKUP_FLAGS */& unsigned int mme$l_flags_mask;  __struct {% unsigned mme$v_image : 1;# unsigned mme$v_crc : 1;& unsigned mme$v_delete : 1;- unsigned mme$v_ign_interlock : 1;) unsigned mme$v_ign_label : 1;, unsigned mme$v_ign_nobackup : 1;+ unsigned mme$v_interchange : 1;& unsigned mme$v_record : 1;& unsigned mme$v_rewind : 1;& unsigned mme$v_verify : 1;( unsigned mme$v_physical : 1;* unsigned m me$v_compaction : 1;' unsigned mme$v_fill_9_ : 4; } mme$r_flags_bits; } mme$r_flags_overlay; } BACKUP_FLAGS; #if !defined(__VAXC)=#define mme$l_flags_mask mme$r_flags_overlay.mme$l_flags_maskD#define mme$v_image mme$r_flags_overlay.mme$r_flags_bits.mme$v_image@#define mme$v_crc mme$r_flags_overlay.mme$r_flags_bits.mme$v_crcF#define mme$v_delete mme$r_flags_overlay.mme$r_flags_bits.mme$v_deleteT#define mme$v_ign_interlock mme$r_flags_overlay.mme$r_flags_bits.mme$v_ign_interlockL#define mme$v_ign_label mme$r_flags_overlay.mme$r_flags_bits.mme$v_ign_labelR#define mme$v_ign_nobackup mme$r_flags_overlay.mme$r_flags_bits.mme$v_ign_nobackupP#define mme$v_interchange mme$r_flags_overlay.mme$r_flags_bits.mme$v_interchangeF#define mme$v_record mme$r_flags_overlay.mme$r_flags_bits.mme$v_recordF#define mme$v_rewind mme$r_flags_overlay.mme$r_flags_bits.mme$v_rewindF#define mme$v_verify mme$r_flags_overlay.mme$r_flags_bits.mme$v_verifyJ#define mme$v_ph ysical mme$r_flags_overlay.mme$r_flags_bits.mme$v_physicalN#define mme$v_compaction mme$r_flags_overlay.mme$r_flags_bits.mme$v_compaction"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct backup_flags {N __union { /* Flag mask for MME$_BACKUP_FLAGS */& unsigned int mme$l_flags_mask; __struct {% unsigned mme$v_image : 1;# unsigned mme$v_crc : 1;& unsigned mme$v_delete : 1;-  unsigned mme$v_ign_interlock : 1;) unsigned mme$v_ign_label : 1;, unsigned mme$v_ign_nobackup : 1;+ unsigned mme$v_interchange : 1;& unsigned mme$v_record : 1;& unsigned mme$v_rewind : 1;& unsigned mme$v_verify : 1;( unsigned mme$v_physical : 1;* unsigned mme$v_compaction : 1;' unsigned mme$v_fill_9_ : 4; } mme$r_flags_bits; } mme$r_flags_overlay; } ; #if !defined(__VAXC)=#define mme$l_flags_mask mme$r_flags_overlay.mme$l_flags_maskD#define mme$v_image mme$r_flags_overlay.mme$r_flags_bits.mme$v_image@#define mme$v_crc mme$r_flags_overlay.mme$r_flags_bits.mme$v_crcF#define mme$v_delete mme$r_flags_overlay.mme$r_flags_bits.mme$v_deleteT#define mme$v_ign_interlock mme$r_flags_overlay.mme$r_flags_bits.mme$v_ign_interlockL#define mme$v_ign_label mme$r_flags_overlay.mme$r_flags_bits.mme$v_ign_labelR#define mme$v_ign_nobackup mme$r_flags_overlay.mme$r_flags_bits.mme$v_ign_nobackupP#define mme$v_interchange mme$r_flags_overlay.mme$r_flags_bits.mme$v_interchangeF#define mme$v_record mme$r_flags_overlay.mme$r_flags_bits.mme$v_recordF#define mme$v_rewind mme$r_flags_overlay.mme$r_flags_bits.mme$v_rewindF#define mme$v_verify mme$r_flags_overlay.mme$r_flags_bits.mme$v_verifyJ#define mme$v_physical mme$r_flags_overlay.mme$r_flags_bits.mme$v_physicalN#define mme$v_compaction mme$r_flags_overlay.mme$r_flags_bits.mme$v_compaction"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define MME$M_VERIF_ERR 0x1#define MME$M_NOBACKUP 0x2#define MME$M_FILE_OPEN 0x4#define MME$M_ACC_CONF 0x8 #ifdef __NEW_STARLET#typedef struct _backup_file_flags {N __union { /* Flag mask for MME$_BACKUP_FLAGS */+ unsigned int mme$l_file_flags_mask; __struct {) unsigned mme$v_verif_err : 1;( unsigned mme$v_nobackup : 1;) unsigned mme$v_file_ open : 1;( unsigned mme$v_acc_conf : 1;& unsigned mme$v_fill1 : 28;$ } mme$r_file_flags_bits;# } mme$r_file_flags_overlay; } BACKUP_FILE_FLAGS; #if !defined(__VAXC)L#define mme$l_file_flags_mask mme$r_file_flags_overlay.mme$l_file_flags_maskV#define mme$v_verif_err mme$r_file_flags_overlay.mme$r_file_flags_bits.mme$v_verif_errT#define mme$v_nobackup mme$r_file_flags_overlay.mme$r_file_flags_bits.mme$v_nobackupV#define mme$v_file_open mme$r_fi le_flags_overlay.mme$r_file_flags_bits.mme$v_file_openT#define mme$v_acc_conf mme$r_file_flags_overlay.mme$r_file_flags_bits.mme$v_acc_confN#define mme$v_fill1 mme$r_file_flags_overlay.mme$r_file_flags_bits.mme$v_fill1"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct backup_file_flags {N __union { /* Flag mask for MME$_BACKUP_FLAGS */+ unsigned int mme$l_file_flags_mask; __struct {) unsigned mme$v_verif_err  : 1;( unsigned mme$v_nobackup : 1;) unsigned mme$v_file_open : 1;( unsigned mme$v_acc_conf : 1;& unsigned mme$v_fill1 : 28;$ } mme$r_file_flags_bits;# } mme$r_file_flags_overlay; } ; #if !defined(__VAXC)L#define mme$l_file_flags_mask mme$r_file_flags_overlay.mme$l_file_flags_maskV#define mme$v_verif_err mme$r_file_flags_overlay.mme$r_file_flags_bits.mme$v_verif_errT#define mme$v_nobackup mme$r_file_flags_overlay.mme$ r_file_flags_bits.mme$v_nobackupV#define mme$v_file_open mme$r_file_flags_overlay.mme$r_file_flags_bits.mme$v_file_openT#define mme$v_acc_conf mme$r_file_flags_overlay.mme$r_file_flags_bits.mme$v_acc_confN#define mme$v_fill1 mme$r_file_flags_overlay.mme$r_file_flags_bits.mme$v_fill1"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define MME$C_ANSI_1 1#define MME$C_ANSI_2 2#define MME$C_ANSI_3 3#define MME$C_ANSI_4 4#define MME$C_IBM_STD 5#define MME$C_UNLABELLED 6#define MME$C_ODS1 7#define MME$C_ODS2 8 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MMEDEF_LOADED */ ww/************************************************************************************************* *******************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]MMEMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $MMEMSGDEF ***/#ifndef __MMEMSGDEF_LOADED#define __MMEMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:58:00.46 */N/* */N/*++  */N/************************************************************************** */N/** * */N/** COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION, 1991, 1992, 1993 * */N/** ALL RIGHTS RESERVED. * */N/** UNPUBLISHED RIGHTS RESERVED UNDER THE COPYRIGHT LAWS OF THE UNITED * */N/** STATES.  * */N/** * */N/** THE SOFTWARE CONTAINED ON THIS MEDIA IS PROPRIETARY TO AND EMBODIES * */N/** THE CONFIDENTIAL TECHNOLOGY OF DIGITAL EQUIPMENT CORPORATION. * */N/** POSSESSION, USE, DUPLICATION OR DISSEMINATION OF THE SOFTWARE AND * */N/** MEDIA IS AUTHORIZED ONLY PURSUANT TO A VALID WRITTEN LICENSE FROM * */N/** DIGITAL EQUIPMENT CORPORATION. * */N/** * */N/** RESTRICTED RIGHTS LEGEND USE, DUPLICATION, OR DISCLOSURE BY THE U.S. * */N/** GOVERNMENT IS SUBJECT TO RESTRICTIONS AS SET FORTH IN SUBPARAGRAPH * */N/** (C)(1)(II) OF DFARS 252.227-7013, OR IN FAR 52.227-19, AS APPLICABLE. * */N/** * */N/************************************************************************** */N/*  */N/*++ */N/* FACILITY: */N/* MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* */N/* ABSTRACT: */N/* CONTAINS MESSAGES FOR THE MEDIA MANAGEMENT EXTENSIONS. */N/* */N/* AUTHOR: */N/* DAN KYLER */N/* */N/* CREATION DATE: 11-SEP-1991 */N/*  */N/* MODIFICATION HISTORY: */N/* */0/* X-3 SGS0032 STEVE SKONETSKI 30-SEP-1993 */D/* FIX BUILD BUG. WRONG COMMENT CHARACTER USED IN NEW COPYRIGHT. */N/* */0/* X-2 SGS0032 STEVE SKONETSKI 30-SEP-1993 */B/* VAX TO ALPHA PORT. ADD /MACRO=$MMEMSGDEF TO .FACILITY */B/* DIRECTIVE. ALLOWS US TO REMOVE MMEMSGDEF.COM FROM THE BUILD */B/* PROCEDURE. */B/* */N/* */9/* X-1 MME-JDE013 JOHN EIKENBERRY 21 NOV 1991 */B/* MERGED INTO BLADE */N/* */N/*--  */N/*+ */N/* FACILITY DEFINITION */N/*- */#define MME_FACILITY 3439N/*+ */N/* SUCCESS MESSAGES */N/*-  */N/* */N/*+ */N/* INFORMATIONAL MESSAGES */N/*- */N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS  */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */#define MME$_NO_MME 225411875N/* */N/*+ */N/* WARNING MESSAGES  */N/*- */N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: THE MEDIA MANAGEMENT PROCESS RECEIVED A MAILBOX MESSAGE */C/* CONTAINING AN ARGUMENT WHICH WAS UNRECOGNIZED. THE ARGUMENT */B/* WILL BE IGNORED. */N/* USER ACTION: NONE */N/*-- */ #define MME$_BADARGIGN 225412672N/* */N/*+ */N/* ERROR MESSAGES */N/*- */N/*++  */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: THE MEDIA MANAGEMENT PROCESS RECEIEVED A MAILBOX MESSAGE */B/* INDICATING AN ACTION ROUTINE FOR WHICH THE MEDIA MANAGEMENT */B/* SOFTWARE HAS NOT DECLARED A ROUTINE. */N/* USER ACTION: NONE. */N/*--  */!#define MME$_RTNNOTDECL 225415074N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */!#define MME$_BADMSGTYPE 225415082N/*++  */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */"#define MME$_FACMISMATCH 225415090N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */ #define MME$_MBXFAOERR 225415098N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */ #define MME$_MBXASNERR 225415106N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION:  */N/* USER ACTION: */N/*-- */ #define MME$_MBXWRTERR 225415114N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION:  */N/*-- */ #define MME$_ASTNOTQED 225415122N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*--  */ #define MME$_AVRFAOERR 225415130N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */ #define MME$_AVRENQERR 225415138N/*++  */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */ #define MME$_AVRASNERR 225415146N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */ #define MME$_GETNAMERR 225415154N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */"#define MME$_UICMISMATCH 225415162N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION:  */N/* USER ACTION: */N/*-- */ #define MME$_MBXDVIERR 225415170N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION:  */N/*-- */ #define MME$_JPIUICERR 225415178N/* */N/*+ */N/* FATAL MESSAGES */N/*- */N/*++  */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */ #define MME$_FINTERNAL 225419076N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION: */N/*-- */#define MME$_MBXRDERR 225419084N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION:  */N/* USER ACTION: */N/*-- */!#define MME$_POSTMBXERR 225419092N/*++ */N/* FACILITY: MME - VMS MEDIA MANAGEMENT EXTENSIONS */N/* EXPLANATION: */N/* USER ACTION:  */N/*-- */ #define MME$_MEMALLERR 225419100N/* */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus  }#endif#pragma __standard #endif /* __MMEMSGDEF_LOADED */ ww /********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************/ "/*** MODULE $MMIDEF IDENT X-1 ***/#ifndef __MMIDEF_LOADED#define __MMIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #define MMI$_FACILITY 1#define MMI$_MBUNIT 2#define MMI$_PID 3#define MMI$_MBXUCB 4#define MMI$_UNLOAD 5#define MMI$_ALLOC 6#define MMI$_BACKUP_END 7#define MMI$_BACKUP_FILE 8#define MMI$_BACKUP_START 9#define MMI$_CLOSE_READ 10#define MMI$_CLOSE_WRITE 11##define MMI$_CONTINUATION_VOLUME 12#define MMI$_DEALLOCATE 13#define MMI$_DEVICE_AVAIL 14#define MMI$_DEVICE_UNAVAIL 15#define MMI$_DISMOUNT 16#define MMI$_DISPLAY_MESSAGE 17#define MMI$_EOV_READ 18#define MMI$_EOV_WRITE 19#define MMI$_INITIALIZE 20#define MMI$_MOUNT 21#define MMI$_MOUNT_REQUEST 22#define MMI$_NEWVOL_REQUEST 23#define MMI$_NOTIFY_DEVICE 24#define MMI$_OPCOM_ACP 25#define MMI$_OPCOM_MOUNT 26#define MMI$_OPEN_READ 27#define MMI$_OPEN_WRITE 28#define MMI$_VOLUME_ONLINE 29#define MMI$_WRITE_REQUEST 30#define MMI$_MOUNT_END 31#define MMI$_INIT_END 32#define MMI$_NEWVOL_END 33 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MMIDEF_LOADED */ ww+/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//***************** ***************************************************************************************************************//*** MODULE $MNTDEF ***/#ifndef __MNTDEF_LOADED#define __MNTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __un ion variant_union#endif#endif N/*+ */N/* */N/* FLAG BITS FOR THE $MOUNT SYSTEM SERVICE. */N/* */N/*- */#define MNT$M_FOREIGN 0x1#define MNT$M_GROUP 0x2#define MNT$M_NOASSIST 0x4#define MNT$M_NODISKQ 0x8#define MNT$M_NOHDR3 0x10#define MNT$M_NOLABEL 0x20#define MNT$M_NOWRITE 0x40#define MNT$M_OVR_ACCESS 0x80#define MNT$M_OVR_EXP 0x100#define MNT$M_OVR_IDENT 0x200#define MNT$M_OVR_SETID 0x400#define MNT$M_READCHECK 0x800#define MNT$M_SHARE 0x1000#define MNT$M_MESSAGE 0x2000#define MNT$M_SYSTEM 0x4000#define MNT$M_WRITECHECK 0x8000#define MNT$M_WRITETHRU 0x10000#define MNT$M_NOCACHE 0x20000#define MNT$M_OVR_LOCK 0x40000#define MNT$M_NOMNTVER 0x80000#define MNT$M_NOUNLOAD 0x100000&#define MNT$M_TAPE_DATA_WRITE 0x200000#define MNT$M_NOCOPY 0x400000#define MNT$M_NOAUTO 0x800000 #define MNT$M_INIT_ALL 0x1000000!#define MNT$M_INIT_CONT 0x2000000 #define MNT$M_OVR_VOLO 0x4000000 #define MNT$M_INTERCHG 0x8000000 #define MNT$M_CLUSTER 0x10000000"#define MNT$M_NOREBUILD 0x20000000##define MNT$M_OVR_SHAMEM 0x40000000"#define MNT$M_MULTI_VOL 0x80000000#define MNT2$M_DISKQ 0x1#define MNT2$M_COMPACTION 0x2#define MNT2$M_INCLUDE 0x4#define MNT2$M_PASS2 0x8#define MNT2$M_OVR_NOFE 0x10#define MNT2$M_SCRATCH 0x20#define MNT2$M_CDROM 0x40#define MNT2$M_XAR 0x80#define MNT2$M_DSI 0x100#define MNT2$M_SUBSYSTEM 0x200!#define MNT2$M_NOCOMPACTION 0x400!#define MNT2$M_OVR_SECURITY 0x800(#define MNT2$M_OVR_LIMITED_SEARCH 0x1000#define MNT2$M_POOL 0x2000 #define MNT2$M_WLG_ENABLE 0x4000!#define MNT2$M_WLG_DISABLE 0x8000&#define MNT2$M_REQUIRE_MEMBERS 0x10000##define MNT2$M_VERIFY_LA BEL 0x20000!#define MNT2$M_FULL_MERGE 0x40000"#define MNT2$M_WRITE_FIRST 0x80000#define MNT2$M_DCD 0x100000#define MNT2$M_NODCD 0x200000"#define MNT2$M_LOCAL_HOST 0x400000#define MNT2$M_FACTOR 0x800000!#define MNT2$M_PRIORITY 0x1000000N#define MNT$_DEVNAM 1 /* DEVICE NAME */N#define MNT$_VOLNAM 2 /* VOLUME NAME */N#define MNT$_LOGNAM 3 /* LOGICAL NAME */N#define MNT$_FLAGS 4 /* MOUNT FLAGS */N#define MNT$_ACCESSED 5 /* ACCESSED VALUE */N#define MNT$_PROCESSOR 6 /* PROCESSOR NAME */N#define MNT$_VOLSET 7 /* VOLUME SET NAME */N#define MNT$_BLOCKSIZE 8 /* BLOCKSIZE VALUE */N#define MNT$_DENSITY 9 /* TAPE DENSITY VALUE */N#define MNT$_EXTENT 10 /* NUMBER OF EXTENT CACHE ENTRIES */N#define MNT$_FILEID 11 /* FILE ID CACHE SIZE */N#define MNT$_LIMIT 12 /* EXTENT CACHE LIMIT */N#define MNT$_OWNER 13 /* VOLUME OWNER UIC */N#define MNT$_VPROT 14 /* VOLUME PROTECTION */N#define MNT$_QUOTA 15 /* QUOTA CACHE SIZE */N#define MNT$_RECORDSIZ 16 /* RECORD SIZE VALUE  */N#define MNT$_WINDOW 17 /* NUMBER OF WINDOWS */N#define MNT$_EXTENSION 18 /* DEFAULT FILE EXTENSION */N#define MNT$_VISUAL_ID 19 /* VISUAL IDENTIFICATION */N#define MNT$_COMMENT 20 /* USER COMMENT */N#define MNT$_CLASS 21 /* SECURITY CLASSFICATION */h#define MNT$_UNUSED2 22 /* SPARE (was used for now obsolete journaling-related items) */N#define MNT$_ACCPTNAM 23 /* ACCESS POINT NAME (DECdfs) */N#define MNT$_SHACOPY_BUF 24 /* SHADOW COPY BUFFER */N#define MNT$_SHANAM 25 /* SHADOW SET VIRTUAL UNIT NAME */N#define MNT$_SHAMEM 26 /* SHADOW SET MEMBER UNIT NAME */V#define MNT$_SHAMEM_MGCOPY 27 /* SHADOW SET MEMBER UNIT NAME (MERGE COPY) */U#define MNT$_SHAMEM_COPY 28 /* SHADOW SET MEMBER UNIT NAME (FULL COPY) */N#define MNT$_PRFD_PATH 29 /* PREFERRED DSA PATH */N#define MNT$_ASSIGNMENT_UNIT 30 /* Assignment unit (MME) */N#define MNT$_CART_MEDIA_NAME 31 /* Cartridge Media Name (MME) */N#define MNT$_CARTRIDGE_NAME 32 /* Cartridge Name (MME) */N#define MNT$_CARTRIDGE_SIDE 33 /* Cartridge Side (MME) */N#define MNT$_COLLECTION 34 /* Collection name (MME) */N#define MNT$_DEVICE_TYPE 35 /* Device Selection criteria (MME) */N#define MNT$_DISPOSITION 36 /* Dismount Disposition (MME) */N#define MNT$_LOCATION 37 /* Cartridge Location (MME) */N#define MNT$_MEDIA_NAME 38 /* Media Name (MME) */N#define MNT$_UNUSED4 39 /* SPARE */N#define MNT$_UNDEFINED_FAT 40 /* Undefined File Attributes */N#define MNT$_UCS 41 /* Universal Character Set string */N#define MNT$_TAPE_EXPIRATION 42 /* Date Tape Expires (MME) */N#define MNT$_PRIORITY 43 /* SHDRIVER merge priority */V#define MNT$_FACTOR 44 /* SHDRIVER IO completion factor for merges */N#define MNT$_WBM_SIZE 45 /* MINICOPY size */N#define MNT$_DATA 46 /* Enable data (XFC) cache */J#define MNT$_NODATA 47 /* Disable data (XFC) cache */N/* */N/* Add new item codes before this line */N/* */N#define MNT$_LAST_ITEM_CODE 48 /* last item code plus 1 */N#define MNT$C_BASE_CARTRIDGE 1 /* Assign a whole cartridge */N#define MNT$C_COMPOUND_CARTRIDGE 2 /* Assign a magazine */R#define MNT$C_PR EASSIGNED_SIDE 3 /* Assign a pre-assigned cartridge side */N#define MNT$C_SIDE 4 /* Assign a single cartridge side */N#define MNT$C_KEEP 1 /* Keep the media assigned */N#define MNT$C_RELEASE 2 /* Release the media */ #ifdef __NEW_STARLETtypedef union _mntdef { __struct {N unsigned mnt$v_foreign : 1; /* FOREIGN OPTION SELECTED */N unsigned mnt$v_group : 1; /* GROUP OPTION SELECTED */N unsigned mnt$v_noassist : 1; /* NOASSIST OPTION SELECTED */N unsigned mnt$v_nodiskq : 1; /* NODISKQ OPTION SELECTED */N unsigned mnt$v_nohdr3 : 1; /* NOHDR3 OPTION SELECTED */N unsigned mnt$v_nolabel : 1; /* NOLABEL OPTION SELECTED */N unsigned mnt$v_nowrite : 1; /* NOWRITE OPTION SELECTED */T unsigned mnt$v_ovr_access : 1; /* OVERRIDE ACCESSIBLITY OPTION SELECTED */Q unsigned mnt$v_ovr_exp : 1; /* OVERRIDE EXPIRATON OPTION SELECTED */N unsigned mnt$v_ovr_ident : 1; /* OVERRIDE VOLUME LABEL */Y unsigned mnt$v_ovr_setid : 1; /* OVERRIDE VOLUME SET IDENT OPTION SELECTIED */N unsigned mnt$v_readcheck : 1; /* READCHECK OPTION SELECTED */N unsigned mnt$v_share : 1; /* SHARE OPTION SELECTED */N unsigned mnt$v_message : 1; /* ALLOW $MOUNT TO PRINT MESSAGES */N unsigned mnt$v_system : 1; /* SYSTEM OPTION SELECTED */N unsigned mnt$v_writecheck : 1; /* WRITECHECK OPTION SELECTED */N unsigned mnt$v_writethru : 1; /* WRITETHRU OPTION SELECTED */N unsigned mnt$v_nocache : 1; /* TURN OFF ALL CACHING */N unsigned mnt$v_ovr_lock : 1; /* OVERRIDE AUTOMATIC WRITE-LOCK */N unsigned mnt$v_nomntver : 1; /* DISABLE MOUNT VERIFICATION */O unsigned mnt$v_nounload : 1; /* DO NOT UNLOAD VOLUME AT DISMOUNT */Q unsigned mnt$v_tape_data_write : 1; /* ENABLE WRITE-BACK CACHE ON TAPE */P unsigned mnt$v_nocopy : 1; /* DO NOT ALLOW SHADOW COPY OPERATION */Y unsigned mnt$v_noauto : 1; /* DO NOT SET THE MTAACP INTO AVR AND AVL MODE */Z unsigned mnt$v_init_all : 1; /* INITIALIZE ALL VOLUMES IN SET BEFORE WRITING */\ unsigned mnt$v_init_cont : 1; /* INITIALIZE CONTINUATION VOLUMES BEFORE WRITING */S  unsigned mnt$v_ovr_volo : 1; /* OVERRIDE VOL1 VOLUME IDENTIFIER FIELD */c unsigned mnt$v_interchg : 1; /* VOL FOR INTERCHG NO VMS SPECIFIC INFO WRITTEN TO TAPE */P unsigned mnt$v_cluster : 1; /* CLUSTER-WIDE MOUNT OPTION SELECTED */N unsigned mnt$v_norebuild : 1; /* DO NOT REBUILD VOLUME */T unsigned mnt$v_ovr_shamem : 1; /* OVERRIDE SHADOW MEMBERSHIP RESTRICTION */N unsigned mnt$v_multi_vol : 1; /* MULTI_VOLUME TAPE SET  */N unsigned mnt$v_diskq : 1; /* QUOTA EXPLICITLY SELECTED */N unsigned mnt$v_compaction : 1; /* MAGTAPE DATA COMPACTION ON */P unsigned mnt$v_include : 1; /* INCLUDE PREVIOUS SHADOWSET MEMBERS */R unsigned mnt$v_pass2 : 1; /* PASS2 of /INCLUDE/CONFIRM PROCESSING */N unsigned mnt$v_ovr_nofe : 1; /* /OVERRIDE=NO_FORCED_ERROR */N unsigned mnt$v_scratch : 1; /* Scratch tape requested flag */U unsigned mnt$v_cdrom : 1; /* Force mounting of a Files-11 C/D Volume */N unsigned mnt$v_xar : 1; /* Enable protection based on XARs */b unsigned mnt$v_dsi : 1; /* Enable protection based on Digital System Id in XARs */N unsigned mnt$v_subsystem : 1; /* /SUBSYSTEM */N unsigned mnt$v_nocompaction : 1; /* MAGTAPE DATA COMPACTION OFF */N unsigned mnt$v_ovr_security : 1; /* /OVERRIDE=SECURITY */N unsigned mnt$v_ovr_limited_search : 1; /* /OVERRIDE=LIMITIED_SEARCH */V unsigned mnt$v_pool : 1; /* /POOL operation for snapshot pool member */N unsigned mnt$v_wlg_enable : 1; /* /POLICY=ENABLE_WLG */N unsigned mnt$v_wlg_disable : 1; /* /POLICY=DISABLE_WLG */N unsigned mnt$v_require_members : 1; /* /POLICY=REQUIRE_MEMBERS */N unsigned mnt$v_verify_label : 1; /* /VERIFY_LABEL */N unsigned mnt$v_full_merge : 1; /* /POLICY=MERGE */N unsigned mnt$v_write_first : 1; /* /POLCIY=WRITE_FIRST */N unsigned mnt$v_dcd : 1; /* /POLICY=DCD */N unsigned mnt$v_nodcd : 1; /* /POLICY=NODCD */N unsigned mnt$v_local_host : 1; /* /POLICY=LOCAL_HOST */N unsigned mnt$v_factor : 1; /* /POLICY=FACTOR */N unsigned mnt$v_priority : 1; /* /POLICY=PRIOR ITY */N unsigned mnt$v_minicopy_required : 1; /* /POLICY=MINICOPY=REQ */N unsigned mnt$v_minicopy_optional : 1; /* /POLICY=MINICOPY=OPT */N unsigned mnt$v_nominicopy : 1; /* /POLICY=NOMINICOPY */" unsigned mnt$v_fill_0 : 4; } mnt$r_mntdef_bits; __struct {N unsigned mnt2$v_diskq : 1; /* QUOTA EXPLICITLY SELECTED */N unsigned mnt2$v_compaction : 1; /* MAGTAPE DATA COMPACTION ON */P unsigned mnt2$v_include : 1; /* INCLUDE PREVIOUS SHADOWSET MEMBERS */R unsigned mnt2$v_pass2 : 1; /* PASS2 of /INCLUDE/CONFIRM PROCESSING */N unsigned mnt2$v_ovr_nofe : 1; /* /OVERRIDE=NO_FORCED_ERROR */N unsigned mnt2$v_scratch : 1; /* Scratch tape requested flag */U unsigned mnt2$v_cdrom : 1; /* Force mounting of a Files-11 C/D Volume */N unsigned mnt2$v_xar : 1; /* Enable protection based on XARs */b unsigned mnt2$v_dsi : 1; /* Enable protection based on Digital System Id in XARs */N unsigned mnt2$v_subsystem : 1; /* /SUBSYSTEM */N unsigned mnt2$v_nocompaction : 1; /* MAGTAPE DATA COMPACTION OFF */N unsigned mnt2$v_ovr_security : 1; /* /OVERRIDE=SECURITY */O unsigned mnt2$v_ovr_limited_search : 1; /* /OVERRIDE=LIMITIED_SEARCH */V unsigned mnt2$v_pool : 1; /* /POOL operation for snapshot pool member */N  unsigned mnt2$v_wlg_enable : 1; /* /POLICY=ENABLE_WLG */N unsigned mnt2$v_wlg_disable : 1; /* /POLICY=DISABLE_WLG */N unsigned mnt2$v_require_members : 1; /* /POLICY=REQUIRE_MEMBERS */N unsigned mnt2$v_verify_label : 1; /* /VERIFY_LABEL */N unsigned mnt2$v_full_merge : 1; /* /POLICY=MERGE */N unsigned mnt2$v_write_first : 1; /* /POLCIY=WRITE_FIRST */N unsigned mnt2$v_dcd : 1; /* /POLICY=DCD */N unsigned mnt2$v_nodcd : 1; /* /POLICY=NODCD */N unsigned mnt2$v_local_host : 1; /* /POLICY=LOCAL_HOST */N unsigned mnt2$v_factor : 1; /* /POLICY=FACTOR */N unsigned mnt2$v_priority : 1; /* /POLICY=PRIORITY */N unsigned mnt2$v_minicopy : 1; /* /POLICY=MINICOPY */N unsigned mnt2$v_minicopy_optional : 1; /* /POLICY= MINICOPY=OPT */N unsigned mnt2$v_nominicopy : 1; /* /POLICY=NOMINICOPY */# unsigned mnt2$v_fill_1 : 4; } mnt$r_mnt2def_bits;N/* */N/* Item codes for mount parameters. */N/* */N/* DEFINE CODES AS CONSTANTS */ } MNTDEF;  #if !defined(__VAXC)5#define mnt$v_foreign mnt$r_mntdef_bits.mnt$v_foreign1#define mnt$v_group mnt$r_mntdef_bits.mnt$v_group7#define mnt$v_noassist mnt$r_mntdef_bits.mnt$v_noassist5#define mnt$v_nodiskq mnt$r_mntdef_bits.mnt$v_nodiskq3#define mnt$v_nohdr3 mnt$r_mntdef_bits.mnt$v_nohdr35#define mnt$v_nolabel mnt$r_mntdef_bits.mnt$v_nolabel5#define mnt$v_nowrite mnt$r_mntdef_bits.mnt$v_nowrite;#define mnt$v_ovr_access mnt$r_mntdef_bits.mnt$v_ovr_access5#define mnt$v_ovr_exp mnt$r_ mntdef_bits.mnt$v_ovr_exp9#define mnt$v_ovr_ident mnt$r_mntdef_bits.mnt$v_ovr_ident9#define mnt$v_ovr_setid mnt$r_mntdef_bits.mnt$v_ovr_setid9#define mnt$v_readcheck mnt$r_mntdef_bits.mnt$v_readcheck1#define mnt$v_share mnt$r_mntdef_bits.mnt$v_share5#define mnt$v_message mnt$r_mntdef_bits.mnt$v_message3#define mnt$v_system mnt$r_mntdef_bits.mnt$v_system;#define mnt$v_writecheck mnt$r_mntdef_bits.mnt$v_writecheck9#define mnt$v_writethru mnt$r_mntdef_bits.mnt$v_writethru5#define mnt$v_ nocache mnt$r_mntdef_bits.mnt$v_nocache7#define mnt$v_ovr_lock mnt$r_mntdef_bits.mnt$v_ovr_lock7#define mnt$v_nomntver mnt$r_mntdef_bits.mnt$v_nomntver7#define mnt$v_nounload mnt$r_mntdef_bits.mnt$v_nounloadE#define mnt$v_tape_data_write mnt$r_mntdef_bits.mnt$v_tape_data_write3#define mnt$v_nocopy mnt$r_mntdef_bits.mnt$v_nocopy3#define mnt$v_noauto mnt$r_mntdef_bits.mnt$v_noauto7#define mnt$v_init_all mnt$r_mntdef_bits.mnt$v_init_all9#define mnt$v_init_cont mnt$r_mntdef_bits.mnt$v_init _cont7#define mnt$v_ovr_volo mnt$r_mntdef_bits.mnt$v_ovr_volo7#define mnt$v_interchg mnt$r_mntdef_bits.mnt$v_interchg5#define mnt$v_cluster mnt$r_mntdef_bits.mnt$v_cluster9#define mnt$v_norebuild mnt$r_mntdef_bits.mnt$v_norebuild;#define mnt$v_ovr_shamem mnt$r_mntdef_bits.mnt$v_ovr_shamem9#define mnt$v_multi_vol mnt$r_mntdef_bits.mnt$v_multi_vol1#define mnt$v_diskq mnt$r_mntdef_bits.mnt$v_diskq;#define mnt$v_compaction mnt$r_mntdef_bits.mnt$v_compaction5#define mnt$v_include mnt$r_mn tdef_bits.mnt$v_include1#define mnt$v_pass2 mnt$r_mntdef_bits.mnt$v_pass27#define mnt$v_ovr_nofe mnt$r_mntdef_bits.mnt$v_ovr_nofe5#define mnt$v_scratch mnt$r_mntdef_bits.mnt$v_scratch1#define mnt$v_cdrom mnt$r_mntdef_bits.mnt$v_cdrom-#define mnt$v_xar mnt$r_mntdef_bits.mnt$v_xar-#define mnt$v_dsi mnt$r_mntdef_bits.mnt$v_dsi9#define mnt$v_subsystem mnt$r_mntdef_bits.mnt$v_subsystem?#define mnt$v_nocompaction mnt$r_mntdef_bits.mnt$v_nocompaction?#define mnt$v_ovr_security mnt$r_mntdef_ bits.mnt$v_ovr_securityK#define mnt$v_ovr_limited_search mnt$r_mntdef_bits.mnt$v_ovr_limited_search/#define mnt$v_pool mnt$r_mntdef_bits.mnt$v_pool;#define mnt$v_wlg_enable mnt$r_mntdef_bits.mnt$v_wlg_enable=#define mnt$v_wlg_disable mnt$r_mntdef_bits.mnt$v_wlg_disableE#define mnt$v_require_members mnt$r_mntdef_bits.mnt$v_require_members?#define mnt$v_verify_label mnt$r_mntdef_bits.mnt$v_verify_label;#define mnt$v_full_merge mnt$r_mntdef_bits.mnt$v_full_merge=#define mnt$v_write_first mnt$r_mntdef_bits.mnt$v_write_first-#define mnt$v_dcd mnt$r_mntdef_bits.mnt$v_dcd1#define mnt$v_nodcd mnt$r_mntdef_bits.mnt$v_nodcd;#define mnt$v_local_host mnt$r_mntdef_bits.mnt$v_local_host3#define mnt$v_factor mnt$r_mntdef_bits.mnt$v_factor7#define mnt$v_priority mnt$r_mntdef_bits.mnt$v_priorityI#define mnt$v_minicopy_required mnt$r_mntdef_bits.mnt$v_minicopy_requiredI#define mnt$v_minicopy_optional mnt$r_mntdef_bits.mnt$v_minicopy_optional;#define mnt$v_nominicopy mnt$r_mntdef_bits .mnt$v_nominicopy4#define mnt2$v_diskq mnt$r_mnt2def_bits.mnt2$v_diskq>#define mnt2$v_compaction mnt$r_mnt2def_bits.mnt2$v_compaction8#define mnt2$v_include mnt$r_mnt2def_bits.mnt2$v_include4#define mnt2$v_pass2 mnt$r_mnt2def_bits.mnt2$v_pass2:#define mnt2$v_ovr_nofe mnt$r_mnt2def_bits.mnt2$v_ovr_nofe8#define mnt2$v_scratch mnt$r_mnt2def_bits.mnt2$v_scratch4#define mnt2$v_cdrom mnt$r_mnt2def_bits.mnt2$v_cdrom0#define mnt2$v_xar mnt$r_mnt2def_bits.mnt2$v_xar0#define mnt2$v_dsi mnt$r_mnt2def_b its.mnt2$v_dsi<#define mnt2$v_subsystem mnt$r_mnt2def_bits.mnt2$v_subsystemB#define mnt2$v_nocompaction mnt$r_mnt2def_bits.mnt2$v_nocompactionB#define mnt2$v_ovr_security mnt$r_mnt2def_bits.mnt2$v_ovr_securityN#define mnt2$v_ovr_limited_search mnt$r_mnt2def_bits.mnt2$v_ovr_limited_search2#define mnt2$v_pool mnt$r_mnt2def_bits.mnt2$v_pool>#define mnt2$v_wlg_enable mnt$r_mnt2def_bits.mnt2$v_wlg_enable@#define mnt2$v_wlg_disable mnt$r_mnt2def_bits.mnt2$v_wlg_disableH#define mnt2$v_require_members  mnt$r_mnt2def_bits.mnt2$v_require_membersB#define mnt2$v_verify_label mnt$r_mnt2def_bits.mnt2$v_verify_label>#define mnt2$v_full_merge mnt$r_mnt2def_bits.mnt2$v_full_merge@#define mnt2$v_write_first mnt$r_mnt2def_bits.mnt2$v_write_first0#define mnt2$v_dcd mnt$r_mnt2def_bits.mnt2$v_dcd4#define mnt2$v_nodcd mnt$r_mnt2def_bits.mnt2$v_nodcd>#define mnt2$v_local_host mnt$r_mnt2def_bits.mnt2$v_local_host6#define mnt2$v_factor mnt$r_mnt2def_bits.mnt2$v_factor:#define mnt2$v_priority mnt$r_mnt2def_bi ts.mnt2$v_priority:#define mnt2$v_minicopy mnt$r_mnt2def_bits.mnt2$v_minicopyL#define mnt2$v_minicopy_optional mnt$r_mnt2def_bits.mnt2$v_minicopy_optional>#define mnt2$v_nominicopy mnt$r_mnt2def_bits.mnt2$v_nominicopy"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union mntdef { __struct {N unsigned mnt$v_foreign : 1; /* FOREIGN OPTION SELECTED */N unsigned mnt$v_group : 1; /* GROUP OPTION SELECTED */N unsigned mnt$v_noassist : 1; /* NOASSIST OPTION SELECTED */N unsigned mnt$v_nodiskq : 1; /* NODISKQ OPTION SELECTED */N unsigned mnt$v_nohdr3 : 1; /* NOHDR3 OPTION SELECTED */N unsigned mnt$v_nolabel : 1; /* NOLABEL OPTION SELECTED */N unsigned mnt$v_nowrite : 1; /* NOWRITE OPTION SELECTED */T unsigned mnt$v_ovr_access : 1; /* OVERRIDE ACCESSIBLITY OPTION SELECTED */Q unsigned mnt$v_ovr_exp : 1;  /* OVERRIDE EXPIRATON OPTION SELECTED */N unsigned mnt$v_ovr_ident : 1; /* OVERRIDE VOLUME LABEL */Y unsigned mnt$v_ovr_setid : 1; /* OVERRIDE VOLUME SET IDENT OPTION SELECTIED */N unsigned mnt$v_readcheck : 1; /* READCHECK OPTION SELECTED */N unsigned mnt$v_share : 1; /* SHARE OPTION SELECTED */N unsigned mnt$v_message : 1; /* ALLOW $MOUNT TO PRINT MESSAGES */N unsigned mnt$v_system : 1; /* SYSTEM OPTION SELECTED */N unsigned mnt$v_writecheck : 1; /* WRITECHECK OPTION SELECTED */N unsigned mnt$v_writethru : 1; /* WRITETHRU OPTION SELECTED */N unsigned mnt$v_nocache : 1; /* TURN OFF ALL CACHING */N unsigned mnt$v_ovr_lock : 1; /* OVERRIDE AUTOMATIC WRITE-LOCK */N unsigned mnt$v_nomntver : 1; /* DISABLE MOUNT VERIFICATION */O unsigned mnt$v_nounload : 1; /* DO NOT UNLOAD VOLUME AT DISMOUNT */Q unsigned mnt$v_tape_data_write : 1; /* ENABLE WRITE-BACK CACHE ON TAPE */P unsigned mnt$v_nocopy : 1; /* DO NOT ALLOW SHADOW COPY OPERATION */Y unsigned mnt$v_noauto : 1; /* DO NOT SET THE MTAACP INTO AVR AND AVL MODE */Z unsigned mnt$v_init_all : 1; /* INITIALIZE ALL VOLUMES IN SET BEFORE WRITING */\ unsigned mnt$v_init_cont : 1; /* INITIALIZE CONTINUATION VOLUMES BEFORE WRITING */S unsigned mnt$v_ovr_volo : 1; /* OVERRIDE VOL1 VOLUME IDENTIFIER FIELD */c unsigned mnt$v_interchg : 1; /* VOL FOR INTERCHG NO VMS SPECIFIC INFO WRITTEN TO TAPE */P unsigned mnt$v_cluster : 1; /* CLUSTER-WIDE MOUNT OPTION SELECTED */N unsigned mnt$v_norebuild : 1; /* DO NOT REBUILD VOLUME */T unsigned mnt$v_ovr_shamem : 1; /* OVERRIDE SHADOW MEMBERSHIP RESTRICTION */N unsigned mnt$v_multi_vol : 1; /* MULTI_VOLUME TAPE SET */N unsigned mnt$v_diskq : 1; /* QUOTA EXPLICITLY SELECTED */N unsigned mnt$v_compaction : 1; /* MAGTAPE DATA COMPACTION ON */P unsigned mnt$v_include : 1; /* INCLUDE PREVIOUS SHADOWSET MEMBERS */R unsigned mnt$v_pass2 : 1; /* PASS2 of /INCLUDE/CONFIRM PROCESSING */N unsigned mnt$v_ovr_nofe : 1; /* /OVERRIDE=NO_FORCED_ERROR */N unsigned mnt$v_scratch : 1; /* Scratch tape requested flag */U unsigned mnt$v_cdrom : 1; /* Force mounting of a Files-11 C/D Volume */N unsigned mnt$v_xar : 1; /* Enable protection based on XARs */b unsigned mnt$v_dsi : 1; /* Enable protection based on Digital System Id in XARs */N unsigned mnt$v_subsystem : 1; /* /SUBSYSTEM */N unsigned mnt$v_nocompaction : 1; /* MAGTAPE DATA COMPACTION OFF */N unsigned mnt$v_ovr_security : 1; /* /OVERRIDE=SECURITY */N unsigned mnt$v_ovr_limited_search : 1; /* /OVERRIDE=LIMITIED_SEARCH */V unsigned mnt$v_pool : 1; /* /POOL operation for snapshot pool member */N unsigned mnt$v_wlg_enable : 1; /* /POLICY=ENABLE_WLG */N unsigned mnt$v_wlg_disable : 1; /* /POLICY=DISABLE_WLG */N unsigned mnt$v_require_members : 1; /* /POLICY=REQUIRE_MEMBERS */N unsigned mnt$v_verify_label : 1; /* /VERIFY_LABEL */N unsigned mnt$v_full_merge : 1; /* /POLICY=MERGE */N unsigned mnt$v_write_first : 1; /* /POLCIY=WRITE_FIRST */N unsigned mnt$v_dcd : 1; /* /POLICY=DCD */N unsigned mnt$v_nodcd : 1; /* /POLICY=NODCD */N unsigned mnt$v_local_host : 1; /* /POLICY=LOCAL_HOST */N unsigned mnt$v_factor : 1; /* /POLICY=FACTOR */N unsigned mnt$v_priority : 1; /* /POLICY=PRIORITY */N unsigned mnt$v_min icopy_required : 1; /* /POLICY=MINICOPY=REQ */N unsigned mnt$v_minicopy_optional : 1; /* /POLICY=MINICOPY=OPT */N unsigned mnt$v_nominicopy : 1; /* /POLICY=NOMINICOPY */" unsigned mnt$v_fill_0 : 4; } mnt$r_mntdef_bits; __struct {N unsigned mnt2$v_diskq : 1; /* QUOTA EXPLICITLY SELECTED */N unsigned mnt2$v_compaction : 1; /* MAGTAPE DATA COMPACTION ON */P unsigned mnt2$v_include : 1; /* INCLUDE PREVIOUS SHADOWSET MEMBERS */R unsigned mnt2$v_pass2 : 1; /* PASS2 of /INCLUDE/CONFIRM PROCESSING */N unsigned mnt2$v_ovr_nofe : 1; /* /OVERRIDE=NO_FORCED_ERROR */N unsigned mnt2$v_scratch : 1; /* Scratch tape requested flag */U unsigned mnt2$v_cdrom : 1; /* Force mounting of a Files-11 C/D Volume */N unsigned mnt2$v_xar : 1; /* Enable protection based on XARs */b unsigned mnt2$v_dsi : 1; /* Enable protection based on Digital System Id in XARs */N unsigned mnt2$v_subsystem : 1; /* /SUBSYSTEM */N unsigned mnt2$v_nocompaction : 1; /* MAGTAPE DATA COMPACTION OFF */N unsigned mnt2$v_ovr_security : 1; /* /OVERRIDE=SECURITY */O unsigned mnt2$v_ovr_limited_search : 1; /* /OVERRIDE=LIMITIED_SEARCH */V unsigned mnt2$v_pool : 1; /* /POOL operation for snapshot pool member */N unsigned mnt2$v_wlg_enable : 1; /* /POLICY=ENABLE_WLG */N unsigned mnt2$v_wlg_disable : 1; /* /POLICY=DISABLE_WLG */N unsigned mnt2$v_require_members : 1; /* /POLICY=REQUIRE_MEMBERS */N unsigned mnt2$v_verify_label : 1; /* /VERIFY_LABEL */N unsigned mnt2$v_full_merge : 1; /* /POLICY=MERGE */N unsigned mnt2$v_write_first : 1; /* /POLCIY=WRITE_FIRST */N unsigned mnt2$v_dcd : 1; /* /POLICY=DCD */N  unsigned mnt2$v_nodcd : 1; /* /POLICY=NODCD */N unsigned mnt2$v_local_host : 1; /* /POLICY=LOCAL_HOST */N unsigned mnt2$v_factor : 1; /* /POLICY=FACTOR */N unsigned mnt2$v_priority : 1; /* /POLICY=PRIORITY */N unsigned mnt2$v_minicopy : 1; /* /POLICY=MINICOPY */N unsigned mnt2$v_minicopy_optional : 1; /* /POLICY=MINICOPY=OPT */N unsigned mnt2$v_nomi nicopy : 1; /* /POLICY=NOMINICOPY */# unsigned mnt2$v_fill_1 : 4; } mnt$r_mnt2def_bits;N/* */N/* Item codes for mount parameters. */N/* */N/* DEFINE CODES AS CONSTANTS */ } ; #if !defined(__VAXC)5#define mnt$v_foreign mnt$r_ mntdef_bits.mnt$v_foreign1#define mnt$v_group mnt$r_mntdef_bits.mnt$v_group7#define mnt$v_noassist mnt$r_mntdef_bits.mnt$v_noassist5#define mnt$v_nodiskq mnt$r_mntdef_bits.mnt$v_nodiskq3#define mnt$v_nohdr3 mnt$r_mntdef_bits.mnt$v_nohdr35#define mnt$v_nolabel mnt$r_mntdef_bits.mnt$v_nolabel5#define mnt$v_nowrite mnt$r_mntdef_bits.mnt$v_nowrite;#define mnt$v_ovr_access mnt$r_mntdef_bits.mnt$v_ovr_access5#define mnt$v_ovr_exp mnt$r_mntdef_bits.mnt$v_ovr_exp9#define mnt$v_ovr_ident mnt$ r_mntdef_bits.mnt$v_ovr_ident9#define mnt$v_ovr_setid mnt$r_mntdef_bits.mnt$v_ovr_setid9#define mnt$v_readcheck mnt$r_mntdef_bits.mnt$v_readcheck1#define mnt$v_share mnt$r_mntdef_bits.mnt$v_share5#define mnt$v_message mnt$r_mntdef_bits.mnt$v_message3#define mnt$v_system mnt$r_mntdef_bits.mnt$v_system;#define mnt$v_writecheck mnt$r_mntdef_bits.mnt$v_writecheck9#define mnt$v_writethru mnt$r_mntdef_bits.mnt$v_writethru5#define mnt$v_nocache mnt$r_mntdef_bits.mnt$v_nocache7#define mnt$v_ ovr_lock mnt$r_mntdef_bits.mnt$v_ovr_lock7#define mnt$v_nomntver mnt$r_mntdef_bits.mnt$v_nomntver7#define mnt$v_nounload mnt$r_mntdef_bits.mnt$v_nounloadE#define mnt$v_tape_data_write mnt$r_mntdef_bits.mnt$v_tape_data_write3#define mnt$v_nocopy mnt$r_mntdef_bits.mnt$v_nocopy3#define mnt$v_noauto mnt$r_mntdef_bits.mnt$v_noauto7#define mnt$v_init_all mnt$r_mntdef_bits.mnt$v_init_all9#define mnt$v_init_cont mnt$r_mntdef_bits.mnt$v_init_cont7#define mnt$v_ovr_volo mnt$r_mntdef_bits.mnt$v_o vr_volo7#define mnt$v_interchg mnt$r_mntdef_bits.mnt$v_interchg5#define mnt$v_cluster mnt$r_mntdef_bits.mnt$v_cluster9#define mnt$v_norebuild mnt$r_mntdef_bits.mnt$v_norebuild;#define mnt$v_ovr_shamem mnt$r_mntdef_bits.mnt$v_ovr_shamem9#define mnt$v_multi_vol mnt$r_mntdef_bits.mnt$v_multi_vol1#define mnt$v_diskq mnt$r_mntdef_bits.mnt$v_diskq;#define mnt$v_compaction mnt$r_mntdef_bits.mnt$v_compaction5#define mnt$v_include mnt$r_mntdef_bits.mnt$v_include1#define mnt$v_pass2 mnt$r_mntd ef_bits.mnt$v_pass27#define mnt$v_ovr_nofe mnt$r_mntdef_bits.mnt$v_ovr_nofe5#define mnt$v_scratch mnt$r_mntdef_bits.mnt$v_scratch1#define mnt$v_cdrom mnt$r_mntdef_bits.mnt$v_cdrom-#define mnt$v_xar mnt$r_mntdef_bits.mnt$v_xar-#define mnt$v_dsi mnt$r_mntdef_bits.mnt$v_dsi9#define mnt$v_subsystem mnt$r_mntdef_bits.mnt$v_subsystem?#define mnt$v_nocompaction mnt$r_mntdef_bits.mnt$v_nocompaction?#define mnt$v_ovr_security mnt$r_mntdef_bits.mnt$v_ovr_securityK#define mnt$v_ovr_limited_sear ch mnt$r_mntdef_bits.mnt$v_ovr_limited_search/#define mnt$v_pool mnt$r_mntdef_bits.mnt$v_pool;#define mnt$v_wlg_enable mnt$r_mntdef_bits.mnt$v_wlg_enable=#define mnt$v_wlg_disable mnt$r_mntdef_bits.mnt$v_wlg_disableE#define mnt$v_require_members mnt$r_mntdef_bits.mnt$v_require_members?#define mnt$v_verify_label mnt$r_mntdef_bits.mnt$v_verify_label;#define mnt$v_full_merge mnt$r_mntdef_bits.mnt$v_full_merge=#define mnt$v_write_first mnt$r_mntdef_bits.mnt$v_write_first-#define mnt$v_dcd mnt$r_mntdef_bits.mnt$v_dcd1#define mnt$v_nodcd mnt$r_mntdef_bits.mnt$v_nodcd;#define mnt$v_local_host mnt$r_mntdef_bits.mnt$v_local_host3#define mnt$v_factor mnt$r_mntdef_bits.mnt$v_factor7#define mnt$v_priority mnt$r_mntdef_bits.mnt$v_priorityI#define mnt$v_minicopy_required mnt$r_mntdef_bits.mnt$v_minicopy_requiredI#define mnt$v_minicopy_optional mnt$r_mntdef_bits.mnt$v_minicopy_optional;#define mnt$v_nominicopy mnt$r_mntdef_bits.mnt$v_nominicopy4#define mnt2$v_diskq mnt$r_mnt2def_b its.mnt2$v_diskq>#define mnt2$v_compaction mnt$r_mnt2def_bits.mnt2$v_compaction8#define mnt2$v_include mnt$r_mnt2def_bits.mnt2$v_include4#define mnt2$v_pass2 mnt$r_mnt2def_bits.mnt2$v_pass2:#define mnt2$v_ovr_nofe mnt$r_mnt2def_bits.mnt2$v_ovr_nofe8#define mnt2$v_scratch mnt$r_mnt2def_bits.mnt2$v_scratch4#define mnt2$v_cdrom mnt$r_mnt2def_bits.mnt2$v_cdrom0#define mnt2$v_xar mnt$r_mnt2def_bits.mnt2$v_xar0#define mnt2$v_dsi mnt$r_mnt2def_bits.mnt2$v_dsi<#define mnt2$v_subsystem mnt$r_mnt2def_b its.mnt2$v_subsystemB#define mnt2$v_nocompaction mnt$r_mnt2def_bits.mnt2$v_nocompactionB#define mnt2$v_ovr_security mnt$r_mnt2def_bits.mnt2$v_ovr_securityN#define mnt2$v_ovr_limited_search mnt$r_mnt2def_bits.mnt2$v_ovr_limited_search2#define mnt2$v_pool mnt$r_mnt2def_bits.mnt2$v_pool>#define mnt2$v_wlg_enable mnt$r_mnt2def_bits.mnt2$v_wlg_enable@#define mnt2$v_wlg_disable mnt$r_mnt2def_bits.mnt2$v_wlg_disableH#define mnt2$v_require_members mnt$r_mnt2def_bits.mnt2$v_require_membersB#define mnt2 $v_verify_label mnt$r_mnt2def_bits.mnt2$v_verify_label>#define mnt2$v_full_merge mnt$r_mnt2def_bits.mnt2$v_full_merge@#define mnt2$v_write_first mnt$r_mnt2def_bits.mnt2$v_write_first0#define mnt2$v_dcd mnt$r_mnt2def_bits.mnt2$v_dcd4#define mnt2$v_nodcd mnt$r_mnt2def_bits.mnt2$v_nodcd>#define mnt2$v_local_host mnt$r_mnt2def_bits.mnt2$v_local_host6#define mnt2$v_factor mnt$r_mnt2def_bits.mnt2$v_factor:#define mnt2$v_priority mnt$r_mnt2def_bits.mnt2$v_priority:#define mnt2$v_minicopy mnt$r_mnt2de f_bits.mnt2$v_minicopyL#define mnt2$v_minicopy_optional mnt$r_mnt2def_bits.mnt2$v_minicopy_optional>#define mnt2$v_nominicopy mnt$r_mnt2def_bits.mnt2$v_nominicopy"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #define MNT$S_MNTDEF 49#define MNT$V_FOREIGN 0 /* Foreign option selected */5#define MNT$V_GROUP 1 /* Group option selected */:#define MNT$V_NOASSIST 2 /* Noassist option selected */9#define MNT$V_NODISKQ 3 /* Nodiskq option selected * /7#define MNT$V_NOHDR3 4 /* Nohdr3 option selected */9#define MNT$V_NOLABEL 5 /* Nolabel option selected */9#define MNT$V_NOWRITE 6 /* Nowrite option selected */I#define MNT$V_OVR_ACCESS 7 /* Override accessiblity option selected */D#define MNT$V_OVR_EXP 8 /* Override expiraton option selected */8#define MNT$V_OVR_IDENT 9 /* Override volume label */N#define MNT$V_OVR_SETID 10 /* Override volume set ident option selectied */=#define MNT$V_READCHECK 11 /* Readche ck option selected */6#define MNT$V_SHARE 12 /* Share option selected */@#define MNT$V_MESSAGE 13 /* Allow $mount to print messages */8#define MNT$V_SYSTEM 14 /* System option selected */?#define MNT$V_WRITECHECK 15 /* Writecheck option selected */=#define MNT$V_WRITETHRU 16 /* Writethru option selected */6#define MNT$V_NOCACHE 17 /* Turn off all caching */@#define MNT$V_OVR_LOCK 18 /* Override automatic write-lock */=#define MNT$V_NOMNTVER 19 /* Disable mount verification */C#define MNT$V_NOUNLOAD 20 /* Do not unload volume at dismount */H#define MNT$V_TAPE_DATA_WRITE 21 /* Enable write-back cache on tape */D#define MNT$V_NOCOPY 22 /* Do not allow shadow copy operation */M#define MNT$V_NOAUTO 23 /* Do not set the mtaacp into avr and avl mode */O#define MNT$V_INIT_ALL 24 /* Initialize all volumes in set before writing */R#define MNT$V_INIT_CONT 25 /* Initialize continuation volumes before writing */H#define MNT$V_OVR_VOLO 26 /* Override vol1 volume identifier field */X#define MNT$V_INTERCHG 27 /* Vol for interchg no vms specific info written to tape */D#define MNT$V_CLUSTER 28 /* Cluster-wide mount option selected */9#define MNT$V_NOREBUILD 29 /* Do not rebuild volume */K#define MNT$V_OVR_SHAMEM 30 /* Override shadow membership restriction */9#define MNT$V_MULTI_VOL 31 /* Multi_volume tape set */:#define MNT$V_DISKQ 32 /* Quota explicitly selected */?#define MNT$V_COMPACTION 33 /* Magtape data  compaction on */D#define MNT$V_INCLUDE 34 /* Include previous shadowset members */E#define MNT$V_PASS2 35 /* pass2 of /include/confirm processing */<#define MNT$V_OVR_NOFE 36 /* /override=no_forced_error */:#define MNT$V_SCRATCH 37 /* Scratch tape requested flagE#define MNT$V_CDROM 38 /* Force mounting of a Files-11 C/D Volume;#define MNT$V_XAR 39 /* Enable protection based on XARsP#define MNT$V_DSI 40 /* Enable protection based on Digital System Id in XARs+#defin e MNT$V_SUBSYSTEM 41 /* /SUBSYSTEM?#define MNT$V_NOCOMPACTION 42 /* MAGTAPE DATA COMPACTION OFF6#define MNT$V_OVR_SECURITY 43 /* /OVERRIDE=SECURITYB#define MNT$V_OVR_LIMITED_SEARCH 44 /* /OVERRIDE=LIMITIED_SEARCHE#define MNT$V_POOL 45 /* /POOL operation for snapshot pool member4#define MNT$V_WLG_ENABLE 46 /* /POLICY=ENABLE_WLG6#define MNT$V_WLG_DISABLE 47 /* /POLICY=DISABLE_WLG=#define MNT$V_REQUIRE_MEMBERS 48 /* /POLICY=REQUIRE_MEMBERS1#define MNT$V_VERIFY_LABEL 49  /* /VERIFY_LABEL/#define MNT$V_FULL_MERGE 50 /* /POLICY=MERGE6#define MNT$V_WRITE_FIRST 51 /* /POLCIY=WRITE_FIRST'#define MNT$V_DCD 52 /* /POLICY=DCD+#define MNT$V_NODCD 53 /* /POLICY=NODCD4#define MNT$V_LOCAL_HOST 54 /* /POLICY=LOCAL_HOST/#define MNT$V_FACTOR 55 /* /POLICY=FACTOR0#define MNT$V_PRIORITY 56 /* /POLICY=PRIORITY0#define MNT$V_MINICOPY 57 /* /POLICY=MINICOPY<#define MNT$V_MINICOPY_OPTIONAL 58 /* /POLICY=MINICOPY=OPT/*C * These are the bit fields which are present in the second longwordB * of the MOUNT flags. They are referenced as MNT2$M_xxx, and must4 * be used on the second longword of the MOUNT flags */#define MNT2$S_MNTDEF 4:#define MNT2$V_DISKQ 0 /* Quota explicitly selected */?#define MNT2$V_COMPACTION 1 /* Magtape data compaction on */D#define MNT2$V_INCLUDE 2 /* Include previous shadowset members */E#define MNT2$V_PASS2 3 /* Pass2 of /include/confirm processing */<#define MNT2$V_OVR_NOFE 4 /* /o verride=no_forced_error */:#define MNT$V_SCRATCH 5 /* Scratch tape requested flagD#define MNT$V_CDROM 6 /* Force mounting of a Files-11 C/D Volume:#define MNT$V_XAR 7 /* Enable protection based on XARsO#define MNT$V_DSI 8 /* Enable protection based on Digital System Id in XARs*#define MNT$V_SUBSYSTEM 9 /* /SUBSYSTEM?#define MNT$V_NOCOMPACTION 10 /* MAGTAPE DATA COMPACTION OFF6#define MNT$V_OVR_SECURITY 11 /* /OVERRIDE=SECURITYB#define MNT$V_OVR_LIMITED_SEARCH 12 /*  /OVERRIDE=LIMITIED_SEARCHE#define MNT$V_POOL 13 /* /POOL operation for snapshot pool member4#define MNT$V_WLG_ENABLE 14 /* /POLICY=ENABLE_WLG6#define MNT$V_WLG_DISABLE 15 /* /POLICY=DISABLE_WLG=#define MNT$V_REQUIRE_MEMBERS 16 /* /POLICY=REQUIRE_MEMBERS1#define MNT$V_VERIFY_LABEL 17 /* /VERIFY_LABEL/#define MNT$V_FULL_MERGE 18 /* /POLICY=MERGE6#define MNT$V_WRITE_FIRST 19 /* /POLCIY=WRITE_FIRST'#define MNT$V_DCD 20 /* /POLICY=DCD+#define MNT$V_NODCD 21 /* /P OLICY=NODCD4#define MNT$V_LOCAL_HOST 22 /* /POLICY=LOCAL_HOST/#define MNT$V_FACTOR 23 /* /POLICY=FACTOR0#define MNT$V_PRIORITY 24 /* /POLICY=PRIORITY0#define MNT$V_MINICOPY 25 /* /POLICY=MINICOPY<#define MNT$V_MINICOPY_OPTIONAL 26 /* /POLICY=MINICOPY=OPT/*O * Add new bit definitions here, and above in both MNTDEF_BITS and MNT2DEF_BITS */N/* */N/* Define format of the /UNDEFINED_FAT block  */N/* */ #ifdef __NEW_STARLETtypedef struct _undefined_fat {N unsigned short int unfat$w_mrs; /* FAT Maximum Record Size */N unsigned char unfat$b_rat; /* FAT Record Attributes */N unsigned char unfat$b_rfm; /* FAT Record Format */ } UNDEFINED_FAT;#else /* __OLD_STARLET */struct undefined_fat {N unsigned short int  unfat$w_mrs; /* FAT Maximum Record Size */N unsigned char unfat$b_rat; /* FAT Record Attributes */N unsigned char unfat$b_rfm; /* FAT Record Format */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifd ef __cplusplus }#endif#pragma __standard #endif /* __MNTDEF_LOADED */ ww/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */L/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]MOUNTMSG.SDI;1 *//********************************************************************************************************************* ***********//*** MODULE $MOUNDEF ***/#ifndef __MOUNDEF_LOADED#define __MOUNDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*  */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:38.66 */N/* */N/* */J/* VERSION: 'X-26' */N/* */N/************************************************************************** */N/**  * */N/** COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION, 1978 - 1999 * */N/** ALL RIGHTS RESERVED. * */N/** UNPUBLISHED RIGHTS RESERVED UNDER THE COPYRIGHT LAWS OF THE UNITED * */N/** STATES. * */N/** * */N/** THE SOFTWARE CONTAINED ON THIS MEDIA IS PROPRIETARY TO AND EMBODIES * */N/** THE CONFIDENTIAL TECHNOLOGY OF DIGITAL EQUIPMENT CORPORATION. * */N/** POSSESSION, USE, DUPLICATION OR DISSEMINATION OF THE SOFTWARE AND * */N/** MEDIA IS AUTHORIZED ONLY PURSUANT TO A VALID WRITTEN LICENSE FROM * */N/** DIGITAL EQUIPMENT CORPORATION. * */N/** * */N/** RESTRICTED RIGHTS LEGEND USE, DUPLICATION, OR DISCLOSURE BY THE U.S. * */N/** GOVERNMENT IS SUBJECT TO RESTRICTIONS AS SET FORTH IN SUBPARAGRAPH * */N/** (C)(1)(II) OF DFARS 252.227-7013, OR IN FAR 52.227-19, AS APPLICABLE. * */N/** * */N/************************************************************************** */N/*++ */N/* */N/* FACILITY: VAX/VMS SYSTEM MACRO LIBRARIES */N/* */N/* ABSTRACT: */N/* */I/* THIS FILE CONTAINS THE MDL SOURCE FOR THE MOUNT UTILITY MESSAGES. */N/* */N/* ENVIRONMENT:  */N/* */I/* MAINTAINERS TAKE NOTE! THIS MODULE IS COMMON SOURCE FOR VAX AND */I/* ALPHA. DO NOT CHANGE ONE WITHOUT TRACKING THE CHANGE IN THE OTHER. */N/* */N/*-- */N/*  */N/* */H/* AUTHOR: THE VMS GROUP CREATION DATE: 1-AUG-1976 */N/* */N/* MODIFIED BY: */N/* */=/* X-26 JJF0296 J. JEFFERY FRIEDRICHS 4-MAY-2004 */B/* ADD MESSAGES FOR BAD SCB  */N/* */7/* X-25 RAB087 ROBERT A. BROOKS 18-FEB-2004 */B/* (RESYNCH IDENT WITH WHAT VDE THINKS . . .) */B/* FOLD FROM V73-2R-HBMM . . . */N/* */H/* X-35 JJF0260 J. JEFFERY FRIEDRICHS 10-NOV-2003 */N/* ADD MBRTOOSMALL  */N/* */=/* X-35 JJF0279 J. JEFFERY FRIEDRICHS 12-FEB-2004 */B/* ADD SHDWREQALLOC FOR SHADOW SET MEMBERS */N/* */=/* X-34 JJF0213 J. JEFFERY FRIEDRICHS 7-FEB-2003 */B/* ADD NOCAPABILITY AND OPTCAPABILITY */N/*  */=/* X-33 JJF0178 J. JEFFERY FRIEDRICHS 20=FEB-2002 */B/* ADD BADWINDOWS */N/* */1/* X-32 MLH MARK HOPKINS 29-FEB-2000 */B/* ADD MESSAGE FOR ACP NOT FOUND ON VOLUME MOUNT (VAFS */B/* SUPPORT). */N/*  */=/* X-31 JJF0116 J. JEFFERY FRIEDRICHS 20-DEC-1999 */B/* ADD MESSAGES FOR MINICOPY */N/* */=/* X-30 JJF0095 J. JEFFERY FRIEDRICHS 24-FEB-1999 */B/* ADD WARNING MESSAGE FOR SIZE CONFLICT */N/* */=/* X-29 JJF0095 J. JEFFERY FRIEDRICHS 8-JAN-1999 */B/* ADD NEW MESSAGES OLDSHDRIVER, NOTALLMEM AND POLICY MESSAGES */N/* */D/* X-28 JJF-0076 J. JEFFERY FRIEDRICHS 12-SEP-1997 */B/* SEPARATE DEVBUSY ERROR MESSAGES OUT INTO UNIQUE MESSAGES */N/* */@/* X-27 KJP-SDOS KEVIN PLAYFORD 18-JUL-1997 */N/* ADD MESSAGE FOR SNAPSHOT POOL MEMBER. */N/*  */</* X-26 ACG0639 ANDREW C. GOLDSTEIN, 13-JUN-1997 14:44 */B/* ADD NEW MESSAGES FOR ODS-5 SUPPORT */N/* */N/* X-25 TGC0049 TOM CARR 19-JUN-1996 */N/* ADD AN INFORMATIONAL MESSAGE TO BE USED TO REPORT THAT */N/* A MEMBER IS ALREADY A MEMBER OF A SHADOW SE T */N/* */N/* X-24 TGC0048 TOM CARR 29-MAY-1996 */N/* ADD AN INFORMATIONAL MESSAGE TO BE USED TO REPORT THAT */N/* A MEMBER REQUIRES A COPY OPERATION AND CAN NOT BE A */N/* MASTER */N/* */</* X-2!3 ACG0618 ANDREW C. GOLDSTEIN, 8-APR-1996 11:17 */B/* RETURN FACILITY NAME TO MOUNT */N/* */I/* X-22 TGC0045 TOM CARR 29-MAR-1996 */N/* ADD NEW MESSAGES FROM SHADOW MOUNT REWRITE. */N/* */6/* X-21 JJF0017 J. JEFFERY FRIEDRICHS 11-OCT-1994 */B/* NUMERO"US MESSAGE CLEANUPS PER DOCUMENTATION FOLKS... */N/* */O/* X-20 JJF0014 J. JEFFERY FRIEDRICHS 17-MAY-1994 */B/* REMOVE BADSECSUG */N/* */O/* X-19 JJF0014 J. JEFFERY FRIEDRICHS 10-MAY-1994 */B/* CHANGE BADSECSYS AND BADSECSUG TO ERRORS # */N/* */O/* X-18 JJF0014 J. JEFFERY FRIEDRICHS 14-APR-1994 */B/* ADD BADSECSYS AND BADSECSUG */N/* */O/* X-17 JJF0007 J. JEFFERY FRIEDRICHS 22-MAR-1994 */B/* ADD DENIGNORED. */N/* $ */O/* X-16 JJF0011 J. JEFFERY FRIEDRICHS 14-MAR-1994 */P/* ADD REBUILD MESSAGES. ALSO ADD CRELNM_FAILED FOR A PENDING */B/* CHANGE. */N/* */8/* X-15 JJF0008 J. JEFFERY FRIEDRICHS 9-MAR-1994 */B/* REMOVE FAO AND CLARIFY MESSAGES INCONPROT AND INCONOWNER */N/* % */8/* X-14 JJF0005 J. JEFFERY FRIEDRICHS 1-FEB-1994 */B/* FIX TYPO IN MESSAGE BADUNDFAT */N/* */0/* X-13 AJK0003 ADAM J. KOJNOK 12-OCT-1993 */B/* ADDING NEW MESSAGE WAITDEVRDY FOR MOUNT. */N/* */0/* X-12 AJK0002 ADAM J. KOJNOK 12-OCT-199 &3 */B/* RETROFITTING MESSAGE VOLSETALRMNT FROM ALPHA VMS. */N/* */+/* X-4 ABELL53 ALLY BELL 25-JUNE-1993 */F/* ADDED FATAL MESSAGE VOLSETALRMNT FOR WHEN A VOLUME SET IS BEING */C/* MOUNTED WITH THE SAME NAME AS AN ALREADY MOUNTED VOLUME SET. */N/* */>/* X-10 AJK0010 MIKE STAMS/ADAM KOJNOK 01-SEP-1993 */B/* ADDING MESSAGE ('CBSNOTSUPTD). ALSO, CHANGING 'NEWER' IN */B/* MESSAGE INVSHDWMEM TO "newer". THIS WAS REQUESTED BY */B/* DOCUMENTATION SO THAT IT MATCHES THE HELP FILE. */N/* */5/* X-9 VBK VAIKOM B. KRISHNAN 14-NOV-1991 */B/* ADD A NEW ERROR MESSAGE TO BE OUTPUT WHEN A DISK IS */B/* TOO BIG TO BE PART OF A VOLUME SET. SUCH DISKS ARE */B/* LARGER THAN 8GB AND SO THEY REQUIRE AN ENTIRE (LONGWORD */B/* TO STORE LBNS WHICH LEAVES NO ROOM FOR RVN TO BE */B/* STORED IN THE MAP POINTER. */N/* */7/* X-8 JFD0034 JAMES F. DUNHAM 8-JAN-1991 */B/* IN SUPPORT OF FILES-11 C/D CONTROLLED VOLUME SETS, */B/* ADD ISO 9660 AND HIGH SIERRA VOLUME MOUNT MESSAGES */N/* */)</* X-21 RKK0057 ROBERT K. KOSAKOWSKI 19-FEB-1991 */B/* ADD NEW MESSAGES FOR MME OPCOM MESSAGES - SUPPORT OF */B/* SCRATCH VOLUME, MOUNT BY CARTRIDGE NAME. */B/* (FOR DAN KYLER) */N/* */</* X-20 RKK0049 ROBERT K. KOSAKOWSKI 26-DEC-1990 */B/* REPLACE WITH CORRECT VERSION OF FILE. (BUILDBUG, CHECKED */B/* IN WRONG VERSION) * */N/* */</* X-19 RKK0048 ROBERT K. KOSAKOWSKI 21-DEC-1990 */B/* ADDED DEVNOFE MESSAGE. */N/* */</* X-18 RKK0036 ROBERT K. KOSAKOWSKI 17-NOV-1990 */B/* ADDED INVQUAVAL MESSAGE. */N/* + */5/* X-17 PRD PAUL R. DESTEFANO 26-APR-1990 */B/* ADDED NOALOCLASS MESSAGE. */N/* */5/* X-16 PRD PAUL R. DESTEFANO 20-MAR-1990 */B/* ADDED NOTACLU MESSAGE. */N/* */9/* X-15 PRD0548 PAUL R. DESTEFANO 06-NOV-1989 */B/* ,ADDED BADMDFMT MESSAGE. */N/* */9/* X-14 PRD0526 PAUL R. DESTEFANO 07-OCT-1989 */B/* ADDED MESSAGES SHDWMEMERGE, AUTOMEMSUCC, AUTOMEMCOPY */B/* AND AUTOMEMERGE, */N/* */9/* X-13 PRD0462 PAUL R. DESTEFANO 16-OCT-1988 */B/* ADDED WAITINGMNT AND R-MTMNTSUCC MESSAGES. */N/* */9/* X-12 PRD0455 PAUL R. DESTEFANO 05-OCT-1988 */B/* ADDED MOUN$_MOUNT MESSAGE FOR IO$_DISPLAY CALL IN */B/* ASSIST. */N/* */9/* X-11 PRD0445 PAUL R. DESTEFANO 18-MAY-1988 */B/* ADD QUOTAFNF MESSAGE. . */N/* */9/* X-10 PRD0416 PAUL R. DESTEFANO 23-SEP-1987 */B/* ADD RMTMNTFAIL AND MNTCLUFAIL WARNING MESSAGES FOR */B/* CLUSTER-WIDE MOUNT STATUS. */N/* */3/* X-9 DAS DAVID A. SOLOMON 05-DEC-1986 */B/* MAKE OBSOLETE MESSAGE CJFERR UNUSED. */N/* / */0/* X-8 HH0130 HAI HUANG 04-DEC-1985 */B/* FOR CONSISTENCY, RENAME THIS MACRO TO $MOUNDEF. */N/* */0/* X-7 HH0116 HAI HUANG 03-OCT-1985 */B/* ADD SHDWINCVOL MESSAGE. */N/* */0/* X-6 HH0110 HAI HUANG 19-SEP-1985 0 */B/* CHANGE TEXT OF SHADOWFAIL MESSAGE. */N/* */1/* X-5 HH0110 HAI HUANG 19-SEP-1985 */B/* ADD SHADOWFAIL MESSAGE. */N/* */0/* X-4 HH0103 HAI HUANG 09-SEP-1985 */B/* ADD SHDWCOPYREQ MESSAGE. ALSO, RENAME SHAMEM TO */B/* SHDWMEM. 1 */N/* */0/* X-3 HH0092 HAI HUANG 20-AUG-1985 */B/* REMOVE OBSOLETE BADJRNL MESSAGE. */N/* */0/* X-2 HH0073 HAI HUANG 16-MAY-1985 */B/* ADD VOLUME SHADOWING MESSAGES. */N/* 2 */N/*** */N/*+ */N/* */N/* THE FOLLOWING ARE MESSAGES ISSUED BY THE MOUNT UTILITY. */N/* */N/*- */N/* 3 */N/* ***** FOLLOWING MESSAGES ARE SHARED WITH INIT */N/* */N/* WHEN ADDING A NEW MESSAGE IN THIS SECTION, USE THE FILL VALUES DX. */N/* */#define MOUNT$_FACILITY 114#define MOUN$_BADDATCHK 7503884#define MOUN$_BADDENS 7503892#define MOUN$_BADPRO 75039400#define MOUN$_BADUIC 7503908#define MOUN$_CONFQUAL 7503916#define MOUN$_ILLOPT 7503924#define MOUN$_NONLOCAL 7503932#define MOUN$_NOTRAN 7503940#define MOUN$_UNKDEV 7503948#define MOUN$_BADLABELQ 7503956#define MOUN$_VALCNVERR 7503964#define MOUN$_D3 7503972#define MOUN$_D4 7503980#define MOUN$_D5 7503988N/* */N/* ***** PRECEDING MESSAGES ARE SHARED WITH INIT */N/* 5 */#define MOUN$_LOGNAME 7503996#define MOUN$_MAXDEV 7504004#define MOUN$_MAXLAB 7504012#define MOUN$_NOACPDEV 7504020#define MOUN$_MOUVOL 7504028#define MOUN$_INCOMPACP 7504036#define MOUN$_INCOMPAT 7504044#define MOUN$_VOLALRMNT 7504052#define MOUN$_BADVOL1 7504060#define MOUN$_ILLDENS 7504068#define MOUN$_NOTGENDEV 7504076#define MOUN$_DUPDEVSPC 7504084#define MOUN$_ILLANSIBS 7504092#define MOUN$_ACCE6RR 7504100#define MOUN$_FILNOTEXP 7504108#define MOUN$_NOPRIV 7504116#define MOUN$_NOTANSI 7504124#define MOUN$_NOTLABEL 7504132#define MOUN$_NOTVOLSET 7504140#define MOUN$_NOTRELVOL 7504148#define MOUN$_OFFLINE 7504156#define MOUN$_IOERROR 7504164#define MOUN$_ILLQUAL 7504172#define MOUN$_WRITLCK 7504180#define MOUN$_RECGTRBL 7504188#define MOUN$_ACPNAME 7504196#define MOUN$_ACPTIME 7504204#define MOUN$_AQBTIME 7504212#define MOUN$_BADACP 7504220#define MOUN7$_BADEBC 7504228#define MOUN$_BADOVR 7504236#define MOUN$_DEVICES 7504244#define MOUN$_SZTOOBIG 7504252#define MOUN$_INCONSDEV 7504260#define MOUN$_DEVCOUNT 7504268#define MOUN$_VOLINSET 7504276#define MOUN$_RVN1NOTMT 7504284#define MOUN$_SETLIMIT 7504292#define MOUN$_DUPVOLNAM 7504300#define MOUN$_HOMBLKCHK 7504308#define MOUN$_DUPRVN 7504316#define MOUN$_BADCACHE 7504324#define MOUN$_UNRELVOL 7504332#define MOUN$_MBXCRERR 7504340#define MOUN$_MBXRDERR 7504348#def8ine MOUN$_REPLYERR 7504356#define MOUN$_OPRSNDERR 7504364#define MOUN$_OPRABORT 7504372 #define MOUN$_BATCHNOOPR 7504380#define MOUN$_MOUNEWVOL 7504388#define MOUN$_REMOUVOL 7504396#define MOUN$_OBSOLETE 7504404#define MOUN$_VOLOERR 7504412#define MOUN$_BADINIT 7504420#define MOUN$_DISMAL 7504428#define MOUN$_INCONSHR 7504436#define MOUN$_INCONPROT 7504444 #define MOUN$_INCONQUOTA 7504452 #define MOUN$_INCONOWNER 7504460 #define MOUN$_INCONWRITE 7504468#define MOUN$_INCO9NFOR 7504476#define MOUN$_NOVOLACC 7504484#define MOUN$_NOFILACC 7504492!#define MOUN$_TAPEPOSLOST 7504500#define MOUN$_BADSHADOW 7504508#define MOUN$_NOSHDWMEM 7504516 #define MOUN$_INVSHDWMEM 7504524!#define MOUN$_SHDWCOPYREQ 7504532 #define MOUN$_SHADOWFAIL 7504540 #define MOUN$_SHDWINCVOL 7504548 #define MOUN$_NOTSHDWDEV 7504556#define MOUN$_BADMDFMT 7504564#define MOUN$_NOTACLU 7504572 #define MOUN$_NOALOCLASS 7504580 #define MOUN$_BADASNUNIT 7504588#define MOUN$_BADDIS:P 7504596#define MOUN$_BADUNDFAT 7504604#define MOUN$_VOLTOOBIG 7504612#define MOUN$_BADSECSYS 7504620#define MOUN$_DEVBUSY 7504628#define MOUN$_DEVDMT 7504636#define MOUN$_BADREPLY 7504644#define MOUN$_MMEABORT 7504652#define MOUN$_NOSHADOW 7504660#define MOUN$_NOTSHDWVU 7504668#define MOUN$_NOSHADLIC 7504676#define MOUN$_DIFVOLMNT 7504684#define MOUN$_DEVSHAMEM 7504692#define MOUN$_SHADSCB 7504700#define MOUN$_NOODS1 7504708#define MOUN$_WRONGVU 7504716"#def;ine MOUN$_DETSHADINCON 7504724#define MOUN$_NOMASTER 7504732#define MOUN$_XSMBRS 7504740#define MOUN$_NOVUID 7504748"#define MOUN$_SHADUNSTABLE 7504756#define MOUN$_INCONPOOL 7504764 #define MOUN$_DEVBUSYMOU 7504772##define MOUN$_DEVBUSYMOUDSA 7504780 #define MOUN$_DEVBUSYDMT 7504788 #define MOUN$_DEVBUSYSYS 7504796 #define MOUN$_DEVBUSYVOL 7504804 #define MOUN$_DEVBUSYORB 7504812##define MOUN$_DEVBUSYINVMOS 7504820"#define MOUN$_DEVBUSYINSET 7504828#define MOUN$_NOTALLMEM 750483<6#define MOUN$_BADPOLICY 7504844 #define MOUN$_POLICYFAIL 7504852#define MOUN$_SPARE 7504860##define MOUN$_REQ_WBM_MERGE 7504868"#define MOUN$_REQ_WBM_FAIL 7504876##define MOUN$_ACPNOTPRESENT 7504884 #define MOUN$_BADWINDOWS 7504892"#define MOUN$_NOCAPABILITY 7504900!#define MOUN$_MBRTOOSMALL 7504908"#define MOUN$_SHDWREQALLOC 7504916 #define MOUN$_INVALIDSCB 7504924N/************************************************************************ */N/* = */N/* ADD NEW FATAL STATUS MESSAGES HERE. THERE IS ROOM FOR 385 MORE CODES. */N/* */N/************************************************************************ */N/* */N/* WARNING MESSAGES */N/* > */#define MOUN$_HOMBLKBAD 7507968#define MOUN$_IDXHDRBAD 7507976#define MOUN$_MAPHDRBAD 7507984#define MOUN$_IDXMAPERR 7507992#define MOUN$_BITMAPERR 7508000#define MOUN$_BADHOMBLK 7508008#define MOUN$_WRTHOMBLK 7508016#define MOUN$_QUOTAFAIL 7508024#define MOUN$_BITMAPINV 7508032#define MOUN$_WRITESCB 7508040#define MOUN$_DISMPART 7508048#define MOUN$_UNUSED 7508056#define MOUN$_DISMOUNTD 7508064 #define MOUN$_VOLSHDWMEM 7508072 #define MOUN$_RMTMNT?FAIL 7508080 #define MOUN$_MNTCLUFAIL 7508088#define MOUN$_QUOTAFNF 7508096!#define MOUN$_CBSNOTSUPTD 7508104##define MOUN$_CRELNM_FAILED 7508112 #define MOUN$_DENIGNORED 7508120#define MOUN$_ALHOMERR 7508128#define MOUN$_ALHOMINV 7508136!#define MOUN$_INCONSTRUCT 7508144#define MOUN$_INCONSET 7508152!#define MOUN$_OLDSHDRIVER 7508160 #define MOUN$_POLICYWARN 7508168#define MOUN$_INCONSIZE 7508176##define MOUN$_OPT_WBM_MERGE 7508184$#define MOUN$_WBM_NOTSTARTED 7508192##defin @e MOUN$_OPTCAPABILITY 7508200N/* */N/* INFORMATIONAL MESSAGES */N/* */#define MOUN$_MOUNTED 7512067#define MOUN$_VOLIDENT 7512075#define MOUN$_WRITELOCK 7512083#define MOUN$_REBUILD 7512091#define MOUN$_OPRQST 7512099#define MOUN$_OPREPLY 7512107#define MOUN$_OPRQSTCAN 7512115#define AMOUN$_NOOPR 7512123#define MOUN$_INVLDRESP 7512131#define MOUN$_MOUNTDEV 7512139#define MOUN$_VOLNAME 7512147#define MOUN$_NODEVAVL 7512155 #define MOUN$_RPLYARRIVD 7512163#define MOUN$_WRONGVOL 7512171#define MOUN$_RQSTDON 7512179#define MOUN$_VOLSTATUS 7512187#define MOUN$_VOLSETSTS 7512195#define MOUN$_REDCACHE 7512203#define MOUN$_REBLDREQD 7512211!#define MOUN$_SHDWMEMSUCC 7512219!#define MOUN$_SHDWMEMCOPY 7512227!#define MOUN$_SHDWMEMFAIL 7512235N#define MOUN$_BMOUNT 7512243 /* MAXIMUM = 8 CHARACTERS */ #define MOUN$_WAITINGMNT 7512251 #define MOUN$_RMTMNTSUCC 7512259!#define MOUN$_SHDWMEMERGE 7512267!#define MOUN$_AUTOMEMSUCC 7512275!#define MOUN$_AUTOMEMCOPY 7512283!#define MOUN$_AUTOMEMERGE 7512291#define MOUN$_MOUNTVOL 7512299 #define MOUN$_ANYSCRATCH 7512307 #define MOUN$_SCRATCHCOL 7512315 #define MOUN$_SCRATCHLOC 7512323#define MOUN$_SCRCOLLOC 7512331#define MOUN$_SUITDEV 7512339#define MOUN$_DEVTYPE 751234C7#define MOUN$_DEVICE 7512355#define MOUN$_MEDIANAME 7512363#define MOUN$_CARTRIDGE 7512371#define MOUN$_CARTSIDE 7512379#define MOUN$_CDROM_ISO 7512387#define MOUN$_CDROM_HS 7512395 #define MOUN$_WAITDEVRDY 7512403#define MOUN$_NOTODS2 7512411#define MOUN$_SRCMBRADD 7512419 #define MOUN$_ISACPYTRGT 7512427#define MOUN$_ISAMBR 7512435#define MOUN$_DOSETVOL 7512443#define MOUN$_RETSTATUS 7512451!#define MOUN$_SHDWMEMMCPY 7512459 #define MOUN$_SHDWNOMCPY 7512467N/* D */N/* MORE FATAL MESSAGES (DO NOT ADD MORE MESSAGES TO THIS SECTION UNTIL */N/* THE BLOCK ABOVE HAS BEEN USED UP.) */N/* */#define MOUN$_INVQUAVAL 7515876#define MOUN$_DEVNOFE 7515884"#define MOUN$_VOLSETALRMNT 7515892 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenEever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MOUNDEF_LOADED */ ww0 /********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[S FTARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $MSGDEF ***/#ifndef __MSGDEF_LOADED#define __MSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size G__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(_ H_VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* */N/* SYSTEM WIDE MAILBOX MESSAGE TYPES */N/* */N/*- */N/* DEFINE CODEIS AS CONSTANTS */N#define MSG$_TRMUNSOLIC 1 /* UNSOLICITED TERMINAL DATA */N#define MSG$_CRUNSOLIC 2 /* UNSOLICTED CARD READER DATA */N#define MSG$_DELPROC 3 /* DELETE PROCESS */N#define MSG$_SNDSMB 4 /* SEND TO SYMBIONT MANAGER */N#define MSG$_DEVOFFLIN 5 /* DEVICE OFFLINE */N#define MSG$_TRMHANGUP 6 J/* TERMINAL HANG UP */N#define MSG$_DEVONLIN 7 /* DEVICE ONLINE */W#define MSG$_OPRQST 8 /* OPERATOR REQUEST *** OVERLAPPED CODE *** */U#define MSG$_OPREPLY 9 /* OPERATOR REPLY *** OVERLAPPED CODE *** */N/* DEFINE SYMBIONT RESPONSE MESSAGES */N#define MSG$_SMBINI 8 /* SYMBIONT HAS INITED */N#define MSG$_SMBDON 9 /* SYMBIKONT FINISHED */Q#define MSG$_SNDACC 10 /* SEND MESSAGE TO ACCOUNTING MANAGER */T#define MSG$_PURPROC 11 /* PURGE PROCESS *** OVERLAPPED CODE *** */S#define MSG$_DELIMAG 12 /* DELETE IMAGE *** OVERLAPPED CODE *** */R#define MSG$_PURIMAG 13 /* PURGE IMAGE *** OVERLAPPED CODE *** */V#define MSG$_SYSFUNC 14 /* SYSTEM FUNCTION *** OVERLAPPED CODE *** */N#define MSG$_SNDJBC 15 /* SenLd message to job controller */Y#define MSG$_GETQUI 16 /* Get queue information (from job controller) */N/* DEFINE DMC MESSAGES */N#define MSG$_XM_DATAVL 11 /* DMC UNSOLICITED DATA */N#define MSG$_XM_SHUTDN 12 /* DMC LINE DOWN */N#define MSG$_XM_ATTN 13 /* DMC ATTENTION MESSAGE */N/* SYMBIONT COMMAND MESSAGES M */N#define MSG$_INIOPR 16 /* INITIATE PRINTING A FILE */N#define MSG$_ABOOPR 17 /* ABORT PRINTING A FILE */N#define MSG$_SUSOPR 18 /* PAUSE PRINTING THE FILE */N#define MSG$_RESOPR 19 /* RESUME PRINTING THE FILE */N#define MSG$_DELSMB 20 /* SYMBIONT SHOULD DELETE ITSELF */N#define MSG$_REQUE 21 /* REQUEUE A FILE FOR PRINTING */N/* N */N#define MSG$_SMBRSP 32 /* SYMBIONT MANAGER RESPONSE */N#define MSG$_ACCRSP 33 /* ACCOUNTING MANAGER RESPONSE */N/* FILE ACP MESSAGES */N#define MSG$_SCANBAD 40 /* SCAN FILE FOR BAD BLOCKS */N#define MSG$_SCANRSP 41 /* RESPONSE FROM FILE SCANNER */N/* NETWORK ATTENTION CODES O */N#define MSG$_ABORT 48 /* PARTNER ABORTED LINK */N#define MSG$_CONFIRM 49 /* CONNECT CONFIRM */N#define MSG$_CONNECT 50 /* INBOUND CONNECT INITIATE */N#define MSG$_DISCON 51 /* PARTNER DISCONNECTED - HANGUP */N#define MSG$_EXIT 52 /* PARTNER EXITED PREMATURELY */S#define MSG$_INTMSG 53 /* INTERRUPT MESSAPGE - UNSOLICITED DATA */N#define MSG$_PATHLOST 54 /* NFW - PATH LOST TO PARTNER */N#define MSG$_PROTOCOL 55 /* PROTOCOL ERROR */N#define MSG$_REJECT 56 /* CONNECT REJECT */N#define MSG$_THIRDPARTY 57 /* THIRD PARTY DISCONNECT */N#define MSG$_TIMEOUT 58 /* CONNECT TIMEOUT */N#define MSG$_NETSHUT 59 /* Network shutting down */QN#define MSG$_NODEACC 60 /* Node has become accessible */N#define MSG$_NODEINACC 61 /* Node has become inaccessible */N#define MSG$_EVTAVL 62 /* Events are available to EVL */N#define MSG$_EVTRCVCHG 63 /* Event receiver database change */N#define MSG$_INCDAT 64 /* X25 INCOMING DATA */N#define MSG$_RESET 65 /* X25 CIRCUIT RESET */N#define MSG$_LINUP 66 R /* X25 PVC LINE UP */N#define MSG$_LINDWN 67 /* X25 PVC LINE DOWN */P#define MSG$_EVTXMTCHG 68 /* Event transmitter database change */N/* MOUNT VERIFICATION MESSAGES */N#define MSG$_DEVOFFLINX 80 /* DEVICE OFFLINE */N#define MSG$_WRONGVOL 81 /* WRONG VOLUME IN DEVICE */N#define MSG$_DEVWRTLCK 82 /* DEVICSE HAS BEEN WRITE LOCKED */N#define MSG$_TRMBRDCST 83 /* TERMINAL BROADCAST */N#define MSG$_MVCOMPLETE 84 /* MOUNT VERIFICATION COMPLETED */N#define MSG$_MVABORTED 85 /* MOUNT VERIFICATION ABORTED */N#define MSG$_DISMOUNTED 86 /* VOLUME DISMOUNTED */N#define MSG$_UDA50MVER 87 /* UDA50 MICORCODE NOT UPTO REV */Q#define MSG$_DUPUNITNO 88 /* MSCP CONTROLLER - DUPLICATE UNITT ! */N#define MSG$_CLUMBX 89 /* CNXMGR to OPCOM messages */P#define MSG$_TM78MVER 90 /* TM78 Microcode not up to rev level */N#define MSG$_SHAMEMFAL 91 /* Member failed out of shadow set */N#define MSG$_SHARDUCED 92 /* Shadow set reduced */N#define MSG$_RC25MVER 93 /* RC25 MICORCODE NOT UPTO REV */N#define MSG$_RDRXMVER 94 /* RDRX MICORCODE NOT UPTO REV */N#define MSG$_TUU81MVER 95 /* TU81 MICORCODE NOT UPTO REV */N#define MSG$_MAYAMVER 96 /* MAYA MICORCODE NOT UPTO REV */N#define MSG$_SHACHASTA 97 /* Shadow set has changed state */Q#define MSG$_SHACOPCOM 98 /* Shadow copy operation has completed */P#define MSG$_SHAREDZER 99 /* Shadow set reduced to zero members */N#define MSG$_SHAPOSMEM 100 /* Possible shadow set member */V#define MSG$_SHAALLCOM 101 V /* All shadow set copy operations completed */N#define MSG$_SHACOPBEG 102 /* Shadow copy operation begun */Q#define MSG$_SHAWROMEM 103 /* Shadow member contains wrong volume */V#define MSG$_SHAORGMEM 104 /* Shadow system disk missing VMB R3 member */N#define MSG$_TRMLOSE_KB 105 /* terminal lost physical KB */N#define MSG$_TRMGAIN_KB 106 /* terminal gained physical KB */N#define MSG$_TRMSHRINK 107 W/* terminal window shrunk to icon */N#define MSG$_TRMEXPAND 108 /* terminal window icon expanded */N#define MSG$_TRMRESIZE 109 /* terminal window resized */N#define MSG$_TRMMOVE 110 /* terminal window moved */T#define MSG$_SNDMME 111 /* message to media management extensions */]#define MSG$_RETMME 112 /* message returned from media management software */#define MSG$_SHAADPBAD 113 /* SXhadow VMB R3 member not currently connected to original boot adapter type (PA versus PU\) */#define MSG$_SHAEMUPTH 114 /* Shadow VMB R3 member not currently connected to original boot adapter - on an emulated p\ath */q#define MSG$_SHABENODMP 115 /* Shadow VMB R3 member not on original adapter, current type unknown */t#define MSG$_SHABNODMP 116 /* Shadow VMB R3 member not the master of set or not on PATH named to VMB */#define MSG$_SHALOCDEV 117 Y /* A Satellites shadow master member is now on a local device, no reboot or dumps possible \*/]#define MSG$_SHANOBPOK 118 /* Shadow VMB R3 member is not a member of the set */]#define MSG$_SHABDMPOK 119 /* Shadow VMB R3 member is on the original adapter */o#define MSG$_BOOTDMPOK 120 /* System dump will has been redirected to the current master member */h#define MSG$_SHABDBCK 121 /* Shadow VMB R3 member has returned to the original adaZpter */q#define MSG$_SHANODMP 122 /* Shadow master changed. Dump will NOT be written if system crashes. */m#define MSG$_SHADMPOK 123 /* Shadow master changed. Dump WILL be written if system crashes. */k#define MSG$_OPCFAO 124 /* Message contains dynamic FAO parameters to format the message */b#define MSG$_INSAMCVP 125 /* Shadowing - not all requested bitmaps were converted */O#define MSG$_HBMMRESET 126 /* Shadowing - HBM[M bitmap was reset */[#define MSG$_SHADISSOLVED 127 /* Shadowing -- virtual unit has been vapourized */\#define MSG$_SHAMEMEXPEL 128 /* Shadowing -- a member device has been expelled */n#define MSG$_SHAMEMDMT 129 /* Shadowing -- a member device has been dismounted from shadow set */N/* DEFINE MESSAGES FOR USE BY QMAN */N#define MSG$_QMAN_INTERNAL 200 /* QMAN internal message */N/* DEFINE MESSAGES FOR\ USE BY PEDRIVER */N#define MSG$_PEMBX 220 /* PEDRIVER to OPCOM messages */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MSGDEF_LOADED */ ww /*************** ]*****************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************/%/*** MODULE $MSGHLPDEF IDENT X-4 ***/#ifndef __MSGHLPDEF_LOADED#define __MSGHLPDEF_LOADED 1 G#pragma __no ^standard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #define MSGHLP$M_NOSORT 0x1#define MSGHLP$M_BRIEF 0x2#define MSGHLP$M_MACHINE 0x4 #define MSGHLP$M_NOSUBSTRING 0x8 #ifdef __NEW_STARLETtypedef struct _msghlp `def {N unsigned msghlp$v_nosort : 1; /* Do *NOT* sort the output */R unsigned msghlp$v_brief : 1; /* Give only the names of the messages */Y unsigned msghlp$v_machine : 1; /* Return the text in machine-readable format */W unsigned msghlp$v_nosubstring : 1; /* Match only entire words, no abreviations */# unsigned msghlp$v_fill_10_ : 4; short int msghlp$w_unused;N char msghlp$b_work_files; /* How many workfiles for /SORT? */ a } MSGHLPDEF;#else /* __OLD_STARLET */struct msghlpdef {N unsigned msghlp$v_nosort : 1; /* Do *NOT* sort the output */R unsigned msghlp$v_brief : 1; /* Give only the names of the messages */Y unsigned msghlp$v_machine : 1; /* Return the text in machine-readable format */W unsigned msghlp$v_nosubstring : 1; /* Match only entire words, no abreviations */# unsigned msghlp$v_fill_10_ : 4; short int msghlp$w_unused;N char msghlp$b_workb_files; /* How many workfiles for /SORT? */ } ;%#endif /* #ifdef __NEW_STARLET */ #define MSGHLPDEF msghlpdef'#define MSGHLP$V_NOSORT msghlp$v_nosort%#define MSGHLP$V_BRIEF msghlp$v_brief)#define MSGHLP$V_MACHINE msghlp$v_machine1#define MSGHLP$V_NOSUBSTRING msghlp$v_nosubstring/#define MSGHLP$B_WORK_FILES msghlp$b_work_files $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __crequired_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MSGHLPDEF_LOADED */ ww /********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********* d***********************************************************************************************************************//*** MODULE $MT2DEF ***/#ifndef __MT2DEF_LOADED#define __MT2DEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined requeired 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#deffine __union variant_union#endif#endif N/*+ */N/* EXTENDED MAGTAPE CHARACTERISTICS BITS */N/*- */#define MT2$M_SUP_DENS 0xFFFF #define MT2$M_WBC_ENABLE 0x10000!#define MT2$M_RDC_DISABLE 0x20000!#define MT2$M_CACHED_DATA 0x40000#define MT2$M_CD_LOST 0x80000 #define MT2$M_TAPE_MARK 0x100000#define MT2$M_gCOMP_SUP 0x200000#define MT2$M_COMP_ENA 0x400000$#define MT2$M_MT3_SUPPORTED 0x800000%#define MT2$M_ALLOWFAST_SUP 0x1000000(#define MT2$M_ALLOWFAST_ALWAYS 0x2000000(#define MT2$M_ALLOWFAST_PER_IO 0x4000000'#define MT2$M_ALLOWFAST_NEVER 0x8000000 #ifdef __NEW_STARLETtypedef union _mt2def { __struct {N unsigned mt2$v_sup_dens : 16; /* SUPPORTED DENSITIES */N unsigned mt2$v_wbc_enable : 1; /* WRITE-BACK CACHING IS ENABLED */N unsigned mht2$v_rdc_disable : 1; /* READ CACHING IS DISABLED */Q unsigned mt2$v_cached_data : 1; /* CLASS DRIVER DETECTED DATA IN CACHE */T unsigned mt2$v_cd_lost : 1; /* CLASS DRIVER DETECTED CACHED DATA LOST */N unsigned mt2$v_tape_mark : 1; /* TAPE MARK HAS BEEN WRITTEN */N unsigned mt2$v_comp_sup : 1; /* COMPACTION supported */N unsigned mt2$v_comp_ena : 1; /* COMPACTION enabled */Y unsigned mt2$v_mt3_support ied : 1; /* Driver supports Multiple Tape Densities. */N unsigned mt2$v_allowfast_sup : 1; /* SCSI Fast Search supported */N unsigned mt2$v_allowfast_always : 1; /* ALWAYS use Fast Search */N unsigned mt2$v_allowfast_per_io : 1; /* PER_IO use of Fast Search */N unsigned mt2$v_allowfast_never : 1; /* NEVER use Fast Search */$ unsigned mt2$v_fill_11_ : 4; } mt2$r_mt2def_bits; } MT2DEF; #if !defined(__VAXC)7#define mt2$v_sup_ jdens mt2$r_mt2def_bits.mt2$v_sup_dens;#define mt2$v_wbc_enable mt2$r_mt2def_bits.mt2$v_wbc_enable=#define mt2$v_rdc_disable mt2$r_mt2def_bits.mt2$v_rdc_disable=#define mt2$v_cached_data mt2$r_mt2def_bits.mt2$v_cached_data5#define mt2$v_cd_lost mt2$r_mt2def_bits.mt2$v_cd_lost9#define mt2$v_tape_mark mt2$r_mt2def_bits.mt2$v_tape_mark7#define mt2$v_comp_sup mt2$r_mt2def_bits.mt2$v_comp_sup7#define mt2$v_comp_ena mt2$r_mt2def_bits.mt2$v_comp_enaA#define mt2$v_mt3_supported mt2$r_mt2def_bit ks.mt2$v_mt3_supportedA#define mt2$v_allowfast_sup mt2$r_mt2def_bits.mt2$v_allowfast_supG#define mt2$v_allowfast_always mt2$r_mt2def_bits.mt2$v_allowfast_alwaysG#define mt2$v_allowfast_per_io mt2$r_mt2def_bits.mt2$v_allowfast_per_ioE#define mt2$v_allowfast_never mt2$r_mt2def_bits.mt2$v_allowfast_never"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union mt2def { __struct {N unsigned mt2$v_sup_dens : 16; /* SUPPORTED DENSITIES */N lunsigned mt2$v_wbc_enable : 1; /* WRITE-BACK CACHING IS ENABLED */N unsigned mt2$v_rdc_disable : 1; /* READ CACHING IS DISABLED */Q unsigned mt2$v_cached_data : 1; /* CLASS DRIVER DETECTED DATA IN CACHE */T unsigned mt2$v_cd_lost : 1; /* CLASS DRIVER DETECTED CACHED DATA LOST */N unsigned mt2$v_tape_mark : 1; /* TAPE MARK HAS BEEN WRITTEN */N unsigned mt2$v_comp_sup : 1; /* COMPACTION supported */N unsigned mt2$v_cmomp_ena : 1; /* COMPACTION enabled */Y unsigned mt2$v_mt3_supported : 1; /* Driver supports Multiple Tape Densities. */N unsigned mt2$v_allowfast_sup : 1; /* SCSI Fast Search supported */N unsigned mt2$v_allowfast_always : 1; /* ALWAYS use Fast Search */N unsigned mt2$v_allowfast_per_io : 1; /* PER_IO use of Fast Search */N unsigned mt2$v_allowfast_never : 1; /* NEVER use Fast Search */$ unsigned mt2$v_fill_11_ : 4; n } mt2$r_mt2def_bits; } ; #if !defined(__VAXC)7#define mt2$v_sup_dens mt2$r_mt2def_bits.mt2$v_sup_dens;#define mt2$v_wbc_enable mt2$r_mt2def_bits.mt2$v_wbc_enable=#define mt2$v_rdc_disable mt2$r_mt2def_bits.mt2$v_rdc_disable=#define mt2$v_cached_data mt2$r_mt2def_bits.mt2$v_cached_data5#define mt2$v_cd_lost mt2$r_mt2def_bits.mt2$v_cd_lost9#define mt2$v_tape_mark mt2$r_mt2def_bits.mt2$v_tape_mark7#define mt2$v_comp_sup mt2$r_mt2def_bits.mt2$v_comp_sup7#define mt2$v_comp o_ena mt2$r_mt2def_bits.mt2$v_comp_enaA#define mt2$v_mt3_supported mt2$r_mt2def_bits.mt2$v_mt3_supportedA#define mt2$v_allowfast_sup mt2$r_mt2def_bits.mt2$v_allowfast_supG#define mt2$v_allowfast_always mt2$r_mt2def_bits.mt2$v_allowfast_alwaysG#define mt2$v_allowfast_per_io mt2$r_mt2def_bits.mt2$v_allowfast_per_ioE#define mt2$v_allowfast_never mt2$r_mt2def_bits.mt2$v_allowfast_never"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignmentp __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MT2DEF_LOADED */ ww;i!/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3- q3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $MT3DEF ***/#ifndef __MT3DEF_LOADED#define __MT3DEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr srize 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_strsuct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* MAGNETIC TAPE DENSITY/COMPRESSION DEFINITIONS */N/* */N/* These values are used only for MTD enhanced tape drivers */N/* and are not found in MTDEF. t */$/* */N#define MT3$K_DEFAULT 0 /* DEFAULT DENSITY/COMPRESSION */N#define MT3$K_NRZI_800 257 /* NRZI 800 BPI */N#define MT3$K_PE_1600 258 /* PE 1600 BPI */N#define MT3$K_GCR_6250 260 /* GCR 6250 BPI */N#define MT3$K_TK50 513 /* DLT TK50: 833 BPI */N#define MT3$K_TK70 514 u /* DLT TK70: 1250 BPI */N#define MT3$K_3480 769 /* IBM 3480 HPC 39872 BPI */N#define MT3$K_3490E 770 /* IBM 3480: compressed */N#define MT3$K_3480_COMP 772 /* IBM 3490 density */N#define MT3$K_3490E_COMP 776 /* IBM 3490: compressed */N#define MT3$K_WOD_6250 1025 /* RV80 6250 BPI EQUIVALENT */N#define MT3$K_DAT 1281 /* DAT - 6v1000 bpi */N#define MT3$K_DAT_COMP 1282 /* DAT Compressed */Q/* Only the Symbols to here are understood by pre-Raven TMSCP / TUDRIVER code. */W#define MT3$K_DENSITY_INVALID 31 /* Indicates,, DEVDEPEND density is invalid. */N#define MT3$K_8200 1537 /* Exa-Byte 8200 */N#define MT3$K_8500 1538 /* Exa-Byte 8500 */N#define MT3$K_8500_COMP 1540 /* Exa-Byte 8500 Comprwessed */N#define MT3$K_8200_COMP 1544 /* Exa-Byte 8200 Compressed */N#define MT3$K_8900 1552 /* Exa-Byte 8900 */N#define MT3$K_8900_COMP 1568 /* Exa-Byte 8900 Compressed */U#define MT3$K_QIC 1793 /* All QIC drives are drive settable only. */N#define MT3$K_TK85 2052 /* DLT Tx85: 10625 BPI -- Cmpt III */N#define MT3$K_TK86 2056 /* DLT Tx86: 10626 BPI -- Cmpt III */Nx#define MT3$K_TK87 2064 /* DLT Tx87: 62500 BPI -- Cmpt III */N#define MT3$K_TK87_COMP 2080 /* DLT Tx87: Compressed 62501 BPI */Q#define MT3$K_TK89 2305 /* DLT Tx89: (Quantum 7000) -- Cmpt IV */N#define MT3$K_TK89_COMP 2306 /* DLT Tx89: Compressed -- Cmpt IV */Q#define MT3$K_TK88 2368 /* DLT Tx88: (Quantum 4000) -- Cmpt IV */N#define MT3$K_TK88_COMP 2432 /* DLT Tx88: Compressed -- Cmpt IV */N#define MT3$K_DLT8y000 3588 /* DLT8000 */N#define MT3$K_DLT8000_COMP 3592 /* DLT8000 Compressed */N#define MT3$K_SDLT 3600 /* Super DLT */N#define MT3$K_SDLT_COMP 3616 /* Super DLT Compressed */N#define MT3$K_SDLT320 3648 /* Super DLT320 */N#define MT3$K_SDLT320_COMP 3712 /* Super DLT320 Compressed */N#define MT3$K_AIT1 2561 /* Szony Advanced Intelligent Tapes */X#define MT3$K_AIT1_COMP 2562 /* Sony Advanced Intelligent Tapes Compressed */N#define MT3$K_AIT2 2564 /* AIT2 */N#define MT3$K_AIT2_COMP 2568 /* AIT2 Compressed */N#define MT3$K_AIT3 2576 /* AIT3 */N#define MT3$K_AIT3_COMP 2592 /* AIT3 Compressed */N#define MT3$K_AIT4 2624 /* AIT4 { */N#define MT3$K_AIT4_COMP 2688 /* AIT4 Compressed */N#define MT3$K_DDS2 2817 /* Digital Data Storage 2 */O#define MT3$K_DDS2_COMP 2818 /* Digital Data Storage 2 Compressed */N#define MT3$K_DDS3 3073 /* Digital Data Storage 3 */Q#define MT3$K_DDS3_COMP 3074 /* Digital Data Storage 3 Compressed */N#define MT3$K_DDS4 3329 /* Digital Data Storage 4 */Q|#define MT3$K_DDS4_COMP 3330 /* Digital Data Storage 4 Compressed */N#define MT3$K_DAT72 3332 /* DAT72 */N#define MT3$K_DAT72_COMP 3336 /* DAT72 Compressed */N#define MT3$K_DAT160 3344 /* DAT160 */N#define MT3$K_DAT160_COMP 3360 /* DAT160 Compressed */N#define MT3$K_SDLT600 3585 /* Super DLT600 */N#define MT3$K_SDLT600_}COMP 3586 /* Super DLT600 Compressed */N#define MT3$K_LTO2 3841 /* Ultrium460 */N#define MT3$K_LTO2_COMP 3842 /* Ultrium460 Compressed */N#define MT3$K_LTO3 3844 /* Ultrium960 */N#define MT3$K_LTO3_COMP 3848 /* Ultrium960 Compressed */N#define MT3$K_LTO4 3856 /* Ultrium 1840 */N#define MT3$K_LTO4_COMP 3872 /* Ultri ~um 1840 Compressed */N/* Compression Only codes. */R/* The X%FFxx codes below are layed out so that future compression enhancments */N/* may take advantage of multiple compression types. */N#define MT3$K_NO_COMP 65280 /* All Compression OFF */N#define MT3$K_COMP 65281 /* Compression ON */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MT3DEF_LOADED */ wwK!/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:0 0:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $MTADEF ***/#ifndef __MTADEF_LOADED#define __MTADEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __unio n#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* MAGTAPE ACCESSIBILTY ROUTINE CODES */N/*- */N/* DEFINITIONS FOR ACCESS_SPEC */N#define MTA$K_NOCHAR 0 /* ACCESS CHAR IS NOVALID */N#define MTA$K_CHARVALID 1 /* ACCESS CHAR IS VALID */N/* DEFINITIONS FOR TYPE */N#define MTA$K_INVOL1 0 /* INPUT A VOL1 ACCESS CODE */N#define MTA$K_INHDR1 1 /* INPUT A HDR1 ACCESS CODE */N#define MTA$K_OUTVOL1 2 /* OUTPUT A VOL1 ACCESS CODE */N#define MTA$K_OUTHDR1 3 /* OUTPUT A HDR1 ACCESS CODE */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MTADEF_LOADED */ wwk!/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $MTDEF ***/#ifndef __MTDEF_LOADED#define __MTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* MAGTAPE STATUS BITS */N/*- */#define MT$M_SEREXCP 0x1#define MT$M_ENAUTOPACK 0x2#define MT$M_ENSEREXCP 0x4#define MT$M_PARITY 0x8#define MT$M_FORMAT 0xF0#define MT$M_DENSITY 0x1F00!#define MT$M_FASTSKIP_USED 0x2000#define MT$M_LOGSOFT 0x4000#define MT$M_LOGSOFTOG 0x8000#define MT$M_BOT 0x10000#define MT$M_EOF 0x20000#define MT$M_EOT 0x40000#define MT$M_HWL 0x80000#define MT$M_LOST 0x100000#define MT$M_SUP_NRZI 0x200000#define MT$M_SUP_PE 0x400000#define MT$M_SUP_GCR 0x800000#define MT$M_SPEED 0xFF000000N#define MT$K_DEFAULT 0 /* DEFAULT FORMAT */N#define MT$K_NORMAL11 12 /* PDP-11 NORMAL */N#define MT$K_CORDMP11 13 /* PDP-11 CORE DUMP */N#define MT$K_NORMAL15 14 /* PDP-15 NORMAL */N/* */N#define MT$K_NRZI_800 3 /* NRZI 800 BPI */N#define MT$K_PE_1600 4 /* PE 1600 BPI */N#define MT$K_GCR_6250 5 /* GCR 6250 BPI */N#define MT$K_WOD_6250 8 /* RV80 6250 BPI EQUIVALENT */N#define MT$K_SCSI_DC1 10 /* Data Compaction algorithm 1 */N#define MT$K_HPC_40K 12 /* HPC 39872 BPI */N#define MT$K_HPC_COMP 13 /* HPC 39872 compacted */N#define MT$K_XPC_80K 14 /* */N#define MT$K_XPC_COMP 15 /*  */N#define MT$K_BLK_833 17 /* BLOCK (TK50) 833 BPI */N#define MT$K_BLK_1250 18 /* BLOCK (TK70) 1250 BPI */N#define MT$K_BLK_10K 19 /* BLOCK (TF85) 10625 BPI */N#define MT$K_BLK_20K 20 /* BLOCK (TF86) 10626 */N#define MT$K_BLK_60K 21 /* BLOCK (Tx87) 62500 */N#define MT$K_BLK_COMP 22 /* BLOCK (Tx87) COMPRESSED 62501 */P#define MT$K_D AT_61K 24 /* DAT CARTRIDGE 61000 BPI EQUIVALENT */N/* */N#define MT$K_SPEED_DEF 0 /* DEFAULT SPEED */N#define MT$K_SPEED_25 25 /* 25 IPS */N#define MT$K_SPEED_75 75 /* 75 IPS */ #ifdef __NEW_STARLETtypedef union _mtdef { __struct {N unsigned mt$v_serexcp : 1; /* SERIOUS EXCEPTION PRESENT */N unsigned mt$v_enautopack : 1; /* ENABLE AUTO PACKACK */N unsigned mt$v_enserexcp : 1; /* ENABLE SERIOUS EXCEPTION MODE */N unsigned mt$v_parity : 1; /* PARITY SELECT (0=ODD, 1=EVEN) */N unsigned mt$v_format : 4; /* RECORDING FORMAT */N unsigned mt$v_density : 5; /* RECORDING DENSITY AND METHOD */R unsigned mt$v_fastskip_used : 1; /* IO$_SKIPFILE USED SKIP BY FILEMARKS */S unsigned mt$v_logsoft : 1; /* LOG SOFT (TU78) ERRORS (0=NO, 1=YES) */R unsigned mt$v_logsoftog : 1; /* TOGGLE TO REVERSE LOGSOFT STATE BIT */N unsigned mt$v_bot : 1; /* AT BEGINNING OF TAPE */N unsigned mt$v_eof : 1; /* AT END OF FILE */N unsigned mt$v_eot : 1; /* AT END OF TAPE */N unsigned mt$v_hwl : 1; /* TAPE IS HARDWARE WRITELOCKED */N unsigned mt$v_lost : 1; /* TAPE POSITION LOST */N unsigned mt$v_sup_nrzi : 1; /* DRIVE SUPPORTS NRZI (800 BPI) */N unsigned mt$v_sup_pe : 1; /* DRIVE SUPPORTS PE (1600 BPI) */N unsigned mt$v_sup_gcr : 1; /* DRIVE SUPPORTS GCR (6250 BPI) */N unsigned mt$v_speed : 8; /* TAPE SPEED */ } mt$r_mtdef_bits;N/* */N/* RECORDING FORMAT DEFINTIONS */N/* */N/* */N/* RECORDING DENSITY AND METHOD DEFINITIONS */N/* */4/* Default 0 */4/* 9 Track 1 - 7 */8/* Optical Disk 8 - 9 */@/* SCSI Compaction codes 10 - 11 */D/* High Performance Cartridge 12 - 15 */6/* Block Mode 16 - 23 */4/* Reserved 24 - 31 */N/* */N/* */P/* DEFAULT,0 /* DEFAULT DENSITY (SAME AS ABOVE) */N/* TAPE SPEED VALUE DEFINITIONS */N/* */ } MTDEF; #if !defined(__VAXC)1#define mt$v_serexcp mt$r_mtdef_bits.mt$v_serexcp7#define mt$v_enautopack mt$r_mtdef_bits.mt$v_enautopack5#define mt$v_enserexcp mt$r_mtdef_bits.mt$v_enserexcp/#define mt$v_parity mt$r_mtdef_bits.mt$v_parity/#define mt$v_format mt$r_mtdef_bits.mt$v_format1#def ine mt$v_density mt$r_mtdef_bits.mt$v_density=#define mt$v_fastskip_used mt$r_mtdef_bits.mt$v_fastskip_used1#define mt$v_logsoft mt$r_mtdef_bits.mt$v_logsoft5#define mt$v_logsoftog mt$r_mtdef_bits.mt$v_logsoftog)#define mt$v_bot mt$r_mtdef_bits.mt$v_bot)#define mt$v_eof mt$r_mtdef_bits.mt$v_eof)#define mt$v_eot mt$r_mtdef_bits.mt$v_eot)#define mt$v_hwl mt$r_mtdef_bits.mt$v_hwl+#define mt$v_lost mt$r_mtdef_bits.mt$v_lost3#define mt$v_sup_nrzi mt$r_mtdef_bits.mt$v_sup_nrzi/#define mt $v_sup_pe mt$r_mtdef_bits.mt$v_sup_pe1#define mt$v_sup_gcr mt$r_mtdef_bits.mt$v_sup_gcr-#define mt$v_speed mt$r_mtdef_bits.mt$v_speed"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ union mtdef { __struct {N unsigned mt$v_serexcp : 1; /* SERIOUS EXCEPTION PRESENT */N unsigned mt$v_enautopack : 1; /* ENABLE AUTO PACKACK */N unsigned mt$v_enserexcp : 1; /* ENABLE SERIOUS EXCEPTION MODE */N unsigned mt$v_parity : 1; /* PARITY SELECT (0=ODD, 1=EVEN) */N unsigned mt$v_format : 4; /* RECORDING FORMAT */N unsigned mt$v_density : 5; /* RECORDING DENSITY AND METHOD */R unsigned mt$v_fastskip_used : 1; /* IO$_SKIPFILE USED SKIP BY FILEMARKS */S unsigned mt$v_logsoft : 1; /* LOG SOFT (TU78) ERRORS (0=NO, 1=YES) */R unsigned mt$v_logsoftog : 1; /* TOGGLE TO REVERSE LOGSOFT STATE BIT */N unsigned mt$v_bot : 1;  /* AT BEGINNING OF TAPE */N unsigned mt$v_eof : 1; /* AT END OF FILE */N unsigned mt$v_eot : 1; /* AT END OF TAPE */N unsigned mt$v_hwl : 1; /* TAPE IS HARDWARE WRITELOCKED */N unsigned mt$v_lost : 1; /* TAPE POSITION LOST */N unsigned mt$v_sup_nrzi : 1; /* DRIVE SUPPORTS NRZI (800 BPI) */N unsigned mt$v_sup_pe : 1; /* DRIVE SUPPORTS PE (1600 BPI) */N unsigned mt$v_sup_gcr : 1; /* DRIVE SUPPORTS GCR (6250 BPI) */N unsigned mt$v_speed : 8; /* TAPE SPEED */ } mt$r_mtdef_bits;N/* */N/* RECORDING FORMAT DEFINTIONS */N/* */N/*  */N/* RECORDING DENSITY AND METHOD DEFINITIONS */N/* */4/* Default 0 */4/* 9 Track 1 - 7 */8/* Optical Disk 8 - 9 */@/* SCSI Compaction codes 10 - 11 */D/* High Performance Cartridge 12 - 15 */6/* Block Mode 16 -  23 */4/* Reserved 24 - 31 */N/* */N/* */P/* DEFAULT,0 /* DEFAULT DENSITY (SAME AS ABOVE) */N/* TAPE SPEED VALUE DEFINITIONS */N/* */ } ;  #if !defined(__VAXC)1#define mt$v_serexcp mt$r_mtdef_bits.mt$v_serexcp7#define mt$v_enautopack mt$r_mtdef_bits.mt$v_enautopack5#define mt$v_enserexcp mt$r_mtdef_bits.mt$v_enserexcp/#define mt$v_parity mt$r_mtdef_bits.mt$v_parity/#define mt$v_format mt$r_mtdef_bits.mt$v_format1#define mt$v_density mt$r_mtdef_bits.mt$v_density=#define mt$v_fastskip_used mt$r_mtdef_bits.mt$v_fastskip_used1#define mt$v_logsoft mt$r_mtdef_bits.mt$v_logsoft5#define mt$v_logsoftog mt$r_mtdef_bits.mt$v_logsof tog)#define mt$v_bot mt$r_mtdef_bits.mt$v_bot)#define mt$v_eof mt$r_mtdef_bits.mt$v_eof)#define mt$v_eot mt$r_mtdef_bits.mt$v_eot)#define mt$v_hwl mt$r_mtdef_bits.mt$v_hwl+#define mt$v_lost mt$r_mtdef_bits.mt$v_lost3#define mt$v_sup_nrzi mt$r_mtdef_bits.mt$v_sup_nrzi/#define mt$v_sup_pe mt$r_mtdef_bits.mt$v_sup_pe1#define mt$v_sup_gcr mt$r_mtdef_bits.mt$v_sup_gcr-#define mt$v_speed mt$r_mtdef_bits.mt$v_speed"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MTDEF_LOADED */ ww,"/********************************************************************************************************************************/=/* Created: 5-A pr-2012 13:00:45 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]MTH$ROUTINES.SDI;1 *//********************************************************************************************************************************//*** MODULE mth$routines ***/#ifndef __MTH_ROUTINES_LOADED#define __MTH_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 P/**************************************************************************** *//* * */4/* COPYRIGHT (c) 1988 BY * */D/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */&/* ALL RIGHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */P/* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */P/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */&/* TRANSFERRED. * *//* * */P/* THE INFORMATION IN THIS SOFTWARE IS S UBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. * *//* * */P/* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * *//* * */P/**************************************************************************** */N/* MTH$ACOS  */N/* */N/* Arc Cosine of Angle Expressed in Radians */N/* */S/* Given the cosine of an angle, the Arc Cosine of Angle Expressed in Radians */N/* routine returns that angle */N/* (in radians).  */N/* */#define mth$acos MTH$ACOS #ifdef __NEW_STARLETfloat mth$acos( float *cosine);#else /* __OLD_STARLET */!float mth$acos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DACOS */N/* */N/* Arc Cosine of Angle Expressed in Radians  */N/* */S/* Given the cosine of an angle, the Arc Cosine of Angle Expressed in Radians */N/* routine returns that angle */N/* (in radians). */N/* */#define mth$dacos MTH$DACOS #ifdef __NEW_STARLETdouble mth$dacos( dou ble *cosine);#else /* __OLD_STARLET */#double mth$dacos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GACOS */N/* */N/* Arc Cosine of Angle Expressed in Radians */N/* */S/* Given the cosine of an angle, the Arc Cosine of Angle Expresse d in Radians */N/* routine returns that angle */N/* (in radians). */N/* */#define mth$gacos MTH$GACOS #ifdef __NEW_STARLETdouble mth$gacos( double *cosine);#else /* __OLD_STARLET */#double mth$gacos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ACOSD  */N/* */N/* Arc Cosine of Angle Expressed in Degrees */N/* */S/* Given the cosine of an angle, the Arc Cosine of Angle Expressed in Degrees */N/* routine returns that */N/* angle (in degrees).  */N/* */#define mth$acosd MTH$ACOSD #ifdef __NEW_STARLETfloat mth$acosd( float *cosine);#else /* __OLD_STARLET */"float mth$acosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DACOSD */N/* */N/* Arc Cosine of Angle Expressed in Degrees  */N/* */S/* Given the cosine of an angle, the Arc Cosine of Angle Expressed in Degrees */N/* routine returns that */N/* angle (in degrees). */N/* */#define mth$dacosd MTH$DACOSD #ifdef __NEW_STARLETdouble mth$dacosd(  double *cosine);#else /* __OLD_STARLET */$double mth$dacosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GACOSD */N/* */N/* Arc Cosine of Angle Expressed in Degrees */N/* */S/* Given the cosine of an angle, the Arc Cosine of Angle Expr essed in Degrees */N/* routine returns that */N/* angle (in degrees). */N/* */#define mth$gacosd MTH$GACOSD #ifdef __NEW_STARLETdouble mth$gacosd( double *cosine);#else /* __OLD_STARLET */$double mth$gacosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ASIN  */N/* */N/* Arc Sine in Radians */N/* */N/* Given the sine of an angle, the Arc Sine in Radians */N/* routine returns that angle */N/* (in radians).  */N/* */#define mth$asin MTH$ASIN #ifdef __NEW_STARLETfloat mth$asin( float *sine);#else /* __OLD_STARLET */!float mth$asin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DASIN */N/* */N/* Arc Sine in Radians  */N/* */N/* Given the sine of an angle, the Arc Sine in Radians */N/* routine returns that angle */N/* (in radians). */N/* */#define mth$dasin MTH$DASIN #ifdef __NEW_STARLETdouble mth$dasin( double *sin e);#else /* __OLD_STARLET */#double mth$dasin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GASIN */N/* */N/* Arc Sine in Radians */N/* */N/* Given the sine of an angle, the Arc Sine in Radians */ N/* routine returns that angle */N/* (in radians). */N/* */#define mth$gasin MTH$GASIN #ifdef __NEW_STARLETdouble mth$gasin( double *sine);#else /* __OLD_STARLET */#double mth$gasin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ASIND  */N/* */N/* Arc Sine in Degrees */N/* */N/* Given the sine of an angle, the Arc Sine in Degrees */N/* routine returns that angle */N/* (in degrees). */N/*  */#define mth$asind MTH$ASIND #ifdef __NEW_STARLETfloat mth$asind( float *sine);#else /* __OLD_STARLET */"float mth$asind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DASIND */N/* */N/* Arc Sine in Degrees */N/*  */N/* Given the sine of an angle, the Arc Sine in Degrees */N/* routine returns that angle */N/* (in degrees). */N/* */#define mth$dasind MTH$DASIND #ifdef __NEW_STARLETdouble mth$dasind( double *sine);#else /* __OLD _STARLET */$double mth$dasind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GASIND */N/* */N/* Arc Sine in Degrees */N/* */N/* Given the sine of an angle, the Arc Sine in Degrees */N/* routine retu rns that angle */N/* (in degrees). */N/* */#define mth$gasind MTH$GASIND #ifdef __NEW_STARLETdouble mth$gasind( double *sine);#else /* __OLD_STARLET */$double mth$gasind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ATAN */N/*  */N/* Arc Tangent in Radians */N/* */N/* Given the tangent of an angle, the Arc Tangent in Radians */N/* routine returns that angle (in radians). */N/* */#define mth$atan MTH$ATAN  #ifdef __NEW_STARLETfloat mth$atan( float *tangent);#else /* __OLD_STARLET */!float mth$atan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DATAN */N/* */N/* Arc Tangent in Radians */N/* */N/* Given the tangen t of an angle, the Arc Tangent in Radians */N/* routine returns that angle (in radians). */N/* */#define mth$datan MTH$DATAN #ifdef __NEW_STARLETdouble mth$datan( double *tangent);#else /* __OLD_STARLET */#double mth$datan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GATAN */N/*  */N/* Arc Tangent in Radians */N/* */N/* Given the tangent of an angle, the Arc Tangent in Radians */N/* routine returns that angle (in radians). */N/* */#define mth$gatan MTH$GATAN #ifdef __NEW_STARLETdouble mth$gatan( double *tangent);#else /* __OLD_STARLET */#double mth$gatan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ATAN2 */N/* */N/* Arc Tangent in Radians with Two Arguments */N/* */N/* Given cosine a nd cosine, the Arc Tangent in */N/* Radians with Two Arguments */N/* routine returns the angle (in radians) */N/* whose tangent is given by the quotient of cosine and cosine, */N/* cosine/cosine. */N/* */#define mth$atan2 MTH$ATAN2 #ifdef __N EW_STARLETfloat mth$atan2( float *sine, float *cosine);#else /* __OLD_STARLET */"float mth$atan2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DATAN2 */N/* */N/* Arc Tangent in Radians with Two Arguments */N/* */N/* Given cosine and  cosine, the Arc Tangent in */N/* Radians with Two Arguments */N/* routine returns the angle (in radians) */N/* whose tangent is given by the quotient of cosine and cosine, */N/* cosine/cosine. */N/* */#define mth$datan2 MTH$DATAN2 #ifdef __N EW_STARLETdouble mth$datan2( double *sine, double *cosine);#else /* __OLD_STARLET */$double mth$datan2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GATAN2 */N/* */N/* Arc Tangent in Radians with Two Arguments */N/* */N/* Given cosi ne and cosine, the Arc Tangent in */N/* Radians with Two Arguments */N/* routine returns the angle (in radians) */N/* whose tangent is given by the quotient of cosine and cosine, */N/* cosine/cosine. */N/* */#define mth$gatan2 MTH$GATAN2 #ifd ef __NEW_STARLETdouble mth$gatan2( double *sine, double *cosine);#else /* __OLD_STARLET */$double mth$gatan2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ATAND */N/* */N/* Arc Tangent in Degrees */N/* */N/* Give n the tangent of an angle, the Arc Tangent in Degrees */N/* routine returns that angle (in degrees). */N/* */#define mth$atand MTH$ATAND #ifdef __NEW_STARLETfloat mth$atand( float *tangent);#else /* __OLD_STARLET */"float mth$atand(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DATAND */N/* */N/* Arc Tangent in Degrees */N/* */N/* Given the tangent of an angle, the Arc Tangent in Degrees */N/* routine returns that angle (in degrees). */N/* */#define mth$datand MTH$D ATAND #ifdef __NEW_STARLETdouble mth$datand( double *tangent);#else /* __OLD_STARLET */$double mth$datand(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GATAND */N/* */N/* Arc Tangent in Degrees */N/* */N/* Give n the tangent of an angle, the Arc Tangent in Degrees */N/* routine returns that angle (in degrees). */N/* */#define mth$gatand MTH$GATAND #ifdef __NEW_STARLETdouble mth$gatand( double *tangent);#else /* __OLD_STARLET */$double mth$gatand(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ATANH  */N/* */N/* Hyperbolic Arc Tangent */N/* */N/* Given the hyperbolic tangent of an angle, the Hyperbolic Arc Tangent */N/* routine returns */N/* the hyperbolic arc tangent of that angle. */N/*  */#define mth$atanh MTH$ATANH #ifdef __NEW_STARLETfloat mth$atanh( float *hyperbolic_tangent);#else /* __OLD_STARLET */"float mth$atanh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DATANH */N/* */N/* Hyperbolic Arc Tangent */N /* */N/* Given the hyperbolic tangent of an angle, the Hyperbolic Arc Tangent */N/* routine returns */N/* the hyperbolic arc tangent of that angle. */N/* */#define mth$datanh MTH$DATANH #ifdef __NEW_STARLETdouble mth$datanh( double *hyperbolic_tangen t);#else /* __OLD_STARLET */$double mth$datanh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GATANH */N/* */N/* Hyperbolic Arc Tangent */N/* */N/* Given the hyperbolic tangent of an angle, the Hyperbolic Arc Tangent */ N/* routine returns */N/* the hyperbolic arc tangent of that angle. */N/* */#define mth$gatanh MTH$GATANH #ifdef __NEW_STARLETdouble mth$gatanh( double *hyperbolic_tangent);#else /* __OLD_STARLET */$double mth$gatanh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ATAND2  */N/* */N/* Arc Tangent in Degrees with Two Arguments */N/* */N/* Given cosine and cosine, the Arc Tangent in */N/* Degrees with Two Arguments */N/* routine returns */N/* the angle (in degrees) whose tangent */N/* is given by the quotient of cosine and cosine, */N/* cosine/cosine. */N/* */#define mth$atand2 MTH$ATAND2 #ifdef __NEW_STARLETfloat mth$atand2( float *sine, float *cosine);#else /* __OLD_STARLET */#float mth$atand2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DATAND2 */N/* */N/* Arc Tangent in Degrees with Two Arguments */N/* */N/* Given cosine and cosine, the Arc Tangent in */N/* Degrees with Two Arguments  */N/* routine returns */N/* the angle (in degrees) whose tangent */N/* is given by the quotient of cosine and cosine, */N/* cosine/cosine. */N/* */!#define mth$datand2 MTH$DATAND2 #ifdef __NEW_STARLETdouble mth$datand2( double *sine,  double *cosine);#else /* __OLD_STARLET */%double mth$datand2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GATAND2 */N/* */N/* Arc Tangent in Degrees with Two Arguments */N/* */N/* Given cosine and cosine, the Arc Tangent in  */N/* Degrees with Two Arguments */N/* routine returns */N/* the angle (in degrees) whose tangent */N/* is given by the quotient of cosine and cosine, */N/* cosine/cosine. */N/* */!#defin e mth$gatand2 MTH$GATAND2 #ifdef __NEW_STARLETdouble mth$gatand2( double *sine, double *cosine);#else /* __OLD_STARLET */%double mth$gatand2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CABS */N/* */N/* Complex Absolute Value */N/*  */N/* The Complex Absolute Value routine */N/* returns the absolute value of a complex number (r,i). */N/* */#define mth$cabs MTH$CABS #ifdef __NEW_STARLETfloat mth$cabs( float complex_number [2]);#else /* __OLD_STARLET */!float mth$cabs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CDABS  */N/* */N/* Complex Absolute Value */N/* */N/* The Complex Absolute Value routine */N/* returns the absolute value of a complex number (r,i). */N/*  */#define mth$cdabs MTH$CDABS #ifdef __NEW_STARLETdouble mth$cdabs( double complex_number [2]);#else /* __OLD_STARLET */#double mth$cdabs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CGABS */N/* */N/* Complex Absolute Value */N/*  */N/* The Complex Absolute Value routine */N/* returns the absolute value of a complex number (r,i). */N/* */#define mth$cgabs MTH$CGABS #ifdef __NEW_STARLETdouble mth$cgabs( double complex_number [2]);#else /* __OLD_STARLET */#double mth$cgabs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CCOS */N/* */N/* Cosine of a Complex Number (F-floating Value) */N/* */N/* The Cosine of a Complex Number (F-floating Value) */N/* routine returns the cosine of a complex number as an */N/* F-floating value.  */N/* */ N/* MTH$CEXP */N/* */N/* Complex Exponential (F-floating Value) */N/* */N/* The Complex Exponential (F-floating Value)  */N/* routine returns the complex exponential of a */N/* complex number as an F-floating value. */N/* */ N/* MTH$CLOG */N/* */N/* Complex Natural Logarithm (F-floating Value) */N/* */N/* The Complex Natural Logarithm (F-floating Value) */N/* routine returns the complex natural logarithm of a complex number as */N/* an F-floating value. */N/* */ N/* MTH$CMPLX */N/*  */N/* Complex Number Made from F-floating-Point */N/* */N/* The Complex Number Made from F-floating-Point */P/* routine returns a complex number from two floating-point input values. */N/* */ N/* MTH$DCMPLX  */N/* */N/* Complex Number Made from D- or G-floating-Point */N/* */N/* The Complex Number Made from */N/* D- or G-floating-Point */R/* routine returns a complex number from two D- or G-floating input values. */N/* */#define mth$dcmplx MTH$DCMPLX #ifdef __NEW_STARLETint mth$dcmplx( double complx [2], double *real_part, double *imaginary_part);#else /* __OLD_STARLET */!int mth$dcmplx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GCMPLX */N/* */N/* Complex Number Made from D- or G-floating-Point */N/* */N/* The Complex Number Made from */N/* D- or G-floating-Point */R/* routine returns a complex number from two D- or G-floating input values. */N/* */#define mth$gcmplx  MTH$GCMPLX #ifdef __NEW_STARLETint mth$gcmplx( double complx [2], double *real_part, double *imaginary_part);#else /* __OLD_STARLET */!int mth$gcmplx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CONJG */N/* */N/* Conjugate of a Complex Number (F-floating Value) */N/*  */N/* The Conjugate of a Complex Number (F-floating */N/* Value) */N/* routine returns the complex conjugate (r,-i) of a complex number */N/* (r,i) as an F-floating value. */N/* */ N/* MTH$DCONJG  */N/* */N/* Conjugate of a Complex Number */N/* */N/* The Conjugate of a Complex Number */Q/* routine returns the complex conjugate (r,-i) of a complex number (r,i). */N/* */ #define mth$dconjg MTH$DCONJG #ifdef __NEW_STARLETint mth$dconjg( double complex_conjugate [2], double complex_number [2]);#else /* __OLD_STARLET */!int mth$dconjg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GCONJG */N/* */N/* Conjugate of a Complex Number */N/*  */N/* The Conjugate of a Complex Number */Q/* routine returns the complex conjugate (r,-i) of a complex number (r,i). */N/* */#define mth$gconjg MTH$GCONJG #ifdef __NEW_STARLETint mth$gconjg( double complex_conjugate [2], double complex_number [2]);#else /* __OLD_STARLET */!int mth$gconjg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$COS */N/* */N/* Cosine of Angle Expressed in Radians */N/* */N/* The Cosine of Angle Expressed in Radians */N/* routine returns the cosine of a given angle (in radians).  */N/* */#define mth$cos MTH$COS #ifdef __NEW_STARLETfloat mth$cos( float *angle_in_radians);#else /* __OLD_STARLET */ float mth$cos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DCOS */N/* */N/* Cosine of Angle Expressed in Radians  */N/* */N/* The Cosine of Angle Expressed in Radians */N/* routine returns the cosine of a given angle (in radians). */N/* */#define mth$dcos MTH$DCOS #ifdef __NEW_STARLETdouble mth$dcos( double *angle_in_radians);#else /* __OLD_STARLET */"double mth$dcos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GCOS */N/* */N/* Cosine of Angle Expressed in Radians */N/* */N/* The Cosine of Angle Expressed in Radians */N/* routine returns the cosine of a given angle (in radians).  */N/* */#define mth$gcos MTH$GCOS #ifdef __NEW_STARLETdouble mth$gcos( double *angle_in_radians);#else /* __OLD_STARLET */"double mth$gcos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$COSD */N/* */N/* Cosine of Angle Expressed in Degrees  */N/* */N/* The Cosine of Angle Expressed in Degrees */N/* routine returns the cosine of a given angle (in degrees). */N/* */#define mth$cosd MTH$COSD #ifdef __NEW_STARLETfloat mth$cosd( float *angle_in_degrees);#else /* __OLD_STARLET */!float mth$cosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DCOSD */N/* */N/* Cosine of Angle Expressed in Degrees */N/* */N/* The Cosine of Angle Expressed in Degrees */N/* routine returns the cosine of a given angle (in degrees).  */N/* */#define mth$dcosd MTH$DCOSD #ifdef __NEW_STARLETdouble mth$dcosd( double *angle_in_degrees);#else /* __OLD_STARLET */#double mth$dcosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GCOSD */N/* */N/* Cosine of Angle Expressed in Degre es */N/* */N/* The Cosine of Angle Expressed in Degrees */N/* routine returns the cosine of a given angle (in degrees). */N/* */#define mth$gcosd MTH$GCOSD #ifdef __NEW_STARLETdouble mth$gcosd( double *angle_in_degrees);#else /* __OLD_STARLET */#double mth$gcosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$COSH */N/* */N/* Hyperbolic Cosine */N/* */N/* The Hyperbolic Cosine */N/* routine returns the hyperbolic cosin e of */N/* the input value. */N/* */#define mth$cosh MTH$COSH #ifdef __NEW_STARLETfloat mth$cosh($ float *floating_point_input_value);#else /* __OLD_STARLET */!float mth$cosh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DCOSH */N/*  */N/* Hyperbolic Cosine */N/* */N/* The Hyperbolic Cosine */N/* routine returns the hyperbolic cosine of */N/* the input value. */N/*  */#define mth$dcosh MTH$DCOSH #ifdef __NEW_STARLETdouble mth$dcosh(% double *floating_point_input_value);#else /* __OLD_STARLET */#double mth$dcosh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GCOSH */N/* */N/* Hyperbolic Cosine */N/*  */N/* The Hyperbolic Cosine */N/* routine returns the hyperbolic cosine of */N/* the input value. */N/* */#define mth$gcosh MTH$GCOSH #ifdef __NEW_STARLETdouble mth$gcosh(% double *floating_point_input_value) ;#else /* __OLD_STARLET */#double mth$gcosh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CSIN */N/* */N/* Sine of Complex Number (F-floating Value) */N/* */N/* The Sine of Complex Number (F-floating */N/* Value) */N/* routine returns the sine of a complex number (r,i) as an */N/* F-floating value. */N/* */ N/* MTH$CSQRT */N/* */N/* Complex Square Root (F-floating Value) */N/* */N/* The Complex Square Root (F-floating Value) routine */N/* returns the complex square root of a complex number (r,i). */N/* */ N/* MTH$CVT_D_G */N/*  */N/* Convert One Double-Precision Value */N/* */N/* The Convert One Double-Precision Value routines */N/* convert one double-precision value to the */N/* destination data type and return the result as a function value. */N/* MTH$CVT_D_G converts a D_floating value to G_floating and  */N/* MTH$CVT_G_D converts a G_floating value to a D_floating value. */N/* */!#define mth$cvt_d_g MTH$CVT_D_G #ifdef __NEW_STARLETdouble mth$cvt_d_g(# double *floating_point_input_val);#else /* __OLD_STARLET */%double mth$cvt_d_g(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CVT_G_D */N/*  */N/* Convert One Double-Precision Value */N/* */N/* The Convert One Double-Precision Value routines */N/* convert one double-precision value to the */N/* destination data type and return the result as a function value. */N/* MTH$CVT_D_G converts a D_floating value to G_float ing and */N/* MTH$CVT_G_D converts a G_floating value to a D_floating value. */N/* */!#define mth$cvt_g_d MTH$CVT_G_D #ifdef __NEW_STARLETdouble mth$cvt_g_d(# double *floating_point_input_val);#else /* __OLD_STARLET */%double mth$cvt_g_d(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CVT_DA_GA */N/*  */N/* Convert an Array of Double-Precision Values */N/* */N/* The Convert an Array of */N/* Double-Precision Values */N/* routines convert a contiguous array of */T/* double-precision values to the desti nation data type and return the results */P/* as an array. MTH$CVT_DA_GA converts D_floating values to G_floating and */N/* MTH$CVT_GA_DA converts G_floating values to D_floating. */N/* */%#define mth$cvt_da_ga MTH$CVT_DA_GA #ifdef __NEW_STARLETint mth$cvt_da_ga(& double floating_point_input_array [],% double floating_point_dest_array [], __optional_params);#else /* __OLD_STARLET */$int mth$cvt_da_ga(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CVT_GA_DA */N/* */N/* Convert an Array of Double-Precision Values */N/* */N/* The Convert an Array of */N/* Double-Precision Values  */N/* routines convert a contiguous array of */T/* double-precision values to the destination data type and return the results */P/* as an array. MTH$CVT_DA_GA converts D_floating values to G_floating and */N/* MTH$CVT_GA_DA converts G_floating values to D_floating. */N/* */%#define mth$cvt_ga_da MTH$CVT_GA_DA #ifdef __N EW_STARLETint mth$cvt_ga_da(& double floating_point_input_array [],% double floating_point_dest_array [], __optional_params);#else /* __OLD_STARLET */$int mth$cvt_ga_da(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CDCOS */N/* */N/* Cosine of a Complex Number */N/*  */N/* The Cosine of a Complex Number */N/* routine returns the cosine of a complex number. */N/* */#define mth$cdcos MTH$CDCOS #ifdef __NEW_STARLETint mth$cdcos( double complex_cosine [2], double complex_number [2]);#else /* __OLD_STARLET */ int mth$cdcos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CGCOS */N/* */N/* Cosine of a Complex Number */N/* */N/* The Cosine of a Complex Number */N/* routine returns the cosine of a complex number. */N/*  */#define mth$cgcos MTH$CGCOS #ifdef __NEW_STARLETint mth$cgcos( double complex_cosine [2], double complex_number [2]);#else /* __OLD_STARLET */ int mth$cgcos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CDEXP */N/* */N/* Complex Exponential  */N/* */N/* The Complex Exponential */N/* routine returns the complex exponential of a */N/* complex number. */N/* */#define mth$cdexp MTH$CDEXP #ifdef __NEW_STARLETint mth$cdex p( double complex_exponent [2], double complex_number [2]);#else /* __OLD_STARLET */ int mth$cdexp(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CGEXP */N/* */N/* Complex Exponential */N/* */N/* The Complex Expo nential */N/* routine returns the complex exponential of a */N/* complex number. */N/* */#define mth$cgexp MTH$CGEXP #ifdef __NEW_STARLETint mth$cgexp( double complex_exponent [2], double complex_number [2]);#else /* __OLD_STARLET */ int mth$cgexp(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CDLOG */N/* */N/* Complex Natural Logarithm */N/* */N/* The Complex Natural Logarithm */N/* routine returns the complex natural logarithm of a complex number. */N /* */#define mth$cdlog MTH$CDLOG #ifdef __NEW_STARLETint mth$cdlog( double complex_natural_log [2], double complex_number [2]);#else /* __OLD_STARLET */ int mth$cdlog(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CGLOG */N/* */N/* Complex Natural Logarith m */N/* */N/* The Complex Natural Logarithm */N/* routine returns the complex natural logarithm of a complex number. */N/* */#define mth$cglog MTH$CGLOG #ifdef __NEW_STARLETint mth$cglog( double complex_natural_log [2], double complex_number [2]); #else /* __OLD_STARLET */ int mth$cglog(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CDSIN */N/* */N/* Sine of Complex Number */N/* */N/* The Sine of Complex Number */N/* routine returns the sine of a complex number (r,i). */N/* */#define mth$cdsin MTH$CDSIN #ifdef __NEW_STARLETint mth$cdsin( double complex_sine [2], double complex_number [2]);#else /* __OLD_STARLET */ int mth$cdsin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CGSIN */N/*  */N/* Sine of Complex Number */N/* */N/* The Sine of Complex Number */N/* routine returns the sine of a complex number (r,i). */N/* */#define mth$cgsin MTH$CGSIN #ifdef __NEW_STARLETint mth$cg sin( double complex_sine [2], double complex_number [2]);#else /* __OLD_STARLET */ int mth$cgsin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CDSQRT */N/* */N/* Complex Square Root */N/* */N/* The Complex Square  Root routine */N/* returns the complex square root of a complex number (r,i). */N/* */#define mth$cdsqrt MTH$CDSQRT #ifdef __NEW_STARLETint mth$cdsqrt( double complex_square_root [2], double complex_number [2]);#else /* __OLD_STARLET */!int mth$cdsqrt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$CGSQRT   */N/* */N/* Complex Square Root */N/* */N/* The Complex Square Root routine */N/* returns the complex square root of a complex number (r,i). */N/*   */#define mth$cgsqrt MTH$CGSQRT #ifdef __NEW_STARLETint mth$cgsqrt( double complex_square_root [2], double complex_number [2]);#else /* __OLD_STARLET */!int mth$cgsqrt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$EXP */N/* */N/* Exponential */N/*  */N/* The Exponential */N/* routine returns the exponential of the input value. */N/* */#define mth$exp MTH$EXP #ifdef __NEW_STARLETfloat mth$exp($ float *floating_point_input_value);#else /* __OLD_STARLET */ float mth$exp(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* MTH$DEXP */N/* */N/* Exponential */N/* */N/* The Exponential */N/* routine returns the exponential of the input value. */N/*  */#define mth$dexp MTH$DEXP #ifdef __NEW_STARLETdouble mth$dexp(% double *floating_point_input_value);#else /* __OLD_STARLET */"double mth$dexp(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GEXP */N/* */N/* Exponential */N/* */N/* The Exponential */N/* routine returns the exponential of the input value. */N/* */#define mth$gexp MTH$GEXP #ifdef __NEW_STARLETdouble mth$gexp(% double *floating_point_input_value);#else /* __OLD_STARLET */"double mth$gexp(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HACOS */N/* */N/* Arc Cosine of Angle Expressed in Radians (H-floating Value) */N/* */N/* Given the cosine of an angle, the Arc Cosine of Angle Expressed in */N/* Radians (H-floating Value) routine returns that angle (in radians) in */N/* H-floating-point precision. */N/* */#define mth$hacos MTH$HACOS #ifdef __NEW_STARLETint mth$hacos( int h_radians [4], int cosine [4]);#else /* __OLD_STARLET */ int mth$hacos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HACOSD */N/*  */N/* Arc Cosine of Angle Expressed in Degrees (H-Floating Value) */N/* */N/* Given the cosine of an angle, the Arc Cosine of Angle Expressed in */N/* Degrees (H-Floating Value) */N/* routine returns that */N/* angle (in degrees) as an H-floating value.  */N/* */#define mth$hacosd MTH$HACOSD #ifdef __NEW_STARLETint mth$hacosd( int h_degrees [4], int cosine [4]);#else /* __OLD_STARLET */!int mth$hacosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HASIN */N/* */N/* Arc Sine in Radians (H-floating Value) */N/* */O/* Given the sine of an angle, the Arc Sine in Radians (H-floating Value) */N/* routine returns that angle */N/* (in radians) as an H-floating value. */N/* */#define mth$hasin MTH$HASIN #ifdef __NEW_STARLETint mth$hasin( int h_radians [4], int sine [4]);#else /* __OLD_STARLET */ int mth$hasin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HASIND */N/* */N/* Arc Sine in Degrees (H-Floating Value) */N/* */O/* Given the sine of an angle, the Arc Sine in Degrees (H-Floating Value) */N/* routine returns that angle */N/* (in degrees) as an H-floating value. */N/* */#define mth$hasind MTH$HASIND #ifdef __NEW_STARLETint mth$hasind( int h_degrees [4], int sine [4]);#else /* __OLD_STARLET */!int mth$hasind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HATAN */N/* */N/* Arc Tangent in Radians (H-floating Value) */N/* */U/* Given the tangent of an angle, the Arc Tangent in Radians (H-floating Value) */N/* routine returns that angle (in radians) */N/* as an H-floati ng value. */N/* */#define mth$hatan MTH$HATAN #ifdef __NEW_STARLETint mth$hatan( int h_radians [4], int tangent [4]);#else /* __OLD_STARLET */ int mth$hatan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HATAN2 */N/*  */N/* Arc Tangent in Radians (H-floating Value) with Two Arguments */N/* */N/* Given cosine and cosine, the Arc Tangent in */N/* Radians (H-floating Value) with Two Arguments routine returns the */N/* angle (in radians) as an H-floating value whose tangent is given by */N/* the quotient of cosine and cosine, */N/* cosine/cosine. */N/* */#define mth$hatan2 MTH$HATAN2 #ifdef __NEW_STARLETint mth$hatan2( int h_radians [4], int sine [4], int cosine [4]);#else /* __OLD_STARLET */!int mth$hatan2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HATAND */N/*  */N/* Arc Tangent in Degrees (H-floating Value) */N/* */U/* Given the tangent of an angle, the Arc Tangent in Degrees (H-floating Value) */N/* routine returns that angle (in degrees) */N/* as an H-floating point value. */N/*  */#define mth$hatand MTH$HATAND #ifdef __NEW_STARLETint mth$hatand( int h_degrees [4], int tangent [4]);#else /* __OLD_STARLET */!int mth$hatand(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HATANH */N/* */N/* Hyperbolic Arc Tangent (H-floating Value) */N/*  */N/* Given the hyperbolic tangent of an angle, the Hyperbolic Arc */N/* Tangent (H-floating Value) */N/* routine returns */N/* the hyperbolic arc tangent (as an H-floating value) of that angle. */N/* */#define mth$hatanh MTH$HATANH #ifdef __NEW_STARLET int mth$hatanh( int h_atanh [4], int hyperbolic_tangent [4]);#else /* __OLD_STARLET */!int mth$hatanh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HCOS */N/* */N/* Cosine of Angle Expressed in Radians (H-floating Value) */N/* */N/* The Cosi ne of Angle Expressed in Radians */N/* (H-floating Value) */N/* routine returns the cosine of a given angle (in radians) as an */N/* H-floating value. */N/* */#define mth$hcos MTH$HCOS #ifdef __NEW_STARLET int mth$hcos( int h_cosine [4], int angle_in_radians [4]); #else /* __OLD_STARLET */int mth$hcos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HCOSD */N/* */N/* Cosine of Angle Expressed in Degrees (H-floating Value) */N/* */N/* The Cosine of Angle Expressed in Degrees */N/* !(H-floating Value) */N/* routine returns the cosine of a given angle (in degrees) as an */N/* H-floating value. */N/* */#define mth$hcosd MTH$HCOSD #ifdef __NEW_STARLETint mth$hcosd( int h_cosine [4], int angle_in_degrees [4]);#else /* __OLD_STARLET */ int mth$hcosd(__unknown_params);!#endif" /* #ifdef __NEW_STARLET */N/* MTH$HCOSH */N/* */N/* Hyperbolic Cosine (H-floating Value) */N/* */N/* The Hyperbolic Cosine */N/* routine returns the hyperbolic cosine of #*/N/* the input value as an H-floating value. */N/* */#define mth$hcosh MTH$HCOSH #ifdef __NEW_STARLETint mth$hcosh( int h_cosh [4],% int floating_point_input_value [4]);#else /* __OLD_STARLET */ int mth$hcosh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HEXP */N/* $ */N/* Exponential (H-floating Value) */N/* */N/* The Exponential */N/* routine returns the exponential of the input value as an H-floating */N/* value. */N/* % */#define mth$hexp MTH$HEXP #ifdef __NEW_STARLET int mth$hexp( int h_exp [4],% int floating_point_input_value [4]);#else /* __OLD_STARLET */int mth$hexp(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HLOG10 */N/* */N/* Common Logarithm (H-floating Value) */N/* & */N/* The Common Logarithm (H-floating Value) */N/* routine returns the common (base 10) logarithm of */N/* the input argument as an H-floating value. */N/* */#define mth$hlog10 MTH$HLOG10 #ifdef __NEW_STARLETint mth$hlog10( int h_log10 [4],% int floating_point_inpu 't_value [4]);#else /* __OLD_STARLET */!int mth$hlog10(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HLOG */N/* */N/* Natural Logarithm (H-floating Value) */N/* */N/* The Natural Logarithm (H-floating Value) ( */N/* routine returns the natural (base e) logarithm of */N/* the input argument as an H-floating value. */N/* */#define mth$hlog MTH$HLOG #ifdef __NEW_STARLET int mth$hlog( int h_natlog [4],% int floating_point_input_value [4]);#else /* __OLD_STARLET */int mth$hlog(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HLOG2 ) */N/* */N/* Base 2 Logarithm (H-floating Value) */N/* */N/* The Base 2 Logarithm (H-floating Value) */N/* routine returns the base 2 logarithm of the input value */N/* specified by floating-point-input-value as an *H-floating */N/* value. */N/* */#define mth$hlog2 MTH$HLOG2 #ifdef __NEW_STARLETint mth$hlog2( int h_log2 [4],% int floating_point_input_value [4]);#else /* __OLD_STARLET */ int mth$hlog2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HSIN */N/* + */N/* Sine of Angle Expressed in Radians (H-floating Value) */N/* */N/* The Sine of Angle Expressed in Radians (H-floating */N/* Value) */N/* routine returns the sine of a given angle (in radians) as an */N/* H-floating value. , */N/* */#define mth$hsin MTH$HSIN #ifdef __NEW_STARLET int mth$hsin( int h_sine [4], int angle_in_radians [4]);#else /* __OLD_STARLET */int mth$hsin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HSIND */N/* */N/*- Sine of Angle Expressed in Degrees (H-floating Value) */N/* */N/* The Sine of Angle Expressed in Degrees (H-floating */N/* Value) */N/* routine returns the sine of a given angle (in degrees) as an */N/* H-floating value. */N/* . */#define mth$hsind MTH$HSIND #ifdef __NEW_STARLETint mth$hsind( int h_sine [4], int angle_in_degrees [4]);#else /* __OLD_STARLET */ int mth$hsind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HSINH */N/* */N/* Hyperbolic Sine (H-floating Value) / */N/* */N/* The Hyperbolic Sine (H-floating Value) */N/* routine returns the hyperbolic sine of the input */N/* value specified by floating-point-input-value as an */N/* H-floating value. */N/* */#define mth$hsinh 0MTH$HSINH #ifdef __NEW_STARLETint mth$hsinh( int h_sinh [4],% int floating_point_input_value [4]);#else /* __OLD_STARLET */ int mth$hsinh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HSQRT */N/* */N/* Square Root (H-floating Value) */N/* 1 */N/* The Square Root (H-floating Value) */N/* routine returns the square root of the input value */N/* floating-point-input-value as an H-floating value. */N/* */#define mth$hsqrt MTH$HSQRT #ifdef __NEW_STARLETint mth$hsqrt( int h_sqrt [4],% int floating_point_input_value [4]);#else /* __OLD_STARLET */ in2t mth$hsqrt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HTAN */N/* */N/* Tangent of Angle Expressed in Radians (H-floating Value) */N/* */N/* The Tangent of Angle Expressed in Radians */N/* (H-floating Value) 3 */N/* routine returns the tangent of a given angle (in radians) as an */N/* H-floating value. */N/* */#define mth$htan MTH$HTAN #ifdef __NEW_STARLET int mth$htan( int h_tan [4], int angle_in_radians [4]);#else /* __OLD_STARLET */int mth$htan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* 4MTH$HTAND */N/* */N/* Tangent of Angle Expressed in Degrees (H-floating Value) */N/* */N/* The Tangent of Angle Expressed in Degrees */N/* (H-floating Value) */N/* routine returns the tangen 5t of a given angle (in degrees) as an */N/* H-floating value. */N/* */#define mth$htand MTH$HTAND #ifdef __NEW_STARLETint mth$htand( int h_tan [4], int angle_in_degrees [4]);#else /* __OLD_STARLET */ int mth$htand(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HTANH */6N/* */N/* Compute the Hyperbolic Tangent (H-floating Value) */N/* */N/* The Compute the Hyperbolic Tangent (H-floating */N/* Value) */N/* routine returns the hyperbolic tangent */N/* of the input value 7 as an H-floating value. */N/* */#define mth$htanh MTH$HTANH #ifdef __NEW_STARLETint mth$htanh( int h_tanh [4],% int floating_point_input_value [4]);#else /* __OLD_STARLET */ int mth$htanh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HATAND2 */N/* 8 */N/* Arc Tangent in Degrees (H-floating Value) with Two Arguments */N/* */N/* Given cosine and cosine, MTH$xHTAND2 returns */N/* the angle (in degrees) whose tangent */N/* is given by the quotient of cosine and cosine, */N/* cosine/cosine. */N/* 9 */!#define mth$hatand2 MTH$HATAND2 #ifdef __NEW_STARLETint mth$hatand2( int h_degrees [4], int sine [4], int cosine [4]);#else /* __OLD_STARLET */"int mth$hatand2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$AIMAG */N/* */N/* Imaginary Part of a Complex :Number */N/* */N/* The Imaginary Part of a Complex Number */N/* routine returns the imaginary part of a complex number. */N/* */#define mth$aimag MTH$AIMAG #ifdef __NEW_STARLETfloat mth$aimag( float complex_number [2]);#else /* __OLD_STARLET */"float ;mth$aimag(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DIMAG */N/* */N/* Imaginary Part of a Complex Number */N/* */N/* The Imaginary Part of a Complex Number */N/* routine returns the imaginary part < of a complex number. */N/* */#define mth$dimag MTH$DIMAG #ifdef __NEW_STARLETdouble mth$dimag( double complex_number [2]);#else /* __OLD_STARLET */#double mth$dimag(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GIMAG */N/* */N/* Imaginary =Part of a Complex Number */N/* */N/* The Imaginary Part of a Complex Number */N/* routine returns the imaginary part of a complex number. */N/* */#define mth$gimag MTH$GIMAG #ifdef __NEW_STARLETdouble mth$gimag( double complex_number [2]);#else /* __OLD >_STARLET */#double mth$gimag(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ALOG */N/* */N/* Natural Logarithm */N/* */N/* The Natural Logarithm */N/* routine retu ?rns the natural (base e) logarithm of */N/* the input argument. */N/* */#define mth$alog MTH$ALOG #ifdef __NEW_STARLETfloat mth$alog($ float *floating_point_input_value);#else /* __OLD_STARLET */!float mth$alog(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DLOG @ */N/* */N/* Natural Logarithm */N/* */N/* The Natural Logarithm */N/* routine returns the natural (base e) logarithm of */N/* the input argument. */N/* A */#define mth$dlog MTH$DLOG #ifdef __NEW_STARLETdouble mth$dlog(% double *floating_point_input_value);#else /* __OLD_STARLET */"double mth$dlog(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GLOG */N/* */N/* Natural Logarithm B */N/* */N/* The Natural Logarithm */N/* routine returns the natural (base e) logarithm of */N/* the input argument. */N/* */#define mth$glog MTH$GLOG #ifdef __NEW_STARLETdouble mth$glog(% double *floating_poin Ct_input_value);#else /* __OLD_STARLET */"double mth$glog(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ALOG10 */N/* */N/* Common Logarithm */N/* */N/* The Common Logarithm D */N/* routine returns the common (base 10) logarithm of */N/* the input argument. */N/* */#define mth$alog10 MTH$ALOG10 #ifdef __NEW_STARLETfloat mth$alog10($ float *floating_point_input_value);#else /* __OLD_STARLET */#float mth$alog10(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DLOG10 E */N/* */N/* Common Logarithm */N/* */N/* The Common Logarithm */N/* routine returns the common (base 10) logarithm of */N/* the input argument. F */N/* */#define mth$dlog10 MTH$DLOG10 #ifdef __NEW_STARLETdouble mth$dlog10(% double *floating_point_input_value);#else /* __OLD_STARLET */$double mth$dlog10(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GLOG10 */N/* */N/* Common Logarithm G */N/* */N/* The Common Logarithm */N/* routine returns the common (base 10) logarithm of */N/* the input argument. */N/* */#define mth$glog10 MTH$GLOG10 #ifdef __NEW H_STARLETdouble mth$glog10(% double *floating_point_input_value);#else /* __OLD_STARLET */$double mth$glog10(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ALOG2 */N/* */N/* Base 2 Logarithm */N/* */N/* The Base I 2 Logarithm */N/* routine returns the base 2 logarithm of the input value */N/* specified by floating-point-input-value. */N/* */#define mth$alog2 MTH$ALOG2 #ifdef __NEW_STARLETfloat mth$alog2($ float *floating_point_input_value);#else /* __OLD_STARLET */"float mth$alog2(__unknown_params);!#endif /* #ifdef __NEWJ_STARLET */N/* MTH$DLOG2 */N/* */N/* Base 2 Logarithm */N/* */N/* The Base 2 Logarithm */N/* routine returns the base 2 logarithm of the input value */N/* specif Kied by floating-point-input-value. */N/* */#define mth$dlog2 MTH$DLOG2 #ifdef __NEW_STARLETdouble mth$dlog2(% double *floating_point_input_value);#else /* __OLD_STARLET */#double mth$dlog2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GLOG2 */N/* L */N/* Base 2 Logarithm */N/* */N/* The Base 2 Logarithm */N/* routine returns the base 2 logarithm of the input value */N/* specified by floating-point-input-value. */N/* */#def Mine mth$glog2 MTH$GLOG2 #ifdef __NEW_STARLETdouble mth$glog2(% double *floating_point_input_value);#else /* __OLD_STARLET */#double mth$glog2(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$RANDOM */N/* */N/* Random-Number Generator, Uniformly Distributed */N/* N */N/* The Random-Number Generator, Uniformly Distributed */N/* routine is a general random-number generator. */N/* */#define mth$random MTH$RANDOM #ifdef __NEW_STARLETfloat mth$random( unsigned int *seed);#else /* __OLD_STARLET */#float mth$random(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$REAL O */N/* */N/* Real Part of a Complex Number */N/* */N/* The Real Part of a Complex Number */N/* routine returns the real part of a complex number. */N/* P */#define mth$real MTH$REAL #ifdef __NEW_STARLETfloat mth$real( float complex_number [2]);#else /* __OLD_STARLET */!float mth$real(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DREAL */N/* */N/* Real Part of a Complex Number */N/* Q */N/* The Real Part of a Complex Number */N/* routine returns the real part of a complex number. */N/* */#define mth$dreal MTH$DREAL #ifdef __NEW_STARLETdouble mth$dreal( double complex_number [2]);#else /* __OLD_STARLET */#double mth$dreal(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GREARL */N/* */N/* Real Part of a Complex Number */N/* */N/* The Real Part of a Complex Number */N/* routine returns the real part of a complex number. */N/* S */#define mth$greal MTH$GREAL #ifdef __NEW_STARLETdouble mth$greal( double complex_number [2]);#else /* __OLD_STARLET */#double mth$greal(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$SIN */N/* */N/* Sine of Angle Expressed in Radians */N/* T */N/* The Sine of Angle Expressed in Radians */N/* routine returns the sine of a given angle (in radians). */N/* */#define mth$sin MTH$SIN #ifdef __NEW_STARLETfloat mth$sin( float *angle_in_radians);#else /* __OLD_STARLET */ float mth$sin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* UMTH$DSIN */N/* */N/* Sine of Angle Expressed in Radians */N/* */N/* The Sine of Angle Expressed in Radians */N/* routine returns the sine of a given angle (in radians). */N/* V */#define mth$dsin MTH$DSIN #ifdef __NEW_STARLETdouble mth$dsin( double *angle_in_radians);#else /* __OLD_STARLET */"double mth$dsin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GSIN */N/* */N/* Sine of Angle Expressed in Radians */N/* W */N/* The Sine of Angle Expressed in Radians */N/* routine returns the sine of a given angle (in radians). */N/* */#define mth$gsin MTH$GSIN #ifdef __NEW_STARLETdouble mth$gsin( double *angle_in_radians);#else /* __OLD_STARLET */"double mth$gsin(__unknown_params);!#endif /* #ifdef __NEW_STARLET *X/N/* MTH$SIND */N/* */N/* Sine of Angle Expressed in Degrees */N/* */N/* The Sine of Angle Expressed in Degrees */N/* routine returns the sine of a given angle (in degrees). */N/* Y */#define mth$sind MTH$SIND #ifdef __NEW_STARLETfloat mth$sind( float *angle_in_degrees);#else /* __OLD_STARLET */!float mth$sind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DSIND */N/* */N/* Sine of Angle Expressed in Degrees */N/* Z */N/* The Sine of Angle Expressed in Degrees */N/* routine returns the sine of a given angle (in degrees). */N/* */#define mth$dsind MTH$DSIND #ifdef __NEW_STARLETdouble mth$dsind( double *angle_in_degrees);#else /* __OLD_STARLET */#double mth$dsind(__unknown_params);!#endif /* #ifdef _[_NEW_STARLET */N/* MTH$GSIND */N/* */N/* Sine of Angle Expressed in Degrees */N/* */N/* The Sine of Angle Expressed in Degrees */N/* routine returns the sine of a given angle (in degrees). */N/* \ */#define mth$gsind MTH$GSIND #ifdef __NEW_STARLETdouble mth$gsind( double *angle_in_degrees);#else /* __OLD_STARLET */#double mth$gsind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$SINH */N/* */N/* Hyperbolic Sine ] */N/* */N/* The Hyperbolic Sine */N/* routine returns the hyperbolic sine of the input */N/* value specified by floating-point-input-value. */N/* */#define mth$sinh MTH$SINH #ifdef __NEW_STARLETfloat mth$sinh($ float *floating ^_point_input_value);#else /* __OLD_STARLET */!float mth$sinh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DSINH */N/* */N/* Hyperbolic Sine */N/* */N/* The Hyperbolic Sine _ */N/* routine returns the hyperbolic sine of the input */N/* value specified by floating-point-input-value. */N/* */#define mth$dsinh MTH$DSINH #ifdef __NEW_STARLETdouble mth$dsinh(% double *floating_point_input_value);#else /* __OLD_STARLET */#double mth$dsinh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GSINH ` */N/* */N/* Hyperbolic Sine */N/* */N/* The Hyperbolic Sine */N/* routine returns the hyperbolic sine of the input */N/* value specified by floating-point-input-value. a */N/* */#define mth$gsinh MTH$GSINH #ifdef __NEW_STARLETdouble mth$gsinh(% double *floating_point_input_value);#else /* __OLD_STARLET */#double mth$gsinh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$SINCOS */N/* */N/* Sine and Cosine bof Angle Expressed in Radians */N/* */N/* The Sine and Cosine of Angle Expressed in Radians */N/* routine returns the sine */N/* and the cosine of a given angle (in radians). */N/* */#define mth$sincos MTH$SINCOS #ifdef __N cEW_STARLETint mth$sincos( float *angle_in_radians, float *sine, float *cosine);#else /* __OLD_STARLET */!int mth$sincos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DSINCOS */N/* */N/* Sine and Cosine of Angle Expressed in Radians */N/* d */N/* The Sine and Cosine of Angle Expressed in Radians */N/* routine returns the sine */N/* and the cosine of a given angle (in radians). */N/* */!#define mth$dsincos MTH$DSINCOS #ifdef __NEW_STARLETint mth$dsincos( double *angle_in_radians, double *sine, double *cosine);#else /* __OLD_STARLET */"int mth$edsincos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GSINCOS */N/* */N/* Sine and Cosine of Angle Expressed in Radians */N/* */N/* The Sine and Cosine of Angle Expressed in Radians */N/* routine returns the sine f */N/* and the cosine of a given angle (in radians). */N/* */!#define mth$gsincos MTH$GSINCOS #ifdef __NEW_STARLETint mth$gsincos( double *angle_in_radians, double *sine, double *cosine);#else /* __OLD_STARLET */"int mth$gsincos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HSINCOS g */N/* */N/* Sine and Cosine of Angle Expressed in Radians */N/* */N/* The Sine and Cosine of Angle Expressed in Radians */N/* routine returns the sine */N/* and the cosine of a given angle (in radians). */N/* h */!#define mth$hsincos MTH$HSINCOS #ifdef __NEW_STARLETint mth$hsincos( int angle_in_radians [4], int sine [4], int cosine [4]);#else /* __OLD_STARLET */"int mth$hsincos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$SINCOSD */N/* */N/* Sine and Cosine of Angle E ixpressed in Degrees */N/* */N/* The Sine and Cosine of Angle Expressed in Degrees */N/* routine returns the sine and cosine of a given angle (in degrees). */N/* */!#define mth$sincosd MTH$SINCOSD #ifdef __NEW_STARLETint mth$sincosd( float *angle_in_degrees, float *sine, float *cosine j);#else /* __OLD_STARLET */"int mth$sincosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DSINCOSD */N/* */N/* Sine and Cosine of Angle Expressed in Degrees */N/* */N/* The Sine and Cosine of Angle Expressed in Degrees */N/*k routine returns the sine and cosine of a given angle (in degrees). */N/* */##define mth$dsincosd MTH$DSINCOSD #ifdef __NEW_STARLETint mth$dsincosd( double *angle_in_degrees, double *sine, double *cosine);#else /* __OLD_STARLET */#int mth$dsincosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GSINCOSD */N/* l */N/* Sine and Cosine of Angle Expressed in Degrees */N/* */N/* The Sine and Cosine of Angle Expressed in Degrees */N/* routine returns the sine and cosine of a given angle (in degrees). */N/* */##define mth$gsincosd MTH$GSINCOSD #i mfdef __NEW_STARLETint mth$gsincosd( double *angle_in_degrees, double *sine, double *cosine);#else /* __OLD_STARLET */#int mth$gsincosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HSINCOSD */N/* */N/* Sine and Cosine of Angle Expressed in Degrees */N/* n */N/* The Sine and Cosine of Angle Expressed in Degrees */N/* routine returns the sine and cosine of a given angle (in degrees). */N/* */##define mth$hsincosd MTH$HSINCOSD #ifdef __NEW_STARLETint mth$hsincosd( int angle_in_degrees [4], int sine [4], int cosine [4]);#else /* __OLD_STARLET */#int mth$hsincosd(__unknown_params);!#endif /* #ifdef __NEW_STARLET *o/N/* MTH$SQRT */N/* */N/* Square Root */N/* */N/* The Square Root */N/* routine returns the square root of the input value */N/* floating-point-i pnput-value. */N/* */#define mth$sqrt MTH$SQRT #ifdef __NEW_STARLETfloat mth$sqrt($ float *floating_point_input_value);#else /* __OLD_STARLET */!float mth$sqrt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DSQRT */N/* q*/N/* Square Root */N/* */N/* The Square Root */N/* routine returns the square root of the input value */N/* floating-point-input-value. */N/* */#define mth$dsqrt MT rH$DSQRT #ifdef __NEW_STARLETdouble mth$dsqrt(% double *floating_point_input_value);#else /* __OLD_STARLET */#double mth$dsqrt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GSQRT */N/* */N/* Square Root */N/* s */N/* The Square Root */N/* routine returns the square root of the input value */N/* floating-point-input-value. */N/* */#define mth$gsqrt MTH$GSQRT #ifdef __NEW_STARLETdouble mth$gsqrt(% double *floating_point_input_value);#else /* __OLD_STARLET */#double mth$gsqrt(__unknown_ptarams);!#endif /* #ifdef __NEW_STARLET */N/* MTH$TAN */N/* */N/* Tangent of Angle Expressed in Radians */N/* */N/* The Tangent of Angle Expressed in Radians */N/* routine returns the tangent of a given angle (in radia uns). */N/* */#define mth$tan MTH$TAN #ifdef __NEW_STARLETfloat mth$tan( float *angle_in_radians);#else /* __OLD_STARLET */ float mth$tan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DTAN */N/* */N/* Tangent of Angle Expressed in Radians v */N/* */N/* The Tangent of Angle Expressed in Radians */N/* routine returns the tangent of a given angle (in radians). */N/* */#define mth$dtan MTH$DTAN #ifdef __NEW_STARLETdouble mth$dtan( double *angle_in_radians);#else /* __OLD_STARLET */"double mth$dtan(__unknowwn_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GTAN */N/* */N/* Tangent of Angle Expressed in Radians */N/* */N/* The Tangent of Angle Expressed in Radians */N/* routine returns the tangent of a given angle (in rad xians). */N/* */#define mth$gtan MTH$GTAN #ifdef __NEW_STARLETdouble mth$gtan( double *angle_in_radians);#else /* __OLD_STARLET */"double mth$gtan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$TAND */N/* */N/* Tangent of Angle Expressed in Degr yees */N/* */N/* The Tangent of Angle Expressed in Degrees */N/* routine returns the tangent of a given angle (in degrees). */N/* */#define mth$tand MTH$TAND #ifdef __NEW_STARLETfloat mth$tand( float *angle_in_degrees);#else /* __OLD_STARLET */!float mth$tand(_z_unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DTAND */N/* */N/* Tangent of Angle Expressed in Degrees */N/* */N/* The Tangent of Angle Expressed in Degrees */N/* routine returns the tangent of a given angle { (in degrees). */N/* */#define mth$dtand MTH$DTAND #ifdef __NEW_STARLETdouble mth$dtand( double *angle_in_degrees);#else /* __OLD_STARLET */#double mth$dtand(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GTAND */N/* */N/* Tangent of Angle Exp |ressed in Degrees */N/* */N/* The Tangent of Angle Expressed in Degrees */N/* routine returns the tangent of a given angle (in degrees). */N/* */#define mth$gtand MTH$GTAND #ifdef __NEW_STARLETdouble mth$gtand( double *angle_in_degrees);#else /* __OLD_STARLET * }/#double mth$gtand(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$TANH */N/* */N/* Compute the Hyperbolic Tangent */N/* */N/* The Compute the Hyperbolic Tangent */N/* routine returns the hy ~perbolic tangent */N/* of the input value. */N/* */#define mth$tanh MTH$TANH #ifdef __NEW_STARLETfloat mth$tanh($ float *floating_point_input_value);#else /* __OLD_STARLET */!float mth$tanh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DTANH */N/* */N/* Compute the Hyperbolic Tangent */N/* */N/* The Compute the Hyperbolic Tangent */N/* routine returns the hyperbolic tangent */N/* of the input value. */N/*  */#define mth$dtanh MTH$DTANH #ifdef __NEW_STARLETdouble mth$dtanh(% double *floating_point_input_value);#else /* __OLD_STARLET */#double mth$dtanh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GTANH */N/* */N/* Compute the Hyperbolic Tangent  */N/* */N/* The Compute the Hyperbolic Tangent */N/* routine returns the hyperbolic tangent */N/* of the input value. */N/* */#define mth$gtanh MTH$GTANH #ifdef __NEW_STARLETdouble mth$gtanh(% double *floating_poin t_input_value);#else /* __OLD_STARLET */#double mth$gtanh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$UMAX */N/* */N/* Compute Unsigned Maximum */N/* */N/* The Compute Unsigned Maximum  */N/* routine computes the unsigned longword maximum of n unsigned longword */N/* arguments, where n is greater than or equal to 1. */N/* */#define mth$umax MTH$UMAX #ifdef __NEW_STARLETunsigned int mth$umax( unsigned int *argument);#else /* __OLD_STARLET */(unsigned int mth$umax(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$UMIN  */N/* */N/* Compute Unsigned Minimum */N/* */N/* The Compute Unsigned Minimum */O/* routine computes the unsigned longword minimum of n unsigned longword */N/* arguments, where n is greater than or  */N/* equal to 1. */N/* */#define mth$umin MTH$UMIN #ifdef __NEW_STARLETunsigned int mth$umin( unsigned int *argument);#else /* __OLD_STARLET */(unsigned int mth$umin(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ABS */N/*  */N/* F_floating Absolute Value Routine */N/* */#define mth$abs MTH$ABS #ifdef __NEW_STARLETfloat mth$abs( float *f_floating);#else /* __OLD_STARLET */ float mth$abs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DABS */N/*  */N/* D_floating Absolute Value Routine */N/* */#define mth$dabs MTH$DABS #ifdef __NEW_STARLETdouble mth$dabs( double *d_floating);#else /* __OLD_STARLET */"double mth$dabs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GABS */N/*  */N/* G_floating Absolute Value Routine */N/* */#define mth$gabs MTH$GABS #ifdef __NEW_STARLETdouble mth$gabs( double *g_floating);#else /* __OLD_STARLET */"double mth$gabs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HABS */N/*  */N/* H_floating Absolute Value Routine */N/* */#define mth$habs MTH$HABS #ifdef __NEW_STARLET int mth$habs( int h_abs_val [4], int h_floating [4]);#else /* __OLD_STARLET */int mth$habs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIABS  */N/* */N/* Word Absolute Value Routine */N/* */#define mth$iiabs MTH$IIABS #ifdef __NEW_STARLETshort int mth$iiabs( short int *word);#else /* __OLD_STARLET */&short int mth$iiabs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIABS  */N/* */N/* Longword Absolute Value Routine */N/* */#define mth$jiabs MTH$JIABS #ifdef __NEW_STARLETint mth$jiabs( int *longword);#else /* __OLD_STARLET */ int mth$jiabs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIAND  */N/* */N/* Bitwise AND of Two Word Parameters Routine */N/* */#define mth$iiand MTH$IIAND #ifdef __NEW_STARLETunsigned short int mth$iiand( unsigned short int *word1, unsigned short int *word2);#else /* __OLD_STARLET *//unsigned short int mth$iiand(__unknown_par ams);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIAND */N/* */N/* Bitwise AND of Two Longword Parameters Routine */N/* */#define mth$jiand MTH$JIAND #ifdef __NEW_STARLETunsigned int mth$jiand( unsigned int *longword1, unsigned int *longword2);#e lse /* __OLD_STARLET */)unsigned int mth$jiand(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DBLE */N/* */N/* Convert F_floating to D_floating (Exact) Routine */N/* */#define mth$dble MTH$DBLE #ifdef __NEW_STARLETdouble mth$dble( float  *f_floating);#else /* __OLD_STARLET */"double mth$dble(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GDBLE */N/* */N/* Convert F_floating to G_floating (Exact) Routine */N/* */#define mth$gdble MTH$GDBLE #ifdef __NEW_STARLETdouble mth$g dble( float *f_floating);#else /* __OLD_STARLET */#double mth$gdble(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DIM */N/* */N/* Positive Difference of Two F_floating Parameters Routine */N/* */#define mth$dim MTH$DIM #ifdef __NEW_STARLET float mth$dim( float *f_floating1, float *f_floating2);#else /* __OLD_STARLET */ float mth$dim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DDIM */N/* */N/* Positive Difference of Two D_floating Parameters Routine */N/* */#define mth$ddim MTH$DDI M #ifdef __NEW_STARLETdouble mth$ddim( double *d_floating1, double *d_floating2);#else /* __OLD_STARLET */"double mth$ddim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GDIM */N/* */N/* Positive Difference of Two D_floating Parameters Routine */N/*  */#define mth$gdim MTH$GDIM #ifdef __NEW_STARLETdouble mth$gdim( double *g_floating1, double *g_floating2);#else /* __OLD_STARLET */"double mth$gdim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HDIM */N/* */N/* Positive Difference of Two D_floating Parameters Routine */N/*  */#define mth$hdim MTH$HDIM #ifdef __NEW_STARLET int mth$hdim( int h_floating [4], int h_floating1 [4], int h_floating2 [4]);#else /* __OLD_STARLET */int mth$hdim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIDIM */N/* */N/* Positive Difference of Two Word Parameters Routine  */N/* */#define mth$iidim MTH$IIDIM #ifdef __NEW_STARLETshort int mth$iidim( short int *word1, short int *word2);#else /* __OLD_STARLET */&short int mth$iidim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIDIM */N/* */N/* Positive Diffe rence of Two Longword Parameters Routine */N/* */#define mth$jidim MTH$JIDIM #ifdef __NEW_STARLETint mth$jidim( int *longword1, int *longword2);#else /* __OLD_STARLET */ int mth$jidim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIEOR */N/* */N/* Bitwise Exclusive OR of Two Word Parameters Routine */N/* */#define mth$iieor MTH$IIEOR #ifdef __NEW_STARLETunsigned short int mth$iieor( unsigned short int *word1, unsigned short int *word2);#else /* __OLD_STARLET *//unsigned short int mth$iieor(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIEOR */ N/* */N/* Bitwise Exclusive OR of Two Longword Parameters Routine */N/* */#define mth$jieor MTH$JIEOR #ifdef __NEW_STARLETunsigned int mth$jieor( unsigned int *longword1, unsigned int *longword2);#else /* __OLD_STARLET */)unsigned int mth$jieor(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIFIX  */N/* */N/* Convert F_floating to Word (Truncated) Routine */N/* */#define mth$iifix MTH$IIFIX #ifdef __NEW_STARLETshort int mth$iifix( float *f_floating);#else /* __OLD_STARLET */&short int mth$iifix(__unknown_params);!#endif /* #ifdef __NEW_STARLET * /N/* MTH$JIFIX */N/* */N/* Convert F_floating to Longword (Truncated) Routine */N/* */#define mth$jifix MTH$JIFIX #ifdef __NEW_STARLETint mth$jifix( float *f_floating);#else /* __OLD_STARLET */ int mth$jifix(__unknown_params);!#endif /* #ifdef __NEW_S TARLET */N/* MTH$FLOATI */N/* */N/* Convert Word to F_floating (Exact) Routine */N/* */#define mth$floati MTH$FLOATI #ifdef __NEW_STARLETfloat mth$floati( short int *word);#else /* __OLD_STARLET */#float mth$floati(__unknown_params);!#endif / * #ifdef __NEW_STARLET */N/* MTH$DFLOTI */N/* */N/* Convert Word to D_floating (Exact) Routine */N/* */#define mth$dfloti MTH$DFLOTI #ifdef __NEW_STARLETdouble mth$dfloti( short int *word);#else /* __OLD_STARLET */$double mth$dfloti(__unknown_pa rams);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GFLOTI */N/* */N/* Convert Word to G_floating (Exact) Routine */N/* */#define mth$gfloti MTH$GFLOTI #ifdef __NEW_STARLETdouble mth$gfloti( short int *word);#else /* __OLD_STARLET */$double mth$gfl oti(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$FLOATJ */N/* */N/* Convert Longword to F_floating (Exact) Routine */N/* */#define mth$floatj MTH$FLOATJ #ifdef __NEW_STARLETfloat mth$floatj( int *longword);#else /* __OLD_STARLET */# float mth$floatj(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DFLOTJ */N/* */N/* Convert Longword to D_floating (Exact) Routine */N/* */#define mth$dflotj MTH$DFLOTJ #ifdef __NEW_STARLETdouble mth$dflotj( int *longword);#else /* __OLD _STARLET */$double mth$dflotj(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GFLOTJ */N/* */N/* Convert Longword to G_floating (Exact) Routine */N/* */#define mth$gflotj MTH$GFLOTJ #ifdef __NEW_STARLETdouble mth$gflotj( int *longword); #else /* __OLD_STARLET */$double mth$gflotj(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$FLOOR */N/* */N/* Convert F_floating to Greatest F_floating Integer Routine */N/* */#define mth$floor MTH$FLOOR #ifdef __NEW_STARLETfloat mth$floor( float * f_floating);#else /* __OLD_STARLET */"float mth$floor(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DFLOOR */N/* */N/* Convert D_floating to Greatest D_floating Integer Routine */N/* */#define mth$dfloor MTH$DFLOOR #ifdef __NEW_STARLETdouble mth$d floor( double *d_floating);#else /* __OLD_STARLET */$double mth$dfloor(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GFLOOR */N/* */N/* Convert G_floating to Greatest G_floating Integer Routine */N/* */#define mth$gfloor MTH$GFLOOR #ifdef __NEW_S TARLETdouble mth$gfloor( double *g_floating);#else /* __OLD_STARLET */$double mth$gfloor(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HFLOOR */N/* */N/* Convert H_floating to Greatest H_floating Integer Routine */N/* */#define mth$hfloor MTH$HFLOOR  #ifdef __NEW_STARLETint mth$hfloor( int max_h_float [4], int h_floating [4]);#else /* __OLD_STARLET */!int mth$hfloor(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$AINT */N/* */N/* Convert F_floating to Truncated F_floating Routine */N/*  */#define mth$aint MTH$AINT #ifdef __NEW_STARLETfloat mth$aint( float *f_floating);#else /* __OLD_STARLET */!float mth$aint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DINT */N/* */N/* Convert D_floating to Truncated D_floating Routine */N/*  */#define mth$dint MTH$DINT #ifdef __NEW_STARLETdouble mth$dint( double *d_floating);#else /* __OLD_STARLET */"double mth$dint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIDINT */N/* */N/* Convert D_floating to Word (Truncated) Routine */N/*  */#define mth$iidint MTH$IIDINT #ifdef __NEW_STARLETshort int mth$iidint( double *d_floating);#else /* __OLD_STARLET */'short int mth$iidint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIDINT */N/* */N/* Convert D_floating to Longword (Truncated) Routine */N/*  */#define mth$jidint MTH$JIDINT #ifdef __NEW_STARLETint mth$jidint( double *d_floating);#else /* __OLD_STARLET */!int mth$jidint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GINT */N/* */N/* Convert G_floating to G_floating (Truncated) Routine */N/*  */#define mth$gint MTH$GINT #ifdef __NEW_STARLETdouble mth$gint( double *g_floating);#else /* __OLD_STARLET */"double mth$gint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIGINT */N/* */N/* Convert G_floating to Word (Truncated) Routine  */N/* */#define mth$iigint MTH$IIGINT #ifdef __NEW_STARLETshort int mth$iigint( double *g_floating);#else /* __OLD_STARLET */'short int mth$iigint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIGINT */N/* */N/* Convert G_floating to Longword (Truncate d) Routine */N/* */#define mth$jigint MTH$JIGINT #ifdef __NEW_STARLETint mth$jigint( double *g_floating);#else /* __OLD_STARLET */!int mth$jigint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HINT */N/* */N/* Convert H_floating to H_ floating (Truncated) Routine */N/* */#define mth$hint MTH$HINT #ifdef __NEW_STARLET int mth$hint( int trunc_h_flt [4], int h_floating [4]);#else /* __OLD_STARLET */int mth$hint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIHINT */N/* */ N/* Convert H_floating to Truncated Word Routine */N/* */#define mth$iihint MTH$IIHINT #ifdef __NEW_STARLETshort int mth$iihint( int h_floating [4]);#else /* __OLD_STARLET */'short int mth$iihint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIHINT */N/*  */N/* Convert H_floating to Truncated Longword Routine */N/* */#define mth$jihint MTH$JIHINT #ifdef __NEW_STARLETint mth$jihint( int h_floating [4]);#else /* __OLD_STARLET */!int mth$jihint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IINT */N/*  */N/* Convert F_floating to Word (Truncated) Routine */N/* */#define mth$iint MTH$IINT #ifdef __NEW_STARLETshort int mth$iint( float *f_floating);#else /* __OLD_STARLET */%short int mth$iint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JINT */N/*  */N/* Convert F_floating to Longword (Truncated) Routine */N/* */#define mth$jint MTH$JINT #ifdef __NEW_STARLET int mth$jint( float *f_floating);#else /* __OLD_STARLET */int mth$jint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIOR */N/*  */N/* Bitwise Inclusive OR of Two Word Parameters Routine */N/* */#define mth$iior MTH$IIOR #ifdef __NEW_STARLETunsigned short int mth$iior( unsigned short int *word1, unsigned short int *word2);#else /* __OLD_STARLET */.unsigned short int mth$iior(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIOR  */N/* */N/* Bitwise Inclusive OR of Two Longword Parameters Routine */N/* */#define mth$jior MTH$JIOR #ifdef __NEW_STARLETunsigned int mth$jior( unsigned int *longword1, unsigned int *longword2);#else /* __OLD_STARLET */(unsigned int mth$jior(__unknown_params); !#endif /* #ifdef __NEW_STARLET */N/* MTH$AIMAX0 */N/* */N/* F_floating Maximum of N WordParameters Routine */N/* */#define mth$aimax0 MTH$AIMAX0 #ifdef __NEW_STARLETfloat mth$aimax0( short int *word);#else /* __OLD_STARLET */#float mth$aimax0(__u nknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$AJMAX0 */N/* */N/* F_floating Maximum of N Longword Parameters Routine */N/* */#define mth$ajmax0 MTH$AJMAX0 #ifdef __NEW_STARLETfloat mth$ajmax0( int *longword);#else /* __OLD_STARLET */#float mth$ajmax0(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IMAX0 */N/* */N/* Word Maximum of N Word Parameters Routine */N/* */#define mth$imax0 MTH$IMAX0 #ifdef __NEW_STARLETshort int mth$imax0( short int *word);#else /* __OLD_STA RLET */&short int mth$imax0(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JMAX0 */N/* */N/* Longword Maximum of N Longword Parameters Routine */N/* */#define mth$jmax0 MTH$JMAX0 #ifdef __NEW_STARLETint mth$jmax0( int *longword);#else /*  __OLD_STARLET */ int mth$jmax0(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$AMAX1 */N/* */N/* F_floating Maximum of N F_floating Parameters Routine */N/* */#define mth$amax1 MTH$AMAX1 #ifdef __NEW_STARLETfloat mth$amax1( float *f_floating); #else /* __OLD_STARLET */"float mth$amax1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DMAX1 */N/* */N/* D_floating Maximum of N D_floating Parameters Routine */N/* */#define mth$dmax1 MTH$DMAX1 #ifdef __NEW_STARLETdouble mth$dmax1( doubl e *d_floating);#else /* __OLD_STARLET */#double mth$dmax1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GMAX1 */N/* */N/* G_floating Maximum of N G_floating Parameters Routine */N/* */#define mth$gmax1 MTH$GMAX1 #ifdef __NEW_STARLETdouble m th$gmax1( double *g_floating);#else /* __OLD_STARLET */#double mth$gmax1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HMAX1 */N/* */N/* H_floating Maximum of N H_floating Parameters Routine */N/* */#define mth$hmax1 MTH$HMAX1 #ifdef __NEW _STARLETint mth$hmax1( int h_float_max [4], int h_floating [4]);#else /* __OLD_STARLET */ int mth$hmax1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IMAX1 */N/* */N/* Word Maximum of N F_floating Parameters Routine */N/* */#define mth$i max1 MTH$IMAX1 #ifdef __NEW_STARLETshort int mth$imax1( float *f_floating);#else /* __OLD_STARLET */&short int mth$imax1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JMAX1 */N/* */N/* Longword Maximum of N F_floating Parameters Routine */N/*  */#define mth$jmax1 MTH$JMAX1 #ifdef __NEW_STARLETint mth$jmax1( float *f_floating);#else /* __OLD_STARLET */ int mth$jmax1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$AIMIN0 */N/* */N/* F_floating Minimum of N Word Parameters Routine */N/*  */#define mth$aimin0 MTH$AIMIN0 #ifdef __NEW_STARLETfloat mth$aimin0( short int *word);#else /* __OLD_STARLET */#float mth$aimin0(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$AJMIN0 */N/* */N/* F_floating Minimum of N Longword Parameters Routine */N/*  */#define mth$ajmin0 MTH$AJMIN0 #ifdef __NEW_STARLETfloat mth$ajmin0( int *longword);#else /* __OLD_STARLET */#float mth$ajmin0(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IMIN0 */N/* */N/* Word Minimum of N Word Parameters Routine */N/*  */#define mth$imin0 MTH$IMIN0 #ifdef __NEW_STARLETshort int mth$imin0( short int *word);#else /* __OLD_STARLET */&short int mth$imin0(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JMIN0 */N/* */N/* Longword Minimum of N Longword Parameters Routine */N/*  */#define mth$jmin0 MTH$JMIN0 #ifdef __NEW_STARLETint mth$jmin0( int *longword);#else /* __OLD_STARLET */ int mth$jmin0(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$AMIN1 */N/* */N/* F_floating Minimum of N F_floating Parameters Routine */N/*  */#define mth$amin1 MTH$AMIN1 #ifdef __NEW_STARLETfloat mth$amin1( float *f_floating);#else /* __OLD_STARLET */"float mth$amin1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DMIN1 */N/* */N/* D_floating Minimum of N D_floating Parameters Routine */N/*  */#define mth$dmin1 MTH$DMIN1 #ifdef __NEW_STARLETdouble mth$dmin1( double *d_floating);#else /* __OLD_STARLET */#double mth$dmin1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GMIN1 */N/* */N/* G_floating Minimum of N G_floating Parameters Routine  */N/* */#define mth$gmin1 MTH$GMIN1 #ifdef __NEW_STARLETdouble mth$gmin1( double *g_floating);#else /* __OLD_STARLET */#double mth$gmin1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HMIN1 */N/* */N/* H_floating Minimum of N H_floating Parameters Routine */N/* */#define mth$hmin1 MTH$HMIN1 #ifdef __NEW_STARLETint mth$hmin1( int h_float_max [4], int h_floating [4]);#else /* __OLD_STARLET */ int mth$hmin1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IMIN1 */N/* */N/* Word M inimum of N F_floating Parameters Routine */N/* */#define mth$imin1 MTH$IMIN1 #ifdef __NEW_STARLETshort int mth$imin1( float *f_floating);#else /* __OLD_STARLET */&short int mth$imin1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JMIN1 */N/*  */N/* Longword Minimum of N F_floating Parameters Routine */N/* */#define mth$jmin1 MTH$JMIN1 #ifdef __NEW_STARLETint mth$jmin1( float *f_floating);#else /* __OLD_STARLET */ int mth$jmin1(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$AMOD */N/*  */N/* Remainder of Two F_floating Parameters Routine */N/* */#define mth$amod MTH$AMOD #ifdef __NEW_STARLETfloat mth$amod( float *dividend, float *divisor);#else /* __OLD_STARLET */!float mth$amod(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DMOD */N/*  */N/* Remainder of Two D_floating Parameters Routine */N/* */#define mth$dmod MTH$DMOD #ifdef __NEW_STARLETdouble mth$dmod( double *dividend, double *divisor);#else /* __OLD_STARLET */"double mth$dmod(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GMOD */N/*  */N/* Remainder of Two G_floating Parameters Routine */N/* */#define mth$gmod MTH$GMOD #ifdef __NEW_STARLETdouble mth$gmod( double *dividend, double *divisor);#else /* __OLD_STARLET */"double mth$gmod(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HMOD  */N/* */N/* Remainder of Two H_floating Parameters Routine */N/* */#define mth$hmod MTH$HMOD #ifdef __NEW_STARLET int mth$hmod( int h_mod [4], int dividend [4], int divisor [4]);#else /* __OLD_STARLET */int mth$hmod(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IMOD  */N/* */N/* Remainder of Two Word Parameters Routine */N/* */#define mth$imod MTH$IMOD #ifdef __NEW_STARLETshort int mth$imod( short int *dividend, short int *divisor);#else /* __OLD_STARLET */%short int mth$imod(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JMOD */N/* */N/* Remainder of Two Longword Parameters Routine */N/* */#define mth$jmod MTH$JMOD #ifdef __NEW_STARLET int mth$jmod( int *dividend, int *divisor);#else /* __OLD_STARLET */int mth$jmod(__unknown_p arams);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ANINT */N/* */N/* Convert F_floating to Nearest F_floating Integer Routine */N/* */#define mth$anint MTH$ANINT #ifdef __NEW_STARLETfloat mth$anint( float *f_floating);#else /* __OLD_STARLET */"float mth$anin t(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DNINT */N/* */N/* Convert D_floating to Nearest D_floating Integer Routine */N/* */#define mth$dnint MTH$DNINT #ifdef __NEW_STARLETdouble mth$dnint( double *d_floating);#else /* __OLD_STARLET */ #double mth$dnint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIDNNT */N/* */N/* Convert D_floating to Word Integer Routine */N/* */#define mth$iidnnt MTH$IIDNNT #ifdef __NEW_STARLETshort int mth$iidnnt( double *d_floating);#e lse /* __OLD_STARLET */'short int mth$iidnnt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIDNNT */N/* */N/* Convert D_floating to Nearest Longword Integer Routine */N/* */#define mth$jidnnt MTH$JIDNNT #ifdef __NEW_STARLETint mth$jidnnt( dou ble *d_floating);#else /* __OLD_STARLET */!int mth$jidnnt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GNINT */N/* */N/* Convert G_floating to Nearest G_floating Integer Routine */N/* */#define mth$gnint MTH$GNINT #ifdef __NEW_STARLETdouble m th$gnint( double *g_floating);#else /* __OLD_STARLET */#double mth$gnint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIGNNT */N/* */N/* Convert T_floating to Nearest G_floating Integer Routine */N/* */#define mth$iignnt MTH$IIGNNT #ifdef __N EW_STARLETshort int mth$iignnt( double *g_floating);#else /* __OLD_STARLET */'short int mth$iignnt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIGNNT */N/* */N/* Convert G_floating to Nearest Longword Integer Routine */N/* */#define mth$jignnt  MTH$JIGNNT #ifdef __NEW_STARLETint mth$jignnt( double *g_floating);#else /* __OLD_STARLET */!int mth$jignnt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HNINT */N/* */N/* Convert H_floating to Nearest H_floating Integer Routine */N/* */#def ine mth$hnint MTH$HNINT #ifdef __NEW_STARLETint mth$hnint( int nearst_h_flt [4], int h_floating [4]);#else /* __OLD_STARLET */ int mth$hnint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IIHNNT */N/* */N/* Convert H_floating to Nearest Word Integer Routine */N/*  */#define mth$iihnnt MTH$IIHNNT #ifdef __NEW_STARLETshort int mth$iihnnt( int h_floating [4]);#else /* __OLD_STARLET */'short int mth$iihnnt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JIHNNT */N/* */N/* Convert H_floating to Nearest Longword Integer Routine */N/*  */#define mth$jihnnt MTH$JIHNNT #ifdef __NEW_STARLETint mth$jihnnt( int h_floating [4]);#else /* __OLD_STARLET */!int mth$jihnnt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$ININT */N/* */N/* Convert F_floating to Nearest Word Integer Routine */N/*  */#define mth$inint MTH$ININT #ifdef __NEW_STARLETshort int mth$inint( float *f_floating);#else /* __OLD_STARLET */&short int mth$inint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JNINT */N/* */N/* Convert F_floating to Nearest Longword Integer Routine  */N/* */#define mth$jnint MTH$JNINT #ifdef __NEW_STARLETint mth$jnint( float *f_floating);#else /* __OLD_STARLET */ int mth$jnint(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$INOT */N/* */N/* Bitwise Complement of Word Parameter Routine  */N/* */#define mth$inot MTH$INOT #ifdef __NEW_STARLETunsigned short int mth$inot( unsigned short int *word);#else /* __OLD_STARLET */.unsigned short int mth$inot(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JNOT */N/* */N/* Bitwise Co mplement of Longword Parameter Routine */N/* */#define mth$jnot MTH$JNOT #ifdef __NEW_STARLETunsigned int mth$jnot( unsigned int *longword);#else /* __OLD_STARLET */(unsigned int mth$jnot(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DPROD */N/*  */N/* D_floating Product of Two F_floating Parameters Routine */N/* */#define mth$dprod MTH$DPROD #ifdef __NEW_STARLETdouble mth$dprod( float *f_floating1, float *f_floating2);#else /* __OLD_STARLET */#double mth$dprod(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GPROD */N/*  */N/* G_floating Product of Two F_floating Parameters Routine */N/* */#define mth$gprod MTH$GPROD #ifdef __NEW_STARLETdouble mth$gprod( float *f_floating1, float *f_floating2);#else /* __OLD_STARLET */#double mth$gprod(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$SGN  */N/* */N/* F_floating Sign Function */N/* */#define mth$sgn MTH$SGN #ifdef __NEW_STARLET int mth$sgn( unsigned int *f_or_d_floating);#else /* __OLD_STARLET */int mth$sgn(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IISHFT  */N/* */N/* Bitwise Shift of Word Routine */N/* */#define mth$iishft MTH$IISHFT #ifdef __NEW_STARLETunsigned short int mth$iishft( unsigned short int *word, short int *shift_cnt);#else /* __OLD_STARLET */0unsigned short int mth$iishft(__unknown_params);!#endif /* #ifdef _ _NEW_STARLET */N/* MTH$JISHFT */N/* */N/* Bitwise Shift of Longword Routine */N/* */#define mth$jishft MTH$JISHFT #ifdef __NEW_STARLETunsigned int mth$jishft( unsigned int *longword, int *shift_cnt);#else /* __OLD_STARLET */*unsigned  int mth$jishft(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$SIGN */N/* */N/* F_floating Transfer of Sign of Y to Sign of X Routine */N/* */#define mth$sign MTH$SIGN #ifdef __NEW_STARLETfloat mth$sign( float *f_float_x, float *f_float_y); #else /* __OLD_STARLET */!float mth$sign(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$DSIGN */N/* */N/* D_floating Transfer of Sign of Y to Sign of X Routine */N/* */#define mth$dsign MTH$DSIGN #ifdef __NEW_STARLETdouble mth$dsign( doubl e *d_float_x, double *d_float_y);#else /* __OLD_STARLET */#double mth$dsign(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$GSIGN */N/* */N/* G_floating Transfer of Sign of X to Sign of X Routine */N/* */#define mth$gsign MTH$GSIGN #ifdef __N EW_STARLETdouble mth$gsign( double *g_float_x, double *g_float_y);#else /* __OLD_STARLET */#double mth$gsign(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$HSIGN */N/* */N/* H_floating Transfer of Sign of Y to Sign of X Routine */N/* */#define  mth$hsign MTH$HSIGN #ifdef __NEW_STARLETint mth$hsign( int h_result [4], int h_float_x [4], int h_float_y [4]);#else /* __OLD_STARLET */ int mth$hsign(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$IISIGN */N/* */N/* Word Transfer of Sign of Y to Sign of X Routine */N/*  */#define mth$iisign MTH$IISIGN #ifdef __NEW_STARLETshort int mth$iisign( short int *word_x, short int *word_y);#else /* __OLD_STARLET */'short int mth$iisign(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$JISIGN */N/* */N/* Longword Transfer of Sign of Y to Sign of X Routine  */N/* */#define mth$jisign MTH$JISIGN #ifdef __NEW_STARLETint mth$jisign( int *longwrd_x, int *longwrd_y);#else /* __OLD_STARLET */!int mth$jisign(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$SNGL */N/* */N/* Convert D_floating to F_floating ( Rounded) Routine */N/* */#define mth$sngl MTH$SNGL #ifdef __NEW_STARLETfloat mth$sngl( double *d_floating);#else /* __OLD_STARLET */!float mth$sngl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* MTH$SNGLG */N/* */N/* Convert G_floating to F_floating (Rounded) Routine */N/* */#define mth$snglg MTH$SNGLG #ifdef __NEW_STARLETfloat mth$snglg( double *g_floating);#else /* __OLD_STARLET */"float mth$snglg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __MTH_ROUTINES_LOADED */ ww$/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]MTHMSG.SDI;1 *//************************************************* *******************************************************************************//*** MODULE $MTHDEF ***/#ifndef __MTHDEF_LOADED#define __MTHDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:39.62 */N/* */N/* DEC/CMS REPLACEMENT HISTORY, ELEMENT MTHMSG.MSG */W/* 2H1 27-MAY-1986 11:12:01 GAMACHE "Create new SMP thread from V5.0_BL2 modules" */[/* 2E1 3-APR-1986 20:55:46 HOLSTEIN "Create new Exec Reorg thread from V4.4 modules" */T/* 2F1 18-MAR-1986 20:31:28 HOLSTEIN "Create new SMP thread from V4.4 modules" */Z/* 2D1 17-DEC-1985 09:08:44 FIORELLI "Create new exec reorg thread from BL7 modules" */S/* *2 3-SEP-1985 15:59:52 MAILMAN "extend transfer vector; add mth$_notimp" */N/* 1A1 20-JUL-1985 14:44:33 SYSTEMBUILD "Initial SMP entry" */N/* *1 18-JUN-1985 03:36:07 SYSTEMBUILD "Initial entry of V4.0 source" */N/* DEC/CMS REPLACEMENT HISTORY, ELEMENT MTHMSG.MSG  */N/* FILE: MTHMSG.MSG EDIT: JCW2004 */N/* */Q/***************************************************************************** *//** * */8/** COPYRIGHT (C) 1978, 1980, 1982, 1984 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITH OUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/*  */N/* */P/* 2-001 - CONVERT TO MESSAGE UTILITY SOURCE FORMAT. ADAPTED FROM MTHMSG.MDL */I/* VERSION 1-004. SBL 22-APR-1981 */N/* 2-002 - ADD .TITLE. SBL 28-AUG-1982 */N/* 2-003 - ADD MTH$_NOTIMP. SMM 03-SEP-1985 */N/* 2-004 - ADDED VECTOR MATH MESSAGES. JCW 24-FEB-88. */N/*+  */N/* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */N/* */I/* MTH$_ABCMNOXYZ */N/* */O/* IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */Q/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR */N/* MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS. */N/* */P/* THE NAMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD APPEAR */N/* IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION. */N/* */N/* MACRO-32 PROGRAMMING:  */N/* */N/* THE MACROS CALL: */N/* */I/* $MTHDEF */N/* */N/* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */N/* T HE STS$V_MSG_ID IS THE FORTRAN ERROR NUMBER (1:94). */N/* THE RUN-TIME LIBRARY DECLARES THESE SYMBOLS EXTERNAL; */N/* THE MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER. */N/*- */;/* ; SET SUB-SYSTEM SPECIFIC BIT AND MAKE SEVERE */;/* ; SET LH TO 22 (DECIMAL) MTH$ PREFIX */#define MTH$_FACILITY 22#define MTH$_WRONUMARG 1475204#define MTH$_INVARGMAT 1475212#define MTH$_UNDEXP 1475220#define MTH$_LOGZERNEG 1475228#define MTH$_SQUROONEG 1475236;/* ; SET SUB-SYSTEM SPECIFIC BIT AND MAKE SEVERE */;/* ; SET LH TO 22 (DECIMAL) MTH$ PREFIX */#define MTH$_SIGLOSMAT 1475260#define MTH$_FLOOVEMAT 1475268#define MTH$_FLOUNDMAT 1475276#define MTH$_NOTIMP 1475284N/* MTH$NOT_IMPLEMENTED */"#define MTH$_VEC_INVARGMAT 1475292#define MTH$_VEC_UNDEXP 1475300"#define MTH$_VEC_LOGZERNEG 1475308"#define MTH$_VEC_SQUROONEG 1475316"#define MTH$_VEC_FLOOVEMAT 1475324"#define MTH$_VEC_FLOUNDMAT 1475332#define MTH$_SINCOSSIG 1475260 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __MTHDEF_LOADE D */ ww9%/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $NAMDEF ***/#ifndef __NAMDEF_LOADED#define __NAMDEF _LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* name block field definitions  */N/* */N/* the nam block is used to communicate optional */N/* filename-related information */N/* */ #ifdef __NEW_STARLETstruct _namdef;struct _namldef;#elsestruct namdef;struct namldef;#endifN#define NAM$C_BID 2 /* code for nam block */Z#define NAM$C_MAXRSS 255 /* maximum resultant name string size (network) */X#define NAM$C_MAXRSSLCL 255 /* maximum resultant name string size (local) */#define NAM$M_PWD 0x1#define NAM$M_FILL_1 0x2#define NAM$M_FILL_2 0x4#define NAM$M_SYNCHK 0x8#define NAM$M_NOCONCEAL 0x10#define NAM$M_SLPARSE 0x20#define NAM$M_SRCHXABS 0x40"#define NAM$M_NO_SHORT_UPCASE 0x80[#define NAM$C_UFS 0 /* Unknown file system for remote file access or */N/* not applicable for local file access or */N#define NAM$C_NO_RFS 0 /* task-to-task operation */N#define NAM$C_RMS11 1 /* RMS-11 */N#define NAM$C_RMS20 2 /* RMS-20 */N#define NAM$C_RMS32 3 /* RMS-32 */N#define NAM$C_FCS11 4 /* FCS-11 */N#define NAM$C_RT11FS 5 /* RT-11 file system */N#define NAM$C_TOPS20FS 7 /* TOPS-20 file system */N#define NAM$C_TOPS10FS 8 /* TOPS-10 file system */N#define NAM$C_RMS32S 10 /* RMS-32 subset (e.g., VAXELAN) */N#define NAM$C_CPMFS 11 /* CP/M file system */N#define NAM$C_MS_DOSFS 12 /* MS/DOS file system */N#define NAM$C_ULTRIX32_FS 13  /* Ultrix-32 file system */N#define NAM$C_ULTRIX11_FS 14 /* Ultrix-11 file system */N#define DAP$K_SNADTF_FS 15 /* SNADTF compatable FS */N/*+++++++++++++++++++++++ */N#define NAM$C_DVI 16 /* length of dvi field */N/*+++++***** */#define NAM$M_IFI 0x10000 #define NAM$M_SRCHNMF 0x40000000#define NAM$M_SVCTX 0x80000000N#define NAM$K_BLN_V2 56 /* Version 2 name block length */N#define NAM$C_BLN_V2 56 /* Version 2 name block length */#define NAM$M_EXP_VER 0x1#define NAM$M_EXP_TYPE 0x2#define NAM$M_EXP_NAME 0x4#define NAM$M_WILD_VER 0x8#define NAM$M_WILD_TYPE 0x10#define NAM$M_WILD_NAME 0x20#define NAM$M_EXP_DIR 0x40#define NAM$M_EXP_DEV 0x80#define NAM$M_WILDCARD 0x100#define NAM$M_DIR_LVLS_G7 0x200#define NAM$M_WILD_SFDG7 0x400#define NAM$M_SEARCH_LIST 0x800#define NAM$M_CNCL_DEV 0x1000#define NAM$M_ROOT_DIR 0x2000#define NAM$M_LOWVER 0x4000#define NAM$M_HIGHVER 0x8000#define NAM$M_PPF 0x10000#define NAM$M_NODE 0x20000#define NAM$M_QUOTED 0x40000#define NAM$M_GRP_MBR 0x80000#define NAM$M_WILD_DIR 0x100000#define NAM$M_DIR_LVLS 0xE00000 #define NAM$M_WILD_UFD 0x1000000!#define NAM$M_WILD_SFD1 0x2000000!#define NAM$M_WILD_SFD2 0x4000000!#define NAM$M_WILD_SFD3 0x8000000"#define NAM$M_WILD_SFD4 0x10000000"#define NAM$M_WILD_SFD5 0x20000000"#define NAM$M_WILD_SFD6 0x40000000"#define NAM$M_WILD_SFD7 0x80000000 #define NAM$M_WILD_GRP 0x1000000 #define NAM$M_WILD_MBR 0x2000000#define NAM$M_DID 0x1#define NAM$M_FID 0x2#define NAM$M_RES_DID 0x4#define NAM$M_RES_FID 0x8#define NAM$M_RES_ESCAPE 0x10#define NAM$M_RES_UNICODE 0x20  9#ifdef __cplusplus /* Define structure prototypes */struct _namldef; #endif /* #ifdef __cplusplus */ #ifdef _ _NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _namdef {#pragma __nomember_alignmentN unsigned char nam$b_bid; /* block id */N unsigned char nam$b_bln; /* block length */N/*+++++++++++++++++++++++ */N/* the following 3 fields must not be rearranged relative to each other */N/* */N unsigned char nam$b_rss; /* resultant string area size */N unsigned char nam$b_rsl; /* resultant string length */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endifN char *nam$l_rsa; /* resultant string area address */N/*----------------------- */ __union {N unsigned char nam$b_nop; /* Name options */ __struct {c unsigned nam$v_pwd : 1; /* Return password if present in nodespec string and any */N/* other task-specific data of the form /netacp_data" */N/* (default is to mask out password from expanded a nd */N/* resultant name strings and to create a logical name */N/* whose equivalence string is the unaltered nodespec) */T unsigned nam$v_fill_1 : 1; /* unused. (used to be undocumented ROD) */T unsigned nam$v_fill_2 : 1; /* unused. (used to be undocumented SOD) */V unsigned nam$v_synchk : 1; /* Only do syntax check on $parse operation */T unsigned nam$v_noconceal : 1; /* Do not concea l device/root directory */c unsigned nam$v_slparse : 1; /* Parse search list (not documented) -- used by BACKUP. */c unsigned nam$v_srchxabs : 1; /* Fill in attached XABS on $SEARCH operations over the */N/* network (not documented) -- used by directory. */N unsigned nam$v_no_short_upcase : 1; /* Don't upcase the ESA */ } nam$r_nop_bits; } nam$r_nop_overlay;` unsigned char nam$b_rfs; /* Remote fi le system type (currently not documented) */N/* Note: This field is reserved for use by Digital */N/* the following 3 fields must not be rearranged relative to each other */N/* */N unsigned char nam$b_ess; /* expanded string area size */N unsigned char nam$b_esl; /* expanded string length */N char *nam$l_esa; /* expanded string a rea address */N/*----------------------- */ __union {_ struct _namdef *nam$l_rlf; /* related file nam block addr ~~~ struct namdef ~~~ */b struct _namldef *nam$l_rlf_naml; /* related file naml block addr ~~~ struct namldef ~~~ */ } nam$r_rlf_overlay;N char nam$t_dvi [16]; /* device id */N/* the location of the following fields must not */N/*  be changed due to their commonality with the fib */ __union {N unsigned short int nam$w_fid [3]; /* file id */ __struct {N unsigned short int nam$w_fid_num; /* file number */N unsigned short int nam$w_fid_seq; /* sequence number */ __union {N unsigned short int nam$w_fid_rvn; /* relative volume number */ __struct {N  unsigned char nam$b_fid_rvn; /* alternate format RVN */] unsigned char nam$b_fid_nmx; /* alternate format file number extension */+ } nam$r_fid_rvn_fields;( } nam$r_fid_rvn_overlay; } nam$r_fid_fields; } nam$r_fid_overlay; __union {N unsigned short int nam$w_did [3]; /* directory id */ __struct {N unsigned short int nam$w_did_num; /* file number */N unsigned short int nam$w_did_seq; /* sequence number */ __union {N unsigned short int nam$w_did_rvn; /* relative volume number */ __struct {N unsigned char nam$b_did_rvn; /* alternate format RVN */] unsigned char nam$b_did_nmx; /* alternate format file number extension */+ } nam$r_did_rvn_fields;( } nam$r_did_rvn_overlay; } nam$r_did_ fields; } nam$r_did_overlay; __union {N unsigned int nam$l_wcc; /* wild card context */ __struct {_ unsigned namdef$$_fill_1 : 16; /* the first word is reserved for IFI/ACP context */N unsigned nam$v_ifi : 1; /* the first word contains an IFI */U unsigned namdef$$_fill_2 : 13; /* grow from top down, start at top bit */\ unsigned nam$v_srchnmf : 1; /* no-more-files has been encountered on a  search */N unsigned nam$v_svctx : 1; /* save context across search calls */ } nam$r_wcc_bits; } nam$r_wcc_overlay; __union {N unsigned int nam$l_fnb; /* file name status bits */ __struct {N unsigned nam$v_exp_ver : 1; /* version was explicit */N unsigned nam$v_exp_type : 1; /* type was explicit */N unsigned nam$v_exp_name : 1; /* name was explicit  */N unsigned nam$v_wild_ver : 1; /* version contained a wild card */N unsigned nam$v_wild_type : 1; /* type contained a wild card */N unsigned nam$v_wild_name : 1; /* name contained a wild card */N unsigned nam$v_exp_dir : 1; /* directory was explicit */N unsigned nam$v_exp_dev : 1; /* device was explicit */S unsigned nam$v_wildcard : 1; /* filename string included a wild card */N/* (inclusive or of other wild card bits) */N unsigned nam$v_dir_lvls_g7 : 1; /* Dir levels greater than 7 */W unsigned nam$v_wild_sfdg7 : 1; /* A subdir greater than 7 has a wildcard */N unsigned nam$v_search_list : 1; /* search list present */N unsigned nam$v_cncl_dev : 1; /* concealed device present */N unsigned nam$v_root_dir : 1; /* root directory present */X unsigned nam$v_lowver : 1; /* lower numbered version(s) of file exist(s) */N unsigned nam$v_highver : 1; /* higher " */N/* */Z unsigned nam$v_ppf : 1; /* process-permanent file referenced indirectly */X unsigned nam$v_node : 1; /* filename specification included a nodename */T unsigned nam$v_quoted : 1; /* filename spec included a quoted string */W unsigned nam$v_grp_mbr : 1; /* directory spec was of group-member format */R unsigned nam$v_wild_dir : 1; /* directory spec included a wild card */V unsigned nam$v_dir_lvls : 3; /* number of directory levels (0=ufd only) */ } nam$r_fnb_bits0; __struct {\ unsigned namdef$$_fill_4 : 24; /* separate byte for wild card directory flags */N unsigned nam$v_wild_ufd : 1; /* ufd included a wild card */N unsigned nam$v_wild_sfd1 : 1; /* sfd1 included a wild card */N unsigned nam$v_wild_sfd2 : 1; /* sfd2 included a wild card */N unsigned nam$v_wild_sfd3 : 1; /* sfd3 included a wild card */N unsigned nam$v_wild_sfd4 : 1; /* sfd4 included a wild card */N unsigned nam$v_wild_sfd5 : 1; /* sfd5 included a wild card */N unsigned nam$v_wild_sfd6 : 1; /* sfd6 included a wild card */N unsigned nam$v_wild_sfd7 : 1; /* sfd7 included a  wild card */ } nam$r_fnb_bits1; __struct {a unsigned namdef$$_fill_5 : 24; /* alternate definitions for wild_ufd and wild_sfd1 */N unsigned nam$v_wild_grp : 1; /* group contained a wild card */N unsigned nam$v_wild_mbr : 1; /* member contained a wild card */' unsigned nam$v_fill_5_ : 6; } nam$r_fnb_bits2;N/*-----***** */N/* (prior to 40 byte extension) */N/* */N/* Extend the NAM block by 40 bytes. */N/* */ } nam$r_fnb_overlay;N unsigned char nam$b_node; /* Nodespec length */N unsigned char nam$b_dev; /* Device length */N unsigned char nam$b_dir; /* Directory length */N unsigned char nam$b_name; /* Filename length */N unsigned char nam$b_type; /* Filetype length */N unsigned char nam$b_ver; /* Version number length */N __union { /* Name characteristics */ unsigned char nam$b_nmc; __struct {N unsigned nam$v_did : 1; /* Input file spec DIDed  */N unsigned nam$v_fid : 1; /* Input file spec FIDed */N unsigned nam$v_res_did : 1; /* Result or Exp string spec DIDed */N unsigned nam$v_res_fid : 1; /* Result or Exp string spec FIDed */R unsigned nam$v_res_escape : 1; /* Result or Exp string spec has "^" */W unsigned nam$v_res_unicode : 1; /* Result or Exp string spec contains ^U */) unsigned namdef$$_fill_3 : 2; } nam$r_nmc_bits; } nam$r_nmc_overlay;N char namdef$$_fill_6 [1]; /* Currently unused */N char *nam$l_node; /* Nodespec address */N char *nam$l_dev; /* Device address */N char *nam$l_dir; /* Directory address */N char *nam$l_name; /* Filename address */N char *nam$l_type; /* Filetype address */N char *nam$l_ver; /* Version number address */U unsigned short int nam$w_first_wild_dir; /*First wild directory in related nam */N unsigned short int nam$w_long_dir_levels; /*Total number of directories */N unsigned int namdef$$_fill_7 [1]; /* Currently unused */ } NAMDEF; #if !defined(__VAXC)-#define nam$b_nop nam$r_nop_overlay.nam$b_nop7#define nam$r_nop_bits nam$r_nop_overlay.nam$r_nop_bits*#define nam$v_pwd nam$r_no p_bits.nam$v_pwd0#define nam$v_fill_1 nam$r_nop_bits.nam$v_fill_10#define nam$v_fill_2 nam$r_nop_bits.nam$v_fill_20#define nam$v_synchk nam$r_nop_bits.nam$v_synchk6#define nam$v_noconceal nam$r_nop_bits.nam$v_noconceal2#define nam$v_slparse nam$r_nop_bits.nam$v_slparse4#define nam$v_srchxabs nam$r_nop_bits.nam$v_srchxabsB#define nam$v_no_short_upcase nam$r_nop_bits.nam$v_no_short_upcase-#define nam$l_rlf nam$r_rlf_overlay.nam$l_rlf7#define nam$l_rlf_naml nam$r_rlf_overlay.nam$l_rlf_naml-#d efine nam$w_fid nam$r_fid_overlay.nam$w_fid;#define nam$r_fid_fields nam$r_fid_overlay.nam$r_fid_fields4#define nam$w_fid_num nam$r_fid_fields.nam$w_fid_num4#define nam$w_fid_seq nam$r_fid_fields.nam$w_fid_seqD#define nam$r_fid_rvn_overlay nam$r_fid_fields.nam$r_fid_rvn_overlay9#define nam$w_fid_rvn nam$r_fid_rvn_overlay.nam$w_fid_rvnG#define nam$r_fid_rvn_fields nam$r_fid_rvn_overlay.nam$r_fid_rvn_fields8#define nam$b_fid_rvn nam$r_fid_rvn_fields.nam$b_fid_rvn8#define nam$b_fid_nmx nam$r_ fid_rvn_fields.nam$b_fid_nmx-#define nam$w_did nam$r_did_overlay.nam$w_did;#define nam$r_did_fields nam$r_did_overlay.nam$r_did_fields4#define nam$w_did_num nam$r_did_fields.nam$w_did_num4#define nam$w_did_seq nam$r_did_fields.nam$w_did_seqD#define nam$r_did_rvn_overlay nam$r_did_fields.nam$r_did_rvn_overlay9#define nam$w_did_rvn nam$r_did_rvn_overlay.nam$w_did_rvnG#define nam$r_did_rvn_fields nam$r_did_rvn_overlay.nam$r_did_rvn_fields8#define nam$b_did_rvn nam$r_did_rvn_fields.nam$b_did_r vn8#define nam$b_did_nmx nam$r_did_rvn_fields.nam$b_did_nmx-#define nam$l_wcc nam$r_wcc_overlay.nam$l_wcc7#define nam$r_wcc_bits nam$r_wcc_overlay.nam$r_wcc_bits*#define nam$v_ifi nam$r_wcc_bits.nam$v_ifi2#define nam$v_srchnmf nam$r_wcc_bits.nam$v_srchnmf.#define nam$v_svctx nam$r_wcc_bits.nam$v_svctx-#define nam$l_fnb nam$r_fnb_overlay.nam$l_fnb9#define nam$r_fnb_bits0 nam$r_fnb_overlay.nam$r_fnb_bits03#define nam$v_exp_ver nam$r_fnb_bits0.nam$v_exp_ver5#define nam$v_exp_type nam$r_fnb !_bits0.nam$v_exp_type5#define nam$v_exp_name nam$r_fnb_bits0.nam$v_exp_name5#define nam$v_wild_ver nam$r_fnb_bits0.nam$v_wild_ver7#define nam$v_wild_type nam$r_fnb_bits0.nam$v_wild_type7#define nam$v_wild_name nam$r_fnb_bits0.nam$v_wild_name3#define nam$v_exp_dir nam$r_fnb_bits0.nam$v_exp_dir3#define nam$v_exp_dev nam$r_fnb_bits0.nam$v_exp_dev5#define nam$v_wildcard nam$r_fnb_bits0.nam$v_wildcard;#define nam$v_dir_lvls_g7 nam$r_fnb_bits0.nam$v_dir_lvls_g79#define nam$v_wild_sfdg7 nam "$r_fnb_bits0.nam$v_wild_sfdg7;#define nam$v_search_list nam$r_fnb_bits0.nam$v_search_list5#define nam$v_cncl_dev nam$r_fnb_bits0.nam$v_cncl_dev5#define nam$v_root_dir nam$r_fnb_bits0.nam$v_root_dir1#define nam$v_lowver nam$r_fnb_bits0.nam$v_lowver3#define nam$v_highver nam$r_fnb_bits0.nam$v_highver+#define nam$v_ppf nam$r_fnb_bits0.nam$v_ppf-#define nam$v_node nam$r_fnb_bits0.nam$v_node1#define nam$v_quoted nam$r_fnb_bits0.nam$v_quoted3#define nam$v_grp_mbr nam$r_fnb_bits0.nam$v_grp_ #mbr5#define nam$v_wild_dir nam$r_fnb_bits0.nam$v_wild_dir5#define nam$v_dir_lvls nam$r_fnb_bits0.nam$v_dir_lvls9#define nam$r_fnb_bits1 nam$r_fnb_overlay.nam$r_fnb_bits15#define nam$v_wild_ufd nam$r_fnb_bits1.nam$v_wild_ufd7#define nam$v_wild_sfd1 nam$r_fnb_bits1.nam$v_wild_sfd17#define nam$v_wild_sfd2 nam$r_fnb_bits1.nam$v_wild_sfd27#define nam$v_wild_sfd3 nam$r_fnb_bits1.nam$v_wild_sfd37#define nam$v_wild_sfd4 nam$r_fnb_bits1.nam$v_wild_sfd47#define nam$v_wild_sfd5 nam$r_fnb_bits1. $nam$v_wild_sfd57#define nam$v_wild_sfd6 nam$r_fnb_bits1.nam$v_wild_sfd67#define nam$v_wild_sfd7 nam$r_fnb_bits1.nam$v_wild_sfd79#define nam$r_fnb_bits2 nam$r_fnb_overlay.nam$r_fnb_bits25#define nam$v_wild_grp nam$r_fnb_bits2.nam$v_wild_grp5#define nam$v_wild_mbr nam$r_fnb_bits2.nam$v_wild_mbr-#define nam$b_nmc nam$r_nmc_overlay.nam$b_nmc7#define nam$r_nmc_bits nam$r_nmc_overlay.nam$r_nmc_bits*#define nam$v_did nam$r_nmc_bits.nam$v_did*#define nam$v_fid nam$r_nmc_bits.nam$v_fid2#defin%e nam$v_res_did nam$r_nmc_bits.nam$v_res_did2#define nam$v_res_fid nam$r_nmc_bits.nam$v_res_fid8#define nam$v_res_escape nam$r_nmc_bits.nam$v_res_escape:#define nam$v_res_unicode nam$r_nmc_bits.nam$v_res_unicode"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct namdef {#pragma __&nomember_alignmentN unsigned char nam$b_bid; /* block id */N unsigned char nam$b_bln; /* block length */N/*+++++++++++++++++++++++ */N/* the following 3 fields must not be rearranged relative to each other */N/* */N unsigned char nam$b_rss; /* resultant string area size */N un'signed char nam$b_rsl; /* resultant string length */N char *nam$l_rsa; /* resultant string area address */N/*----------------------- */ __union {N unsigned char nam$b_nop; /* Name options */ __struct {c unsigned nam$v_pwd : 1; /* Return password if present in nodespec string and any */N/* other task-specific data of the form /netacp_data(" */N/* (default is to mask out password from expanded and */N/* resultant name strings and to create a logical name */N/* whose equivalence string is the unaltered nodespec) */T unsigned nam$v_fill_1 : 1; /* unused. (used to be undocumented ROD) */T unsigned nam$v_fill_2 : 1; /* unused. (used to be undocumented SOD) */V unsigned nam$v_synchk : 1; /* Only do syntax check on) $parse operation */T unsigned nam$v_noconceal : 1; /* Do not conceal device/root directory */c unsigned nam$v_slparse : 1; /* Parse search list (not documented) -- used by BACKUP. */c unsigned nam$v_srchxabs : 1; /* Fill in attached XABS on $SEARCH operations over the */N/* network (not documented) -- used by directory. */N unsigned nam$v_no_short_upcase : 1; /* Don't upcase the ESA */ } nam$r_nop_bits; * } nam$r_nop_overlay;` unsigned char nam$b_rfs; /* Remote file system type (currently not documented) */N/* Note: This field is reserved for use by Digital */N/* the following 3 fields must not be rearranged relative to each other */N/* */N unsigned char nam$b_ess; /* expanded string area size */N unsigned char nam$b_esl; /* expanded string l +ength */N char *nam$l_esa; /* expanded string area address */N/*----------------------- */ __union {U struct namdef *nam$l_rlf; /* related file nam block addr */W struct namldef *nam$l_rlf_naml; /* related file naml block addr */ } nam$r_rlf_overlay;N char nam$t_dvi [16]; /* device id */N/* the location of th ,e following fields must not */N/* be changed due to their commonality with the fib */ __union {N unsigned short int nam$w_fid [3]; /* file id */ __struct {N unsigned short int nam$w_fid_num; /* file number */N unsigned short int nam$w_fid_seq; /* sequence number */ __union {N unsigned short int nam$w_fid_rvn; /* relative volu -me number */ __struct {N unsigned char nam$b_fid_rvn; /* alternate format RVN */] unsigned char nam$b_fid_nmx; /* alternate format file number extension */+ } nam$r_fid_rvn_fields;( } nam$r_fid_rvn_overlay; } nam$r_fid_fields; } nam$r_fid_overlay; __union {N unsigned short int nam$w_did [3]; /* directory id */ __struct {N unsi .gned short int nam$w_did_num; /* file number */N unsigned short int nam$w_did_seq; /* sequence number */ __union {N unsigned short int nam$w_did_rvn; /* relative volume number */ __struct {N unsigned char nam$b_did_rvn; /* alternate format RVN */] unsigned char nam$b_did_nmx; /* alternate format file number extension */+ } nam$r_did_rvn_fields;( / } nam$r_did_rvn_overlay; } nam$r_did_fields; } nam$r_did_overlay; __union {N unsigned int nam$l_wcc; /* wild card context */ __struct {_ unsigned namdef$$_fill_1 : 16; /* the first word is reserved for IFI/ACP context */N unsigned nam$v_ifi : 1; /* the first word contains an IFI */U unsigned namdef$$_fill_2 : 13; /* grow from top down, start at top bit */\ unsigned n 0am$v_srchnmf : 1; /* no-more-files has been encountered on a search */N unsigned nam$v_svctx : 1; /* save context across search calls */ } nam$r_wcc_bits; } nam$r_wcc_overlay; __union {N unsigned int nam$l_fnb; /* file name status bits */ __struct {N unsigned nam$v_exp_ver : 1; /* version was explicit */N unsigned nam$v_exp_type : 1; /* type was explicit */N un1signed nam$v_exp_name : 1; /* name was explicit */N unsigned nam$v_wild_ver : 1; /* version contained a wild card */N unsigned nam$v_wild_type : 1; /* type contained a wild card */N unsigned nam$v_wild_name : 1; /* name contained a wild card */N unsigned nam$v_exp_dir : 1; /* directory was explicit */N unsigned nam$v_exp_dev : 1; /* device was explicit */S unsigned nam$v_wildcard : 1;2 /* filename string included a wild card */N/* (inclusive or of other wild card bits) */N unsigned nam$v_dir_lvls_g7 : 1; /* Dir levels greater than 7 */W unsigned nam$v_wild_sfdg7 : 1; /* A subdir greater than 7 has a wildcard */N unsigned nam$v_search_list : 1; /* search list present */N unsigned nam$v_cncl_dev : 1; /* concealed device present */N unsigned nam$v_root_dir : 1; /* root d3irectory present */X unsigned nam$v_lowver : 1; /* lower numbered version(s) of file exist(s) */N unsigned nam$v_highver : 1; /* higher " */N/* */Z unsigned nam$v_ppf : 1; /* process-permanent file referenced indirectly */X unsigned nam$v_node : 1; /* filename specification included a nodename */T unsigned nam$v_quoted : 1; /* f4ilename spec included a quoted string */W unsigned nam$v_grp_mbr : 1; /* directory spec was of group-member format */R unsigned nam$v_wild_dir : 1; /* directory spec included a wild card */V unsigned nam$v_dir_lvls : 3; /* number of directory levels (0=ufd only) */ } nam$r_fnb_bits0; __struct {\ unsigned namdef$$_fill_4 : 24; /* separate byte for wild card directory flags */N unsigned nam$v_wild_ufd : 1; /* ufd includ5ed a wild card */N unsigned nam$v_wild_sfd1 : 1; /* sfd1 included a wild card */N unsigned nam$v_wild_sfd2 : 1; /* sfd2 included a wild card */N unsigned nam$v_wild_sfd3 : 1; /* sfd3 included a wild card */N unsigned nam$v_wild_sfd4 : 1; /* sfd4 included a wild card */N unsigned nam$v_wild_sfd5 : 1; /* sfd5 included a wild card */N unsigned nam$v_wild_sfd6 : 1; /* sfd6 included a wild card */N 6 unsigned nam$v_wild_sfd7 : 1; /* sfd7 included a wild card */ } nam$r_fnb_bits1; __struct {a unsigned namdef$$_fill_5 : 24; /* alternate definitions for wild_ufd and wild_sfd1 */N unsigned nam$v_wild_grp : 1; /* group contained a wild card */N unsigned nam$v_wild_mbr : 1; /* member contained a wild card */' unsigned nam$v_fill_5_ : 6; } nam$r_fnb_bits2;N/*-----***** 7 */N/* (prior to 40 byte extension) */N/* */N/* Extend the NAM block by 40 bytes. */N/* */ } nam$r_fnb_overlay;N unsigned char nam$b_node; /* Nodespec length */N unsigned char nam$b_dev; 8 /* Device length */N unsigned char nam$b_dir; /* Directory length */N unsigned char nam$b_name; /* Filename length */N unsigned char nam$b_type; /* Filetype length */N unsigned char nam$b_ver; /* Version number length */N __union { /* Name characteristics */ unsigned char nam$b_nmc; __struct {N 9 unsigned nam$v_did : 1; /* Input file spec DIDed */N unsigned nam$v_fid : 1; /* Input file spec FIDed */N unsigned nam$v_res_did : 1; /* Result or Exp string spec DIDed */N unsigned nam$v_res_fid : 1; /* Result or Exp string spec FIDed */R unsigned nam$v_res_escape : 1; /* Result or Exp string spec has "^" */W unsigned nam$v_res_unicode : 1; /* Result or Exp string spec contains ^U */) unsi :gned namdef$$_fill_3 : 2; } nam$r_nmc_bits; } nam$r_nmc_overlay;N char namdef$$_fill_6 [1]; /* Currently unused */N char *nam$l_node; /* Nodespec address */N char *nam$l_dev; /* Device address */N char *nam$l_dir; /* Directory address */N char *nam$l_name; /* Filename address */N char *nam$l_ ;type; /* Filetype address */N char *nam$l_ver; /* Version number address */U unsigned short int nam$w_first_wild_dir; /*First wild directory in related nam */N unsigned short int nam$w_long_dir_levels; /*Total number of directories */N unsigned int namdef$$_fill_7 [1]; /* Currently unused */ } ; #if !defined(__VAXC)-#define nam$b_nop nam$r_nop_overlay.nam$b_nop<#define nam$v_pwd nam$r_nop_ov<erlay.nam$r_nop_bits.nam$v_pwdB#define nam$v_fill_1 nam$r_nop_overlay.nam$r_nop_bits.nam$v_fill_1B#define nam$v_fill_2 nam$r_nop_overlay.nam$r_nop_bits.nam$v_fill_2B#define nam$v_synchk nam$r_nop_overlay.nam$r_nop_bits.nam$v_synchkH#define nam$v_noconceal nam$r_nop_overlay.nam$r_nop_bits.nam$v_noconcealD#define nam$v_slparse nam$r_nop_overlay.nam$r_nop_bits.nam$v_slparseF#define nam$v_srchxabs nam$r_nop_overlay.nam$r_nop_bits.nam$v_srchxabsT#define nam$v_no_short_upcase nam$r_nop_overlay.nam$r_=nop_bits.nam$v_no_short_upcase-#define nam$l_rlf nam$r_rlf_overlay.nam$l_rlf7#define nam$l_rlf_naml nam$r_rlf_overlay.nam$l_rlf_naml-#define nam$w_fid nam$r_fid_overlay.nam$w_fidF#define nam$w_fid_num nam$r_fid_overlay.nam$r_fid_fields.nam$w_fid_numF#define nam$w_fid_seq nam$r_fid_overlay.nam$r_fid_fields.nam$w_fid_seq\#define nam$w_fid_rvn nam$r_fid_overlay.nam$r_fid_fields.nam$r_fid_rvn_overlay.nam$w_fid_rvnq#define nam$b_fid_rvn nam$r_fid_overlay.nam$r_fid_fields.nam$r_fid_rvn_overlay.nam>$r_fid_rvn_fields.nam$b_fid_rvnq#define nam$b_fid_nmx nam$r_fid_overlay.nam$r_fid_fields.nam$r_fid_rvn_overlay.nam$r_fid_rvn_fields.nam$b_fid_nmx-#define nam$w_did nam$r_did_overlay.nam$w_didF#define nam$w_did_num nam$r_did_overlay.nam$r_did_fields.nam$w_did_numF#define nam$w_did_seq nam$r_did_overlay.nam$r_did_fields.nam$w_did_seq\#define nam$w_did_rvn nam$r_did_overlay.nam$r_did_fields.nam$r_did_rvn_overlay.nam$w_did_rvnq#define nam$b_did_rvn nam$r_did_overlay.nam$r_did_fields.nam$r_did_rvn?_overlay.nam$r_did_rvn_fields.nam$b_did_rvnq#define nam$b_did_nmx nam$r_did_overlay.nam$r_did_fields.nam$r_did_rvn_overlay.nam$r_did_rvn_fields.nam$b_did_nmx-#define nam$l_wcc nam$r_wcc_overlay.nam$l_wcc<#define nam$v_ifi nam$r_wcc_overlay.nam$r_wcc_bits.nam$v_ifiD#define nam$v_srchnmf nam$r_wcc_overlay.nam$r_wcc_bits.nam$v_srchnmf@#define nam$v_svctx nam$r_wcc_overlay.nam$r_wcc_bits.nam$v_svctx-#define nam$l_fnb nam$r_fnb_overlay.nam$l_fnbE#define nam$v_exp_ver nam$r_fnb_overlay.nam$r_fnb_@bits0.nam$v_exp_verG#define nam$v_exp_type nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_exp_typeG#define nam$v_exp_name nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_exp_nameG#define nam$v_wild_ver nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_wild_verI#define nam$v_wild_type nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_wild_typeI#define nam$v_wild_name nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_wild_nameE#define nam$v_exp_dir nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_exp_dirE#define nam$v_exp_dev nam$r_fnb_overlaAy.nam$r_fnb_bits0.nam$v_exp_devG#define nam$v_wildcard nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_wildcardM#define nam$v_dir_lvls_g7 nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_dir_lvls_g7K#define nam$v_wild_sfdg7 nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_wild_sfdg7M#define nam$v_search_list nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_search_listG#define nam$v_cncl_dev nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_cncl_devG#define nam$v_root_dir nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_root_dirC#define nam$Bv_lowver nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_lowverE#define nam$v_highver nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_highver=#define nam$v_ppf nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_ppf?#define nam$v_node nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_nodeC#define nam$v_quoted nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_quotedE#define nam$v_grp_mbr nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_grp_mbrG#define nam$v_wild_dir nam$r_fnb_overlay.nam$r_fnb_bits0.nam$v_wild_dirG#define nam$v_dir_lvls nam$r_fCnb_overlay.nam$r_fnb_bits0.nam$v_dir_lvlsG#define nam$v_wild_ufd nam$r_fnb_overlay.nam$r_fnb_bits1.nam$v_wild_ufdI#define nam$v_wild_sfd1 nam$r_fnb_overlay.nam$r_fnb_bits1.nam$v_wild_sfd1I#define nam$v_wild_sfd2 nam$r_fnb_overlay.nam$r_fnb_bits1.nam$v_wild_sfd2I#define nam$v_wild_sfd3 nam$r_fnb_overlay.nam$r_fnb_bits1.nam$v_wild_sfd3I#define nam$v_wild_sfd4 nam$r_fnb_overlay.nam$r_fnb_bits1.nam$v_wild_sfd4I#define nam$v_wild_sfd5 nam$r_fnb_overlay.nam$r_fnb_bits1.nam$v_wild_sfd5I#define Dnam$v_wild_sfd6 nam$r_fnb_overlay.nam$r_fnb_bits1.nam$v_wild_sfd6I#define nam$v_wild_sfd7 nam$r_fnb_overlay.nam$r_fnb_bits1.nam$v_wild_sfd7G#define nam$v_wild_grp nam$r_fnb_overlay.nam$r_fnb_bits2.nam$v_wild_grpG#define nam$v_wild_mbr nam$r_fnb_overlay.nam$r_fnb_bits2.nam$v_wild_mbr-#define nam$b_nmc nam$r_nmc_overlay.nam$b_nmc<#define nam$v_did nam$r_nmc_overlay.nam$r_nmc_bits.nam$v_did<#define nam$v_fid nam$r_nmc_overlay.nam$r_nmc_bits.nam$v_fidD#define nam$v_res_did nam$r_nmc_overlay.na Em$r_nmc_bits.nam$v_res_didD#define nam$v_res_fid nam$r_nmc_overlay.nam$r_nmc_bits.nam$v_res_fidJ#define nam$v_res_escape nam$r_nmc_overlay.nam$r_nmc_bits.nam$v_res_escapeL#define nam$v_res_unicode nam$r_nmc_overlay.nam$r_nmc_bits.nam$v_res_unicode"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate NAMDEF operates after aggregate end */N#define NAM$K_BLN_DIRWC 96 /* Not documented optional length */N#define NAM$C_ FBLN_DIRWC 96 /* Not documented optional length */N#define NAM$K_BLN 96 /* Name block length */N#define NAM$C_BLN 96 /* Name block length */ S/* These are traditional macros that should be hand-maintained for compatibility */W/* Do not have to add new ones, but do have to maintain those that are here already. */H#define NAM$V_PWD 0 /* return password if present in nodespec string */#define NAM$V_FILL_1 1#d Gefine NAM$V_FILL_2 2F#define NAM$V_SYNCHK 3 /* Only do syntax check on $PARSE operation */E#define NAM$V_NOCONCEAL 4 /* do not conceal device/root directory */0#define NAM$V_SLPARSE 5 /* parse search list */U#define NAM$V_SRCHXABS 6 /* fill in attached XABS on $SEARCH ops over the network */;#define NAM$V_NO_SHORT_UPCASE 7 /* Don't upcase the ESA */4#define NAM$V_IFI 16 /* Internal file identifier */M#define NAM$V_SRCHNMF 30 /* no-more-files has been encountered on $SEARCH */>#defin He NAM$V_SVCTX 31 /* save context across search calls */9#define NAM$V_EXP_VER 0 /* version number is explicit */5#define NAM$V_EXP_TYPE 1 /* file type is explicit */5#define NAM$V_EXP_NAME 2 /* file name is explicit */D#define NAM$V_WILD_VER 3 /* version number containes a wild card */@#define NAM$V_WILD_TYPE 4 /* file type containes a wild card */@#define NAM$V_WILD_NAME 5 /* file name containes a wild card */9#define NAM$V_EXP_DIR 6 /* directory spec is explicit */6#define NAM$V_IEXP_DEV 7 /* device name is explicit */E#define NAM$V_WILDCARD 8 /* file name string includes a wild card */<#define NAM$V_DIR_LVLS_G7 9 /* Dir levels greater than 7 */I#define NAM$V_WILD_SFDG7 10 /* A subdir greater than 7 has a wildcard */7#define NAM$V_SEARCH_LIST 11 /* search list present */B#define NAM$V_CNCL_DEV 12 /* device name is a concealed device */J#define NAM$V_ROOT_DIR 13 /* device name incorporates a root directory */M#define NAM$V_LOWVER 14 /* lower numbered version(sJ) of the file exist(s) */O#define NAM$V_HIGHVER 15 /* higher numbered version(s) of the file exist(s) */F#define NAM$V_PPF 16 /* indirectly accessed process permanent file */D#define NAM$V_NODE 17 /* file specification includes a node name */A#define NAM$V_QUOTED 18 /* file spec includes a quoted string */O#define NAM$V_GRP_MBR 19 /* directory spec is of group-member number format */D#define NAM$V_WILD_DIR 20 /* directory spec includes a wild card */M#define NAM$V_DIR_LVLS 21 /* numb Ker of subdirectory levels (0 = ufd only) */#define NAM$S_DIR_LVLS 3N#define NAM$V_WILD_UFD 24 /* user file directory spec includes a wild card */O#define NAM$V_WILD_SFD1 25 /* subfile directory 1 spec includes a wild card */;#define NAM$V_WILD_SFD2 26 /* sfd2 includes a wild card */;#define NAM$V_WILD_SFD3 27 /* sfd3 includes a wild card */;#define NAM$V_WILD_SFD4 28 /* sfd4 includes a wild card */;#define NAM$V_WILD_SFD5 29 /* sfd5 includes a wild card */;#define NAM$V_WILD_SFD6 L30 /* sfd6 includes a wild card */;#define NAM$V_WILD_SFD7 31 /* sfd7 includes a wild card */<#define NAM$V_WILD_GRP 24 /* group containes a wild card */=#define NAM$V_WILD_MBR 25 /* member containes a wild card */0#define NAM$V_DID 0 /* Input string is DIDed */0#define NAM$V_FID 1 /* Input string is FIDed */=#define NAM$V_RES_DID 2 /* Result or Exp string is DIDded */=#define NAM$V_RES_FID 3 /* Result or Exp string is FIDded */B#define NAM$V_RES_ESCAPE 4 /* Result or Exp string Mhas escapes */>#define NAM$V_RES_UNICODE 5 /* Result or Exp string has ^U */A#define NAML$V_NO_SHORT_OUTPUT 0 /* Don't write to RSA and ESA */Z#define NAML$V_LONG_RESULT_ESCAPE 0 /* There is an escape characater in the long output */Q#define NAML$V_FILESYS_NAME_UCS2 1 /* The filesys name output is 2-byte Unicode*/V#define NAML$V_LONG_RESULT_DID 2 /* There is DIDding in the long result or expanded */V#define NAML$V_LONG_RESULT_FID 3 /* There is FIDding in the long result or expanded */U#definNe NAML$V_LONG_RESULT_UNICODE 4 /* There is ^U in the long result or expanded */#ifdef __NEW_STARLET#define NAM _namdef#else#define NAM namdef#endif%#define cc$rms_nam (*decc$ga_rms_nam)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdefV extern struct NAM cc$rms_nam; /* Declare initialized prototype data structures */# pragma extern_model __restore#elseY globalref struct NAM cc$rms_nam; /* Declare initialized proOtotype data structures */#endifN/* Start NAML here */N/* */N/* name block field definitions */N/* */N/* The naml block is an extended version of the NAM */N/* block used to communicate optional filename-related P */N/* information. It differs from the NAM in that it */N/* includes a default name and a file name field and that */N/* these as well as the result and expanded file names */N/* have 32-bit length fields (though the top 16 bits is */N/* required to be 0, limiting the length to 65535). There */N/* are also some additional flags available. */N/* Q */N/* In order for RMS to recognize this block as a NAML, it must */N/* have NAML$B_BLN set to NAML$C_BLN, and must have */N/* NAML$B_BID set to NAML$C_BID. */N/* */ #ifdef __NEW_STARLETstruct _namldef;#elsestruct namldef;#endifN#define NAML$C_BID 4 /* c Rode for naml block */N/* (Same as nam) */Q#define NAML$C_MAXRSS 4095 /* maximum resultant name string size */#define NAML$M_PWD 0x1#define NAML$M_FILL_1 0x2#define NAML$M_FILL_2 0x4#define NAML$M_SYNCHK 0x8#define NAML$M_NOCONCEAL 0x10#define NAML$M_SLPARSE 0x20#define NAML$M_SRCHXABS 0x40##define NAML$M_NO_SHORT_UPCASE 0x80[#define NAML$C_UFS 0 /* Unknown file system for rSemote file access or */N/* not applicable for local file access or */N#define NAML$C_NO_RFS 0 /* task-to-task operation */N#define NAML$C_RMS11 1 /* RMS-11 */N#define NAML$C_RMS20 2 /* RMS-20 */N#define NAML$C_RMS32 3 /* RMS-32 */N#define NAML$C_FCS11 4 /* FCS-11 */NT#define NAML$C_RT11FS 5 /* RT-11 file system */N#define NAML$C_TOPS20FS 7 /* TOPS-20 file system */N#define NAML$C_TOPS10FS 8 /* TOPS-10 file system */N#define NAML$C_RMS32S 10 /* RMS-32 subset (e.g., VAXELAN) */N#define NAML$C_CPMFS 11 /* CP/M file system */N#define NAML$C_MS_DOSFS 12 /* MS/DOS file system */N#define NAML$C_ULTRIX32_FS U 13 /* Ultrix-32 file system */N#define NAML$C_ULTRIX11_FS 14 /* Ultrix-11 file system */N/*+++++++++++++++++++++++ */N#define NAML$C_DVI 16 /* length of dvi field */N/*+++++***** */#define NAML$M_IFI 0x10000!#define NAML$M_SRCHNMF 0x40000000#define NAML$M_SVCTX 0x80000000N#define NAML$K_BLN_V2 56 V /* Version 2 name block length */N#define NAML$C_BLN_V2 56 /* Version 2 name block length */#define NAML$M_EXP_VER 0x1#define NAML$M_EXP_TYPE 0x2#define NAML$M_EXP_NAME 0x4#define NAML$M_WILD_VER 0x8#define NAML$M_WILD_TYPE 0x10#define NAML$M_WILD_NAME 0x20#define NAML$M_EXP_DIR 0x40#define NAML$M_EXP_DEV 0x80#define NAML$M_WILDCARD 0x100 #define NAML$M_DIR_LVLS_G7 0x200#define NAML$M_WILD_SFDG7 0x400 #define NAML$M_SEARCH_LIST 0x800#defWine NAML$M_CNCL_DEV 0x1000#define NAML$M_ROOT_DIR 0x2000#define NAML$M_LOWVER 0x4000#define NAML$M_HIGHVER 0x8000#define NAML$M_PPF 0x10000#define NAML$M_NODE 0x20000#define NAML$M_QUOTED 0x40000#define NAML$M_GRP_MBR 0x80000 #define NAML$M_WILD_DIR 0x100000 #define NAML$M_DIR_LVLS 0xE00000!#define NAML$M_WILD_UFD 0x1000000"#define NAML$M_WILD_SFD1 0x2000000"#define NAML$M_WILD_SFD2 0x4000000"#define NAML$M_WILD_SFD3 0x8000000##define NAML$M_WILD_SFD4 0x10000000##define NAMLX$M_WILD_SFD5 0x20000000##define NAML$M_WILD_SFD6 0x40000000##define NAML$M_WILD_SFD7 0x80000000!#define NAML$M_WILD_GRP 0x1000000!#define NAML$M_WILD_MBR 0x2000000#define NAML$M_DID 0x1#define NAML$M_FID 0x2#define NAML$M_RES_DID 0x4#define NAML$M_RES_FID 0x8#define NAML$M_RES_ESCAPE 0x10#define NAML$M_RES_UNICODE 0x20%#define NAML$M_LONG_RESULT_ESCAPE 0x1$#define NAML$M_FILESYS_NAME_UCS2 0x2"#define NAML$M_LONG_RESULT_DID 0x4"#define NAML$M_LONG_RESULT_FID 0x8'#define NAML Y$M_LONG_RESULT_UNICODE 0x10#define NAML$M_MP_IN_PATH 0x20"#define NAML$M_SYMLNK_IN_PATH 0x40"#define NAML$M_OBJECT_SYMLINK 0x80!#define NAML$M_IS_DIRECTORY 0x100"#define NAML$M_NO_SHORT_OUTPUT 0x1N#define NAML$C_CASE_LOOKUP_BLIND 2 /* case blind */N#define NAML$C_CASE_LOOKUP_SENSITIVE 3 /* case sensitive */#define NAML$M_OPEN_SPECIAL 0x8N#define NAML$C_SEARCH_SYMLINK_DEFAULT 0 /* use process default */N#define NAML$C_SEARCH_SYML ZINK_NONE 1 /* use no symlinks */N#define NAML$C_SEARCH_SYMLINK_ALL 2 /* use symlinks always */N#define NAML$C_SEARCH_SYMLINK_NOELLIPS 3 /* use symlinks except in ellipsis */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _namldef {#pragma __nomember_alignmentN unsigned char [naml$b_bid; /* block id */N unsigned char naml$b_bln; /* block length */N/*+++++++++++++++++++++++ */N/* the following 3 fields must not be rearranged relative to each other */N/* */N unsigned char naml$b_rss; /* resultant string area size */N unsigned char naml$b_rsl; /* r \esultant string length */N char *naml$l_rsa; /* resultant string area address */N/*----------------------- */ __union {N unsigned char naml$b_nop; /* Name options */ __struct {c unsigned naml$v_pwd : 1; /* Return password if present in nodespec string and any */N/* other task-specific data of the form /netacp_data" */N/* (defau]lt is to mask out password from expanded and */N/* resultant name strings and to create a logical name */N/* whose equivalence string is the unaltered nodespec) */T unsigned naml$v_fill_1 : 1; /* unused. (used to be undocumented ROD) */T unsigned naml$v_fill_2 : 1; /* unused. (used to be undocumented SOD) */V unsigned naml$v_synchk : 1; /* Only do syntax check on $parse operation */U unsi^gned naml$v_noconceal : 1; /* Do not conceal device/root directory */d unsigned naml$v_slparse : 1; /* Parse search list (not documented) -- used by BACKUP. */d unsigned naml$v_srchxabs : 1; /* Fill in attached XABS on $SEARCH operations over the */N/* network (not documented) -- used by directory. */N unsigned naml$v_no_short_upcase : 1; /* Don't upcase the ESA */ } naml$r_nop_bits; } naml$r_nop_overlay;` un_signed char naml$b_rfs; /* Remote file system type (currently not documented) */N/* Note: This field is reserved for use by Digital */N/* the following 3 fields must not be rearranged relative to each other */N/* */N unsigned char naml$b_ess; /* espanded string area size */N unsigned char naml$b_esl; /* expanded string length */N char *naml`$l_esa; /* expanded string area address */N/*----------------------- */ __union {_ NAMDEF *naml$l_rlf; /* related file nam block addr ~~~ struct namdef ~~~ */c struct _namldef *naml$l_rlf_naml; /* related file naml block addr ~~~ struct namldef ~~~ */ } naml$r_rlf_overlay;N char naml$t_dvi [16]; /* device id */N/* the location of the followin ag fields must not */N/* be changed due to their commonality with the fib */ __union {N unsigned short int naml$w_fid [3]; /* file id */ __struct {N unsigned short int naml$w_fid_num; /* file number */N unsigned short int naml$w_fid_seq; /* sequence number */ __union {O unsigned short int naml$w_fid_rvn; /* relative volume number b */ __struct {N unsigned char naml$b_fid_rvn; /* alternate format RVN */^ unsigned char naml$b_fid_nmx; /* alternate format file number extension */, } naml$r_fid_rvn_fields;) } naml$r_fid_rvn_overlay; } naml$r_fid_fields; } naml$r_fid_overlay; __union {N unsigned short int naml$w_did [3]; /* directory id */ __struct {N unsigned c short int naml$w_did_num; /* file number */N unsigned short int naml$w_did_seq; /* sequence number */ __union {O unsigned short int naml$w_did_rvn; /* relative volume number */ __struct {N unsigned char naml$b_did_rvn; /* alternate format RVN */^ unsigned char naml$b_did_nmx; /* alternate format file number extension */, } naml$r_did_rvn_fields;) d } naml$r_did_rvn_overlay; } naml$r_did_fields; } naml$r_did_overlay; __union {N unsigned int naml$l_wcc; /* wild card context */ __struct {` unsigned namldef$$_fill_1 : 16; /* the first word is reserved for IFI/ACP context */N unsigned naml$v_ifi : 1; /* the first word contains an IFI */V unsigned namldef$$_fill_2 : 13; /* grow from top down, start at top bit */] unsigned e naml$v_srchnmf : 1; /* no-more-files has been encountered on a search */N unsigned naml$v_svctx : 1; /* save context across search calls */ } naml$r_wcc_bits; } naml$r_wcc_overlay; __union {N unsigned int naml$l_fnb; /* file name status bits */ __struct {N unsigned naml$v_exp_ver : 1; /* version was explicit */N unsigned naml$v_exp_type : 1; /* type was explicit */N f unsigned naml$v_exp_name : 1; /* name was explicit */N unsigned naml$v_wild_ver : 1; /* version contained a wild card */N unsigned naml$v_wild_type : 1; /* type contained a wild card */N unsigned naml$v_wild_name : 1; /* name contained a wild card */N unsigned naml$v_exp_dir : 1; /* directory was explicit */N unsigned naml$v_exp_dev : 1; /* device was explicit */T unsigned naml$v_wildcagrd : 1; /* filename string included a wild card */N/* (inclusive or of other wild card bits) */N unsigned naml$v_dir_lvls_g7 : 1; /* Dir levels greater than 7 */X unsigned naml$v_wild_sfdg7 : 1; /* A subdir greater than 7 has a wildcard */N unsigned naml$v_search_list : 1; /* search list present */N unsigned naml$v_cncl_dev : 1; /* concealed device present */N unsigned naml$v_root_dir : 1; /*h root directory present */X unsigned naml$v_lowver : 1; /* lower numbered version(s) of file exist(s) */N unsigned naml$v_highver : 1; /* higher " */N/* */Z unsigned naml$v_ppf : 1; /* process-permanent file referenced indirectly */X unsigned naml$v_node : 1; /* filename specification included a nodename */T unsigned naml$v_quoted : 1i; /* filename spec included a quoted string */X unsigned naml$v_grp_mbr : 1; /* directory spec was of group-member format */S unsigned naml$v_wild_dir : 1; /* directory spec included a wild card */W unsigned naml$v_dir_lvls : 3; /* number of directory levels (0=ufd only) */ } naml$r_fnb_bits0; __struct {] unsigned namldef$$_fill_4 : 24; /* separate byte for wild card directory flags */N unsigned naml$v_wild_ufd : 1j; /* ufd included a wild card */N unsigned naml$v_wild_sfd1 : 1; /* sfd1 included a wild card */N unsigned naml$v_wild_sfd2 : 1; /* sfd2 included a wild card */N unsigned naml$v_wild_sfd3 : 1; /* sfd3 included a wild card */N unsigned naml$v_wild_sfd4 : 1; /* sfd4 included a wild card */N unsigned naml$v_wild_sfd5 : 1; /* sfd5 included a wild card */N unsigned naml$v_wild_sfd6 : 1; /* sfd6 included a wild k card */N unsigned naml$v_wild_sfd7 : 1; /* sfd7 included a wild card */ } naml$r_fnb_bits1; __struct {b unsigned namldef$$_fill_5 : 24; /* alternate definitions for wild_ufd and wild_sfd1 */N unsigned naml$v_wild_grp : 1; /* group contained a wild card */N unsigned naml$v_wild_mbr : 1; /* member contained a wild card */( unsigned naml$v_fill_6_ : 6; } naml$r_fnb_bits2; } naml$r_fnbl_overlay;N unsigned char naml$b_node; /* Nodespec length */N unsigned char naml$b_dev; /* Device length */N unsigned char naml$b_dir; /* Directory length */N unsigned char naml$b_name; /* Filename length */N unsigned char naml$b_type; /* Filetype length */N unsigned char naml$b_ver; /* Version number length */N __union {m /* Name characteristics */! unsigned char naml$b_nmc; __struct {N unsigned naml$v_did : 1; /* Input file spec DIDed */N unsigned naml$v_fid : 1; /* Input file spec FIDed */N unsigned naml$v_res_did : 1; /* Result or Exp string spec DIDed */N unsigned naml$v_res_fid : 1; /* Result or Exp string spec FIDed */S unsigned naml$v_res_escape : 1; /* Result or Exp s ntring spec has "^" */X unsigned naml$v_res_unicode : 1; /* Result or Exp string spec contains ^U */* unsigned namldef$$_fill_3 : 2; } naml$r_nmc_bits; } naml$r_nmc_overlay;N char namldef$$_fill_6 [1]; /* Currently unused */N char *naml$l_node; /* Nodespec address */N char *naml$l_dev; /* Device address */N char *naml$l_dir; /* Doirectory address */N char *naml$l_name; /* Filename address */N char *naml$l_type; /* Filetype address */N char *naml$l_ver; /* Version number address */V unsigned short int naml$w_first_wild_dir; /*First wild directory in related nam */O unsigned short int naml$w_long_dir_levels; /*Total number of directories */N unsigned int namldef$$_fill_7 [1]; /* Currently unused p */N/* New NAML-only items: */N unsigned int naml$l_long_defname_size; /*Analogous to FAB$B_DNS */N char *naml$l_long_defname; /*Analogous to FAB$L_DNA */N unsigned int naml$l_long_filename_size; /*Analogous to FAB$B_FNS */N char *naml$l_long_filename; /*Analogous to FAB$L_FNA */N unsigned int naml$l_long_node_size; /*Analogous to NAM$B_NODE */N chqar *naml$l_long_node; /*Analogous to NAM$L_NODE */N unsigned int naml$l_long_dev_size; /*Analogous to NAM$B_DEV */N char *naml$l_long_dev; /*Analogous to NAM$L_DEV */N unsigned int naml$l_long_dir_size; /*Analogous to NAM$B_DIR */N char *naml$l_long_dir; /*Analogous to NAM$L_DIR */N unsigned int naml$l_long_name_size; /*Analogous to NAM$B_NAME */N char *naml$l_long_name; r /*Analogous to NAM$L_NAME */N unsigned int naml$l_long_type_size; /*Analogous to NAM$B_TYPE */N char *naml$l_long_type; /*Analogous to NAM$L_TYPE */N unsigned int naml$l_long_ver_size; /*Analogous to NAM$B_VER */N char *naml$l_long_ver; /*Analogous to NAM$L_VER */R/*The following three "LONG_EXPAND" fields must be fixed relative to each other */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cpl susplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifN unsigned int naml$l_long_expand_size; /*Analogous to NAM$B_ESL */#pragma __nomember_alignmentN char *naml$l_long_expand; /*Analogous to NAM$L_ESA */N unsigned int naml$l_long_expand_alloc; /*Analogous to NAM$B_ESS */ int naml$l_reserved_mbz_9;R/*The following three "LONG_RESULT" fields must be fixed relative to t each other */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifN unsigned int naml$l_long_result_size; /*Analogous to NAM$B_RSL */#pragma __nomember_alignmentN char *naml$l_long_result; /*Analogous to NAM$L_RSA */N unsigned int naml$l_long_result_alloc; /*Analogous to NAM$B_RSS */` int naml$l_reserved_mbz_8; u /* Reserved to Digital for future use. Must be zero. */S/*The following three "FILESYS_NAME" fields must be fixed relative to each other */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endif* unsigned int naml$l_filesys_name_size;#pragma __nomember_alignment char *naml$l_filesys_name;+ unsigned int naml$l_filesys_name_alloc;N __uniovn { /* Flags set or cleared by RMS */) unsigned int naml$l_output_flags; __struct {i unsigned naml$v_long_result_escape : 1; /* There is an escape character in the long output */b unsigned naml$v_filesys_name_ucs2 : 1; /* The filesys name output is 2-byte Unicode */Z unsigned naml$v_long_result_did : 1; /* There is DIDding in the long output */Z unsigned naml$v_long_result_fid : 1; /* There is FIDding iwn the long output */e unsigned naml$v_long_result_unicode : 1; /* Long Result or Exp string spec contains ^U */[ unsigned naml$v_mp_in_path : 1; /* mount point encountered in directory path */[ unsigned naml$v_symlnk_in_path : 1; /* symlink encountered in directory path */h unsigned naml$v_object_symlink : 1; /* The specified object is a symlink ($OPEN, $SEARCH) */h unsigned naml$v_is_directory : 1; /* The specified object is a directory ( x$OPEN, $SEARCH) */( unsigned naml$v_fill_7_ : 7;' } naml$r_output_flags_bits;N/* The rest of the longword also reserved. */& } naml$r_output_flags_overlay;N __union { /* Flags specified by user to RMS */( unsigned int naml$l_input_flags; __struct {Q unsigned naml$v_no_short_output : 1; /* Don't write to RSA and ESA */N unsigned naml$v_case_lookup : 2; /* name cyase lookup mode */Z unsigned naml$v_open_special : 1; /* $OPEN a special file, rather than the */N/* object referred to by the special file. */V unsigned naml$v_search_symlink : 2; /* Controls whether $SEARCH follows */N/* symlinks in directory paths */T/* NOTE: Symlink search mode encodings are coordinated across $JPIDEF, $LIBCQDEF, */N/* $LIBFILDEF, $PPROPDEF, and $NAMLDEF. z */( unsigned naml$v_fill_8_ : 2;& } naml$r_input_flags_bits;N/* The rest of the longword also reserved and must be zero. */% } naml$r_input_flags_overlay;` int naml$l_reserved_mbz_7; /* Reserved to Digital for future use. Must be zero. */) unsigned __int64 naml$q_user_context;` int naml$l_reserved_mbz_6; /* Reserved to Digital for future use. Must be zero. */` int naml$l_reserved_mbz_5; { /* Reserved to Digital for future use. Must be zero. */` int naml$l_reserved_mbz_4; /* Reserved to Digital for future use. Must be zero. */` int naml$l_reserved_mbz_3; /* Reserved to Digital for future use. Must be zero. */` int naml$l_reserved_mbz_2; /* Reserved to Digital for future use. Must be zero. */` int naml$l_reserved_mbz_1; /* Reserved to Digital for future use. Must be zero. */ } NAMLDEF; #if !defined(__VAXC)0#define naml |$b_nop naml$r_nop_overlay.naml$b_nop:#define naml$r_nop_bits naml$r_nop_overlay.naml$r_nop_bits-#define naml$v_pwd naml$r_nop_bits.naml$v_pwd3#define naml$v_fill_1 naml$r_nop_bits.naml$v_fill_13#define naml$v_fill_2 naml$r_nop_bits.naml$v_fill_23#define naml$v_synchk naml$r_nop_bits.naml$v_synchk9#define naml$v_noconceal naml$r_nop_bits.naml$v_noconceal5#define naml$v_slparse naml$r_nop_bits.naml$v_slparse7#define naml$v_srchxabs naml$r_nop_bits.naml$v_srchxabsE#define naml$v_no_short_ }upcase naml$r_nop_bits.naml$v_no_short_upcase0#define naml$l_rlf naml$r_rlf_overlay.naml$l_rlf:#define naml$l_rlf_naml naml$r_rlf_overlay.naml$l_rlf_naml0#define naml$w_fid naml$r_fid_overlay.naml$w_fid>#define naml$r_fid_fields naml$r_fid_overlay.naml$r_fid_fields7#define naml$w_fid_num naml$r_fid_fields.naml$w_fid_num7#define naml$w_fid_seq naml$r_fid_fields.naml$w_fid_seqG#define naml$r_fid_rvn_overlay naml$r_fid_fields.naml$r_fid_rvn_overlay<#define naml$w_fid_rvn naml$r_fid_rvn_overla ~y.naml$w_fid_rvnJ#define naml$r_fid_rvn_fields naml$r_fid_rvn_overlay.naml$r_fid_rvn_fields;#define naml$b_fid_rvn naml$r_fid_rvn_fields.naml$b_fid_rvn;#define naml$b_fid_nmx naml$r_fid_rvn_fields.naml$b_fid_nmx0#define naml$w_did naml$r_did_overlay.naml$w_did>#define naml$r_did_fields naml$r_did_overlay.naml$r_did_fields7#define naml$w_did_num naml$r_did_fields.naml$w_did_num7#define naml$w_did_seq naml$r_did_fields.naml$w_did_seqG#define naml$r_did_rvn_overlay naml$r_did_fields.naml$r_di d_rvn_overlay<#define naml$w_did_rvn naml$r_did_rvn_overlay.naml$w_did_rvnJ#define naml$r_did_rvn_fields naml$r_did_rvn_overlay.naml$r_did_rvn_fields;#define naml$b_did_rvn naml$r_did_rvn_fields.naml$b_did_rvn;#define naml$b_did_nmx naml$r_did_rvn_fields.naml$b_did_nmx0#define naml$l_wcc naml$r_wcc_overlay.naml$l_wcc:#define naml$r_wcc_bits naml$r_wcc_overlay.naml$r_wcc_bits-#define naml$v_ifi naml$r_wcc_bits.naml$v_ifi5#define naml$v_srchnmf naml$r_wcc_bits.naml$v_srchnmf1#define naml$v _svctx naml$r_wcc_bits.naml$v_svctx0#define naml$l_fnb naml$r_fnb_overlay.naml$l_fnb<#define naml$r_fnb_bits0 naml$r_fnb_overlay.naml$r_fnb_bits06#define naml$v_exp_ver naml$r_fnb_bits0.naml$v_exp_ver8#define naml$v_exp_type naml$r_fnb_bits0.naml$v_exp_type8#define naml$v_exp_name naml$r_fnb_bits0.naml$v_exp_name8#define naml$v_wild_ver naml$r_fnb_bits0.naml$v_wild_ver:#define naml$v_wild_type naml$r_fnb_bits0.naml$v_wild_type:#define naml$v_wild_name naml$r_fnb_bits0.naml$v_wild_name6#defin e naml$v_exp_dir naml$r_fnb_bits0.naml$v_exp_dir6#define naml$v_exp_dev naml$r_fnb_bits0.naml$v_exp_dev8#define naml$v_wildcard naml$r_fnb_bits0.naml$v_wildcard>#define naml$v_dir_lvls_g7 naml$r_fnb_bits0.naml$v_dir_lvls_g7<#define naml$v_wild_sfdg7 naml$r_fnb_bits0.naml$v_wild_sfdg7>#define naml$v_search_list naml$r_fnb_bits0.naml$v_search_list8#define naml$v_cncl_dev naml$r_fnb_bits0.naml$v_cncl_dev8#define naml$v_root_dir naml$r_fnb_bits0.naml$v_root_dir4#define naml$v_lowver naml$r_fnb_bit s0.naml$v_lowver6#define naml$v_highver naml$r_fnb_bits0.naml$v_highver.#define naml$v_ppf naml$r_fnb_bits0.naml$v_ppf0#define naml$v_node naml$r_fnb_bits0.naml$v_node4#define naml$v_quoted naml$r_fnb_bits0.naml$v_quoted6#define naml$v_grp_mbr naml$r_fnb_bits0.naml$v_grp_mbr8#define naml$v_wild_dir naml$r_fnb_bits0.naml$v_wild_dir8#define naml$v_dir_lvls naml$r_fnb_bits0.naml$v_dir_lvls<#define naml$r_fnb_bits1 naml$r_fnb_overlay.naml$r_fnb_bits18#define naml$v_wild_ufd naml$r_fnb_bits1.naml$ v_wild_ufd:#define naml$v_wild_sfd1 naml$r_fnb_bits1.naml$v_wild_sfd1:#define naml$v_wild_sfd2 naml$r_fnb_bits1.naml$v_wild_sfd2:#define naml$v_wild_sfd3 naml$r_fnb_bits1.naml$v_wild_sfd3:#define naml$v_wild_sfd4 naml$r_fnb_bits1.naml$v_wild_sfd4:#define naml$v_wild_sfd5 naml$r_fnb_bits1.naml$v_wild_sfd5:#define naml$v_wild_sfd6 naml$r_fnb_bits1.naml$v_wild_sfd6:#define naml$v_wild_sfd7 naml$r_fnb_bits1.naml$v_wild_sfd7<#define naml$r_fnb_bits2 naml$r_fnb_overlay.naml$r_fnb_bits28#define naml $v_wild_grp naml$r_fnb_bits2.naml$v_wild_grp8#define naml$v_wild_mbr naml$r_fnb_bits2.naml$v_wild_mbr0#define naml$b_nmc naml$r_nmc_overlay.naml$b_nmc:#define naml$r_nmc_bits naml$r_nmc_overlay.naml$r_nmc_bits-#define naml$v_did naml$r_nmc_bits.naml$v_did-#define naml$v_fid naml$r_nmc_bits.naml$v_fid5#define naml$v_res_did naml$r_nmc_bits.naml$v_res_did5#define naml$v_res_fid naml$r_nmc_bits.naml$v_res_fid;#define naml$v_res_escape naml$r_nmc_bits.naml$v_res_escape=#define naml$v_res_unicode naml$r_nmc_bits.naml$v_res_unicodeK#define naml$l_output_flags naml$r_output_flags_overlay.naml$l_output_flagsU#define naml$r_output_flags_bits naml$r_output_flags_overlay.naml$r_output_flags_bitsT#define naml$v_long_result_escape naml$r_output_flags_bits.naml$v_long_result_escapeR#define naml$v_filesys_name_ucs2 naml$r_output_flags_bits.naml$v_filesys_name_ucs2N#define naml$v_long_result_did naml$r_output_flags_bits.naml$v_long_result_didN#define naml$v_long_result_fid naml$r_output_flags_bits.naml$v_long_result_fidV#define naml$v_long_result_unicode naml$r_output_flags_bits.naml$v_long_result_unicodeD#define naml$v_mp_in_path naml$r_output_flags_bits.naml$v_mp_in_pathL#define naml$v_symlnk_in_path naml$r_output_flags_bits.naml$v_symlnk_in_pathL#define naml$v_object_symlink naml$r_output_flags_bits.naml$v_object_symlinkH#define naml$v_is_directory naml$r_output_flags_bits.naml$v_is_directoryH#define naml$l_input_flags naml$r_input_flags_overlay.naml$l_input_flagsR#define naml $r_input_flags_bits naml$r_input_flags_overlay.naml$r_input_flags_bitsM#define naml$v_no_short_output naml$r_input_flags_bits.naml$v_no_short_outputE#define naml$v_case_lookup naml$r_input_flags_bits.naml$v_case_lookupG#define naml$v_open_special naml$r_input_flags_bits.naml$v_open_specialK#define naml$v_search_symlink naml$r_input_flags_bits.naml$v_search_symlink"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cpluspl us) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct namldef {#pragma __nomember_alignmentN unsigned char naml$b_bid; /* block id */N unsigned char naml$b_bln; /* block length */N/*+++++++++++++++++++++++ */N/* the following 3 fields must not be rearranged relative to each other */N/*  */N unsigned char naml$b_rss; /* resultant string area size */N unsigned char naml$b_rsl; /* resultant string length */N char *naml$l_rsa; /* resultant string area address */N/*----------------------- */ __union {N unsigned char naml$b_nop; /* Name options */ __struct {c unsigned naml$v_pwd : 1; /* Return password if present in nodespec string and any */N/* other task-specific data of the form /netacp_data" */N/* (default is to mask out password from expanded and */N/* resultant name strings and to create a logical name */N/* whose equivalence string is the unaltered nodespec) */T unsigned naml$v_fill_1 : 1; /* unused. (used to be undocumented ROD) */T unsigned naml$v_fill_2 : 1; /* unused. (used to be undocumented SOD) */V unsigned naml$v_synchk : 1; /* Only do syntax check on $parse operation */U unsigned naml$v_noconceal : 1; /* Do not conceal device/root directory */d unsigned naml$v_slparse : 1; /* Parse search list (not documented) -- used by BACKUP. */d unsigned naml$v_srchxabs : 1; /* Fill in attached XABS on $SEARCH operations over the */N/* network (not documented) -- used by directory. */N unsigned naml$v_no_short_upcase : 1; /* Don't upcase the ESA */ } naml$r_nop_bits; } naml$r_nop_overlay;` unsigned char naml$b_rfs; /* Remote file system type (currently not documented) */N/* Note: This field is reserved for use by Digital */N/* the following 3 fields must not be rearranged relative to each other */N/*  */N unsigned char naml$b_ess; /* espanded string area size */N unsigned char naml$b_esl; /* expanded string length */N char *naml$l_esa; /* expanded string area address */N/*----------------------- */ __union {U struct namdef *naml$l_rlf; /* related file nam block addr */W struct namldef *naml$l_rlf_naml; /* rel ated file naml block addr */ } naml$r_rlf_overlay;N char naml$t_dvi [16]; /* device id */N/* the location of the following fields must not */N/* be changed due to their commonality with the fib */ __union {N unsigned short int naml$w_fid [3]; /* file id */ __struct {N unsigned short int naml$w_fid_num; /* file number */N  unsigned short int naml$w_fid_seq; /* sequence number */ __union {O unsigned short int naml$w_fid_rvn; /* relative volume number */ __struct {N unsigned char naml$b_fid_rvn; /* alternate format RVN */^ unsigned char naml$b_fid_nmx; /* alternate format file number extension */, } naml$r_fid_rvn_fields;) } naml$r_fid_rvn_overlay; } naml$r_fid_fie lds; } naml$r_fid_overlay; __union {N unsigned short int naml$w_did [3]; /* directory id */ __struct {N unsigned short int naml$w_did_num; /* file number */N unsigned short int naml$w_did_seq; /* sequence number */ __union {O unsigned short int naml$w_did_rvn; /* relative volume number */ __struct {N unsigned char naml$b_did_rvn; /* a lternate format RVN */^ unsigned char naml$b_did_nmx; /* alternate format file number extension */, } naml$r_did_rvn_fields;) } naml$r_did_rvn_overlay; } naml$r_did_fields; } naml$r_did_overlay; __union {N unsigned int naml$l_wcc; /* wild card context */ __struct {` unsigned namldef$$_fill_1 : 16; /* the first word is reserved for IFI/ACP context */N unsigned naml$v_ifi : 1; /* the first word contains an IFI */V unsigned namldef$$_fill_2 : 13; /* grow from top down, start at top bit */] unsigned naml$v_srchnmf : 1; /* no-more-files has been encountered on a search */N unsigned naml$v_svctx : 1; /* save context across search calls */ } naml$r_wcc_bits; } naml$r_wcc_overlay; __union {N unsigned int naml$l_fnb; /* file name status bits */ __struct {N unsigned naml$v_exp_ver : 1; /* version was explicit */N unsigned naml$v_exp_type : 1; /* type was explicit */N unsigned naml$v_exp_name : 1; /* name was explicit */N unsigned naml$v_wild_ver : 1; /* version contained a wild card */N unsigned naml$v_wild_type : 1; /* type contained a wild card */N unsigned naml$v_wild_name : 1; /* name contained a wild card */N unsigned naml$v_exp_dir : 1; /* directory was explicit */N unsigned naml$v_exp_dev : 1; /* device was explicit */T unsigned naml$v_wildcard : 1; /* filename string included a wild card */N/* (inclusive or of other wild card bits) */N unsigned naml$v_dir_lvls_g7 : 1; /* Dir levels greater than 7 */X unsigned naml$v_wild_sfdg7 : 1; /* A subdir greater than 7 has a wildcard */N unsigned naml$v_search_list : 1; /* search list present */N unsigned naml$v_cncl_dev : 1; /* concealed device present */N unsigned naml$v_root_dir : 1; /* root directory present */X unsigned naml$v_lowver : 1; /* lower numbered version(s) of file exist(s) */N unsigned naml$v_highver : 1; /* higher " */N/* */Z unsigned naml$v_ppf : 1; /* process-permanent file referenced indirectly */X unsigned naml$v_node : 1; /* filename specification included a nodename */T unsigned naml$v_quoted : 1; /* filename spec included a quoted string */X unsigned naml$v_grp_mbr : 1; /* directory spec was of group-member format */S unsigned naml$v_wild_dir : 1; /* directory spec included a wild card */W unsigned naml$v_dir_lvls : 3; /* number of directory levels (0=ufd only) */ } naml$r_fnb_bits0; __struct {] unsigned namldef$$_fill_4 : 24; /* separate byte for wild card directory flags */N unsigned naml$v_wild_ufd : 1; /* ufd included a wild card */N unsigned naml$v_wild_sfd1 : 1; /* sfd1 included a wild card */N unsigned naml$v_wild_sfd2 : 1; /* sfd2 included a wild card */N unsigned naml$v_wild_sfd3 : 1; /* sfd3 included a wild card */N unsigned naml$v_wild_sfd4 : 1; /* sfd4  included a wild card */N unsigned naml$v_wild_sfd5 : 1; /* sfd5 included a wild card */N unsigned naml$v_wild_sfd6 : 1; /* sfd6 included a wild card */N unsigned naml$v_wild_sfd7 : 1; /* sfd7 included a wild card */ } naml$r_fnb_bits1; __struct {b unsigned namldef$$_fill_5 : 24; /* alternate definitions for wild_ufd and wild_sfd1 */N unsigned naml$v_wild_grp : 1; /* group contained a wild card */N unsigned naml$v_wild_mbr : 1; /* member contained a wild card */( unsigned naml$v_fill_6_ : 6; } naml$r_fnb_bits2; } naml$r_fnb_overlay;N unsigned char naml$b_node; /* Nodespec length */N unsigned char naml$b_dev; /* Device length */N unsigned char naml$b_dir; /* Directory length */N unsigned char naml$b_name; /* Filename length */N unsigned char naml$b_type; /* Filetype length */N unsigned char naml$b_ver; /* Version number length */N __union { /* Name characteristics */! unsigned char naml$b_nmc; __struct {N unsigned naml$v_did : 1; /* Input file spec DIDed */N unsigned naml$v_fid : 1; /* Input file spec FIDed */N unsigned naml$v_res_did : 1; /* Re sult or Exp string spec DIDed */N unsigned naml$v_res_fid : 1; /* Result or Exp string spec FIDed */S unsigned naml$v_res_escape : 1; /* Result or Exp string spec has "^" */X unsigned naml$v_res_unicode : 1; /* Result or Exp string spec contains ^U */* unsigned namldef$$_fill_3 : 2; } naml$r_nmc_bits; } naml$r_nmc_overlay;N char namldef$$_fill_6 [1]; /* Currently unused */N char *naml$l_node;  /* Nodespec address */N char *naml$l_dev; /* Device address */N char *naml$l_dir; /* Directory address */N char *naml$l_name; /* Filename address */N char *naml$l_type; /* Filetype address */N char *naml$l_ver; /* Version number address */V unsigned short int naml$w_first_wild_dir; /*First wild directory in related nam */O unsigned short int naml$w_long_dir_levels; /*Total number of directories */N unsigned int namldef$$_fill_7 [1]; /* Currently unused */N/* New NAML-only items: */N unsigned int naml$l_long_defname_size; /*Analogous to FAB$B_DNS */N char *naml$l_long_defname; /*Analogous to FAB$L_DNA */N unsigned int naml$l_long_filename_size; /*Analogous to FAB$B_FNS  */N char *naml$l_long_filename; /*Analogous to FAB$L_FNA */N unsigned int naml$l_long_node_size; /*Analogous to NAM$B_NODE */N char *naml$l_long_node; /*Analogous to NAM$L_NODE */N unsigned int naml$l_long_dev_size; /*Analogous to NAM$B_DEV */N char *naml$l_long_dev; /*Analogous to NAM$L_DEV */N unsigned int naml$l_long_dir_size; /*Analogous to NAM$B_DIR */N char *naml$l_long_dir; /*Analogous to NAM$L_DIR */N unsigned int naml$l_long_name_size; /*Analogous to NAM$B_NAME */N char *naml$l_long_name; /*Analogous to NAM$L_NAME */N unsigned int naml$l_long_type_size; /*Analogous to NAM$B_TYPE */N char *naml$l_long_type; /*Analogous to NAM$L_TYPE */N unsigned int naml$l_long_ver_size; /*Analogous to NAM$B_VER */N char *naml$l_long_ver; /* Analogous to NAM$L_VER */R/*The following three "LONG_EXPAND" fields must be fixed relative to each other */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifN unsigned int naml$l_long_expand_size; /*Analogous to NAM$B_ESL */#pragma __nomember_alignmentN char *naml$l_long_expand; /*Analogous to NAM$L_ESA */N unsigned int naml$l_long_expand_alloc; /*Analogous to NAM$B_ESS */ int naml$l_reserved_mbz_9;R/*The following three "LONG_RESULT" fields must be fixed relative to each other */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifN unsigned int naml$l_long_result_size; /*Analogous to NAM$B_RSL */#pragma __nomember_alignmentN char *naml$l_long_result; /*Analogous to NAM$L_RSA */N unsigned int naml$l_long_result_alloc; /*Analogous to NAM$B_RSS */` int naml$l_reserved_mbz_8; /* Reserved to Digital for future use. Must be zero. */S/*The following three "FILESYS_NAME" fields must be fixed relative to each other */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_align ment#endif* unsigned int naml$l_filesys_name_size;#pragma __nomember_alignment char *naml$l_filesys_name;+ unsigned int naml$l_filesys_name_alloc;N __union { /* Flags set or cleared by RMS */) unsigned int naml$l_output_flags; __struct {i unsigned naml$v_long_result_escape : 1; /* There is an escape character in the long output */b unsigned naml$v_filesys_name_ucs2 : 1; /* The filesys name output is 2-byte Unicode */Z unsigned naml$v_long_result_did : 1; /* There is DIDding in the long output */Z unsigned naml$v_long_result_fid : 1; /* There is FIDding in the long output */e unsigned naml$v_long_result_unicode : 1; /* Long Result or Exp string spec contains ^U */[ unsigned naml$v_mp_in_path : 1; /* mount point encountered in directory path */[ unsigned naml$v_symlnk_in_path : 1; /* symlink encountered in directory path */h unsigned naml$v_object_symlink : 1; /* The specified object is a symlink ($OPEN, $SEARCH) */h unsigned naml$v_is_directory : 1; /* The specified object is a directory ($OPEN, $SEARCH) */( unsigned naml$v_fill_7_ : 7;' } naml$r_output_flags_bits;N/* The rest of the longword also reserved. */& } naml$r_output_flags_overlay;N __union { /* Flags specified by user to RMS */( unsigned int naml$l_input_flags; __struct {Q unsigned naml$v_no_short_output : 1; /* Don't write to RSA and ESA */N unsigned naml$v_case_lookup : 2; /* name case lookup mode */Z unsigned naml$v_open_special : 1; /* $OPEN a special file, rather than the */N/* object referred to by the special file. */V unsigned naml$v_search_symlink : 2; /* Controls whether $SEARCH follows */N/* symlinks in directory paths  */T/* NOTE: Symlink search mode encodings are coordinated across $JPIDEF, $LIBCQDEF, */N/* $LIBFILDEF, $PPROPDEF, and $NAMLDEF. */( unsigned naml$v_fill_8_ : 2;& } naml$r_input_flags_bits;N/* The rest of the longword also reserved and must be zero. */% } naml$r_input_flags_overlay;` int naml$l_reserved_mbz_7; /* Reserved to Digital for future use. Must be zero. */) unsigned int naml$q_user_context [2];` int naml$l_reserved_mbz_6; /* Reserved to Digital for future use. Must be zero. */` int naml$l_reserved_mbz_5; /* Reserved to Digital for future use. Must be zero. */` int naml$l_reserved_mbz_4; /* Reserved to Digital for future use. Must be zero. */` int naml$l_reserved_mbz_3; /* Reserved to Digital for future use. Must be zero. */` int naml$l_reserved_mbz_2; /* Reserved to Digital for future use. Must be zero. */` int naml$l_reserved_mbz_1; /* Reserved to Digital for future use. Must be zero. */ } ; #if !defined(__VAXC)0#define naml$b_nop naml$r_nop_overlay.naml$b_nop@#define naml$v_pwd naml$r_nop_overlay.naml$r_nop_bits.naml$v_pwdF#define naml$v_fill_1 naml$r_nop_overlay.naml$r_nop_bits.naml$v_fill_1F#define naml$v_fill_2 naml$r_nop_overlay.naml$r_nop_bits.naml$v_fill_2F#define naml$v_synchk naml$r_nop_overlay.naml$r_nop_bits.naml$v_synchkL#define naml$v_noconceal naml$r_nop_overlay.naml$r_nop_bits.naml$v_noconcealH#define naml$v_slparse naml$r_nop_overlay.naml$r_nop_bits.naml$v_slparseJ#define naml$v_srchxabs naml$r_nop_overlay.naml$r_nop_bits.naml$v_srchxabsX#define naml$v_no_short_upcase naml$r_nop_overlay.naml$r_nop_bits.naml$v_no_short_upcase0#define naml$l_rlf naml$r_rlf_overlay.naml$l_rlf:#define naml$l_rlf_naml naml$r_rlf_overlay.naml$l_rlf_naml0#define naml$w_fid naml$r_fid_overlay.naml$w_fidJ#define naml$w_fid_num naml$r_fid_overlay.naml$r_fid_fields.naml$w_fid_numJ#define naml$w_fid_seq naml$r_fid_overlay.naml$r_fid_fields.naml$w_fid_seqa#define naml$w_fid_rvn naml$r_fid_overlay.naml$r_fid_fields.naml$r_fid_rvn_overlay.naml$w_fid_rvnw#define naml$b_fid_rvn naml$r_fid_overlay.naml$r_fid_fields.naml$r_fid_rvn_overlay.naml$r_fid_rvn_fields.naml$b_fid_rvnw#define naml$b_fid_nmx naml$r_fid_overlay.naml$r_fid_fields.naml$r_fid_rvn_overlay.naml$r_fid_rvn_fields.naml$b_fid_nmx0#define naml$w_did naml$r_did_overlay.naml$w_didJ#define naml$w_did_num naml$r_did_overlay.naml$r_did_fields.naml$w_did_numJ#define naml$w_did_seq naml$r_did_overlay.naml$r_did_fields.naml$w_did_seqa#define naml$w_did_rvn naml$r_did_overlay.naml$r_did_fields.naml$r_did_rvn_overlay.naml$w_did_rvnw#define naml$b_did_rvn naml$r_did_overlay.naml$r_did_fields.naml$r_did_rvn_overlay.naml$r_did_rvn_fields.naml$b_did_rvnw#define naml$b_did_nmx naml$r_did_overlay.naml$r_did_fields.naml$r_did_rvn_overlay.naml$r_did_rvn_fields.naml$b_did_nmx0#define naml$l_wcc naml$r_wcc_overlay.naml$l_wcc@#define naml$v_ifi naml$r_wcc_overlay.naml$r_wcc_bits.naml$v_ifiH#define naml$v_srchnmf naml$r_wcc_overlay.naml$r_wcc_bits.naml$v_srchnmfD#define naml$v_svctx naml$r_wcc_overlay.naml$r_wcc_bits.naml$v_svctx0#define naml$l_fnb naml$r_fnb_overlay.naml$l_fnbI#define naml$v_exp_ver naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_exp_verK#define naml$v_exp_type naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_exp_typeK#define naml$v_exp_name naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_exp_nameK#define naml$v_wild_ver naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_wild_verM#define naml$v_wild_type naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_wild_typeM#define naml$v_wild_name naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_wild_nameI#define naml$v_exp_dir naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_exp_dirI#define naml$v_exp_dev naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_exp_devK#define naml$v_wildcard naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_wildcardQ#define naml$v_dir_lvls_g7 naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_dir_lvls_g7O#define naml$v_wild_sfdg7 naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_wild_sfdg7Q#define naml$v_search_list naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_search_listK#define naml$v_cncl_dev naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_cncl_devK#define naml$v_root_dir naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_root_dirG#define naml$v_lowver naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_lowverI#define naml$v_highver naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_highverA#define naml$v_ppf naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_ppfC#define naml$v_node naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_nodeG#define naml$v_quoted naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_quotedI#define naml$v_grp_mbr naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_grp_mbrK#define naml$v_wild_dir naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_wild_dirK#define naml$v_dir_lvls naml$r_fnb_overlay.naml$r_fnb_bits0.naml$v_dir_lvlsK#define naml$v_wild_ufd naml$r_fnb_overlay.naml$r_fnb_bits1.naml$v_wild_ufdM#define naml$v_wild_sfd1 naml$r_fnb_overlay.naml$r_fnb_bits1.naml$v_wild_sfd1M#define naml$v_wild_sfd2 naml$r_fnb_overlay.naml$r_fnb_bits1.naml$v_wild_sfd2M#define naml$v_wild_sfd3 naml$r_fnb_overlay.naml$r_fnb_bits1.naml$v_wild_sfd3M#define naml$v_wild_sfd4 naml$r_fnb_overlay.naml$r_fnb_bits1.naml$v_wild_sfd4M#define naml$v_wild_sfd5 naml$r_fnb_overlay.naml$r_fnb_bits1.naml$v_wild_sfd5M#define naml$v_wild_sfd6 naml$r_fnb_overlay.naml$r_fnb_bits1.naml$v_wild_sfd6M#define naml$v_wild_sfd7 naml$r_fnb_overlay.naml$r_fnb_bits1.naml$v_wild_sfd7K#define naml$v_wild_grp naml$r_fnb_overlay.naml$r_fnb_bits2.naml$v_wild_grpK#define naml$v_wild_mbr naml$r_fnb_overlay.naml$r_fnb_bits2.naml$v_wild_mbr0#define naml$b_nmc naml$r_nmc_overlay.naml$b_nmc@#define naml$v_did naml$r_nmc_overlay.naml$r_nmc_bits.naml$v_did@#define naml$v_fid naml$r_nmc_overlay.naml$r_nmc_bits.naml$v_fidH#define naml$v_res_did naml$r_nmc_overlay.naml$r_nmc_bits.naml$v_res_didH#define naml$v_res_fid naml$r_nmc_overlay.naml$r_nmc_bits.naml$v_res_fidN#define naml$v_res_escape naml$r_nmc_overlay.naml$r_nmc_bits.naml$v_res_escapeP#define naml$v_res_unicode naml$r_nmc_overlay.naml$r_nmc_bits.naml$v_res_unicodeK#define naml$l_output_flags naml$r_output_flags_overlay.naml$l_output_flagsp#define naml$v_long_result_escape naml$r_output_flags_overlay.naml$r_output_flags_bits.naml$v_long_result_escapen#define naml$v_filesys_name_ucs2 naml$r_output_flags_overlay.naml$r_output_flags_bits.naml$v_filesys_name_ucs2j#define naml$v_long_result_did naml$r_output_flags_overlay.naml$r_output_flags_bits.naml$v_long_result_didj#define naml$v_long_result_fid naml$r_output_flags_overlay.naml$r_output_flags_bits.naml$v_long_result_fidr#define naml$v_long_result_unicode naml$r_output_flags_overlay.naml$r_output_flags_bits.naml$v_long_result_unicode`#define naml$v_mp_in_path naml$r_output_flags_overlay.naml$r_output_flags_bits.naml$v_mp_in_pathh#define naml$v_symlnk_in_path naml$r_output_flags_overlay.naml$r_output_flags_bits.naml$v_symlnk_in_pathh#define naml$v_object_symlink naml$r_output_flags_overlay.naml$r_output_flags_bits.naml$v_object_symlinkd#define naml$v_is_directory naml$r_output_flags_overlay.naml$r_output_flags_bits.naml$v_is_directoryH#define naml$l_input_flags naml$r_input_flags_overlay.naml$l_input_flagsh#define naml$v_no_short_output naml$r_input_flags_overlay.naml$r_input_flags_bits.naml$v_no_short_output`#define naml$v_case_lookup naml$r_input_flag s_overlay.naml$r_input_flags_bits.naml$v_case_lookupb#define naml$v_open_special naml$r_input_flags_overlay.naml$r_input_flags_bits.naml$v_open_specialf#define naml$v_search_symlink naml$r_input_flags_overlay.naml$r_input_flags_bits.naml$v_search_symlink"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate NAMLDEF operates after aggregate end */N#define NAML$K_BLN 248 /* Name block length */N#define NAML$C_BLN 248 /* Name block length */  #ifdef __NEW_STARLET#define NAML _namldef#else#define NAML namldef#endif'#define cc$rms_naml (*decc$ga_rms_naml)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdefX extern struct NAML cc$rms_naml; /* Declare initialized prototype data structures */# pragma extern_model __restore#else[ globalref struct NAML cc$rms_naml; /* Declare initialized prototype data structures */#endif $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __NAMDEF_LOADED */ ww;K&/************************************************************************************************************* *******************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]NCS$ROUTINES.SDI;1 *//********************************************************************************************************************************//*** MODULE ncs$routines ***/#ifndef __NCS_ROUTINES_LOADED#define __NCS_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 P/**************************************************************************** *//* * */4/* COPYRIGHT (c) 1988 BY * */D/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */&/* ALL RIGHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */P/* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */P/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */&/* TRANSFERRED. * *//* * */P/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. * *//* * */P/* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * *//* * */P/**************************************************************************** */N/* NCS$COMPARE */N/* */N/* Compare Strings */N/* */N/* Compares two strings using specified collating sequence as comparison */N/* basis. */N/*  */!#define ncs$compare NCS$COMPARE #ifdef __NEW_STARLETint ncs$compare( unsigned int *cs_id, void *string_1, void *string_2);#else /* __OLD_STARLET */"int ncs$compare(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* NCS$CONVERT */N/* */N/* Convert String  */N/* */N/* Convert a string using the specified conversion function. */N/* */!#define ncs$convert NCS$CONVERT #ifdef __NEW_STARLETunsigned int ncs$convert( unsigned int *cf_id, void *source, void *dest, __optional_params );#else /* __OLD_STARLET */+unsigned int ncs$convert(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* NCS$END_CF */N/* */N/* End Conversion Function */N/* */N/* Terminates the use of a conversion function by the calling program. */N/*  */#define ncs$end_cf NCS$END_CF #ifdef __NEW_STARLETunsigned int ncs$end_cf( unsigned int *cf_id);#else /* __OLD_STARLET */*unsigned int ncs$end_cf(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* NCS$END_CS */N/* */N/* End Collating Sequence */N/*  */N/* Terminates the use of a collating sequence by the calling program. */N/* */#define ncs$end_cs NCS$END_CS #ifdef __NEW_STARLETunsigned int ncs$end_cs( unsigned int *cs_id);#else /* __OLD_STARLET */*unsigned int ncs$end_cs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* NCS$GET_CF */N/*  */N/* Get Conversion Function */N/* */O/* Retrieves the definition of the named conversion function from the NCS */N/* library. */N/* */#define ncs$get_cf NCS$GET_CF  #ifdef __NEW_STARLETunsigned int ncs$get_cf( unsigned int *cf_id, __optional_params );#else /* __OLD_STARLET */*unsigned int ncs$get_cf(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* NCS$GET_CS */N/* */N/* Get Collating Sequence */N/*  */N/* Retrieves the definition of the named collating sequence from the NCS */N/* library. */N/* */#define ncs$get_cs NCS$GET_CS #ifdef __NEW_STARLETunsigned int ncs$get_cs( unsigned int *cs_id, __optional_params );#else /* __OLD_STARLET */*unsigned int ncs$get_cs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* NCS$RESTORE_CF */N/* */N/* Restore Conversion Function */N/* */N/* Permits the calling program to restore the definition of a "saved" */N/* conversion function from a data base or an RMS file. */N/*  */'#define ncs$restore_cf NCS$RESTORE_CF #ifdef __NEW_STARLETunsigned int ncs$restore_cf( unsigned int *cf_id, __optional_params );#else /* __OLD_STARLET */.unsigned int ncs$restore_cf(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* NCS$RESTORE_CS */N/* */N/* Restore Collating Sequ ence */N/* */U/* Permits the calling program to restore the definition of a "saved" collating */N/* sequence from a data base or an RMS file. */N/* */'#define ncs$restore_cs NCS$RESTORE_CS #ifdef __NEW_STARLETunsigned int ncs$restore_cs( unsigned int *cs_id, __o ptional_params );#else /* __OLD_STARLET */.unsigned int ncs$restore_cs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* NCS$SAVE_CF */N/* */N/* Save Conversion Function */N/* */S/* Provides the calling program with information that permits the application */T/* to store the definition of a conversion function in a local data base or an */N/* RMS file rather than the NCS$LIBRARY. */N/* */!#define ncs$save_cf NCS$SAVE_CF #ifdef __NEW_STARLETunsigned int ncs$save_cf( unsigned int *cf_id, __optional_params );#else /* __OLD_STARLET */+unsigned int ncs$save_cf(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* NCS$SAVE_CS */N/* */N/* Save Collating Sequence */N/* */S/* Provides the calling program with information that permits the application */S/* to store the definition of a collating sequence in a local data base or an */N/* RMS file rather than the NCS$LIBRARY. */N/* */!#define ncs$save_cs NCS$SAVE_CS #ifdef __NEW_STARLETunsigned int ncs$save_cs( unsigned int *cs_id, __optional_params );#else /* __OLD_STARLET */+unsigned int ncs$save_cs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __NCS_ROUTINES_LOADED */ ww{&/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DG A7304:[STARLET_H.SRC]NCSMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $NCSDEF ***/#ifndef __NCSDEF_LOADED#define __NCSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 !defin ed(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:59:32.76 */N/* */N/* FILE: NCSMSG.MSG EDIT: PDG1001 */N/* */Q/***** ************************************************************************ *//** * */(/** COPYRIGHT (C) 1982 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWAR E OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESP ONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/* */N/*++ */N/* */K/* FACILITY: VAX-11 NCS */N/* */N/* ABSTRACT: */N/* */I/* THIS FILE CONTAINS THE DEFINITION FOR THE NCS FACILITY SPECIFIC */I/* ERROR MESSAGES. THE FACILITY CODE FOR NCS IS ???. */N/*  */N/* ENVIRONMENT: VAX/VMS USER MODE */N/* */N/* AUTHOR: P. GILBERT, CREATION DATE: 11-OCT-1983 */N/* */N/* MODIFIED BY: */N/*  */B/* E01-001 ORIGINAL */N/* */R/* E01-002 CHB FIX FOR QAR #396 FROM V52-IFT DATABASE; 21-JUL-1989 */N/* USE ONLY ONE PREFIX FOR NCS$_, LIB$_ AND */N/* TFF$_ MESSAGES. */N/*-- */#define NCS$_FACILITY 561#define NCS$_CVTNUM 36798466#define NCS$_EXPCHAR 36798474#define NCS$_EXPMORTXT 36798482#define NCS$_DUMMY_1 36798490#define NCS$_INVCOLSEQ 36798498#define NCS$_NOMEMORY 36798508#define NCS$_NUMTRUNC 36798512 #define NCS$_QUOTOOLONG 36798522#define NCS$_COL_ADJ 36798532#define NCS$_COL_CMPLX 36798540#define NCS$_COL_CHAR 36798548#define NCS$_COL_PAD 36798556#define NCS$_COL_THREE 36798564#define NCS$_ON_LINE 36798571#define NCS$_INVAPPEND 36798578#define NCS$_NYI 36798586#define NCS$_NOT_CS 36798594#define NCS$_NOT_CF 36798602#define NCS$_LINEINFO 36798611#define NCS$_CONMODEQL 36798618#define NCS$_EXPECTED 36798626#define NCS$_EXP1CHAR 36798634#define NCS$_RANDIF 36798642#define NCS$_BADCS 36798652#define NCS$_BADCF 36798660#define NCS$_INSERTED 36799265#define NCS$_DELETED 36799273#define NCS$_REPLACED 36799281#define NCS$_REMOVED 36799289#define NCS$_EXTRACTED 36799297#define NCS$_DIFTYP 36799304#define NCS$_NOMTCHFOU 36799312#define NCS$_BRKNLIB 36799320#define NCS$_HISTERR 36799328 #define NCS$_INVKEYCHAR 36799336#define NCS$_DELKEYERR 36799346#define NCS$_DELDATERR 36799354#define NCS$_DUPMOD 36799362#define NCS$_FAOFAIL 36799370#define NCS$_INDEXERR 36799378#define NCS$_INSERTERR 36799386#define NCS$_LOOKUPERR 36799394#define NCS$_MODNAMLNG 36799402#define NCS$_NOMODNAM 36799410#define NCS$_NOTOBJLIB 36799418#define NCS$_NOTFORUNK 36799426#define NCS$_CNVRTING 36799435"#define NCS$_EMPTYLIBRARY 36799443#define NCS$_MHDERR 36799452#define NCS$_INITERR 36799460#define NCS$_LIBEMPTY 36800064#define NCS$_DUPLTAB 36800072#define NCS$_NOREADLIB 36800080#define NCS$_NOWRTLIB 36800088#define NCS$_IVTABNAM 36800098#define NCS$_NOSUCHTAB 36800106#define NCS$_NOWILD 36800114 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __NCSDEF_LOADED */ ww5'/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//******************************************************* *************************************************************************//*** MODULE $NETDEF ***/#ifndef __NETDEF_LOADED#define __NETDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */I/* DECnet-VAX definitions */N/*- */ #ifdef __NEW_STARLETtypedef struct _netdef {N unsigned char net$b_user_eco; /* User ECO of DECnet */N unsigned char net$b_dec_eco; /* Digital ECO of DECnet */N unsigned char net$b_dec_version; /* DECnet Versio n */N unsigned char net$b_reserved; /* Reserved to Digital */ } NETDEF;#else /* __OLD_STARLET */struct netdef {N unsigned char net$b_user_eco; /* User ECO of DECnet */N unsigned char net$b_dec_eco; /* Digital ECO of DECnet */N unsigned char net$b_dec_version; /* DECnet Version */N unsigned char net$b_reserved; /* Reserved to Digital */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __NETDEF_LOADED */ ww'/*********************************************************************************************************************** *********/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $NSADEF ***/#ifndef __NSADEF_LOADED#define __NSADEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* Define the packet header and record types used for security auditing. */N/* */N#define NSA$C_MSG_SERVER 1 /* Audit server control message */N#define NSA$C_MSG_AUDIT 2 /* Change in auditable events */N#define NSA$C_MSG_BREAKIN 3 /* Breakin attempt */N#define NSA$C_MSG_INSTALL 4 /* Change to INSTALLed database */N#define NSA$C_MSG_LOGFAIL 5 /* Login failure */N#define NSA$C_MSG_LOGIN 6 /* Successful login */N#define NSA$C_MSG_LOGOUT 7 /* Successful logout */N#define NSA$C_MSG_MOUNT 8 /* Volume mount or dismount */N#define NSA$C_MSG_NETPROXY 9 /* Network proxy data base change */N#define NSA$C_MSG_ACCESS 10 /* Object access *** obsolete *** */N#define NSA$C_MSG_SYSUAF 11 /* UAF change */N#define NSA$C_MSG_RIGHTSDB 12 /* Rights database change */N#define NSA$C_MSG_CUSTOMER 13 /* Customer application event */N#define NSA$C_MSG_CSS 14 /* CSS application event */N#define NSA$C_MSG_LP 15 /* Layered product event */N#define NSA$C_MSG_PRVAUD 16 /* Privilege audit */N#define NSA$C_MSG_RESERVED_1 17 /* Reserved message type code */N#define NSA$C_MSG_RESERVED_2 18 /* Reserved message type code */N#define NSA$C_MSG_RESERVED_3 19 /* Reserved message type code */N#define NSA$C_MSG_RESERVED_4 20 /* Reserved message type code */N#define NSA$C_MSG_SYSTIME 21 /* System time modification */N#define NSA$C_MSG_SYSGEN 22 /* SYSGEN parameter modification */N#define NSA$C_MSG_OBJ_CREATE 23 /* Object creation */N#define NSA$C_MSG_OBJ_DELETE 24 /* Object deletion */N#define NSA$C_MSG_OBJ_DEACCESS 25 /* Object deaccess */N#define NSA$C_MSG_OBJ_ACCESS 26 /* Object access */N#define NSA$C_MSG_CONNECTION 27 /* Connection */N#define NSA$C_MSG_RESERVED_5 28 /* Reserved Message type code */N#define NSA$C_MSG_NCP 29 /* NCP command line auditing */N#define NSA$C_MSG_PROCESS 30 /* Process control auditing */O#define NSA$C_MSG_OBJECT_SERVICE 31 /* Cluster visable object processing */N#define NSA$C_MSG_AUTHENTICATE 32 /* Distributed authentication */N#define NSA$C_MSG_PERSONA 33 /* Persona event */N#define NSA$C_MSG_MAX_CODE 34 /* Last type code (plus one) */#define NSA$M_MANDATORY 0x1#define NSA$M_ACL 0x2#define NSA$M_INTERNAL 0x4#define NSA$M_ALARM 0x8#define NSA$M_AUDIT 0x10#define NSA$M_FOREIGN 0x20#define NSA$M_FLUSH 0x40#define NSA$M_SERVER 0x80#define NSA$M_DEACCESS 0x100#define NSA$M_SYNCH 0x200#define NSA$M_IDENTIFIER 0x400#define NSA$M_PROCPRIV 0x800#define NSA$M_AUTHPRIV 0x1000 #define NSA$M_NOEVTCHECK 0x2000#define NSA$M_NOFAILAUD 0x4000#define NSA$M_NOSUCCAUD 0x8000N#define NSA$C_VERSION_1 1 /* First version of auditing */N#define NSA$C_VERSION_2 2 /* Second version of auditing */_#define NSA$C_VERSION_3 3 /* Third version of auditing (support facility code) */N#define NSA$C_V1_MSG_HDR_LENGTH 12 /* For version 1 messages */"#define NSA$K_V1_MSG_HDR_LENGTH 12N#define NSA$C_MSG_HDR_LENGTH 20  /* For latest version messages */#define NSA$K_MSG_HDR_LENGTH 20 #ifdef __NEW_STARLETtypedef struct _nsamsgdef {N/* Define the packet header */N unsigned short int nsa$w_record_type; /* Audit event type */N unsigned short int nsa$w_record_subtype; /* Audit event subtype */ __union {N unsigned short int nsa$w_flags; /* Auditing flags */ __struct {N  unsigned nsa$v_mandatory : 1; /* Event must be logged */N unsigned nsa$v_acl : 1; /* Event results from ACE */N unsigned nsa$v_internal : 1; /* Event generated by TCB */N unsigned nsa$v_alarm : 1; /* Event is an alarm */N unsigned nsa$v_audit : 1; /* Event is an audit */N unsigned nsa$v_foreign : 1; /* Event outside of TCB */N unsigned nsa$v_flush : 1; /* Force audit server buffer flush */N unsigned nsa$v_server : 1; /* Override process no-audit bit */N unsigned nsa$v_deaccess : 1; /* Deaccess audit required */N unsigned nsa$v_synch : 1; /* Synchronous return if possible */O unsigned nsa$v_identifier : 1; /* Privilege check via identifier */Y unsigned nsa$v_procpriv : 1; /* Privilege check against process privileges */\ unsigned nsa$v_authpriv : 1; /* Priv ilege check against authorized privileges */N unsigned nsa$v_noevtcheck : 1; /* Bypass event check */T unsigned nsa$v_nofailaud : 1; /* Do not audit failed privilege checks */X unsigned nsa$v_nosuccaud : 1; /* Do not audit successful privilege checks */ } nsa$r_fill_13_; } nsa$r_fill_12_;N unsigned short int nsa$w_packet_count; /* Number of data packets */ __union {* unsigned short int nsa$w_rec_size;V  unsigned short int nsa$w_record_size; /* Total size (header + data packets) */! } nsa$r_rec_size_overlay;N unsigned char nsa$b_spare_3; /* Spare */N unsigned char nsa$b_version; /* Security auditing version number */N unsigned short int nsa$w_spare_4 [3]; /* Spare words */N unsigned short int nsa$w_facility; /* VMS facility code */N unsigned char nsa$r_packet_list; /* Start of packets  */ } NSAMSGDEF; #if !defined(__VAXC).#define nsa$w_flags nsa$r_fill_12_.nsa$w_flagsE#define nsa$v_mandatory nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_mandatory9#define nsa$v_acl nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_aclC#define nsa$v_internal nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_internal=#define nsa$v_alarm nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_alarm=#define nsa$v_audit nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_auditA#define nsa$v_foreign nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_foreign=#define nsa$v_flush nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_flush?#define nsa$v_server nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_serverC#define nsa$v_deaccess nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_deaccess=#define nsa$v_synch nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_synchG#define nsa$v_identifier nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_identifierC#define nsa$v_procpriv nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_procprivC#define nsa$v_authpriv nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_authprivG#define nsa$v_noevtcheck nsa$r _fill_12_.nsa$r_fill_13_.nsa$v_noevtcheckE#define nsa$v_nofailaud nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_nofailaudE#define nsa$v_nosuccaud nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_nosuccaud<#define nsa$w_rec_size nsa$r_rec_size_overlay.nsa$w_rec_sizeB#define nsa$w_record_size nsa$r_rec_size_overlay.nsa$w_record_size"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct nsamsgdef {N/* Define the packet header */N unsigned sho rt int nsa$w_record_type; /* Audit event type */N unsigned short int nsa$w_record_subtype; /* Audit event subtype */ __union {N unsigned short int nsa$w_flags; /* Auditing flags */ __struct {N unsigned nsa$v_mandatory : 1; /* Event must be logged */N unsigned nsa$v_acl : 1; /* Event results from ACE */N unsigned nsa$v_internal : 1; /* Event generated by TCB */N  unsigned nsa$v_alarm : 1; /* Event is an alarm */N unsigned nsa$v_audit : 1; /* Event is an audit */N unsigned nsa$v_foreign : 1; /* Event outside of TCB */N unsigned nsa$v_flush : 1; /* Force audit server buffer flush */N unsigned nsa$v_server : 1; /* Override process no-audit bit */N unsigned nsa$v_deaccess : 1; /* Deaccess audit required */N unsigned nsa$v_synch : 1; /* Synchronous return if possible */O unsigned nsa$v_identifier : 1; /* Privilege check via identifier */Y unsigned nsa$v_procpriv : 1; /* Privilege check against process privileges */\ unsigned nsa$v_authpriv : 1; /* Privilege check against authorized privileges */N unsigned nsa$v_noevtcheck : 1; /* Bypass event check */T unsigned nsa$v_nofailaud : 1; /* Do not audit failed privilege checks */X unsigned n sa$v_nosuccaud : 1; /* Do not audit successful privilege checks */ } nsa$r_fill_13_; } nsa$r_fill_12_;N unsigned short int nsa$w_packet_count; /* Number of data packets */ __union {* unsigned short int nsa$w_rec_size;V unsigned short int nsa$w_record_size; /* Total size (header + data packets) */! } nsa$r_rec_size_overlay;N unsigned char nsa$b_spare_3; /* Spare */N unsigned char nsa$b_version;  /* Security auditing version number */N unsigned short int nsa$w_spare_4 [3]; /* Spare words */N unsigned short int nsa$w_facility; /* VMS facility code */N unsigned char nsa$r_packet_list; /* Start of packets */ } ; #if !defined(__VAXC).#define nsa$w_flags nsa$r_fill_12_.nsa$w_flagsE#define nsa$v_mandatory nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_mandatory9#define nsa$v_acl nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_aclC#define nsa$v_internal nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_internal=#define nsa$v_alarm nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_alarm=#define nsa$v_audit nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_auditA#define nsa$v_foreign nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_foreign=#define nsa$v_flush nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_flush?#define nsa$v_server nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_serverC#define nsa$v_deaccess nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_deaccess=#define nsa$v_synch nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_synchG#define nsa$v_identifier nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_identifierC#define nsa$v_procpriv nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_procprivC#define nsa$v_authpriv nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_authprivG#define nsa$v_noevtcheck nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_noevtcheckE#define nsa$v_nofailaud nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_nofailaudE#define nsa$v_nosuccaud nsa$r_fill_12_.nsa$r_fill_13_.nsa$v_nosuccaud<#define nsa$w_rec_size nsa$r_rec_size_overlay.nsa$w_re c_sizeB#define nsa$w_record_size nsa$r_rec_size_overlay.nsa$w_record_size"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* Server control message types */N#define NSA$C_SRV_ADD_JOURNAL 1 /* Add a new audit journal */N#define NSA$C_SRV_REM_JOURNAL 2 /* Remove an existing audit journal */N#define NSA$C_SRV_FLUSH_JOURNAL 3 /* Flush specified journal */N#define NSA$C_SRV_FLUSH_ALL_JOURNALS 4 /* Flush all audit journals */N#define NSA$C_SRV_FLUSH_INTERVAL 5 /* Journal flushing time interval */N#define NSA$C_SRV_ARCHIVE_DEVICE 6 /* Specify archiving device */N#define NSA$C_SRV_ARCHIVE_ENABLE 7 /* Archiving enable flags */N#define NSA$C_SRV_ARCHIVE_DISABLE 8 /* Archiving disable flags */N#define NSA$C_SRV_ARCHIVE_INTERVAL 9 /* Guaranteed archinving interval */N#define NSA$C_SRV_BADJNL_INTERVAL 10 /* Bad journal scan interval */]#define NSA$C_SRV_BADJNL_LIMIT 11 /* Maximum number of bad journals to keep track of */N#define NSA$C_SRV_EXIT 12 /* Shut down the server */P#define NSA$C_SRV_CREATE_SYSTEM_LOG 13 /* Create a new system audit log file */V#define NSA$C_SRV_AUDIT_CHANGE 14 /* Change state of system auditing/alarming */c#define NSA$C_SRV_REDIRECT_SYSTEM_LOG 15 /* Open the latest version of the system audit log file */U#define NSA$C_SRV_REM_ENABLE 16  /* Enable resource monitoring on a journal */V#define NSA$C_SRV_REM_DISABLE 17 /* Disable resource monitoring on a journal */N#define NSA$C_SRV_REM_MONITOR_INTERVAL 18 /* Resource monitor interval */O#define NSA$C_SRV_REM_RESUME_INTERVAL 19 /* Resource resume monitor interval */O#define NSA$C_SRV_REM_MONITOR_MODE 20 /* Specify new resource monitor mode */V#define NSA$C_SRV_REM_FINAL_ACTION 21 /* Specify final resource exhaustion action */N#define NSA$C_SRV_REM_WARN_THRESHOLD 22 /* Resource warning threshold */T#define NSA$C_SRV_REM_ACTION_THRESHOLD 23 /* Resource exhaustion action threshold */N#define NSA$C_SRV_REM_RESUME_THRESHOLD 24 /* Resource resumption threshold */N#define NSA$C_SRV_REM_RESUME 25 /* Force resource re-evaluation */N#define NSA$C_SRV_REM_ADD_EXCLUDE 26 /* Add process to exclusion list */P#define NSA$C_SRV_REM_DEL_EXCLUDE 27 /* Remove process from exclusion list */N#define NSA$C_SRV_LISTENER_ENABLE 28 /* Specify listener device */N#define NSA$C_SRV_LISTENER_DISABLE 29 /* Cancel listener device */[#define NSA$C_SRV_NEW_LOG 30 /* Create new cluster-wide system audit log file */N#define NSA$C_SRV_RESTART 31 /* Restart audit server */Q#define NSA$C_SRV_LOCK_SERVER 32 /* Lock audit server to prevent change */N#define NSA$C_SRV_RESERVED_1 33 /* Reserved server code */N#define NSA$C_SRV_RESERVED_2 34 /* Reserved server code */N#define NSA$C_SRV_RESERVED_3 35 /* Reserved server code */N#define NSA$C_SRV_RESERVED_4 36 /* Reserved server code */S#define NSA$C_SRV_FAILURE_MODE 37 /* Change security auditing failure mode */N#define NSA$C_SRV_SNAPSHOT 38 /* System snapshot in progress */N#define NSA$C_SRV_BACKLOG_TOTAL 39 /* Flow control total backlog */N#define NSA$C_SRV_BACKLOG_PROCESS 40 /* Flow control process backlog */N#define NSA$C_SRV_INITIATE 41 /* Initiate event logging */N#define NSA$C_SRV_RESTART_ALL 42 /* Restart all audit servers */N#define NSA$C_SRV_RESTART_OBJECT 43 /* Restart object server */N#define NSA$C_SRV_MAX_CODE 44 /* Last message code (plus one) */N/* Define resource exhaustion monitor modes. */N#define NSA$C_REM_SPACE 1 /* # blocks to keep free on volume */N#define NSA$C_REM_PERCENTAGE 2 /* % of volume to keep free */N#define NSA$C_REM_COUNT 3 /* # msgs to reserve space for */R#define NSA$C_REM_TIME 4 /* # secs to reserve ave. msg space for */S#define NSA$C_REM_MAX_MODE 5 /* Last resource monitor mode (plus one) */N/* Define final action to take when process buffer space exhausted. */N#define NSA$C_REM_PURGE_OLD 1 /* Purge oldest entry from queue */N#define NSA$C_REM_IGNORE_NEW 2 /* Ignore newest (current) message */R#define NSA$C_REM_RESTART 3 /* Restart server - create process dump */N#define NSA$C_REM_CRASH 4 /* Shutdown VMS (BUG_CHECK) */O#define NSA$C_REM_MAX_FINAL 5 /* Last final action mode (plus one) */N/* Define security auditing state modification codes. */#define NSA$C_AUDIT_DISABLED 1#define NSA$C_AUDIT_ENABLED 2#define NSA$C_AUDIT_TERMINATE 3#define NSA$C_AUDIT_INITIATE 4N#define NSA$C_SNAPSHOT_SAVE 5 /* System snapshot save in progress */Q#define NSA$C_SNAPSHOT_ABORT 6 /* System snapshot attempt has aborted */P#define NSA$C_SNAPSHOT_STARTUP 7 /* System booted from a snapshot file */N#define NSA$C_SNAPSHOT_ACCESS 8 /* Snapshot file access/deaccess */N#define NSA$C_AUDIT_STATE 9 /* New state of audit flags */N#define NSA$C_ALARM_STATE 10 /* New state of alarm flags */U#define NSA$C_AUDIT_LOG_FINAL 11 /* Final entry in audit log (forward link) */R#define NSA$C_AUDIT_LOG_FIRST 12 /* First entry in audit log (back link) */T#define NSA$C_AUDIT_BAD_TCB_AUDIT 13 /* An internal (TCB) audit was ill-formed */#define NSA$C_AUDIT_MAX_CODE 14N/* Define security auditing failure mode codes. */N#define NSA$C_FAIL_WAIT 1 /* Wait for resource (if possible) */N#define NSA$C_FAIL_CRASH 2 /* Crash system on failure */N#def ine NSA$C_FAIL_IGNORE 3 /* Ignore failing audit */N#define NSA$C_FAIL_MAX_MODE 4 /* Last failure mode (plus one) */N/* Define BREAKIN, LOGIN, LOGOUT, and LOGIN failure codes. */#define NSA$C_BATCH 1#define NSA$C_DETACHED 2#define NSA$C_DIALUP 3#define NSA$C_LOCAL 4#define NSA$C_NETWORK 5#define NSA$C_REMOTE 6#define NSA$C_SUBPROCESS 7#define NSA$C_SERVER 8 #define NSA$C_JOBTYPE_MAX_CODE 9N/* Define INSTALLed file database st ate modification codes. */#define NSA$C_INSTALL_ADD 1#define NSA$C_INSTALL_REMOVE 2 #define NSA$C_INSTALL_MAX_CODE 3S/* Define INSTALLed file database state modification qualifier codes. Also, the */N/* codes used by the audit message formatting tables. */#define NSA$M_INS_SPARE_0 0x1#define NSA$M_INS_OPEN 0x2%#define NSA$M_INS_HEADER_RESIDENT 0x4#define NSA$M_INS_SHARED 0x8##define NSA$M_INS_EXECUTE_ONLY 0x10 #define NSA$M_INS_WRITEABLE 0x20 !#define NSA$M_INS_PRIVILEGED 0x40 #define NSA$M_INS_PROTECTED 0x80#define NSA$M_INS_NOPURGE 0x100"#define NSA$M_INS_ACCOUNTING 0x200"#define NSA$M_INS_AUTHORIZED 0x400#define NSA$M_INS_SIGNAL 0x800 #ifdef __NEW_STARLETtypedef union _fill_14_ { int nsa$l_install_flags; __struct {' unsigned nsa$v_ins_spare_0 : 1;$ unsigned nsa$v_ins_open : 1;/ unsigned nsa$v_ins_header_resident : 1;& unsigned nsa$v_ins_shared : 1;, unsigned nsa$v_i ns_execute_only : 1;) unsigned nsa$v_ins_writeable : 1;* unsigned nsa$v_ins_privileged : 1;) unsigned nsa$v_ins_protected : 1;' unsigned nsa$v_ins_nopurge : 1;* unsigned nsa$v_ins_accounting : 1;* unsigned nsa$v_ins_authorized : 1;& unsigned nsa$v_ins_signal : 1;$ unsigned nsa$v_fill_16_ : 4; } nsa$r_fill_15_; } FILL_14_; #if !defined(__VAXC):#define nsa$v_ins_spare_0 nsa$r_fill_15_.nsa$v_ins_spare_04#define nsa$ v_ins_open nsa$r_fill_15_.nsa$v_ins_openJ#define nsa$v_ins_header_resident nsa$r_fill_15_.nsa$v_ins_header_resident8#define nsa$v_ins_shared nsa$r_fill_15_.nsa$v_ins_sharedD#define nsa$v_ins_execute_only nsa$r_fill_15_.nsa$v_ins_execute_only>#define nsa$v_ins_writeable nsa$r_fill_15_.nsa$v_ins_writeable@#define nsa$v_ins_privileged nsa$r_fill_15_.nsa$v_ins_privileged>#define nsa$v_ins_protected nsa$r_fill_15_.nsa$v_ins_protected:#define nsa$v_ins_nopurge nsa$r_fill_15_.nsa$v_ins_nopurge@#defin e nsa$v_ins_accounting nsa$r_fill_15_.nsa$v_ins_accounting@#define nsa$v_ins_authorized nsa$r_fill_15_.nsa$v_ins_authorized8#define nsa$v_ins_signal nsa$r_fill_15_.nsa$v_ins_signal"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union fill_14_ { int nsa$l_install_flags; __struct {' unsigned nsa$v_ins_spare_0 : 1;$ unsigned nsa$v_ins_open : 1;/ unsigned nsa$v_ins_header_resident : 1;& unsigned nsa$v_ins_shared : 1;, unsign ed nsa$v_ins_execute_only : 1;) unsigned nsa$v_ins_writeable : 1;* unsigned nsa$v_ins_privileged : 1;) unsigned nsa$v_ins_protected : 1;' unsigned nsa$v_ins_nopurge : 1;* unsigned nsa$v_ins_accounting : 1;* unsigned nsa$v_ins_authorized : 1;& unsigned nsa$v_ins_signal : 1;$ unsigned nsa$v_fill_16_ : 4; } nsa$r_fill_15_; } ; #if !defined(__VAXC):#define nsa$v_ins_spare_0 nsa$r_fill_15_.nsa$v_ins_spare_04#define ns a$v_ins_open nsa$r_fill_15_.nsa$v_ins_openJ#define nsa$v_ins_header_resident nsa$r_fill_15_.nsa$v_ins_header_resident8#define nsa$v_ins_shared nsa$r_fill_15_.nsa$v_ins_sharedD#define nsa$v_ins_execute_only nsa$r_fill_15_.nsa$v_ins_execute_only>#define nsa$v_ins_writeable nsa$r_fill_15_.nsa$v_ins_writeable@#define nsa$v_ins_privileged nsa$r_fill_15_.nsa$v_ins_privileged>#define nsa$v_ins_protected nsa$r_fill_15_.nsa$v_ins_protected:#define nsa$v_ins_nopurge nsa$r_fill_15_.nsa$v_ins_nopurge@#define nsa$v_ins_accounting nsa$r_fill_15_.nsa$v_ins_accounting@#define nsa$v_ins_authorized nsa$r_fill_15_.nsa$v_ins_authorized8#define nsa$v_ins_signal nsa$r_fill_15_.nsa$v_ins_signal"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define NSA$C_INS_SPARE_0 1#define NSA$C_INS_OPEN 2##define NSA$C_INS_HEADER_RESIDENT 3#define NSA$C_INS_SHARED 4 #define NSA$C_INS_EXECUTE_ONLY 5#define NSA$C_INS_WRITEABLE 6#define NSA$C_INS_PRIVILEGED 7#define NSA$C_INS_PROTECTED 8#define NSA$C_INS_NOPURGE 9#define NSA$C_INS_ACCOUNTING 10#define NSA$C_INS_AUTHORIZED 11#define NSA$C_INS_SIGNAL 12#define NSA$C_INS_MAX_CODE 13N/* Define volume state modification codes. */#define NSA$C_VOL_DISMOUNT 1#define NSA$C_VOL_MOUNT 2#define NSA$C_VOL_MAX_CODE 3N/* Define volume state modification qualifier codes. */#define NSA$M_MNT_FOREIGN 0x1#define NSA$M_MNT_GROUP 0x2#define NSA$M_MNT_NOASSIST 0x4#define NSA$M_MNT_NODISKQ 0x8#define NSA$M_MNT_NOHDR3 0x10#define NSA$M_MNT_NOLABEL 0x20#define NSA$M_MNT_NOWRITE 0x40!#define NSA$M_MNT_OVR_ACCESS 0x80#define NSA$M_MNT_OVR_EXP 0x100!#define NSA$M_MNT_OVR_IDENT 0x200!#define NSA$M_MNT_OVR_SETID 0x400!#define NSA$M_MNT_READCHECK 0x800#define NSA$M_MNT_SHARE 0x1000 #define NSA$M_MNT_MESSAGE 0x2000#define NSA$M_MNT_SYSTEM 0x4000##define NSA$M_MNT_WRITECHECK 0x8000##define NSA$M_MNT_WRITETHRU 0x10000!#define NSA$M_MNT_NOCACHE 0x20000"#define NSA$M_MNT_OVR_LOCK 0x40000"#define NSA$M_MNT_NOMNTVER 0x80000##define NSA$M_MNT_NOUNLOAD 0x100000*#define NSA$M_MNT_TAPE_DATA_WRITE 0x200000!#define NSA$M_MNT_NOCOPY 0x400000!#define NSA$M_MNT_NOAUTO 0x800000$#define NSA$M_MNT_INIT_ALL 0x1000000%#define NSA$M_MNT_INIT_CONT 0x2000000$#define NSA$M_MNT_OVR_VOLO 0x4000000$#define NSA$M_MNT_INTERCHG 0x8000000$#define NSA$M_MNT_CLUSTER 0x10000000&#define NSA$M_MNT_NOREBUILD 0x20000000'#define NSA$M_MNT_OVR_SHAMEM 0x40000000&#define NSA$M_MNT_MULTI_VOL 0x80000000 #ifdef __NEW_STARLETtypedef union _fill_17_ { __int64 nsa$q_mount_flags; __struct {' unsigned nsa$v_mnt_foreign : 1;% unsigned nsa$v_mnt_group : 1;( unsigned nsa$v_mnt_noassist : 1;' unsigned nsa$v_mnt_nodiskq : 1;& unsigned nsa$v_mnt_nohdr3 : 1;' unsigned nsa$v_mnt_nolabel : 1;' unsigned nsa$v_mnt_nowrite : 1;* unsigned nsa$v_mnt_ovr_access : 1;' unsign ed nsa$v_mnt_ovr_exp : 1;) unsigned nsa$v_mnt_ovr_ident : 1;) unsigned nsa$v_mnt_ovr_setid : 1;) unsigned nsa$v_mnt_readcheck : 1;% unsigned nsa$v_mnt_share : 1;' unsigned nsa$v_mnt_message : 1;& unsigned nsa$v_mnt_system : 1;* unsigned nsa$v_mnt_writecheck : 1;) unsigned nsa$v_mnt_writethru : 1;' unsigned nsa$v_mnt_nocache : 1;( unsigned nsa$v_mnt_ovr_lock : 1;( unsigned nsa$v_mnt_nomntver : 1;( un signed nsa$v_mnt_nounload : 1;/ unsigned nsa$v_mnt_tape_data_write : 1;& unsigned nsa$v_mnt_nocopy : 1;& unsigned nsa$v_mnt_noauto : 1;( unsigned nsa$v_mnt_init_all : 1;) unsigned nsa$v_mnt_init_cont : 1;( unsigned nsa$v_mnt_ovr_volo : 1;( unsigned nsa$v_mnt_interchg : 1;' unsigned nsa$v_mnt_cluster : 1;) unsigned nsa$v_mnt_norebuild : 1;* unsigned nsa$v_mnt_ovr_shamem : 1;) unsigned nsa$v_mnt_multi_vol : 1;%  unsigned nsa$v_mnt_diskq : 1;* unsigned nsa$v_mnt_compaction : 1;' unsigned nsa$v_mnt_include : 1;% unsigned nsa$v_mnt_pass2 : 1;( unsigned nsa$v_mnt_ovr_nofe : 1;' unsigned nsa$v_mnt_scratch : 1;% unsigned nsa$v_mnt_cdrom : 1;# unsigned nsa$v_mnt_xar : 1;# unsigned nsa$v_mnt_dsi : 1;) unsigned nsa$v_mnt_subsystem : 1;, unsigned nsa$v_mnt_nocompaction : 1;, unsigned nsa$v_mnt_ovr_security : 1;2  unsigned nsa$v_mnt_ovr_limited_search : 1;$ unsigned nsa$v_mnt_pool : 1;$ unsigned nsa$v_fill_19_ : 2; } nsa$r_fill_18_; } FILL_17_; #if !defined(__VAXC):#define nsa$v_mnt_foreign nsa$r_fill_18_.nsa$v_mnt_foreign6#define nsa$v_mnt_group nsa$r_fill_18_.nsa$v_mnt_group<#define nsa$v_mnt_noassist nsa$r_fill_18_.nsa$v_mnt_noassist:#define nsa$v_mnt_nodiskq nsa$r_fill_18_.nsa$v_mnt_nodiskq8#define nsa$v_mnt_nohdr3 nsa$r_fill_18_.nsa$v_mnt_nohdr3:#define nsa$v_ mnt_nolabel nsa$r_fill_18_.nsa$v_mnt_nolabel:#define nsa$v_mnt_nowrite nsa$r_fill_18_.nsa$v_mnt_nowrite@#define nsa$v_mnt_ovr_access nsa$r_fill_18_.nsa$v_mnt_ovr_access:#define nsa$v_mnt_ovr_exp nsa$r_fill_18_.nsa$v_mnt_ovr_exp>#define nsa$v_mnt_ovr_ident nsa$r_fill_18_.nsa$v_mnt_ovr_ident>#define nsa$v_mnt_ovr_setid nsa$r_fill_18_.nsa$v_mnt_ovr_setid>#define nsa$v_mnt_readcheck nsa$r_fill_18_.nsa$v_mnt_readcheck6#define nsa$v_mnt_share nsa$r_fill_18_.nsa$v_mnt_share:#define nsa$v_mnt_message nsa$r_fill_18_.nsa$v_mnt_message8#define nsa$v_mnt_system nsa$r_fill_18_.nsa$v_mnt_system@#define nsa$v_mnt_writecheck nsa$r_fill_18_.nsa$v_mnt_writecheck>#define nsa$v_mnt_writethru nsa$r_fill_18_.nsa$v_mnt_writethru:#define nsa$v_mnt_nocache nsa$r_fill_18_.nsa$v_mnt_nocache<#define nsa$v_mnt_ovr_lock nsa$r_fill_18_.nsa$v_mnt_ovr_lock<#define nsa$v_mnt_nomntver nsa$r_fill_18_.nsa$v_mnt_nomntver<#define nsa$v_mnt_nounload nsa$r_fill_18_.nsa$v_mnt_nounloadJ#define nsa$v_mnt_tape_data_write nsa$ r_fill_18_.nsa$v_mnt_tape_data_write8#define nsa$v_mnt_nocopy nsa$r_fill_18_.nsa$v_mnt_nocopy8#define nsa$v_mnt_noauto nsa$r_fill_18_.nsa$v_mnt_noauto<#define nsa$v_mnt_init_all nsa$r_fill_18_.nsa$v_mnt_init_all>#define nsa$v_mnt_init_cont nsa$r_fill_18_.nsa$v_mnt_init_cont<#define nsa$v_mnt_ovr_volo nsa$r_fill_18_.nsa$v_mnt_ovr_volo<#define nsa$v_mnt_interchg nsa$r_fill_18_.nsa$v_mnt_interchg:#define nsa$v_mnt_cluster nsa$r_fill_18_.nsa$v_mnt_cluster>#define nsa$v_mnt_norebuild nsa$r_fill_18_ .nsa$v_mnt_norebuild@#define nsa$v_mnt_ovr_shamem nsa$r_fill_18_.nsa$v_mnt_ovr_shamem>#define nsa$v_mnt_multi_vol nsa$r_fill_18_.nsa$v_mnt_multi_vol6#define nsa$v_mnt_diskq nsa$r_fill_18_.nsa$v_mnt_diskq@#define nsa$v_mnt_compaction nsa$r_fill_18_.nsa$v_mnt_compaction:#define nsa$v_mnt_include nsa$r_fill_18_.nsa$v_mnt_include6#define nsa$v_mnt_pass2 nsa$r_fill_18_.nsa$v_mnt_pass2<#define nsa$v_mnt_ovr_nofe nsa$r_fill_18_.nsa$v_mnt_ovr_nofe:#define nsa$v_mnt_scratch nsa$r_fill_18_.nsa$v_mnt_scr atch6#define nsa$v_mnt_cdrom nsa$r_fill_18_.nsa$v_mnt_cdrom2#define nsa$v_mnt_xar nsa$r_fill_18_.nsa$v_mnt_xar2#define nsa$v_mnt_dsi nsa$r_fill_18_.nsa$v_mnt_dsi>#define nsa$v_mnt_subsystem nsa$r_fill_18_.nsa$v_mnt_subsystemD#define nsa$v_mnt_nocompaction nsa$r_fill_18_.nsa$v_mnt_nocompactionD#define nsa$v_mnt_ovr_security nsa$r_fill_18_.nsa$v_mnt_ovr_securityP#define nsa$v_mnt_ovr_limited_search nsa$r_fill_18_.nsa$v_mnt_ovr_limited_search4#define nsa$v_mnt_pool nsa$r_fill_18_.nsa$v_mnt_pool"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union fill_17_ { int nsa$q_mount_flags [2]; __struct {' unsigned nsa$v_mnt_foreign : 1;% unsigned nsa$v_mnt_group : 1;( unsigned nsa$v_mnt_noassist : 1;' unsigned nsa$v_mnt_nodiskq : 1;& unsigned nsa$v_mnt_nohdr3 : 1;' unsigned nsa$v_mnt_nolabel : 1;' unsigned nsa$v_mnt_nowrite : 1;* unsigned nsa$v_mnt_ovr_access : 1;' unsigned nsa$v_mnt_ovr_e xp : 1;) unsigned nsa$v_mnt_ovr_ident : 1;) unsigned nsa$v_mnt_ovr_setid : 1;) unsigned nsa$v_mnt_readcheck : 1;% unsigned nsa$v_mnt_share : 1;' unsigned nsa$v_mnt_message : 1;& unsigned nsa$v_mnt_system : 1;* unsigned nsa$v_mnt_writecheck : 1;) unsigned nsa$v_mnt_writethru : 1;' unsigned nsa$v_mnt_nocache : 1;( unsigned nsa$v_mnt_ovr_lock : 1;( unsigned nsa$v_mnt_nomntver : 1;( unsigned nsa$v_mnt_n ounload : 1;/ unsigned nsa$v_mnt_tape_data_write : 1;& unsigned nsa$v_mnt_nocopy : 1;& unsigned nsa$v_mnt_noauto : 1;( unsigned nsa$v_mnt_init_all : 1;) unsigned nsa$v_mnt_init_cont : 1;( unsigned nsa$v_mnt_ovr_volo : 1;( unsigned nsa$v_mnt_interchg : 1;' unsigned nsa$v_mnt_cluster : 1;) unsigned nsa$v_mnt_norebuild : 1;* unsigned nsa$v_mnt_ovr_shamem : 1;) unsigned nsa$v_mnt_multi_vol : 1;% unsigned n sa$v_mnt_diskq : 1;* unsigned nsa$v_mnt_compaction : 1;' unsigned nsa$v_mnt_include : 1;% unsigned nsa$v_mnt_pass2 : 1;( unsigned nsa$v_mnt_ovr_nofe : 1;' unsigned nsa$v_mnt_scratch : 1;% unsigned nsa$v_mnt_cdrom : 1;# unsigned nsa$v_mnt_xar : 1;# unsigned nsa$v_mnt_dsi : 1;) unsigned nsa$v_mnt_subsystem : 1;, unsigned nsa$v_mnt_nocompaction : 1;, unsigned nsa$v_mnt_ovr_security : 1;2 unsigned nsa$v !_mnt_ovr_limited_search : 1;$ unsigned nsa$v_mnt_pool : 1;$ unsigned nsa$v_fill_19_ : 2; } nsa$r_fill_18_; } ; #if !defined(__VAXC):#define nsa$v_mnt_foreign nsa$r_fill_18_.nsa$v_mnt_foreign6#define nsa$v_mnt_group nsa$r_fill_18_.nsa$v_mnt_group<#define nsa$v_mnt_noassist nsa$r_fill_18_.nsa$v_mnt_noassist:#define nsa$v_mnt_nodiskq nsa$r_fill_18_.nsa$v_mnt_nodiskq8#define nsa$v_mnt_nohdr3 nsa$r_fill_18_.nsa$v_mnt_nohdr3:#define nsa$v_mnt_nolabel nsa$r_fill_18_ ".nsa$v_mnt_nolabel:#define nsa$v_mnt_nowrite nsa$r_fill_18_.nsa$v_mnt_nowrite@#define nsa$v_mnt_ovr_access nsa$r_fill_18_.nsa$v_mnt_ovr_access:#define nsa$v_mnt_ovr_exp nsa$r_fill_18_.nsa$v_mnt_ovr_exp>#define nsa$v_mnt_ovr_ident nsa$r_fill_18_.nsa$v_mnt_ovr_ident>#define nsa$v_mnt_ovr_setid nsa$r_fill_18_.nsa$v_mnt_ovr_setid>#define nsa$v_mnt_readcheck nsa$r_fill_18_.nsa$v_mnt_readcheck6#define nsa$v_mnt_share nsa$r_fill_18_.nsa$v_mnt_share:#define nsa$v_mnt_message nsa$r_fill_18_.nsa$v_mnt_m #essage8#define nsa$v_mnt_system nsa$r_fill_18_.nsa$v_mnt_system@#define nsa$v_mnt_writecheck nsa$r_fill_18_.nsa$v_mnt_writecheck>#define nsa$v_mnt_writethru nsa$r_fill_18_.nsa$v_mnt_writethru:#define nsa$v_mnt_nocache nsa$r_fill_18_.nsa$v_mnt_nocache<#define nsa$v_mnt_ovr_lock nsa$r_fill_18_.nsa$v_mnt_ovr_lock<#define nsa$v_mnt_nomntver nsa$r_fill_18_.nsa$v_mnt_nomntver<#define nsa$v_mnt_nounload nsa$r_fill_18_.nsa$v_mnt_nounloadJ#define nsa$v_mnt_tape_data_write nsa$r_fill_18_.nsa$v_mnt_tape_ $data_write8#define nsa$v_mnt_nocopy nsa$r_fill_18_.nsa$v_mnt_nocopy8#define nsa$v_mnt_noauto nsa$r_fill_18_.nsa$v_mnt_noauto<#define nsa$v_mnt_init_all nsa$r_fill_18_.nsa$v_mnt_init_all>#define nsa$v_mnt_init_cont nsa$r_fill_18_.nsa$v_mnt_init_cont<#define nsa$v_mnt_ovr_volo nsa$r_fill_18_.nsa$v_mnt_ovr_volo<#define nsa$v_mnt_interchg nsa$r_fill_18_.nsa$v_mnt_interchg:#define nsa$v_mnt_cluster nsa$r_fill_18_.nsa$v_mnt_cluster>#define nsa$v_mnt_norebuild nsa$r_fill_18_.nsa$v_mnt_norebuild@#def %ine nsa$v_mnt_ovr_shamem nsa$r_fill_18_.nsa$v_mnt_ovr_shamem>#define nsa$v_mnt_multi_vol nsa$r_fill_18_.nsa$v_mnt_multi_vol6#define nsa$v_mnt_diskq nsa$r_fill_18_.nsa$v_mnt_diskq@#define nsa$v_mnt_compaction nsa$r_fill_18_.nsa$v_mnt_compaction:#define nsa$v_mnt_include nsa$r_fill_18_.nsa$v_mnt_include6#define nsa$v_mnt_pass2 nsa$r_fill_18_.nsa$v_mnt_pass2<#define nsa$v_mnt_ovr_nofe nsa$r_fill_18_.nsa$v_mnt_ovr_nofe:#define nsa$v_mnt_scratch nsa$r_fill_18_.nsa$v_mnt_scratch6#define nsa$v_mnt_cd &rom nsa$r_fill_18_.nsa$v_mnt_cdrom2#define nsa$v_mnt_xar nsa$r_fill_18_.nsa$v_mnt_xar2#define nsa$v_mnt_dsi nsa$r_fill_18_.nsa$v_mnt_dsi>#define nsa$v_mnt_subsystem nsa$r_fill_18_.nsa$v_mnt_subsystemD#define nsa$v_mnt_nocompaction nsa$r_fill_18_.nsa$v_mnt_nocompactionD#define nsa$v_mnt_ovr_security nsa$r_fill_18_.nsa$v_mnt_ovr_securityP#define nsa$v_mnt_ovr_limited_search nsa$r_fill_18_.nsa$v_mnt_ovr_limited_search4#define nsa$v_mnt_pool nsa$r_fill_18_.nsa$v_mnt_pool"#endif /* #if !defined(__'VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define NSA$C_MNT_MAX_CODE 47 /* # of mount bits (plus one) */N/* Define dismount flags. */N#define NSA$C_DMT_MAX_CODE 5 /* # of dismount bits (plus one) */#define NSA$M_DMT_NOUNLOAD 0x1#define NSA$M_DMT_UNIT 0x2#define NSA$M_DMT_ABORT 0x4#define NSA$M_DMT_CLUSTER 0x8 #ifdef __NEW_STARLETtypedef union _fill_20_ { int nsa$l_dismount_flags; (__struct {( unsigned nsa$v_dmt_nounload : 1;$ unsigned nsa$v_dmt_unit : 1;% unsigned nsa$v_dmt_abort : 1;' unsigned nsa$v_dmt_cluster : 1;$ unsigned nsa$v_fill_22_ : 4; } nsa$r_fill_21_; } FILL_20_; #if !defined(__VAXC)<#define nsa$v_dmt_nounload nsa$r_fill_21_.nsa$v_dmt_nounload4#define nsa$v_dmt_unit nsa$r_fill_21_.nsa$v_dmt_unit6#define nsa$v_dmt_abort nsa$r_fill_21_.nsa$v_dmt_abort:#define nsa$v_dmt_cluster nsa$r_fill_21_.nsa$v_d)mt_cluster"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union fill_20_ { int nsa$l_dismount_flags; __struct {( unsigned nsa$v_dmt_nounload : 1;$ unsigned nsa$v_dmt_unit : 1;% unsigned nsa$v_dmt_abort : 1;' unsigned nsa$v_dmt_cluster : 1;$ unsigned nsa$v_fill_22_ : 4; } nsa$r_fill_21_; } ; #if !defined(__VAXC)<#define nsa$v_dmt_nounload nsa$r_fill_21_.nsa$v_dmt_nounload4#define nsa$v_dmt_unit nsa$r*_fill_21_.nsa$v_dmt_unit6#define nsa$v_dmt_abort nsa$r_fill_21_.nsa$v_dmt_abort:#define nsa$v_dmt_cluster nsa$r_fill_21_.nsa$v_dmt_cluster"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* Define network authorization file modification codes. */#define NSA$C_NETPROXY_ADD 1#define NSA$C_NETPROXY_DELETE 2#define NSA$C_NETPROXY_MODIFY 3#define NSA$C_NETPROXY_NCP 4!#define NSA$C_NETPROXY_SHUTDOWN 5 #define NSA$C_NETPROXY_STARTUP 6#defin +e NSA$C_NETPROXY_CREATE 7!#define NSA$C_NETPROXY_MAX_CODE 8N/* Define persona event codes */#define NSA$C_PERSONA_CREATE 1#define NSA$C_PERSONA_DELETE 2#define NSA$C_PERSONA_MODIFY 3 #define NSA$C_PERSONA_MAX_CODE 4Q/* Define object access codes. This table must parallel the object type codes */P/* defined in $ACEDEF (in STARDEFAE.SDL). Any additional objects must appear */O/* in both places. These same subtype codes are shared for all of, the other */N/* object message type codes (CREATE, DELETE, MODIFY, DEACCESS). */#define NSA$C_FILE_ACCESS 1#define NSA$C_DEVICE_ACCESS 2#define NSA$C_QUEUE_ACCESS 3#define NSA$C_CEF_ACCESS 4#define NSA$C_LNM_ACCESS 5#define NSA$C_PROCESS_ACCESS 6#define NSA$C_GRPGBL_ACCESS 7#define NSA$C_SYSGBL_ACCESS 8!#define NSA$C_CAPABILITY_ACCESS 9#define NSA$C_EVENT_ACCESS 10#define NSA$C_LOCK_ACCESS 11#define NSA$C_VOLUME_ACCESS 12 #define NSA$C_OBJECT_MAX_CODE 13N/*- Define system authorization file modification codes. */#define NSA$C_SYSUAF_ADD 1#define NSA$C_SYSUAF_COPY 2#define NSA$C_SYSUAF_DELETE 3#define NSA$C_SYSUAF_MODIFY 4#define NSA$C_SYSUAF_RENAME 5#define NSA$C_SYSUAF_MAX_CODE 6N/* Define rights database modification codes. */#define NSA$C_RDB_ADD_ID 1#define NSA$C_RDB_CREATE 2#define NSA$C_RDB_GRANT_ID 3#define NSA$C_RDB_MOD_HOLDER 4#define NSA$C_RDB_MOD_ID 5#define NSA$C_ .RDB_REM_ID 6#define NSA$C_RDB_REVOKE_ID 7#define NSA$C_RDB_MAX_CODE 8N/* Define enhanced privilege audit codes. */N#define NSA$C_PRVAUD_SUCCESS 1 /* Successful use of privilege */N#define NSA$C_PRVAUD_FAILURE 2 /* Event due to privilege failure */#define NSA$C_PRVAUD_MAX_CODE 3N/* Define system time audit codes. */N#define NSA$C_SYSTIM_SET 1 /* Explicit setting of time /*/N#define NSA$C_SYSTIM_CAL 2 /* Calibration from todr */#define NSA$C_SYSTIM_MAX_CODE 3N/* Define SYSGEN audit codes. */N#define NSA$C_SYSGEN_SET 1 /* Sysgen parameter modification */#define NSA$C_SYSGEN_MAX_CODE 2N/* Define the create object event subtypes. */N#define NSA$C_OBJ_CREATE 1 /* Create object */#define NSA$C_CREATE_MAX_CODE 2N0/* Define the delete object event subtypes. */N#define NSA$C_OBJ_DELETE 1 /* Delete object */#define NSA$C_DELETE_MAX_CODE 2N/* Define the access object event subtypes. */N#define NSA$C_OBJ_ACCESS 1 /* Access object */#define NSA$C_ACCESS_MAX_CODE 2N/* Define the deaccess object event subtypes. */N#define NSA$C_OBJ_DEACCESS 1 1 /* Deaccess object */!#define NSA$C_DEACCESS_MAX_CODE 2N/* Define connection message event subtypes. */N#define NSA$C_CNX_REQUEST 1 /* Connection request */N#define NSA$C_CNX_ACCEPT 2 /* Connection accepted */N#define NSA$C_CNX_REJECT 3 /* Connection rejected */N#define NSA$C_CNX_DISCONNECT 4 /* Connection disconnected */O#define NSA$C_CNX_ABORT 5 2 /* Connection aborted by third-party */N#define NSA$C_CNX_DECNET_CREATE 6 /* DECnet logical link created */N#define NSA$C_CNX_DECNET_DELETE 7 /* DECnet logical link disconnected */N#define NSA$C_CNX_IPC_OPEN 8 /* IPC association opened */N#define NSA$C_CNX_IPC_CLOSE 9 /* IPC association closed */N#define NSA$C_CNX_INC_REQUEST 10 /* Incomming connection request */N#define NSA$C_CNX_INC_ACCEPT 11 /* Connectio 3n request accepted */N#define NSA$C_CNX_INC_REJECT 12 /* Connection request rejected */N#define NSA$C_CNX_INC_DISCONNECT 13 /* Incoming connection disconnected */X#define NSA$C_CNX_INC_ABORT 14 /* Incoming connection aborted by third-party */#define NSA$C_CNX_MAX_CODE 15N#define NSA$C_NCP_COMMAND 1 /* NCP command issued */#define NSA$C_NCP_MAX_CODE 2N#define NSA$C_PRC_CREPRC 1 /* Create process */N#defin4e NSA$C_PRC_DELPRC 2 /* Delete process */N#define NSA$C_PRC_SCHDWK 3 /* Schedule process wakeup */N#define NSA$C_PRC_CANWAK 4 /* Cancel process wakeup */N#define NSA$C_PRC_WAKE 5 /* Wake process */N#define NSA$C_PRC_SUSPND 6 /* Suspend process */N#define NSA$C_PRC_RESUME 7 /* Resume process */N#define NSA$C_PRC_GRANTID 8 5 /* Grant identifier */N#define NSA$C_PRC_REVOKID 9 /* Revoke identifier */N#define NSA$C_PRC_GETJPI 10 /* Get job or process information */N#define NSA$C_PRC_FORCEX 11 /* Force image exit */N#define NSA$C_PRC_SIGPRC 12 /* Signal process (undocumented) */N#define NSA$C_PRC_SETPRI 13 /* Set process priority */W#define NSA$C_PRC_PRCTERM 14 /* Detect process 6termination (undocumented) */N#define NSA$C_PRC_CPU_CAPABILITIES 15 /* Change in CPU capability */N#define NSA$C_PRC_PROCESS_CAPABILITIES 16 /* Change in process capability */N#define NSA$C_PRC_PROCESS_AFFINITY 17 /* Change in process affinity */N#define NSA$C_PRC_SET_IMPLICIT_AFFINITY 18 /* Change in implicit affinity */#define NSA$C_PRC_MAX_CODE 19N#define NSA$C_INSTANTIATE_ORB 1 /* Create an instance of an ORB */N/* the profile may, or may not, 7 */N/* present in the database. */N#define NSA$C_DISTRIBUTE_ORB 2 /* ORB distribution */N#define NSA$C_OBJECT_AUDIT_CHANGE 3 /* Change in audit/alarm vectors */N#define NSA$C_DISTRIBUTE_NOTICE 4 /* Notify agents of change */N/* used for objects which */N/* provide permanent storage 8 */#define NSA$C_OBJSRV_MAX_CODE 5N/* Define distributed authentication subtypes here. */T#define NSA$C_AUTH_NETWORK_LOGIN 2 /* authenticated network login */T#define NSA$C_AUTH_RENEW_LOGIN 3 /* authentication credential renewal */T#define NSA$C_AUTH_INIT_SEC_CTX 4 /* initiate security context */T#define NSA$C_AUTH_ACC_SEC_CTX 5 /* accept security context */T#define NSA$C_AUTH_INSTALL_DEF_CRED 96 /* install application credential handle */T#define NSA$C_AUTH_ACQUIRE_CRED 7 /* acquire credential handle */T#define NSA$C_AUTH_GRANT_CRED 8 /* grant credential to another process */T#define NSA$C_AUTH_RELEASE_CRED 9 /* release credential handle */T#define NSA$C_AUTH_DEL_SEC_CTX 10 /* delete security context */T#define NSA$C_AUTH_PROC_CTX_TOKEN 11 /* process context token */T#define NSA$C_AUTH_VERIFY :12 /* verify signature */N#define NSA$C_AUTH_SIGN 13 /* sign a message */N#define NSA$C_AUTH_SEAL 14 /* seal a message */N#define NSA$C_AUTH_UNSEAL 15 /* unseal a message */Z#define NSA$C_CA_STARTUP 16 /* the certification authority has been started */T#define NSA$C_CA_EXIT 17 /* the certification authority has exited */N#define NSA$C_CA_ADD_DIRECTO;RY 18 /* a name directory has been added */N#define NSA$C_CA_ADD_PRINCIPAL 19 /* a principal has been added */N#define NSA$C_CA_LINK_DIRECTORY 20 /* two directories have been linked */]#define NSA$C_CA_CHANGE_LINK 21 /* a link between two directories has been changed */i#define NSA$C_CA_CHANGE_PRINCIPAL 22 /* a principal's keypair/password or duration has been changed */O#define NSA$C_CA_REMOVE_DIRECTORY 23 /* a name directory has been removed */N#define <NSA$C_CA_REMOVE_PRINCIPAL 24 /* a principal has been removed */N#define NSA$C_CA_CERTIFICATE_DELETED 25 /* a certificate has been deleted */_#define NSA$C_CA_REVOKED_CERT_FOUND 26 /* a revoked certificate has been read from the CSS */U#define NSA$C_CA_PASSWORD_CHANGE 27 /* the password to the CA has been changed */N#define NSA$C_CSS_OBJECT_CREATED 28 /* a CSS object has been created */N#define NSA$C_CSS_OBJECT_DELETED 29 /* a CSS object has been deleted */N#define =NSA$C_CSS_CERTIFICATE_DELETED 30 /* a certificate has been deleted */^#define NSA$C_CSS_CREDENTIAL_READ 31 /* a principal's permanent credential has been read */W#define NSA$C_CSS_CERTIFICATE_ADDED 32 /* a certificate has been added to an object */k#define NSA$C_CSS_CREDENTIAL_WRITTEN 33 /* an encrypted permanent credential has been added to an object */Y#define NSA$C_CSS_USER_CHANGED_PASSWORD 34 /* a principal has changed his/her password */f#define NSA$C_CSS_UPDATED_SECONDARY 35 /* a C>SS secondary has been updated from the local database */e#define NSA$C_CSS_DATABASE_UPDATED 36 /* a secondary CSS has updated its database from a primary */Z#define NSA$C_CSS_STARTED 37 /* the CSS server has been successfully started */S#define NSA$C_CSS_WINDOW_OPEN 38 /* the CSS access window has been opened */S#define NSA$C_CSS_WINDOW_CLOSED 39 /* the CSS access window has been closed */U#define NSA$C_CSS_LOCTABLE_UPDATED 40 /* the CSS location table has been updat?ed */#define NSA$C_AUTH_MAX_CODE 41N/* Define data packet format */N#define NSA$C_PKT_ACCESS_DESIRED 1 /* Access requested */N#define NSA$C_PKT_ACCOUNT 2 /* Account name */N#define NSA$C_PKT_ALARM_NAME 3 /* Alarm journal name */N#define NSA$C_PKT_APPL_DATA 4 /* Application supplied data */N#define NSA$C_PKT_AUDIT_FLAGS 5 /* Audit flags @ */N#define NSA$C_PKT_AUDIT_NAME 6 /* Audit journal name */N#define NSA$C_PKT_SYSTEM_NAME 7 /* SCS system node name */N#define NSA$C_PKT_SYSTEM_ID 8 /* SCS system node identification */]#define NSA$C_PKT_DEVICE_NAME 9 /* Primary device name on which the volume resides */N#define NSA$C_PKT_DISMOUNT_FLAGS 10 /* Volume dismount flags */N#define NSA$C_PKT_HOLDER_NAME 11 /* Holder name A*/N#define NSA$C_PKT_HOLDER_OWNER 12 /* Holder owner ID */N#define NSA$C_PKT_ID_ATTRIBUTES 13 /* Identifier attributes */N#define NSA$C_PKT_ID_NAME 14 /* Identifier name */N#define NSA$C_PKT_ID_NEW_NAME 15 /* Identifer new name */N#define NSA$C_PKT_ID_VALUE 16 /* Identifier value */N#define NSA$C_PKT_ID_NEW_VALUE 17 /* Identifier new value */N#define NSA$C_PKT_IDENBTIFIERS_USED 18 /* Identifiers used to gain access */N#define NSA$C_PKT_IMAGE_NAME 19 /* Name of the image being executed */N#define NSA$C_PKT_INSTALL_FILE 20 /* Installed file */N#define NSA$C_PKT_INSTALL_FLAGS 21 /* INSTALL flags */N#define NSA$C_PKT_INSTALL_PRIVS 22 /* INSTALL privileges */V#define NSA$C_PKT_LOGICAL_NAME 23 /* Logical name associated with the device. */N#define NSA$C_PKT_MOUNT_FLAGS 24 C/* Volume mount flags */N#define NSA$C_PKT_NEW_DATA 25 /* Data after modification */N#define NSA$C_PKT_FILE_ID 26 /* File identification (FID) */R#define NSA$C_PKT_OBJECT_MIN_CLASS 27 /* Minimum object access classification */R#define NSA$C_PKT_OBJECT_MAX_CLASS 28 /* Maximum object access classification */N#define NSA$C_PKT_OBJECT_NAME 29 /* The object's name */N#define NSA$C_PKT_OBJECT_NAME_2 30 /* Secondary (pathD) object name */S#define NSA$C_PKT_OBJECT_OWNER 31 /* Owner identifier (UIC) of the process */P#define NSA$C_PKT_OBJECT_PROTECTION 32 /* UIC based protection of the object */N#define NSA$C_PKT_OBJECT_TYPE 33 /* Object's type code */N#define NSA$C_PKT_ORIGINAL_DATA 34 /* Data before modification */N#define NSA$C_PKT_PARENT_ID 35 /* PID of the parent process */N#define NSA$C_PKT_PARENT_NAME 36 /* Parent process name E*/N#define NSA$C_PKT_PARENT_OWNER 37 /* Parent process owner (UIC) */N#define NSA$C_PKT_PARENT_USERNAME 38 /* Parent process username */N#define NSA$C_PKT_PASSWORD 39 /* Breakin password */N#define NSA$C_PKT_PRIVS_USED 40 /* Privileges used to gain access */N#define NSA$C_PKT_PROCESS_ID 41 /* Current process PID */N#define NSA$C_PKT_PROCESS_NAME 42 /* Current process name */N#define NSA$C_PKT_REMOFTE_NODE_ID 43 /* Node ID of network source */N#define NSA$C_PKT_REMOTE_NODENAME 44 /* Remote nodename */N#define NSA$C_PKT_REMOTE_USERNAME 45 /* Remote username */N#define NSA$C_PKT_SUBJECT_CLASS 46 /* Process current access class */N#define NSA$C_PKT_SUBJECT_OWNER 47 /* Process owner (UIC) */N#define NSA$C_PKT_FINAL_STATUS 48 /* Completion status */N#define NSA$C_PKT_TERMINAL 49 /* ProceGss terminal name */N#define NSA$C_PKT_TIME_STAMP 50 /* When the event took place */N#define NSA$C_PKT_UAF_ADD 51 /* UAF record added */N#define NSA$C_PKT_UAF_DELETE 52 /* UAF record removed */N#define NSA$C_PKT_UAF_MODIFY 53 /* UAF record modified */N#define NSA$C_PKT_UAF_COPY 54 /* UAF record copied */N#define NSA$C_PKT_UAF_FIELDS 55 /* UAF fields modified H */N#define NSA$C_PKT_USERNAME 56 /* Requestor username */N#define NSA$C_PKT_UAF_SOURCE 57 /* UAF source username */N#define NSA$C_PKT_UAF_RENAME 58 /* UAF record renamed */N#define NSA$C_PKT_VOLUME_NAME 59 /* Mount/dismount volume name */N#define NSA$C_PKT_VOLUME_SET_NAME 60 /* Volume set name */N#define NSA$C_PKT_SERVER_ACCOUNT 61 /* Server account */N#define NSA$C_PKT_SEIRVER_SYSTEM_ID 62 /* Server system id */N#define NSA$C_PKT_SERVER_SYSTEM_NAME 63 /* Server system name */N#define NSA$C_PKT_SERVER_FINAL_STATUS 64 /* Server status */N#define NSA$C_PKT_SERVER_IMAGE_NAME 65 /* Server image name */N#define NSA$C_PKT_SERVER_PARENT_ID 66 /* Server parent id */N#define NSA$C_PKT_SERVER_PARENT_OWNER 67 /* Server parent owner (UIC) */N#define NSA$C_PKT_SERVER_PARENT_NAME 68 /* SerJver parent process name */N#define NSA$C_PKT_SERVER_PROCESS_ID 69 /* Server process id */N#define NSA$C_PKT_SERVER_PROCESS_NAME 70 /* Server process name */N#define NSA$C_PKT_SERVER_SUBJECT_CLASS 71 /* Server classification */N#define NSA$C_PKT_SERVER_SUBJECT_OWNER 72 /* Server owner (UIC) */N#define NSA$C_PKT_SERVER_TERMINAL 73 /* Server terminal */N#define NSA$C_PKT_SERVER_TIME_STAMP 74 /* Server timestamp K */N#define NSA$C_PKT_SERVER_USERNAME 75 /* Server username */N#define NSA$C_PKT_AUDIT_DISABLE 76 /* Audit event disable mask */N#define NSA$C_PKT_AUDIT_ENABLE 77 /* Audit event enable mask */N#define NSA$C_PKT_ALARM_DISABLE 78 /* Alarm event disable mask */N#define NSA$C_PKT_ALARM_ENABLE 79 /* Alarm event enable mask */N#define NSA$C_PKT_NOP 80 /* Nop (for static item lists) */N#define NSA$C_PKT_LREPLY_MAILBOX 81 /* Message acknowledge mailbox */N#define NSA$C_PKT_DEFAULT_USERNAME 82 /* NETPROXY default proxy account */N#define NSA$C_PKT_LOCAL_USERNAME 83 /* NETPROXY local proxy account */T#define NSA$C_PKT_FIELD_NAME 84 /* Name of (NEW_DATA/ORIGINAL_DATA) field */N#define NSA$C_PKT_LISTENER_DEVICE 85 /* Listener device name */N#define NSA$C_PKT_FIELD_TITLE_STR 86 /* Field title string */N#define NSA$C_PKT_FIELD_DATA_STR 87 M /* Field data string */N#define NSA$C_PKT_MESSAGE_TYPE_STR 88 /* Event message type string */O#define NSA$C_PKT_EVENT_TYPE 89 /* Event message type ($AUDIT_EVENT) */R#define NSA$C_PKT_EVENT_SUBTYPE 90 /* Event message subtype ($AUDIT_EVENT) */N#define NSA$C_PKT_EVENT_FACILITY 91 /* Event facility ($AUDIT_EVENT) */[#define NSA$C_PKT_DIRECTORY_ENTRY 92 /* Directory entry associated with XQP operation */N#define NSA$C_PKT_DIRECTORY_ID 93 /* DNirectory file-id */Q/* The following three blocks of codes are obsolete with V5.4. With V5.4, one */N/* should use the NSA$W_FACILITY field for layered product and/or customer */Q/* audit messages. These symbols must not be reused as versions of SeVMS (and */N/* fiends) depend on their existence. */N#define NSA$C_PKT_CUSTOMER_1 94 /* obsolete codes */#define NSA$C_PKT_CUSTOMER_2 95#define NSA$C_PKT_CUSTOMER_3O 96#define NSA$C_PKT_CUSTOMER_4 97#define NSA$C_PKT_CUSTOMER_5 98#define NSA$C_PKT_CUSTOMER_6 99 #define NSA$C_PKT_CUSTOMER_7 100 #define NSA$C_PKT_CUSTOMER_8 101N#define NSA$C_PKT_CSS_1 102 /* obsolete codes */#define NSA$C_PKT_CSS_2 103#define NSA$C_PKT_CSS_3 104#define NSA$C_PKT_CSS_4 105#define NSA$C_PKT_CSS_5 106#define NSA$C_PKT_CSS_6 107#define NSA$C_PKT_CSS_7 108#define NSA$C_PKT_CSS_8 109N#define NSA$C_PKT_LP_1 110 P/* obsolete codes */#define NSA$C_PKT_LP_2 111#define NSA$C_PKT_LP_3 112#define NSA$C_PKT_LP_4 113#define NSA$C_PKT_LP_5 114#define NSA$C_PKT_LP_6 115#define NSA$C_PKT_LP_7 116#define NSA$C_PKT_LP_8 117N/* End of obsolete codes. */N#define NSA$C_PKT_ALARM_FAILURE 118 /* Alarm failure mode */N#define NSA$C_PKT_AUDIT_FAILURE 119 /* Audit failure mode */N#define NSA$C_PKT_SEVMS_0 120 Q /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_1 121 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_2 122 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_3 123 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_4 124 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_5 125 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_6 126 /* Reserved for RSeVMS */N#define NSA$C_PKT_SEVMS_7 127 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_8 128 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_9 129 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_10 130 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_11 131 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_12 132 /* Reserved for SeVMS */N#dSefine NSA$C_PKT_SEVMS_13 133 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_14 134 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_15 135 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_16 136 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_17 137 /* Reserved for SeVMS */N#define NSA$C_PKT_SEVMS_18 138 /* Reserved for SeVMS */N#define NSA$C_PKT_SNAPSHOT_TTIME 139 /* Snapshot time */O#define NSA$C_PKT_TRANSPORT_NAME 140 /* Transport name (IPC, DECnet, SMI) */N#define NSA$C_PKT_DECNET_LINK_ID 141 /* DECnet logical link ID */N#define NSA$C_PKT_DECNET_OBJECT_NAME 142 /* DECnet object name */N#define NSA$C_PKT_DECNET_OBJECT_NUMBER 143 /* DECnet object number */N#define NSA$C_PKT_REMOTE_LINK_ID 144 /* Remote logical link ID */N#define NSA$C_PKT_COMMAND_LINE 145 /* Command lUine */N#define NSA$C_PKT_ASSOCIATION_NAME 146 /* IPC association name */N#define NSA$C_PKT_REM_ASSOCIATION_NAME 147 /* IPC remote association name */N#define NSA$C_PKT_CONNECTION_ID 148 /* IPC connection ID */N#define NSA$C_PKT_MESSAGE 149 /* Associated message code */N#define NSA$C_PKT_MSGFILNAM 150 /* Associated message file name */N#define NSA$C_PKT_OBJECT_POINTER 151 /* Object container (Directory) */VN#define NSA$C_PKT_ID_NEW_ATTRIBUTES 152 /* Identifier new attributes */N#define NSA$C_PKT_SYSTIM_NEW 153 /* New system time */N#define NSA$C_PKT_SYSTIM_OLD 154 /* Old system time */O#define NSA$C_PKT_PARAMS_WRITE 155 /* SYSGEN filename for WRITE command */W#define NSA$C_PKT_PARAMS_INUSE 156 /* SYSGEN parameter set name for USE command */N#define NSA$C_PKT_MATCHING_ACE 157 /* ACE granting or denying access */N#define NSA$WC_PKT_SNAPSHOT_SAVE_FILNAM 158 /* Snapshot save file name */N#define NSA$C_PKT_MAILBOX_UNIT 159 /* Mailbox unit number */N#define NSA$C_PKT_NEW_OWNER 160 /* New process owner (UIC) */N#define NSA$C_PKT_NEW_PRIORITY 161 /* New process priority */N#define NSA$C_PKT_OLD_PRIORITY 162 /* Old process priority */N#define NSA$C_PKT_DIAG_FUNC 163 /* Diagnostic function */N#define NSA$C_PKT_RESOURCE_NAME 164 X /* Lock resource name */N#define NSA$C_PKT_LNM_TABLE_NAME 165 /* Logical name table name */N#define NSA$C_PKT_LNM_PARENT_NAME 166 /* Parent logical name table name */N#define NSA$C_PKT_EFC_NAME 167 /* Event Flag Cluster name */N#define NSA$C_PKT_TARGET_PROCESS_CLASS 168 /* Target process classification */N#define NSA$C_PKT_TARGET_PROCESS_ID 169 /* Target process PID */N#define NSA$C_PKT_TARGET_PROCESS_NAME 170 /* Target process nameY */N#define NSA$C_PKT_TARGET_PROCESS_OWNER 171 /* Target process owner (UIC) */N#define NSA$C_PKT_TARGET_USERNAME 172 /* Target username */N#define NSA$C_PKT_NEW_PRIVILEGES 173 /* New privileges */N#define NSA$C_PKT_OLD_PRIVILEGES 174 /* Old privileges */N#define NSA$C_PKT_REMOTE_NODE_FULLNAME 175 /* Remote node fullname */N#define NSA$C_PKT_UID 176 /* UID of object */N#define NSZA$C_PKT_UNUSED_3 177 /* Unused packet */N#define NSA$C_PKT_UNUSED_4 178 /* Unused packet */N#define NSA$C_PKT_UNUSED_5 179 /* Unused packet */N#define NSA$C_PKT_UNUSED_6 180 /* Unused packet */N#define NSA$C_PKT_UNUSED_7 181 /* Unused packet */N#define NSA$C_PKT_UNUSED_8 182 /* Unused packet */N#define NSA$C_PKT_UNUSED_9 183 [ /* Unused packet */N#define NSA$C_PKT_UNUSED_10 184 /* Unused packet */N#define NSA$C_PKT_PRIVS_MISSING 185 /* Privileges missing */N#define NSA$C_PKT_TARGET_DEVICE_NAME 186 /* Target device name */N#define NSA$C_PKT_SECTION_NAME 187 /* Global section name */N#define NSA$C_PKT_ID_VALUE_ASCII 188 /* ID value via $IDTOASC */N#define NSA$C_PKT_OBJECT_CLASS 189 /* Object class name \ */N#define NSA$C_PKT_SUPPRESS 190 /* Suppress supplied items */N#define NSA$C_PKT_SNAPSHOT_BOOTFILE 191 /* Snapshot boot file name */O#define NSA$C_PKT_SOURCE_PROCESS_ID 192 /* Source process ID (impersonation) */N#define NSA$C_PKT_REQUEST_NUMBER 193 /* Request number */N#define NSA$C_PKT_ACCESS_MODE 194 /* Access mode */N#define NSA$C_PKT_SYSTEM_SERVICE_NAME 195 /* System service name */N#defin]e NSA$C_PKT_NEW_AUTH_PRIVILEGES 196 /* New authorized privileges */N#define NSA$C_PKT_OLD_AUTH_PRIVILEGES 197 /* Old authorized privileges */N#define NSA$C_PKT_NEW_DEF_PRIVILEGES 198 /* New default privileges */N#define NSA$C_PKT_OLD_DEF_PRIVILEGES 199 /* Old default privileges */N#define NSA$C_PKT_NEW_PROCESS_ID 200 /* New process ID */N#define NSA$C_PKT_NEW_PROCESS_OWNER 201 /* New process owner (UIC) */N#define NSA$C_PKT_NEW_PROCESS_NA^ME 202 /* New process name */N#define NSA$C_PKT_NEW_IMAGE_NAME 203 /* New image name */N#define NSA$C_PKT_NEW_USERNAME 204 /* New username */N#define NSA$C_PKT_DEACCESS_KEY 205 /* Deaccess audit key */N#define NSA$C_PKT_OBJECT_RIGHTS_BLOCK 206 /* Object Rights Block */Z#define NSA$C_PKT_OBJSRV_COMPLETE 207 /* Object service processing completion routine */N#define NSA$C_PKT_TLV_ORB 208 /* Obj _ect distribution */N#define NSA$C_PKT_FILE_NAME 209 /* File name (volume auditing) */N#define NSA$C_PKT_DIRECTORY_NAME 210 /* Directory file name */N#define NSA$C_PKT_SEQUENCE_KEY 211 /* Sequence key (XQP auditing) */N/* DAS item codes. */(#define NSA$C_PKT_PRINCIPAL_FULLNAME 212%#define NSA$C_PKT_TARGET_FULLNAME 213%#define NSA$C_PKT_SOURCE_FULLNAME 214&#define NSA$C_PKT_DESIRED_FULL`NAME 215&#define NSA$C_PKT_CLAIMED_USERNAME 216&#define NSA$C_PKT_CLAIMED_FULLNAME 217&#define NSA$C_PKT_CLAIMED_NODENAME 218#define NSA$C_PKT_TIME_REQ 219#define NSA$C_PKT_TIME_REC 220#define NSA$C_PKT_REQ_FLAGS 221#define NSA$C_PKT_RET_FLAGS 222"#define NSA$C_PKT_LIFETIME_REQ 223"#define NSA$C_PKT_LIFETIME_REC 224 #define NSA$C_PKT_CRED_USAGE 225$#define NSA$C_PKT_CONTEXT_HANDLE 226#define NSA$C_PKT_QOP_STATE 227 #define NSA$C_PKT_CONF_STATE 228'#define NSA$C_PKT_DELEG_CRED_HANaDLE 229"#define NSA$C_PKT_MAJOR_STATUS 230#define NSA$C_PKT_DAS_1 231#define NSA$C_PKT_DAS_2 232#define NSA$C_PKT_DAS_3 233#define NSA$C_PKT_DAS_4 234#define NSA$C_PKT_DAS_5 235#define NSA$C_PKT_DAS_6 236#define NSA$C_PKT_DAS_7 237#define NSA$C_PKT_DAS_8 238#define NSA$C_PKT_DAS_9 239#define NSA$C_PKT_DAS_10 240%#define NSA$C_PKT_STATE_FILE_NAME 241(#define NSA$C_PKT_DIRECTORY_FULLNAME 242'#define NSA$C_PKT_FROM_DIR_FULLNAME 243%#define NSA$C_PKT_TO_DIR_FULLNAME 24 b4%#define NSA$C_PKT_ISSUER_FULLNAME 245&#define NSA$C_PKT_SUBJECT_FULLNAME 246!#define NSA$C_PKT_CERTIF_TYPE 247(#define NSA$C_PKT_CSS_SECONDARY_NAME 248)#define NSA$C_PKT_CSS_OBJECT_FULLNAME 249&#define NSA$C_PKT_CSS_REQUEST_FROM 250&#define NSA$C_PKT_CSS_PRIMARY_NAME 251*#define NSA$C_PKT_CERTIF_SERIAL_NUMBER 252%#define NSA$C_PKT_WINDOW_END_TIME 253N#define NSA$C_PKT_LOG_CLOSED 254 /* log file closed */N#define NSA$C_PKT_LOG_OPENED 255 /* log file open ced */N#define NSA$C_PKT_IDENTIFIERS_MISSING 256 /* identifiers missing */*#define NSA$C_PKT_SENSITIVE_FIELD_NAME 257)#define NSA$C_PKT_SENSITIVE_ORIG_DATA 258(#define NSA$C_PKT_SENSITIVE_NEW_DATA 259+#define NSA$C_PKT_SENSITIVE_FIELD_TITLE 260*#define NSA$C_PKT_SENSITIVE_FIELD_DATA 261N#define NSA$C_PKT_INSTALL_AUTHPRIVS 262 /* installed image authorized privs */N#define NSA$C_PKT_PERSONA_FLAGS 263 /* persona flags */N#define NSA$C_PKT_PERSdONA_UID 264 /* persona UID */N#define NSA$C_PKT_PERSONA_MODE 265 /* persona creation mode */N#define NSA$C_PKT_PERSONA_USERNAME 266 /* persona username */N#define NSA$C_PKT_PERSONA_ACCOUNT 267 /* persona account */N#define NSA$C_PKT_PERSONA_NOAUDIT 268 /* persona noaudit counter */N#define NSA$C_PKT_PERSONA_UIC 269 /* persona UIC */N#define NSA$C_PKT_PERSONA_AUTHPRIV 270 /* persoena authorized privs */N#define NSA$C_PKT_PERSONA_PERMPRIV 271 /* persona permanent privs */N#define NSA$C_PKT_PERSONA_WORKPRIV 272 /* persona working privs */N#define NSA$C_PKT_PERSONA_ENABLED 273 /* persona rights enabled flags */N#define NSA$C_PKT_PERSONA_RIGHTS 274 /* persona rights */N#define NSA$C_PKT_PERSONA_MINCLASS 275 /* persona minimum classification */N#define NSA$C_PKT_PERSONA_MAXCLASS 276 /* persona maximum classification f */N#define NSA$C_PKT_PERSONA_WORKCLASS 277 /* persona working classification */N#define NSA$C_PKT_PERSONA_ID 278 /* persona Id */'#define NSA$C_PKT_PERSONA_POSIX_UID 279'#define NSA$C_PKT_PERSONA_POSIX_GID 280&#define NSA$C_PKT_PARENT_POSIX_UID 281&#define NSA$C_PKT_PARENT_POSIX_GID 282N#define NSA$C_PKT_MAX_CODE 283 /* Must be last */#define NSA$C_PKT_HDR_LENGTH 4#define NSA$K_PKT_HDR_LENGTH 4N#define NSA$_ACCESS_DESIRED 1 g /* Access requested */N#define NSA$_ACCOUNT 2 /* Account name */N#define NSA$_ALARM_NAME 3 /* Alarm journal name */N#define NSA$_APPL_DATA 4 /* Application supplied data */N#define NSA$_AUDIT_FLAGS 5 /* Audit flags */N#define NSA$_AUDIT_NAME 6 /* Audit journal name */N#define NSA$_SYSTEM_NAME 7 /* SCS system nodeh name */N#define NSA$_SYSTEM_ID 8 /* SCS system node identification */]#define NSA$_DEVICE_NAME 9 /* Primary device name on which the volume resides */N#define NSA$_DISMOUNT_FLAGS 10 /* Volume dismount flags */N#define NSA$_HOLDER_NAME 11 /* Holder name */N#define NSA$_HOLDER_OWNER 12 /* Holder owner ID */N#define NSA$_ID_ATTRIBUTES 13 /* Identifier attributes i */N#define NSA$_ID_NAME 14 /* Identifier name */N#define NSA$_ID_NEW_NAME 15 /* Identifer new name */N#define NSA$_ID_VALUE 16 /* Identifier value */N#define NSA$_ID_NEW_VALUE 17 /* Identifier new value */N#define NSA$_IDENTIFIERS_USED 18 /* Identifiers used to gain access */N#define NSA$_IMAGE_NAME 19 /* Name of the image being executed */N#define NSA$_IjNSTALL_FILE 20 /* Installed file */N#define NSA$_INSTALL_FLAGS 21 /* INSTALL flags */N#define NSA$_INSTALL_PRIVS 22 /* INSTALL privileges */V#define NSA$_LOGICAL_NAME 23 /* Logical name associated with the device. */N#define NSA$_MOUNT_FLAGS 24 /* Volume mount flags */N#define NSA$_NEW_DATA 25 /* Data after modification */N#define NSA$_FILE_ID 26 k /* File identification (FID) */R#define NSA$_OBJECT_MIN_CLASS 27 /* Minimum object access classification */R#define NSA$_OBJECT_MAX_CLASS 28 /* Maximum object access classification */N#define NSA$_OBJECT_NAME 29 /* The object's name */N#define NSA$_OBJECT_NAME_2 30 /* Secondary (path) object name */S#define NSA$_OBJECT_OWNER 31 /* Owner identifier (UIC) of the process */P#define NSA$_OBJECT_PROTECTION 32 /* UlIC based protection of the object */N#define NSA$_OBJECT_TYPE 33 /* Object's type code */N#define NSA$_ORIGINAL_DATA 34 /* Data before modification */N#define NSA$_PARENT_ID 35 /* PID of the parent process */N#define NSA$_PARENT_NAME 36 /* Parent process name */N#define NSA$_PARENT_OWNER 37 /* Parent process owner (UIC) */N#define NSA$_PARENT_USERNAME 38 /* Parent process username m */N#define NSA$_PASSWORD 39 /* Breakin password */N#define NSA$_PRIVS_USED 40 /* Privileges used to gain access */N#define NSA$_PROCESS_ID 41 /* Current process PID */N#define NSA$_PROCESS_NAME 42 /* Current process name */N#define NSA$_REMOTE_NODE_ID 43 /* Node ID of network source */N#define NSA$_REMOTE_NODENAME 44 /* Remote nodename */N#define NSA$_RnEMOTE_USERNAME 45 /* Remote username */N#define NSA$_SUBJECT_CLASS 46 /* Process current access class */N#define NSA$_SUBJECT_OWNER 47 /* Process owner (UIC) */N#define NSA$_FINAL_STATUS 48 /* Completion status */N#define NSA$_TERMINAL 49 /* Process terminal name */N#define NSA$_TIME_STAMP 50 /* When the event took place */N#define NSA$_UAF_ADD 51 o/* UAF record added */N#define NSA$_UAF_DELETE 52 /* UAF record removed */N#define NSA$_UAF_MODIFY 53 /* UAF record modified */N#define NSA$_UAF_COPY 54 /* UAF record copied */N#define NSA$_UAF_FIELDS 55 /* UAF fields modified */N#define NSA$_USERNAME 56 /* Requestor username */N#define NSA$_UAF_SOURCE 57 /* Secondary username p */N#define NSA$_UAF_RENAME 58 /* UAF record renamed */N#define NSA$_VOLUME_NAME 59 /* Mount/dismount volume name */N#define NSA$_VOLUME_SET_NAME 60 /* Volume set name */N#define NSA$_SERVER_ACCOUNT 61 /* Server account */N#define NSA$_SERVER_SYSTEM_ID 62 /* Server system id */N#define NSA$_SERVER_SYSTEM_NAME 63 /* Server system name */N#define NSA$q_SERVER_FINAL_STATUS 64 /* Server status */N#define NSA$_SERVER_IMAGE_NAME 65 /* Server image name */N#define NSA$_SERVER_PARENT_ID 66 /* Server parent id */N#define NSA$_SERVER_PARENT_OWNER 67 /* Server parent owner */N#define NSA$_SERVER_PARENT_NAME 68 /* Server parent process name */N#define NSA$_SERVER_PROCESS_ID 69 /* Server process id */N#define NSA$_SERVER_PROCESS_NAME 70 r /* Server process name */N#define NSA$_SERVER_SUBJECT_CLASS 71 /* Server classification */N#define NSA$_SERVER_SUBJECT_OWNER 72 /* Server owner ('UIC') */N#define NSA$_SERVER_TERMINAL 73 /* Server terminal */N#define NSA$_SERVER_TIME_STAMP 74 /* Server timestamp */N#define NSA$_SERVER_USERNAME 75 /* Server username */N#define NSA$_AUDIT_DISABLE 76 /* Audit event disable msask */N#define NSA$_AUDIT_ENABLE 77 /* Audit event enable mask */N#define NSA$_ALARM_DISABLE 78 /* Alarm event disable mask */N#define NSA$_ALARM_ENABLE 79 /* Alarm event enable mask */N#define NSA$_NOP 80 /* Nop (for static item lists) */N#define NSA$_REPLY_MAILBOX 81 /* Message acknowledge mailbox */N#define NSA$_DEFAULT_USERNAME 82 /* NETPROXY proxy default account */N#define NStA$_LOCAL_USERNAME 83 /* NETPROXY proxy local account */T#define NSA$_FIELD_NAME 84 /* Name of (NEW_DATA/ORIGINAL_DATA) field */N#define NSA$_LISTENER_DEVICE 85 /* Listener device name */N#define NSA$_FIELD_TITLE_STR 86 /* Field title string */N#define NSA$_FIELD_DATA_STR 87 /* Field data string */N#define NSA$_MESSAGE_TYPE_STR 88 /* Event message type string */O#define NSA$_EVENT_TYPE 89 u /* Event message type ($AUDIT_EVENT) */R#define NSA$_EVENT_SUBTYPE 90 /* Event message subtype ($AUDIT_EVENT) */N#define NSA$_EVENT_FACILITY 91 /* Event facility ($AUDIT_EVENT) */[#define NSA$_DIRECTORY_ENTRY 92 /* Directory entry associated with XQP operation */N#define NSA$_DIRECTORY_ID 93 /* Directory file-id */N#define NSA$_CUSTOMER_1 94 /* obsolete codes */#define NSA$_CUSTOMER_2 95#define vNSA$_CUSTOMER_3 96#define NSA$_CUSTOMER_4 97#define NSA$_CUSTOMER_5 98#define NSA$_CUSTOMER_6 99#define NSA$_CUSTOMER_7 100#define NSA$_CUSTOMER_8 101N#define NSA$_CSS_1 102 /* obsolete codes */#define NSA$_CSS_2 103#define NSA$_CSS_3 104#define NSA$_CSS_4 105#define NSA$_CSS_5 106#define NSA$_CSS_6 107#define NSA$_CSS_7 108#define NSA$_CSS_8 109N#define NSA$_LP_1 110 /* obsolete codes */#define NSA$_L wP_2 111#define NSA$_LP_3 112#define NSA$_LP_4 113#define NSA$_LP_5 114#define NSA$_LP_6 115#define NSA$_LP_7 116#define NSA$_LP_8 117N#define NSA$_ALARM_FAILURE 118 /* Alarm failure mode */N#define NSA$_AUDIT_FAILURE 119 /* Audit failure mode */N#define NSA$_SEVMS_0 120 /* Reserved for SeVMS */N#define NSA$_SEVMS_1 121 /* Reserved for SeVMS */N#define NSA$_SEVMS_2 122 x /* Reserved for SeVMS */N#define NSA$_SEVMS_3 123 /* Reserved for SeVMS */N#define NSA$_SEVMS_4 124 /* Reserved for SeVMS */N#define NSA$_SEVMS_5 125 /* Reserved for SeVMS */N#define NSA$_SEVMS_6 126 /* Reserved for SeVMS */N#define NSA$_SEVMS_7 127 /* Reserved for SeVMS */N#define NSA$_SEVMS_8 128 /* Reserved for SeyVMS */N#define NSA$_SEVMS_9 129 /* Reserved for SeVMS */N#define NSA$_SEVMS_10 130 /* Reserved for SeVMS */N#define NSA$_SEVMS_11 131 /* Reserved for SeVMS */N#define NSA$_SEVMS_12 132 /* Reserved for SeVMS */N#define NSA$_SEVMS_13 133 /* Reserved for SeVMS */N#define NSA$_SEVMS_14 134 /* Reserved for SeVMS */N#defzine NSA$_SEVMS_15 135 /* Reserved for SeVMS */N#define NSA$_SEVMS_16 136 /* Reserved for SeVMS */N#define NSA$_SEVMS_17 137 /* Reserved for SeVMS */N#define NSA$_SEVMS_18 138 /* Reserved for SeVMS */N#define NSA$_SNAPSHOT_TIME 139 /* Snapshot time */N#define NSA$_TRANSPORT_NAME 140 /* Transport name (DECwindows) */N#define NSA$_DECNET_LINK_ID 14{1 /* DECnet logical link ID */N#define NSA$_DECNET_OBJECT_NAME 142 /* DECnet object name */N#define NSA$_DECNET_OBJECT_NUMBER 143 /* DECnet object number */N#define NSA$_REMOTE_LINK_ID 144 /* Remote logical link ID */N#define NSA$_COMMAND_LINE 145 /* Command line */N#define NSA$_ASSOCIATION_NAME 146 /* IPC association name */N#define NSA$_REM_ASSOCIATION_NAME 147 /* IPC remote as|sociation name */N#define NSA$_CONNECTION_ID 148 /* IPC connection ID */N#define NSA$_MESSAGE 149 /* Associated message code */N#define NSA$_MSGFILNAM 150 /* Associated message file name */N#define NSA$_OBJECT_POINTER 151 /* Object container (Directory) */N#define NSA$_ID_NEW_ATTRIBUTES 152 /* Identifier new attributes */N#define NSA$_SYSTIM_NEW 153 /* New system time */N#d}efine NSA$_SYSTIM_OLD 154 /* Old system time */#define NSA$_PARAMS_WRITE 155#define NSA$_PARAMS_INUSE 156N#define NSA$_MATCHING_ACE 157 /* ACE granting or denying access */N#define NSA$_SNAPSHOT_SAVE_FILNAM 158 /* Snapshot save file name */N#define NSA$_MAILBOX_UNIT 159 /* Mailbox unit number */N#define NSA$_NEW_OWNER 160 /* New process owner (UIC) */N#define NSA$_NEW_PRIORITY 161 /* N~ew process priority */N#define NSA$_OLD_PRIORITY 162 /* Old process priority */N#define NSA$_DIAG_FUNC 163 /* Diagnostic function */N#define NSA$_RESOURCE_NAME 164 /* Lock resource name */N#define NSA$_LNM_TABLE_NAME 165 /* Logical name table name */N#define NSA$_LNM_PARENT_NAME 166 /* Parent logical name table name */N#define NSA$_EFC_NAME 167 /* Event Flag Cluster name  */N#define NSA$_TARGET_PROCESS_CLASS 168 /* Target process classification */N#define NSA$_TARGET_PROCESS_ID 169 /* Target process PID */N#define NSA$_TARGET_PROCESS_NAME 170 /* Target process name */N#define NSA$_TARGET_PROCESS_OWNER 171 /* Target process owner (UIC) */N#define NSA$_TARGET_USERNAME 172 /* Target username */N#define NSA$_NEW_PRIVILEGES 173 /* New privileges */N#define NSA$_OLD_PRIVILEGES 174 /* Old privileges */N#define NSA$_REMOTE_NODE_FULLNAME 175 /* Remote node fullname */N#define NSA$_UID 176 /* UID of object */N#define NSA$_UNUSED_3 177 /* Unused item code */N#define NSA$_UNUSED_4 178 /* Unused item code */N#define NSA$_UNUSED_5 179 /* Unused item code */N#define NSA$_UNUSED_6 180 /* Unused item code */N#define NSA$_UNUSED_7 181 /* Unused item code */N#define NSA$_UNUSED_8 182 /* Unused item code */N#define NSA$_UNUSED_9 183 /* Unused item code */N#define NSA$_UNUSED_10 184 /* Unused item code */N#define NSA$_PRIVS_MISSING 185 /* Privileges missing */N#define NSA$_TARGET_DEVICE_NAME 186 /* Target device name  */N#define NSA$_SECTION_NAME 187 /* Global section name */N#define NSA$_ID_VALUE_ASCII 188 /* ID value via $IDTOASC */N#define NSA$_OBJECT_CLASS 189 /* Object class name */N#define NSA$_SUPPRESS 190 /* Suppress supplied items */N#define NSA$_SNAPSHOT_BOOTFILE 191 /* Snapshot boot file name */O#define NSA$_SOURCE_PROCESS_ID 192 /* Source process ID (impersonation) */N#define NSA$_REQUEST_NUMBER 193 /* Request number */N#define NSA$_ACCESS_MODE 194 /* Access mode */N#define NSA$_SYSTEM_SERVICE_NAME 195 /* System service name */N#define NSA$_NEW_AUTH_PRIVILEGES 196 /* New authorized privileges */N#define NSA$_OLD_AUTH_PRIVILEGES 197 /* Old authorized privileges */N#define NSA$_NEW_DEF_PRIVILEGES 198 /* New default privileges */N#define NSA$_OLD_DEF_PRIVILEGES 199  /* Old default privileges */N#define NSA$_NEW_PROCESS_ID 200 /* New process ID */N#define NSA$_NEW_PROCESS_OWNER 201 /* New process owner (UIC) */N#define NSA$_NEW_PROCESS_NAME 202 /* New process name */N#define NSA$_NEW_IMAGE_NAME 203 /* New image name */N#define NSA$_NEW_USERNAME 204 /* New username */N#define NSA$_DEACCESS_KEY 205 /* Deaccess audit key  */N#define NSA$_OBJECT_RIGHTS_BLOCK 206 /* Object Rights Block */Z#define NSA$_OBJSRV_COMPLETE 207 /* Object service processing completion routine */N#define NSA$_TLV_ORB 208 /* Object distribution */N#define NSA$_FILE_NAME 209 /* File name (volume auditing) */N#define NSA$_DIRECTORY_NAME 210 /* Directory file name */N#define NSA$_SEQUENCE_KEY 211 /* Sequence key (XQP auditing) */N/* DAS item codes. */##define NSA$_PRINCIPAL_FULLNAME 212 #define NSA$_TARGET_FULLNAME 213 #define NSA$_SOURCE_FULLNAME 214!#define NSA$_DESIRED_FULLNAME 215!#define NSA$_CLAIMED_USERNAME 216!#define NSA$_CLAIMED_FULLNAME 217!#define NSA$_CLAIMED_NODENAME 218#define NSA$_TIME_REQ 219#define NSA$_TIME_REC 220#define NSA$_REQ_FLAGS 221#define NSA$_RET_FLAGS 222#define NSA$_LIFETIME_REQ 223#define NSA$_LIFETIME_REC 224#define NSA$_CRED_USAGE 225#define NSA$_CONTEXT_HANDLE 226#define NSA$_QOP_STATE 227#define NSA$_CONF_STATE 228"#define NSA$_DELEG_CRED_HANDLE 229#define NSA$_MAJOR_STATUS 230#define NSA$_DAS_1 231#define NSA$_DAS_2 232#define NSA$_DAS_3 233#define NSA$_DAS_4 234#define NSA$_DAS_5 235#define NSA$_DAS_6 236#define NSA$_DAS_7 237#define NSA$_DAS_8 238#define NSA$_DAS_9 239#define NSA$_DAS_10 240 #define NSA$_STATE_FILE_NAME 241##define NSA$_DIRECTORY_FULLNAME 242( #define NSA$_FROM_DIRECTORY_FULLNAME 243&#define NSA$_TO_DIRECTORY_FULLNAME 244 #define NSA$_ISSUER_FULLNAME 245!#define NSA$_SUBJECT_FULLNAME 246#define NSA$_CERTIF_TYPE 247##define NSA$_CSS_SECONDARY_NAME 248$#define NSA$_CSS_OBJECT_FULLNAME 249!#define NSA$_CSS_REQUEST_FROM 250!#define NSA$_CSS_PRIMARY_NAME 251%#define NSA$_CERTIF_SERIAL_NUMBER 252 #define NSA$_WINDOW_END_TIME 253N#define NSA$_LOG_CLOSED 254 /* log file closed */N#define NSA$_LOG_OPENE D 255 /* log file opened */N#define NSA$_IDENTIFIERS_MISSING 256 /* identifiers missing */%#define NSA$_SENSITIVE_FIELD_NAME 257$#define NSA$_SENSITIVE_ORIG_DATA 258##define NSA$_SENSITIVE_NEW_DATA 259&#define NSA$_SENSITIVE_FIELD_TITLE 260%#define NSA$_SENSITIVE_FIELD_DATA 261N#define NSA$_INSTALL_AUTHPRIVS 262 /* installed image authorized privs */N#define NSA$_PERSONA_FLAGS 263 /* persona flags */N#define NSA$_PERSONA_UID 264 /* persona UID */N#define NSA$_PERSONA_MODE 265 /* persona creation mode */N#define NSA$_PERSONA_USERNAME 266 /* persona username */N#define NSA$_PERSONA_ACCOUNT 267 /* persona account */N#define NSA$_PERSONA_NOAUDIT 268 /* persona noaudit counter */N#define NSA$_PERSONA_UIC 269 /* persona UIC */N#define NSA$_PERSONA_AUTHPRIV 270  /* persona authorized privs */N#define NSA$_PERSONA_PERMPRIV 271 /* persona permanent privs */N#define NSA$_PERSONA_WORKPRIV 272 /* persona working privs */N#define NSA$_PERSONA_ENABLED 273 /* persona rights enabled flags */N#define NSA$_PERSONA_RIGHTS 274 /* persona rights */N#define NSA$_PERSONA_MINCLASS 275 /* persona minimum classification */N#define NSA$_PERSONA_MAXCLASS 276 /* persona maximum class ification */N#define NSA$_PERSONA_WORKCLASS 277 /* persona working classification */N#define NSA$_PERSONA_ID 278 /* persona Id */"#define NSA$_PERSONA_POSIX_UID 279"#define NSA$_PERSONA_POSIX_GID 280!#define NSA$_PARENT_POSIX_UID 281!#define NSA$_PARENT_POSIX_GID 282N#define NSA$_MAX_ITM_CODE 283 /* Must be last */Q#define NSA$_CHAIN 65535 /* For $AUDIT_EVENT item list chaining */#define NSA$_CLIENT_ACCOUNT 2#define NSA$_CLIENT_SYSTEM_ID 8!#define NSA$_CLIENT_SYSTEM_NAME 7##define NSA$_CLIENT_FINAL_STATUS 48!#define NSA$_CLIENT_IMAGE_NAME 19 #define NSA$_CLIENT_PARENT_ID 35##define NSA$_CLIENT_PARENT_OWNER 37"#define NSA$_CLIENT_PARENT_NAME 36!#define NSA$_CLIENT_PROCESS_ID 41##define NSA$_CLIENT_PROCESS_NAME 42$#define NSA$_CLIENT_SUBJECT_CLASS 46$#define NSA$_CLIENT_SUBJECT_OWNER 47#define NSA$_CLIENT_TERMINAL 49!#define NSA$_CLIENT_TIME_STAMP 50#define NSA$_CLIENT_USER NAME 56 #ifdef __NEW_STARLETtypedef struct _nsadatadef {N unsigned short int nsa$w_packet_size; /* Data packet size */N unsigned short int nsa$w_packet_type; /* Data packet type */N unsigned char nsa$r_packet_data; /* Start of packet data */N/* Define $AUDIT_EVENT item codes. */ } NSADATADEF;#else /* __OLD_STARLET */struct nsadatadef {N unsigned short int nsa$w_packet_size; /* D ata packet size */N unsigned short int nsa$w_packet_type; /* Data packet type */N unsigned char nsa$r_packet_data; /* Start of packet data */N/* Define $AUDIT_EVENT item codes. */ } ;%#endif /* #ifdef __NEW_STARLET */N/* Define flag masks for NSA$EVENT_AUDIT supplied parameter. */N/* Each bit set tells NSA$EVENT_AUDIT *not* to default that */N/* corresponding packet from the current process. */#define NSA$M_ACCOUNT_NAME 0x1#define NSA$M_SYSTEM_ID 0x2#define NSA$M_SYSTEM_NAME 0x4#define NSA$M_FINAL_STATUS 0x8#define NSA$M_IMAGE_NAME 0x10#define NSA$M_PARENT_ID 0x20#define NSA$M_PARENT_OWNER 0x40#define NSA$M_PARENT_NAME 0x80#define NSA$M_PROCESS_ID 0x100 #define NSA$M_PROCESS_NAME 0x200!#define NSA$M_SUBJECT_CLASS 0x400!#define NSA$M_SUBJECT_OWNER 0x800#define NSA$M_TERMINAL 0x1000#define NSA$M_TIME_STAMP 0x2000#define NSA$M_USERNAME 0x4000$#define NSA$M_PARENT_USERNAME 0x8000#define NSA$M_POSIX_UID 0x10000#define NSA$M_POSIX_GID 0x20000&#define NSA$M_PARENT_POSIX_UID 0x40000&#define NSA$M_PARENT_POSIX_GID 0x80000 #ifdef __NEW_STARLETtypedef union _fill_23_ { int nsa$l_supplied_flags; __struct {N unsigned nsa$v_account_name : 1; /* account */N unsigned nsa$v_system_id : 1; /* system id */N unsigned nsa$v_system_name : 1; /* system name */N unsigned nsa$v_final_status : 1; /* status */N unsigned nsa$v_image_name : 1; /* image name */N unsigned nsa$v_parent_id : 1; /* parent id */N unsigned nsa$v_parent_owner : 1; /* parent owner */N unsigned nsa$v_parent_name : 1; /* parent process name */N unsigned nsa$v_process_id : 1; /* process id */N unsigned nsa$v_process_name : 1; /* process name */N unsigned nsa$v_subject_class : 1; /* classification */N unsigned nsa$v_subject_owner : 1; /* owner ('UIC') */N unsigned nsa$v_terminal : 1; /* terminal */N unsigned nsa$v_time_stamp : 1; /* timestamp */N unsigned nsa$v_username : 1; /* username  */N unsigned nsa$v_parent_username : 1; /* parent username */% unsigned nsa$v_posix_uid : 1;% unsigned nsa$v_posix_gid : 1;, unsigned nsa$v_parent_posix_uid : 1;, unsigned nsa$v_parent_posix_gid : 1;$ unsigned nsa$v_fill_25_ : 4; } nsa$r_fill_24_; } FILL_23_; #if !defined(__VAXC)<#define nsa$v_account_name nsa$r_fill_24_.nsa$v_account_name6#define nsa$v_system_id nsa$r_fill_24_.nsa$v_system_id:#define nsa$ v_system_name nsa$r_fill_24_.nsa$v_system_name<#define nsa$v_final_status nsa$r_fill_24_.nsa$v_final_status8#define nsa$v_image_name nsa$r_fill_24_.nsa$v_image_name6#define nsa$v_parent_id nsa$r_fill_24_.nsa$v_parent_id<#define nsa$v_parent_owner nsa$r_fill_24_.nsa$v_parent_owner:#define nsa$v_parent_name nsa$r_fill_24_.nsa$v_parent_name8#define nsa$v_process_id nsa$r_fill_24_.nsa$v_process_id<#define nsa$v_process_name nsa$r_fill_24_.nsa$v_process_name>#define nsa$v_subject_class nsa$r_fill_2 4_.nsa$v_subject_class>#define nsa$v_subject_owner nsa$r_fill_24_.nsa$v_subject_owner4#define nsa$v_terminal nsa$r_fill_24_.nsa$v_terminal8#define nsa$v_time_stamp nsa$r_fill_24_.nsa$v_time_stamp4#define nsa$v_username nsa$r_fill_24_.nsa$v_usernameB#define nsa$v_parent_username nsa$r_fill_24_.nsa$v_parent_username6#define nsa$v_posix_uid nsa$r_fill_24_.nsa$v_posix_uid6#define nsa$v_posix_gid nsa$r_fill_24_.nsa$v_posix_gidD#define nsa$v_parent_posix_uid nsa$r_fill_24_.nsa$v_parent_posix_uidD#d efine nsa$v_parent_posix_gid nsa$r_fill_24_.nsa$v_parent_posix_gid"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union fill_23_ { int nsa$l_supplied_flags; __struct {N unsigned nsa$v_account_name : 1; /* account */N unsigned nsa$v_system_id : 1; /* system id */N unsigned nsa$v_system_name : 1; /* system name */N unsigned nsa$v_final_status : 1; /* status  */N unsigned nsa$v_image_name : 1; /* image name */N unsigned nsa$v_parent_id : 1; /* parent id */N unsigned nsa$v_parent_owner : 1; /* parent owner */N unsigned nsa$v_parent_name : 1; /* parent process name */N unsigned nsa$v_process_id : 1; /* process id */N unsigned nsa$v_process_name : 1; /* process name */N  unsigned nsa$v_subject_class : 1; /* classification */N unsigned nsa$v_subject_owner : 1; /* owner ('UIC') */N unsigned nsa$v_terminal : 1; /* terminal */N unsigned nsa$v_time_stamp : 1; /* timestamp */N unsigned nsa$v_username : 1; /* username */N unsigned nsa$v_parent_username : 1; /* parent username */% unsigned nsa$v_posix_uid : 1;% unsigned nsa$v_posix_gid : 1;, unsigned nsa$v_parent_posix_uid : 1;, unsigned nsa$v_parent_posix_gid : 1;$ unsigned nsa$v_fill_25_ : 4; } nsa$r_fill_24_; } ; #if !defined(__VAXC)<#define nsa$v_account_name nsa$r_fill_24_.nsa$v_account_name6#define nsa$v_system_id nsa$r_fill_24_.nsa$v_system_id:#define nsa$v_system_name nsa$r_fill_24_.nsa$v_system_name<#define nsa$v_final_status nsa$r_fill_24_.nsa$v_final_status8#define nsa$v_image_na me nsa$r_fill_24_.nsa$v_image_name6#define nsa$v_parent_id nsa$r_fill_24_.nsa$v_parent_id<#define nsa$v_parent_owner nsa$r_fill_24_.nsa$v_parent_owner:#define nsa$v_parent_name nsa$r_fill_24_.nsa$v_parent_name8#define nsa$v_process_id nsa$r_fill_24_.nsa$v_process_id<#define nsa$v_process_name nsa$r_fill_24_.nsa$v_process_name>#define nsa$v_subject_class nsa$r_fill_24_.nsa$v_subject_class>#define nsa$v_subject_owner nsa$r_fill_24_.nsa$v_subject_owner4#define nsa$v_terminal nsa$r_fill_24_.nsa$v_ terminal8#define nsa$v_time_stamp nsa$r_fill_24_.nsa$v_time_stamp4#define nsa$v_username nsa$r_fill_24_.nsa$v_usernameB#define nsa$v_parent_username nsa$r_fill_24_.nsa$v_parent_username6#define nsa$v_posix_uid nsa$r_fill_24_.nsa$v_posix_uid6#define nsa$v_posix_gid nsa$r_fill_24_.nsa$v_posix_gidD#define nsa$v_parent_posix_uid nsa$r_fill_24_.nsa$v_parent_posix_uidD#define nsa$v_parent_posix_gid nsa$r_fill_24_.nsa$v_parent_posix_gid"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __N EW_STARLET */N/* Define the format of an audit server reply message. This defines the */N/* format of the message written to any supplied reply mailbox. */#define NSA$C_REPLY_LENGTH 4#define NSA$K_REPLY_LENGTH 4 #ifdef __NEW_STARLETtypedef struct _nsareplydef {N unsigned int nsa$l_reply_status; /* condition status value */ } NSAREPLYDEF;#else /* __OLD_STARLET */struct nsareplydef {N unsigned int nsa$l_reply_status; /* condition statu s value */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */T/* Define the structure of a message formating table entry. These entries define */U/* the order in which the data packets are displayed, and the manner in which they */N/* are formatted. */N/* */N#define NSA$C_FMTINF_NONE 0 /* No value to format */N#define NSA$C_FMTINF_LONG_VALUE 1 /* Value is supplied as a longword */N#define NSA$C_FMTINF_IDENTIFIER 2 /* Value supplied is an identifier */X#define NSA$C_FMTINF_DATE 3 /* Value supplied is address of quadword date */]#define NSA$C_FMTINF_STRING 4 /* String size (count) and address supplied to FAO */P#define NSA$C_FMTINF_CLASSIFICATION 5 /* Vector represents a classification */N#define NSA$C_FMTI NF_UID 6 /* Value supplied is address of UID */V#define NSA$C_FMTINF_RIGHTS 7 /* Value supplied is address of rights info */N#define NSA$C_FMTINF_SPECIAL 8 /* Special processing required */'#define NSA$M_FMTINF_CHECK_PREVIOUS 0x1%#define NSA$M_FMTINF_NTH_NEW_LINE 0x2!#define NSA$M_FMTINF_NOFORMAT 0x4"#define NSA$M_FMTINF_SENSITIVE 0x8#define NSA$K_FMTINF_LENGTH 28#define NSA$C_FMTINF_LENGTH 28N/* Define the format style codes.  */S#define NSA$C_FORMAT_STYLE_BRIEF 1 /* Single line briefly formatted message */N#define NSA$C_FORMAT_STYLE_FULL 2 /* Fully formatted message */N#define NSA$C_FORMAT_STYLE_PACKET_TYPE 3 /* Packet type format */N/* Define classification string format constants */N#define NSA$C_FMTINF_MAX_SINGLE_SEC_STR 3895 /* Simple secrecy string */N#define NSA$C_FMTINF_MAX_SINGLE_INT_STR 1977 /* Simple integrity string */N#define NSA$C_FMTINF_MAX_RANGE_SEC_STR 7801 /* Compound secrecy string */N#define NSA$C_FMTINF_MAX_RANGE_INT_STR 3963 /* Compound integrity string */ #ifdef __NEW_STARLETtypedef struct _fmttbldef {S int nsa$l_fmtinf_packet_name; /* Address of the packet name descriptor */z unsigned short int nsa$w_fmtinf_packet_type; /* Define the type of packet represented by this entry (NSA$C_PKT_xxx) */] unsigned short int nsa$w_fmtinf_output_order; /* Define the order in the o utput buffer */N int nsa$l_fmtinf_fao_ctrstr; /* Normal FAO control string */^ int nsa$l_fmtinf_client_fao_ctrstr; /* FAO control string for client/server combination */d int nsa$l_fmtinf_nth_fao_ctrstr; /* FAO control string for the Nth packet of the same type */N unsigned char nsa$b_fmtinf_data_type; /* Type of data to format */ __union {- unsigned char nsa$b_fmtinf_fmt_flags; __struct {e unsigned nsa$v_fmtinf_check_previous : 1; /* Check adjacency with previous output item */_ unsigned nsa$v_fmtinf_nth_new_line : 1; /* Force duplicate packets to a new line */P unsigned nsa$v_fmtinf_noformat : 1; /* Don't format the packet(s) */\ unsigned nsa$v_fmtinf_sensitive : 1; /* Packet contains sensitive information */( unsigned nsa$v_fill_28_ : 4; } nsa$r_fill_27_; } nsa$r_fill_26_;P unsigned short int nsa$w_fmtinf_server_pkt; /* Associated (server)  packet */O unsigned short int nsa$w_fmtinf_indent; /* Indent for multi-line packets */N unsigned short int nsa$w_fmtinf_spare_1; /* Unused */ } FMTTBLDEF; #if !defined(__VAXC)D#define nsa$b_fmtinf_fmt_flags nsa$r_fill_26_.nsa$b_fmtinf_fmt_flags]#define nsa$v_fmtinf_check_previous nsa$r_fill_26_.nsa$r_fill_27_.nsa$v_fmtinf_check_previousY#define nsa$v_fmtinf_nth_new_line nsa$r_fill_26_.nsa$r_fill_27_.nsa$v_fmtinf_nth_new_lineQ#define nsa$v_fmtinf_noformat nsa$r_fill_26_.nsa$r_fill_27_.nsa$v_fmtinf_noformatS#define nsa$v_fmtinf_sensitive nsa$r_fill_26_.nsa$r_fill_27_.nsa$v_fmtinf_sensitive"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct fmttbldef {S int nsa$l_fmtinf_packet_name; /* Address of the packet name descriptor */z unsigned short int nsa$w_fmtinf_packet_type; /* Define the type of packet represented by this entry (NSA$C_PKT_xxx) */] unsigned short int nsa$w_fmtinf_output_order; /* Define the order in the output buffer */N int nsa$l_fmtinf_fao_ctrstr; /* Normal FAO control string */^ int nsa$l_fmtinf_client_fao_ctrstr; /* FAO control string for client/server combination */d int nsa$l_fmtinf_nth_fao_ctrstr; /* FAO control string for the Nth packet of the same type */N unsigned char nsa$b_fmtinf_data_type; /* Type of data to format */ __union {- unsigned char nsa$b_fmtinf_fmt_flags; __struct {e unsigned nsa$v_fmtinf_check_previous : 1; /* Check adjacency with previous output item */_ unsigned nsa$v_fmtinf_nth_new_line : 1; /* Force duplicate packets to a new line */P unsigned nsa$v_fmtinf_noformat : 1; /* Don't format the packet(s) */\ unsigned nsa$v_fmtinf_sensitive : 1; /* Packet contains sensitive information */( unsigned nsa$v_fill_28_ : 4; } nsa$r_fill_27_; } nsa$r_fill_26_;P unsigned short int nsa$w_fmtinf_server_pkt; /* Assoc iated (server) packet */O unsigned short int nsa$w_fmtinf_indent; /* Indent for multi-line packets */N unsigned short int nsa$w_fmtinf_spare_1; /* Unused */ } ; #if !defined(__VAXC)D#define nsa$b_fmtinf_fmt_flags nsa$r_fill_26_.nsa$b_fmtinf_fmt_flags]#define nsa$v_fmtinf_check_previous nsa$r_fill_26_.nsa$r_fill_27_.nsa$v_fmtinf_check_previousY#define nsa$v_fmtinf_nth_new_line nsa$r_fill_26_.nsa$r_fill_27_.nsa$v_fmtinf_nth_new_lineQ#define nsa$v_fmtinf_nof ormat nsa$r_fill_26_.nsa$r_fill_27_.nsa$v_fmtinf_noformatS#define nsa$v_fmtinf_sensitive nsa$r_fill_26_.nsa$r_fill_27_.nsa$v_fmtinf_sensitive"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */^/* Define the structure of the format image callout block. This block is used to determine */`/* which routines should be used to format event messages and event message data packets that */N/* are  unknown to the base VMS operating system. */N/* */#define NSA$K_IMGXFR_LENGTH 53#define NSA$C_IMGXFR_LENGTH 53 #ifdef __NEW_STARLETtypedef struct _fmtcalldef {S int nsa$l_imgxfr_flink; /* Address of next entry (must be first) */X int nsa$l_imgxfr_blink; /* Address of previous entry (must be secomd) */N unsigned short int nsa$w_imgxfr_size; /* Size of entry block */N unsigned short int nsa$w_imgxfr_facility; /* Facility code for image */O unsigned int nsa$l_imgxfr_base_order_offset; /* Base output order offset */N/* Start of sharable image routine addresses */N void *nsa$a_imgxfr_message_info; /* Message information routine */N void *nsa$a_imgxfr_validate_packet; /* Packet validation routine */P void *nsa$a_imgxfr_display_info; /* Packet display information routine */N void *nsa$a_imgxfr_line_break; /* Line break processing routine */O void *nsa$a_imgxfr_format_special; /* Special packet formatting routine */N void *nsa$a_imgxfr_format_info; /* Normal packet formatting routine */N void *nsa$a_imgxfr_format_brief; /* Brief format routine */N void *nsa$a_imgxfr_format_packet_type; /* Packet type format routine */S void *nsa$a_imgxfr_format_event_type; /* Message type/subtype format routine */N/* End of sharab le image routine addresses */N char nsa$t_imgxfr_image_name [1]; /* Start of image name */ } FMTCALLDEF;#else /* __OLD_STARLET */struct fmtcalldef {S int nsa$l_imgxfr_flink; /* Address of next entry (must be first) */X int nsa$l_imgxfr_blink; /* Address of previous entry (must be secomd) */N unsigned short int nsa$w_imgxfr_size; /* Size of entry block */N unsigned short int nsa$w_imgxfr_facility; /* Facility code for image */O unsigned int nsa$l_imgxfr_base_order_offset; /* Base output order offset */N/* Start of sharable image routine addresses */N void *nsa$a_imgxfr_message_info; /* Message information routine */N void *nsa$a_imgxfr_validate_packet; /* Packet validation routine */P void *nsa$a_imgxfr_display_info; /* Packet display information routine */N void *nsa$a_imgxfr_line_break; /* Line break processing routine */O void *nsa$a_imgxfr_format_special; /* Special packet formatting routine */N void *nsa$a_imgxfr_format_info; /* Normal packet formatting routine */N void *nsa$a_imgxfr_format_brief; /* Brief format routine */N void *nsa$a_imgxfr_format_packet_type; /* Packet type format routine */S void *nsa$a_imgxfr_format_event_type; /* Message type/subtype format routine */N/* End of sharable image routine addresses  */N char nsa$t_imgxfr_image_name [1]; /* Start of image name */ } ;%#endif /* #ifdef __NEW_STARLET */Q/* The following structure defines the common argument block passed to all the */N/* various formatting routines (which actually format information). */"#define NSA$M_FMTARG_SENSITIVE 0x1&#define NSA$M_FMTARG_DISPLAY_TITLE 0x2'#define NSA$M_FMTARG_CHECK_PREVIOUS 0x1%#define NSA$M_FMTARG_NTH_NEW_LINE 0x2!#define NSA$M_FMTARG_NOFORMAT 0x4#define NSA$K_FMTARG_LENGTH 36#define NSA$C_FMTARG_LENGTH 36 #ifdef __NEW_STARLETtypedef struct _fmtargdef { __union {$ __int64 nsa$q_fmtarg_buffer; __struct {Q unsigned short int nsa$w_fmtarg_buffer_size; /* Output buffer size */N unsigned short int nsa$w_fmtarg_spare_1; /* Unused */N int nsa$a_fmtarg_buffer_pointer; /* Output buffer address */ } nsa$r_fill_30_; } nsa$r_fill_29_;Z unsigned sho rt int nsa$w_fmtarg_buffer_offset; /* Current position in output buffer */Y unsigned short int nsa$w_fmtarg_bol_offset; /* Offset to beginning of current line */ __union {( __int64 nsa$q_fmtarg_terminator; __struct {T unsigned short int nsa$w_fmtarg_term_size; /* Size of line terminator */N unsigned short int nsa$w_fmtarg_spare_2; /* Unused */N int nsa$a_fmtarg_term_text; /* Address of terminator text */ } nsa$r_fill_32_; } nsa$r_fill_31_;N unsigned short int nsa$w_fmtarg_line_width; /* Output display width */X unsigned short int nsa$w_fmtarg_line_indent; /* Positions to indent (when needed) */N int nsa$a_fmtarg_output_routine; /* Address of an output routine */ __union {( unsigned int nsa$l_fmtarg_flags; __struct { __union {: unsigned short int nsa$w_fmtarg_flags_low; __struct {d  unsigned nsa$v_fmtarg_sensitive : 1; /* Packet contains sensitive information */P unsigned nsa$v_fmtarg_display_title : 1; /* Display title */0 unsigned nsa$v_fill_39_ : 6;% } nsa$r_fill_36_;! } nsa$r_fill_35_; __union {; unsigned short int nsa$w_fmtarg_flags_high; __struct {m unsigned nsa$v_fmtarg_check_previous : 1; /* Check adjacency with previous  output item */g unsigned nsa$v_fmtarg_nth_new_line : 1; /* Force duplicate packets to a new line */X unsigned nsa$v_fmtarg_noformat : 1; /* Don't format the packet(s) */0 unsigned nsa$v_fill_40_ : 5;% } nsa$r_fill_38_;! } nsa$r_fill_37_; } nsa$r_fill_34_; } nsa$r_fill_33_;N unsigned int nsa$l_fmtarg_user_context; /* User context cell */ } FMTARGDEF; #if !defined(__VAXC)>#define nsa$q_fmtarg_buffer nsa$r_fill_29_.nsa$q_fmtarg_bufferW#define nsa$w_fmtarg_buffer_size nsa$r_fill_29_.nsa$r_fill_30_.nsa$w_fmtarg_buffer_size]#define nsa$a_fmtarg_buffer_pointer nsa$r_fill_29_.nsa$r_fill_30_.nsa$a_fmtarg_buffer_pointerF#define nsa$q_fmtarg_terminator nsa$r_fill_31_.nsa$q_fmtarg_terminatorS#define nsa$w_fmtarg_term_size nsa$r_fill_31_.nsa$r_fill_32_.nsa$w_fmtarg_term_sizeS#define nsa$a_fmtarg_term_text nsa$r_fill_31_.nsa$r_fill_32_.nsa$a_fmtarg_term_text<#define nsa$l_fmtarg_flags nsa$r_fill_33_.nsa$l_fmtarg_flagsb#define nsa$w_fmtarg_flags_low nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_35_.nsa$w_fmtarg_flags_lowq#define nsa$v_fmtarg_sensitive nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_35_.nsa$r_fill_36_.nsa$v_fmtarg_sensitivey#define nsa$v_fmtarg_display_title nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_35_.nsa$r_fill_36_.nsa$v_fmtarg_display_titled#define nsa$w_fmtarg_flags_high nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_37_.nsa$w_fmtarg_flags_hi gh{#define nsa$v_fmtarg_check_previous nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_37_.nsa$r_fill_38_.nsa$v_fmtarg_check_previousw#define nsa$v_fmtarg_nth_new_line nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_37_.nsa$r_fill_38_.nsa$v_fmtarg_nth_new_lineo#define nsa$v_fmtarg_noformat nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_37_.nsa$r_fill_38_.nsa$v_fmtarg_noformat"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct fmtargdef { __union {$ int nsa$q_fmtarg_buffer [2]; __struct {Q unsigned short int nsa$w_fmtarg_buffer_size; /* Output buffer size */N unsigned short int nsa$w_fmtarg_spare_1; /* Unused */N int nsa$a_fmtarg_buffer_pointer; /* Output buffer address */ } nsa$r_fill_30_; } nsa$r_fill_29_;Z unsigned short int nsa$w_fmtarg_buffer_offset; /* Current position in output buffer */Y unsigned short int nsa$w_fmtarg_bol_offset; /* Offset to beginning of current line */ __union {( int nsa$q_fmtarg_terminator [2]; __struct {T unsigned short int nsa$w_fmtarg_term_size; /* Size of line terminator */N unsigned short int nsa$w_fmtarg_spare_2; /* Unused */N int nsa$a_fmtarg_term_text; /* Address of terminator text */ } nsa$r_fill_32_; } nsa$r_fill_31_;N unsigned short int nsa$w_fmtarg_line_width; /* Output display width */X unsigned short int nsa$w_f mtarg_line_indent; /* Positions to indent (when needed) */N int nsa$a_fmtarg_output_routine; /* Address of an output routine */ __union {( unsigned int nsa$l_fmtarg_flags; __struct { __union {: unsigned short int nsa$w_fmtarg_flags_low; __struct {d unsigned nsa$v_fmtarg_sensitive : 1; /* Packet contains sensitive information */P unsigned nsa$v_fmtarg_display_title : 1; /* Displa y title */0 unsigned nsa$v_fill_39_ : 6;% } nsa$r_fill_36_;! } nsa$r_fill_35_; __union {; unsigned short int nsa$w_fmtarg_flags_high; __struct {m unsigned nsa$v_fmtarg_check_previous : 1; /* Check adjacency with previous output item */g unsigned nsa$v_fmtarg_nth_new_line : 1; /* Force duplicate packets to a new line */X unsigned nsa$v _fmtarg_noformat : 1; /* Don't format the packet(s) */0 unsigned nsa$v_fill_40_ : 5;% } nsa$r_fill_38_;! } nsa$r_fill_37_; } nsa$r_fill_34_; } nsa$r_fill_33_;N unsigned int nsa$l_fmtarg_user_context; /* User context cell */ } ; #if !defined(__VAXC)>#define nsa$q_fmtarg_buffer nsa$r_fill_29_.nsa$q_fmtarg_bufferW#define nsa$w_fmtarg_buffer_size nsa$r_fill_29_.nsa$r_fill_30_.nsa$w_fmtarg_buffer_size]#define nsa$a_fmtarg_buffer_pointer nsa$r_fill_29_.nsa$r_fill_30_.nsa$a_fmtarg_buffer_pointerF#define nsa$q_fmtarg_terminator nsa$r_fill_31_.nsa$q_fmtarg_terminatorS#define nsa$w_fmtarg_term_size nsa$r_fill_31_.nsa$r_fill_32_.nsa$w_fmtarg_term_sizeS#define nsa$a_fmtarg_term_text nsa$r_fill_31_.nsa$r_fill_32_.nsa$a_fmtarg_term_text<#define nsa$l_fmtarg_flags nsa$r_fill_33_.nsa$l_fmtarg_flagsb#define nsa$w_fmtarg_flags_low nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_35_.nsa$w_fmtarg_flags_lowq#define nsa$v_fmtarg_sensitive nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_35_.nsa$r_fill_36_.nsa$v_fmtarg_sensitivey#define nsa$v_fmtarg_display_title nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_35_.nsa$r_fill_36_.nsa$v_fmtarg_display_titled#define nsa$w_fmtarg_flags_high nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_37_.nsa$w_fmtarg_flags_high{#define nsa$v_fmtarg_check_previous nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_37_.nsa$r_fill_38_.nsa$v_fmtarg_check_previousw#define nsa$v_fmtarg_nth_new_line nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_37_.nsa$r_fill_38_.nsa$v_fmtarg_nth_new_lineo#define nsa$v_fmtarg_noformat nsa$r_fill_33_.nsa$r_fill_34_.nsa$r_fill_37_.nsa$r_fill_38_.nsa$v_fmtarg_noformat"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */T/* The following structure defines the transfer vector area for the format image. */N#define NSA$C_IMGXFR_MESSAGE_INFO 0 /* Message information routine */N#define NSA$C_IMGXFR_VALIDATE_PACKET 1 /* Packet validation routine */P#define NSA$C_IMGXFR_DISPLAY_INFO 2 /* Packet display information routine */N#define NSA$C_IMGXFR_LINE_BREAK 3 /* Line break processing routine */O#define NSA$C_IMGXFR_FORMAT_SPECIAL 4 /* Special packet formatting routine */N#define NSA$C_IMGXFR_FORMAT_INFO 5 /* Normal packet formatting routine */N#define NSA$C_IMGXFR_FORMAT_BRIEF 6 /* Brief format routine */N#define NSA$C_IMGXFR_FORMAT_PACKET_TYPE 7 /* Packet type format routine */R#d efine NSA$C_IMGXFR_FORMAT_EVENT_TYPE 8 /* Message type/subtype format routine */ #ifdef __NEW_STARLETtypedef struct _fmtxferdef {Q unsigned __int64 nsa$r_imgxfr_message_info; /* Message information routine */R unsigned __int64 nsa$r_imgxfr_validate_packet; /* Packet validation routine */X unsigned __int64 nsa$r_imgxfr_display_info; /* Packet display information routine */Q unsigned __int64 nsa$r_imgxfr_line_break; /* Line break processing routine */Y unsigned __int64 nsa$r_imgxfr_format_special; /* Special packet formatting routine */U unsigned __int64 nsa$r_imgxfr_format_info; /* Normal packet formatting routine */N unsigned __int64 nsa$r_imgxfr_format_brief; /* Brief format routine */V unsigned __int64 nsa$r_imgxfr_format_packet_type; /* Packet type format routine */^ unsigned __int64 nsa$r_imgxfr_format_event_type; /* Message type/subtype format routine */T/* The following list of constants is used to index into the transfer vector area */Z/*  defined above. The structure definition and constant list must parallel each other. */ } FMTXFERDEF;#else /* __OLD_STARLET */struct fmtxferdef {Q unsigned int nsa$r_imgxfr_message_info [2]; /* Message information routine */R unsigned int nsa$r_imgxfr_validate_packet [2]; /* Packet validation routine */X unsigned int nsa$r_imgxfr_display_info [2]; /* Packet display information routine */Q unsigned int nsa$r_imgxfr_line_break [2]; /* Line break processing routine */Y unsigned int nsa$r_imgxfr_format_special [2]; /* Special packet formatting routine */U unsigned int nsa$r_imgxfr_format_info [2]; /* Normal packet formatting routine */N unsigned int nsa$r_imgxfr_format_brief [2]; /* Brief format routine */V unsigned int nsa$r_imgxfr_format_packet_type [2]; /* Packet type format routine */^ unsigned int nsa$r_imgxfr_format_event_type [2]; /* Message type/subtype format routine */T/* The following list of constants is used to index into the t ransfer vector area */Z/* defined above. The structure definition and constant list must parallel each other. */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Define block to hold access bitname information for a particular object */N/* */N#define NSA$K_ACCNAM_LENGTH 139 /* Length of block */#define NSA$C_ACCNAM _LENGTH 139 #ifdef __NEW_STARLETtypedef struct _fmtaccnamdef {S int nsa$l_accnam_flink; /* Address of next entry (must be first) */X int nsa$l_accnam_blink; /* Address of previous entry (must be secomd) */N unsigned short int nsa$w_accnam_size; /* Size of entry block */T int nsa$l_accnam_codes [32]; /* 32 pointers to access name descriptors */N char nsa$t_accnam_object_type [1]; /* Start of object name */ } FMTACC NAMDEF;#else /* __OLD_STARLET */struct fmtaccnamdef {S int nsa$l_accnam_flink; /* Address of next entry (must be first) */X int nsa$l_accnam_blink; /* Address of previous entry (must be secomd) */N unsigned short int nsa$w_accnam_size; /* Size of entry block */T int nsa$l_accnam_codes [32]; /* 32 pointers to access name descriptors */N char nsa$t_accnam_object_type [1]; /* Start of object name */ } ;%#endif  /* #ifdef __NEW_STARLET */N/* */Z/* Define the format of the message information block. This block defines some general */N/* characteristics of messages for a particular facility. */N/* */#define NSA$K_MSGINF_LENGTH 8#define NSA$C_MSGINF_LENGTH 8 #ifdef __NEW_STARLETtypedef struct _msginfodef {Q unsigned int nsa$l _msginf_max_order_offset; /* Maximum (output) line index */O int nsa$a_msginf_brief_title; /* Address of brief format titleline */ } MSGINFODEF;#else /* __OLD_STARLET */struct msginfodef {Q unsigned int nsa$l_msginf_max_order_offset; /* Maximum (output) line index */O int nsa$a_msginf_brief_title; /* Address of brief format titleline */ } ;%#endif /* #ifdef __NEW_STARLET */N/*  */W/* Define the structure of a formatting table subtype entry. This entry consists of */N/* a description of the subtype as well as the name of the subtype. */N/* */#define NSA$K_SUBTBL_LENGTH 8#define NSA$C_SUBTBL_LENGTH 8 #ifdef __NEW_STARLETtypedef struct _subfmttbldef { __union {O int nsa$l_subtbl_description; /* Address of the description string */U unsigned int nsa$l_subtbl_table_size; /* Number of entries in the subtable */! } nsa$r_subtbl_overlay_3;N unsigned int nsa$l_subtbl_mnemonic; /* Mnemonic name for the entry */ } SUBFMTTBLDEF; #if !defined(__VAXC)P#define nsa$l_subtbl_description nsa$r_subtbl_overlay_3.nsa$l_subtbl_descriptionN#define nsa$l_subtbl_table_size nsa$r_subtbl_overlay_3.nsa$l_subtbl_table_size"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct subfmttbldef { __union {O int nsa$l_subtbl_description; /* Address of the description string */U unsigned int nsa$l_subtbl_table_size; /* Number of entries in the subtable */! } nsa$r_subtbl_overlay_3;N unsigned int nsa$l_subtbl_mnemonic; /* Mnemonic name for the entry */ } ; #if !defined(__VAXC)P#define nsa$l_subtbl_description nsa$r_subtbl_overlay_3.nsa$l_subtbl_descriptionN#define nsa$l_subtbl_table_size nsa$r_subtbl_overlay_3.nsa$l_subtbl_table_size"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* Define obsolete message types and subtypes here. */#define NSA$C_MSG_NETUAF 9#define NSA$C_MSG_PRIV_AUDIT 16#define NSA$C_PRIV_AUDIT 1##define NSA$C_JOBCTL_QUEUE_ACCESS 3#define NSA$C_NETUAF_ADD 1#define NSA$C_NETUAF_DELETE 2#define NSA$C_NETUAF_MODIFY 3#define NSA$C_NETUAF_NCP 4#define NSA$C_NETUAF_MAX_CODE 8N/* Define obsolete packet types and item code equivalents here. */#define NSA$C_PKT_OBJECT_ID 26#define NSA$_OBJECT_ID 26N/* Define packet pseudonyms here. */#define NSA$C_PKT_PRIV_MASK 22#define NSA$_PRIV_MASK 22#define NSA$C_PKT_PRIVILEGES 22#define NSA$_PRIVILEGES 22%#define NSA$C_PKT_SNAPSHOT_FILNAM 158 #define NSA$_SNAPSHOT_FILNAM 158$#define NSA$C_PKT_PERFORMANCE_NOP 80#define NSA$_PERFORMANCE_NOP 80$#define NSA$C_PKT_SUPPLIED_FLAGS 190#define NSA$_SUPPLIED_FLAGS 190 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __NSADEF_LOADED */ ww */********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */ J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]NSAMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $NSAMSGDEF ***/#ifndef __NSAMSGDEF_LOADED#define __NSAMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:57:40.22 */N/* */N/* */N/*  */N/* *********************************************************************** */N/* * * */N/* * * */N/* * COPYRIGHT 1989 COMPAQ COMPUTER CORPORATION * */N/* * * */N/* * COMPAQ REGISTERED IN U.S. PATENT AND TRADEMARK OFFICE.  * */N/* * * */N/* * CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM COMPAQ OR * */N/* * AUTHORIZED SUBLICENSOR REQUIRED FOR POSSESSION, USE OR COPYING. * */N/* * CONSISTENT WITH FAR 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE,* */N/* * COMPUTER SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL * */N/* * ITEMS ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD * */N/* * COMMERCIAL LICENSE. * */N/* * * */N/* * * */N/* * * */N/* *********************************************************************** */N/* */N/*  */N/*++ */N/* */N/* FACILITY: */N/* */I/* VMSLIB */N/*  */N/* ABSTRACT: */N/* */N/* THIS MODULE DEFINES THE MESSAGES CODES USED TO AUDIT USE OF PRIVILEGE */N/* WITHIN THE VMS TCB. MESSAGE CODES ARE NUMBERED FROM 0-4095. */N/* */N/* THE FIRST HALF OF THIS RANGE IS RESERVED EXCLUSIVELY FOR PRIVILEGE */S/* AUDITING AND ARE FURTHER BROKEN DOWN BY PRIVILEGE. THE SECOND HALF OF THE */O/* RANGE IS RESERVED FOR OTHER MESSAGES ASSOCIATED WITH TCB AUDIT EVENTS. */N/* */N/* ENVIRONMENT: */N/* */I/* VMS EXECUTIVE */N/*  */N/* AUTHOR: */N/* */B/* DERRELL D. PIPER APRIL 17TH, 1989 */N/* */N/* NOTA BENE: */N/*  */K/* OBSOLETE PRIVILEGE AUDITING MESSAGE CODES CANNOT BE REMOVED FROM THIS */K/* MODULE! THESE MESSAGE CODES ARE DEFINED IN STARLET AND REFERENCED BY */I/* NAME IN THE $IFPRIV/$IFNPRIV AND $HAS_PRIV MACROS. IF YOU WANT TO */M/* "remove" AN OBSOLETE MESSAGE, REPLACE THE TEXT WITH "< -- unused -- >". */I/* IF YOU'RE ADDING A NEW MESSAGE, PLEASE RE-USE ANY UNUSED MESSAGES. */N/* */N/* MODIFICATIONS:  */N/* */2/* X-37 GP051505 GUY PELEG 15-MAY-2006 */B/* ADD COMB_20 AND WORLD_6. */N/* */8/* X-36 RAB0148 ROBERT A. BROOKS 11-JAN-2006 */B/* ADD OPER_94 FOR SET PATH AUDITING. */N/*  */8/* X-35 RAB0143 ROBERT A. BROOKS 28-NOV-2005 */B/* ADD SYSPRV_52 FOR SET PATH AUDITING. */N/* */4/* X-34 WCC WILLIAM CLEMENCE 15-JUL-2004 */B/* ADDED CMKRNL_37 FOR IPMI AUDITING */N/* */=/* X-33 JJF0282 J. JEFFERY FRIEDRICHS 9-MAR-2004 */B/* ADDED SYSPRV_51 FOR SETSHOSHADOW AUDITING */N/* */5/* X-32 LC0002 LARRY CAMILLI 15-JAN-2003 */C/* ADDED OPER_93 FOR OPER PRIVILEGE REQUIREMENT FOR */B/* SET CACHE/FLUSH, AND REMOVED VOLPRO_16. (SEE X-31.) */N/* */5/* X-31 LC0001 LARRY CAMILLI 19-DEC-2002 */C/* ADDED OPER_92 FOR OPER PRIVILEGE REQUIREMENT FOR */B/* SET CACHE/RESET AND VOLPRO_16 FOR VOLPRO PRIVILEGE */B/* REQUIREMENT FOR SET CACHE/FLUSH. */N/* */6/* X-30 JAH0405 JOHN A HARNEY 01-AUG-2002 */C/* MORE COE FOLD: AUDITS FOR MEDDLE BIT PRIV CHECK: */N/* */=/* X-25A1A2 JAH0404 JOHN A HARNEY 24-JUL-2002 */C/* ADD CMKRNL_36 FOR $SET_PROCESS_PROPERTIES MEDDLE_ENABLE BIT. */N/* */=/* X-25A1A1 JAH0404 JOHN A HARNEY 23-JUL-2002 */B/* ADD CMEXEC_2 FOR $SET_PROCESS_PROPERTIES MEDDLE_ENABLE BIT. */N/* */>/* X-29 DOUGLAS FYFE 15-FEB-2002 */P/* ADD MESSAGES FOR USE-OF-PRIVILEGE AUDITING WITHIN SET SERVER */N/* /SUSPEND, /RESUME AND /CLUSTER. */N/* */6/* X-28 JAH0378 JOHN A HARNEY 10-OCT-2001 */B/* COE FOLD: CHANGE AUDIT MESSAGE FOR IMPERSONATE_12 */N/* */=/* X-27 LJK0230 LAWRENCE J. KILGALLEN 15-FEB-2001 */B/* ONE MORE MESSAGE FOR USE-OF-PRIVILEGE AUDITING WITHIN  */B/* SHOW SERVER. */N/* */=/* X-25 LJK0219 LAWRENCE J. KILGALLEN 2-FEB-2001 */B/* RESOLVE A FOLD BETWEEN X-24, X-23 AND X-22A. */N/* */8/* X-24 PEM0070 PAUL E. MOSTEIKA 01-AUG-2000 */B/* ADD IMPERSONATE_12 - AUDIT THE NEW ACE TYPE */B/* POSIX_OWNER FOR COE SUPPORT OF EFFECTIVE UID/GID. */N/* */N/* X-23 KGBCOE KENNETH G.BLAYLOCK 18-JUL-2000 */N/* MODIFY XQP_16 WITH NEW MESSAGE NAME AND ADD */N/* A NEW XQP_23 MESSAGE. */N/* */>/* X-22A LJK0218 LAWRENCE J. KILGALLEN 1-FEB-2 001 */C/* ADD MESSAGES FOR USE-OF-PRIVILEGE AUDITING WITHIN SET SERVER */B/* AND SHOW SERVER. */B/* ADD MESSAGES FOR USE-OF-PRIVILEGE AUDITING BY SYS$ACM[W]. */N/* */6/* X-22 JAH0331 JOHN A HARNEY 10-MAR-1999 */B/* ADD IMPERSONATE_11 FOR USES OF $PERSONA_RESERVE. */N/* */6/* X-21 JAH0317 JOHN A HARNEY 24-SEP-1998 */B/* ADD AUDIT_3 FOR NEW $SETUAI ITEM WHICH REQUIRES AUDIT PRIV. */N/* */0/* X-20 JMB004 JIM BLUE 08-JUN-1998 */B/* ADD OPER_79, OPER_80, AND OPER_81 MESSAGES FOR */B/* MULTIPATH SET DEVICE /ENABLE, /POLL, AND /SWITCH */B/* OPTIONS. */N/*  */6/* X-19 JAH0269 JOHN A HARNEY 11-NOV-1997 */B/* ADD NSA$_IMPERSONATE_8, _9, AND _10 FOR PERSONA SERVICES. */N/* */6/* X-18 MCJ MICHAEL C. JOHNSON 31-JUL-1997 */B/* ADD CMKRNL_35, XQP_21 AND XQP_22 MESSAGES FOR XFC */B/* (EXTENDED FILE CACHE) PROJECT. */N/* */0/* X-17 NL NICCOLE LUCE 04-MAR-1997 */B/* ADD NETMBX_3 MESSAGE FOR ICC (RAVEN_FT1). */N/* */3/* X-16 WXD BILL DAVENPORT 13-DEC-1995 */B/* PERTHREAD SECURITY STAGE 1 CHECKIN: */B/* - RENAME DETACH PRIVILEGE TO IMPERSONATE. ADD */B/* LITERALS SO THAT OLD SYMBOLS STILL GET CREATED */B/* TO MAINTAIN BACKWARD COMPATIBILITY  */B/* - ADDED SETPRV_6 FOR USE OF SETPRV TO MODIFY IMAGE */B/* WORKING PRIVILEGES MASK. */N/* */8/* X-15 RJB0016 RICHARD J. BARRY 28-JUN-1995 */B/* CHANGE TEXT OF MACBYPASSED MESSAGE. */N/* */4/* X-14 JRK369 JIM KAUFFMAN 25-APR-1995 */B/* ADD ALTPRI_7 AND WORLD_5 */N/* */F/* X-13 CHANGE TEXT OF MESSAGES SO 64-BIT SYSTEM SERVICES CAN */B/* SHARE ROUTINES WHICH DO AUTIDING WITH WITH 32-BIT SYSTEM */B/* SERVICES. */N/* */B/* MESSAGES CHANGED: */B/* CMKRNL_22 */B/* CMKRNL_23 */B/* CMEXEC_1 */B/* PRMGBL_1 */B/* SYSGBL_1 */B/* PFNMAP_1 */B/* PFNMAP_2 */N/*  */>/* X-12 JCH703 JOHN C. HALLYBURTON, JR. 17-JAN-1995 */B/* CHANGE TEXT OF LOG_IO_1, PHY_IO_9, PHY_IO_14 AND DETACH_1. */B/* ADD ALTPRI_6. */N/* */7/* X-11 REG002 RUTH GOLDENBERG 26-OCT-1994 */B/* EDIT TEXT OF CMKRNL_24 AND DETACH_1 TO INCLUDE */B/* REMOTE PROCESS CREATIONS.  */N/* */6/* X-10 JAH0159 JOHN A HARNEY 07-SEP-1994 */B/* ADD COMMON MAPPING MESSAGES */N/* */8/* X-9 NYK028 NITIN Y. KARKHANIS 20-MAY-1994 */B/* RELEASE OPER_47 AND USE CMKRNL_34 FOR FLAGGING ATTEMPTED */B/* MODIFICATIONS TO CONSOLE ENVIRONMENT VARIABLES. */N/*  */8/* X-8 NYK023 NITIN Y. KARKHANIS 14-APR-1994 */B/* RE-USED OPER_47 FOR "USER MODIFYING CONSOLE ENVIRONMENT */B/* VARIABLES. */N/* */5/* X-7 JAH0086 JOHN A HARNEY 14-MAR-1994 */B/* ADD SECURITY_20 TO SECURITY_25 MESSAGES. */N/*  */7/* X-6 SGS0042 STEVE SKONETSKI 10-MAR-1994 */B/* ADD MEDIA MANAGEMENT EXTENSIONS (MME) SPECIFIC */B/* AUDITING MESSAGES. */N/* */9/* X-5 SAD0296 STUART A. DAVIDSON 9-DEC-1993 */B/* ADD DETACH_7 FOR IMPERSONATION. */N/*  */./* X-4 TRB TOM BENSON 23-OCT-1993 */B/* PROPAGATED WORLD_4 FROM VAX, FOR CLASS SCHEDULER. */N/* */4/* X-3 TNS003 TOM SCARPELLI 23-AUG-1993 */B/* CHANGE $MAPGBL TO $MGBLSC. */N/* *///* X-2 CEG CLAIR GRANT 2-APR-1993 */B/* VAX (BLADE) => AXP. GET BLADE VERSION.  */N/* *///* X-1 CEG CLAIR GRANT 04-MAR-1993 */B/* VAX (BLADE) => AXP. GET BLADE VERSION FOR EPSILON. */N/* */N/*** */#define NSA$_FACILITY 1072#define NSA$_CMKRNL_1 70287363#define NSA$_CMKRNL_2 70287371#define NSA$_CMKRNL_3 70287379#define NSA$_CMKRNL_4 70287387#define NSA$_CMKRNL_5 70287395#define NSA$_CMKRNL_6 70287403N#define NSA$_CMKRNL_7 70287411 /* UNDOCUMENTED */#define NSA$_CMKRNL_8 70287419#define NSA$_CMKRNL_9 70287427N#define NSA$_CMKRNL_10 70287435 /* UNDOCUMENTED */N#define NSA$_CMKRNL_11 70287443 /* UNDOCUMENTED */#define NSA$_CMKRNL_12 70287451#define NSA$_CMKRNL_13 70287459N#define NSA$_CMKRNL_14 70287467 /* UND OCUMENTED */#define NSA$_CMKRNL_15 70287475N#define NSA$_CMKRNL_16 70287483 /* UNDOCUMENTED */#define NSA$_CMKRNL_17 70287491N#define NSA$_CMKRNL_18 70287499 /* UNDOCUMENTED */#define NSA$_CMKRNL_19 70287507N#define NSA$_CMKRNL_20 70287515 /* UNDOCUMENTED */N#define NSA$_CMKRNL_21 70287523 /* UNDOCUMENTED */#define NSA$_CMKRNL_22 70287531#define NSA$_CMKRNL_23 70287539#define NSA$_CMKRNL_24 70287547N#define NSA$_CMKRNL_25 70287555 /* UNDOCUMENTED */#define NSA$_CMKRNL_26 70287563@#define NSA$_CMKRNL_27 70287571 /* UNDOCUMENTED */#define NSA$_CMKRNL_28 70287579#define NSA$_CMKRNL_29 70287587#define NSA$_CMKRNL_30 70287595#define NSA$_CMKRNL_31 70287603#define NSA$_CMKRNL_32 70287611#define NSA$_CMKRNL_33 70287619#define NSA$_CMKRNL_34 70287627#define NSA$_CMKRNL_35 70287635#define NSA$_CMKRNL_36 70287643N/* */N/* START OF A SET OF AUDITS ISSUED ONLY ON IPF */N/* */#define NSA$_CMKRNL_37 70287651N/* */N/* END OF A SET OF AUDITS ISSUED ONLY ON IPF */N/*  */#define NSA$_CMEXEC_1 70287763#define NSA$_CMEXEC_2 70287771#define NSA$_SYSNAM_1 70287843#define NSA$_SYSNAM_2 70287851#define NSA$_SYSNAM_3 70287859#define NSA$_SYSNAM_4 70287867#define NSA$_SYSNAM_5 70287875#define NSA$_SYSNAM_6 70287883#define NSA$_SYSNAM_7 70287891#define NSA$_SYSNAM_8 70287899#define NSA$_SYSNAM_9 70287907#define NSA$_SYSNAM_10 70287915#define NSA$_SYSNAM_11 70287923#define NSA$_SYSNAM_12 70287931#define NSA$_SYSNAM_13 70287939#define NSA$_GRPNAM_1 70288083#define NSA$_GRPNAM_2 70288091#define NSA$_GRPNAM_3 70288099 #define NSA$_ALLSPOOL_1 70288163#define NSA$_DETACH_1 70288243#define NSA$_DETACH_2 70288251#define NSA$_DETACH_3 70288259#define NSA$_DETACH_4 70288267#define NSA$_DETACH_5 70288275#define NSA$_DETACH_6 70288283#define NSA$_DETACH_7 70288291##define NSA$_IMPERSONATE_1 70288243##define NSA$_IMPERSONATE_2 70288251##define NSA$_IMPERSONATE_3 70288259##define NSA$_IMP ERSONATE_4 70288267##define NSA$_IMPERSONATE_5 70288275##define NSA$_IMPERSONATE_6 70288283##define NSA$_IMPERSONATE_7 70288291##define NSA$_IMPERSONATE_8 70288299##define NSA$_IMPERSONATE_9 70288307$#define NSA$_IMPERSONATE_10 70288315P/* THE ABOVE LIST IS FULL. USE THE OVERFLOW REGION AT THE END OF THE MODULE. */ #define NSA$_DIAGNOSE_1 70288323 #define NSA$_DIAGNOSE_2 70288331 #define NSA$_DIAGNOSE_3 70288339N#define NSA$_DIAGNOSE_4 70288347 /* UNDOCUMENTED  */ #define NSA$_DIAGNOSE_5 70288355 #define NSA$_DIAGNOSE_6 70288363 #define NSA$_DIAGNOSE_7 70288371 #define NSA$_DIAGNOSE_8 70288379#define NSA$_LOG_IO_1 70288403#define NSA$_LOG_IO_2 70288411#define NSA$_LOG_IO_3 70288419#define NSA$_LOG_IO_4 70288427N#define NSA$_LOG_IO_5 70288435 /* UNDOCUMENTED */#define NSA$_LOG_IO_6 70288443#define NSA$_LOG_IO_7 70288451#define NSA$_GROUP_1 70288483#define NSA$_GROUP_2 70288491#define NSA$_GROUP_3 70288499#define NSA$_GROUP_4 70288507#define NSA$_GROUP_5 70288515#define NSA$_GROUP_6 70288523#define NSA$_GROUP_7 70288531#define NSA$_GROUP_8 70288539#define NSA$_GROUP_9 70288547#define NSA$_GROUP_10 70288555#define NSA$_ACNT_1 70288643#define NSA$_ACNT_2 70288651#define NSA$_PRMCEB_1 70288723#define NSA$_PRMCEB_2 70288731#define NSA$_PRMMBX_1 70288803#define NSA$_PRMMBX_2 70288811#define NSA$_PRMMBX_3 70288819#define NSA$_PSWAPM_1 70288883#define NSA$_PSWAPM_2 70288891#define NSA$_PSWAPM_3 70288899#define NSA$_PSWAPM_4 70288907#define NSA$_ALTPRI_1 70288963#define NSA$_ALTPRI_2 70288971#define NSA$_ALTPRI_3 70288979#define NSA$_ALTPRI_4 70288987#define NSA$_ALTPRI_5 70288995#define NSA$_ALTPRI_6 70289003#define NSA$_ALTPRI_7 70289011#define NSA$_IMPORT_1 70289043#define NSA$_TMPMBX_1 70289123#define NSA$_TMPMBX_2 70289131#define NSA$_WORLD_1 70289203#define NSA$_WORLD_2 70289211#define NSA$_WORLD_3 70289219#define NSA$_WORLD_4 70289227#define NSA$_WORLD_5 70289235#define NSA$_WORLD_6 70289243#define NSA$_MOUNT_1 70289283#define NSA$_OPER_1 70289363#define NSA$_OPER_2 70289371#define NSA$_OPER_3 70289379#define NSA$_OPER_4 70289387#define NSA$_OPER_5 70289395#define NSA$_OPER_6 70289403#define NSA$_OPER_7 70289411#define NSA$_OPER_8 70289419#define NSA$_OPER_9 70289427#define NSA$_OPER_10 70289435#define NSA$_OPER_11 70289443#define NSA$_OPER_12 70289451#define NSA$_OPER_13 70289459 N#define NSA$_OPER_14 70289467 /* UNDOCUMENTED */N#define NSA$_OPER_15 70289475 /* UNDOCUMENTED */#define NSA$_OPER_16 70289483N#define NSA$_OPER_17 70289491 /* UNDOCUMENTED */N#define NSA$_OPER_18 70289499 /* UNDOCUMENTED */#define NSA$_OPER_19 70289507#define NSA$_OPER_20 70289515#define NSA$_OPER_21 70289523#define NSA$_OPER_22 70289531#define NSA$_OPER_23 70289539N#define NSA$_OPER_24 70289547 /* UNDOCUMENTED */#define NSA$_OPER_25 70289555#define NSA$_OPER_26 70289563#define NSA$_OPER_27 70289571#define NSA$_OPER_28 70289579#define NSA$_OPER_29 70289587#define NSA$_OPER_30 70289595#define NSA$_OPER_31 70289603#define NSA$_OPER_32 70289611#define NSA$_OPER_33 70289619#define NSA$_OPER_34 70289627N#define NSA$_OPER_35 70289635 /* UNDOCUMENTED */#define NSA$_OPER_36 70289643#define NSA$_OPER_37 70289651#define NSA$_OPER_38 70289659#define NSA$_OPER_39 70289667#define NSA$_OPER_40 70289675#define NSA$_OPER_41 70289683#define NSA$_OPER_42 70289691#define NSA$_OPER_43 70289699#define NSA$_OPER_44 70289707#define NSA$_OPER_45 70289715#define NSA$_OPER_46 70289723#define NSA$_OPER_47 70289731#define NSA$_OPER_48 70289739#define NSA$_OPER_49 70289747#define NSA$_OPER_50 70289755#define NSA$_OPER_51 70289763#define NSA$_OPER_52 70289771#define NSA$_OPER_53 70289779#define NSA$_OPER_54 70289787#define NSA$_OPER_55 70289795N#define NSA$_OPER_56 70289803 /* UNDOCUMENTED */#define NSA$_OPER_57 70289811#define NSA$_OPER_58 70289819#define NSA$_OPER_59 70289827#define NSA$_OPER_60 70289835#define NSA$_OPER_61 70289843#define NSA$_OPER_62 70289851#define NSA$_OPER_63 70289859#define NSA$_OPER_64 70289867#define NSA$_OPER_65 70289875#define NSA$_OPER_66 70289883#define NSA$_OPER_67 70289891#define NSA$_OPER_68 70289899#define NSA$_OPER_69 70289907N#define NSA$_OPER_70 70289915 /* UNDOCUMENTED */#define NSA$_OPER_71 70289923#define NSA$_OPER_72 70289931#define NSA$_OPER_73 70289939#define NSA$_OPER_74 70289947#define NSA$_OPER_75 70289955#define NSA$_OPER_76 70289963#define NSA$_OPER_77 70289971#define NSA$_OPER_78 70289979#define NSA$_OPER_79 70289987#define NSA$_OPER_80 70289995 #define NSA$_OPER_81 70290003N/* */N/* START OF A SET OF AUDITS ISSUED ONLY ON ALPHA */N/* */#define NSA$_OPER_82 70290011#define NSA$_OPER_83 70290019#define NSA$_OPER_84 70290027#define NSA$_OPER_85 70290035#define NSA$_OPER_86 70290043#define NSA$_OPER_87 70290051#define NSA$_OPER_88 70290059#define NS A$_OPER_89 70290067#define NSA$_OPER_90 70290075#define NSA$_OPER_91 70290083#define NSA$_OPER_92 70290091#define NSA$_OPER_93 70290099#define NSA$_OPER_94 70290107N/* */N/* END OF A SET OF AUDITS ISSUED ONLY ON ALPHA */N/* */#define NSA$_EXQUOTA_1 70290323N/*  */N/* START OF A SET OF AUDITS ISSUED ONLY ON ALPHA */N/* */#define NSA$_EXQUOTA_2 70290331#define NSA$_EXQUOTA_3 70290339N/* */N/* END OF A SET OF AUDITS ISSUED ONLY ON ALPHA */N/* */#define NSA$_NETMBX_1 70290403#define NSA$_NETMBX_2 70290411#define NSA$_NETMBX_3 70290419#define NSA$_VOLPRO_1 70290483#define NSA$_VOLPRO_2 70290491N#define NSA$_VOLPRO_3 70290499 /* UNDOCUMENTED */#define NSA$_VOLPRO_4 70290507#define NSA$_VOLPRO_5 70290515#define NSA$_VOLPRO_6 70290523#define NSA$_VOLPRO_7 70290531#define NSA$_VOLPRO_8 70290539#define NSA$_VOLPRO_9 70290547#define NSA$_VOLPRO_10 70290555#define NSA$_VOLPRO_11 70290563#define NSA$_VOLPRO_12 70290571#define NSA$_VOLPRO_13 70290579#define NSA$_VOLPRO_14 70290587#define NSA$_VOLPRO_15 70290595#define NSA$_PHY_IO_1 70290643#define NSA$_PHY_IO_2 70290651#define NSA$_PHY_IO_3 70290659#define NSA$_PHY_IO_4 70290667#define NSA$_PHY_IO_5 70290675#define NSA$_PHY_IO_6 70290683#define NSA$_PHY_IO_7 70290691#define NSA$_PHY_IO_8 70290699#define NSA$_PHY_IO_9 70290707#define NSA$_PHY_IO_10 70290715#define NSA$_PHY_IO_11 70290723#define NSA$_PHY_IO_12 70290731N#define NSA$_PHY_IO_13 70290739 /* UNDOCUMENTED */#define NSA$_PHY_IO_14 70290747#define NSA$_PHY_IO_15 70290755#define NSA$_BUGCHK_1 70290883#define NSA$_BUGCHK_2 70290891#define NSA$_PRMGBL_1 70290963#define NSA$_PRMGBL_2 70290971#define NSA$_SYSGBL_1 70291043#define NSA$_SYSGBL_2 70291051#define NSA$_PFNMAP_1 70291123#define NSA$_PFNMAP_2 70291131#define NSA$_PFNMAP_3 70291139#define NSA$_SHMEM_1 70291203#define NSA$_SHMEM_2 70291211#define NSA$_SHMEM_3 70291219#define NSA$_SHMEM_4 70291227#define NSA$_SHMEM_5 70291235#define NSA$_SYSPRV_1 70291283#define NSA$_SYSPRV_2 70291291#define NSA$_SYSPRV_3 70291299#define NSA$_SYSPRV_4 70291307#define NSA$_SYSPRV_5 70291315N#define NSA$_SYSPRV_6 70291323 /* UNDOCUMENTED */#define NSA$_SYSPRV_7 70291331#define NSA$_SYSPRV_8 70291339#define NSA$_SYSPRV_9 70291347#define NSA$_SYSPRV_10 70291355#define NSA$_SYSPRV_11 70291363#defin e NSA$_SYSPRV_12 70291371#define NSA$_SYSPRV_13 70291379N#define NSA$_SYSPRV_14 70291387 /* RESERVED */#define NSA$_SYSPRV_15 70291395#define NSA$_SYSPRV_16 70291403#define NSA$_SYSPRV_17 70291411#define NSA$_SYSPRV_18 70291419#define NSA$_SYSPRV_19 70291427#define NSA$_SYSPRV_20 70291435#define NSA$_SYSPRV_21 70291443#define NSA$_SYSPRV_22 70291451#define NSA$_SYSPRV_23 70291459#define NSA$_SYSPRV_24 70291467#define NSA$_SYSPRV_25 7 0291475#define NSA$_SYSPRV_26 70291483#define NSA$_SYSPRV_27 70291491#define NSA$_SYSPRV_28 70291499#define NSA$_SYSPRV_29 70291507#define NSA$_SYSPRV_30 70291515#define NSA$_SYSPRV_31 70291523#define NSA$_SYSPRV_32 70291531#define NSA$_SYSPRV_33 70291539#define NSA$_SYSPRV_34 70291547#define NSA$_SYSPRV_35 70291555#define NSA$_SYSPRV_36 70291563#define NSA$_SYSPRV_37 70291571#define NSA$_SYSPRV_38 70291579#define NSA$_SYSPRV_39 70291587x#define NSA$_SYSPRV_ 40 70291595 /* THE ABOVE LIST IS FULL. USE THE OVERFLOW REGION AT THE END OF THE MODULE. */#define NSA$_BYPASS_1 70291603#define NSA$_BYPASS_2 70291611#define NSA$_BYPASS_3 70291619#define NSA$_BYPASS_4 70291627#define NSA$_BYPASS_5 70291635#define NSA$_BYPASS_6 70291643#define NSA$_BYPASS_7 70291651#define NSA$_BYPASS_8 70291659#define NSA$_BYPASS_9 70291667#define NSA$_BYPASS_10 70291675#define NSA$_BYPASS_11 70291683#define NSA$_BYPASS_12 70291691#define NSA$_B YPASS_13 70291699#define NSA$_BYPASS_14 70291707N#define NSA$_BYPASS_15 70291715 /* RESERVED */N#define NSA$_BYPASS_16 70291723 /* RESERVED */#define NSA$_BYPASS_17 70291731#define NSA$_BYPASS_18 70291739#define NSA$_BYPASS_19 70291747#define NSA$_BYPASS_20 70291755#define NSA$_BYPASS_21 70291763#define NSA$_BYPASS_22 70291771#define NSA$_BYPASS_23 70291779#define NSA$_BYPASS_24 70291787#define NSA$_BYPASS_ 25 70291795#define NSA$_BYPASS_26 70291803#define NSA$_BYPASS_27 70291811#define NSA$_BYPASS_28 70291819#define NSA$_BYPASS_29 70291827#define NSA$_BYPASS_30 70291835#define NSA$_SYSLCK_1 70291923#define NSA$_SYSLCK_2 70291931#define NSA$_SHARE_1 70292003#define NSA$_GRPPRV_1 70292083#define NSA$_GRPPRV_2 70292091#define NSA$_GRPPRV_3 70292099N#define NSA$_GRPPRV_4 70292107 /* RESERVED */#define NSA$_GRPPRV_5 70292115#define NSA$_GRPPRV_6 70292123#define NSA$_GRPPRV_7 70292131#define NSA$_GRPPRV_8 70292139#define NSA$_GRPPRV_9 70292147#define NSA$_GRPPRV_10 70292155#define NSA$_GRPPRV_11 70292163#define NSA$_GRPPRV_12 70292171#define NSA$_GRPPRV_13 70292179#define NSA$_GRPPRV_14 70292187#define NSA$_GRPPRV_15 70292195#define NSA$_GRPPRV_16 70292203#define NSA$_GRPPRV_17 70292211#define NSA$_GRPPRV_18 70292219#define NSA$_READALL_1 70292243#define NSA$_READALL_2 70292251N#define NSA$_READALL_3 70292259 /* RESERVED */ #define NSA$_SECURITY_1 70292483 #define NSA$_SECURITY_2 70292491 #define NSA$_SECURITY_3 70292499 #define NSA$_SECURITY_4 70292507 #define NSA$_SECURITY_5 70292515 #define NSA$_SECURITY_6 70292523 #define NSA$_SECURITY_7 70292531 #define NSA$_SECURITY_8 70292539 #define NSA$_SECURITY_9 70292547!#define NSA$_SECURITY_10 70292555!#define NSA$_SECURITY_11 70292563!#define NSA$_SECURITY_12 70292571!#define NSA$_SECURITY_13 70292579 !#define NSA$_SECURITY_14 70292587!#define NSA$_SECURITY_15 70292595!#define NSA$_SECURITY_16 70292603!#define NSA$_SECURITY_17 70292611!#define NSA$_SECURITY_18 70292619!#define NSA$_SECURITY_19 70292627!#define NSA$_SECURITY_20 70292635!#define NSA$_SECURITY_21 70292643!#define NSA$_SECURITY_22 70292651!#define NSA$_SECURITY_23 70292659!#define NSA$_SECURITY_24 70292667!#define NSA$_SECURITY_25 70292675N/*  */N/* START OF A SET OF AUDITS ISSUED ONLY ON ALPHA */N/* */!#define NSA$_SECURITY_26 70292683!#define NSA$_SECURITY_27 70292691!#define NSA$_SECURITY_28 70292699!#define NSA$_SECURITY_29 70292707!#define NSA$_SECURITY_30 70292715N/* THE ABOVE LIST IS FULL. CONTINUES AT BASE 3180 */N/* */ N/* END OF A SET OF AUDITS ISSUED ONLY ON ALPHA */N/* */#define NSA$_UPGRADE_1 70292723N#define NSA$_UPGRADE_2 70292731 /* RESERVED */!#define NSA$_DOWNGRADE_1 70292803N#define NSA$_DOWNGRADE_2 70292811 /* RESERVED */N#define NSA$_SETPRV_1 70292883 /* UNDOCUMENTED */#define NSA$_SETPRV_2 70292891#d efine NSA$_SETPRV_3 70292899#define NSA$_SETPRV_4 70292907#define NSA$_SETPRV_5 70292915#define NSA$_SETPRV_6 70292923#define NSA$_AUDIT_1 70292963#define NSA$_AUDIT_2 70292971#define NSA$_AUDIT_3 70292979N/* */Q/* THE RANGE FROM 1900 TO 2000 IS USED FOR IMPLIED SYSPRV FROM UIC GROUP BEING */N/* LESS THAN OR EQUAL TO MAXSYSGRP. */N/*  */"#define NSA$_IMP_SYSPRV_1 70302563"#define NSA$_IMP_SYSPRV_2 70302571"#define NSA$_IMP_SYSPRV_3 70302579"#define NSA$_IMP_SYSPRV_4 70302587"#define NSA$_IMP_SYSPRV_5 70302595"#define NSA$_IMP_SYSPRV_6 70302603"#define NSA$_IMP_SYSPRV_7 70302611"#define NSA$_IMP_SYSPRV_8 70302619"#define NSA$_IMP_SYSPRV_9 70302627##define NSA$_IMP_SYSPRV_10 70302635##define NSA$_IMP_SYSPRV_11 70302643##define NSA$_IMP_SYSPRV_12 70302651##define NSA$_IMP_SYSPRV_13 7 0302659##define NSA$_IMP_SYSPRV_14 70302667##define NSA$_IMP_SYSPRV_15 70302675##define NSA$_IMP_SYSPRV_16 70302683N#define NSA$_IMP_SYSPRV_17 70302691 /* */N/* THE RANGE FROM 2000-2047 IS RESERVED FOR EVENTS WHICH ARE GOVERNED BY */O/* MULTIPLE PRIVILEGES. THIS KIND OF THING IS SERIOUSLY FROWNED UPON AND SO */N/* WE'LL ONLY RESERVE A MEASLY 48 MESSAGES CODES FOR THEM. */N/*  */#define NSA$_COMB_1 70303363#define NSA$_COMB_2 70303371#define NSA$_COMB_3 70303379N#define NSA$_COMB_4 70303387 /* UNDOCUMENTED */#define NSA$_COMB_5 70303395#define NSA$_COMB_6 70303403#define NSA$_COMB_7 70303411#define NSA$_COMB_8 70303419#define NSA$_COMB_9 70303427#define NSA$_COMB_10 70303435#define NSA$_COMB_11 70303443#define NSA$_COMB_12 70303451#define NSA$_COMB_13 70303459#define NSA$_COMB_14 70303467#defin e NSA$_COMB_15 70303475#define NSA$_COMB_16 70303483#define NSA$_COMB_17 70303491#define NSA$_COMB_18 70303499N/* */N/* START OF A SET OF AUDITS ISSUED ONLY ON ALPHA */N/* */#define NSA$_COMB_19 70303507N/* */N/* END OF A SET OF AUDITS ISSUED ONLY ON ALPHA */N/* */#define NSA$_COMB_20 70303515N/* */S/* THE RANGE OF MESSAGE CODES FROM 2048-4095 ARE RESERVED TO PORTIONS OF THE TCB */N/* WHICH NEED TO ASSOCIATE ONE LINE OF TEXT WITH THEIR AUDIT MESSAGE. */N/* */N/*  */N/* FILE AND VOLUME AUDIT MESSAGES (F11BXQP). */N/* */#define NSA$_XQP_1 70303747#define NSA$_XQP_2 70303755#define NSA$_XQP_3 70303763#define NSA$_XQP_4 70303771#define NSA$_XQP_5 70303779#define NSA$_XQP_6 70303787#define NSA$_XQP_7 70303795#define NSA$_XQP_8 70303803#define NSA$_XQP_9 70303811#define NSA$_XQP_10 70303819#define NSA$_XQP_11 70303827#define NSA$_XQP_12 70303835#define NSA$_XQP_13 70303843#define NSA$_XQP_14 70303851#define NSA$_XQP_15 70303859#define NSA$_XQP_16 70303867#define NSA$_XQP_17 70303875#define NSA$_XQP_18 70303883#define NSA$_XQP_19 70303891#define NSA$_XQP_20 70303899#define NSA$_XQP_21 70303907#define NSA$_XQP_22 70303915#define NSA$_XQP_23 70303923N/* */N/* MESSAGE TO DIFFEREN TIATE VARIOUS TCB OPERATIONS. */N/* */#define NSA$_ALLOCATE 70311939#define NSA$_ASSIGN 70311947!#define NSA$_SETSECURITY 70311955!#define NSA$_SHOSECURITY 70311963#define NSA$_GSDACCESS 70311971#define NSA$_KFEACCESS 70311979!#define NSA$_MACBYPASSED 70311987N/* */N/* PRIVILEGE AUDIT OVERFLOW.  */N/* */#define NSA$_SYSPRV_41 70312163#define NSA$_SYSPRV_42 70312171#define NSA$_SYSPRV_43 70312179#define NSA$_SYSPRV_44 70312187#define NSA$_SYSPRV_45 70312195#define NSA$_SYSPRV_46 70312203#define NSA$_SYSPRV_47 70312211#define NSA$_SYSPRV_48 70312219#define NSA$_SYSPRV_49 70312227#define NSA$_SYSPRV_50 70312235#define NSA$_SYSPRV_51 70312243#define NSA$_SYSPRV_52  70312251N/* */N/* IMPERSONATION AUDIT OVERFLOW */N/* */$#define NSA$_IMPERSONATE_11 70312483$#define NSA$_IMPERSONATE_12 70312491N/* */N/* SECURITY AUDIT OVERFLOW */N/*  */N/* */N/* START OF A SET OF AUDITS ISSUED ONLY ON ALPHA */N/* */!#define NSA$_SECURITY_31 70312803!#define NSA$_SECURITY_32 70312811!#define NSA$_SECURITY_33 70312819!#define NSA$_SECURITY_34 70312827!#define NSA$_SECURITY_35 70312835!#define NSA$_SECURITY_36  70312843!#define NSA$_SECURITY_37 70312851!#define NSA$_SECURITY_38 70312859!#define NSA$_SECURITY_39 70312867N/* */N/* END OF A SET OF AUDITS ISSUED ONLY ON ALPHA */N/* */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_p ointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __NSAMSGDEF_LOADED */ wwKT+/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//******************* !*************************************************************************************************************//*** MODULE $NSARECDEF ***/#ifndef __NSARECDEF_LOADED#define __NSARECDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined requir"ed 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#defin #e __union variant_union#endif#endif N/*+ */N/* Security Auditing record definitions */N/*- */N#define NSA$C_REC_MAXLENGTH 1024 /* Maximum record size */N#define NSA$K_REC_MAXLENGTH 1024 /* Maximum record size */N#define NSA$S_REC_MAXLENGTH 1024 /* Maximum record si$ze */N/*+ */N/* Audit record type definitions */N/*- */N#define NSA$K_RECTYP_FIL 1 /* File access */N#define NSA$K_RECTYP_SYSUAF 2 /* System UAF */N#define NSA$K_RECTYP_NETUAF 3 /* Network UAF */N#defin%e NSA$K_RECTYP_LOGB 4 /* Login breakin detection */N#define NSA$K_RECTYP_LOGI 5 /* Successful login */N#define NSA$K_RECTYP_LOGF 6 /* Login failure */N#define NSA$K_RECTYP_LOGO 7 /* Logout */N#define NSA$K_RECTYP_VOL 8 /* Volume operations */N#define NSA$K_RECTYP_GBL 9 /* Global section access */N#define NSA$K_RECTYP_INSTAL 10 & /* INSTALL operations */N#define NSA$K_RECTYP_RIGHTS 11 /* Rights database operations */N#define NSA$K_RECTYP_AUDIT 12 /* SET AUDIT operations */#define NSA$K_RECTYPNUM 12N/*+ */N/* Audit record subtype and ID definitions */N/*- */N/* File access ' */N#define NSA$K_RECTYP_FIL_SUCC 1 /* Successful file access */N#define NSA$K_RECTYP_FIL_FAIL 2 /* File access failure */#define NSA$K_RECTYPNUM_FIL 2"#define NSA$K_RECID_FIL_SUCC 65537##define NSA$K_RECID_FIL_FAIL 131073N/* Global section access */N#define NSA$K_RECTYP_GBL_SUCC 1 /* Successful Global section access */N#define NSA$K_RECTYP_GBL_FAIL (2 /* Global section access failure */#define NSA$K_RECTYPNUM_GBL 2"#define NSA$K_RECID_GBL_SUCC 65545##define NSA$K_RECID_GBL_FAIL 131081N/* System UAF */N#define NSA$K_RECTYP_SYSUAF_ADD 1 /* System UAF record addition */N#define NSA$K_RECTYP_SYSUAF_DEL 2 /* System UAF record deletion */N#define NSA$K_RECTYP_SYSUAF_MOD 3 /* System UAF record modification */N#define NSA$K_RECTYP_SYSUAF_CO )P 4 /* System UAF record copied */N#define NSA$K_RECTYP_SYSUAF_REN 5 /* System UAF record renamed */ #define NSA$K_RECTYPNUM_SYSUAF 5$#define NSA$K_RECID_SYSUAF_ADD 65538%#define NSA$K_RECID_SYSUAF_DEL 131074%#define NSA$K_RECID_SYSUAF_MOD 196610%#define NSA$K_RECID_SYSUAF_COP 262146%#define NSA$K_RECID_SYSUAF_REN 327682N/* Network UAF */N#define NSA$K_RECTYP_NETUAF_ADD 1 /* Network UAF record ad *dition */N#define NSA$K_RECTYP_NETUAF_DEL 2 /* Network UAF record deletion */N#define NSA$K_RECTYP_NETUAF_MOD 3 /* Network UAF record modification */ #define NSA$K_RECTYPNUM_NETUAF 3$#define NSA$K_RECID_NETUAF_ADD 65539%#define NSA$K_RECID_NETUAF_DEL 131075%#define NSA$K_RECID_NETUAF_MOD 196611N/* Login breakin detection */R#define NSA$K_RECTYP_LOGB_DIA 1 /* Dialup interactive breakin detection */Q#define NSA$K_ +RECTYP_LOGB_LOC 2 /* Local interactive breakin detection */R#define NSA$K_RECTYP_LOGB_REM 3 /* Remote interactive breakin detection */N#define NSA$K_RECTYP_LOGB_NET 4 /* Network breakin detection */P#define NSA$K_RECTYP_LOGB_DET 5 /* Detached process breakin detection */#define NSA$K_RECTYPNUM_LOGB 5"#define NSA$K_RECID_LOGB_DIA 65540##define NSA$K_RECID_LOGB_LOC 131076##define NSA$K_RECID_LOGB_REM 196612##define NSA$K_RECID_LOGB_NET 262148##define ,NSA$K_RECID_LOGB_DET 327684N/* Successful login */N#define NSA$K_RECTYP_LOGI_BAT 1 /* Batch process login */N#define NSA$K_RECTYP_LOGI_DIA 2 /* Dialup interactive login */N#define NSA$K_RECTYP_LOGI_LOC 3 /* Local interactive login */N#define NSA$K_RECTYP_LOGI_REM 4 /* Remote interactive login */N#define NSA$K_RECTYP_LOGI_NET 5 /* Network login -*/N#define NSA$K_RECTYP_LOGI_SUB 6 /* Subprocess login */N#define NSA$K_RECTYP_LOGI_DET 7 /* Detached process login */#define NSA$K_RECTYPNUM_LOGI 7"#define NSA$K_RECID_LOGI_BAT 65541##define NSA$K_RECID_LOGI_DIA 131077##define NSA$K_RECID_LOGI_LOC 196613##define NSA$K_RECID_LOGI_REM 262149##define NSA$K_RECID_LOGI_NET 327685##define NSA$K_RECID_LOGI_SUB 393221##define NSA$K_RECID_LOGI_DET 458757N/* Login failure . */N#define NSA$K_RECTYP_LOGF_BAT 1 /* Batch process login failure */N#define NSA$K_RECTYP_LOGF_DIA 2 /* Dialup interactive login failure */N#define NSA$K_RECTYP_LOGF_LOC 3 /* Local interactive login failure */N#define NSA$K_RECTYP_LOGF_REM 4 /* Remote interactive login failure */N#define NSA$K_RECTYP_LOGF_NET 5 /* Network login failure */N#define NSA$K_RECTYP_LOGF_SUB 6 /* Subprocess login failure / */N#define NSA$K_RECTYP_LOGF_DET 7 /* Detached process login failure */#define NSA$K_RECTYPNUM_LOGF 7"#define NSA$K_RECID_LOGF_BAT 65542##define NSA$K_RECID_LOGF_DIA 131078##define NSA$K_RECID_LOGF_LOC 196614##define NSA$K_RECID_LOGF_REM 262150##define NSA$K_RECID_LOGF_NET 327686##define NSA$K_RECID_LOGF_SUB 393222##define NSA$K_RECID_LOGF_DET 458758N/* Logout */N#define NSA$K_RECTYP_LOGO_BAT 1 /*0 Batch process logout */N#define NSA$K_RECTYP_LOGO_DIA 2 /* Dialup interactive logout */N#define NSA$K_RECTYP_LOGO_LOC 3 /* Local interactive logout */N#define NSA$K_RECTYP_LOGO_REM 4 /* Remote interactive logout */N#define NSA$K_RECTYP_LOGO_NET 5 /* Network logout */N#define NSA$K_RECTYP_LOGO_SUB 6 /* Subprocess logout */N#define NSA$K_RECTYP_LOGO_DET 7 /* Detached process logout 1 */#define NSA$K_RECTYPNUM_LOGO 7"#define NSA$K_RECID_LOGO_BAT 65543##define NSA$K_RECID_LOGO_DIA 131079##define NSA$K_RECID_LOGO_LOC 196615##define NSA$K_RECID_LOGO_REM 262151##define NSA$K_RECID_LOGO_NET 327687##define NSA$K_RECID_LOGO_SUB 393223##define NSA$K_RECID_LOGO_DET 458759N/* Volume operations */N#define NSA$K_RECTYP_VOL_MOU 1 /* Volume mounts */N#define NSA$K_RECTYP_VOL_DMOU 2 2 /* Volume dismounts */#define NSA$K_RECTYPNUM_VOL 2!#define NSA$K_RECID_VOL_MOU 65544##define NSA$K_RECID_VOL_DMOU 131080N/* INSTALL operations */N#define NSA$K_RECTYP_INSTAL_ADD 1 /* Add known file */N#define NSA$K_RECTYP_INSTAL_REM 2 /* Remove known file */ #define NSA$K_RECTYPNUM_INSTAL 2N/* Rights database operations */N#def3ine NSA$K_RECTYP_RIGHTS_CRE 1 /* Create rights database */N#define NSA$K_RECTYP_RIGHTS_ADD 2 /* Add identifier */N#define NSA$K_RECTYP_RIGHTS_REM 3 /* Remove identifier */N#define NSA$K_RECTYP_RIGHTS_MOD_ID 4 /* Modify identifier */N#define NSA$K_RECTYP_RIGHTS_MOD_HO 5 /* Modify identifier holder */N#define NSA$K_RECTYP_RIGHTS_GRANT 6 /* Grant identifier */N#define NSA$K_RECTYP_RIGHTS_RE4VOK 7 /* Revoke identifier */ #define NSA$K_RECTYPNUM_RIGHTS 7N/* SET AUDIT operations */N#define NSA$K_RECTYP_AUDIT_ENA_AL 1 /* Enable alarm */N#define NSA$K_RECTYP_AUDIT_DIS_AL 2 /* Disable alarm */N#define NSA$K_RECTYP_AUDIT_ENA_JL 3 /* Enable journal */N#define NSA$K_RECTYP_AUDIT_DIS_JL 4 /* Disable journal */#define NSA$K_RECTYPNU 5M_AUDIT 4N/*+ */N/* SYSUAFF stuff */N/*- */ #ifdef __NEW_STARLETtypedef struct _sysuaff_bits { __union {N unsigned __int64 nsa$q_sysuaff; /* SYSUAFF flags: */ __struct {N unsigned nsa$v_access : 1; /* ACCESS modified */6N unsigned nsa$v_account : 1; /* ACCOUNT modified */N unsigned nsa$v_astlm : 1; /* ASTLM modified */N unsigned nsa$v_batch : 1; /* BATCH modified */N unsigned nsa$v_biolm : 1; /* BIOLM modified */N unsigned nsa$v_bytlm : 1; /* BYTLM modified */N unsigned nsa$v_cli : 1; /* CLI modified */N unsigned nsa7$v_clitables : 1; /* CLITABLES modified */N unsigned nsa$v_cputime : 1; /* CPUTIME modified */N unsigned nsa$v_defprivileges : 1; /* DEFPRIVILEGES modified */N unsigned nsa$v_device : 1; /* DEVICE modified */N unsigned nsa$v_dialup : 1; /* DIALUP modified */N unsigned nsa$v_diolm : 1; /* DIOLM modified */N unsigned nsa$v_directory : 1; /* DIRE8CTORY modified */N unsigned nsa$v_enqlm : 1; /* ENQLM modified */N unsigned nsa$v_expiration : 1; /* EXPIRATION modified */N unsigned nsa$v_fillm : 1; /* FILLM modified */N unsigned nsa$v_flags : 1; /* FLAGS modified */N unsigned nsa$v_interactive : 1; /* INTERACTIVE modified */N unsigned nsa$v_jtquota : 1; /* JTQUOTA modified 9*/N unsigned nsa$v_lgicmd : 1; /* LGICMD modified */N unsigned nsa$v_local : 1; /* LOCAL modified */N unsigned nsa$v_maxdetach : 1; /* MAXDETACH modified */N unsigned nsa$v_maxjobs : 1; /* MAXJOBS modified */N unsigned nsa$v_maxacctjobs : 1; /* MAXACCTJOBS modified */N unsigned nsa$v_network : 1; /* NETWORK modified */N unsigned n:sa$v_owner : 1; /* OWNER modified */N unsigned nsa$v_password : 1; /* PASSWORD modified */N unsigned nsa$v_pbytlm : 1; /* PBYTLM modified */N unsigned nsa$v_pflags : 1; /* PFLAGS modified */N unsigned nsa$v_p_restrict : 1; /* P_RESTRICT modified */N unsigned nsa$v_pgflquota : 1; /* PGFLQUOTA modified */N unsigned nsa$v_prclm : 1; /* PRCL;M modified */N unsigned nsa$v_primedays : 1; /* PRIMEDAYS modified */N unsigned nsa$v_priority : 1; /* PRIORITY modified */N unsigned nsa$v_privileges : 1; /* PRIVILEGES modified */N unsigned nsa$v_pwdlifetime : 1; /* PWDLIFETIME modified */N unsigned nsa$v_pwdminimum : 1; /* PWDMINIMUM modified */N unsigned nsa$v_quepriority : 1; /* QUEPRIORITY modified < */N unsigned nsa$v_remote : 1; /* REMOTE modified */N unsigned nsa$v_sflags : 1; /* SFLAGS modified */N unsigned nsa$v_s_restrict : 1; /* S_RESTRICT modified */N unsigned nsa$v_shrfillm : 1; /* SHRFILLM modified */N unsigned nsa$v_tqelm : 1; /* TQELM modified */N unsigned nsa$v_uic : 1; /* UIC modified */N unsigned = nsa$v_wsdefault : 1; /* WSDEFAULT modified */N unsigned nsa$v_wsextent : 1; /* WSEXTENT modified */N unsigned nsa$v_wsquota : 1; /* WSQUOTA modified */ } nsa$r_fill_42_; } nsa$r_fill_41_; } SYSUAFF_BITS; #if !defined(__VAXC)2#define nsa$q_sysuaff nsa$r_fill_41_.nsa$q_sysuaff?#define nsa$v_access nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_accessA#define nsa$v_account nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_ac >count=#define nsa$v_astlm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_astlm=#define nsa$v_batch nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_batch=#define nsa$v_biolm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_biolm=#define nsa$v_bytlm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_bytlm9#define nsa$v_cli nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_cliE#define nsa$v_clitables nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_clitablesA#define nsa$v_cputime nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_cputimeM#define nsa$v_defprivileges nsa$r_fill_41_?.nsa$r_fill_42_.nsa$v_defprivileges?#define nsa$v_device nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_device?#define nsa$v_dialup nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_dialup=#define nsa$v_diolm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_diolmE#define nsa$v_directory nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_directory=#define nsa$v_enqlm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_enqlmG#define nsa$v_expiration nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_expiration=#define nsa$v_fillm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_fillm@=#define nsa$v_flags nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_flagsI#define nsa$v_interactive nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_interactiveA#define nsa$v_jtquota nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_jtquota?#define nsa$v_lgicmd nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_lgicmd=#define nsa$v_local nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_localE#define nsa$v_maxdetach nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_maxdetachA#define nsa$v_maxjobs nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_maxjobsI#define nsa$v_maxacctjobs Ansa$r_fill_41_.nsa$r_fill_42_.nsa$v_maxacctjobsA#define nsa$v_network nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_network=#define nsa$v_owner nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_ownerC#define nsa$v_password nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_password?#define nsa$v_pbytlm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_pbytlm?#define nsa$v_pflags nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_pflagsG#define nsa$v_p_restrict nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_p_restrictE#define nsa$v_pgflquota nsa$r_fill_41_.nsa$r_filBl_42_.nsa$v_pgflquota=#define nsa$v_prclm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_prclmE#define nsa$v_primedays nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_primedaysC#define nsa$v_priority nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_priorityG#define nsa$v_privileges nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_privilegesI#define nsa$v_pwdlifetime nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_pwdlifetimeG#define nsa$v_pwdminimum nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_pwdminimumI#define nsa$v_quepriority nsa$r_fill_41_.nsa$r_fill_ C42_.nsa$v_quepriority?#define nsa$v_remote nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_remote?#define nsa$v_sflags nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_sflagsG#define nsa$v_s_restrict nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_s_restrictC#define nsa$v_shrfillm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_shrfillm=#define nsa$v_tqelm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_tqelm9#define nsa$v_uic nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_uicE#define nsa$v_wsdefault nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_wsdefaultC#define ns Da$v_wsextent nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_wsextentA#define nsa$v_wsquota nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_wsquota"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct sysuaff_bits { __union {N unsigned int nsa$q_sysuaff [2]; /* SYSUAFF flags: */ __struct {N unsigned nsa$v_access : 1; /* ACCESS modified */N unsigned nsa$v_account : 1; /* ACCOUNT modified */N E unsigned nsa$v_astlm : 1; /* ASTLM modified */N unsigned nsa$v_batch : 1; /* BATCH modified */N unsigned nsa$v_biolm : 1; /* BIOLM modified */N unsigned nsa$v_bytlm : 1; /* BYTLM modified */N unsigned nsa$v_cli : 1; /* CLI modified */N unsigned nsa$v_clitables : 1; /* CLITABLES modified */N unsigned nsa$v_cpuFtime : 1; /* CPUTIME modified */N unsigned nsa$v_defprivileges : 1; /* DEFPRIVILEGES modified */N unsigned nsa$v_device : 1; /* DEVICE modified */N unsigned nsa$v_dialup : 1; /* DIALUP modified */N unsigned nsa$v_diolm : 1; /* DIOLM modified */N unsigned nsa$v_directory : 1; /* DIRECTORY modified */N unsigned nsa$v_enqlm : 1; /* ENQLM modifiGed */N unsigned nsa$v_expiration : 1; /* EXPIRATION modified */N unsigned nsa$v_fillm : 1; /* FILLM modified */N unsigned nsa$v_flags : 1; /* FLAGS modified */N unsigned nsa$v_interactive : 1; /* INTERACTIVE modified */N unsigned nsa$v_jtquota : 1; /* JTQUOTA modified */N unsigned nsa$v_lgicmd : 1; /* LGICMD modified */N H unsigned nsa$v_local : 1; /* LOCAL modified */N unsigned nsa$v_maxdetach : 1; /* MAXDETACH modified */N unsigned nsa$v_maxjobs : 1; /* MAXJOBS modified */N unsigned nsa$v_maxacctjobs : 1; /* MAXACCTJOBS modified */N unsigned nsa$v_network : 1; /* NETWORK modified */N unsigned nsa$v_owner : 1; /* OWNER modified */N unsigned nsa$v_pIassword : 1; /* PASSWORD modified */N unsigned nsa$v_pbytlm : 1; /* PBYTLM modified */N unsigned nsa$v_pflags : 1; /* PFLAGS modified */N unsigned nsa$v_p_restrict : 1; /* P_RESTRICT modified */N unsigned nsa$v_pgflquota : 1; /* PGFLQUOTA modified */N unsigned nsa$v_prclm : 1; /* PRCLM modified */N unsigned nsa$v_primedays : 1; /* PRIMEDAYJS modified */N unsigned nsa$v_priority : 1; /* PRIORITY modified */N unsigned nsa$v_privileges : 1; /* PRIVILEGES modified */N unsigned nsa$v_pwdlifetime : 1; /* PWDLIFETIME modified */N unsigned nsa$v_pwdminimum : 1; /* PWDMINIMUM modified */N unsigned nsa$v_quepriority : 1; /* QUEPRIORITY modified */N unsigned nsa$v_remote : 1; /* REMOTE modified */NK unsigned nsa$v_sflags : 1; /* SFLAGS modified */N unsigned nsa$v_s_restrict : 1; /* S_RESTRICT modified */N unsigned nsa$v_shrfillm : 1; /* SHRFILLM modified */N unsigned nsa$v_tqelm : 1; /* TQELM modified */N unsigned nsa$v_uic : 1; /* UIC modified */N unsigned nsa$v_wsdefault : 1; /* WSDEFAULT modified */N unsigned nsa$v L_wsextent : 1; /* WSEXTENT modified */N unsigned nsa$v_wsquota : 1; /* WSQUOTA modified */ } nsa$r_fill_42_; } nsa$r_fill_41_; } ; #if !defined(__VAXC)2#define nsa$q_sysuaff nsa$r_fill_41_.nsa$q_sysuaff?#define nsa$v_access nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_accessA#define nsa$v_account nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_account=#define nsa$v_astlm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_astlm=#define nsa$v_batch nsa$r_Mfill_41_.nsa$r_fill_42_.nsa$v_batch=#define nsa$v_biolm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_biolm=#define nsa$v_bytlm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_bytlm9#define nsa$v_cli nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_cliE#define nsa$v_clitables nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_clitablesA#define nsa$v_cputime nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_cputimeM#define nsa$v_defprivileges nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_defprivileges?#define nsa$v_device nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_dev Nice?#define nsa$v_dialup nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_dialup=#define nsa$v_diolm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_diolmE#define nsa$v_directory nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_directory=#define nsa$v_enqlm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_enqlmG#define nsa$v_expiration nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_expiration=#define nsa$v_fillm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_fillm=#define nsa$v_flags nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_flagsI#define nsa$v_interactive nsa$r_Ofill_41_.nsa$r_fill_42_.nsa$v_interactiveA#define nsa$v_jtquota nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_jtquota?#define nsa$v_lgicmd nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_lgicmd=#define nsa$v_local nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_localE#define nsa$v_maxdetach nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_maxdetachA#define nsa$v_maxjobs nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_maxjobsI#define nsa$v_maxacctjobs nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_maxacctjobsA#define nsa$v_network nsa$r_fill_41_.nsa$r_fill_ P42_.nsa$v_network=#define nsa$v_owner nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_ownerC#define nsa$v_password nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_password?#define nsa$v_pbytlm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_pbytlm?#define nsa$v_pflags nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_pflagsG#define nsa$v_p_restrict nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_p_restrictE#define nsa$v_pgflquota nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_pgflquota=#define nsa$v_prclm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_prclmE#define nsQa$v_primedays nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_primedaysC#define nsa$v_priority nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_priorityG#define nsa$v_privileges nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_privilegesI#define nsa$v_pwdlifetime nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_pwdlifetimeG#define nsa$v_pwdminimum nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_pwdminimumI#define nsa$v_quepriority nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_quepriority?#define nsa$v_remote nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_remote?#define Rnsa$v_sflags nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_sflagsG#define nsa$v_s_restrict nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_s_restrictC#define nsa$v_shrfillm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_shrfillm=#define nsa$v_tqelm nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_tqelm9#define nsa$v_uic nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_uicE#define nsa$v_wsdefault nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_wsdefaultC#define nsa$v_wsextent nsa$r_fill_41_.nsa$r_fill_42_.nsa$v_wsextentA#define nsa$v_wsquota nsa$r_fill_41_.n Ssa$r_fill_42_.nsa$v_wsquota"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/*+ */N/* Record header offset definitions */N/*- */"#define NSA$M_REC_FLAGS_PKTCON 0x1#define NSA$C_RECHDR_LENGTH 76#define NSA$K_RECHDR_LENGTH 76 #ifdef __NEW_STARLETtypedef struct _nsarechdrdef { T __union {N unsigned int nsa$l_rec_id; /* Record identification longword */ __struct {N unsigned short int nsa$w_rec_type; /* Record type */N unsigned short int nsa$w_rec_subtype; /* Record subtype */" } nsa$r_rec_id_fields; } nsa$r_rec_id_overlay;N unsigned char nsa$b_rec_seqnum; /* This records sequence number */N unsigned char nsa$b_rec_seqlast; /* Last records sequence number U*/ __union {N unsigned char nsa$b_rec_flags; /* Record flags byte */ __struct {O unsigned nsa$v_rec_flags_pktcon : 1; /* Last packet in record is */N/* continued in next record */( unsigned nsa$v_fill_43_ : 7;# } nsa$r_rec_flags_bits;" } nsa$r_rec_flags_overlay;N unsigned char nsa$b_rec_pktnum; /* Number of data packets in record */N unsigned short int nsaV$w_rec_pktoff; /* Offset to first packet */N unsigned short int nsa$w_rec_pkthdrsiz; /* Data packet header size */N unsigned int nsa$l_rec_epid; /* Extended PID */N unsigned __int64 nsa$q_rec_time; /* Event time (EXE$GQ_SYSTIME) */N char nsa$t_rec_clusnam [16]; /* Cluster node name */N char nsa$t_rec_procnam [16]; /* Process name */N char nsa$t_rec_usernam [12]; /* username W */N char nsa$t_rec_acctnam [8]; /* Account name */ } NSARECHDRDEF; #if !defined(__VAXC)6#define nsa$l_rec_id nsa$r_rec_id_overlay.nsa$l_rec_idN#define nsa$w_rec_type nsa$r_rec_id_overlay.nsa$r_rec_id_fields.nsa$w_rec_typeT#define nsa$w_rec_subtype nsa$r_rec_id_overlay.nsa$r_rec_id_fields.nsa$w_rec_subtype?#define nsa$b_rec_flags nsa$r_rec_flags_overlay.nsa$b_rec_flagsb#define nsa$v_rec_flags_pktcon nsa$r_rec_flags_overlay.nsa$r_r Xec_flags_bits.nsa$v_rec_flags_pktcon"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct nsarechdrdef { __union {N unsigned int nsa$l_rec_id; /* Record identification longword */ __struct {N unsigned short int nsa$w_rec_type; /* Record type */N unsigned short int nsa$w_rec_subtype; /* Record subtype */" } nsa$r_rec_id_fields; } nsa$r_rec_id_overlay;N unsigned char nsa$b_ Yrec_seqnum; /* This records sequence number */N unsigned char nsa$b_rec_seqlast; /* Last records sequence number */ __union {N unsigned char nsa$b_rec_flags; /* Record flags byte */ __struct {O unsigned nsa$v_rec_flags_pktcon : 1; /* Last packet in record is */N/* continued in next record */( unsigned nsa$v_fill_43_ : 7;# } nsa$r_rec_flags_bits;" } Znsa$r_rec_flags_overlay;N unsigned char nsa$b_rec_pktnum; /* Number of data packets in record */N unsigned short int nsa$w_rec_pktoff; /* Offset to first packet */N unsigned short int nsa$w_rec_pkthdrsiz; /* Data packet header size */N unsigned int nsa$l_rec_epid; /* Extended PID */N unsigned int nsa$q_rec_time [2]; /* Event time (EXE$GQ_SYSTIME) */N char nsa$t_rec_clusnam [16]; /* Cluster node name */N [ char nsa$t_rec_procnam [16]; /* Process name */N char nsa$t_rec_usernam [12]; /* username */N char nsa$t_rec_acctnam [8]; /* Account name */ } ; #if !defined(__VAXC)6#define nsa$l_rec_id nsa$r_rec_id_overlay.nsa$l_rec_idN#define nsa$w_rec_type nsa$r_rec_id_overlay.nsa$r_rec_id_fields.nsa$w_rec_typeT#define nsa$w_rec_subtype nsa$r_rec_id_overlay.nsa$r_rec_id_fields.nsa$w_rec_subtype?#define \nsa$b_rec_flags nsa$r_rec_flags_overlay.nsa$b_rec_flagsb#define nsa$v_rec_flags_pktcon nsa$r_rec_flags_overlay.nsa$r_rec_flags_bits.nsa$v_rec_flags_pktcon"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/*+ */N/* Data packet type definitions */N/*- */N#define NSA$K_PKTTYP_IMGNAM ]1 /* Image name packet */N#define NSA$K_PKTTYP_FACMOD 2 /* File access mode */N#define NSA$K_PKTTYP_PRIVUSED 3 /* Privilege used to access file */N#define NSA$K_PKTTYP_FILNAM 4 /* File name */N#define NSA$K_PKTTYP_DEVNAM 5 /* Device name */N#define NSA$K_PKTTYP_LOGNAM 6 /* Logical name */N#define NSA$K_PKTTYP_VOLNAM 7 /* Volume name^ */N#define NSA$K_PKTTYP_VOLSNAM 8 /* Volume set name */N#define NSA$K_PKTTYP_NODENAM 9 /* Node name */N#define NSA$K_PKTTYP_USERNAM 10 /* User name */N#define NSA$K_PKTTYP_PASSWORD 11 /* Password */N#define NSA$K_PKTTYP_UIC 12 /* User identification code */N#define NSA$K_PKTTYP_VOLPRO 13 /* Volume protection */N_#define NSA$K_PKTTYP_MOUFLG 14 /* Mount flags */N#define NSA$K_PKTTYP_DMOUFLG 15 /* Dismount flags */N#define NSA$K_PKTTYP_NODEID 16 /* Node ID */N#define NSA$K_PKTTYP_EPID 17 /* Extended PID */N#define NSA$K_PKTTYP_SYSUAFF 18 /* System UAF record fields */N#define NSA$K_PKTTYP_STATUS 19 /* Status longword */N#define NSA$K_PKTTYP_SECNA`M 20 /* Global section name */N#define NSA$K_PKTTYP_PRIVS 21 /* Full privilege mask */N#define NSA$K_PKTTYP_INSFLG 22 /* Install flags */N#define NSA$K_PKTTYP_IDNAME 23 /* Identifier name */N#define NSA$K_PKTTYP_IDVAL 24 /* Identifier value */N#define NSA$K_PKTTYP_IDATTR 25 /* Identifier attributes */N#define NSA$K_PKTTYP_HOLDER 26 /* Identifiear holder */N#define NSA$K_PKTTYP_AUDIT 27 /* Audit item */N#define NSA$K_PKTTYP_DEFUSERNAM 28 /* Default proxy name */N#define NSA$K_PKTTYP_OLDUSERNAM 29 /* Old proxy name */N#define NSA$K_PKTTYP_OLDDEFUNAM 30 /* Old default local proxy name */N#define NSA$K_PKTTYP_OLDNODENAM 31 /* Old remote node name */#define NSA$K_PKTTYPNUM 31N/*+ b */N/* Data packet offset definitions */N/*- */#define NSA$C_PKTHDR_LENGTH 4#define NSA$K_PKTHDR_LENGTH 4#define NSA$M_PKT_INS_OPEN 0x2#define NSA$M_PKT_INS_HDR 0x4#define NSA$M_PKT_INS_SHARE 0x8#define NSA$M_PKT_INS_EXEC 0x10 #define NSA$M_PKT_INS_WRITE 0x20#define NSA$M_PKT_INS_PRIV 0x40#define NSA$M_PKT_INS_PROT 0x80!#define NSA$M_PKT_cINS_NOPRG 0x100#define NSA$M_PKT_INS_ACC 0x200$#define NSA$M_PKT_INS_RESIDENT 0x400 #ifdef __NEW_STARLETEtypedef struct _nsapktdef { /* WARNING: aggregate has origin of -4 */= /* WARNING: aggregate element "nsa$w_pkt_type" ignored */= /* WARNING: aggregate element "nsa$w_pkt_size" ignored */#if defined(__VAXC) char nsa$t_pkt_data[];#else-#define nsa$t_pkt_data nsa$r_pkt_data_overlay"#endif /* #if defined(__VAXC) */ __union {N char nsa$t_pkt_imgnam [4d44]; /* Image name */N unsigned int nsa$l_pkt_facmod; /* File access mode */N unsigned int nsa$l_pkt_privused; /* Privilege used to access file */N char nsa$t_pkt_filnam [444]; /* File name */N char nsa$t_pkt_devnam [64]; /* Device and access port name */N char nsa$t_pkt_lognam [255]; /* Logical name */N char nsa$t_pkt_volnam [12]; /* Volume name e */N char nsa$t_pkt_volsnam [12]; /* Volume set name */N char nsa$t_pkt_nodenam [6]; /* Node name */N char nsa$t_pkt_usernam [32]; /* User name */N char nsa$t_pkt_password [32]; /* Password */N unsigned int nsa$l_pkt_uic; /* Volume UIC */N unsigned short int nsa$w_pkt_volpro; /* Volume protection */N f unsigned int nsa$l_pkt_mouflg; /* Mount flags */N unsigned short int nsa$w_pkt_dmouflg; /* Dismount flags */N unsigned __int64 nsa$q_pkt_nodeid; /* Node ID */N unsigned int nsa$l_pkt_epid; /* Extended PID */N unsigned __int64 nsa$q_pkt_sysuaff; /* System UAF record fields */N unsigned int nsa$l_pkt_status; /* Status longword */N char nsa$t_pkt_secnam g[54]; /* Global section name */N unsigned __int64 nsa$q_pkt_privs; /* Full privilege mask */ __union {N unsigned int nsa$l_pkt_insflg; /* Install flags */ __struct {N unsigned nsa$v_pkt_ins_fill : 1; /* Bit 0 must be unused */N unsigned nsa$v_pkt_ins_open : 1; /* /OPEN */N unsigned nsa$v_pkt_ins_hdr : 1; /* /HEADER_RESIDENT */N h unsigned nsa$v_pkt_ins_share : 1; /* /SHARE */N unsigned nsa$v_pkt_ins_exec : 1; /* /EXECUTE */N unsigned nsa$v_pkt_ins_write : 1; /* /WRITE */N unsigned nsa$v_pkt_ins_priv : 1; /* /PRIVILEGE */N unsigned nsa$v_pkt_ins_prot : 1; /* /PROTECTED */N unsigned nsa$v_pkt_ins_noprg : 1; /* /NOPURGE */N unsigned nsa$v_pkt_i ins_acc : 1; /* /ACCOUNTING */N unsigned nsa$v_pkt_ins_resident : 1; /* /RESIDENT */, unsigned nsa$v_fill_46_ : 5;! } nsa$r_fill_45_; } nsa$r_fill_44_;N char nsa$t_pkt_idname [32]; /* Identifier name */N unsigned int nsa$l_pkt_idval; /* Identifier value */N unsigned int nsa$l_pkt_idattr; /* Identifier attributes */N unsigned __int64 nsa j$q_pkt_holder; /* Identifier holder */N char nsa$t_pkt_defusernam [32]; /* Default proxy name */N char nsa$t_pkt_oldusernam [32]; /* Old proxy name */N char nsa$t_pkt_olddefunam [32]; /* Old default local proxy name */N char nsa$t_pkt_oldnodenam [6]; /* Old remote node name */! } nsa$r_pkt_data_overlay; } NSAPKTDEF; #if !defined(__VAXC)@#define nsa$t_pkt_imgnam nsa$r_pkt_data_overlay.nsa$t_ kpkt_imgnam@#define nsa$l_pkt_facmod nsa$r_pkt_data_overlay.nsa$l_pkt_facmodD#define nsa$l_pkt_privused nsa$r_pkt_data_overlay.nsa$l_pkt_privused@#define nsa$t_pkt_filnam nsa$r_pkt_data_overlay.nsa$t_pkt_filnam@#define nsa$t_pkt_devnam nsa$r_pkt_data_overlay.nsa$t_pkt_devnam@#define nsa$t_pkt_lognam nsa$r_pkt_data_overlay.nsa$t_pkt_lognam@#define nsa$t_pkt_volnam nsa$r_pkt_data_overlay.nsa$t_pkt_volnamB#define nsa$t_pkt_volsnam nsa$r_pkt_data_overlay.nsa$t_pkt_volsnamB#define nsa$t_pkt_nodenam lnsa$r_pkt_data_overlay.nsa$t_pkt_nodenamB#define nsa$t_pkt_usernam nsa$r_pkt_data_overlay.nsa$t_pkt_usernamD#define nsa$t_pkt_password nsa$r_pkt_data_overlay.nsa$t_pkt_password:#define nsa$l_pkt_uic nsa$r_pkt_data_overlay.nsa$l_pkt_uic@#define nsa$w_pkt_volpro nsa$r_pkt_data_overlay.nsa$w_pkt_volpro@#define nsa$l_pkt_mouflg nsa$r_pkt_data_overlay.nsa$l_pkt_mouflgB#define nsa$w_pkt_dmouflg nsa$r_pkt_data_overlay.nsa$w_pkt_dmouflg@#define nsa$q_pkt_nodeid nsa$r_pkt_data_overlay.nsa$q_pkt_nodeid<m#define nsa$l_pkt_epid nsa$r_pkt_data_overlay.nsa$l_pkt_epidB#define nsa$q_pkt_sysuaff nsa$r_pkt_data_overlay.nsa$q_pkt_sysuaff@#define nsa$l_pkt_status nsa$r_pkt_data_overlay.nsa$l_pkt_status@#define nsa$t_pkt_secnam nsa$r_pkt_data_overlay.nsa$t_pkt_secnam>#define nsa$q_pkt_privs nsa$r_pkt_data_overlay.nsa$q_pkt_privsO#define nsa$l_pkt_insflg nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$l_pkt_insflgb#define nsa$v_pkt_ins_open nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_openn`#define nsa$v_pkt_ins_hdr nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_hdrd#define nsa$v_pkt_ins_share nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_shareb#define nsa$v_pkt_ins_exec nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_execd#define nsa$v_pkt_ins_write nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_writeb#define nsa$v_pkt_ins_priv nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_privb#doefine nsa$v_pkt_ins_prot nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_protd#define nsa$v_pkt_ins_noprg nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_noprg`#define nsa$v_pkt_ins_acc nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_accj#define nsa$v_pkt_ins_resident nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_resident@#define nsa$t_pkt_idname nsa$r_pkt_data_overlay.nsa$t_pkt_idname>#define nsa$l_pkt_idval nsa$r_pkt_ pdata_overlay.nsa$l_pkt_idval@#define nsa$l_pkt_idattr nsa$r_pkt_data_overlay.nsa$l_pkt_idattr@#define nsa$q_pkt_holder nsa$r_pkt_data_overlay.nsa$q_pkt_holderH#define nsa$t_pkt_defusernam nsa$r_pkt_data_overlay.nsa$t_pkt_defusernamH#define nsa$t_pkt_oldusernam nsa$r_pkt_data_overlay.nsa$t_pkt_oldusernamH#define nsa$t_pkt_olddefunam nsa$r_pkt_data_overlay.nsa$t_pkt_olddefunamH#define nsa$t_pkt_oldnodenam nsa$r_pkt_data_overlay.nsa$t_pkt_oldnodenam"#endif /* #if !defined(__VAXC) */ #else q /* __OLD_STARLET */<struct nsapktdef { /* WARNING: aggregate has origin of -4 */N unsigned short int nsa$w_pkt_type; /* Packet data type */N unsigned short int nsa$w_pkt_size; /* Packet size */#if defined(__VAXC) char nsa$t_pkt_data[];#else-#define nsa$t_pkt_data nsa$r_pkt_data_overlay"#endif /* #if defined(__VAXC) */ __union {N char nsa$t_pkt_imgnam [444]; /* Image name */N unsigned int nrsa$l_pkt_facmod; /* File access mode */N unsigned int nsa$l_pkt_privused; /* Privilege used to access file */N char nsa$t_pkt_filnam [444]; /* File name */N char nsa$t_pkt_devnam [64]; /* Device and access port name */N char nsa$t_pkt_lognam [255]; /* Logical name */N char nsa$t_pkt_volnam [12]; /* Volume name */N char nsa$t_pkt_volsnam [12]; /* Volumse set name */N char nsa$t_pkt_nodenam [6]; /* Node name */N char nsa$t_pkt_usernam [32]; /* User name */N char nsa$t_pkt_password [32]; /* Password */N unsigned int nsa$l_pkt_uic; /* Volume UIC */N unsigned short int nsa$w_pkt_volpro; /* Volume protection */N unsigned int nsa$l_pkt_mouflg; /* Mount flags t */N unsigned short int nsa$w_pkt_dmouflg; /* Dismount flags */N unsigned int nsa$q_pkt_nodeid [2]; /* Node ID */N unsigned int nsa$l_pkt_epid; /* Extended PID */N unsigned int nsa$q_pkt_sysuaff [2]; /* System UAF record fields */N unsigned int nsa$l_pkt_status; /* Status longword */N char nsa$t_pkt_secnam [54]; /* Global section name */N unsigned int u nsa$q_pkt_privs [2]; /* Full privilege mask */ __union {N unsigned int nsa$l_pkt_insflg; /* Install flags */ __struct {N unsigned nsa$v_pkt_ins_fill : 1; /* Bit 0 must be unused */N unsigned nsa$v_pkt_ins_open : 1; /* /OPEN */N unsigned nsa$v_pkt_ins_hdr : 1; /* /HEADER_RESIDENT */N unsigned nsa$v_pkt_ins_share : 1; /* /SHARE */Nv unsigned nsa$v_pkt_ins_exec : 1; /* /EXECUTE */N unsigned nsa$v_pkt_ins_write : 1; /* /WRITE */N unsigned nsa$v_pkt_ins_priv : 1; /* /PRIVILEGE */N unsigned nsa$v_pkt_ins_prot : 1; /* /PROTECTED */N unsigned nsa$v_pkt_ins_noprg : 1; /* /NOPURGE */N unsigned nsa$v_pkt_ins_acc : 1; /* /ACCOUNTING */N unsigned n wsa$v_pkt_ins_resident : 1; /* /RESIDENT */, unsigned nsa$v_fill_46_ : 5;! } nsa$r_fill_45_; } nsa$r_fill_44_;N char nsa$t_pkt_idname [32]; /* Identifier name */N unsigned int nsa$l_pkt_idval; /* Identifier value */N unsigned int nsa$l_pkt_idattr; /* Identifier attributes */N unsigned int nsa$q_pkt_holder [2]; /* Identifier holder */N char nsa$t x_pkt_defusernam [32]; /* Default proxy name */N char nsa$t_pkt_oldusernam [32]; /* Old proxy name */N char nsa$t_pkt_olddefunam [32]; /* Old default local proxy name */N char nsa$t_pkt_oldnodenam [6]; /* Old remote node name */! } nsa$r_pkt_data_overlay; } ; #if !defined(__VAXC)@#define nsa$t_pkt_imgnam nsa$r_pkt_data_overlay.nsa$t_pkt_imgnam@#define nsa$l_pkt_facmod nsa$r_pkt_data_overlay.nsa$l_pkt_facmodDy#define nsa$l_pkt_privused nsa$r_pkt_data_overlay.nsa$l_pkt_privused@#define nsa$t_pkt_filnam nsa$r_pkt_data_overlay.nsa$t_pkt_filnam@#define nsa$t_pkt_devnam nsa$r_pkt_data_overlay.nsa$t_pkt_devnam@#define nsa$t_pkt_lognam nsa$r_pkt_data_overlay.nsa$t_pkt_lognam@#define nsa$t_pkt_volnam nsa$r_pkt_data_overlay.nsa$t_pkt_volnamB#define nsa$t_pkt_volsnam nsa$r_pkt_data_overlay.nsa$t_pkt_volsnamB#define nsa$t_pkt_nodenam nsa$r_pkt_data_overlay.nsa$t_pkt_nodenamB#define nsa$t_pkt_usernam nsa$r_pkt_ zdata_overlay.nsa$t_pkt_usernamD#define nsa$t_pkt_password nsa$r_pkt_data_overlay.nsa$t_pkt_password:#define nsa$l_pkt_uic nsa$r_pkt_data_overlay.nsa$l_pkt_uic@#define nsa$w_pkt_volpro nsa$r_pkt_data_overlay.nsa$w_pkt_volpro@#define nsa$l_pkt_mouflg nsa$r_pkt_data_overlay.nsa$l_pkt_mouflgB#define nsa$w_pkt_dmouflg nsa$r_pkt_data_overlay.nsa$w_pkt_dmouflg@#define nsa$q_pkt_nodeid nsa$r_pkt_data_overlay.nsa$q_pkt_nodeid<#define nsa$l_pkt_epid nsa$r_pkt_data_overlay.nsa$l_pkt_epidB#define nsa$q_pk{t_sysuaff nsa$r_pkt_data_overlay.nsa$q_pkt_sysuaff@#define nsa$l_pkt_status nsa$r_pkt_data_overlay.nsa$l_pkt_status@#define nsa$t_pkt_secnam nsa$r_pkt_data_overlay.nsa$t_pkt_secnam>#define nsa$q_pkt_privs nsa$r_pkt_data_overlay.nsa$q_pkt_privsO#define nsa$l_pkt_insflg nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$l_pkt_insflgb#define nsa$v_pkt_ins_open nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_open`#define nsa$v_pkt_ins_hdr nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_4|5_.nsa$v_pkt_ins_hdrd#define nsa$v_pkt_ins_share nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_shareb#define nsa$v_pkt_ins_exec nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_execd#define nsa$v_pkt_ins_write nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_writeb#define nsa$v_pkt_ins_priv nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_privb#define nsa$v_pkt_ins_prot nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.}nsa$v_pkt_ins_protd#define nsa$v_pkt_ins_noprg nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_noprg`#define nsa$v_pkt_ins_acc nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_accj#define nsa$v_pkt_ins_resident nsa$r_pkt_data_overlay.nsa$r_fill_44_.nsa$r_fill_45_.nsa$v_pkt_ins_resident@#define nsa$t_pkt_idname nsa$r_pkt_data_overlay.nsa$t_pkt_idname>#define nsa$l_pkt_idval nsa$r_pkt_data_overlay.nsa$l_pkt_idval@#define nsa$l_pkt_idattr nsa$r_pkt_data_overlay. ~nsa$l_pkt_idattr@#define nsa$q_pkt_holder nsa$r_pkt_data_overlay.nsa$q_pkt_holderH#define nsa$t_pkt_defusernam nsa$r_pkt_data_overlay.nsa$t_pkt_defusernamH#define nsa$t_pkt_oldusernam nsa$r_pkt_data_overlay.nsa$t_pkt_oldusernamH#define nsa$t_pkt_olddefunam nsa$r_pkt_data_overlay.nsa$t_pkt_olddefunamH#define nsa$t_pkt_oldnodenam nsa$r_pkt_data_overlay.nsa$t_pkt_oldnodenam"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __NSARECDEF_LOADED */ ww+/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J /* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $OBJRECDEF ***/#ifndef __OBJRECDEF_LOADED#define __OBJRECDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #define OBJ$M_PSC_PIC 0x1#define OBJ$M_PSC_LIB 0x2#define OBJ$M_PSC_OVL 0x4#define OBJ$M_PSC_REL 0x8#define OBJ$M_PSC_GBL 0x10#define OBJ$M_PSC_SHR 0x20#define OBJ$M_PSC_EXE 0x40#define OBJ$M_PSC_RD 0x80#define OBJ$M_PSC_WRT 0x100#define OBJ$M_SYM_WEAK 0x1#define OBJ$M_SYM_DEF 0x2#define OBJ$M_SYM_UNI 0x4#define OBJ$M_SYM_REL 0x8#define OBJ$M_SYMV_WEAK 0x1#define OBJ$M_SYMV_DEF 0x2#define OBJ$M_SYMV_UNI 0x4#define OBJ$M_SYMV_REL 0x8#define OBJ$M_SYMM_WEAK 0x1#define OBJ$M_SYMM_DEF 0x2#define OBJ$M_SYMM_UNI 0x4#define OBJ$M_SYMM_REL 0x8 #ifdef __NEW_STARLETtypedef struct _sdadefs { __union {N unsigned char obj$b_type; /* Type of record */N unsigned char obj$b_gsd_type; /* Type of GSD record */ } obj$r_type_overlay; __union {  __struct {N unsigned char obj$b_psc_ali; /* PSECT alignment (2**n) */ __union {N unsigned short int obj$w_psc_flag; /* PSECT flags: */ __struct {N unsigned obj$v_psc_pic : 1; /* Position independent */S unsigned obj$v_psc_lib : 1; /* Defined from sharable image */N unsigned obj$v_psc_ovl : 1; /* Overlaid psect */N unsigned obj$v_psc_rel : 1; /* Requires relocation */N unsigned obj$v_psc_gbl : 1; /* PSECT is global */N unsigned obj$v_psc_shr : 1; /* Potentially sharable */N unsigned obj$v_psc_exe : 1; /* Executable */N unsigned obj$v_psc_rd : 1; /* Can be read */N unsigned obj$v_psc_wrt : 1; /* Can be written *// unsigned obj$v_fill_8_ : 7; $ } obj$r_fill_1_; } obj$r_fill_0_;N unsigned int obj$l_psc_len; /* Length of PSECT */N char obj$t_psc_name; /* PSECT name (counted string) */! } obj$r_psect_record; __struct {V unsigned char obj$b_sym_dtype; /* Data type (see Arch. Handbook, Ap. C) */ __union {N unsigned short int obj$w_sym_flags; /* Symbol flags: */ __stru ct {U unsigned obj$v_sym_weak : 1; /* Weak resolution (0 = strong) */R unsigned obj$v_sym_def : 1; /* Definition (0 = reference) */X unsigned obj$v_sym_uni : 1; /* Universal definition (0 = local) */V unsigned obj$v_sym_rel : 1; /* Relative symbol (0 = absolute) *// unsigned obj$v_fill_9_ : 4;$ } obj$r_fill_3_; } obj$r_fill_2_;N unsigned char obj$b_sym_psind; /* PSECT index (only if def) */N unsigned int obj$l_sym_value; /* Value of symbol (only if def) */N char obj$t_sym_name; /* Symbol name (counted string) */& } obj$r_global_sym_record; __struct {V unsigned char obj$b_epm_dtype; /* Data type (see Arch. Handbook, Ap. C) */O unsigned short int obj$w_epm_flags; /* Flags (same as SYM_FLAGS) */N unsigned char obj$b_epm_psind; /* PSECT index (o nly if def) */N unsigned int obj$l_epm_value; /* Value of symbol (only if def) */N unsigned short int obj$w_epm_mask; /* Entry mask */N char obj$t_epm_name; /* Symbol name (counted string) */' } obj$r_entry_point_record; __struct {W unsigned char obj$b_symv_dtype; /* Data type (see Arch. Handbook, Ap. C) */ __union {N unsigned short int obj$w_symv_flags; /* Symbol flags : */ __struct {V unsigned obj$v_symv_weak : 1; /* Weak resolution (0 = strong) */S unsigned obj$v_symv_def : 1; /* Definition (0 = reference) */Y unsigned obj$v_symv_uni : 1; /* Universal definition (0 = local) */W unsigned obj$v_symv_rel : 1; /* Relative symbol (0 = absolute) */0 unsigned obj$v_fill_10_ : 4;$ } obj$r_fill_5_; } ob j$r_fill_4_;N unsigned char obj$b_symv_psind; /* PSECT index (only if def) */N unsigned int obj$l_symv_value; /* Value of symbol (only if def) */X unsigned int obj$l_symv_vector; /* Vectored value of symbol (only if def) */N char obj$t_symv_name; /* Symbol name (counted string) */' } obj$r_global_symv_record; __struct {W unsigned char obj$b_epmv_dtype; /* Data type (see Arch. Handbook, Ap. C) */P  unsigned short int obj$w_epmv_flags; /* Flags (same as SYM_FLAGS) */N unsigned char obj$b_epmv_psind; /* PSECT index (only if def) */N unsigned int obj$l_epmv_value; /* Value of symbol (only if def) */X unsigned int obj$l_epmv_vector; /* Vectored value of symbol (only if def) */N unsigned short int obj$w_epmv_mask; /* Entry mask */N char obj$t_epmv_name; /* Symbol name (counted string) */' } obj$r_gl obal_epmv_record; __struct {W unsigned char obj$b_symm_dtype; /* Data type (see Arch. Handbook, Ap. C) */ __union {N unsigned short int obj$w_symm_flags; /* Symbol flags: */ __struct {V unsigned obj$v_symm_weak : 1; /* Weak resolution (0 = strong) */S unsigned obj$v_symm_def : 1; /* Definition (0 = reference) */Y unsigned obj$v_symm_uni : 1; /* Universal de finition (0 = local) */W unsigned obj$v_symm_rel : 1; /* Relative symbol (0 = absolute) */0 unsigned obj$v_fill_11_ : 4;$ } obj$r_fill_7_; } obj$r_fill_6_;N unsigned char obj$b_symm_psind; /* PSECT index (only if def) */N unsigned int obj$l_symm_value; /* Value of symbol (only if def) */\ unsigned int obj$l_symm_version_mask; /* Version mask of symbol (only if def) */N char obj$t_symm_name; /* Symbol name (counted string) */' } obj$r_global_symm_record; __struct {W unsigned char obj$b_epmm_dtype; /* Data type (see Arch. Handbook, Ap. C) */P unsigned short int obj$w_epmm_flags; /* Flags (same as SYM_FLAGS) */N unsigned char obj$b_epmm_psind; /* PSECT index (only if def) */N unsigned int obj$l_epmm_value; /* Value of symbol (only if def) */\ unsigned int obj$l_epmm_version_mask; /* Version mask of symbol (only if def) */N unsigned short int obj$w_epmm_mask; /* Entry mask */N char obj$t_epmm_name; /* Symbol name (counted string) */' } obj$r_global_epmm_record; __struct {N unsigned char obj$b_eom_sev; /* Error severity for module */P unsigned char obj$b_eom_psind; /* PSECT index of transfer address */N unsigned int obj$l_eom_trans; /* Transfer address  */ } obj$r_eom_record; } obj$r_records_overlay; } SDADEFS; #if !defined(__VAXC)0#define obj$b_type obj$r_type_overlay.obj$b_type8#define obj$b_gsd_type obj$r_type_overlay.obj$b_gsd_typeL#define obj$b_psc_ali obj$r_records_overlay.obj$r_psect_record.obj$b_psc_ali\#define obj$w_psc_flag obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$w_psc_flagh#define obj$v_psc_pic obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_pich#define obj$v_psc_lib obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_libh#define obj$v_psc_ovl obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_ovlh#define obj$v_psc_rel obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_relh#define obj$v_psc_gbl obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_gblh#define obj$v_psc_shr obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_shrh#define obj$v_psc_exe obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_exef#define obj$v_psc_rd obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_rdh#define obj$v_psc_wrt obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_wrtL#define obj$l_psc_len obj$r_records_overlay.obj$r_psect_record.obj$l_psc_lenN#define obj$t_psc_name obj$r_records_overlay.obj$r_psect_record.obj$t_psc_nameU#define obj$b_sym_dtype obj$r_records_overlay.obj$r_global_sym_record.obj$b_sym_dtypec#define obj$w_sym_flags obj$r_records_overlay.obj$r_global_sym_record.obj$r_fill_2_.obj$w_sym_flagso#define obj$v_sym_weak obj$r_records_overlay.obj$r_global_sym_record.obj$r_fill_2_.obj$r_fill_3_.obj$v_sym_weakm#define obj$v_sym_def obj$r_records_overlay.obj$r_global_sym_record.obj$r_fill_2_.obj$r_fill_3_.obj$v_sym_defm#define obj$v_sym_uni obj$r_records_overlay.obj$r_global_sym_record.obj$r_fill_2_.obj$r_fill_3_.obj$v_sym_unim#define obj$v_sym_rel obj$r_records_overlay.obj$r_global_sym_record.obj$r_fill_2_.obj$r_fill_3_.obj$v_sym_relU#define obj$b_sym_psind obj$r_records_overlay.obj$r_global_sym_record.obj$b_sym_psindU#define obj$l_sym_value obj$r_records_overlay.obj$r_global_sym_record.obj$l_sym_valueS#define obj$t_sym_name obj$r_records_overlay.obj$r_global_sym_record.obj$t_sym_nameV#define obj$b_epm_dtype obj$r_records_overlay.obj$r_entry_point_record.obj$b_epm_dtypeV#define obj$w_epm_flags obj$r_records_overlay.obj$r_entry_point_record.obj$w_epm_flagsV#define obj$b_epm_psind obj$r_records_overlay.obj$r_entry_point_record.obj$b_epm_psindV#define obj$l_epm_value obj$r_records_overlay.obj$r_entry_point_record.obj$l_epm_valueT#define obj$w_epm_mask obj$r_records_overlay.obj$r_entry_point_record.obj$w_epm_maskT#define obj$t_epm_name obj$r_records_overlay.obj$r_entry_point_record.obj$t_epm_nameX#define obj$b_symv_dtype obj$r_records_overlay.obj$r_global_symv_record.obj$b_symv_dtypef#define obj$w_symv_flags obj$r_records_overlay.obj$r_global_symv_record.obj$r_fill_4_.obj$w_symv_flagsr#define obj$v_symv_weak obj$r_records_overlay.obj$r_global_symv_record.obj$r_fill_4_.obj$r_fill_5_.obj$v_symv_weakp#define obj$v_symv_def obj$r_records_overlay.obj$r_global_symv_record.obj$r_fill_4_.obj$r_fill_5_.obj$v_symv_defp#define obj$v_symv_uni obj$r_records_overlay.obj$r_global_symv_record.obj$r_fill_4_.obj$r_fill_5_.obj$v_symv_unip#define obj$v_symv_rel obj$r_records_overlay.obj$r_global_symv_record.obj$r_fill_4_.obj$r_fill_5_.obj$v_symv_relX#define obj$b_symv_psind obj$r_records_overlay.obj$r_global_symv_record.obj$b_symv_psindX#define obj$l_symv_value obj$r_records_overlay.obj$r_global_symv_record.obj$l_symv_valueZ#define obj$l_symv_vector obj$r_records_overlay.obj$r_global_symv_record.obj$l_symv_vectorV#define obj$t_symv_name obj$r_records_overlay.obj$r_global_symv_record.obj$t_symv_nameX#define obj$b_epmv_dtype obj$r_records_overlay.obj$r_global_epmv_record.obj$b_epmv_dtypeX#define obj$w_epmv_flags obj$r_records_overlay.obj$r_global_epmv_record.obj$w_epmv_flagsX#define obj$b_epmv_psind obj$r_records_overlay.obj$r_global_epmv_record.obj$b_epmv_psindX#define obj$l_epmv_value obj$r_records_overlay.obj$r_global_epmv_record.obj$l_epmv_valueZ#define obj$l_epmv_vector obj$r_records_overlay.obj$r_global_epmv_record.obj$l_epmv_vectorV#define obj$w_epmv_mask obj$r_records_overlay.obj$r_global_epmv_record.obj$w_epmv_maskV#define obj$t_epmv_name obj$r_records_overlay.obj$r_global_epmv_record.obj$t_epmv_nameX#define obj$b_symm_dtype obj$r_records_overlay.obj$r_global_symm_record.obj$b_symm_dtypef#define obj$w_symm_flags obj$r_records_overlay.obj$r_global_symm_record.obj$r_fill_6_.obj$w_symm_flagsr#define obj$v_symm_weak obj$r_records_overlay.obj$r_global_symm_record.obj$r_fill_6_.obj$r_fill_7_.obj$v_symm_weakp#define obj$v_symm_def obj$r_records_overlay.obj$r_global_symm_record.obj$r_fill_6_.obj$r_fill_7_.obj$v_symm_defp#define obj$v_symm_uni obj$r_records_overlay.obj$r_global_symm_record.obj$r_fill_6_.obj$r_fill_7_.obj$v_symm_unip#define obj$v_symm_rel obj$r_records_overlay.obj$r_global_symm_record.obj$r_fill_6_.obj$r_fill_7_.obj$v_symm_relX#define obj$b_symm_psind obj$r_records_overlay.obj$r_global_symm_record.obj$b_symm_psindX#define obj$l_symm_value obj$r_records_overlay.obj$r_global_symm_record.obj$l_symm_valuef#define obj$l_symm_version_mask obj$r_records_overlay.obj$r_global_symm_record.obj$l_symm_version_maskV#define obj$t_symm_name obj$r_records_overlay.obj$r_global_symm_record.obj$t_symm_nameX#define obj$b_epmm_dtype obj$r_records_overlay.obj$r_global_epmm_record.obj$b_epmm_dtypeX#define obj$w_epmm_flags obj$r_records_overlay.obj$r_global_epmm_record.obj$w_epmm_flagsX#define obj$b_epmm_psind obj$r_records_overlay.obj$r_global_epmm_record.obj$b_epmm_psindX#define obj$l_epmm_value obj$r_records_overlay.obj$r_global_epmm_record.obj$l_epmm_valuef#define obj$l_epmm_version_mask obj$r_records_overlay.obj$r_global_epmm_record.obj$l_epmm_version_maskV#define obj$w_epmm_mask obj$r_records_overlay.obj$r_global_epmm_record.obj$w_epmm_maskV#define obj$t_epmm_name obj$r_records_overlay.obj$r_global_epmm_record.obj$t_epmm_nameJ#define obj$b_eom_sev obj$r_records_overlay.obj$r_eom_record.obj$b_eom_sevN#define obj$b_eom_psind obj$r_records_overlay.obj$r_eom_record.obj$b_eom_psindN#define obj$l_eom_trans obj$r_records_overlay.obj$r_eom_record.obj$l_eom_trans"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct sdadefs { __union  {N unsigned char obj$b_type; /* Type of record */N unsigned char obj$b_gsd_type; /* Type of GSD record */ } obj$r_type_overlay; __union { __struct {N unsigned char obj$b_psc_ali; /* PSECT alignment (2**n) */ __union {N unsigned short int obj$w_psc_flag; /* PSECT flags: */ __struct {N unsigned obj$v_psc_pic : 1; /* Position independent */S unsigned obj$v_psc_lib : 1; /* Defined from sharable image */N unsigned obj$v_psc_ovl : 1; /* Overlaid psect */N unsigned obj$v_psc_rel : 1; /* Requires relocation */N unsigned obj$v_psc_gbl : 1; /* PSECT is global */N unsigned obj$v_psc_shr : 1; /* Potentially sharable */N unsigned obj$v_psc_exe : 1; /* Executable */ N unsigned obj$v_psc_rd : 1; /* Can be read */N unsigned obj$v_psc_wrt : 1; /* Can be written *// unsigned obj$v_fill_8_ : 7;$ } obj$r_fill_1_; } obj$r_fill_0_;N unsigned int obj$l_psc_len; /* Length of PSECT */N char obj$t_psc_name; /* PSECT name (counted string) */! } obj$r_psect_record; __struct {V  unsigned char obj$b_sym_dtype; /* Data type (see Arch. Handbook, Ap. C) */ __union {N unsigned short int obj$w_sym_flags; /* Symbol flags: */ __struct {U unsigned obj$v_sym_weak : 1; /* Weak resolution (0 = strong) */R unsigned obj$v_sym_def : 1; /* Definition (0 = reference) */X unsigned obj$v_sym_uni : 1; /* Universal definition (0 = local) */V unsign ed obj$v_sym_rel : 1; /* Relative symbol (0 = absolute) *// unsigned obj$v_fill_9_ : 4;$ } obj$r_fill_3_; } obj$r_fill_2_;N unsigned char obj$b_sym_psind; /* PSECT index (only if def) */N unsigned int obj$l_sym_value; /* Value of symbol (only if def) */N char obj$t_sym_name; /* Symbol name (counted string) */& } obj$r_global_sym_record; __struct {V unsigned char obj$b_epm_dtype; /* Data type (see Arch. Handbook, Ap. C) */O unsigned short int obj$w_epm_flags; /* Flags (same as SYM_FLAGS) */N unsigned char obj$b_epm_psind; /* PSECT index (only if def) */N unsigned int obj$l_epm_value; /* Value of symbol (only if def) */N unsigned short int obj$w_epm_mask; /* Entry mask */N char obj$t_epm_name; /* Symbol name (counted string) */' } obj$r_entry_point_reco rd; __struct {W unsigned char obj$b_symv_dtype; /* Data type (see Arch. Handbook, Ap. C) */ __union {N unsigned short int obj$w_symv_flags; /* Symbol flags: */ __struct {V unsigned obj$v_symv_weak : 1; /* Weak resolution (0 = strong) */S unsigned obj$v_symv_def : 1; /* Definition (0 = reference) */Y unsigned obj$v_symv_uni : 1; /* Universal definition (0 = local) */W unsigned obj$v_symv_rel : 1; /* Relative symbol (0 = absolute) */0 unsigned obj$v_fill_10_ : 4;$ } obj$r_fill_5_; } obj$r_fill_4_;N unsigned char obj$b_symv_psind; /* PSECT index (only if def) */N unsigned int obj$l_symv_value; /* Value of symbol (only if def) */X unsigned int obj$l_symv_vector; /* Vectored value of symbol (only if def) */N char obj$t_symv_name; /* Symbol name (counted string) */' } obj$r_global_symv_record; __struct {W unsigned char obj$b_epmv_dtype; /* Data type (see Arch. Handbook, Ap. C) */P unsigned short int obj$w_epmv_flags; /* Flags (same as SYM_FLAGS) */N unsigned char obj$b_epmv_psind; /* PSECT index (only if def) */N unsigned int obj$l_epmv_value; /* Value of symbol (only if def) */X unsigned int obj$l_epmv_vector; /* Vectored value of symbol (only if def) */N unsigned short int obj$w_epmv_mask; /* Entry mask */N char obj$t_epmv_name; /* Symbol name (counted string) */' } obj$r_global_epmv_record; __struct {W unsigned char obj$b_symm_dtype; /* Data type (see Arch. Handbook, Ap. C) */ __union {N unsigned short int obj$w_symm_flags; /* Symbol flags: */ __struct {V unsigned obj$v_symm_weak : 1; /* Weak resolution (0 = strong) */S unsigned obj$v_symm_def : 1; /* Definition (0 = reference) */Y unsigned obj$v_symm_uni : 1; /* Universal definition (0 = local) */W unsigned obj$v_symm_rel : 1; /* Relative symbol (0 = absolute) */0 unsigned obj$v_fill_11_ : 4;$ } obj$r_fill_7_; } obj$r_fill_6_;N unsigned char obj$b_symm_psind; /* PSECT index (only if def) */N unsigned int obj$l_symm_value; /* Value of symbol (only if def) */\ unsigned int obj$l_symm_version_mask; /* Version mask of symbol (only if def) */N char obj$t_symm_name; /* Symbol name (counted string) */' } obj$r_global_symm_record; __struct {W unsigned char obj$b_epmm_dtype; /* Data type (see Arch. Handbook, Ap. C) */P unsigned short int obj$w_epmm_flags; /* Flags (same as SYM_FLAGS ) */N unsigned char obj$b_epmm_psind; /* PSECT index (only if def) */N unsigned int obj$l_epmm_value; /* Value of symbol (only if def) */\ unsigned int obj$l_epmm_version_mask; /* Version mask of symbol (only if def) */N unsigned short int obj$w_epmm_mask; /* Entry mask */N char obj$t_epmm_name; /* Symbol name (counted string) */' } obj$r_global_epmm_record; __struct {N unsigned c har obj$b_eom_sev; /* Error severity for module */P unsigned char obj$b_eom_psind; /* PSECT index of transfer address */N unsigned int obj$l_eom_trans; /* Transfer address */ } obj$r_eom_record; } obj$r_records_overlay; } ; #if !defined(__VAXC)0#define obj$b_type obj$r_type_overlay.obj$b_type8#define obj$b_gsd_type obj$r_type_overlay.obj$b_gsd_typeL#define obj$b_psc_ali obj$r_records_overlay.obj$r_psect_record.obj$b_psc_ali\#define obj$w_psc_flag obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$w_psc_flagh#define obj$v_psc_pic obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_pich#define obj$v_psc_lib obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_libh#define obj$v_psc_ovl obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_ovlh#define obj$v_psc_rel obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_relh#define obj$v_psc_gbl obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_gblh#define obj$v_psc_shr obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_shrh#define obj$v_psc_exe obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_exef#define obj$v_psc_rd obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_rdh#define obj$v_psc_wrt obj$r_records_overlay.obj$r_psect_record.obj$r_fill_0_.obj$r_fill_1_.obj$v_psc_wrtL#define obj$l_psc_len obj$r_records_overlay.obj$r_psect_record.obj$l_psc_lenN#define obj$t_psc_name obj$r_records_overlay.obj$r_psect_record.obj$t_psc_nameU#define obj$b_sym_dtype obj$r_records_overlay.obj$r_global_sym_record.obj$b_sym_dtypec#define obj$w_sym_flags obj$r_records_overlay.obj$r_global_sym_record.obj$r_fill_2_.obj$w_sym_flagso#define obj$v_sym_weak obj$r_records_overlay.obj$r_global_sym_record.obj$r_fill_2_.obj$r_fill_3_.obj$v_sym_weakm#define obj$v_sym_def obj$r_records_overlay.obj$r_global_sym_record.obj$r_fill_2_.obj$r_fill_3_.obj$v_sym_defm#define obj$v_sym_uni obj$r_records_overlay.obj$r_global_sym_record.obj$r_fill_2_.obj$r_fill_3_.obj$v_sym_unim#define obj$v_sym_rel obj$r_records_overlay.obj$r_global_sym_record.obj$r_fill_2_.obj$r_fill_3_.obj$v_sym_relU#define obj$b_sym_psind obj$r_records_overlay.obj$r_global_sym_record.obj$b_sym_psindU#define obj$l_sym_value obj$r_records_overlay.obj$r_global_sym_record.obj$l_sym_valueS#define obj$t_sym_name obj$r_records_overlay.obj$r_global_sym_record.obj$t_sym_nameV#define obj$b_epm_dtype obj$r_records_overlay.obj$r_entry_point_record.obj$b_epm_dtypeV#define obj$w_epm_flags obj$r_records_overlay.obj$r_entry_point_record.obj$w_epm_flagsV#define obj$b_epm_psind obj$r_records_overlay.obj$r_entry_point_record.obj$b_epm_psindV#define obj$l_epm_value obj$r_records_overlay.obj$r_entry_point_record.obj$l_epm_valueT#define obj$w_epm_mask obj$r_records_overlay.obj$r_entry_point_record.obj$w_epm_maskT#define obj$t_epm_name obj$r_records_overlay.obj$r_entry_point_record.obj$t_epm_nameX#define obj$b_symv_dtype obj$r_records_overlay.obj$r_global_symv_record.obj$b_symv_dtypef#define obj$w_symv_flags obj$r_records_overlay.obj$r_global_symv_record.obj$r_fill_4_.obj$w_symv_flagsr#define obj$v_symv_weak obj$r_records_overlay.obj$r_global_symv_record.obj$r_fill_4_.obj$r_fill_5_.obj$v_symv_weakp#define obj$v_symv_def obj$r_records_overlay.obj$r_global_symv_record.obj$r_fill_4_.obj$r_fill_5_.obj$v_symv_defp#define obj$v_symv_uni obj$r_records_overlay.obj$r_global_symv_record.obj$r_fill_4_.obj$r_fill_5_.obj$v_symv_unip#define obj$v_symv_rel obj$r_records_overlay.obj$r_global_symv_record.obj$r_fill_4_.obj$r_fill_5_.obj$v_symv_relX#define obj$b_symv_psind obj$r_records_overlay.obj$r_global_symv_record.obj$b_symv_psindX#define obj$l_symv_value obj$r_records_overlay.obj$r_global_symv_record.obj$l_symv_valueZ#define obj$l_symv_vector obj$r_records_overlay.obj$r_global_symv_record.obj$l_symv_vectorV#define obj$t_symv_name obj$r_records_overlay.obj$r_global_symv_record.obj$t_symv_nameX#define obj$b_epmv_dtype obj$r_records_overlay.obj$r_global_epmv_record.obj$b_epmv_dtypeX#define obj$w_epmv_flags obj$r_records_overlay.obj$r_global_epmv_record.obj$w_epmv_flagsX#define obj$b_epmv_psind obj$r_records_overlay.obj$r_global_epmv_record.obj$b_epmv_psindX#define obj$l_epmv_value obj$r_records_overlay.obj$r_global_epmv_record.obj$l_epmv_valueZ#define obj$l_epmv_vector obj$r_records_overlay.obj$r_global_epmv_record.obj$l_epmv_vectorV#define obj$w_epmv_mask obj$r_records_overlay.obj$r_global_epmv_record.obj$w_epmv_maskV#define obj$t_epmv_name obj$r_records_overlay.obj$r_global_epmv_record.obj$t_epmv_nameX#define obj$b_symm_dtype obj$r_records_overlay.obj$r_global_symm_record.obj$b_symm_dtypef#define obj$w_symm_flags obj$r_records_overlay.obj$r_global_symm_record.obj$r_fill_6_.obj$w_symm_flagsr#define obj$v_symm_weak obj$r_records_overlay.obj$r_global_symm_record.obj$r_fill_6_.obj$r_fill_7_.obj$v_symm_weakp#define obj$v_symm_def obj$r_records_overlay.obj$r_global_symm_record.obj$r_fill_6_.obj$r_fill_7_.obj$v_symm_defp#define obj$v_symm_uni obj$r_records_overlay.obj$r_global_symm_record.obj$r_fill_6_.obj$r_fill_7_.obj$v_symm_unip#define obj$v_symm_rel obj$r_records_overlay.obj$r_global_symm_record.obj$r_fill_6_.obj$r_fill_7_.obj$v_symm_relX#define obj$b_symm_psind obj$r_records_overlay.obj$r_global_symm_record.obj$b_symm_psindX#define obj$l_symm_value obj$r_records_overlay.obj$r_global_symm_record.obj$l_symm_valuef#define obj$l_symm_version_mask obj$r_records_overlay.obj$r_global_symm_record.obj$l_symm_version_maskV#define obj$t_symm_name obj$r_records_overlay.obj$r_global_symm_record.obj$t_symm_nameX#define obj$b_epmm_dtype obj$r_records_overlay.obj$r_global_epmm_record.obj$b_epmm_dtypeX#define obj$w_epmm_flags obj$r_records_overlay.obj$r_global_epmm_record.obj$w_epmm_flagsX#define obj$b_epmm_psind obj$r_records_overlay.obj$r_global_epmm_record.obj$b_epmm_psindX#define obj$l_epmm_value obj$r_records_overlay.obj$r_global_epmm_record.obj$l_epmm_valuef#define obj$l_epmm_version_mask obj$r_records_overlay.obj$r_global_epmm_record.obj$l_epmm_version_maskV#define obj$w_epmm_mask obj$r_records_overlay.obj$r_global_epmm_record.obj$w_epmm_maskV#define obj$t_epmm_name obj$r_records_overlay.obj$r_global_epmm_record.obj$t_epmm_nameJ#define obj$b_eom_sev obj$r_records_overlay.obj$r_eom_record.obj$b_eom_sevN#define obj$b_eom_psind obj$r_records_overlay.obj$r_eom_re cord.obj$b_eom_psindN#define obj$l_eom_trans obj$r_records_overlay.obj$r_eom_record.obj$l_eom_trans"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define OBJ$C_HDR 0 /*Module header record */N#define OBJ$C_HDR_MHD 0 /* Main header record */N#define OBJ$C_HDR_LNM 1 /* Language processor record */N#define OBJ$C_HDR_SRC 2 /* Source files description */N#define OBJ$C_HDR_TTL 3 /* Title text */N#define OBJ$C_HDR_CPR 4 /* Copyright text */N#define OBJ$C_HDR_MTC 5 /* Maintenance text */N#define OBJ$C_HDR_GTX 6 /* General text */N#define OBJ$C_GSD 1 /*Global symbol definition record */N#define OBJ$C_GSD_PSC 0 /* P-sect definition */N#define OBJ$C_GSD_SYM 1  /* Symbol (simple) definition */N#define OBJ$C_GSD_EPM 2 /* Entry point definition */N#define OBJ$C_GSD_PRO 3 /* Procedure definition */P#define OBJ$C_GSD_SYMW 4 /* Symbol definition with word psect */U#define OBJ$C_GSD_EPMW 5 /* Entry point definition with word psect */S#define OBJ$C_GSD_PROW 6 /* Procedure definition with word psect */N#define OBJ$C_GSD_IDC 7 /* Random entity check */N#define OBJ$C_GSD_ENV 8 /* Environment definition */P#define OBJ$C_GSD_LSY 9 /* Local symbol definition/reference */N#define OBJ$C_GSD_LEPM 10 /* Local symbol entry point def. */N#define OBJ$C_GSD_LPRO 11 /* Local symbol procedure def. */O#define OBJ$C_GSD_SPSC 12 /* Shareable image psect definition */Q#define OBJ$C_GSD_SYMV 13 /* Global symbol definition (vectored) */O#define OBJ$C_GSD_EPMV 14 /* Entry point definition (vectored) */N#define OBJ$C_GSD_PROV 15 /* Procedure definition (vectored) */^#define OBJ$C_GSD_SYMM 16 /* Global symbol definition (special double valued) */\#define OBJ$C_GSD_EPMM 17 /* Entry point definition (special double valued) */Z#define OBJ$C_GSD_PROM 18 /* Procedure definition (special double valued) */N#define OBJ$C_TIR 2 /*Text information record */N#define OBJ$C_EOM 3 /*End of module record */N#define OBJ$C_DBG 4 /*Debugger information record */N#define OBJ$C_TBT 5 /*Traceback information record */N#define OBJ$C_LNK 6 /*Linker options record */R#define OBJ$C_EOMW 7 /*End of module record with word psect */N#define OBJ$C_MAXRECTYP 7 /*Last assigned record  type */#define OBJ$K_SUBTYP 1#define OBJ$C_SUBTYP 1N#define OBJ$C_MAXRECSIZ 2048 /*Maximum legal record size */N#define OBJ$C_STRLVL 0 /*Structure level */N#define OBJ$C_SYMSIZ 31 /*Maximum symbol length */T#define OBJ$C_STOREPLIM -1 /*Maximum repeat count on store commands */N#define OBJ$C_PSCALILIM 9 /*Maximum p-sect alignment */ #ifdef __NEW_STARLETtypedef struct _objrecdef {N unsigned char obj$b_rectyp; /*First byte always record type */N/*Permissable record types */N unsigned char obj$b_subtyp; /*Record sub-type byte */N unsigned char obj$b_mhd_strlv; /*Structure level */ __union {N unsigned short int obj$w_mhd_recsz; /*Maximum record size */ __struct {( char objrecdef$$_fill_1 [2];N/*Mi sc. constants */% } obj$r_mhd_recsz_fields;" } obj$r_mhd_recsz_overlay; } OBJRECDEF; #if !defined(__VAXC)?#define obj$w_mhd_recsz obj$r_mhd_recsz_overlay.obj$w_mhd_recsz"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct objrecdef {N unsigned char obj$b_rectyp; /*First byte always record type */N/*Permissable record types  */N unsigned char obj$b_subtyp; /*Record sub-type byte */N unsigned char obj$b_mhd_strlv; /*Structure level */ __union {N unsigned short int obj$w_mhd_recsz; /*Maximum record size */ __struct {( char objrecdef$$_fill_1 [2];N/*Misc. constants */% } obj$r_mhd_recsz_fields;" } obj$r_mhd_recsz_overlay; } ; #if !defined(__VAXC)?#define obj$w_mhd_recsz obj$r_mhd_recsz_overlay.obj$w_mhd_recsz"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __OBJRECDEF_LOADED */ ww e,/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OPCDEF.SDI;1 *//********************************************************************************************************************************//*** MODULE $OPCDEF ***/#ifndef __OPCDEF_LOADED#define __OPCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N#define OPC$_RQ_TERME 1 /* ENABLE TERMINAL */N#define OPC$_RQ_LOGI 2 /* INITIALIZE THE LOG */N#define OPC$_RQ_RQST 3 /* OPERATOR REQUEST */N#define OPC$_RQ_REPLY 4 /* OPERATOR REPLY */N#define OPC$_RQ_CANCEL 5 /* CANCEL REQUEST */N#define OPC$_RQ_STATUS 6 /* REQUEST OPERATOR STATUS */N#define OPC$_RQ_SECURITY 7 /* MESSAGE TO SECURITY OPERATOR */N#define OPC$_RQ_LICENSE 8 /* MESSAGE TO LICENSE OPERATOR */#define OPC$M_RQ_NOOCS 128#define OPC$M_NM_CENTRL 0x1#define OPC$M_NM_PRINT 0x2#define OPC$M_NM_TAPES 0x4#define OPC$M_NM_DISKS 0x8#define OPC$M_NM_DEVICE 0x10#define OPC$M_NM_CARDS 0x20#define OPC$M_NM_NTWORK 0x40#define OPC$M_NM_CLUSTER 0x80#define OPC$M_NM_SECURITY 0x100#define OPC$M_NM_REPLY 0x200#define OPC$M_NM_SOFTWARE 0x400#define OPC$M_NM_LICENSE 0x800#define OPC$M_NM_OPER1 0x1000#define OPC$M_NM_OPER2 0x2000#define OPC$M_NM_OPER3 0x4000#define OPC$M_NM_OPER4 0x8000#define OPC$M_NM_OPER5 0x10000#define OPC$M_NM_OPER6 0x20000#define OPC$M_NM_OPER7 0x40000#define OPC$M_NM_OPER8 0x80000#define OPC$M_NM_OPER9 0x100000 #define OPC$M_NM_OPER10 0x200000 #define OPC$M_NM_OPER11 0x400000 #define OPC$M_NM_OPER12 0x800000 #ifdef __NEW_STARLETtypedef struct _opcdef {N unsigned char opc$b_ms_type; /* MESSAGE TYPE */N __union { /* Class-Target-Status */ __struct { __union {N  unsigned char opc$b_ms_target; /* MESSAGE TARGET */N unsigned char opc$b_ms_enab; /* MESSAGE ENABLES */* } opc$r_ms_target_overlay;N unsigned short int opc$w_ms_status; /* MESSAGE STATUS */) } opc$r_ms_targ_stat_overlay;2 unsigned char opc$z_ms_target_classes [3];2 unsigned char opc$z_ms_enab_terminals [3];! } opc$r_ms_c_t_s_overlay; __union {N unsigned int o pc$l_ms_rplyid; /* REPLY ID */ __union {N unsigned int opc$l_ms_mask; /* MESSAGE MASK */N unsigned int opc$l_ms_rqstid; /* REQUEST ID */$ } opc$r_ms_mask_overlay;" } opc$r_ms_rplyid_overlay; __union {N unsigned int opc$l_ms_text; /* MESSAGE TEXT */ __struct {N unsigned short int opc$w_ms_ounit; /* OPERATOR UNIT NUMBER */N char opc$t_ms_oname; /* OPERATOR NAME */# } opc$r_ms_text_fields; } opc$r_ms_text_overlay;N short int opcdef$$_fill_1 [7]; /* SPACE FOR NAME */N unsigned int opc$l_ms_otext [32]; /* OPERATOR TEXT */ __union {N unsigned int opc$l_ms_maxsz; /* MESSAGE MAX SIZE */N/* OPERATOR MESSAGE TYPES */ __stru ct {N unsigned opc$v_nm_centrl : 1; /* */( unsigned opc$v_nm_print : 1;( unsigned opc$v_nm_tapes : 1;( unsigned opc$v_nm_disks : 1;) unsigned opc$v_nm_device : 1;( unsigned opc$v_nm_cards : 1;) unsigned opc$v_nm_ntwork : 1;* unsigned opc$v_nm_cluster : 1;+ unsigned opc$v_nm_security : 1;( unsigned opc$v_nm_reply : 1;+ unsigned opc$v_nm_ software : 1;* unsigned opc$v_nm_license : 1;( unsigned opc$v_nm_oper1 : 1;( unsigned opc$v_nm_oper2 : 1;( unsigned opc$v_nm_oper3 : 1;( unsigned opc$v_nm_oper4 : 1;( unsigned opc$v_nm_oper5 : 1;( unsigned opc$v_nm_oper6 : 1;( unsigned opc$v_nm_oper7 : 1;( unsigned opc$v_nm_oper8 : 1;( unsigned opc$v_nm_oper9 : 1;) unsigned opc$v_nm_oper10 : 1;) unsigned opc $v_nm_oper11 : 1;) unsigned opc$v_nm_oper12 : 1;" } opc$r_ms_maxsz_bits;! } opc$r_ms_maxsz_overlay; } OPCDEF; #if !defined(__VAXC)T#define opc$r_ms_targ_stat_overlay opc$r_ms_c_t_s_overlay.opc$r_ms_targ_stat_overlayR#define opc$r_ms_target_overlay opc$r_ms_targ_stat_overlay.opc$r_ms_target_overlay?#define opc$b_ms_target opc$r_ms_target_overlay.opc$b_ms_target;#define opc$b_ms_enab opc$r_ms_target_overlay.opc$b_ms_enabB#define opc$w_ms_status opc$r_ms_targ_stat_overlay.opc$w_ms_statusN#define opc$z_ms_target_classes opc$r_ms_c_t_s_overlay.opc$z_ms_target_classesN#define opc$z_ms_enab_terminals opc$r_ms_c_t_s_overlay.opc$z_ms_enab_terminals?#define opc$l_ms_rplyid opc$r_ms_rplyid_overlay.opc$l_ms_rplyidK#define opc$r_ms_mask_overlay opc$r_ms_rplyid_overlay.opc$r_ms_mask_overlay9#define opc$l_ms_mask opc$r_ms_mask_overlay.opc$l_ms_mask=#define opc$l_ms_rqstid opc$r_ms_mask_overlay.opc$l_ms_rqstid9#define opc$l_ms_text opc$r_ms_text_over lay.opc$l_ms_textG#define opc$r_ms_text_fields opc$r_ms_text_overlay.opc$r_ms_text_fields:#define opc$w_ms_ounit opc$r_ms_text_fields.opc$w_ms_ounit:#define opc$t_ms_oname opc$r_ms_text_fields.opc$t_ms_oname<#define opc$l_ms_maxsz opc$r_ms_maxsz_overlay.opc$l_ms_maxszF#define opc$r_ms_maxsz_bits opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits;#define opc$v_nm_centrl opc$r_ms_maxsz_bits.opc$v_nm_centrl9#define opc$v_nm_print opc$r_ms_maxsz_bits.opc$v_nm_print9#define opc$v_nm_tapes opc$r_ms_maxs z_bits.opc$v_nm_tapes9#define opc$v_nm_disks opc$r_ms_maxsz_bits.opc$v_nm_disks;#define opc$v_nm_device opc$r_ms_maxsz_bits.opc$v_nm_device9#define opc$v_nm_cards opc$r_ms_maxsz_bits.opc$v_nm_cards;#define opc$v_nm_ntwork opc$r_ms_maxsz_bits.opc$v_nm_ntwork=#define opc$v_nm_cluster opc$r_ms_maxsz_bits.opc$v_nm_cluster?#define opc$v_nm_security opc$r_ms_maxsz_bits.opc$v_nm_security9#define opc$v_nm_reply opc$r_ms_maxsz_bits.opc$v_nm_reply?#define opc$v_nm_software opc$r_ms_maxsz_bits.op c$v_nm_software=#define opc$v_nm_license opc$r_ms_maxsz_bits.opc$v_nm_license9#define opc$v_nm_oper1 opc$r_ms_maxsz_bits.opc$v_nm_oper19#define opc$v_nm_oper2 opc$r_ms_maxsz_bits.opc$v_nm_oper29#define opc$v_nm_oper3 opc$r_ms_maxsz_bits.opc$v_nm_oper39#define opc$v_nm_oper4 opc$r_ms_maxsz_bits.opc$v_nm_oper49#define opc$v_nm_oper5 opc$r_ms_maxsz_bits.opc$v_nm_oper59#define opc$v_nm_oper6 opc$r_ms_maxsz_bits.opc$v_nm_oper69#define opc$v_nm_oper7 opc$r_ms_maxsz_bits.opc$v_nm_oper79#def ine opc$v_nm_oper8 opc$r_ms_maxsz_bits.opc$v_nm_oper89#define opc$v_nm_oper9 opc$r_ms_maxsz_bits.opc$v_nm_oper9;#define opc$v_nm_oper10 opc$r_ms_maxsz_bits.opc$v_nm_oper10;#define opc$v_nm_oper11 opc$r_ms_maxsz_bits.opc$v_nm_oper11;#define opc$v_nm_oper12 opc$r_ms_maxsz_bits.opc$v_nm_oper12"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct opcdef {N unsigned char opc$b_ms_type; /* MESSAGE TYPE */N __union {  /* Class-Target-Status */ __struct { __union {N unsigned char opc$b_ms_target; /* MESSAGE TARGET */N unsigned char opc$b_ms_enab; /* MESSAGE ENABLES */* } opc$r_ms_target_overlay;N unsigned short int opc$w_ms_status; /* MESSAGE STATUS */) } opc$r_ms_targ_stat_overlay;2 unsigned char opc$z_ms_target_classes [3];2 unsigned char opc$z_ms_ena b_terminals [3];! } opc$r_ms_c_t_s_overlay; __union {N unsigned int opc$l_ms_rplyid; /* REPLY ID */ __union {N unsigned int opc$l_ms_mask; /* MESSAGE MASK */N unsigned int opc$l_ms_rqstid; /* REQUEST ID */$ } opc$r_ms_mask_overlay;" } opc$r_ms_rplyid_overlay; __union {N unsigned int opc$l_ms_text; /* MESSAGE TEXT */  __struct {N unsigned short int opc$w_ms_ounit; /* OPERATOR UNIT NUMBER */N char opc$t_ms_oname; /* OPERATOR NAME */# } opc$r_ms_text_fields; } opc$r_ms_text_overlay;N short int opcdef$$_fill_1 [7]; /* SPACE FOR NAME */N unsigned int opc$l_ms_otext [32]; /* OPERATOR TEXT */ __union {N unsigned int opc$l_ms_maxsz; /* MESSAGE MAX SIZE */N/*  OPERATOR MESSAGE TYPES */ __struct {N unsigned opc$v_nm_centrl : 1; /* */( unsigned opc$v_nm_print : 1;( unsigned opc$v_nm_tapes : 1;( unsigned opc$v_nm_disks : 1;) unsigned opc$v_nm_device : 1;( unsigned opc$v_nm_cards : 1;) unsigned opc$v_nm_ntwork : 1;* unsigned opc$v_nm_cluster : 1;+ unsigned opc$v _nm_security : 1;( unsigned opc$v_nm_reply : 1;+ unsigned opc$v_nm_software : 1;* unsigned opc$v_nm_license : 1;( unsigned opc$v_nm_oper1 : 1;( unsigned opc$v_nm_oper2 : 1;( unsigned opc$v_nm_oper3 : 1;( unsigned opc$v_nm_oper4 : 1;( unsigned opc$v_nm_oper5 : 1;( unsigned opc$v_nm_oper6 : 1;( unsigned opc$v_nm_oper7 : 1;( unsigned opc$v_nm_oper8 : 1;( unsign ed opc$v_nm_oper9 : 1;) unsigned opc$v_nm_oper10 : 1;) unsigned opc$v_nm_oper11 : 1;) unsigned opc$v_nm_oper12 : 1;" } opc$r_ms_maxsz_bits;! } opc$r_ms_maxsz_overlay; } ; #if !defined(__VAXC)q#define opc$b_ms_target opc$r_ms_c_t_s_overlay.opc$r_ms_targ_stat_overlay.opc$r_ms_target_overlay.opc$b_ms_targetm#define opc$b_ms_enab opc$r_ms_c_t_s_overlay.opc$r_ms_targ_stat_overlay.opc$r_ms_target_overlay.opc$b_ms_enabY#define opc$w_ms_status opc$r_ms_c_t_s_overlay.opc$r_ms_targ_stat_overlay.opc$w_ms_statusN#define opc$z_ms_target_classes opc$r_ms_c_t_s_overlay.opc$z_ms_target_classesN#define opc$z_ms_enab_terminals opc$r_ms_c_t_s_overlay.opc$z_ms_enab_terminals?#define opc$l_ms_rplyid opc$r_ms_rplyid_overlay.opc$l_ms_rplyidQ#define opc$l_ms_mask opc$r_ms_rplyid_overlay.opc$r_ms_mask_overlay.opc$l_ms_maskU#define opc$l_ms_rqstid opc$r_ms_rplyid_overlay.opc$r_ms_mask_overlay.opc$l_ms_rqstid9#define opc$l_ms_text opc$r_ms_text_overlay.opc$l_ms_textP#define opc$w_ms_ounit opc$r_ms_text_overlay.opc$r_ms_text_fields.opc$w_ms_ounitP#define opc$t_ms_oname opc$r_ms_text_overlay.opc$r_ms_text_fields.opc$t_ms_oname<#define opc$l_ms_maxsz opc$r_ms_maxsz_overlay.opc$l_ms_maxszR#define opc$v_nm_centrl opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_centrlP#define opc$v_nm_print opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_printP#define opc$v_nm_tapes opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_tapesP#define opc$v_nm_disks opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_disksR#define opc$v_nm_device opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_deviceP#define opc$v_nm_cards opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_cardsR#define opc$v_nm_ntwork opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_ntworkT#define opc$v_nm_cluster opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_clusterV#define opc$v_nm_security opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_securityP#define opc$v_nm_reply opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_replyV#define opc$v_nm_software opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_softwareT#define opc$v_nm_license opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_licenseP#define opc$v_nm_oper1 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper1P#define opc$v_nm_oper2 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper2P#define opc$v_nm_oper3 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper3P#define opc$v_nm_oper4 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper4P#define opc$v_nm_oper5 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper5P#define opc$v_nm_oper6 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper6P#define opc$v_nm_oper7 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper7P#define opc$v_nm_oper8 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper8P#define opc$v_nm_oper9 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper9R#define opc$v_nm_ope r10 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper10R#define opc$v_nm_oper11 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper11R#define opc$v_nm_oper12 opc$r_ms_maxsz_overlay.opc$r_ms_maxsz_bits.opc$v_nm_oper12"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define OPC$M_OPR_CENTRAL 0x1#define OPC$M_OPR_PRINTER 0x2#define OPC$M_OPR_TAPES 0x4#define OPC$M_OPR_DISKS 0x8#define OPC$M_OPR_DEVICES 0x10#define OPC$M_OPR_CARDS 0x20#define OPC$M_OPR_NETWORK 0x40#define OPC$M_OPR_CLUSTER 0x80 #define OPC$M_OPR_SECURITY 0x100#define OPC$M_OPR_REPLY 0x200 #define OPC$M_OPR_SOFTWARE 0x400#define OPC$M_OPR_LICENSE 0x800#define OPC$M_OPR_USER1 0x1000#define OPC$M_OPR_USER2 0x2000#define OPC$M_OPR_USER3 0x4000#define OPC$M_OPR_USER4 0x8000#define OPC$M_OPR_USER5 0x10000#define OPC$M_OPR_USER6 0x20000#define OPC$M_OPR_USER7 0x40000#define OPC$M_OPR_USER8 0x80000 #define OPC$M_OPR_USER9 0x100000!#define OPC$M_OPR_USER10 0x200000!#define OPC$M_OPR_USER11 0x400000!#define OPC$M_OPR_USER12 0x800000 #ifdef __NEW_STARLETtypedef union _opc_oprdef { __struct {' unsigned opc$v_opr_central : 1;' unsigned opc$v_opr_printer : 1;% unsigned opc$v_opr_tapes : 1;% unsigned opc$v_opr_disks : 1;' unsigned opc$v_opr_devices : 1;% unsigned opc$v_opr_cards : 1;' unsigned opc$v_opr_network : 1;' unsigned opc$v_opr_cluster : 1;( unsi gned opc$v_opr_security : 1;% unsigned opc$v_opr_reply : 1;( unsigned opc$v_opr_software : 1;' unsigned opc$v_opr_license : 1;% unsigned opc$v_opr_user1 : 1;% unsigned opc$v_opr_user2 : 1;% unsigned opc$v_opr_user3 : 1;% unsigned opc$v_opr_user4 : 1;% unsigned opc$v_opr_user5 : 1;% unsigned opc$v_opr_user6 : 1;% unsigned opc$v_opr_user7 : 1;% unsigned opc$v_opr_user8 : 1;% unsigned opc$v_opr_user9  : 1;& unsigned opc$v_opr_user10 : 1;& unsigned opc$v_opr_user11 : 1;& unsigned opc$v_opr_user12 : 1; } opc$r_oprdef_bits; } OPC_OPRDEF; #if !defined(__VAXC)=#define opc$v_opr_central opc$r_oprdef_bits.opc$v_opr_central=#define opc$v_opr_printer opc$r_oprdef_bits.opc$v_opr_printer9#define opc$v_opr_tapes opc$r_oprdef_bits.opc$v_opr_tapes9#define opc$v_opr_disks opc$r_oprdef_bits.opc$v_opr_disks=#define opc$v_opr_devices opc$r_oprdef_bits.opc$v_opr_ devices9#define opc$v_opr_cards opc$r_oprdef_bits.opc$v_opr_cards=#define opc$v_opr_network opc$r_oprdef_bits.opc$v_opr_network=#define opc$v_opr_cluster opc$r_oprdef_bits.opc$v_opr_cluster?#define opc$v_opr_security opc$r_oprdef_bits.opc$v_opr_security9#define opc$v_opr_reply opc$r_oprdef_bits.opc$v_opr_reply?#define opc$v_opr_software opc$r_oprdef_bits.opc$v_opr_software=#define opc$v_opr_license opc$r_oprdef_bits.opc$v_opr_license9#define opc$v_opr_user1 opc$r_oprdef_bits.opc$v_opr_ user19#define opc$v_opr_user2 opc$r_oprdef_bits.opc$v_opr_user29#define opc$v_opr_user3 opc$r_oprdef_bits.opc$v_opr_user39#define opc$v_opr_user4 opc$r_oprdef_bits.opc$v_opr_user49#define opc$v_opr_user5 opc$r_oprdef_bits.opc$v_opr_user59#define opc$v_opr_user6 opc$r_oprdef_bits.opc$v_opr_user69#define opc$v_opr_user7 opc$r_oprdef_bits.opc$v_opr_user79#define opc$v_opr_user8 opc$r_oprdef_bits.opc$v_opr_user89#define opc$v_opr_user9 opc$r_oprdef_bits.opc$v_opr_user9;#define opc$v_opr_user10 opc$r_oprdef_bits.opc$v_opr_user10;#define opc$v_opr_user11 opc$r_oprdef_bits.opc$v_opr_user11;#define opc$v_opr_user12 opc$r_oprdef_bits.opc$v_opr_user12"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union opc_oprdef { __struct {' unsigned opc$v_opr_central : 1;' unsigned opc$v_opr_printer : 1;% unsigned opc$v_opr_tapes : 1;% unsigned opc$v_opr_disks : 1;' unsigned opc$v_opr_devices : 1;% unsigned opc$v _opr_cards : 1;' unsigned opc$v_opr_network : 1;' unsigned opc$v_opr_cluster : 1;( unsigned opc$v_opr_security : 1;% unsigned opc$v_opr_reply : 1;( unsigned opc$v_opr_software : 1;' unsigned opc$v_opr_license : 1;% unsigned opc$v_opr_user1 : 1;% unsigned opc$v_opr_user2 : 1;% unsigned opc$v_opr_user3 : 1;% unsigned opc$v_opr_user4 : 1;% unsigned opc$v_opr_user5 : 1;% unsigned opc$v_opr_user6 : 1;% unsigned opc$v_opr_user7 : 1;% unsigned opc$v_opr_user8 : 1;% unsigned opc$v_opr_user9 : 1;& unsigned opc$v_opr_user10 : 1;& unsigned opc$v_opr_user11 : 1;& unsigned opc$v_opr_user12 : 1; } opc$r_oprdef_bits; } ; #if !defined(__VAXC)=#define opc$v_opr_central opc$r_oprdef_bits.opc$v_opr_central=#define opc$v_opr_printer opc$r_oprdef_bits.opc$v_opr_printer9#define opc$v_opr_tapes opc$r_oprdef_bits.opc$v_opr_tapes9#define op c$v_opr_disks opc$r_oprdef_bits.opc$v_opr_disks=#define opc$v_opr_devices opc$r_oprdef_bits.opc$v_opr_devices9#define opc$v_opr_cards opc$r_oprdef_bits.opc$v_opr_cards=#define opc$v_opr_network opc$r_oprdef_bits.opc$v_opr_network=#define opc$v_opr_cluster opc$r_oprdef_bits.opc$v_opr_cluster?#define opc$v_opr_security opc$r_oprdef_bits.opc$v_opr_security9#define opc$v_opr_reply opc$r_oprdef_bits.opc$v_opr_reply?#define opc$v_opr_software opc$r_oprdef_bits.opc$v_opr_software=#define opc$ v_opr_license opc$r_oprdef_bits.opc$v_opr_license9#define opc$v_opr_user1 opc$r_oprdef_bits.opc$v_opr_user19#define opc$v_opr_user2 opc$r_oprdef_bits.opc$v_opr_user29#define opc$v_opr_user3 opc$r_oprdef_bits.opc$v_opr_user39#define opc$v_opr_user4 opc$r_oprdef_bits.opc$v_opr_user49#define opc$v_opr_user5 opc$r_oprdef_bits.opc$v_opr_user59#define opc$v_opr_user6 opc$r_oprdef_bits.opc$v_opr_user69#define opc$v_opr_user7 opc$r_oprdef_bits.opc$v_opr_user79#define opc$v_opr_user8 opc$r_oprd ef_bits.opc$v_opr_user89#define opc$v_opr_user9 opc$r_oprdef_bits.opc$v_opr_user9;#define opc$v_opr_user10 opc$r_oprdef_bits.opc$v_opr_user10;#define opc$v_opr_user11 opc$r_oprdef_bits.opc$v_opr_user11;#define opc$v_opr_user12 opc$r_oprdef_bits.opc$v_opr_user12"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #define OPC opcdefR#define OPC$V_NM_CENTRL OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_CENTRLP#define OPC$V_NM_PRINT OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_PRINTP#define OPC$V_NM_TAPES OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_TAPESP#define OPC$V_NM_DISKS OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_DISKSR#define OPC$V_NM_DEVICE OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_DEVICEP#define OPC$V_NM_CARDS OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_CARDSR#define OPC$V_NM_NTWORK OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_NTWORKU#define OPC$V_NM_CLUSTER OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_CLUSTERV#define OPC$V_NM_SECURITY OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_SECURITYS#define OPC$V_NM_REPLY OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_REPLYV#define OPC$V_NM_SOFTWARE OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_SOFTWAREU#define OPC$V_NM_LICENSE OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_LICENSEP#define OPC$V_NM_OPER1 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER1P#define OPC$V_NM_OPER2 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER2P#define OPC$V_NM_OPER3 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER3P#define OPC$V_NM_OPER4 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER4P#define OPC$V_NM_OPER5 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER5P#define OPC$V_NM_OPER6 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER6P#define OPC$V_NM_OPER7 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER7P#define OPC$V_NM_OPER8 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_M AXSZ_BITS.OPC$V_NM_OPER8P#define OPC$V_NM_OPER9 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER9R#define OPC$V_NM_OPER10 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER10R#define OPC$V_NM_OPER11 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER11R#define OPC$V_NM_OPER12 OPC$R_MS_MAXSZ_OVERLAY.OPC$R_MS_MAXSZ_BITS.OPC$V_NM_OPER12#ifndef __cplusplus"#pragma member_alignment __restore#pragma standard#include #pragma member_alignment __save#pragma nomember_alignment#pragma nostandard#endif /* __cplusplus */#define OPC$K_SYSTEM 1#define OPC$K_GROUP 2#define OPC$K_USER 3#define OPC$K_UNSPEC 4#define OPC$C_SYSTEM 1#define OPC$C_GROUP 2#define OPC$C_USER 3#define OPC$C_UNSPEC 4#define OPC$K_SW_VERSION 9#define OPC$K_MAXREAD 2560#define OPC$K_MAXMESSAGE 2048#define OPC$K_COMHDRSIZ 38N#define OPC$_OPCOMERROR 99999 /* New error message */#define OPC$_X_OPRENABLE 10#define OPC$_X_LOGFILE 11#define OPC$_X_REQUEST 12#define OPC$_X_REPLY 13#define OPC$_X_CANCEL 14#define OPC$_X_STATUS 15#define OPC$_X_SHUTDOWN 16#define OPC$_X_TIMESTAMP 17#define OPC$_X_SECURITY 18#define OPC$_X_CLUSMSG 19#define OPC$_X_DEBUG 20#define OPC$_X_CNXMAN 21"#define OPC$_X_REQUEST_END_MARK 22N#define OPC$K_CLM__ACKNOWLEDGEMENT 1 /* Response to acknowledge request */X#define OPC$K_CLM__ACKNOWLEDGE_PLEASE 2 /* Request for remote node to announce itself */N#define OPC$K_CLM__CANCEL 3  /* Explicit cancel of request */X#define OPC$K_CLM__CHECK_OPERATOR 4 /* Make sure this operator is in the database */T#define OPC$K_CLM__CHECK_REQUEST 5 /* Make sure a request is in the database */X#define OPC$K_CLM__CLUMBX 6 /* Cluster mailbox message passed from cnxman */N#define OPC$K_CLM__CLUSTER 7 /* Cluster status change report */T#define OPC$K_CLM__DEVICE 8 /* Device message (on-line, off-line etc) */N#define OPC$K_CLM__IMP_CANCEL 9 /* Implicitly cancel a request */N#define OPC$K_CLM__IMP_DISABLE 10 /* Implicitly disable an operator */a#define OPC$K_CLM__OPRENABLE 11 /* Tell everyone else to enable or disable an operator */N#define OPC$K_CLM__REPLY 12 /* REPLY /PEND etc command */T#define OPC$K_CLM__REPLY_COMPLETE 13 /* Operator request completed by operator */N#define OPC$K_CLM__REQUEST 14 /* Operator request */n#define OPC$K_CLM__RPYBRD 15 /* Message from OPCOM to remotes, info for cluster REPLY /TERM, etc */a#define OPC$K_CLM__RPYBRD_LOCAL 16 /* Broadcast message from REPLY to OPCOM on local node */N#define OPC$K_CLM__RPYNOT 17 /* Reply notifications */N#define OPC$K_CLM__SECURITY 18 /* Security alarm from remote */N#define OPC$K_CLM__SHUTDOWN 19 /* Shut down operations */N#define OPC$K_CLM__LOGFILE 20 /* Enable/disable logfile operator */& #define OPC$K_CLM__REQUEST_END_MARK 21N#define OPC$K_HDR_SIZE 26 /* Size of common header */ #ifdef __NEW_STARLET typedef struct _header_message {N unsigned char opc$b_rqstcode; /* Request code */N unsigned char opc$b_scope; /* Request SCOPE */N unsigned int opc$l_options; /* Request independent option bits. */ __union {N unsigned int opc$l_rq_options; /* Request dependent options  */N __struct { /* Also make it available as */N unsigned char opc$b_rqopt_code; /* a code byte and some fill */, unsigned char opc$b_rqopt_fillb;1 unsigned short int opc$w_rqopt_fillw; } opc$r_rq_opt_s; } opc$r_rqopt;N unsigned int opc$l_attnmask1; /* Attention mask part 1 */N unsigned int opc$l_attnmask2; /* Attention mask part 2 */N unsigned int opc$l _rqstid; /* User specified request id # */N unsigned int opc$l_uic; /* UIC of requestor */ } HEADER_MESSAGE; #if !defined(__VAXC)5#define opc$l_rq_options opc$r_rqopt.opc$l_rq_optionsD#define opc$b_rqopt_code opc$r_rqopt.opc$r_rq_opt_s.opc$b_rqopt_code"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct header_message {N unsigned char opc$b_rqstcode; /* Request code */N unsigned c har opc$b_scope; /* Request SCOPE */N unsigned int opc$l_options; /* Request independent option bits. */ __union {N unsigned int opc$l_rq_options; /* Request dependent options */N __struct { /* Also make it available as */N unsigned char opc$b_rqopt_code; /* a code byte and some fill */, unsigned char opc$b_rqopt_fillb;1 unsigned short int opc$w_rqopt_fillw;  } opc$r_rq_opt_s; } opc$r_rqopt;N unsigned int opc$l_attnmask1; /* Attention mask part 1 */N unsigned int opc$l_attnmask2; /* Attention mask part 2 */N unsigned int opc$l_rqstid; /* User specified request id # */N unsigned int opc$l_uic; /* UIC of requestor */ } ; #if !defined(__VAXC)5#define opc$l_rq_options opc$r_rqopt.opc$l_rq_optionsD#define opc$b_rqopt_code opc$r_rqopt.opc$r_rq_opt_s.opc$b_rqopt_code"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define OPC$M_NOLOG 0x1#define OPC$M_NOBRD 0x2#define OPC$M_NOCLUSTER 0x4 #ifdef __NEW_STARLETtypedef union _fill_0_ {& unsigned int opc$l_header_options; __struct {N unsigned opc$v_nolog : 1; /* Do not log the action */N unsigned opc$v_nobrd : 1; /* Do not broadcast */N unsigned opc$v_nocluster : 1; /* Do not send to cluster */# unsigned opc$v_fill_2_ : 5; } opc$r_fill_1_; } FILL_0_; #if !defined(__VAXC)-#define opc$v_nolog opc$r_fill_1_.opc$v_nolog-#define opc$v_nobrd opc$r_fill_1_.opc$v_nobrd5#define opc$v_nocluster opc$r_fill_1_.opc$v_nocluster"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union fill_0_ {& unsigned int opc$l_header_options; __struct {N unsigned opc$v_nolog : 1; /* Do not log the action  */N unsigned opc$v_nobrd : 1; /* Do not broadcast */N unsigned opc$v_nocluster : 1; /* Do not send to cluster */# unsigned opc$v_fill_2_ : 5; } opc$r_fill_1_; } ; #if !defined(__VAXC)-#define opc$v_nolog opc$r_fill_1_.opc$v_nolog-#define opc$v_nobrd opc$r_fill_1_.opc$v_nobrd5#define opc$v_nocluster opc$r_fill_1_.opc$v_nocluster"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define OPC$K_OPRENABLE_MIN_SIZE 30 /* Min message size header + 4 */ #ifdef __NEW_STARLET#typedef struct _oprenable_message {# char opc$b_oprenable_fill [26];#if defined(__VAXC) char opc$t_oprenable_opr[];#elseZ/* Warning: empty char[] member for opc$t_oprenable_opr at end of structure not created */"#endif /* #if defined(__VAXC) */ } OPRENABLE_MESSAGE;#else /* __OLD_STARLET */struct oprenable_message {# char opc$b_oprenable_fill [26];#if defined(__VAXC) char opc$t_oprenable_opr[];#elseZ/* Warning: empty char[] member for opc$t_oprenable_opr at end of structure not created */"#endif /* #if defined(__VAXC) */ } ;%#endif /* #ifdef __NEW_STARLET */#define OPC$M_DISABLE 0x1#define OPC$M_PERMOPER 0x2#define OPC$M_NOREMIND 0x4 #ifdef __NEW_STARLETtypedef union _fill_3_ {) unsigned int opc$l_oprenable_options; __struct {# unsigned opc$v_disable : 1;$ unsigned opc$v_permoper : 1;$ unsigned opc$v_noremind : 1;# unsigned opc$v_fill_5_ : 5; } opc$r_fill_4_; } FILL_3_; #if !defined(__VAXC)1#define opc$v_disable opc$r_fill_4_.opc$v_disable3#define opc$v_permoper opc$r_fill_4_.opc$v_permoper3#define opc$v_noremind opc$r_fill_4_.opc$v_noremind"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union fill_3_ {) unsigned int opc$l_oprenable_options; __struct {# unsigned opc$v_disable : 1;$ unsigned opc$v_permoper : 1;$ unsigned opc$v_noremind : 1;# unsigned opc$v_fill_5_ : 5; } opc$r_fill_4_; } ; #if !defined(__VAXC)1#define opc$v_disable opc$r_fill_4_.opc$v_disable3#define opc$v_permoper opc$r_fill_4_.opc$v_permoper3#define opc$v_noremind opc$r_fill_4_.opc$v_noremind"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define OPC$K_LOGFILE_MIN_SIZE 30 /* Min message size header + 4 */_#define OPC$K_INITLOG 0 /* If one is open, close logfile. Open new logfile. */N#define OPC$K_CLOSELOG 1 /* Close logfile. */T#define OPC$K_ENABLELOG 2 /* If no logfile is open, open a logfile. */N/* Add classes in ATTNMASK to logfile operator mask. */d#define OPC$K_DISABLELOG 3 /* Remove classes in ATTNMASK from logfile operator mask. */N/* If mask goes to 0, close logfile. */N#define OPC$K_MAX_LOGOPT 4 /* One more than maximum allowed */ #ifdef __NEW_STARLET!typedef struct _logfile_message {O char opc$b_logfile_fill [26]; /* Skip to request dependent options */#if defined(__VAXC) char opc$t_logfile_opr[];#elseX/* Warning: empty char[] member for opc$t_logfile_opr at end of structure not created */"#endif /* #if defined(__VAXC) */ } LOGFILE_MESSAGE;#else /* __OLD_STARLET */struct logfile_message {O char opc$b_logfile_fill [26]; /* Skip to request dependent options */#if defined(__VAXC) char opc$t_logfile_opr[];#elseX/* Warning: empty char[] member for opc$t_logfile_opr at end of structure not created */"#endif /* #if defined(__VAXC) */ } ;%#endif /* #ifdef __NEW_STARLET */N#define OPC$K_REQUEST_MIN_SIZE 28 /* Min message size */ #ifdef __NEW_STARLET!typedef struct _request_message {! char opc$b_request_fill [26];N unsigned short int opc$w_request_length; /* Length of text */#if defined(__VAXC) char opc$t_request_text[];#elseY/* Warning: empty char[] member for opc$t_request_text at end of structure not created */"#endif /* #if defined(__VAXC) */ } REQUEST_MESSAGE;#else /* __OLD_STARLET */struct request_message {! char opc$b_request_fill [26];N unsigned short int opc$w_request_length; /* Length of text */#if defined(__VAXC) char opc$t_request_text[];#elseY/* Warning: empty char[] member for opc$t_request_text at end of structure not created */"#endif /* #if defined(__VAXC) */ } ;%#endif /* #ifdef __NEW_STARLET */N#define OPC$K_SECURITY_MIN_SIZE 28 /* Min message size */ #ifdef __NEW_STARLET"typedef struct _security_message {" char opc$b_security_fill [26];N unsigned short int opc$w_security_length; /* Length of text */#if defined(__VAXC) char opc$t_security_text[];#elseZ/* W arning: empty char[] member for opc$t_security_text at end of structure not created */"#endif /* #if defined(__VAXC) */ } SECURITY_MESSAGE;#else /* __OLD_STARLET */struct security_message {" char opc$b_security_fill [26];N unsigned short int opc$w_security_length; /* Length of text */#if defined(__VAXC) char opc$t_security_text[];#elseZ/* Warning: empty char[] member for opc$t_security_text at end of structure not created */"#endif /* #if defined(__VAXC) */ } ;%#endif /* #ifdef __NEW_STARLET */#define OPC$K_REPLY_MIN_SIZE 32 #ifdef __NEW_STARLETtypedef struct _reply_message { char opc$b_reply_fill [26];#if defined(__VAXC) char opc$t_reply_opr[];#elseV/* Warning: empty char[] member for opc$t_reply_opr at end of structure not created */"#endif /* #if defined(__VAXC) */ } REPLY_MESSAGE;#else /* __OLD_STARLET */struct reply_message { char opc$b_reply_fill [26];#if defined(__VAXC) char opc$t_reply_opr[];#elseV/* Warning: empty char[] member for opc$t_reply_opr at end of structure not created */"#endif /* #if defined(__VAXC) */ } ;%#endif /* #ifdef __NEW_STARLET */N#define OPC$K_STATUS_MIN_SIZE 30 /* Min message size header + 4 */ #ifdef __NEW_STARLET typedef struct _status_message { char opc$b_status_fill [26];#if defined(__VAXC) char opc$t_status_opr[];#elseW/* Warning: empty char[] member for opc$t_status_opr at en d of structure not created */"#endif /* #if defined(__VAXC) */ } STATUS_MESSAGE;#else /* __OLD_STARLET */struct status_message { char opc$b_status_fill [26];#if defined(__VAXC) char opc$t_status_opr[];#elseW/* Warning: empty char[] member for opc$t_status_opr at end of structure not created */"#endif /* #if defined(__VAXC) */ } ;%#endif /* #ifdef __NEW_STARLET */N#define OPC$K_TIMESTAMP_MIN_SIZE 26 /* Min message size */ #i fdef __NEW_STARLET#typedef struct _timestamp_message {# char opc$b_timestamp_fill [26]; } TIMESTAMP_MESSAGE;#else /* __OLD_STARLET */struct timestamp_message {# char opc$b_timestamp_fill [26]; } ;%#endif /* #ifdef __NEW_STARLET */N#define OPC$K_SHUTDOWN_MIN_SIZE 26 /* Min message size */ #ifdef __NEW_STARLET"typedef struct _shutdown_message {" char opc$b_shutdown_fill [26]; } SHUTDOWN_MESSAGE;#else /* __OLD_STARLET */ struct shutdown_message {" char opc$b_shutdown_fill [26]; } ;%#endif /* #ifdef __NEW_STARLET */#define OPC$M_CLUSTER 0x1 #ifdef __NEW_STARLETtypedef union _fill_6_ {( unsigned int opc$l_shutdown_options; __struct {# unsigned opc$v_cluster : 1;# unsigned opc$v_fill_8_ : 7; } opc$r_fill_7_; } FILL_6_; #if !defined(__VAXC)1#define opc$v_cluster opc$r_fill_7_.opc$v_cluster"#endif /* #if !defined(__VAXC) */ #else /* __O LD_STARLET */union fill_6_ {( unsigned int opc$l_shutdown_options; __struct {# unsigned opc$v_cluster : 1;# unsigned opc$v_fill_8_ : 7; } opc$r_fill_7_; } ; #if !defined(__VAXC)1#define opc$v_cluster opc$r_fill_7_.opc$v_cluster"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define OPC$K_CANCEL_MIN_SIZE 26 /* Min message size */ #ifdef __NEW_STARLET typedef struct _cancel_message {   char opc$b_cancel_fill [26]; } CANCEL_MESSAGE;#else /* __OLD_STARLET */struct cancel_message { char opc$b_cancel_fill [26]; } ;%#endif /* #ifdef __NEW_STARLET */#define OPC$M_RQSTDONE 0x1 #ifdef __NEW_STARLETtypedef union _fill_9_ {& unsigned int opc$l_cancel_options; __struct {$ unsigned opc$v_rqstdone : 1;$ unsigned opc$v_fill_11_ : 7; } opc$r_fill_10_; } FILL_9_; #if !defined(__VAXC)4#define opc$v_rqstdone opc$r_fill_10_.opc$v_rqstdone"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union fill_9_ {& unsigned int opc$l_cancel_options; __struct {$ unsigned opc$v_rqstdone : 1;$ unsigned opc$v_fill_11_ : 7; } opc$r_fill_10_; } ; #if !defined(__VAXC)4#define opc$v_rqstdone opc$r_fill_10_.opc$v_rqstdone"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef union _opcf_arg {N  int opcf_arg$l_arg_data; /* argument data */ __struct {W unsigned short int opcf_arg$w_arg_offset; /* The offset to the argument data */[ unsigned short int opcf_arg$w_arg_cntrl; /* A control code for argument handling */ } opcf_arg$r_arg_desc; } OPCF_ARG; #if !defined(__VAXC)G#define opcf_arg$w_arg_offset opcf_arg$r_arg_desc.opcf_arg$w_arg_offsetE#define opcf_arg$w_arg_cntrl opcf_arg$r_arg_desc.opcf_arg$w_arg_cntrl"#e ndif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef union _opcf_arg {N int opcf_arg$l_arg_data; /* argument data */ __struct {W unsigned short int opcf_arg$w_arg_offset; /* The offset to the argument data */[ unsigned short int opcf_arg$w_arg_cntrl; /* A control code for argument handling */ } opcf_arg$r_arg_desc; } opcf_arg; #if !defined(__VAXC)G#define opcf_arg$w_arg_offset opcf_arg$r_arg_desc. opcf_arg$w_arg_offsetE#define opcf_arg$w_arg_cntrl opcf_arg$r_arg_desc.opcf_arg$w_arg_cntrl"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */X/* This structure defines a message sent to OPCOM using the MSG$_OPCFAO message type. */ #ifdef __NEW_STARLETtypedef struct _opcfao {N unsigned short int opcf$w_msgtype; /* Dispatch message type code */N unsigned short int opcf$w_spare_1; /* Unused word - alignment */P unsigned int opcf$l_opc_ msg; /* The message file code for msg text */N unsigned int opcf$l_opc_class_msk; /* The operator class mask */N unsigned int opcf$l_arg_count; /* The number of arguments */ __union {N OPCF_ARG opcf$r_item_arg [60]; /* Argument items */N char opcf$t_item_cd [240]; /* Argument data - character */N unsigned int opcf$l_item_ld [60]; /* Argument data - long */ } opcf$r_variable_data;  } OPCFAO; #if !defined(__VAXC)<#define opcf$r_item_arg opcf$r_variable_data.opcf$r_item_arg:#define opcf$t_item_cd opcf$r_variable_data.opcf$t_item_cd:#define opcf$l_item_ld opcf$r_variable_data.opcf$l_item_ld"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _opcfao {N unsigned short int opcf$w_msgtype; /* Dispatch message type code */N unsigned short int opcf$w_spare_1; /* Unused word - alignment */P unsigned int opcf$l_op c_msg; /* The message file code for msg text */N unsigned int opcf$l_opc_class_msk; /* The operator class mask */N unsigned int opcf$l_arg_count; /* The number of arguments */ __union {N opcf_arg opcf$r_item_arg [60]; /* Argument items */N char opcf$t_item_cd [240]; /* Argument data - character */N unsigned int opcf$l_item_ld [60]; /* Argument data - long */ } opcf$r_variable_data;  } opcfao; #if !defined(__VAXC)<#define opcf$r_item_arg opcf$r_variable_data.opcf$r_item_arg:#define opcf$t_item_cd opcf$r_variable_data.opcf$t_item_cd:#define opcf$l_item_ld opcf$r_variable_data.opcf$l_item_ld"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */Q/* OPCFAO option codes. Unless commented otherwise, these codes correspond to */O/* the equivalent FAO op code (e.g. !AC --> AC, !%T --> T). These codes are */N/* used as input arguments to exe_std$sndopcfao as controls. */#define OPCF$K_AC 1#define OPCF$K_AD 2#define OPCF$K_AF 3#define OPCF$K_AS 4k#define OPCF$K_AS_DEVICE_NAME 5 /* Pass UCB for conversion to device name string with descriptor */#define OPCF$K_AZ 6#define OPCF$K_D 7#define OPCF$K_I 8#define OPCF$K_OA 9#define OPCF$K_OB 10#define OPCF$K_OH 11#define OPCF$K_OI 12#define OPCF$K_OJ 13#define OPCF$K_OL 14#define OPCF$K_OQ 15#define OPCF$K_OW 16#define OPCF$K_SA 17#define OPCF$K_SB 18#define OPCF$K_SH 19#define OPCF$K_SI 20#define OPCF$K_SJ 21#define OPCF$K_SL 22#define OPCF$K_SQ 23#define OPCF$K_SW 24#define OPCF$K_T 25#define OPCF$K_U 26#define OPCF$K_UA 27#define OPCF$K_UB 28#define OPCF$K_UH 29#define OPCF$K_UI 30#define OPCF$K_UJ 31#define OPCF$K_UL 32#define OPCF$K_UQ 33#define OPCF$K_UW 34#define OPCF$K_XA 35#define OPCF$K_XB 36#define OPCF$K_XH 37#define OPCF$K_XI 38#define OPCF$K_XJ 39#define OPCF$K_XL 40#define OPCF$K_XQ 41#define OPCF$K_XW 42#define OPCF$K_ZA 43#define OPCF$K_ZB 44#define OPCF$K_ZH 45#define OPCF$K_ZI 46#define OPCF$K_ZJ 47#define OPCF$K_ZL 48#define OPCF$K_ZQ 49#define OPCF$K_ZW 50!#define OPCF$K_MIN_OPCFAO_CNTRL 1"#define OPCF$K_MAX_OPCFAO_CNTRL 50N#define OPCF$K_BY_REF 1 /* Pass argument by reference */N#define OPCF$K_BY_VAL 2 /* Pass argument by value */N#define OPCF$K_BY_DESC 3 /* Pass argument by descriptor */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __OPCDEF_LOADED */ ww )-/********************************************************************************************************************************/= /* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OPCMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $OPCMSG ***/#ifndef __OPCMSG_LOADED#define __OPCMSG_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:38.56 */N/* */N/* OPCMSG.MSG - SYSTEM DEFINITION FILE FOR OPCOM  */N/* */J/* VERSION: 'X-20' */N/* */d/************************************************************************************************ */d/** * */d/** COPYRIGHT 2001,2002 COMPAQ INFORMATION TECHNOLOGIES GROUP, L.P. * */d/** * */d/** COMPAQ AND THE COMPAQ LOGO ARE TRADEMARKS OF COMPAQ INFORMATION TECHNOLOGIES GROUP, * */d/** L.P. IN THE U.S. AND/OR OTHER COUNTRIES. * */d/** * */d/** CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM COMPAQ REQUIRED FOR POSSESSION, USE OR * */d/** COPYING. CONSISTENT WITH FAR 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE, * */d/** COMPUTER SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL ITEMS ARE LICENSED TO * */d/** THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD COMMERCIAL LICENSE. * */d/** * */d/***************************************** ******************************************************* */N/*++ */N/* */N/* FACILITY: VAX/VMS SYSTEM MACRO LIBRARIES */N/* */N/* ABSTRACT: */N/* ! */I/* THIS FILE CONTAINS THE SOURCE FOR OPCOM MESSAGES. */N/* */N/* ENVIRONMENT: */N/* */I/* N/A */N/* */N"/*-- */N/* */N/* */H/* AUTHOR: THE VMS GROUP CREATION DATE: 1-AUG-1976 */N/* */N/* MODIFIED BY: */N/* X-20 BJ # BHARGAVA JANDHYALA 3-MAY2011 */S/* ADD PE_CHCL,PE_CHOP,PE_ECS_IN AND PE_ECS_OUT FOR PEDRIVER OPCOM */N/* */1/* X-19 RAB0152 ROBERT A. BROOKS 23-FEB-2006 */B/* ADD SHADISSOLVED, SHAMEMEXPEL, AND SHAMEMDMT */N/* */6/* X-18 JJF0317 J. JEFFERY FRIEDRICHS 9-JUN-2005 */B/* ADD INSAMCVP AND HBMMRESET MESSA $GES */N/* */&/* X-17 ABP ANU PANT 27-FEB-2003 */B/* FOR MVSUPMSG, ADD THE NAME OF THE NODE THAT IS IN MOUNT */B/* VERIFICATION. */N/* *///* X-16 KSG0145 KEVIN GREANEY 11-FEB-2003 */B/* MOVE MESSAGE MVSUPMSG TO THE BOTTOM OF THE MESSAGE FILE. */B/* THIS WAY, THE AS %SOCIATED MESSAGES NUMBERS WILL STAY THE */B/* SAME, AND ANY DEPENDENCE ON THOSE MESSAGE NUMBERS WILL NOT */B/* BE IMPACTED. */&/* X-15 ABP ANU PANT 22-JAN-2003 */E/* ADD NEW SUPPRESS MOUNT VERIFICAITON, MVSUPMSG, MESSAGE CODE. */N/* *///* X-14 KSG0143 KEVIN GREANEY 19-MAR-2002 */N/* FIX THE TEXT IN THE WSINCLUSTER MESSAGE. OPC$ENABLE_OPA0 */N&/* SHOULD BE OPC$OPA0_ENABLE, AND OPC$ENABLE_LOGFILE SHOULD */N/* BE OPC$LOGFILE_ENABLE. */N/* */0/* X-13 RAB010 ROBERT A. BROOKS 31-OCT-2001 */B/* FOR PATHAUTSW AND PATHMANSW, ADD THE NAME OF THE NODE THAT */B/* IS SERVING THE OLD AND NEW PATHS. */N/* */F'/* X-12 KSG0138 KEVIN GREANEY 04-OCT-2000 */B/* CHANGE THE TEXT IN WSINCLUSTER TO REMOVE THE REFERENCE TO */B/* WORKSTATION. SINCE MANY ALPHA SERVERS ARE SHIPPING WITH */C/* GRAPHICS CARDS, THEY ARE SEEN AS WORKSTATIONS BY THE COMMAND */B/* PROCEDURE VMS$DEVICE_STARTUP.COM. CUSTOMERS MIGHT NOT BE */C/* HAPPY SEEING THEIR ALPHASERVER REFERRED TO AS A WORKSTATION. */N/* */F/* X-11 KS(G0137 KEVIN GREANEY 07-SEP-2000 */B/* MOVE THE MESSAGE ADDED IN X-10 TO THE BOTTOM OF THE FILE. */B/* THIS WAY, MESSAGES WILL RETAIN THE SAME VALUE IN CASE */B/* SOMEONE USES THAT INSTEAD OF THE MESSAGE NAME. */N/* */F/* X-10 OH OLIVER HELLWIG 30-JUN-2000 */N/* PTR 75-45-848 & 75-52-354 */N/* ) ADD A NEW MESSAGE FOR THE FIBRE CHANNEL DRIVER (FGE) THAT */P/* IS USED TO TELL THE USER THAT A FIBRE CHANNEL STORAGE DEVICE */N/* REJECTED THE DRIVER PORT LOGIN. */N/* */N/* X-9 KSG0132 KEVIN GREANEY 12-AUG-1999 */N/* ADD A TRAILING BLANK LINE TO THE WSINCLUSTER MESSAGE */N/* ADDED BELOW. I*T WILL MAKE IT STAND OUT A LITTLE MORE. */N/* */O/* X-8 KSG0132 KEVIN GREANEY 08-JUL-1999 */N/* ADD WSINCLUSTER MESSAGE TO LET USERS KNOW THAT THIS SYSTEM */O/* IS A WORKSTATION IN A CLUSTER. AND, BY DEFAULT, OPCOM WILL */N/* NOT ENABLE THE OPERATOR CONSOLE OR LOGFILE. */N/* + */O/* X-7 KSG KEVIN GREANEY 15-APR-1999 */N/* ADD THE CODE TO INCLUDE THE STANDARD HEADER IN THE TWO */N/* MESSAGES THAT WERE ADDED IN EDIT X-6. */N/* */N/* */O/* X-6 KSG KEVIN GREANEY 05-APR-1999 *,/N/* ADD OPA0CLERR AND LOGFCLERR ERROR MESSAGES. THIS */N/* IS PART OF THE FIX FOR CFS.51506/PTR 70-3-112. */N/* */B/* NOTE: PATHINUSE WAS NOT ADDED IN EDIT X-5. THE */B/* REASON FOR THE OMISSION IS NOT KNOWN. */N/* */-/* X-5 JMB022 JAMES M. BLUE 14-JUL-1998 */-C/* THE FOLLOWING MESSAGES HAVE BEEN ADDED FOR DK DRIVER - FIBRE */B/* CHANNEL AND MULTIPATH REQUIREMENTS - */N/* */>/* PATHINUSE - ANOTHER WORLD WIDE ID DEVICE IS CURRENTLY */8/* AT THE SAME PORT, TARGET, LUN COMBINATION. */=/* PATHNOTAVL - THE SPECIFIED PATH NO LONGER HAS DEVICES */4/* EITHER ENABLED OR ACCESSIBLE. */=/* PATHUSERD - THE PATH WAS DISABLED FOR US .E BY POLLER. */?/* PATHAVL - THE SPECIFIED PATH HAS AT LEAST ONE DEVICE */4/* ENABLED AND ACCESSIBLE. */>/* PATHAUTSW - THE PATH TO THIS DEVICE HAS BEEN SWITCHED */4/* AUTOMATICALLY TO A NEW PATH. */>/* PATHMANSW - THE PATH TO THIS DEVICE HAS BEEN SWITCHED */4/* MANUALLY TO A NEW PATH. */N/* */1/* X-4 KDM0235 KATHLEEN D. MORSE 29-JUL-1993 */B//* ADD NEW SHADOW MESSAGES: SHANODMP AND SHADMPOK FOR ALPHA. */N/* */0/* X-3 DBM0001 DAVID B. MILLER 13-APR-1993 */B/* BLADE PARITY; MERGE OF LATEST CHANGES: */N/* */9/* X-5 JJA92B05_1 JOHN J. ANDRUSZKIEWICZ 21-DEC-1992 */B/* ALIGN TO EXPECTED VSC GENERATION NUMBER. */B/* MOVE THOSE VOLUME SHADOWING 0PHASE II MESSAGES. */N/* */8/* X-10 JJA92B05 JOHN J. ANDRUSZKIEWICZ 14-DEC-1992 */B/* ADD VOLUME SHADOWING PHASE II MESSAGES. */N/* */4/* X-2 WES WILLIAM E. SNAMAN 12-JUN-1992 14:32 */B/* CHANGE VAXCLUSTER TO VMSCLUSTER. FIX IDENT TO MATCH CMS. */N/* 1 */)/* X-9 CWH5209 CW HOBBS 8-APR-1989 */B/* ADD REQUEST NUMBER TO NOPERATOR MESSAGE. */N/* */)/* X-8 CWH5208 CW HOBBS 12-MAR-1989 */B/* ADD A MORE MEANINGFUL MESSAGE FOR "OPCOM not running". */N/* */1/* X-7 WES0235 WILLIAM E. SNAMAN 08-JAN-1988 */B/* FIX SPACING ERROR IN MESSAGE. 2 */N/* */1/* X-6 WES0185 WILLIAM E. SNAMAN 02-SEP-1987 */B/* ADD SOME NEW CLUSTER MESSAGES FOR SERVED QUORUM DISKS. */N/* */1/* X-5 WES0171 WILLIAM E. SNAMAN 29-JUL-1987 */B/* ADD SOME NEW CLUSTER MESSAGES AND FIX MODULE IDENT. */N/* */1/* X-2 NCD 30001 NANCY C. DENARDO 29-DEC-1986 */B/* ADD LICENSE OPERATOR CLASS */N/* */-/* V04-001 DBM0400 DB MILLS 9-SEP-1985 */B/* ADD VOLUME SHADOWING MESSAGES. */N/* */-/* V03-013 CWH3013 CW HOBBS 2-SEP-1984 */B/* RESTORE THE EMBEDDED IN RQST_PROMPT WHICH WAS */B/* 4REMOVED IN ACG0449. */N/* */?/* V03-012 ACG0449 ANDREW C. GOLDSTEIN, 31-AUG-1984 13:41 */B/* FIX TEXT OF "counterfeit security alarm" MESSAGE */N/* */-/* V03-011 CWH3011 CW HOBBS 18-MAY-1984 */B/* CHANGE THE IN OPREPLY TO A !/ DIRECTIVE. */N/* 5 */2/* V03-010 MHB0158 MARK BRAMHALL 7-MAY-1984 */B/* FIX UP THE SECURITY ALARM MESSAGE. */N/* */-/* V03-009 CWH3169 CW HOBBS 5-MAY-1984 */B/* SECOND PASS FOR CLUSTER-WIDE OPCOM: */B/* - CHANGE SEVERAL MESSAGES TO USE THE STANDARD HEADER, ONLY */B/* A FEW STILL USE THE SHORT HEADER. */B/* -6 CHANGE THE FORMAT OF THE HEADER SLIGHTLY, MAKE IT MORE */B/* CLEAR WHEN MESSAGES COME FROM OTHER NODES. */B/* - REMOVE THE UDA50MVER AND TM78MVER MESSAGES AND REPLACE */B/* THEM WITH THE SINGLE, GENERIC CTLRUCODE MESSAGE. */B/* - ADD THE CLU_NOQUORUM CONNECTION MANAGER MESSAGE - IT */B/* WAS APPARENTLY NEVER PUT IN. */N/* */-/* V03-008 CWH3008 CW H 7OBBS 12-APR-1984 */B/* CHANGE SOME OF THE CONNECTION MANAGER MESSAGES */N/* */3/* V03-007 RSH0114 R. SCOTT HANNA 12_MAR-1984 */B/* CHANGE THE OPC$_COUNTERFEIT MESSAGE. */N/* */3/* V03-006 RSH0110 R. SCOTT HANNA 28-FEB-1984 */B/* CHANGE THE FAO ARGUMENTS IN THE OPC$_SECUR_ALARM MESSAGE. */N/* 8 */-/* V03-005 CWH3005 CW HOBBS 27-SEP-1983 */B/* IMPROVE CONNECTION MANAGER MESSAGES. */N/* */-/* V03-004 CWH3004 CW HOBBS 16-SEP-1983 */B/* SHORTEN HEADER */N/* */-/* V03-003 CWH3003 CW HOBBS 16-SEP-1983 * 9/B/* ADD CONNECTION MANAGER MESSAGES. */N/* */-/* V03-002 CWH3001 CW HOBBS 30-JUL-1983 */B/* VARIOUS AND SUNDRY THINGS TO MAKE OPCOM DISTRIBUTED */B/* ACROSS THE CLUSTER. */N/* */>/* V03-001 RLRV3A1 ROBERT L. RAPPAPORT 5-APR-1982 */B/* ADDED MSG$_UDA50MVER A:ND MSG$_DUPUNITNO. */N/* */>/* V02-006 STJ0180 STEVEN T. JEFFREYS, 07-JAN-1981 */B/* ADDED MVCOMPLETE AND MVABORTED MESSAGES, AND SLIGHTLY */C/* CHANGE THE TEST OF THE EXISTING MOUNT VERIFICATION MESSAGES. */N/* */>/* V02-005 STJ0079 STEVEN T. JEFFREYS, 31-JUL-1981 */B/* ADDED BLANK MESSAGE FOR THE MAG. T;APE ACP. */N/* */>/* V02-004 STJ0063 STEVEN T. JEFFREYS, 14-JUL-1981 */B/* ADDED AN ALTERNATE CANCEL MESSAGE. */B/* ADDED AN INITIALIZE MESSAGE FOR THE MAG. TAPE ACP. */B/* ADDED MESSAGES FOR MOUNT VERIFICATION SUPPORT. */N/* */>/* V02-003 STJ0042 STEVEN T. JEFFREYS, 22-MAY-1<981 */B/* CHANGE FORMAT OF RQSTCMPLTE, RQSTABORT, AND RQSTPEND */B/* TO BE ENABLE EXISTING CODE TO PARSE THE MESSAGES. */N/* */>/* V02-002 STJ0028 STEVEN T. JEFFREYS, 29-MAR-1981 */B/* MODIFY EXISTING MESSAGES AND ADD NEW ONES AS PART OF */B/* THE SUPPORT FOR THE NEW OPCOM. */N/*+ = */N/* OPERATOR COMMUNICATIONS MESSAGES */N/*- */#define OPCOM$_FACILITY 5#define OPC$_TERMENAB 360449#define OPC$_LOGINIT 360457#define OPC$_TERMDSBL 360465#define OPC$_RQSTABORT 360476#define OPC$_RQSTPEND 360481#define OPC$_RQSTCMPLTE 360489#define OPC$_LOGFAIL 360500#define OPC$_TERMFAIL 360508#define OPC$_NOSUCHRQST 360516#define OPC$_DEVOFFLINE 360524#def>ine OPC$_DEVONLINE 360532#define OPC$_NOCLI 360540#define OPC$_NOPERATOR 360545#define OPC$_UNKNOPR 360556#define OPC$_DEVNOTERM 360564#define OPC$_ILLRQST 360572#define OPC$_RQSTCAN 360580#define OPC$_OPRNOTIF 360585#define OPC$_OPREPLY 360593#define OPC$_LOGTIME 360601#define OPC$_LOGCLOS 360612#define OPC$_USERQST 360619#define OPC$_USERMSG 360627#define OPC$_LOGSTS 360635#define OPC$_OPERSTS 360643#define OPC$_RQSTSTST 360651#define OPC$_SHUTDOWN 360659 ?#define OPC$_SYSTEMOPER 360667#define OPC$_GROUPOPER 360675#define OPC$_USEROPER 360683#define OPC$_NOTENABLED 360691N/* */O/* THE FOLLOWING MESSAGES GIVE THE ASCII TEXT FOR THE OPERATOR TYPES. IT IS */O/* POSSIBLE TO CHANGE THE MESSAGE TEXT TO ANYTHING DESIRED. FOR EXAMPLE, AN */N/* INSTALLATION MIGHT WANT TO CALL OPER12 BY ANOTHER NAME, SAY FRONT_DESK. */N/* THAT INSTALLATION WOULD CHANGE THE LINE WITH OPER12@ TO READ: */N/* */:/* OPER12 */N/* */Y/* AFTERWARDS, USERS ON THAT SYSTEM COULD REPLY /ENABLE=FRONT_DESK, REQUEST /TO=FRONT, */W/* A FRONT_DESK OPERATOR COULD DO A REPLY /STAT AND SEE THAT FRONT_DESK WAS ENABLED. */U/* OF COURSE, A PROGRAMMER ON THAT SYSTEM WOULD USE THE SYMBOL OPC$_OPER12 TO ASEND */N/* A MESSAGE TO THE FRONT_DESK, SINCE THE MESSAGE NAME CAN NOT BE CHANGED. */N/* */#define OPC$_CENTRL 360699#define OPC$_PRINT 360707#define OPC$_TAPES 360715#define OPC$_DISKS 360723#define OPC$_DEVICE 360731#define OPC$_CARDS 360739#define OPC$_NTWORK 360747#define OPC$_CLUSTER 360755#define OPC$_SECURITY 360763#define OPC$_REPLY 360771#define OPC$_SOFTWARE 360779#define OPC$_LICENSE 3B60787#define OPC$_OPER1 360795#define OPC$_OPER2 360803#define OPC$_OPER3 360811#define OPC$_OPER4 360819#define OPC$_OPER5 360827#define OPC$_OPER6 360835#define OPC$_OPER7 360843#define OPC$_OPER8 360851#define OPC$_OPER9 360859#define OPC$_OPER10 360867#define OPC$_OPER11 360875#define OPC$_OPER12 360883N/* */#define OPC$_DEVOFFLINX 360891#define OPC$_WRONGVOL 360899#define OPC$_DEVWRTLCCK 360907N/* */#define OPC$_INITAPE 360915#define OPC$_RQSTDONE 360923#define OPC$_BLANKTAPE 360931N/* */#define OPC$_MVCOMPLETE 360939#define OPC$_MVABORTED 360947#define OPC$_CTLRUCODE 360955#define OPC$_DUPUNITNO 360963#define OPC$_SECUR_ALARM 360971#define OPC$_COUNTERFEIT 360979#define OPC$_NODE_ACTIVE 360987#define OPC$D_NODE_DELETE 360995!#define OPC$_NODE_DEPARTED 361003#define OPC$_NODE_INIT 361011#define OPC$_NODE_RETRY 361019#define OPC$_NODE_START 361027#define OPC$_UNKNOWN 361035#define OPC$_CLUSCOMM 361043#define OPC$_VALUERR 361052#define OPC$_NOTRQCB 361060!#define OPC$_REPLY_GENERAL 361067"#define OPC$_REPLY_SHUTDOWN 361075 #define OPC$_REPLY_URGENT 361083 #define OPC$_REPLY_NOTALL 361091!#define OPC$_REPLY_NOTALLN 361099 #define OPC$_REPLY_NOTDEV 361107 #define OPC$_REPLY_NOT EUSE 361115!#define OPC$_REPLY_NOTUSEN 361123c#define OPC$_ON_NODE 361131 /* PREPOSITION FOR "on nodename" ("on ATHENS") MESSAGES */#define OPC$_HEADER 361139#define OPC$_RQST_PROMPT 361147#define OPC$_NOLCLBROAD 361152#define OPC$_NOREMBROAD 361160#define OPC$_NOREMWAIT 361168N/* */N/* CLUSTER MAILBOX MESSAGES */N/* FAO PARAMETER LIST IS: F */N/* */I/* TIMESTAMP - POINTER TO QUADWORD TIME */I/* LSYSNAML - LENGTH OF NAME OF LOCAL SYSTEM */I/* LSYSNAMA - ADDRESS OF NAME OF LOCAL SYSTEM */I/* LSYSIDW - HIGH ORDER WORD OF LOCAL SYSTEM ID */I/* LSYSIDL - LOW ORDER LONGWORD OF LOCAL SYSTEM ID */I/* LGCSID - LOCAL SYSTEM CSID */I/* RSYSNAML - LENGTH OF NAME OF REMOTE SYSTEM */I/* RSYSNAMA - ADDRESS OF NAME OF REMOTE SYSTEM */I/* RSYSIDW - HIGH ORDER WORD OF REMOTE SYSTEM ID */I/* RSYSIDL - LOW ORDER LONGWORD OF REMOTE SYSTEM ID */I/* RCSID - REMOTE SYSTEM CSID */N/* H */N/* MESSAGES USE THE "!+" DIRECTIVE TO SKIP OVER ITEMS WHICH */N/* ARE NOT MEANINGFUL OR USEFUL FOR A PARTICULAR MESSAGE. */N/* */#define OPC$_CLU_NEWSYS 361179#define OPC$_CLU_CNX 361187#define OPC$_CLU_RECNX 361195#define OPC$_CLU_LOSTCNX 361203#define OPC$_CLU_TIMCNX 361211#define OPC$_CLU_INIFORM 361219#define OPC$_CLU_INIADD 361227"#define OPC$_CILU_INIRECNFIG 361235#define OPC$_CLU_MEMREQ 361243#define OPC$_CLU_ABORT 361251#define OPC$_CLU_ADD 361259 #define OPC$_CLU_DROPNODE 361267 #define OPC$_CLU_FORNCLUS 361275 #define OPC$_CLU_INQUORUM 361283 #define OPC$_CLU_LOSTDISK 361291 #define OPC$_CLU_GAINDISK 361299!#define OPC$_CLU_DISKRDERR 361307!#define OPC$_CLU_DISKWRERR 361315"#define OPC$_CLU_DISKINVDAT 361323##define OPC$_CLU_DISKTIMEOUT 361331#define OPC$_CLU_LOSTMSG 361339 #define OPC$_CLU_NOQUORUM 361347 #defin Je OPC$_CLU_FORNDISK 361355 #define OPC$_CLU_COMPLETE 361363#define OPC$_CLU_QUORUM 361371#define OPC$_CLU_ECNX 361379 #define OPC$_CLU_HAVEDISK 361387#define OPC$_CLU_REMOTE 361395#define OPC$_CLU_LOCAL 361403##define OPC$_CLU_WTCHTIMEOUT 361411N#define OPC$_CLU_NOTRUST 361419 /* */N/* FOLLOWING ARE DEVICE MESSAGE FOR SHADOWING. */N/* */#definKe OPC$_SHACHASTA 361427#define OPC$_SHAMEMFAL 361435#define OPC$_SHARDUCED 361443#define OPC$_SHACOPCOM 361451#define OPC$_SHACOPBEG 361459#define OPC$_SHAALLCOM 361467#define OPC$_SHAWROMEM 361475#define OPC$_SHAREDZER 361483#define OPC$_SHAPOSMEM 361491#define OPC$_SHAORGMEM 361499#define OPC$_NOOPCOM 361504N/* FOLLOWING ARE MORE DEVICE MESSAGE FOR SHADOWING. */N/* */#d Lefine OPC$_SHAADPBAD 361515#define OPC$_SHAEMUPTH 361523#define OPC$_SHABENODMP 361531#define OPC$_SHABNODMP 361539#define OPC$_SHALOCDEV 361547#define OPC$_SHANOBPOK 361555#define OPC$_SHABDMPOK 361563#define OPC$_BOOTDMPOK 361571#define OPC$_SHABDBCK 361579#define OPC$_SHANODMP 361587f#define OPC$_SHADMPOK 361595 /* THE FOLLOWING MESSAGES ARE FOR FIBRE CHANNEL - MULTIPATH */N/* */#define MOPC$_PATHNOTAVL 361603#define OPC$_PATHAVL 361611#define OPC$_PATHUSERD 361619#define OPC$_PATHAUTSW 361627#define OPC$_PATHMANSW 361635#define OPC$_OPA0CLERR 361640#define OPC$_LOGFCLERR 361648#define OPC$_WSINCLUSTER 361659"#define OPC$_LOGIN_REJECTED 361664#define OPC$_MVSUPMSG 361675#define OPC$_INSAMCVP 361683#define OPC$_HBMMRESET 361691 #define OPC$_SHADISSOLVED 361699#define OPC$_SHAMEMEXPEL 361707#define OPC$_SHAMEMDMT 361715#define OPC$_PE_CHCL 361723N#define OPC$_PE_CHOP 361731#define OPC$_PE_ECS_OUT 361739#define OPC$_PE_ECS_IN 361747 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __OPCMSG_LOADED */ ww;-/*********************************************************** O*********************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $OPRDEF ***/#ifndef __OPRDEF_LOADED#define __OPRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!P#pragma __member_alignment __save#pragma __nomember_alignmentR#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_parQams ...#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 N/*+ */N/* OPERATOR COMMUNICATIONS MESSAGE TYPES AND VALUES These are now obsolete. */N/*- R */N/* OPERATOR MESSAGE TYPES */N#define OPR$_TERMENABL 1 /* ENABLE TERMINAL */N#define OPR$_LOGINIT 2 /* INITIALIZE THE LOG */N#define OPR$_OPRQST 3 /* OPERATOR REQUEST */N#define OPR$_OPREPLY 4 /* OPERATOR REPLY */#define OPR$M_CENTRAL 0x1#define OPR$M_PRINTER 0x2#define OPR$M_TAPES 0x4#define OPR$M_DISSKS 0x8#define OPR$M_DEVICES 0x10#define OPR$M_USER1 0x1FFE0#define OPR$M_USER2 0x20000#define OPR$M_USER3 0x40000#define OPR$M_USER4 0x80000#define OPR$M_USER5 0x100000#define OPR$M_USER6 0x200000#define OPR$M_USER7 0x400000#define OPR$M_USER8 0x800000#define OPR$M_USER9 0x1000000#define OPR$M_USER10 0x2000000#define OPR$M_USER11 0x4000000#define OPR$M_USER12 0x8000000 #ifdef __NEW_STARLETNtypedef union _oprdef { /* Obsolete. T */N __struct { /* Obsolete. */N unsigned opr$v_central : 1; /* Obsolete. */N unsigned opr$v_printer : 1; /* Obsolete. */N unsigned opr$v_tapes : 1; /* Obsolete. */N unsigned opr$v_disks : 1; /* Obsolete. */N unsigned opr$v_devices : 1; /* Obsolete. */N unsigned oprU$v_user1 : 12; /* Obsolete. */N unsigned opr$v_user2 : 1; /* Obsolete. */N unsigned opr$v_user3 : 1; /* Obsolete. */N unsigned opr$v_user4 : 1; /* Obsolete. */N unsigned opr$v_user5 : 1; /* Obsolete. */N unsigned opr$v_user6 : 1; /* Obsolete. */N unsigned opr$v_user7 : 1; /* Obs Volete. */N unsigned opr$v_user8 : 1; /* Obsolete. */N unsigned opr$v_user9 : 1; /* Obsolete. */N unsigned opr$v_user10 : 1; /* Obsolete. */N unsigned opr$v_user11 : 1; /* Obsolete. */N unsigned opr$v_user12 : 1; /* Obsolete. */$ unsigned opr$v_fill_47_ : 4; } opr$r_oprdef_bits; W} OPRDEF; #if !defined(__VAXC)5#define opr$v_central opr$r_oprdef_bits.opr$v_central5#define opr$v_printer opr$r_oprdef_bits.opr$v_printer1#define opr$v_tapes opr$r_oprdef_bits.opr$v_tapes1#define opr$v_disks opr$r_oprdef_bits.opr$v_disks5#define opr$v_devices opr$r_oprdef_bits.opr$v_devices1#define opr$v_user1 opr$r_oprdef_bits.opr$v_user11#define opr$v_user2 opr$r_oprdef_bits.opr$v_user21#define opr$v_user3 opr$r_oprdef_bits.opr$v_user31#define opr$v_user4 opr$r_oprdef_bits.op Xr$v_user41#define opr$v_user5 opr$r_oprdef_bits.opr$v_user51#define opr$v_user6 opr$r_oprdef_bits.opr$v_user61#define opr$v_user7 opr$r_oprdef_bits.opr$v_user71#define opr$v_user8 opr$r_oprdef_bits.opr$v_user81#define opr$v_user9 opr$r_oprdef_bits.opr$v_user93#define opr$v_user10 opr$r_oprdef_bits.opr$v_user103#define opr$v_user11 opr$r_oprdef_bits.opr$v_user113#define opr$v_user12 opr$r_oprdef_bits.opr$v_user12"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */NYunion oprdef { /* Obsolete. */N __struct { /* Obsolete. */N unsigned opr$v_central : 1; /* Obsolete. */N unsigned opr$v_printer : 1; /* Obsolete. */N unsigned opr$v_tapes : 1; /* Obsolete. */N unsigned opr$v_disks : 1; /* Obsolete. */N unsigned opr$v_devZices : 1; /* Obsolete. */N unsigned opr$v_user1 : 12; /* Obsolete. */N unsigned opr$v_user2 : 1; /* Obsolete. */N unsigned opr$v_user3 : 1; /* Obsolete. */N unsigned opr$v_user4 : 1; /* Obsolete. */N unsigned opr$v_user5 : 1; /* Obsolete. */N unsigned opr$v_user6 : 1; /* Obsolete.[ */N unsigned opr$v_user7 : 1; /* Obsolete. */N unsigned opr$v_user8 : 1; /* Obsolete. */N unsigned opr$v_user9 : 1; /* Obsolete. */N unsigned opr$v_user10 : 1; /* Obsolete. */N unsigned opr$v_user11 : 1; /* Obsolete. */N unsigned opr$v_user12 : 1; /* Obsolete. */ \$ unsigned opr$v_fill_47_ : 4; } opr$r_oprdef_bits; } ; #if !defined(__VAXC)5#define opr$v_central opr$r_oprdef_bits.opr$v_central5#define opr$v_printer opr$r_oprdef_bits.opr$v_printer1#define opr$v_tapes opr$r_oprdef_bits.opr$v_tapes1#define opr$v_disks opr$r_oprdef_bits.opr$v_disks5#define opr$v_devices opr$r_oprdef_bits.opr$v_devices1#define opr$v_user1 opr$r_oprdef_bits.opr$v_user11#define opr$v_user2 opr$r_oprdef_bits.opr$v_user21#define opr$v_user3 opr$ ]r_oprdef_bits.opr$v_user31#define opr$v_user4 opr$r_oprdef_bits.opr$v_user41#define opr$v_user5 opr$r_oprdef_bits.opr$v_user51#define opr$v_user6 opr$r_oprdef_bits.opr$v_user61#define opr$v_user7 opr$r_oprdef_bits.opr$v_user71#define opr$v_user8 opr$r_oprdef_bits.opr$v_user81#define opr$v_user9 opr$r_oprdef_bits.opr$v_user93#define opr$v_user10 opr$r_oprdef_bits.opr$v_user103#define opr$v_user11 opr$r_oprdef_bits.opr$v_user113#define opr$v_user12 opr$r_oprdef_bits.opr$v_user12"#end^if /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __OPRDEF_LOADED */ ww[-/*B// Note: This header is use by both the CC compiler and the IA64 B// _ assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// -----------------------------------------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * ` * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * * */P/* * Confidential computer software. Valid license from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Coamputer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. * */P/* * * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The informatiobn * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty. * */P/* * * */P/* c************************************************************************* *//* ******************************************************************************************************************************** */@/* Created: 5-Apr-2012 13:00:55 by OpenVMS SDL EV3-3 */N/* Source: 17-OCT-2005 15:54:15 $1$DGA7304:[STARLET_H.SRC]OSSDDEF.SDL;1 *//* ******************************************************************************************************************************** */  /d* .MACRO $OSSDDEF,$GBL */ /* $DEFINI OSSD,$GBL *//* */K/* Operating System Specific Data area offset definitions for the IA64 *//* VMS calling standard. *//* *//* *//* Spill Data triple *//* */#define OSSD$M_REG 0x1F#define OSSD$M_MBZ_5_7 0xE0#define OSSD$M_TREG 0x7F00#define OSSD$M_MBZ_15 0x8000#define OSSD$S_REG 5N#define OSSD$V_REG 0 /* Static general register being saved */#define OSSD$S_MBZ_5_7 32#define OSSD$V_MBZ_5_7 5 e /* MBZ */#define OSSD$S_TREG 7X#define OSSD$V_TREG 8 /* Target register for save or zero for restore */1#define OSSD$V_MBZ_15 15 /* MBZ */O#define OSSD$B_REG_BYTE 0 /* Byte containing 5-bit REG field */I#define OSSD$B_TREG_BYTE 1 /* Byte containing 7-bit TREG field */#define OSSD$S_T 1X#define OSSD$T_T 2 /* ULEB128 slot offset to save/restore instruction *//* */N/* OSSD layout for general and caller sp fill register information segments *//* */#define OSSD$M_TYPE 0x7FFFN#define OSSD$K_GENERAL_INFO 1 /* General info (always one quadword) */R#define OSSD$K_CALL_SPILL_INFO 2 /* Caller spill info (variable length) */N#define OSSD$K_CONTEXT_INFO 3 /* Context info (always one quadword) */#define OSSD$M_S 0x8000%#define OSSD$M_EXCEPTION_MODE 0x700005#define OSSD$K_EXC_MODE_SIGNAL 0 /* Signal */7#define OSSD$K_EXC_MODE_SIGNAL_ALL 1 /* Signal all */=#defin ge OSSD$K_EXC_MODE_SIGNAL_SILENT 2 /* Signal silent */<#define OSSD$K_EXC_MODE_FULL_IEEE 3 /* Signal full IEEE */@#define OSSD$K_EXC_MODE_CALLER 4 /* Use caller's mode */"#define OSSD$M_TARGET_INVO 0x80000"#define OSSD$M_BASE_FRAME 0x100000+#define OSSD$M_HANDLER_REINVOKABLE 0x200000!#define OSSD$M_AST_FRAME 0x400000'#define OSSD$M_EXCEPTION_FRAME 0x800000"#define OSSD$M_TIE_FRAME 0x1000000(#define OSSD$M_BOTTOM_OF_STACK 0x2000000+#define OSSD$M_HANDLER_DATA_VALID 0x4000000* h#define OSSD$M_SS_DISPATCH_FRAME 0x8000000(#define OSSD$M_KP_START_FRAME 0x10000000*#define OSSD$M_FRAMELESS_HELPER 0x20000000+#define OSSD$M_MBZ_30_63 0xFFFFFFFFC0000000I#define OSSD$K_GENERAL_INFO_LENGTH 8 /* Size of general data segment */$#define OSSD$M_CONTEXT_TYPE 0xFF0000C#define OSSD$K_CTX_TYPED 0 /* A VMS typed data structure */8#define OSSD$K_CTX_CHFCTX 1 /* A CHFCTX block */$#define OSSD$M_CONTEXT_GR 0xFF000000.#define OSSD$M_CONTEXT_OFFSET 0xFFFFFF00000000.#diefine OSSD$M_CONTEXT_HINT 0xFF00000000000000D#define OSSD$K_HINT_EXCEPTION 1 /* Exception dispatcher */J#define OSSD$K_HINT_SS 2 /* System Service dispatcher */@#define OSSD$K_HINT_AST 3 /* AST dispatcher */=#define OSSD$K_HINT_KP_START 4 /* KP_START frame */I#define OSSD$K_CONTEXT_INFO_LENGTH 8 /* Size of context info segment */%#define OSSD$S_GENERAL_INFO_SEGMENT 8I#define OSSD$Q_GENERAL_INFO_SEGMENT 0 /* Entire general info segme jnt */#define OSSD$S_TYPE 15=#define OSSD$V_TYPE 0 /* OSSD segment type */<#define OSSD$V_S 15 /* Continuation marker */#define OSSD$S_EXCEPTION_MODE 3R#define OSSD$V_EXCEPTION_MODE 16 /* Desired exception-reporting behavior */L#define OSSD$V_TARGET_INVO 19 /* Invoke handler when unwind target */E#define OSSD$V_BASE_FRAME 20 /* Logical base frame of stack */X#define OSSD$V_HANDLER_REINVOKABLE 21 /* Handler may be invoked when already akctive */;#define OSSD$V_AST_FRAME 22 /* AST dispatch frame */G#define OSSD$V_EXCEPTION_FRAME 23 /* Exception dispatch frame */T#define OSSD$V_TIE_FRAME 24 /* Frame created by Translated Image Executive */R#define OSSD$V_BOTTOM_OF_STACK 25 /* End of call stack (no predecessors) */_#define OSSD$V_HANDLER_DATA_VALID 26 /* Exception handler data field exists in unwind info */I#define OSSD$V_SS_DISPATCH_FRAME 27 /* System Service dispatch frame */F#define OSSD$V_KlP_START_FRAME 28 /* Used to tag EXE$KP_START */s#define OSSD$V_FRAMELESS_HELPER 29 /* Tags code executing in context of another routine whose IP is in B0 */#define OSSD$S_MBZ_30_63 34,#define OSSD$V_MBZ_30_63 30 /* MBZ */I#define OSSD$W_LENGTH 2 /* # quadwords in this segment */J#define OSSD$T_SPILL_DATA 4 /* Start of first spill data triple */%#define OSSD$S_CONTEXT_INFO_SEGMENT 8I#define OSSD$Q_CONTEXT_INFO_SEGMENT 0 /* Entire context info s megment */#define OSSD$S_CONTEXT_TYPE 8K#define OSSD$V_CONTEXT_TYPE 16 /* Type of context block described */#define OSSD$S_CONTEXT_GR 8P#define OSSD$V_CONTEXT_GR 24 /* GR containing pointer to context block */ #define OSSD$S_CONTEXT_OFFSET 24R#define OSSD$V_CONTEXT_OFFSET 32 /* Offset (in octawords) from SP, or GR */#define OSSD$S_CONTEXT_HINT 8O#define OSSD$V_CONTEXT_HINT 56 /* Hint as to purpose of context block *//* Hints: (0 = no hint) */R/* Th ne following macro can be used in IAS code to create a context info OSSD */3/* segment. Cut and paste to your IAS module *//* */4/* #define __CONTEXT_OSSD(type,gr,offset,hint) \ */5/* .vms_ossd ((hint) << OSSD$V_CONTEXT_HINT) | \ */?/* (((offset) & 0xFFFFFF) << OSSD$V_CONTEXT_OFFSET) | \ */*/* ((gr) << OSSD$V_CONTEXT_GR) | \ */@/* ((type) << OSSD$V_CONTEXT_TYPE) | OSSD$K_CONTEXT_INFO *//* */ /* $DEFEND OSSD,$GBL,DEF */ /* .ENDM */&/* IA64 assembler heade or ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $OSSDD pEF ***/#ifndef __OSSDDEF_LOADED#define __OSSDDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __cplusqplus 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 N/* */N/* Operatirng System Specific Data area offset definitions for the IA64 */N/* VMS calling standard. */N/* */N/* */N/* Spill Data triple */N/* */#define OSSD$M_REG 0x1F#define OS sSD$M_MBZ_5_7 0xE0#define OSSD$M_TREG 0x7F00#define OSSD$M_MBZ_15 0x8000 #ifdef __NEW_STARLET!typedef struct _ossd_spill_data { __union { __struct {Q unsigned ossd$v_reg : 5; /* Static general register being saved */N unsigned ossd$v_mbz_5_7 : 3; /* MBZ */Z unsigned ossd$v_treg : 7; /* Target register for save or zero for restore */N unsigned ossd$v_mbz_15 : 1; /* MBZ t */$ } ossd$r_spill_struct_1; __struct {P unsigned char ossd$b_reg_byte; /* Byte containing 5-bit REG field */R unsigned char ossd$b_treg_byte; /* Byte containing 7-bit TREG field */$ } ossd$r_spill_struct_2; } ossd$r_spill_overlay;] unsigned char ossd$t_t [1]; /* ULEB128 slot offset to save/restore instruction */ } OSSD_SPILL_DATA; #if !defined(__VAXC)H#define ossd$v_reg ossd$r_spill_overlay.ossd$r_spill_s utruct_1.ossd$v_regP#define ossd$v_mbz_5_7 ossd$r_spill_overlay.ossd$r_spill_struct_1.ossd$v_mbz_5_7J#define ossd$v_treg ossd$r_spill_overlay.ossd$r_spill_struct_1.ossd$v_tregN#define ossd$v_mbz_15 ossd$r_spill_overlay.ossd$r_spill_struct_1.ossd$v_mbz_15R#define ossd$b_reg_byte ossd$r_spill_overlay.ossd$r_spill_struct_2.ossd$b_reg_byteT#define ossd$b_treg_byte ossd$r_spill_overlay.ossd$r_spill_struct_2.ossd$b_treg_byte"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */!typede vf struct _ossd_spill_data { __union { __struct {Q unsigned ossd$v_reg : 5; /* Static general register being saved */N unsigned ossd$v_mbz_5_7 : 3; /* MBZ */Z unsigned ossd$v_treg : 7; /* Target register for save or zero for restore */N unsigned ossd$v_mbz_15 : 1; /* MBZ */$ } ossd$r_spill_struct_1; __struct {P unsigned char ossd$b_reg_byte; w /* Byte containing 5-bit REG field */R unsigned char ossd$b_treg_byte; /* Byte containing 7-bit TREG field */$ } ossd$r_spill_struct_2; } ossd$r_spill_overlay;] unsigned char ossd$t_t [1]; /* ULEB128 slot offset to save/restore instruction */ } ossd_spill_data; #if !defined(__VAXC)H#define ossd$v_reg ossd$r_spill_overlay.ossd$r_spill_struct_1.ossd$v_regP#define ossd$v_mbz_5_7 ossd$r_spill_overlay.ossd$r_spill_struct_1.ossd$v_mbz_5_7J#define xossd$v_treg ossd$r_spill_overlay.ossd$r_spill_struct_1.ossd$v_tregN#define ossd$v_mbz_15 ossd$r_spill_overlay.ossd$r_spill_struct_1.ossd$v_mbz_15R#define ossd$b_reg_byte ossd$r_spill_overlay.ossd$r_spill_struct_2.ossd$b_reg_byteT#define ossd$b_treg_byte ossd$r_spill_overlay.ossd$r_spill_struct_2.ossd$b_treg_byte"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* OSSD layout for general a ynd caller spill register information segments */N/* */#define OSSD$M_TYPE 0x7FFFP#define OSSD$K_GENERAL_INFO 1 /* General info (always one quadword) */Q#define OSSD$K_CALL_SPILL_INFO 2 /* Caller spill info (variable length) */P#define OSSD$K_CONTEXT_INFO 3 /* Context info (always one quadword) */#define OSSD$M_S 0x8000%#define OSSD$M_EXCEPTION_MODE 0x70000N#define OSSD$K_EXC_MODE_SIGNAL 0 z /* Signal */N#define OSSD$K_EXC_MODE_SIGNAL_ALL 1 /* Signal all */N#define OSSD$K_EXC_MODE_SIGNAL_SILENT 2 /* Signal silent */N#define OSSD$K_EXC_MODE_FULL_IEEE 3 /* Signal full IEEE */N#define OSSD$K_EXC_MODE_CALLER 4 /* Use caller's mode */"#define OSSD$M_TARGET_INVO 0x80000"#define OSSD$M_BASE_FRAME 0x100000+#define OSSD$M_HANDLER_REINVOKABLE 0x200000!#define OSSD$M_AST_F {RAME 0x400000'#define OSSD$M_EXCEPTION_FRAME 0x800000"#define OSSD$M_TIE_FRAME 0x1000000(#define OSSD$M_BOTTOM_OF_STACK 0x2000000+#define OSSD$M_HANDLER_DATA_VALID 0x4000000*#define OSSD$M_SS_DISPATCH_FRAME 0x8000000(#define OSSD$M_KP_START_FRAME 0x10000000*#define OSSD$M_FRAMELESS_HELPER 0x20000000+#define OSSD$M_MBZ_30_63 0xFFFFFFFFC0000000N#define OSSD$K_GENERAL_INFO_LENGTH 8 /* Size of general data segment */$#define OSSD$M_CONTEXT_TYPE 0xFF0000N#define OSSD$K_CTX_TYPED 0 | /* A VMS typed data structure */N#define OSSD$K_CTX_CHFCTX 1 /* A CHFCTX block */$#define OSSD$M_CONTEXT_GR 0xFF000000.#define OSSD$M_CONTEXT_OFFSET 0xFFFFFF00000000.#define OSSD$M_CONTEXT_HINT 0xFF00000000000000N#define OSSD$K_HINT_EXCEPTION 1 /* Exception dispatcher */N#define OSSD$K_HINT_SS 2 /* System Service dispatcher */N#define OSSD$K_HINT_AST 3 /* AST dispatcher */N#d }efine OSSD$K_HINT_KP_START 4 /* KP_START frame */N#define OSSD$K_CONTEXT_INFO_LENGTH 8 /* Size of context info segment */ #ifdef __NEW_STARLETtypedef struct _ossddef { __union {W unsigned __int64 ossd$q_general_info_segment; /* Entire general info segment */ __struct {N unsigned ossd$v_type : 15; /* OSSD segment type */N unsigned ossd$v_s : 1; /* Continuation marker */Z ~ unsigned ossd$v_exception_mode : 3; /* Desired exception-reporting behavior */T unsigned ossd$v_target_invo : 1; /* Invoke handler when unwind target */N unsigned ossd$v_base_frame : 1; /* Logical base frame of stack */e unsigned ossd$v_handler_reinvokable : 1; /* Handler may be invoked when already active */N unsigned ossd$v_ast_frame : 1; /* AST dispatch frame */O unsigned ossd$v_exception_frame : 1; /* Exception dispatch frame */\ unsigned ossd$v_tie_frame : 1; /* Frame created by Translated Image Executive */Z unsigned ossd$v_bottom_of_stack : 1; /* End of call stack (no predecessors) */l unsigned ossd$v_handler_data_valid : 1; /* Exception handler data field exists in unwind info */V unsigned ossd$v_ss_dispatch_frame : 1; /* System Service dispatch frame */N unsigned ossd$v_kp_start_frame : 1; /* Used to tag EXE$KP_START */{ unsigned ossd$v_fr ameless_helper : 1; /* Tags code executing in context of another routine whose IP is in B0 */#if defined(__VAXC)- unsigned ossd$v_mbz_30_63_1 : 32;, unsigned ossd$v_mbz_30_63_2 : 2;#elseN unsigned __int64 ossd$v_mbz_30_63 : 34; /* MBZ */#endif$ } ossd$r_general_struct; __struct {[ short int ossd$w_fill_3; /* Overlays segment type and continuation marker */O unsigned short int ossd$w_length; /* # quadwords in this segment */U OSSD_SPILL_DATA ossd$t_spill_data; /* Start of first spill data triple */$ } ossd$r_spill_struct_3;W unsigned __int64 ossd$q_context_info_segment; /* Entire context info segment */ __struct {[ short int ossd$w_fill_4; /* Overlays segment type and continuation marker */S unsigned ossd$v_context_type : 8; /* Type of context block described */X unsigned ossd$v_context_gr : 8; /* GR containing pointer to context block */Y signed ossd$v_context_offset : 24; /* Offset (in octawords) from SP, or GR */W unsigned ossd$v_context_hint : 8; /* Hint as to purpose of context block */N/* Hints: (0 = no hint) */) } ossd$r_context_info_struct; } ossd$r_data_overlay; } OSSDDEF; #if !defined(__VAXC)S#define ossd$q_general_info_segment ossd$r_data_overlay.ossd$q_general_info_segmentI#define ossd$v_type ossd$r_data_overlay.ossd$r_general_struct.ossd$v_typeC#define ossd$v_s ossd$r_data_overlay.ossd$r_general_struct.ossd$v_s]#define ossd$v_exception_mode ossd$r_data_overlay.ossd$r_general_struct.ossd$v_exception_modeW#define ossd$v_target_invo ossd$r_data_overlay.ossd$r_general_struct.ossd$v_target_invoU#define ossd$v_base_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_base_frameg#define ossd$v_handler_reinvokable ossd$r_data_overlay.ossd$r_general_struct.ossd$v_handler_reinvokableS#define ossd$v_ast_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_ast_frame_#define ossd$v_exception_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_exception_frameS#define ossd$v_tie_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_tie_frame_#define ossd$v_bottom_of_stack ossd$r_data_overlay.ossd$r_general_struct.ossd$v_bottom_of_stacke#define ossd$v_handler_data_valid ossd$r_data_overlay.ossd$r_general_struct.ossd$v_handler_data_validc#define ossd$v_ss_dispatch_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_ss_dispatch_frame]#define ossd$v_kp_start_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_kp_start_framea#define ossd$v_frameless_helper ossd$r_data_overlay.ossd$r_general_struct.ossd$v_frameless_helperS#define ossd$v_mbz_30_63 ossd$r_data_overlay.ossd$r_general_struct.ossd$v_mbz_30_63M#define ossd$w_length ossd$r_data_overlay.ossd$r_spill_struct_3.ossd$w_lengthU#define ossd$t_spill_data ossd$r_data_overlay.ossd$r_spill_struct_3.ossd$t_spill_dataS#define ossd$q_context_info_segment ossd$r_data_overlay.ossd$q_context_info_segment^#define ossd$v_context_type ossd$r_data_overlay.ossd$r_context_info_struct.ossd$v_context_typeZ#define ossd$v_context_gr ossd$r_data_overlay.ossd$r_context_info_struct.ossd$v_context_grb#define ossd$v_context_offset ossd$r_data_overlay.ossd$r_context_info_struct.ossd$v_context_offset^#define ossd$v_context_hint ossd$r_data_overlay.ossd$r_context_info_struct.ossd$v_context_hint"#end if /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _ossddef { __union {W unsigned int ossd$q_general_info_segment [2]; /* Entire general info segment */ __struct {N unsigned ossd$v_type : 15; /* OSSD segment type */N unsigned ossd$v_s : 1; /* Continuation marker */Z unsigned ossd$v_exception_mode : 3; /* Desired exception-reporting behavior */T unsigned ossd$v_target_invo : 1; /* Invoke handler when unwind target */N unsigned ossd$v_base_frame : 1; /* Logical base frame of stack */e unsigned ossd$v_handler_reinvokable : 1; /* Handler may be invoked when already active */N unsigned ossd$v_ast_frame : 1; /* AST dispatch frame */O unsigned ossd$v_exception_frame : 1; /* Exception dispatch frame */\ unsigned ossd$v_tie_frame : 1; /* Frame created by Translated Image Executive */Z  unsigned ossd$v_bottom_of_stack : 1; /* End of call stack (no predecessors) */l unsigned ossd$v_handler_data_valid : 1; /* Exception handler data field exists in unwind info */V unsigned ossd$v_ss_dispatch_frame : 1; /* System Service dispatch frame */N unsigned ossd$v_kp_start_frame : 1; /* Used to tag EXE$KP_START */{ unsigned ossd$v_frameless_helper : 1; /* Tags code executing in context of another routine whose IP is in B0 */#if defined(__VAXC) - unsigned ossd$v_mbz_30_63_1 : 32;, unsigned ossd$v_mbz_30_63_2 : 2;#elseN unsigned __int64 ossd$v_mbz_30_63 : 34; /* MBZ */#endif$ } ossd$r_general_struct; __struct {[ short int ossd$w_fill_3; /* Overlays segment type and continuation marker */O unsigned short int ossd$w_length; /* # quadwords in this segment */U ossd_spill_data ossd$t_spill_data; /* Start of first spill data triple */$ } ossd$r_spill_struct_3;W unsigned int ossd$q_context_info_segment [2]; /* Entire context info segment */ __struct {[ short int ossd$w_fill_4; /* Overlays segment type and continuation marker */S unsigned ossd$v_context_type : 8; /* Type of context block described */X unsigned ossd$v_context_gr : 8; /* GR containing pointer to context block */Y signed ossd$v_context_offset : 24; /* Offset (in octawords) from  SP, or GR */W unsigned ossd$v_context_hint : 8; /* Hint as to purpose of context block */N/* Hints: (0 = no hint) */) } ossd$r_context_info_struct; } ossd$r_data_overlay; } ossddef; #if !defined(__VAXC)S#define ossd$q_general_info_segment ossd$r_data_overlay.ossd$q_general_info_segmentI#define ossd$v_type ossd$r_data_overlay.ossd$r_general_struct.ossd$v_typeC#define ossd$v_s ossd$r_data_overlay.ossd$r_general_struct.ossd$v_s]#define ossd$v_exception_mode ossd$r_data_overlay.ossd$r_general_struct.ossd$v_exception_modeW#define ossd$v_target_invo ossd$r_data_overlay.ossd$r_general_struct.ossd$v_target_invoU#define ossd$v_base_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_base_frameg#define ossd$v_handler_reinvokable ossd$r_data_overlay.ossd$r_general_struct.ossd$v_handler_reinvokableS#define ossd$v_ast_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_ast_frame_#define ossd$v_exception_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_exception_frameS#define ossd$v_tie_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_tie_frame_#define ossd$v_bottom_of_stack ossd$r_data_overlay.ossd$r_general_struct.ossd$v_bottom_of_stacke#define ossd$v_handler_data_valid ossd$r_data_overlay.ossd$r_general_struct.ossd$v_handler_data_validc#define ossd$v_ss_dispatch_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_ss_dispatch_frame]#define ossd$v_kp_start_frame ossd$r_data_overlay.ossd$r_general_struct.ossd$v_kp_start_framea#define ossd$v_frameless_helper ossd$r_data_overlay.ossd$r_general_struct.ossd$v_frameless_helperS#define ossd$v_mbz_30_63 ossd$r_data_overlay.ossd$r_general_struct.ossd$v_mbz_30_63M#define ossd$w_length ossd$r_data_overlay.ossd$r_spill_struct_3.ossd$w_lengthU#define ossd$t_spill_data ossd$r_data_overlay.ossd$r_spill_struct_3.ossd$t_spill_dataS#define ossd$q_context_info_segment ossd$r_data_overlay.ossd$q_context_info_segment^#define ossd$v_context_type ossd$r_data_overlay.ossd$r_context_info_struct.ossd$v_context_typeZ#define ossd$v_context_gr ossd$r_data_overlay.ossd$r_context_info_struct.ossd$v_context_grb#define ossd$v_context_offset ossd$r_data_overlay.ossd$r_context_info_struct.ossd$v_context_offset^#define ossd$v_context_hint ossd$r_data_overlay.ossd$r_context_info_struct.ossd$v_context_hint"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */P/* The following macro can be used in IAS code to create a context info OSSD */N/* segment. Cut and paste to your IAS module */N/* */N/*#define __CONTEXT_OSSD(type,gr,offset,hint) \ */I/* .vms_ossd ((hint) << OSSD$V_CONTEXT_HINT) | \ */B/* (((offset) & 0xFFFFFF) << OSSD$V_CONTEXT_OFFSET) | \ */B/* ((gr) << OSSD$V_CONTEXT_GR) | \ */B/* ((type) << OSSD$V_CONTEXT_TYPE) | OSSD$K_CONTEXT_INFO */N/* */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __OSSDDEF_LOADED */ /* CC header ends here */#endif / * IAS_ASSEMBLER */wwa./********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $OSSDEF ***/#ifndef __OSSDEF_LOADED#d efine __OSSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* Object Security Service processing flag  */N/* and itemcode definitions. */N/*- */#define OSS$M_WLOCK 0x1#define OSS$M_RELCTX 0x2#define OSS$M_LOCAL 0x4 #ifdef __NEW_STARLETtypedef struct _ossdef { __struct {N unsigned oss$v_wlock : 1; /* Maintain Write lock */N unsigned oss$v_relctx : 1; /* Release context */N  unsigned oss$v_local : 1; /* update local profile only */$ unsigned oss$v_fill_48_ : 5; } oss$r_flags_bits; } OSSDEF; #if !defined(__VAXC)0#define oss$v_wlock oss$r_flags_bits.oss$v_wlock2#define oss$v_relctx oss$r_flags_bits.oss$v_relctx0#define oss$v_local oss$r_flags_bits.oss$v_local"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct ossdef { __struct {N unsigned oss$v_wlock : 1; /* Maintain Write lock */N unsigned oss$v_relctx : 1; /* Release context */N unsigned oss$v_local : 1; /* update local profile only */$ unsigned oss$v_fill_48_ : 5; } oss$r_flags_bits; } ; #if !defined(__VAXC)0#define oss$v_wlock oss$r_flags_bits.oss$v_wlock2#define oss$v_relctx oss$r_flags_bits.oss$v_relctx0#define oss$v_local oss$r_flags_bits.oss$v_local"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define OSS$_ACCESS_NAMES 1 /* */N#define OSS$_ACCESS_NAMES_LENGTH 2 /* */N#define OSS$_ACL_ADD_ENTRY 3 /* */N#define OSS$_ACL_DELETE_ENTRY 4 /* */N#define OSS$_ACL_DELETE 5 /* */N#define OSS$_ACL_DELETE_ALL 6 /* */N#define OSS$_ACL_FIND_ENTRY 7 /* */N#define OSS$_ACL_FIND_NEXT 8 /* */N#define OSS$_ACL_FIND_TYPE 9 /* */N#define OSS$_ACL_GRANT_ACE 10 /* */N#define OSS$_ACL_LENGTH 11 /* */N#define OSS$_ACL_MODIFY_ENTRY 12 /* */N#define OSS$_ACL_POSITION 13 /*  */N#define OSS$_ACL_POSITION_TOP 14 /* */N#define OSS$_ACL_POSITION_BOTTOM 15 /* */N#define OSS$_ACL_READ_ENTRY 16 /* */N#define OSS$_ACL_READ 17 /* */N#define OSS$_MAX_CLASS 18 /* */N#define OSS$_MIN_CLASS 19 /*  */N#define OSS$_NEXT_OBJECT 20 /* */N#define OSS$_OWNER 21 /* */N#define OSS$_PROTECTION 22 /* */N#define OSS$_SYS_PROT 23 /* */N#define OSS$_OWN_PROT 24 /* */N#define OSS$_GRP_PROT 25 /* */N#define OSS$_WOR_PROT 26 /* */N#define OSS$_CLASS_NAME 27 /* */N#define OSS$_FIRST_TEMPLATE 28 /* */N#define OSS$_NEXT_TEMPLATE 29 /* */N#define OSS$_OBJECT_NAME 30 /* */N#define OSS$_ACCESS_CLASS_NAME 31 /* */N#define OSS$_DAMAGED_ACL 32 /* */N#define OSS$_IN_TRANSITION 33 /* */!#define OSS$_TRANQUILITY_COUNT 34N#define OSS$_POSIX_GID 35 /* Posix Group ID */N#define OSS$_POSIX_GRP_MODE 36 /* Posix Group Mode Permission */N#define OSS$_POSIX_MODE 37 /* Posix Mode Permissions (all) */N#define OSS$_POSIX_SGID 38 /* Posix SETGID Effective Group ID */N#define OSS$_POSIX_SUID 39  /* Posix SETUID Effective User ID */#define OSS$_ACCESS_BITNAMES 1%#define OSS$_ACCESS_BITNAMES_LENGTH 2#define OSS$_ACL_ADDACE 3#define OSS$_ACL_DELACE 4#define OSS$_ACL_FNDACE 7#define OSS$_ACL_FNDNXT 8#define OSS$_ACL_FNDTYP 9#define OSS$_ACL_MODACE 12#define OSS$_ACL_READACE 16 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __OSSDEF_LOADED */ ww./********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OTS$ROUTINES.SDI;1 *//*************************************************************** *****************************************************************//*** MODULE ots$routines ***/#ifndef __OTS_ROUTINES_LOADED#define __OTS_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 P/**************************************************************************** *//* * */4/* COPYRIGHT (c) 1988 BY * */D/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */&/* ALL RIGHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */P/* INCLUSION OF THE ABOVE COPYRIGHT NOT ICE. THIS SOFTWARE OR ANY OTHER * */P/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */&/* TRANSFERRED. * *//* * */P/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. * *//* * */P/* DIGITAL ASSU MES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * *//* * */P/**************************************************************************** */N/* */N/* 20-Mar-2007 JML QXCM1000393572 Headers returning complex results */N/* can't be compiled by BASIC. */N/* */N/* Well clearly the routines returning complex results */N/* by value (requiring 2 registers) need header generation to */N/* be limited to only those languages KNOWN to be able */N/* to support it and likely to call them. */N/* */N/*  */N/* 14-Dec-2006 JML QXCM1000384200 Headers returning complex results */N/* can't be compiled by C/C++ */N/* */P/* Now I understand why a number of headers have been commented */N/* out. When I added all the new IEEE forms, even for those */O/* VAX forms commented out, I didn't realize that C/C++ cannot */P/* return more than 64bits by value. Five of the existing IEEE */N/* routines return complex results by value and those require */N/* 2 registers. This resulted in a .h file for C/C++ that */N/* would not compile. The fix is to use iflanguage and */P/* prevent those headers from being generated for C/C++. These */N/* routines most likely will be called by Fortran anyway.  */N/* */N/* 23-Feb-2006 JML PTR 75-109-96 Add missing headers for IEEE forms of */N/* various routines. */N/* */P/* As of 23-Feb-2006 SDL has no types to describe IEEE floating */N/* data. Since the actual type is only material with respect */O/*  to size of the argument (single vs double precision) we use */N/* F-Floating to represent IEEE S-Floating and D-Floating to */N/* represent IEEE T-Floating. */N/* */N/* In the course of fixing this PTR it was discovered that */N/* number of header definitions have been commented out for */N/* years. Attempts to determine why they are commented out */O/* proved futile. Rather than risk enabling them and possibly */O/* introducing a collision between the system supplied headers */O/* and private headers users may have developed to work around */N/* the lack of them, they shall remain commented out. */N/* However, their new IEEE forms will be enabled as these */N/* routines only came into existence recently. */N/* (see DPML$SHR.OPT checkin of 24-Mar-2004). */N/* */N/* OTS$CVT_T_D */N/* */N/* Convert Numeric Text to D- or F-Floating Value */N/* */N/* The Convert Numeric Text to D- or F-Floating routines */N/* convert an ASCII text string representation of a */N/* numeric value to a D_floating or F_floating value. */N/* */!#define ots$cvt_t_d OTS$CVT_T_D #ifdef __NEW_STARLETunsigned int ots$cvt_t_d(% void *fixed_or_dynamic_input_string, double *floating_point_value, __optional_params );#els e /* __OLD_STARLET */+unsigned int ots$cvt_t_d(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_T_F */N/* */N/* Convert Numeric Text to D- or F-Floating Value */N/* */N/* The Convert Numeric Text to D- or F-Floating routines */N/* convert an ASCII text string representation of a */N/* numeric value to a D_floating or F_floating value. */N/* */!#define ots$cvt_t_f OTS$CVT_T_F #ifdef __NEW_STARLETunsigned int ots$cvt_t_f(% void *fixed_or_dynamic_input_string, float *floating_point_value, __optional_params );#else /* __OLD_STARLET */+unsigned int ots$cvt_t_f(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_T_T */N/* */N/* Convert Numeric Text to T- or S-Floating Value */N/* */N/* The Convert Numeric Text to T- or S-Floating routines */N/* convert an ASCII text string representation of a  */N/* numeric value to a T_floating or S_floating value. */N/* */!#define ots$cvt_t_t OTS$CVT_T_T #ifdef __NEW_STARLETunsigned int ots$cvt_t_t(% void *fixed_or_dynamic_input_string, double *floating_point_value, __optional_params );#else /* __OLD_STARLET */+unsigned int ots$cvt_t_t(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_T_S  */N/* */N/* Convert Numeric Text to T- or S-Floating Value */N/* */N/* The Convert Numeric Text to T- or S-Floating routines */N/* convert an ASCII text string representation of a */N/* numeric value to a T_floating or S_floating value.  */N/* */!#define ots$cvt_t_s OTS$CVT_T_S #ifdef __NEW_STARLETunsigned int ots$cvt_t_s(% void *fixed_or_dynamic_input_string, float *floating_point_value, __optional_params );#else /* __OLD_STARLET */+unsigned int ots$cvt_t_s(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_T_G */N/*  */N/* Convert Numeric Text to G- or H-Floating Value */N/* */N/* The Convert Numeric Text to G- or H-Floating routines */N/* convert an ASCII text string representation of a */N/* numeric value to a G_floating or H_floating value. */N/*  */!#define ots$cvt_t_g OTS$CVT_T_G #ifdef __NEW_STARLETunsigned int ots$cvt_t_g(% void *fixed_or_dynamic_input_string, double *floating_point_value, __optional_params );#else /* __OLD_STARLET */+unsigned int ots$cvt_t_g(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_T_H */N/* */N/* Convert Numeric Text to G- or H-Floating Value */N/* */N/* The Convert Numeric Text to G- or H-Floating routines */N/* convert an ASCII text string representation of a */N/* numeric value to a G_floating or H_floating value. */N/* */!#define ots$cvt_t_h OTS$CVT_T_H #ifdef __NEW_STA RLETunsigned int ots$cvt_t_h(% void *fixed_or_dynamic_input_string, int floating_point_value [4], __optional_params );#else /* __OLD_STARLET */+unsigned int ots$cvt_t_h(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$DIVC */N/* */N/* Complex Division */N/*  */N/* The Complex Division routines */N/* return a complex result of a division on complex */N/* numbers. */N/* */N/*ENTRY ots$divc ALIAS $ots_divc PARAMETER ( */N/* F_FLOATING COMPLEX NAMED complex_dividend IN */N/* TYPENAME f_floating_complex VALUE, */N/* F_FLOATING COMPLEX NAMED complex_divisor IN */N/* TYPENAME f_floating_complex VALUE ) */N/* RETURNS F_FLOATING COMPLEX NAMED RESULT TYPENAME f_floating_complex; */N/* OTS$DIVCD_R3 */N/* */N/* Complex Division */N/* */N/* The Complex Division routines */N/* return a complex result of a division on complex */N/* numbers. */N/* */N/*ENTRY ots$divcd_r3 ALIAS $ots_divcd_r3 PARAMETER ( */N/* D_FLOATING COMPLEX NAMED complex_dividend IN */N/* TYPENAME d_floating_complex VALUE, */N/* D_FLOATING COMPLEX NAMED complex_divisor IN */N/* TYPENAME d_floating_complex VALUE ) */N/* RETURNS D_FLOATING COMPLEX NAMED RESULT TYPENAME d_floating_complex; */N/* OTS$DIVCG_R3  */N/* */N/* Complex Division */N/* */N/* The Complex Division routines */N/* return a complex result of a division on complex */N/* numbers.  */N/* */N/*ENTRY ots$divcg_r3 ALIAS $ots_divcg_r3 PARAMETER ( */N/* G_FLOATING COMPLEX NAMED complex_dividend IN */N/* TYPENAME g_floating_complex VALUE, */N/* G_FLOATING COMPLEX NAMED complex_divisor IN */N/* TYPENAME g_floatin_complex VALUE ) */N/* RETURNS G_FLOATING COMPLEX NAMED RESULT TYPENAME g_floating_complex; */N/* OTS$DIVCS */N/* */N/* Complex Division */N/* */N/* The Complex Division routines */N/* return a complex result of a division on complex */N/* numbers. */N/* */ N/* OTS$DIVCT_R3 */N/* */N/* Complex Division */N/*  */N/* The Complex Division routines */N/* return a complex result of a division on complex */N/* numbers. */N/* */ N/* OTS$DIV_PK_LONG */N/* */N/* Packed Decimal Division with Long Divisor */N/* */N/* The Packed Decimal Division with Long Divisor routine */N/* divides fixed-point decimal data, which is stored in packed */S/* decimal form, when precision and scale requirements for the quotient call */N/* for multiple precision division. The divisor must have a precision of */N/* thirty or thirty-one digits. */N/* */)#define ots$div_pk_long OTS$DIV_PK_LONG #ifdef __NEW_STARLETunsigned int ots$div_pk_long(' unsigned int *packed_decimal_dividend,& unsigned int *packed_decimal_divisor, short int divisor_precision,' unsigned int *packed_decimal_quotient, short int quotient_precision, short int precision_data, short int scale_data);#else /* __OLD_STARLET *//unsigned int ots$div_pk_long(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$DIV_PK_SHORT */N/* */N/* Packed Decimal Division with Short Divisor */N/* */N/* The Packed Decimal Division with Short Divisor routine */N/* divides fixed-poin t decimal data */N/* when precision and scale requirements for the quotient call for */N/* multiple-precision division. */N/* */+#define ots$div_pk_short OTS$DIV_PK_SHORT #ifdef __NEW_STARLETunsigned int ots$div_pk_short(' unsigned int *packed_decimal_dividend,& unsigned int *packed_decimal_divisor, short int divisor_preci sion,' unsigned int *packed_decimal_quotient, short int quotient_precision, short int precision_data);#else /* __OLD_STARLET */0unsigned int ots$div_pk_short(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$MOVE3 */N/* */N/* Move Data Without Fill */N/*  */N/* The Move Data Without Fill routine */N/* moves up to 231-1 bytes, (2,147,483,647 bytes) from a */N/* specified source address to a specified destination address. */N/* */#define ots$move3 OTS$MOVE3 #ifdef __NEW_STARLETint ots$move3( int length_value, unsigned char source_array [],% unsigned char des tination_array []);#else /* __OLD_STARLET */ int ots$move3(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$MOVE5 */N/* */N/* Move Data with Fill */N/* */N/* The Move Data with Fill routine  */N/* moves up to 231-1 bytes, (2,147,483,647 bytes) from a */N/* specified source address to a specified destination address, */N/* with separate source and destination lengths, */N/* and with fill. Overlap of the source and destination arrays */N/* does not affect the result. */N/* */#define ots$move5 OTS$MOVE5 #ifdef __NEW_STARLETint ots$move5( int longword_int_source_length, unsigned char source_array [], unsigned char fill_value, int longword_int_dest_length,% unsigned char destination_array []);#else /* __OLD_STARLET */ int ots$move5(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$MULC */N/* */N/* Complex Multiplication */N/* */N/* The Complex Multiplication routines */N/* calculate the complex product of two complex */N/* values. */N/* */N/*ENTRY ots$mulc ALIAS $ots_mulc PARAMETER ( */N/* F_FLOATING COMPLEX NAMED complex_multiplier IN */N/* TYPENAME f_floating_complex VALUE, */N/* F_FLOATING COMPLEX NAMED complex_multiplicand IN */N/* TYPENAME f_floating_complex VALUE ) */N/* RETURNS F_FLOATING COMPLEX NAMED RESULT TYPENAME f_floating_complex; */N/* OTS$MULCD_R3  */N/* */N/* Complex Multiplication */N/* */N/* The Complex Multiplication routines */N/* calculate the complex product of two complex */N/* values. */N/*  */N/*ENTRY ots$mulcd_r3 ALIAS $ots_mulcd_r3 PARAMETER ( */N/* D_FLOATING COMPLEX NAMED complex_multiplier IN */N/* TYPENAME d_floating_complex VALUE, */N/* D_FLOATING COMPLEX NAMED complex_multiplicand IN */N/* TYPENAME d_floating_complex VALUE ) */N/* RETURNS D_FLOATING COMPLEX NAMED RESULT TYPENAME d_floating_complex; */N/* OTS$MULCG_R3 */N/* */N/* Complex Multiplication */N/* */N/* The Complex Multiplication routines */N/* calculate the complex product of two complex  */N/* values. */N/* */N/*ENTRY ots$mulcg_r3 ALIAS $ots_mulcg_r3 PARAMETER ( */N/* G_FLOATING COMPLEX NAMED complex_multiplier IN */N/* TYPENAME g_floating_complex VALUE, */N/* G_FLOATING COMPLEX NAMED complex_multiplicand IN */N/* TYPENAME g_floating_complex VALUE ) */N/* RETURNS G_FLOATING COMPLEX NAMED RESULT TYPENAME g_floating_complex; */N/* OTS$MULCS */N/* */N/* Complex Multiplication */N/* */N/* The Complex Multiplication routines */N/* calculate the complex product of two complex */N/* values. */N/* */ N/* OTS$MULCT_R3 */N/* */N/* Complex Multiplication  */N/* */N/* The Complex Multiplication routines */N/* calculate the complex product of two complex */N/* values. */N/* */ N/* OTS$CNVOUT */N/*  */P/* Convert D_floating, G_floating or H_floating Number to Character String */N/* */N/* The Convert Floating to Character String routines convert */N/* a D_floating, G_floating or H_floating number */N/* to a character string in */N/* the FORTRAN E format.  */N/* */#define ots$cnvout OTS$CNVOUT #ifdef __NEW_STARLETunsigned int ots$cnvout(% double *d_g_or_h_float_pt_input_val,% void *fixed_length_resultant_string," unsigned int digits_in_fraction);#else /* __OLD_STARLET */*unsigned int ots$cnvout(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CNVOUT_G  */N/* */P/* Convert D_floating, G_floating or H_floating Number to Character String */N/* */N/* The Convert Floating to Character String routines convert */N/* a D_floating, G_floating or H_floating number */N/* to a character string in */N/* th e FORTRAN E format. */N/* */##define ots$cnvout_g OTS$CNVOUT_G #ifdef __NEW_STARLETunsigned int ots$cnvout_g(% double *d_g_or_h_float_pt_input_val,% void *fixed_length_resultant_string," unsigned int digits_in_fraction);#else /* __OLD_STARLET */,unsigned int ots$cnvout_g(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CNVOUT_H  */N/* */P/* Convert D_floating, G_floating or H_floating Number to Character String */N/* */N/* The Convert Floating to Character String routines convert */N/* a D_floating, G_floating or H_floating number */N/* to a character string in  */N/* the FORTRAN E format. */N/* */##define ots$cnvout_h OTS$CNVOUT_H #ifdef __NEW_STARLETunsigned int ots$cnvout_h(% int d_g_or_h_float_pt_input_val [4],% void *fixed_length_resultant_string," unsigned int digits_in_fraction);#else /* __OLD_STARLET */,unsigned int ots$cnvout_h(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CNVOUT_S */N/* */N/* Convert IEEE S_floatingto Character String */N/* */N/* The Convert Floating to Character String routines convert */N/* a IEEE S_floating number to a character string in */N/* the FORTRAN E format.  */N/* */##define ots$cnvout_s OTS$CNVOUT_S #ifdef __NEW_STARLETunsigned int ots$cnvout_s(( float *d_g_h_s_or_t_float_pt_input_val,% void *fixed_length_resultant_string," unsigned int digits_in_fraction);#else /* __OLD_STARLET */,unsigned int ots$cnvout_s(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CNVOUT_T  */N/* */N/* Convert IEEE T_floating Number to Character String */N/* */N/* The Convert Floating to Character String routines convert */N/* a IEEE T_floating number to a character string in */N/* the FORTRAN E format. */N/*  */##define ots$cnvout_t OTS$CNVOUT_T #ifdef __NEW_STARLETunsigned int ots$cnvout_t() double *d_g_h_s_or_t_float_pt_input_val,% void *fixed_length_resultant_string," unsigned int digits_in_fraction);#else /* __OLD_STARLET */,unsigned int ots$cnvout_t(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWCC */N/*  */N/* Raise a Complex Base to a Complex Floating-Point Exponent */N/* */O/* The Raise a Complex Base to a Complex Floating-Point Exponent routines */N/* return the complex floating-point result of raising */N/* a complex base to a complex exponent. */N/*  */N/*ENTRY ots$powcc ALIAS $ots_powcc PARAMETER ( */N/* F_FLOATING COMPLEX NAMED complex_base IN */N/* TYPENAME f_floating_complex VALUE, */N/* F_FLOATING COMPLEX NAMED complex_exponent_value IN */N/* TYPENAME f_floating_complex VALUE ) */N/* RETURNS F_FLOATING COMPLEX NAMED RESULT TYPENAME f_floating_complex; */N/* OTS$POWCDCD_R3 */N/* */N/* Raise a Complex Base to a Complex Floating-Point Exponent */N/* */N/* The Raise a Complex Base to a Complex Floating-Point Exponent routine */N/* returns the complex result of raising */N/* a complex base to a complex exponent. */N/* */N/*ENTRY ots$powcdcd_r3 ALIAS $ots_powcdcd_r3 PARAMETER ( */N/* D_FLOATING COMPLEX NAMED complex_base IN */N/* TYPENAME d_floating_complex VALUE, */N/* D_FLOATING COMPLEX NAMED complex_exponent_value IN */N/* TYPENAME d_floating_complex VALUE )  */N/* RETURNS D_FLOATING COMPLEX NAMED RESULT TYPENAME d_floating_complex; */N/* OTS$POWCGCG_R3 */N/* */N/* Raise a Complex Base to a Complex Floating-Point Exponent */N/* */N/* The Raise a Complex Base to a Complex Floating-Point Exponent routine */N/* returns the complex result of raising */N/* a complex base to a complex exponent. */N/* */N/*ENTRY ots$powcgcg_r3 ALIAS $ots_powcgcg_r3 PARAMETER ( */N/* G_FLOATING COMPLEX NAMED complex_base IN */N/* TYPENAME g_floating_complex VALUE, */N/* G_FLOATING COMPLEX NAMED complex_exponent_value IN */N/* TYPENAME g_floating_complex VALUE ) */N/* RETURNS G_FLOATING COMPLEX NAMED RESULT TYPENAME g_floating_complex; */N/* OTS$POWCSCS */N/* */N/* Raise a Complex Base to a Complex Floating-Point Exponent */N/*  */N/* The Raise a Complex Base to a Complex Floating-Point Exponent routine */N/* returns the complex result of raising */N/* a complex base to a complex exponent. */N/* */ N/* OTS$POWCTCT_R3 */N/*  */N/* Raise a Complex Base to a Complex Floating-Point Exponent */N/* */N/* The Raise a Complex Base to a Complex Floating-Point Exponent routine */N/* returns the complex result of raising */N/* a complex base to a complex exponent. */N/* */ N/* OTS$POWCJ */N/* */N/* Raise a Complex Base to a Signed Longword Integer Exponent */N/* */N/* The Raise a Complex Base to a Signed Longword Integer Exponent */N/* routine returns the complex result of raising a complex base to an */N/* integer exponent.  */N/* */N/*ENTRY ots$powcj ALIAS $ots_powcj PARAMETER ( */N/* F_FLOATING COMPLEX NAMED complex_base IN */N/* TYPENAME f_floating_complex VALUE, */N/* LONGWORD NAMED longword_integer_exponent IN */N/* TYPENAME longword_signed VALUE )  */N/* RETURNS F_FLOATING COMPLEX NAMED RESULT TYPENAME f_floating_complex; */N/* OTS$POWCDJ_R3 */N/* */N/* Raise a Complex Base to a Signed Longword Integer Exponent */N/* */N/* The Raise a Complex Base to a Signed Longword Integer Exponent */N/* routine returns the complex result of raising a complex base to an */N/* integer exponent. */N/* */N/*ENTRY ots$powcdj_r3 ALIAS $ots_powcdj_r3 PARAMETER ( */N/* D_FLOATING COMPLEX NAMED complex_base IN */N/* TYPENAME D_floating_complex VALUE, */N/* LONGWORD NAMED longword_integer_exponent IN */N/* TYPENAME longword_signed VALUE ) */N/* RETURNS D_FLOATING COMPLEX NAMED RESULT TYPENAME d_floating_complex; */N/* OTS$POWCGJ_R3 */N/* */N/* Raise a Complex Base to a Signed Longword Integer Exponent */N/*  */N/* The Raise a Complex Base to a Signed Longword Integer Exponent */N/* routine returns the complex result of raising a complex base to an */N/* integer exponent. */N/* */N/*ENTRY ots$powcgj_r3 ALIAS $ots_powcgj_r3 PARAMETER ( */N/* G_FLOATING COMPLEX NAMED complex_base IN */N/* TYPENAME g_floating_complex VALUE, */N/* LONGWORD NAMED longword_integer_exponent IN */N/* TYPENAME longword_signed VALUE ) */N/* RETURNS G_FLOATING COMPLEX NAMED RESULT TYPENAME g_floating_complex; */N/* OTS$POWCSJ */N/* */N/* Raise a Complex Base to a Signed Longword Integer Exponent */N/* */N/* The Raise a Complex Base to a Signed Longword Integer Exponent */N/* routine returns the complex result of raising a complex base to an */N/* integer exponent. */N/* */ N/* OTS$POWCTJ_R3  */N/* */N/* Raise a Complex Base to a Signed Longword Integer Exponent */N/* */N/* The Raise a Complex Base to a Signed Longword Integer Exponent */N/* routines return the complex result of raising a complex base to an */N/* integer exponent. */N/*  */ N/* OTS$POWDD */N/* */N/* Raise a D_floating Base to D_floating Exponent */N/* */N/* The Raise a D_floating Base to a D_floating Exponent routine */S/* returns the D_floating result of raising a D_floating base to a D_floating */N/* exponent. */N/* */N/*ENTRY ots$powdd ALIAS $ots_powdd PARAMETER ( */N/* D_FLOATING NAMED D_floating_point_base IN */N/* TYPENAME d_floating VALUE, */N/* D_FLOATING NAMED D_floating_point_exponent IN */N/* TYPENAME d_floating VALUE ) */N/* RETURNS D_FLOATING NAMED RESULT TYPENAME d_floating; */N/* OTS$POWDJ */N/* */N/* Raise a D_floating Base to a Longword Exponent */N/*  */N/* The Raise a D_floating Base to a Longword Exponent routine */\/* returns the D_floating result of raising a D_floating base to a longword exponent. */N/* */N/*ENTRY ots$powdj ALIAS $ots_powdj PARAMETER ( */N/* D_FLOATING NAMED D_floating_point_base IN */N/* TYPENAME d_floating VALUE, */N/*  LONGWORD NAMED longword_integer_exponent IN */N/* TYPENAME longword_signed VALUE ) */N/* RETURNS D_FLOATING NAMED RESULT TYPENAME d_floating; */N/* OTS$POWDR */N/* */N/* Raise a D_floating Base to an F_floating Exponent */N/*  */N/* The Raise a D_floating Base to an F_floating Exponent routines */N/* return the D_floating result of raising a D_floating base to an */N/* F_floating exponent. */N/* */N/*ENTRY ots$powdr ALIAS $ots_powdr PARAMETER ( */N/* D_FLOATING NAMED D_floating_point_base IN  */N/* TYPENAME d_floating VALUE, */N/* F_FLOATING NAMED F_floating_point_exponent IN */N/* TYPENAME f_floating VALUE ) */N/* RETURNS D_FLOATING NAMED RESULT TYPENAME d_floating; */N/* OTS$POWGG */N/* */N/* Raise a G_floating Base to a G_floating Exponent */N/* */N/* The Raise a G_floating Base to a G_floating Exponent routine */]/* returns the G_floating result of raising a G_floating base to a G_floating exponent. */N/* */N/*ENTRY ots$powgg ALIAS $ots_powgg PARAMETER ( */N/* G_FLOATING NAMED G_floating_point_base IN */N/* TYPENAME g_floating VALUE, */N/* G_FLOATING NAMED G_floating_point_exponent IN */N/* TYPENAME g_floating VALUE ) */N/* RETURNS G_FLOATING NAMED RESULT TYPENAME g_floating; */N/* OTS$POWTT */N/*  */N/* Raise an IEEE T_floating Base to an IEEE T_floating Exponent */N/* */Q/* The Raise an IEEE T_floating Base to an IEEE T_floating Exponent routine */O/* returns the IEEE T_floating result of raising an IEEE T_floating base */N/* to an IEEE T_floating exponent. */N/*  */N/* */#define ots$powtt OTS$POWTT #ifdef __NEW_STARLETdouble ots$powtt( double t_floating_point_base,# double t_floating_point_exponent);#else /* __OLD_STARLET */#double ots$powtt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWGJ */N/*  */N/* Raise a G_floating Base to a Longword Exponent */N/* */N/* The Raise a G_floating Base to a Longword Exponent routine */[/* returns the G_floating result of raising a G_floating base to a longword exponent. */N/* */N/*ENTRY ots$powgj ALIAS $ots_powgj PARAMETER ( */N/* G_FLOATING NAMED G_floating_point_base IN */N/* TYPENAME g_floating VALUE, */N/* LONGWORD NAMED longword_integer_exponent IN */N/* TYPENAME longword_signed VALUE ) */N/* RETURNS G_FLOATING NAMED RESULT TYPENAME g_floating; */N/* OTS$POWTJ */N/*  */N/* Raise an IEEE T_floating Base to a Longword Exponent */N/* */N/* The Raise and IEEE T_floating Base to a Longword Exponent routine */N/* returns the IEEE T_floating result of raising an IEEE T_floating */N/* base to a longword exponent. */N/*  */#define ots$powtj OTS$POWTJ #ifdef __NEW_STARLETdouble ots$powtj( double t_floating_point_base, int longword_integer_exponent);#else /* __OLD_STARLET */#double ots$powtj(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWHH_R3 */N/* */N/* Raise an H_floating Base to an H_floating Exponent */N/* */N/* The Raise an H_floating Base to an H_floating Exponent */N/* routine returns the H_floating result of raising an H_floating base */N/* to an H_floating exponent. */N/* */N/*ENTRY ots$powhh_r3 ALIAS $ots_powhh_r3 PARAMETER ( */N/* H_FLOATING NAMED H_floating_point_base IN */N/* TYPENAME h_floating VALUE, */N/* H_FLOATING NAMED H_floating_point_exponent IN */N/* TYPENAME h_floating VALUE ) */N/* RETURNS H_FLOATING NAMED RESULT TYPENAME h_floating; */N/* OTS$POWHJ_R3 */N/*  */N/* Raise an H_floating Base to an Longword Exponent */N/* */N/* The Raise an H_floating Base to a Longword Exponent */N/* routine returns the H_floating result of raising an H_floating */N/* base to a longword exponent. */N/* */N/*ENTRY ots$powhj_r3 ALIAS $ots_powhj_r3 PARAMETER ( */N/* H_FLOATING NAMED H_floating_point_base IN */N/* TYPENAME h_floating VALUE, */N/* LONGWORD NAMED longword_integer_exponent IN */N/* TYPENAME longword_signed VALUE ) */N/* RETURNS H_FLOATING NAMED RESULT TYPENAME h_floating; */N/* OTS$POWII  */N/* */N/* Raise a Word Base to a Word Exponent */N/* */N/* The Raise a Word Base to a Word Exponent routine */N/* returns the word result of raising a word base to a word exponent. */N/*  */#define ots$powii OTS$POWII #ifdef __NEW_STARLETshort int ots$powii( short int word_integer_base," short int word_integer_exponent);#else /* __OLD_STARLET */&short int ots$powii(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWJJ */N/* */N/* Raise a Longword Base to a Longword Exponent  */N/* */N/* The Raise a Longword Base to a Longword Exponent routine */N/* returns the longword result of raising a signed longword */N/* base to a signed longword exponent. */N/* */#define ots$powjj OTS$POWJJ #ifdef __NEW_STARLETint ots$powjj( int longword_ integer_base, int longword_integer_exponent);#else /* __OLD_STARLET */ int ots$powjj(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWLULU */N/* */N/* Raise an Unsigned Longword Base to an Unsigned Longword Exponent */N/* */N/* The Raise an Unsigned Longword B ase to an Unsigned Longword */N/* Exponent routine returns the unsigned longword result of */N/* raising an unsigned longword integer base to */N/* an unsigned longword integer exponent. */N/* */!#define ots$powlulu OTS$POWLULU #ifdef __NEW_STARLETunsigned int ots$powlulu(& unsigned int unsigned_lword_int_base,+ unsigned int unsigned_lword_int_exponent);#else /* __OLD_STARLET */+unsigned int ots$powlulu(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWRD */N/* */N/* Raise an F_floating Base to D_floating Exponent */N/* */N/* The Raise an F_floating Base to a D_floating Exponent */N/* routine returns the F_floating result of raising an */N/* F_floating base to a D_floating exponent. */N/* */N/*ENTRY ots$powrd ALIAS $ots_powrd PARAMETER ( */N/* F_FLOATING NAMED F_floating_point_base IN */N/* TYPENAME f_floating VALUE,   */N/* D_FLOATING NAMED D_floating_point_exponent IN */N/* TYPENAME d_floating VALUE ) */N/* RETURNS D_FLOATING NAMED RESULT TYPENAME d_floating; */N/* OTS$POWRJ */N/* */N/* Raise an F_floating Base to a Longword Exponent */N/*  */N/* The Raise an F_floating Base to a Longword Exponent */N/* routine returns the F_floating result of raising an */N/* F_floating base to a longword exponent. */N/* */#define ots$powrj OTS$POWRJ #ifdef __NEW_STARLETfloat ots$powrj( float f_floating_point_base, int longword_ integer_exponent);#else /* __OLD_STARLET */"float ots$powrj(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWSJ */N/* */N/* Raise an IEEE S_floating Base to a Longword Exponent */N/* */N/* The Raise an IEEE S_floating Base to a Longword Exponent rou tine */O/* returns the IEEE S_floating result of raising an IEEE S_floating base */N/* to a longword exponent. */N/* */#define ots$powsj OTS$POWSJ #ifdef __NEW_STARLETfloat ots$powsj( float s_floating_point_base, int longword_integer_exponent);#else /* __OLD_STARLET */"float ots$powsj(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OT S$POWRR */N/* */N/* Raise an F_floating Base to F_floating Exponent */N/* */N/* The Raise an F_floating Base to an F_floating Exponent */N/* routine returns the F_floating result of raising an F_floating */N/* base to an F_floating expone nt. */N/* */#define ots$powrr OTS$POWRR #ifdef __NEW_STARLETfloat ots$powrr( float f_floating_point_base," float f_floating_point_exponent);#else /* __OLD_STARLET */"float ots$powrr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWSS */N/*  */N/* Raise an IEEE S_floating Base to IEEE S_floating Exponent */N/* */N/* The Raise an IEEE S_floating Base to IEEE S_floating Exponent */N/* routines retursn the IEEE S_floating result of raising */N/* an IEEES_floating base to an IEEE S_floating exponent. */N/* */#d efine ots$powss OTS$POWSS #ifdef __NEW_STARLETfloat ots$powss( float s_floating_point_base," float s_floating_point_exponent);#else /* __OLD_STARLET */"float ots$powss(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWRLU */N/* */N/* Raise a Floating-Point Base to an Unsigned Longword Integer Exponent */N/*  */N/* The Raise a Floating-Point Base to an Unsigned Longword Integer */N/* Exponent routines returns the floating-point result of raising */N/* a floating-point base to an unsigned longword integer exponent. */N/* */#define ots$powrlu OTS$POWRLU #ifdef __NEW_STARLETfloat ots$powrlu( float floating_point_base,+ unsigned int unsign ed_lword_int_exponent);#else /* __OLD_STARLET */#float ots$powrlu(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWDLU */N/* */N/* Raise a D-Floating Base to an Unsigned Longword Integer Exponent */N/* */N/* The Raise a D-Floating Base to an Unsigned Longword Integer */N/* Exponent routines returns the D-Floating result of raising */N/* a D-Floating base to an unsigned longword integer exponent. */N/* */N/*ENTRY ots$powdlu ALIAS $ots_powdlu PARAMETER ( */N/* D_FLOATING NAMED floating_point_base IN */N/* TYPENAME d_floating VALUE, */N/*  LONGWORD UNSIGNED NAMED unsigned_lword_int_exponent IN */N/* TYPENAME longword_unsigned VALUE ) */N/* RETURNS D_FLOATING NAMED RESULT TYPENAME d_floating; */N/* OTS$POWGLU */N/* */N/* Raise a G_floating Base to an Unsigned Longword Integer Exponent */N/*  */N/* The Raise a G-Floating Base to an Unsigned Longword Integer */N/* Exponent routines returns the G-Floating result of raising */N/* a G-Floating base to an unsigned longword integer exponent. */N/* */N/*ENTRY ots$powglu ALIAS $ots_powglu PARAMETER ( */N/* G_FLOATING NAMED floating_point_base IN  */N/* TYPENAME g_floating VALUE, */N/* LONGWORD UNSIGNED NAMED unsigned_lword_int_exponent IN */N/* TYPENAME longword_unsigned VALUE ) */N/* RETURNS G_FLOATING NAMED RESULT TYPENAME g_floating; */N/* OTS$POWSLU */N/* */O/* Raise an IEEE S-Floating Base to an Unsigned Longword Integer Exponent */N/* */N/* The Raise an IEEE S-Floating Base to an Unsigned routines returns the */N/* IEEE S-flloating result of raising an IEEE S-Floating base to an */N/* unsigned longword integer exponent. */N/* */#define ots$powslu OTS$P OWSLU #ifdef __NEW_STARLETfloat ots$powslu( float floating_point_base,+ unsigned int unsigned_lword_int_exponent);#else /* __OLD_STARLET */#float ots$powslu(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWTLU */N/* */O/* Raise an IEEE T-Floating Base to an Unsigned Longword Integer Exponent */N/*  */N/* The Raise and IEEE T-Floating Base to an Unsigned Longword Integer */N/* Exponent routines returns the IEEE T-Floating result of raising */N/* an IEEE T-Floating base to an unsigned longword integer exponent. */N/* */#define ots$powtlu OTS$POWTLU #ifdef __NEW_STARLETdouble ots$powtlu( double floating_point_base,+ unsigned int unsigned_lword _int_exponent);#else /* __OLD_STARLET */$double ots$powtlu(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$POWHLU_R3 */N/* */N/* Raise an H-Floating Base to an Unsigned Longword Integer Exponent */N/* */N/* The Raise an H-Floating Base to an Unsigned Longword Integer */N/* Exponent routine returns the H-Floating result of raising */N/* an H-Floating base to an unsigned longword integer exponent. */N/* */N/*ENTRY ots$powhlu_r3 ALIAS $ots_powhlu_r3 PARAMETER ( */N/* H_FLOATING NAMED floating_point_base IN */N/* TYPENAME h_floating VALUE, */N/* LONGWORD UNSIGNED NAMED unsigned_lword_int_exponent IN */N/* TYPENAME longword_unsigned VALUE ) */N/* RETURNS H_FLOATING NAMED RESULT TYPENAME h_floating; */N/* OTS$SCOPY_DXDX */N/* */N/* Copy a Source String Passed by Descriptor to a Destination String */N/*  */O/* The Copy a Source String Passed by Descriptor to a Destination String */N/* routine */N/* copies a source string to a destination string. Both strings are */N/* passed by descriptor. */N/* */'#define ots$scopy_dxdx OTS$SCOPY_DXDX #ifdef __NEW_STA RLET"unsigned short int ots$scopy_dxdx( void *source_string, void *destination_string);#else /* __OLD_STARLET */4unsigned short int ots$scopy_dxdx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$SCOPY_R_DX */N/* */N/* Copy a Source String Passed by Reference to a Destination String */N/*  */N/* The Copy a Source String Passed by Reference to a Destination String */N/* routine copies a source string passed by reference to a destination */N/* string. */N/* */'#define ots$scopy_r_dx OTS$SCOPY_R_DX #ifdef __NEW_STARLET"unsigned short int ots$scopy_r_dx(/ unsigned short int word_int_source_length_val, cha r *source_string_address, void *destination_string);#else /* __OLD_STARLET */4unsigned short int ots$scopy_r_dx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$SFREE1_DD */N/* */N/* Strings, Free One Dynamic */N/* */N/* The !Free One Dynamic String routine */N/* returns one dynamic string area to free storage. */N/* */%#define ots$sfree1_dd OTS$SFREE1_DD #ifdef __NEW_STARLETint ots$sfree1_dd(' unsigned __int64 *dynamic_descriptor);#else /* __OLD_STARLET */$int ots$sfree1_dd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$SFREEN_DD " */N/* */N/* Strings, Free n Dynamic */N/* */N/* The Free n Dynamic Strings routine */N/* takes as input a vector of one or more dynamic string areas and */N/* returns them to free storage. # */N/* */%#define ots$sfreen_dd OTS$SFREEN_DD #ifdef __NEW_STARLETint ots$sfreen_dd(% unsigned int descriptor_count_value,% unsigned __int64 *first_descriptor);#else /* __OLD_STARLET */$int ots$sfreen_dd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$SGET1_DD */N/* $ */N/* Strings, Get One Dynamic */N/* */N/* The Get One Dynamic String routine */N/* allocates a specified number of bytes of dynamic virtual */N/* memory to a specified string descriptor. */N/* */##define ots$sge %t1_dd OTS$SGET1_DD #ifdef __NEW_STARLETint ots$sget1_dd(. unsigned short int word_integer_length_value,' unsigned __int64 *dynamic_descriptor);#else /* __OLD_STARLET */#int ots$sget1_dd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_L_TB */N/* */N/* Convert an Unsigned Integer to Binary Text */N/* & */N/* The Convert an Unsigned Integer to Binary Text routine */N/* converts an unsigned integer value of arbitrary length to */Q/* binary representation in an ASCII text string. By default, a longword is */N/* converted. */N/* */##define ots$cvt_l_tb OTS$C'VT_L_TB #ifdef __NEW_STARLETunsigned int ots$cvt_l_tb(# unsigned int *varying_input_value,% void *fixed_length_resultant_string, __optional_params );#else /* __OLD_STARLET */,unsigned int ots$cvt_l_tb(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_L_TI */N/* */N/* Convert Signed Integer to Decimal Text ( */N/* */N/* The Convert Signed Integer to Decimal Text routine */N/* converts a signed integer to a decimal ASCII text string. This */R/* routine supports FORTRAN Iw and Iw.m output and BASIC output conversion. */N/* */##define ots$cvt_l_ti OTS$CVT_L_TI #ifdef __NEW_STARLETunsigned int ots$cvt_l_ti( )# unsigned int *varying_input_value,% void *fixed_length_resultant_string, __optional_params );#else /* __OLD_STARLET */,unsigned int ots$cvt_l_ti(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_L_TL */N/* */N/* Convert Integer to Logical Text */N/* * */N/* The Convert Integer to Logical Text routine */N/* converts an integer to an ASCII text string representation */N/* using FORTRAN L (logical) format. */N/* */##define ots$cvt_l_tl OTS$CVT_L_TL #ifdef __NEW_STARLETunsigned int ots$cvt_l_tl( int *longword_integer_value,& void *fixed_length_resultant_st +ring);#else /* __OLD_STARLET */,unsigned int ots$cvt_l_tl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_L_TO */N/* */N/* Convert Unsigned Integer to Octal Text */N/* */N/* The Convert Unsigned Integer to Octal Text routine , */N/* converts an unsigned integer to an octal ASCII text string. */N/* OTS$CVT_L_TO supports FORTRAN Ow and Ow.m output conversion formats. */N/* */##define ots$cvt_l_to OTS$CVT_L_TO #ifdef __NEW_STARLETunsigned int ots$cvt_l_to(# unsigned int *varying_input_value,% void *fixed_length_resultant_string, __optional_params );#else /* __OLD_STARLET */,unsigned int ots$cvt_l_to(__un-known_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_L_TU */N/* */N/* Convert Unsigned Integer to Decimal Text */N/* */N/* The Convert Unsigned Integer to Decimal Text routine */N/* converts a byte, word or longword value to unsig.ned decimal */N/* representation in an ASCII text string. By default, a longword is */N/* converted. */N/* */##define ots$cvt_l_tu OTS$CVT_L_TU #ifdef __NEW_STARLETunsigned int ots$cvt_l_tu(# unsigned int *varying_input_value,% void *fixed_length_resultant_string, __optional_params );#else /* __OLD_STARLET */,unsigned int ots/$cvt_l_tu(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_L_TZ */N/* */N/* Convert Integer to Hexadecimal Text */N/* */N/* The Convert Integer to Hexadecimal Text routine */N/* converts an unsigned integer to a 0hexadecimal ASCII text */N/* string. OTS$CVT_L_TZ supports FORTRAN Zw and Zw.m output conversion */N/* formats. */N/* */##define ots$cvt_l_tz OTS$CVT_L_TZ #ifdef __NEW_STARLETunsigned int ots$cvt_l_tz(# unsigned int *varying_input_value,% void *fixed_length_resultant_string, __optional_params );#else /* __OLD_STARLET */,un1signed int ots$cvt_l_tz(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_TB_L */N/* */N/* Convert Binary Text to Unsigned Integer */N/* */N/* The Convert Binary Text to Unsigned Integer routine */N/* converts an ASCII te 2xt string representation of an unsigned */S/* binary value to an unsigned integer value of arbitrary length. By default, */O/* the result is a longword. Valid input characters are the blank and the */N/* digits 0 and 1. No sign is permitted. */N/* */##define ots$cvt_tb_l OTS$CVT_TB_L #ifdef __NEW_STARLETunsigned int ots$cvt_tb_l( void *input_string,$ unsigned 3int *varying_output_value, __optional_params );#else /* __OLD_STARLET */,unsigned int ots$cvt_tb_l(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_TI_L */N/* */N/* Convert Signed Integer Text to Integer */N/* */N/* The Convert Sign4ed Integer Text to Integer routine */N/* converts an ASCII text string representation of a decimal */N/* number to a signed byte, word, or longword integer value. */N/* The result is a longword by */N/* default, but the calling program can specify a byte or a word value */N/* instead. */N/* 5 */##define ots$cvt_ti_l OTS$CVT_TI_L #ifdef __NEW_STARLETunsigned int ots$cvt_ti_l(% void *fixed_or_dynamic_input_string,$ unsigned int *varying_output_value, __optional_params );#else /* __OLD_STARLET */,unsigned int ots$cvt_ti_l(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_TL_L */N/* */N/* Co6nvert Logical Text to Integer */N/* */N/* The Convert Logical Text to Integer routine */N/* converts an ASCII text string representation of a FORTRAN-77 L */W/* format to a byte, word, or longword integer value. The result is a longword by */N/* default, but the calling program can specify a byte or a word value */N/* instead. 7 */N/* */##define ots$cvt_tl_l OTS$CVT_TL_L #ifdef __NEW_STARLETunsigned int ots$cvt_tl_l(% void *fixed_or_dynamic_input_string,$ unsigned int *varying_output_value, __optional_params);#else /* __OLD_STARLET */,unsigned int ots$cvt_tl_l(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_TO_L 8 */N/* */N/* Convert Octal Text to Signed Integer */N/* */N/* The Convert Octal Text to Signed Integer routine */N/* converts an ASCII text string representation of an */Q/* octal value to an signed integer of an arbitrary length. The result is a */O/* long9word by default, but the calling program can specify a byte, word, */N/* or longword. */N/* */##define ots$cvt_to_l OTS$CVT_TO_L #ifdef __NEW_STARLETunsigned int ots$cvt_to_l(% void *fixed_or_dynamic_input_string,$ unsigned int *varying_output_value, __optional_params );#else /* __OLD_STARLET */,unsigned int ots$cvt_to_l(__unknown_params);!#end:if /* #ifdef __NEW_STARLET */N/* OTS$CVT_TU_L */N/* */N/* Convert Unsigned Decimal Text to Integer */N/* */N/* The Convert Unsigned Decimal Text to Integer routine */N/* converts an ASCII text string representation of an unsigned ; */T/* decimal value to an unsigned byte, word, or longword value. By default, the */T/* result is a longword. Valid input characters are the space and the digits 0 */N/* through 9. No sign is permitted. */N/* */##define ots$cvt_tu_l OTS$CVT_TU_L #ifdef __NEW_STARLETunsigned int ots$cvt_tu_l(! void *fixed_length_input_string,$ unsigned int *varying_output_value, _ <_optional_params );#else /* __OLD_STARLET */,unsigned int ots$cvt_tu_l(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* OTS$CVT_TZ_L */N/* */N/* Convert Hexadecimal Text to Unsigned Integer */N/* */N/* The Convert Hexadecimal Text to Unsigned Integ=er routine */N/* converts an ASCII text string representation of an unsigned */N/* hexadecimal value to an unsigned integer of an arbitrary length. */Q/* The result is a longword by default, but the calling program can specify */N/* a byte, word, or longword */N/* value. */N/* > */##define ots$cvt_tz_l OTS$CVT_TZ_L #ifdef __NEW_STARLETunsigned int ots$cvt_tz_l(% void *fixed_or_dynamic_input_string,$ unsigned int *varying_output_value, __optional_params );#else /* __OLD_STARLET */,unsigned int ots$cvt_tz_l(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previousl?y-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __OTS_ROUTINES_LOADED */ ww+//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OTSMSG.SDI;1 *//********************************************************************* @***********************************************************//*** MODULE $OTSDEF ***/#ifndef __OTSDEF_LOADED#define __OTSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 A/* 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 N/* B */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:39.69 */N/* */N/* FILE: OTSMSG.MSG EDIT: SBL2003 */N/* */Q/***************************************************************************** *//** * */8/** COPCYRIGHT (C) 1978, 1980, 1982, 1984 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABL DE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS ENOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/* */N/* */P/* 2-001 - CONVERT TO MESSAGE UTILITY SOURCE FORMAT. ADAPTED FROM OTSMSG.MDL */I/* VERSION 1-009. SBL 22-APR-1981 */N/* 2-002 - ADD OTS$_WRFONUMARG. RKR 4-SEP-1981 */N/* 2-003 - ADD .TITLE AND .IDENT. SBL 28-AUG-1982 */N/*-- */N/*+ */N/* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */N/* */I/* OTS$_ABCMNOXYZ G */N/* */O/* IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */Q/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR */N/* MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS. */N/* */P/* THE NAMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD AHPPEAR */N/* IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION. */N/* */N/* MACRO-32 PROGRAMMING: */N/* */N/* THE MACROS CALL: */N/* */I/* $OTSDEF I */N/* */N/* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */N/* THE RUN-TIME LIBRARY DECLARES THESE SYMBOLS EXTERNAL; */N/* THE MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER. */N/*- */N/*+ J */N/* DEFINE OTS$ SEVERE ERROR MESSAGES */N/*- */=/* ; DO NOT HAVE CONCEPT OF ERROR NUMBER (SEE FOR$ MTH$) */;/* ; SET SUB-SYSTEM SPECIFIC BIT AND MAKE SEVERE */;/* ; SET LH TO 23 (DECIMAL) OTS$ PREFIX */#define OTS$_FACILITY 23#define OTS$_INVSTRDES 1540108#define OTS$_FATINTERR 1540116#define OTS$_INTDATCOR 1540124#d Kefine OTS$_IO_CONCLO 1540132#define OTS$_INPCONERR 1540140#define OTS$_OUTCONERR 1540148#define OTS$_STRIS_INT 1540156#define OTS$_INSVIRMEM 1540164#define OTS$_WRONUMARG 1540172;/* ; OTS$SCOPY */N/*+ */N/* DEFINE OTS$ WARNING MESSAGES: */N/*- */=/* ; DO NOT LHAVE CONCEPT OF ERROR NUMBER (SEE FOR$ MTH$) */;/* ; SET SUB-SYSTEM SPECIFIC BIT AND MAKE WARNING */;/* ; SET LH TO 23 (DECIMAL) OTS$ PREFIX */#define OTS$_USEFLORES 1541120 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif M /* __OTSDEF_LOADED */ wwK60/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE PAGEDEF ***/#ifndef __PAGEDEF_LONADED#define __PAGEDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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" {#definOe __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 N#define MMG$C_VAX_PAGE_SIZE 512 /* SIZE OF VAX PAGE */N#define MMG$C_ALPHA_MAX_PAGE_SIZE 65536 P/* MAX. PAGE SIZE */N#define IOC$C_DISK_BLKSIZ 512 /* STANDARD DISK BLOCK SIZE */N#define IOC$C_CD_DVD_BLKSIZ 2048 /* Typical CD and DVD sector size */ [#define IOC$S_BLOCK_BYTEMASK 9 /* Width of byte field & shift factor for blocks */c#define IOC$S_DVDBLK_BYTEMASK 11 /* Width of byte field & shift factor for CD/DVD Sectors */"#define IOC$M_BLOCK_BYTEMASK 0x1FF%#define IOC$M_BLOCK_BLKNUM 0xFFFFFE00 #ifdef __NEW_STARLETtypeQdef union _blockdef { __struct {N unsigned ioc$v_block_bytemask : 9; /*BYTE VIELD */N unsigned ioc$v_block_blknum : 23; /*BLOCK NUMBER */ } ioc$r_blockdef_bits0; } BLOCKDEF; #if !defined(__VAXC)F#define ioc$v_block_bytemask ioc$r_blockdef_bits0.ioc$v_block_bytemaskB#define ioc$v_block_blknum ioc$r_blockdef_bits0.ioc$v_block_blknum"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union blockdefR { __struct {N unsigned ioc$v_block_bytemask : 9; /*BYTE VIELD */N unsigned ioc$v_block_blknum : 23; /*BLOCK NUMBER */ } ioc$r_blockdef_bits0; } ; #if !defined(__VAXC)F#define ioc$v_block_bytemask ioc$r_blockdef_bits0.ioc$v_block_bytemaskB#define ioc$v_block_blknum ioc$r_blockdef_bits0.ioc$v_block_blknum"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */##define IOC$M_DVDBLK_BYTEMASK 0x7FSF&#define IOC$M_DVDBLK_BLKNUM 0xFFFFF800 #ifdef __NEW_STARLETtypedef union _dvdblkdef { __struct {N unsigned ioc$v_dvdblk_bytemask : 11; /* CD/DVD Vield */N unsigned ioc$v_dvdblk_blknum : 21; /* CD/DVD Block Number */ } ioc$r_dvdblkdef_bits0; } DVDBLKDEF; #if !defined(__VAXC)I#define ioc$v_dvdblk_bytemask ioc$r_dvdblkdef_bits0.ioc$v_dvdblk_bytemaskE#define ioc$v_dvdblk_blknum ioc$r_dvdblkdef_bits0.ioc$v_dvdblk_blknum"#endTif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union dvdblkdef { __struct {N unsigned ioc$v_dvdblk_bytemask : 11; /* CD/DVD Vield */N unsigned ioc$v_dvdblk_blknum : 21; /* CD/DVD Block Number */ } ioc$r_dvdblkdef_bits0; } ; #if !defined(__VAXC)I#define ioc$v_dvdblk_bytemask ioc$r_dvdblkdef_bits0.ioc$v_dvdblk_bytemaskE#define ioc$v_dvdblk_blknum ioc$r_dvdblkdef_bits0.ioc$v_dvdblk_blknum"#endif /* #if !defineUd(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PAGEDEF_LOADED */ wwK2/********************************************************************************************* V***********************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */[/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]PASLIB_IEEEFLT$ROUTINES.SDI;1 *//********************************************************************************************************************************/(/*** MODULE PASLIB_IEEEFLT$ROUTINES ***/(#ifndef __PASLIB_IEEEFLT_ROUTINES_LOADED*#define __PASLIB_IEEEFLT_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-WANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_paXrams#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 P/**************************************************************************** *//* * */B/* COPYRIGHT (c) 1992, 1994, 1995, 1996, 1997, 2003 BY * */D/* DIGITAL EQUIPMENT CORPORATIOYN, MAYNARD, MASSACHUSETTS. * */&/* ALL RIGHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */P/* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */P/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */P/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * Z*/&/* TRANSFERRED. * *//* * */P/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. * *//* * */P/* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * *//* * */P/********************* [******************************************************* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* LIB$CVTS_FROM_INTERNAL_TIME */N/* */N/* Convert Internal Time to External Time (S-Floating Point Value) */N/* */N/* The Convert Internal Time to Externa \l Time (S-Floating Point Value) */N/* routine converts a delta internal VMS system time into an external */N/* S-floating time. */N/* */A#define lib$cvts_from_internal_time LIB$CVTS_FROM_INTERNAL_TIME #ifdef __NEW_STARLET)unsigned int lib$cvts_from_internal_time( unsigned int *operation, float *resultant_time, unsigned __int64 *input_time);#e]lse /* __OLD_STARLET */;unsigned int lib$cvts_from_internal_time(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$CVTS_TO_INTERNAL_TIME */N/* */N/* Convert External Time to Internal Time (S-Floating Point Value) */N/* */N/* The Convert External Time to Internal Time (S-Floating P ^oint Value) */N/* routine converts an external time interval into a VMS internal format */N/* S-floating delta time. */N/* */N/* */=#define lib$cvts_to_internal_time LIB$CVTS_TO_INTERNAL_TIME #ifdef __NEW_STARLET'unsigned int lib$cvts_to_internal_time( unsigned int *operation, float * _input_time,# unsigned __int64 *resultant_time);#else /* __OLD_STARLET */9unsigned int lib$cvts_to_internal_time(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$EMODS */N/* */N/* Extended Multiply and Integerize Routines for S-Floating Point Values */N/* */O/* The `Extended Multiply and Integerize routine (S-Floating Point Values) */O/* allows higher-level language users to perform accurate range reduction */N/* of S-floating arguments. */N/* */#define lib$emods LIB$EMODS #ifdef __NEW_STARLETunsigned int lib$emods(" float *floating_point_multiplier,% unsigned char *multiplier_extension,$ float *floating_point_multiplic aand, int *integer_portion, float *fractional_portion);#else /* __OLD_STARLET */)unsigned int lib$emods(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* LIB$MULTS_DELTA_TIME */N/* */N/* Multiply Delta Time by an S_Floating Scalar */N/* */N/* The Multiply b Delta Time by an S-Floating Scalar routine multiplies a */N/* delta time by an S-floating scalar. */N/* */3#define lib$mults_delta_time LIB$MULTS_DELTA_TIME #ifdef __NEW_STARLET"unsigned int lib$mults_delta_time( float *multiplier, unsigned __int64 *delta_time);#else /* __OLD_STARLET */4unsigned int lib$mults_delta_time(__unknown_params);!#endif /* #ifdef __NEW_STARLETc */N/* LIB$POLYS */N/* */N/* Evaluate Polynomials */N/* */N/* The Evaluate Polynomials routine (S-floating point values) allows */N/* higher-level language users to evaluate S-floating point */N/* polynomials. d */N/* */#define lib$polys LIB$POLYS #ifdef __NEW_STARLETunsigned int lib$polys( float *polynomial_argument, short int *degree, float coefficient [], float *floating_point_result);#else /* __OLD_STARLET */)unsigned int lib$polys(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTeER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard -#endif /* __PASLIB_IEEEFLT_ROUTINES_LOADED */ wwk2/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* S fource: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $PCCDEF ***/#ifndef __PCCDEF_LOADED#define __PCCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas suppgorted */\#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#ehndif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* PRINTER/TERMINAL CARRIAGE CONTROL SPECIFIERS */N/*-- */#define PCC$M_CHAR 0x1F#define PCC$M_EIGHTBIT 0x40#define PCC$M_SINGLE 0x80#define PCC$M_LINECNT 0x7FN#define PCC$_FTN_SIN iGLE 32 /* SINGLE SPACE */N#define PCC$_FTN_DOUBLE 48 /* DOUBLE SPACE */N#define PCC$_FTN_PAGE 49 /* PAGE SPACE */N#define PCC$_FTN_OVRPRT 43 /* OVER PRINT */N#define PCC$_FTN_PROMPT 36 /* PROMPT */ #ifdef __NEW_STARLETtypedef struct _pccdef {N unsigned short int pcc$w_fortran; /* FORTRAN FIELD j */N __union { /* PREFIX FIELD */# unsigned char pcc$b_prefix; __struct {( unsigned pccdef$$_bits0 : 1;( unsigned pcc$v_fill_49_ : 7;! } pcc$r_prefix_bits0; __struct {( unsigned pccdef$$_bits1 : 1;( unsigned pcc$v_fill_50_ : 7;! } pcc$r_prefix_bits1; } pcc$r_prefix_overlay; __union {N unsigned char pcc$b_postfix; /* POSTF kIX FIELD */ __struct {N unsigned pcc$v_char : 5; /* CHARACTER FIELD */) unsigned pccdef$$_fill_1 : 1;N unsigned pcc$v_eightbit : 1; /* EIGHTBIT CHARACTER SET */N unsigned pcc$v_single : 1; /* SINGLE CHARACTER */" } pcc$r_postfix_bits0; __struct {N unsigned pcc$v_linecnt : 7; /* LINE COUNT FOR NEWLINES */( unsigned pcc$v_fil ll_51_ : 1;" } pcc$r_postfix_bits1;N/* FORTRAN CONSTANTS */ } pcc$r_postfix_overlay; } PCCDEF; #if !defined(__VAXC)6#define pcc$b_prefix pcc$r_prefix_overlay.pcc$b_prefix9#define pcc$b_postfix pcc$r_postfix_overlay.pcc$b_postfixG#define pcc$v_char pcc$r_postfix_overlay.pcc$r_postfix_bits0.pcc$v_charO#define pcc$v_eightbit pcc$r_postfix_overlay.pcc$r_postfix_bits0.pcc$v_eightbitK#define pcc$v_single pcc$r_pos mtfix_overlay.pcc$r_postfix_bits0.pcc$v_singleM#define pcc$v_linecnt pcc$r_postfix_overlay.pcc$r_postfix_bits1.pcc$v_linecnt"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct pccdef {N unsigned short int pcc$w_fortran; /* FORTRAN FIELD */N __union { /* PREFIX FIELD */# unsigned char pcc$b_prefix; __struct {( unsigned pccdef$$_bits0 : 1;( unsigned pcc$v n_fill_49_ : 7;! } pcc$r_prefix_bits0; __struct {( unsigned pccdef$$_bits1 : 1;( unsigned pcc$v_fill_50_ : 7;! } pcc$r_prefix_bits1; } pcc$r_prefix_overlay; __union {N unsigned char pcc$b_postfix; /* POSTFIX FIELD */ __struct {N unsigned pcc$v_char : 5; /* CHARACTER FIELD */) unsigned pccdef$$_fill_1 : 1;N unsigned pcc$v_eightbit o: 1; /* EIGHTBIT CHARACTER SET */N unsigned pcc$v_single : 1; /* SINGLE CHARACTER */" } pcc$r_postfix_bits0; __struct {N unsigned pcc$v_linecnt : 7; /* LINE COUNT FOR NEWLINES */( unsigned pcc$v_fill_51_ : 1;" } pcc$r_postfix_bits1;N/* FORTRAN CONSTANTS */ } pcc$r_postfix_overlay; } ; #if !defined(__VAXC)6#define pcc$b_pr pefix pcc$r_prefix_overlay.pcc$b_prefix9#define pcc$b_postfix pcc$r_postfix_overlay.pcc$b_postfixG#define pcc$v_char pcc$r_postfix_overlay.pcc$r_postfix_bits0.pcc$v_charO#define pcc$v_eightbit pcc$r_postfix_overlay.pcc$r_postfix_bits0.pcc$v_eightbitK#define pcc$v_single pcc$r_postfix_overlay.pcc$r_postfix_bits0.pcc$v_singleM#define pcc$v_linecnt pcc$r_postfix_overlay.pcc$r_postfix_bits1.pcc$v_linecnt"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma q__member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PCCDEF_LOADED */ wwC3/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 b ry OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $PDSCDEF ***/#ifndef __PDSCDEF_LOADED#define __PDSCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Desfined 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 t__struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */P/* Procedure descriptor offset definitions for the Alpha-32 calling standard. */O/* This definition includes the offsets and fields for stack frame (SF) and */N/* register frame (RF) procedure descriptors. */N/* u */N#define PDSC$K_KIND_BOUND 0 /* bound procedure */N#define PDSC$K_KIND_NULL 8 /* null procedure */N#define PDSC$K_KIND_FP_STACK 9 /* SF procedure */N#define PDSC$K_KIND_FP_REGISTER 10 /* RF procedure */!#define PDSC$M_HANDLER_VALID 0x10'#define PDSC$M_HANDLER_REINVOKABLE 0x20&#define PDSC$M_HANDLER_DATA_VALID 0x40" v#define PDSC$M_BASE_REG_IS_FP 0x80#define PDSC$M_REI_RETURN 0x100'#define PDSC$M_STACK_RETURN_VALUE 0x200#define PDSC$M_BASE_FRAME 0x400 #define PDSC$M_TARGET_INVO 0x800#define PDSC$M_NATIVE 0x1000#define PDSC$M_NO_JACKET 0x2000#define PDSC$M_TIE_FRAME 0x4000#define PDSC$M_FUNC_RETURN 0xF"#define PDSC$M_EXCEPTION_MODE 0x70N#define PDSC$K_EXC_MODE_SIGNAL 0 /* signal */N#define PDSC$K_EXC_MODE_SIGNAL_ALL 1 /* signal all */Nw#define PDSC$K_EXC_MODE_SIGNAL_SILENT 2 /* signal silent */N#define PDSC$K_EXC_MODE_FULL_IEEE 3 /* signal full ieee */N#define PDSC$K_EXC_MODE_CALLER 4 /* use caller's mode */N#define PDSC$K_NULL_SIZE 16 /* length of NULL descriptor */\#define PDSC$K_BOUND_SIZE 24 /* length of the basic bound precedure descriptor */c#define PDSC$K_MIN_BOUND_SIZE 24 /* minimum size of the basic bound procedure descripxtor */Y#define PDSC$K_MIN_LENGTH_SF 32 /* length of required portion of SF descriptor */N#define PDSC$K_MIN_STACK_SIZE 32 /* min size of SF descriptor */N#define PDSC$K_MAX_STACK_SIZE 48 /* max size of SF descriptor */Y#define PDSC$K_MIN_LENGTH_RF 24 /* length of required portion of RF descriptor */N#define PDSC$K_MIN_REGISTER_SIZE 24 /* min size of RF descriptor */N#define PDSC$K_MAX_REGISTER_SIZE 40 /* max size of RF descriptor y */h#define PDSC$K_BOUND_ENVIRONMENT_SIZE 32 /* length of the bound precedure descriptor with environment */ #ifdef __NEW_STARLETtypedef struct _pdscdef { __union {V unsigned short int pdsc$w_flags; /* flags including procedure kind bitfield */ __struct {N unsigned pdsc$v_kind : 4; /* kind of procedure */o unsigned pdsc$v_handler_valid : 1; /* optional STACK_HANDLER or REG_HANDLER is present and valid */[ unsignzed pdsc$v_handler_reinvokable : 1; /* exception handler is reinvokable */~ unsigned pdsc$v_handler_data_valid : 1; /* optional STACK_HANDLER_DATA or REG_HANDLER_DATA is present and valid */W unsigned pdsc$v_base_reg_is_fp : 1; /* FP is also base register (vs. SP) */N unsigned pdsc$v_rei_return : 1; /* exit from procedure via REI */Z unsigned pdsc$v_stack_return_value : 1; /* function value returned on stack */N unsigned pdsc$v_base_frame :{ 1; /* base frame indicator */[ unsigned pdsc$v_target_invo : 1; /* unwind target invo handler to be called */N unsigned pdsc$v_native : 1; /* set to 1 for compiled code */N unsigned pdsc$v_no_jacket : 1; /* set to 1 for compiled code */N unsigned pdsc$v_tie_frame : 1; /* must be 0 for compiled code */N unsigned pdsc$v_flags_mbz2 : 1; /* must be zero */ } pdsc$r_fill_53_; } pdsc$r_fil |l_52_; __union {^ short int pdsc$w_rsa_offset; /* offset to register save area from base (SF only) */ __struct {V unsigned char pdsc$b_save_fp; /* register number for saved FP (RF only) */b unsigned char pdsc$b_save_ra; /* register number for saved return address (RF only) */$ } pdsc$r_rsa_offset_reg;$ } pdsc$r_rsa_offset_overlay;X char pdsc$b_entry_ra; /* register in which return address is passed */ __stru }ct {_ unsigned pdsc$v_func_return : 4; /* register specificatons for function value return */c unsigned pdsc$v_exception_mode : 3; /* the caller's desired exception reporting behavior */, unsigned pdsc$v_more_flags_mbz1 : 1;# } pdsc$r_more_flags_struct;[ short int pdsc$w_signature_offset; /* offset from procedure descriptor to signature */ __union {P __int64 pdsc$q_entry; /* address of start of procedure code */ __struct {Y ~ int pdsc$l_entry; /* first longword is sign extended to quadword */ } pdsc$r_fill_55_; } pdsc$r_fill_54_;N __union { /* */N unsigned int pdsc$l_size; /* size of fixed portion of stack */ __union {N __int64 pdsc$q_proc_value; /* for bound procedure descriptor, */ __struct {S int pdsc$l_proc_value; /* this value is a procedure  descriptor. */N int pdsc$l_reserved1; /* reserved */" } pdsc$r_fill_57_; } pdsc$r_fill_56_; } pdsc$r_size_overlay; __union {N __struct { /* stack frame specific... */N unsigned int pdsc$l_ireg_mask; /* integer register save mask */N unsigned int pdsc$l_freg_mask; /* floating register save mask */^ __int64 pdsc$q_stack_handler; /* absolute pointer to procedure descriptor (opt) */Q __int64 pdsc$q_stack_handler_data; /* data for stack handler (opt) */$ } pdsc$r_stack_specific;N __struct { /* register frame specific... */\ __int64 pdsc$q_reg_handler; /* absolute pointer to procedure descriptor (opt) */N __int64 pdsc$q_reg_handler_data; /* data for handler (opt) */' } pdsc$r_register_specific;T __union { /* B ound procedure descriptor ENVIRONMENT */# int pdsc$l_environment;' __int64 pdsc$q_environment;' } pdsc$r_environment_union; } pdsc$r_kind_specific; } PDSCDEF; #if !defined(__VAXC)1#define pdsc$w_flags pdsc$r_fill_52_.pdsc$w_flags?#define pdsc$v_kind pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_kindQ#define pdsc$v_handler_valid pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_handler_valid]#define pdsc$v_handler_reinvokable pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_handler_reinvokable[#define pdsc$v_handler_data_valid pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_handler_data_validS#define pdsc$v_base_reg_is_fp pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_base_reg_is_fpK#define pdsc$v_rei_return pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_rei_return[#define pdsc$v_stack_return_value pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_stack_return_valueK#define pdsc$v_base_frame pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_base_frameM#define pdsc$v_target_invo pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_target_invoC#define pdsc$v_native pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_nativeI#define pdsc$v_no_jacket pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_no_jacketI#define pdsc$v_tie_frame pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_tie_frameE#define pdsc$w_rsa_offset pdsc$r_rsa_offset_overlay.pdsc$w_rsa_offsetU#define pdsc$b_save_fp pdsc$r_rsa_offset_overlay.pdsc$r_rsa_offset_reg.pdsc$b_save_fpU#define pdsc$b_save_ra pdsc$r_rsa_offset_overlay.pdsc$r_rsa_offset_reg.pdsc$b_save_raF#define pdsc$v_func_return pdsc$r_more_flags_struct.pdsc$v_func_returnL#define pdsc$v_exception_mode pdsc$r_more_flags_struct.pdsc$v_exception_mode1#define pdsc$q_entry pdsc$r_fill_54_.pdsc$q_entryA#define pdsc$l_entry pdsc$r_fill_54_.pdsc$r_fill_55_.pdsc$l_entry3#define pdsc$l_size pdsc$r_size_overlay.pdsc$l_sizeO#define pdsc$q_proc_value pdsc$r_size_overlay.pdsc$r_fill_56_.pdsc$q_proc_value_#define pdsc$l_proc_value pdsc$r_size_overlay.pdsc$r_fill_56_.pdsc$r_fill_57_.pdsc$l_proc_valueT#define pdsc$l_ireg_mask pdsc$r_kind_specific.pdsc$r_stack_specific.pdsc$l_ireg_maskT#define pdsc$l_freg_mask pdsc$r_kind_specific.pdsc$r_stack_specific.pdsc$l_freg_mask\#define pdsc$q_stack_handler pdsc$r_kind_specific.pdsc$r_stack_specific.pdsc$q_stack_handlerf#define pdsc$q_stack_handler_data pdsc$r_kind_specific.pdsc$r_stack_specific.pdsc$q_stack_handler_data[#define pdsc$q_reg_handler pdsc$r_kind_specific.pdsc$r_register_specific.pdsc$q_reg_handlere#define pdsc$q_reg_handler_data pdsc$r_kind_ specific.pdsc$r_register_specific.pdsc$q_reg_handler_data[#define pdsc$l_environment pdsc$r_kind_specific.pdsc$r_environment_union.pdsc$l_environment[#define pdsc$q_environment pdsc$r_kind_specific.pdsc$r_environment_union.pdsc$q_environment"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct pdscdef { __union {V unsigned short int pdsc$w_flags; /* flags including procedure kind bitfield */ __struct {N unsigned pdsc$v_kind : 4; /* kind of procedure */o unsigned pdsc$v_handler_valid : 1; /* optional STACK_HANDLER or REG_HANDLER is present and valid */[ unsigned pdsc$v_handler_reinvokable : 1; /* exception handler is reinvokable */~ unsigned pdsc$v_handler_data_valid : 1; /* optional STACK_HANDLER_DATA or REG_HANDLER_DATA is present and valid */W unsigned pdsc$v_base_reg_is_fp : 1; /* FP is also base register (vs. SP) */N unsigned pdsc$v_rei_return : 1; /* exit from procedure via REI */Z unsigned pdsc$v_stack_return_value : 1; /* function value returned on stack */N unsigned pdsc$v_base_frame : 1; /* base frame indicator */[ unsigned pdsc$v_target_invo : 1; /* unwind target invo handler to be called */N unsigned pdsc$v_native : 1; /* set to 1 for compiled code */N unsigned pdsc$v_no_jacket : 1; /* set to 1 for compiled code */N unsigned pdsc$v_tie_frame : 1;  /* must be 0 for compiled code */N unsigned pdsc$v_flags_mbz2 : 1; /* must be zero */ } pdsc$r_fill_53_; } pdsc$r_fill_52_; __union {^ short int pdsc$w_rsa_offset; /* offset to register save area from base (SF only) */ __struct {V unsigned char pdsc$b_save_fp; /* register number for saved FP (RF only) */b unsigned char pdsc$b_save_ra; /* register number for saved return address (RF only) */$  } pdsc$r_rsa_offset_reg;$ } pdsc$r_rsa_offset_overlay;X char pdsc$b_entry_ra; /* register in which return address is passed */ __struct {_ unsigned pdsc$v_func_return : 4; /* register specificatons for function value return */c unsigned pdsc$v_exception_mode : 3; /* the caller's desired exception reporting behavior */, unsigned pdsc$v_more_flags_mbz1 : 1;# } pdsc$r_more_flags_struct;[ short int pdsc$w_signature_offset; /* o ffset from procedure descriptor to signature */ __union {P int pdsc$q_entry [2]; /* address of start of procedure code */ __struct {Y int pdsc$l_entry; /* first longword is sign extended to quadword */ } pdsc$r_fill_55_; } pdsc$r_fill_54_;N __union { /* */N unsigned int pdsc$l_size; /* size of fixed portion of stack */ __union {N  int pdsc$q_proc_value [2]; /* for bound procedure descriptor, */ __struct {S int pdsc$l_proc_value; /* this value is a procedure descriptor. */N int pdsc$l_reserved1; /* reserved */" } pdsc$r_fill_57_; } pdsc$r_fill_56_; } pdsc$r_size_overlay; __union {N __struct { /* stack frame specific... */N unsigned int pdsc$l_ireg_mask; /* integer register save mask */N unsigned int pdsc$l_freg_mask; /* floating register save mask */^ int pdsc$q_stack_handler [2]; /* absolute pointer to procedure descriptor (opt) */Q int pdsc$q_stack_handler_data [2]; /* data for stack handler (opt) */$ } pdsc$r_stack_specific;N __struct { /* register frame specific... */\ int pdsc$q_reg_handler [2]; /* absolute pointer to procedure descriptor (opt) */N int pdsc$q_reg_handler_data [2]; /* data for handler (opt) */' } pdsc$r_register_specific;T __union { /* Bound procedure descriptor ENVIRONMENT */# int pdsc$l_environment;' int pdsc$q_environment [2];' } pdsc$r_environment_union; } pdsc$r_kind_specific; } ; #if !defined(__VAXC)1#define pdsc$w_flags pdsc$r_fill_52_.pdsc$w_flags?#define pdsc$v_kind pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_kindQ#define pdsc$v_handler_valid pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_handler_valid]#define pdsc$v_handler_reinvokable pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_handler_reinvokable[#define pdsc$v_handler_data_valid pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_handler_data_validS#define pdsc$v_base_reg_is_fp pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_base_reg_is_fpK#define pdsc$v_rei_return pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_rei_return[#define pdsc$v_stack_return_value pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_stack_return_valueK#define pdsc$v_base_frame pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_base_frameM#define pdsc$v_target_invo pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_target_invoC#define pdsc$v_native pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_nativeI#define pdsc$v_no_jacket pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_no_jacketI#define pdsc$v_tie_frame pdsc$r_fill_52_.pdsc$r_fill_53_.pdsc$v_tie_frameE#define pdsc$w_rsa_offset pdsc$r_rsa_offset_overlay.pdsc$w_rsa_offsetU#define pdsc$b_save_fp pdsc$r_rsa_offset_overlay.pdsc$r_rsa_offset_reg.pdsc$b_save_fpU#define pdsc$b_save_ra pdsc$r_rsa_offset_overlay.pdsc$r_rsa_offset_reg.pdsc$b_save_raF#define pdsc$v_func_return pdsc$r_more_flags_struct.pdsc$v_func_returnL#define pdsc$v_exception_mode pdsc$r_more_flags_struct.pdsc$v_exception_mode1#define pdsc$q_entry pdsc$r_fill_54_.pdsc$q_entryA#define pdsc$l_entry pdsc$r_fill_54_.pdsc$r_fill_55_.pdsc$l_entry3#define pdsc$l_size pdsc$r_size_overlay.pdsc$l_sizeO#define pdsc$q_proc_value pdsc$r_size_overlay.pdsc$r_fill_56_.pdsc$q_proc_value_#define pdsc$l_proc_value pdsc$r_size_overlay.pdsc$r_fill_56_.pdsc$r_fill_57_.pdsc$l_proc_valueT#define pdsc$l_ireg_mask pdsc$r_kind_specific.pdsc$r_stack_specific.pdsc$l_ireg_maskT#define pdsc$l_freg_mask pdsc$r_kind_specific.pdsc$r_stack_specific.pdsc$l_freg_mask\#define pdsc$q_stack_handler pdsc$r_kind_specific.pdsc$r_stack_specific.pdsc$q_stack_handlerf#define pdsc$q_stack_handler_data pdsc$r_kind_specific.pdsc$r_stack_specific.p dsc$q_stack_handler_data[#define pdsc$q_reg_handler pdsc$r_kind_specific.pdsc$r_register_specific.pdsc$q_reg_handlere#define pdsc$q_reg_handler_data pdsc$r_kind_specific.pdsc$r_register_specific.pdsc$q_reg_handler_data[#define pdsc$l_environment pdsc$r_kind_specific.pdsc$r_environment_union.pdsc$l_environment[#define pdsc$q_environment pdsc$r_kind_specific.pdsc$r_environment_union.pdsc$q_environment"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define PDSC$K_LKP_LENGTH 16 /* Linkage pair size */ #ifdef __NEW_STARLETNtypedef struct _pdsc_lkpdef { /* Linkage pair def */ __union {N __int64 pdsc$q_lkp_entry; /* Entry point addr */ __struct {$ void *pdsc$ps_lkp_entry; } pdsc$r_fill_59_; } pdsc$r_fill_58_; __union {N __int64 pdsc$q_lkp_proc_value; /* Proc desc addr */ __struct {)  void *pdsc$ps_lkp_proc_value; } pdsc$r_fill_61_; } pdsc$r_fill_60_; } PDSC_LKPDEF; #if !defined(__VAXC)9#define pdsc$q_lkp_entry pdsc$r_fill_58_.pdsc$q_lkp_entryK#define pdsc$ps_lkp_entry pdsc$r_fill_58_.pdsc$r_fill_59_.pdsc$ps_lkp_entryC#define pdsc$q_lkp_proc_value pdsc$r_fill_60_.pdsc$q_lkp_proc_valueU#define pdsc$ps_lkp_proc_value pdsc$r_fill_60_.pdsc$r_fill_61_.pdsc$ps_lkp_proc_value"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */Nstruct pdsc_lkpdef { /* Linkage pair def */ __union {N int pdsc$q_lkp_entry [2]; /* Entry point addr */ __struct {" int pdsc$ps_lkp_entry; } pdsc$r_fill_59_; } pdsc$r_fill_58_; __union {N int pdsc$q_lkp_proc_value [2]; /* Proc desc addr */ __struct {' int pdsc$ps_lkp_proc_value; } pdsc$r_fill_61_; } pdsc$r_fill_60_; } ; #if !defined(__VAXC)9#define pdsc$q_lkp_entry pdsc$r_fill_58_.pdsc$q_lkp_entryK#define pdsc$ps_lkp_entry pdsc$r_fill_58_.pdsc$r_fill_59_.pdsc$ps_lkp_entryC#define pdsc$q_lkp_proc_value pdsc$r_fill_60_.pdsc$q_lkp_proc_valueU#define pdsc$ps_lkp_proc_value pdsc$r_fill_60_.pdsc$r_fill_61_.pdsc$ps_lkp_proc_value"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define LKP$K_SIZE 16 /* Linkage pair size  */ #ifdef __NEW_STARLETNtypedef struct _lkpdef { /* Linkage pair def */N __union { /* Entry point addr */ __int64 lkp$q_entry; void *lkp$ps_entry; } lkp$r_entry_union;N __union { /* Proc desc addr */! __int64 lkp$q_proc_value; void *lkp$ps_proc_value;! } lkp$r_proc_value_union; } LKPDEF; #if !defined(__VAX C)1#define lkp$q_entry lkp$r_entry_union.lkp$q_entry3#define lkp$ps_entry lkp$r_entry_union.lkp$ps_entry@#define lkp$q_proc_value lkp$r_proc_value_union.lkp$q_proc_valueB#define lkp$ps_proc_value lkp$r_proc_value_union.lkp$ps_proc_value"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */Nstruct lkpdef { /* Linkage pair def */N __union { /* Entry point addr */ int lkp$q_entry [2];  int lkp$ps_entry; } lkp$r_entry_union;N __union { /* Proc desc addr */! int lkp$q_proc_value [2]; int lkp$ps_proc_value;! } lkp$r_proc_value_union; } ; #if !defined(__VAXC)1#define lkp$q_entry lkp$r_entry_union.lkp$q_entry3#define lkp$ps_entry lkp$r_entry_union.lkp$ps_entry@#define lkp$q_proc_value lkp$r_proc_value_union.lkp$q_proc_valueB#define lkp$ps_proc_value lkp$r_proc_value_union.lkp$ps_proc_value"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PDSCDEF_LOADED */ ww3/*********************************************************** *********************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $PMMDEF ***/#ifndef __PMMDEF_LOADED#define __PMMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */Q/* PFN memory data structure definition. This structure is used to access the */O/* fields within the PFN memory map returned by $GETSYI. $GETSYI co pies the */N/* contents of the pool packet stored at MMG$GL_SYI_PFN_MEMORY_MAP to a */N/* user-supplied buffer. */N/*- */#define PMM$M_CONSOLE 0x1#define PMM$M_OPENVMS 0x2#define PMM$M_AVAILABLE 0x4#define PMM$M_BASE 0x8 #define PMM$M_GALAXY_SHARED 0x10##define PMM$M_UNDEFINED_5_15 0xFFE0N#define PMM$C_LENGTH 12 /* Length of structure  */N#define PMM$K_LENGTH 12 /* Length of structure */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _pmm {#pragma __nomember_alignmentN short int pmm$w_length; /* Size of a PMM structure */ __union {' unsigned short int pmm$w_flags; __struct {N unsigned pmm$v_console : 1; /* Used by Console */N unsigned pmm$v_openvms : 1; /* Used by OpenVMS */N unsigned pmm$v_available : 1; /* Available for Other Uses */N unsigned pmm$v_base : 1; /* Galaxy base memory segment */N unsigned pmm$v_galaxy_shared : 1; /* Galaxy shared memory */S unsigned pmm$v_undefined_5_15 : 11; /* Undefined bits should be zero */  } pmm$r_fill_63_; } pmm$r_fill_62_;N unsigned int pmm$l_start_pfn; /* First PFN in this cluster */N unsigned int pmm$l_pfn_count; /* Number of PFNs in this cluster */ } PMM; #if !defined(__VAXC).#define pmm$w_flags pmm$r_fill_62_.pmm$w_flagsA#define pmm$v_console pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_consoleA#define pmm$v_openvms pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_openvmsE#define pmm$v_available pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_available ;#define pmm$v_base pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_baseM#define pmm$v_galaxy_shared pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_galaxy_sharedO#define pmm$v_undefined_5_15 pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_undefined_5_15"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _pm m {#pragma __nomember_alignmentN short int pmm$w_length; /* Size of a PMM structure */ __union {' unsigned short int pmm$w_flags; __struct {N unsigned pmm$v_console : 1; /* Used by Console */N unsigned pmm$v_openvms : 1; /* Used by OpenVMS */N unsigned pmm$v_available : 1; /* Available for Other Uses */N unsigned pmm$v_base : 1; /* Galaxy base memory segment  */N unsigned pmm$v_galaxy_shared : 1; /* Galaxy shared memory */S unsigned pmm$v_undefined_5_15 : 11; /* Undefined bits should be zero */ } pmm$r_fill_63_; } pmm$r_fill_62_;N unsigned int pmm$l_start_pfn; /* First PFN in this cluster */N unsigned int pmm$l_pfn_count; /* Number of PFNs in this cluster */ } pmm; #if !defined(__VAXC).#define pmm$w_flags pmm$r_fill_62_.pmm$w_flagsA#define pmm$v_console pm m$r_fill_62_.pmm$r_fill_63_.pmm$v_consoleA#define pmm$v_openvms pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_openvmsE#define pmm$v_available pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_available;#define pmm$v_base pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_baseM#define pmm$v_galaxy_shared pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_galaxy_sharedO#define pmm$v_undefined_5_15 pmm$r_fill_62_.pmm$r_fill_63_.pmm$v_undefined_5_15"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* Expanded versio n for larger PFNs */#define PMM64$M_CONSOLE 0x1#define PMM64$M_OPENVMS 0x2#define PMM64$M_AVAILABLE 0x4#define PMM64$M_BASE 0x8"#define PMM64$M_GALAXY_SHARED 0x10%#define PMM64$M_UNDEFINED_5_15 0xFFE0N#define PMM64$C_LENGTH 24 /* Length of structure */N#define PMM64$K_LENGTH 24 /* Length of structure */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _pmm64 {#pragma __nomember_alignmentN short int pmm64$w_length; /* Size of a PMM structure */ __union {) unsigned short int pmm64$w_flags; __struct {N unsigned pmm64$v_console : 1; /* Used by Console */N unsigned pmm64$v_openvms : 1; /* Used by OpenVMS */N  unsigned pmm64$v_available : 1; /* Available for Other Uses */N unsigned pmm64$v_base : 1; /* Galaxy base memory segment */N unsigned pmm64$v_galaxy_shared : 1; /* Galaxy shared memory */U unsigned pmm64$v_undefined_5_15 : 11; /* Undefined bits should be zero */ } pmm64$r_fill_65_; } pmm64$r_fill_64_;N unsigned int pmm64$l_reserved; /* padding */N unsigned __int64 pmm64$q_start_p fn; /* First PFN in this cluster */N unsigned __int64 pmm64$q_pfn_count; /* Number of PFNs in this cluster */ } PMM64; #if !defined(__VAXC)4#define pmm64$w_flags pmm64$r_fill_64_.pmm64$w_flagsI#define pmm64$v_console pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_consoleI#define pmm64$v_openvms pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_openvmsM#define pmm64$v_available pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_availableC#define pmm64$v_base pmm64$r_fill_64_.pmm64$r_fill_65_.p mm64$v_baseU#define pmm64$v_galaxy_shared pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_galaxy_sharedW#define pmm64$v_undefined_5_15 pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_undefined_5_15"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _pmm64 {#pragma __nomember_alignme ntN short int pmm64$w_length; /* Size of a PMM structure */ __union {) unsigned short int pmm64$w_flags; __struct {N unsigned pmm64$v_console : 1; /* Used by Console */N unsigned pmm64$v_openvms : 1; /* Used by OpenVMS */N unsigned pmm64$v_available : 1; /* Available for Other Uses */N unsigned pmm64$v_base : 1; /* Galaxy base memory segment */N unsigned  pmm64$v_galaxy_shared : 1; /* Galaxy shared memory */U unsigned pmm64$v_undefined_5_15 : 11; /* Undefined bits should be zero */ } pmm64$r_fill_65_; } pmm64$r_fill_64_;N unsigned int pmm64$l_reserved; /* padding */N unsigned int pmm64$q_start_pfn [2]; /* First PFN in this cluster */N unsigned int pmm64$q_pfn_count [2]; /* Number of PFNs in this cluster */ } pmm64; #if !defined(__VAXC)4#define pmm64$w_flags pmm64$r_fill_64_.pmm64$w_flagsI#define pmm64$v_console pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_consoleI#define pmm64$v_openvms pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_openvmsM#define pmm64$v_available pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_availableC#define pmm64$v_base pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_baseU#define pmm64$v_galaxy_shared pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_galaxy_sharedW#define pmm64$v_undefined_5_15 pmm64$r_fill_64_.pmm64$r_fill_65_.pmm64$v_und efined_5_15"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZEJ#pragma __required_pointer_size __save /* Save current pointer size */E#pragma __required_pointer_size __long /* Pointers are 64-bit */Htypedef struct _pmm * PMM_PQ; /* Long pointer to a PMM structure. */Utypedef struct _pmm ** PMM_PPQ; /* Long pointer to a pointer to a PMM structure. */Ktypedef struct _pmm64 * PMM64_PQ; /* Long pointer to a PMM structure. */Xtypedef struct _pmm64 ** PMM64_PPQ; /* Long pointer to a pointer to a PMM structure. */Q#pragma __required_pointer_size __restore /* Return to previous pointer size */#else typedef unsigned __int64 PMM_PQ;!typedef unsigned __int64 PMM_PPQ;"typedef unsigned __int64 PMM64_PQ;#typedef unsigned __int64 PMM64_PPQ;##endif /* __INITIAL_POINTER_SIZE */  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PMMDEF_LOADED */ ww4/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//*** *****************************************************************************************************************************/"/*** MODULE $POSIX_SERVICEDEF ***/!#ifndef __POSIX_SERVICEDEF_LOADED##define __POSIX_SERVICEDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* The following definitions are passed in the ctrl parameter. */N#define POSIX$C_BLOCK_FORK 1 /* block fork execution */N#define POSIX$C_UNBLOCK_FORK 2 /* unblock fork execution */N#define POSIX$C_DISABLE_FORK 3 /* disable fork */N#define POSIX$C_SETUP_CALLBACK 4 /* setup image callback */N#define POSIX$C_SYSTEM_CALLBACK 5 /* setup system callback */N#define POSIX$C_PROCESS_CALLBACK 6 /* setup process permanent callback */N#define POSIX$C_CANCEL_CALLBACK 7 /* cancel a callback */N#define POSIX$C_CONTINUE 8 /* continue callbacks */N#define POSIX$C_TEST_CALLS 9 /* temporary value for testing */#define POSIX$C_MAX_CNTRL 9#define POSIX$K_MAX_CNTRL 9N/*  */N/* The following definitions are for the 'when' mask. They define when */N/* callbacks are to be made. */N/* */"#define POSIX$V_CALL_BEFORE_COPY 0#define POSIX$V_CALL_IN_CHILD 1"#define POSIX$V_CALL_AFTER_CHILD 2!#define POSIX$V_CALL_ON_FAILURE 3'#define POSIX$V_CALL_BEFORE_COPY_FAIL 4$#define POSIX$V_CALL_IN_CHILD_FAIL 5'#define POSIX$V_CALL_AFTER_CHILD _FAIL 6"#define POSIX$M_CALL_BEFORE_COPY 1#define POSIX$M_CALL_IN_CHILD 2"#define POSIX$M_CALL_AFTER_CHILD 4!#define POSIX$M_CALL_ON_FAILURE 8(#define POSIX$M_CALL_BEFORE_COPY_FAIL 16%#define POSIX$M_CALL_IN_CHILD_FAIL 32(#define POSIX$M_CALL_AFTER_CHILD_FAIL 64 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard &#endif /* __POSIX_SERVICEDEF_LOADED */ wwT4/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//************************************************************************************************* *******************************//*** MODULE $POWERDEF ***/#ifndef __POWERDEF_LOADED#define __POWERDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+  */N/* */N/* Power Control Definitions */N/* */N/* **** NOTE **** */N/* */N/* New items must always be added to the END of each item list */N/* (preceeding the ENDlistname item) so that users will not have */N/* to recompile. */N/*- */#define POWER$C_HIGH_PERF 0#define POWER$C_LOW_POWER 1#define POWER$C_EFFICIENCY 2N#define POWER$C_OS_CONTROL 3 /* Only works from kernel mode */\#define POWER$M_OS_CONTROL_OFF 4 /* OR with the above. Only works from kernel mode */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __POWERDEF_LOADED */ ww4/********************************************************************************************************************************/=/*  Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */K/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]PPL$DEF.SDI;1 *//********************************************************************************************************************************//*** MODULE PPL$DEF ***/#ifndef __PPL_DEF_LOADED#define __PPL_DEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* Definitions for RTL Parallel Processing Facility - PPL */N/* */N/* Pre-defined event ids. */N/*  */N#define PPL$K_ABNORMAL_EXIT -2 /* abnormal participant termination */N#define PPL$K_NORMAL_EXIT -1 /* normal participant termination */N/* */N/* Shared memory options flags. */N/* */#define PPL$M_NOZERO 0x1#define PPL$M_NOWRT 0x2#define PPL$M_FLUSH 0x4#define PPL$M_NO UNI 0x8##define PPL$M_MOPT_SPARE 0xFFFFFFF0 #ifdef __NEW_STARLETtypedef struct _mem_options {N unsigned ppl$v_nozero : 1; /* not demand-zero */N unsigned ppl$v_nowrt : 1; /* read-only */N unsigned ppl$v_flush : 1; /* write to disk */N unsigned ppl$v_nouni : 1; /* non-unique name not requested */N unsigned ppl$v_mopt_spare : 28; /* extra bits */  } MEM_OPTIONS;#else /* __OLD_STARLET */struct mem_options {N unsigned ppl$v_nozero : 1; /* not demand-zero */N unsigned ppl$v_nowrt : 1; /* read-only */N unsigned ppl$v_flush : 1; /* write to disk */N unsigned ppl$v_nouni : 1; /* non-unique name not requested */N unsigned ppl$v_mopt_spare : 28; /* extra bits */ } ;%#endif /* #ifdef _ _NEW_STARLET */N/* */N/* Processing options flags. */N/* */#define PPL$M_INIT_SYNCH 0x1#define PPL$M_NODEBUG 0x2#define PPL$M_STOP_CHILDREN 0x4#define PPL$M_NON_BLOCKING 0x8#define PPL$M_NOTIFY_ONE 0x10#define PPL$M_SPIN_WAIT 0x20#define PPL$M_FORMONLY 0x40#define PPL$M_JOINONLY 0x80#define PPL$M_PERM 0x100#define PPL$M_SYSTEM 0x200#define PPL$M_DELETEALL 0x400#define PPL$M_TAILFIRST 0x800#define PPL$M_ATHEAD 0x1000#define PPL$M_FROMTAIL 0x2000#define PPL$M_FORCEDEL 0x4000#define PPL$M_NOCLISYM 0x8000#define PPL$M_NOLOGNAM 0x10000#define PPL$M_NOKEYPAD 0x20000#define PPL$M_NOTIFY 0x40000#define PPL$M_NOCONTROL 0x80000"#define PPL$M_CALL_UNIQUE 0x100000"#define PPL$M_PROC_UNIQUE 0x200000##define PPL$M_SPIN_COUNTED 0x400000'#define PPL$M_NOSAVE_PROC_ INFO 0x800000$#define PPL$M_IGNORE_EXITS 0x1000000##define PPL$M_POPT_SPARE 0xFE000000 #ifdef __NEW_STARLETtypedef struct _proc_options {O unsigned ppl$v_init_synch : 1; /* parent blocks until children init */N unsigned ppl$v_nodebug : 1; /* disable DEBUG */R unsigned ppl$v_stop_children : 1; /* stop children of terminating process */R unsigned ppl$v_non_blocking : 1; /* don't block if semaphore unavailable */O unsigned ppl$v_notify_one : 1; /* notify only one enabler for event */N unsigned ppl$v_spin_wait : 1; /* spin rather than $HIBER */Q unsigned ppl$v_formonly : 1; /* Only form (do not join) a new appl. */Q unsigned ppl$v_joinonly : 1; /* Only join (do not form) a new appl. */N unsigned ppl$v_perm : 1; /* Create a permanent application */N unsigned ppl$v_system : 1; /* Create a system-wide application */Q unsigned ppl$v_deleteall : 1; /* Delete all corresponding work items */N unsigned ppl$v_tailfirst : 1; /* Delete from tail of queue */N unsigned ppl$v_athead : 1; /* Insert at the head of queue */N unsigned ppl$v_fromtail : 1; /* Remove from tail of queue */N unsigned ppl$v_forcedel : 1; /* Force deletion of work queue */Q unsigned ppl$v_noclisym : 1; /* Do not inherit parent's CLI symbols */N unsigned ppl$v_nolognam : 1; /* Do not inherit parent's logicals */R unsigned ppl$v_nokeypad : 1; /* Inherit parent's keypad state & defs */R unsigned ppl$v_notify : 1; /* Broadcast message on child terminate */R unsigned ppl$v_nocontrol : 1; /* No carriage control prefix on prompt */N unsigned ppl$v_call_unique : 1; /* Request call unique name */N unsigned ppl$v_proc_unique : 1; /* Request process unique name */R unsigned ppl$v_spin_counted : 1; /* Spin for counted period before hiber */( unsigned ppl$v_nosave_proc_info : 1;$ unsigned ppl$v_ignore_exits : 1;N unsigned ppl$v_popt_spare : 7; /* extra bits */ } PROC_OPTIONS;#else /* __OLD_STARLET */struct proc_options {O unsigned ppl$v_init_synch : 1; /* parent blocks until children init */N unsigned ppl$v_nodebug : 1; /* disable DEBUG */R unsigned ppl$v_stop_children : 1; /* stop children of terminating process */R unsigned ppl$v_non_blocking : 1; /* don't block if semaphore unavailable */O unsigned ppl$v_notify_one : 1; /* notify only one enabler for event */N unsigned ppl$v_spin_wait : 1; /* spin rather than $HIBER */Q unsigned ppl$v_formonly : 1; /* Only form (do not join) a new appl. */Q unsigned ppl$v_joinonly : 1; /* Only join (do not form) a new appl. */N unsigned ppl$v_perm : 1; /* Create a permanent application */N unsigned ppl$v_system : 1; /* Create a system-wide application */Q unsigned ppl$v_deleteall : 1; /* Delete all corresponding work items */N unsigned ppl$v_tailfirst : 1; /* Delete from tail of queue */N unsigned ppl$v_athead : 1; /* Insert at the head of queue */N unsigned ppl$v_fromtail : 1; /* Remove from tail of queue */N unsigned ppl$v_forcedel : 1; /* Force deletion of work queue */Q unsigned ppl$v_noclisym : 1; /* Do not inherit parent's CLI symbols */N unsigned ppl$v_nolognam : 1; /* Do not inherit parent's logicals */R unsigned ppl$v_nokeypad : 1; /* Inherit parent's keypad state & defs */R unsigned ppl$v_notify : 1; /* Broadcast message on child terminate */R unsigned ppl$v_nocontrol : 1; /* No carriage control prefix on prompt */N unsigned ppl$v_call_unique : 1; /* Request call unique name */N unsigned ppl$v_proc_unique : 1; /* Request proce ss unique name */R unsigned ppl$v_spin_counted : 1; /* Spin for counted period before hiber */( unsigned ppl$v_nosave_proc_info : 1;$ unsigned ppl$v_ignore_exits : 1;N unsigned ppl$v_popt_spare : 7; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PPL_DEF_LOADED */ ww;4/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]PPL$ROUTINES.SDI;1 *//************************************************************* *******************************************************************//*** MODULE ppl$routines ***/#ifndef __PPL_ROUTINES_LOADED#define __PPL_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 P/**************************************************************************** *//* * */4/* COPYRIGHT (c) 1988 BY * */D/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */&/* ALL RIGHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */P/* INCLUSION OF THE ABOVE COPYRIGHT N OTICE. THIS SOFTWARE OR ANY OTHER * */P/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */&/* TRANSFERRED. * *//* * */P/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. * *//* * */P/* DIGITAL AS SUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * *//* * */P/**************************************************************************** */N/* PPL$ADJUST_SEMAPHORE_MAXIMUM */N/* */N/* Adjust a Semaphore Maximum */N /* */T/* The Adjust a Semaphore Maximum routine increments or decrements the maximum */N/* associated with a semaphore. */N/* */C#define ppl$adjust_semaphore_maximum PPL$ADJUST_SEMAPHORE_MAXIMUM #ifdef __NEW_STARLET*unsigned int ppl$adjust_semaphore_maximum( unsigned int *semaphore_id, short int  *amount);#else /* __OLD_STARLET */<unsigned int ppl$adjust_semaphore_maximum(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$ADJUST_QUORUM */N/* */N/* Adjust Barrier Quorum */N/* */N/* The Adjust Barrier Quorum routine incremen ts or decrements the quorum */N/* associated with a barrier. */N/* */-#define ppl$adjust_quorum PPL$ADJUST_QUORUM #ifdef __NEW_STARLETunsigned int ppl$adjust_quorum( unsigned int *barrier_id, short int *amount);#else /* __OLD_STARLET */1unsigned int ppl$adjust_quorum(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$AWAIT_EVENT  */N/* */N/* Await Event Occurrence */N/* */N/* The Await Event Occurrence routine blocks the caller until an event */N/* occurs. */N/*  */)#define ppl$await_event PPL$AWAIT_EVENT #ifdef __NEW_STARLETunsigned int ppl$await_event( unsigned int *event_id, __optional_params);#else /* __OLD_STARLET *//unsigned int ppl$await_event(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$CREATE_APPLICATION */N/* */N/* Form or Join a PPL$ Application  */N/* */O/* The Form or Join a PPL$ Application routine informs the PPL$ facility */O/* that the calling process is forming or joining a parallel application. */N/* */7#define ppl$create_application PPL$CREATE_APPLICATION #ifdef __NEW_STARLET$unsigned int ppl$create_application( __optional_params );#else /* __OLD_STARLET  */6unsigned int ppl$create_application(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$CREATE_BARRIER */N/* */N/* Create a Barrier */N/* */N/* The Create a Barrier routine creates and initializes a */N/* ba rrier, and returns the barrier identifier. */N/* You use the barrier identifier to perform all operations on that */N/* barrier. */N/* *//#define ppl$create_barrier PPL$CREATE_BARRIER #ifdef __NEW_STARLET unsigned int ppl$create_barrier( unsigned int *barrier_id, __optional_params );#else /* __OLD_STARLET */2unsigned int ppl$create_barrier(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$CREATE_EVENT */N/* */N/* Create an Event */N/* */N/* The Create an Event routine creates an arbitrary user-defined event */N/* and returns th e event identifier. You use the event identifier to */N/* perform all operations on that event. */N/* */+#define ppl$create_event PPL$CREATE_EVENT #ifdef __NEW_STARLETunsigned int ppl$create_event( unsigned int *event_id, __optional_params);#else /* __OLD_STARLET */0unsigned int ppl$create_event(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$CREATE_SPIN_LOCK */N/* */N/* Create Spin Lock */N/* */N/* The Create Spin Lock routine creates and initializes a simple (spin) */P/* lock, and returns the lock identifier. You use that lock identifier to */N/* get and free the lock.  */N/* */3#define ppl$create_spin_lock PPL$CREATE_SPIN_LOCK #ifdef __NEW_STARLET"unsigned int ppl$create_spin_lock( unsigned int *lock_id, __optional_params);#else /* __OLD_STARLET */4unsigned int ppl$create_spin_lock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$CREATE_SHARED_MEMORY */N/*  */N/* Create Shared Memory */N/* */N/* The Create Shared Memory routine creates (if necessary) and maps a */N/* section of memory that can be shared by multiple processes. */N/* */;#define ppl$create_shared_memory PPL$CREATE_SHARED_MEMORY #ifdef __NEW_STARLET&unsigned int ppl$create_shared_memory( void *section_name, unsigned int memory_area [], __optional_params );#else /* __OLD_STARLET */8unsigned int ppl$create_shared_memory(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$CREATE_WORK_QUEUE */N/* */N/* Create a Work Queue  */N/* */R/* The Create a Work Queue routine creates and initializes a work queue, and */N/* returns the work queue identifier. */N/* */5#define ppl$create_work_queue PPL$CREATE_WORK_QUEUE #ifdef __NEW_STARLET#unsigned int ppl$create_work_queue( unsigned int *queue_id, __optional_params);#else /* __OLD_STARLET */5unsigned int ppl$create_work_queue(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$CREATE_SEMAPHORE */N/* */N/* Create a Semaphore */N/* */N/* The Create a Semaphore routine creates and initializes a  */N/* semaphore with a waiting queue, and returns the semaphore identifier. */N/* You use the semaphore identifier to perform all operations on that */N/* semaphore. */N/* */3#define ppl$create_semaphore PPL$CREATE_SEMAPHORE #ifdef __NEW_STARLET"unsigned int ppl$create_semaphore( unsigned int *semaphore_id, __optional_params );#else /* __OLD_STARLET */4unsigned int ppl$create_semaphore(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$CREATE_VM_ZONE */N/* */N/* Create a New Virtual Memory Zone */N/* */N/* The Create a New Virtual Memory Zone routine creates a new storage */N/* zone, according to specified arguments, which is available to all */N/* participants in the application. */N/* *//#define ppl$create_vm_zone PPL$CREATE_VM_ZONE #ifdef __NEW_STARLET unsigned int ppl$create_vm_zone( unsigned int *zone_id, __optional_params );#else /* __OLD_STARLET */2unsigned int ppl$create_vm_zone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$DELETE_APPLICATION */N/* */N/* Delete a PPL$ Application */N/* */N/* The Delete a PPL$ Application routine marks all shared memory for */Q/* deletion and prevents additional processes from joining the application. */N/*  */7#define ppl$delete_application PPL$DELETE_APPLICATION#ifdef __NEW_STARLET*unsigned int ppl$delete_application(void);#else /* __OLD_STARLET */*unsigned int ppl$delete_application(void);!#endif /* #ifdef __NEW_STARLET */N/* PPL$DECREMENT_SEMAPHORE */N/* */N/* Decrement a Semaphore  */N/* */N/* The Decrement a Semaphore routine waits for a semaphore to have a */N/* value greater than 0, then decrements the value */N/* by 1 to indicate the allocation of a resource. */N/* */9#define ppl$decrement_semaphore PPL$DECREMENT_SEMAPHORE #ifdef __NEW_STARLET%unsigned int ppl$decrement_semaphore( unsigned int *semaphore_id, __optional_params);#else /* __OLD_STARLET */7unsigned int ppl$decrement_semaphore(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$DISABLE_EVENT */N/* */N/* Disable Asynchronous Notification of an Event */N/*  */Y/* The Disable Asynchronous Notification of an Event routine disables delivery to a */N/* process of notification of an event by either AST or signal. */N/* */-#define ppl$disable_event PPL$DISABLE_EVENT #ifdef __NEW_STARLETunsigned int ppl$disable_event( unsigned int *event_id);#else /* __OLD_STARLET */1unsigned int ppl$disable_event(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$DELETE_WORK_ITEM */N/* */N/* Delete a Work Queue Item */N/* */N/* The Delete a Work Queue Item routine deletes a work item from a work */N/* queue.  */N/* */3#define ppl$delete_work_item PPL$DELETE_WORK_ITEM #ifdef __NEW_STARLET"unsigned int ppl$delete_work_item( unsigned int *queue_id, unsigned int work_item, __optional_params);#else /* __OLD_STARLET */4unsigned int ppl$delete_work_item(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$DELETE_SHARED_MEMORY */N/*  */N/* Delete Shared Memory */N/* */N/* The Delete Shared Memory routine deletes or unmaps from a global */N/* section that you created using the PPL$CREATE_SHARED_MEMORY routine. */N/* Optionally, this routine writes the contents of the global section to */N/* disk before deleting the section.  */N/* */;#define ppl$delete_shared_memory PPL$DELETE_SHARED_MEMORY #ifdef __NEW_STARLET&unsigned int ppl$delete_shared_memory( void *section_name, __optional_params );#else /* __OLD_STARLET */8unsigned int ppl$delete_shared_memory(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$DELETE_WORK_QUEUE */N/*  */N/* Delete a Work Queue */N/* */W/* The Delete a Work Queue routine deletes the specified work queue, and releases */N/* any storage associated with it. */N/* */5#define ppl$delete_work _queue PPL$DELETE_WORK_QUEUE #ifdef __NEW_STARLET#unsigned int ppl$delete_work_queue( __optional_params );#else /* __OLD_STARLET */5unsigned int ppl$delete_work_queue(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$ENABLE_EVENT_AST */N/* */N/* Enable AST Notification of an Event */N/*  */Q/* The Enable AST Notification of an Event routine specifies the address of */T/* an AST routine (and optionally an argument to that routine) to be delivered */N/* when an event occurs. */N/* */3#define ppl$enable_event_ast PPL$ENABLE_EVENT_AST #ifdef __NEW_STARLET"unsigned int ppl$enable_event_ast( uns igned int *event_id, int (*astadr)(void), __optional_params);#else /* __OLD_STARLET */4unsigned int ppl$enable_event_ast(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$ENABLE_EVENT_SIGNAL */N/* */N/* Enable Signal Notification of an Event */N/* */N /* The Enable Signal Notification of an Event routine specifies a */N/* condition value to be signaled when the event occurs. */N/* */9#define ppl$enable_event_signal PPL$ENABLE_EVENT_SIGNAL #ifdef __NEW_STARLET%unsigned int ppl$enable_event_signal( unsigned int *event_id, __optional_params);#else /* __OLD_STARLET */7unsigned int ppl$enable_event_signal(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$FLUSH_SHARED_MEMORY */N/* */N/* Flush Shared Memory */N/* */N/* The Flush Shared Memory routine writes (flushes) to disk the contents */P/* of a global section that you created using the PPL$CREATE_SHARED_MEMORY */N/* routine. Only pages that have been modified are flushed to disk. */N/* */9#define ppl$flush_shared_memory PPL$FLUSH_SHARED_MEMORY #ifdef __NEW_STARLET%unsigned int ppl$flush_shared_memory( void *section_name, __optional_params );#else /* __OLD_STARLET */7unsigned int ppl$flush_shared_memory(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$FIND_OBJECT_ID  */N/* */N/* Find Object Identification */N/* */N/* Given the name of a spin lock, semaphore, barrier, event, work queue, */N/* or shared memory zone, the Find Object Identification routine returns */N/* the identifier of the object associated with the name you specif y. */N/* *//#define ppl$find_object_id PPL$FIND_OBJECT_ID #ifdef __NEW_STARLET unsigned int ppl$find_object_id( unsigned int *object_id, void *object_name);#else /* __OLD_STARLET */2unsigned int ppl$find_object_id(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$FIND_SYNCH_ELEMENT_ID */N/*  */N/* Find */N/* */N/* Given the name of a spin lock, semaphore, barrier, or event, the */N/* Find Synchronization Element Identification routine returns the */N/* identifier of the associated synchronization element. */N/* */=#defin e ppl$find_synch_element_id PPL$FIND_SYNCH_ELEMENT_ID #ifdef __NEW_STARLET'unsigned int ppl$find_synch_element_id( unsigned int *element_id, void *element_name);#else /* __OLD_STARLET */9unsigned int ppl$find_synch_element_id(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$GET_INDEX */N/* */N/* Get Index of a Participant  */N/* */O/* The Get Index of a Participant routine returns an index that is unique */O/* within the application. A value of zero signifies the participant that */N/* formed the application. The other participants in the application */N/* always return an index greater than zero. */N/*  */%#define ppl$get_index PPL$GET_INDEX #ifdef __NEW_STARLETunsigned int ppl$get_index(" unsigned int *participant_index);#else /* __OLD_STARLET */-unsigned int ppl$get_index(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$INSERT_WORK_ITEM */N/* */N/* Insert a Work Queue Item */N/*  */Y/* The Insert a Work Queue Item routine inserts a work item into the specified work */N/* queue. */N/* */3#define ppl$insert_work_item PPL$INSERT_WORK_ITEM #ifdef __NEW_STARLET"unsigned int ppl$insert_work_item( unsigned int *queue_id, unsigned int work_item, __optional_pa rams );#else /* __OLD_STARLET */4unsigned int ppl$insert_work_item(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$INCREMENT_SEMAPHORE */N/* */N/* Increment a Semaphore */N/* */P/* The Increment a Semaphore routine increments the v alue of the semaphore */N/* by 1, analogous to the signal protocol. If any other participants */N/* are blocked on a call to PPL$DECREMENT_SEMAPHORE for this semaphore, */N/* one is removed from the queue and awakened. */N/* The semaphore must have been created by PPL$CREATE_SEMAPHORE. */N/* */9#define ppl$increment_semaphore PPL$INCREMENT_SEMAPHORE #ifdef __NEW_STA RLET%unsigned int ppl$increment_semaphore( unsigned int *semaphore_id);#else /* __OLD_STARLET */7unsigned int ppl$increment_semaphore(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$INDEX_TO_PID */N/* */N/* Convert Participant Index to VMS PID */N/*  */N/* The Convert Participant Index to VMS PID routine returns the VMS PID */N/* of the process associated with the specified index. */N/* */+#define ppl$index_to_pid PPL$INDEX_TO_PID #ifdef __NEW_STARLETunsigned int ppl$index_to_pid(! unsigned int *participant_index, unsigned int *pid);#else /* __OLD_STARLET */0unsigned int ppl$index_to_pid(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$INITIALIZE */N/* */N/* Initialize the PPL$ Facility */N/* */T/* The Initialize the PPL$ Facility routine informs the PPL$ facility that the */N/* caller is forming or joining the parallel application. Calling this */N/* routine is optional, because PPL$ initializes itself at the */N/* first call to a PPL$ routine. */N/* */'#define ppl$initialize PPL$INITIALIZE #ifdef __NEW_STARLETunsigned int ppl$initialize( __optional_params);#else /* __OLD_STARLET */.unsigned int ppl$initialize(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$PID_TO_INDEX  */N/* */N/* Convert VMS PID to Participant Index */N/* */R/* The Convert VMS PID to Participant Index routine returns the PPL$-defined */N/* participant index of the process associated with the */N/* specified VMS PID.  */N/* */+#define ppl$pid_to_index PPL$PID_TO_INDEX #ifdef __NEW_STARLETunsigned int ppl$pid_to_index( unsigned int *pid," unsigned int *participant_index);#else /* __OLD_STARLET */0unsigned int ppl$pid_to_index(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$READ_BARRIER */N/*  */N/* Read a Barrier */N/* */V/* The Read a Barrier routine returns the specified barrier's current quorum and */T/* the number of participants currently waiting (blocked) at the barrier. The */N/* barrier must have been created by PPL$CREATE_BARRIER. */N/*  */+#define ppl$read_barrier PPL$READ_BARRIER #ifdef __NEW_STARLETunsigned int ppl$read_barrier( unsigned int *barrier_id, short int *quorum, short int *waiters);#else /* __OLD_STARLET */0unsigned int ppl$read_barrier(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$READ_EVENT */N/* */N/* Read an Event State  */N/* */T/* The Read an Event State routine returns the current state of the specified */N/* event. */N/* The state can be not_occurred or not_occurred. */N/* */'#define ppl$read_event PPL$READ_EVENT #i fdef __NEW_STARLETunsigned int ppl$read_event( unsigned int *event_id, unsigned int *occurred);#else /* __OLD_STARLET */.unsigned int ppl$read_event(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$READ_SEMAPHORE */N/* */N/* Read Semaphore Values */N/*  */N/* The Read Semaphore Values routine returns the current or */N/* maximum values, or both, of the specified counting semaphore. */N/* The semaphore must have been created by */N/* PPL$CREATE_SEMAPHORE. */N/* *//#define ppl$read_semaphore PPL$READ_SEMAPHORE #ifdef __NEW_STARLET unsigned int ppl$read_semaphore( unsigned int *semaphore_id, __optional_params );#else /* __OLD_STARLET */2unsigned int ppl$read_semaphore(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$RELEASE_SPIN_LOCK */N/* */N/* Release Spin Lock */N/*  */Q/* The Release Spin Lock routine relinquishes the spin lock by clearing the */N/* bit representing the lock. The lock must have been created by */N/* PPL$CREATE_SPIN_LOCK. */N/* */5#define ppl$release_spin_lock PPL$RELEASE_SPIN_LOCK #ifdef __NEW_STARLET#unsigned int ppl$release_spin_lock( unsigned int *lock_id);#else /* __OLD_S TARLET */5unsigned int ppl$release_spin_lock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$RESET_EVENT */N/* */N/* Reset an Event */N/* */N/* The Reset an Event routine resets an event's state to */N/*  not_occurred. */N/* */)#define ppl$reset_event PPL$RESET_EVENT #ifdef __NEW_STARLETunsigned int ppl$reset_event( unsigned int *event_id);#else /* __OLD_STARLET *//unsigned int ppl$reset_event(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$REMOVE_WORK_ITEM */N/*  */N/* Remove a Work Queue Item */N/* */X/* The Remove a Work Queue Item routine removes the next item in order from a work */N/* queue. */N/* */3#define ppl$remove_work_item PPL$REMOV E_WORK_ITEM #ifdef __NEW_STARLET"unsigned int ppl$remove_work_item( unsigned int *queue_id, unsigned int *work_item, __optional_params);#else /* __OLD_STARLET */4unsigned int ppl$remove_work_item(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$READ_SPIN_LOCK */N/* */N/* Read a Spin Lock State */N/* */O/* The Read a Spin Lock State routine returns the current state of a spin */N/* lock. The state can be not_seized or not_seized. */N/* *//#define ppl$read_spin_lock PPL$READ_SPIN_LOCK #ifdef __NEW_STARLET unsigned int ppl$read_spin_lock( unsigned int *lock_id, unsigned int *seized);#else /* __OLD_STA RLET */2unsigned int ppl$read_spin_lock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$READ_WORK_QUEUE */N/* */N/* Read a Work Queue */N/* */N/* The Read a Work Queue routine returns information about a work queue. */N/*  */1#define ppl$read_work_queue PPL$READ_WORK_QUEUE #ifdef __NEW_STARLET!unsigned int ppl$read_work_queue( unsigned int *queue_id, __optional_params);#else /* __OLD_STARLET */3unsigned int ppl$read_work_queue(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$SET_SEMAPHORE_MAXIMUM */N/*  */N/* Set a Semaphore Maximum */N/* */T/* The Set a Semaphore Maximum routine dynamically sets the maximum value of a */N/* semaphore. */N/* */=#define ppl$set_semaphore_maximum PPL$SET_SEMAPHORE_MAXIMUM #ifdef __NEW_STARLET'unsi gned int ppl$set_semaphore_maximum( unsigned int *semaphore_id, short int *semaphore_maximum);#else /* __OLD_STARLET */9unsigned int ppl$set_semaphore_maximum(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$SPAWN */N/* */N/* Initiate Parallel Execution */N/*  */N/* The Initiate Parallel Execution routine executes code in parallel */Q/* with the caller by creating one or more subordinate threads of execution */N/* (VMS subprocesses). */N/* */#define ppl$spawn PPL$SPAWN #ifdef __NEW_STARLETunsigned int ppl$spawn( unsigned int *copies, __optional_params );#else /*  __OLD_STARLET */)unsigned int ppl$spawn(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$SET_QUORUM */N/* */N/* Set Barrier Quorum */N/* */N/* The Set Barrier Quorum routine dynamically sets a value for the */N/* specified barrier's quorum. */N/* */'#define ppl$set_quorum PPL$SET_QUORUM #ifdef __NEW_STARLETunsigned int ppl$set_quorum( unsigned int *barrier_id, short int *quorum);#else /* __OLD_STARLET */.unsigned int ppl$set_quorum(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$STOP */N/*  */N/* Stop a Participant */N/* */Q/* The Stop a Participant routine terminates the execution of the specified */N/* participant in this application. */N/* */#define ppl$stop PPL$STOP  #ifdef __NEW_STARLETunsigned int ppl$stop(" unsigned int *participant_index);#else /* __OLD_STARLET */(unsigned int ppl$stop(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$SEIZE_SPIN_LOCK */N/* */N/* Seize Spin Lock */N/* */ S/* The Seize Spin Lock routine retrieves a simple (spin) lock by waiting in a */N/* spin loop until the lock is free. The lock must have been created by */N/* PPL$CREATE_SPIN_LOCK./* */N/* */1#define ppl$seize_spin_lock PPL$SEIZE_SPIN_LOCK #ifdef __NEW_STARLET!unsigned int ppl$seize_spin_lock( unsigned int *lock_id, __optional_params);#else /* __OLD_S TARLET */3unsigned int ppl$seize_spin_lock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$TERMINATE */N/* */N/* Abort PPL$ Participation */N/* */N/* The Abort PPL$ Participation routine ends the caller's */N/*  participation in the application prematurely---that is, at some time */N/* before the caller actually completes its execution. */N/* */%#define ppl$terminate PPL$TERMINATE #ifdef __NEW_STARLETunsigned int ppl$terminate( __optional_params);#else /* __OLD_STARLET */-unsigned int ppl$terminate(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$TRIGGER_EVENT  */N/* */N/* Trigger an Event */N/* */N/* The Trigger an Event routine causes the event's state to become */N/* occurred. You control whether all pending actions for */N/* the event are processed (made to occur), or just one is proc essed. */N/* A pending action can be an AST, a signal (condition), or a wakeup. */N/* */-#define ppl$trigger_event PPL$TRIGGER_EVENT #ifdef __NEW_STARLETunsigned int ppl$trigger_event( unsigned int *event_id, __optional_params );#else /* __OLD_STARLET */1unsigned int ppl$trigger_event(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$UNIQUE_NAME ! */N/* */N/* Produce a Unique Name */N/* */N/* The Produce a Unique Name routine returns an application-unique name. */O/* A system-unique string specific to the calling application is appended */N/* to the string specified by the user. */N "/* The resulting name is identical for all participants in */U/* the application, but different from those for all other applications on that */N/* system. */N/* */)#define ppl$unique_name PPL$UNIQUE_NAME #ifdef __NEW_STARLETunsigned int ppl$unique_name( void *name_string, void *resultant_string, __optional_params);#else #/* __OLD_STARLET *//unsigned int ppl$unique_name(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* PPL$WAIT_AT_BARRIER */N/* */N/* Synchronize at a Barrier */N/* */N/* The Synchronize at a Barrier routine causes the caller to */$N/* wait at the specified barrier. */N/* The barrier is in effect from the time the first participant calls */N/* PPL$WAIT_AT_BARRIER until each member of the */N/* quorum has issued the call. At that time, the wait concludes and */N/* all are released for further execution. */N/* */1#define ppl$wait_at_bar%rier PPL$WAIT_AT_BARRIER #ifdef __NEW_STARLET!unsigned int ppl$wait_at_barrier( unsigned int *barrier_id);#else /* __OLD_STARLET */3unsigned int ppl$wait_at_barrier(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif &#pragma __standard "#endif /* __PPL_ROUTINES_LOADED */ ww5/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]PPLMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE '$PPLDEF ***/#ifndef __PPLDEF_LOADED#define __PPLDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __c(plusplus 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 N/* */Q/* Thi)s SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:40.08 */N/* */N/* FILE: PPLMSG.MSG EDIT: CMF1004 */N/* */Q/***************************************************************************** *//** * */(/** COPYRIGHT (C) 1987 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYN*ARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HERE +BY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/*******,********************************************************************** */N/* */N/*++ */N/* */K/* FACILITY: VAX PPL */N/* */N/* ABSTRACT: - */N/* */I/* THIS FILE CONTAINS THE DEFINITION FOR THE PPL FACILITY SPECIFIC */I/* ERROR MESSAGES. THE FACILITY CODE FOR PPL IS 481. */N/* */N/* ENVIRONMENT: VAX/VMS USER MODE */N/* . */N/* AUTHOR: P. GILBERT, CREATION DATE: 30-SEP-1986 */N/* */N/* MODIFIED BY: */N/* */B/* E01-001 ORIGINAL */N/* */8/* E01-002 TO ADD THE F /ACILITY CODE. CMF 23-JAN-1987 */N/* */</* E01-003 TO CORRECT THE IDENT TO MATCH CMF 26-JAN-1987 */;/* THE CMS GENERATION NUMBER. */N/* */</* E01-004 REVAMP THE FILE TO CONFORM TO CMF 28-JAN-1987 */;/* RTL STANDARDS. ( PATTERNED AFTER */;/* LIBMSG.MSG ) */N/*0 */>/* E01-005 TO CHANGE THE MODULE NAME FROM CMF 16-FEB-1987 */;/* PPL$MSG TO PPL$MSGDEF TO BE */;/* CONSISTENT WITH THE OTHER RTLS */N/* */@/* E01-006 TO ADD PPL$_ATTUSETWO TO INDICATE CMF 16-FEB-1987 */;/* THAT AN ATTEMPT HAS BEEN MADE TO */;/* USE TWO BARRIERS THUS RESUL1TING IN */;/* DEAD LOCK. */N/* */>/* E01-007 ADD MSGS FOR BARRIERS AND EVENTS, DLR 24-JUL-87 */;/* PLUS OTHER MISC UPDATES. */;/* REMOVE OLD DEAD ONES BY ! *** NOTATION. */N/* */B/* E01-008 CONFORM TO DOCUMENTATION STANDARDS. DLR 19-AUG-1987 */2N/* */8/* V051-001 ADDED PPL$_NO_NEXT_PROC WWS 09-SEP-1988 */N/* */?/* V53-001 CORRECTED EVENT SIGNAL MESSAGES WWS 20-MAR-1989 */N/* */8/* V53-002 ADDED THE V5.3 MESSAGES WWS 27-MAR-1989 */N/* */@/*3 V57-001 ADD A SPACE TO NOONE_ENABLED TEXT PJC 22-JAN-1993 */I/* */A/* V57-002 CHANGE REFERENCE TO PPL$INITIALIZE PJC 30-AUG-1993 */N/*-- */N/*+ */N/* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */N/* 4 */I/* PPL$_ABCMNOXYZ */N/* */N/* IN ADDITION, THE IBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */N/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE */N/* ERROR MESSAGE, NOT COUNTING ARTICLES AND PREPSITIONS. */N/* */P/* THE N5AMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD APPEAR */N/* IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION. */N/* */N/* */N/* */N/* MACRO-32PROGRAMMING: */N/* 6 */N/* THE MACROS CALL: */N/* */I/* $PPLDEF */N/* */N/* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */N/* THE RUN-TIME LIBRARY DECLARES THESE SYMBOLS AS EXTERNAL; 7 */N/* THE MACROS ARE PROVIDED ONLY FOR THE COVENIENCE OF THE USER. */N/*- */N/*+ */N/* SPECIAL NOTE: */N/* */N/* THE MESSAGES HERE SHOULD BE RESOLVED FROM STARLET.OLB. INORDER */N/* FOR T8HIS TO HAPPEN, SEVERAL VMS BUILD FILES NEED TO BE EDITED. */N/* THIS WILL BE DONE FOR SYS 11. NOTE THAT SEVERAL OF OUT BUILD */N/* PROCEDURES MAY NEED TO BE EDITED. PPLRTLBLD.COM TO COPY */N/* AND DELETE APPROPRIATE FILE IN APPROPRIATE PLACES. */N/* */N/* ALSO, THE FILE PPLDEF WILL NEED TO BE CHANGED TO BE NAME PPLMSGDEF */N/* TO FOLLOW THE STANDARDS OF THE 9OTHER ROUTINES. */N/* */N/* PPLRTLLNK.OPT MAY NEED TO BE EDITED TO GET RID OF UNIVERSAL SYMBOLD */N/* SO THAT THERE WON'T BE EXTRA BAGAGE IN THE SHAREABLE IMAGE. */N/* */N/*- */;/* ; SET LH TO 481 (DECIMAL). */ :#define PPL$_FACILITY 481#define PPL$_NORMAL 31555585N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: ALL IS WELL. */N/* USER ACTION: ENJOY YOUR SUCCESS. ALL THINGS MUST PASS. */N/*-- */#define PPL$_CREATED 31555601N/*++ ; */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: ITEM WAS CREATED, AN ALTERNATE SUCCESS STATUS */B/* INDICATING THE ITEM WAS NOT JUST SUCCESSFULLY FOUND. */N/* USER ACTION: CONTINUE NORMALLY. */N/*-- */##define PPL$_NOONE_ENABLED 31555609N/*++ < */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: EVENT TRIGGER IS SUCCESSFULLY QUEUED, AND NO ONE IS */B/* PRESENTLY ENABLED TO RECEIVE IT. THE FIRST CALLER TO */B/* ENABLE IT WILL RECEIVE IT. */N/* USER ACTION: CONTINUE NORMALLY. */N/*-- = */##define PPL$_NOT_AVAILABLE 31555617N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: ALTERNATE SUCCESS STATUS RETURNED WHEN USER REQUESTS */B/* IMMEDIATE NON-BLOCKING ACCESS TO A RESOURCE WHICH */B/* WAS NOT AVAILABLE. */N/* USER ACTION: CONTINUE NORMALLY. >*/N/*-- */"#define PPL$_CREATED_SOME 31555625N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: SOME OF THE REQUESTED ITEMS WERE CREATED, BUT NOT ALL. */N/* USER ACTION: IF PROCESSING CAN CONTINUE WITH FEWER ITEMS THAN THOSE */B/* REQUESTED, THEN CONTINUE NORMALLY. */?N/*-- */"#define PPL$_NO_NEXT_PROC 31555633N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* */N/* EXPLANATION: THIS CODE IS FOR INTERNAL USE ONLY AND IS RETURNED */B/* FROM THE ROUTINE, PPL$$TELL, WHEN IT IS INVOKED WITH */B@/* THE TELL_K_NEXT_PROCESS FLAG AND THERE IS ONLY ONE */B/* PROCESS CURRENTLY IN THE APPLICATION. */B/* */N/* USER ACTION: NONE: THIS CODE IS FOR INTERNAL USE ONLY. */N/*-- */#define PPL$_DELETED 31555641N/*++ */L/* FACILITY: PPL, RUN-TIME LAIBRARY */N/* */G/* EXPLANATION: THE USER REQUESTED THAT THE OBJECT BE DELETED */B/* REGARDLESS OF ITS STATE. THE DELETION WAS SUCCESSFULLY */B/* PERFORMED. */N/* */N/* USER ACTION CONTINUE NORMALLY */N/*-- B */>/* ; NOTE: ERROR CODES MUST NOT OVERLAP SUCCESS CODES!!! */;/* ; SET SUB-SYSTEM SPECIFIC BIT FOR NOW. */;/* ; SET LH TO 481 (DECIMAL) */N/**** EXCQUESIZ */N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXCPLANATION: TOO MANY CALLERS REQUIRED QUEUING. */N/* USER ACTION: RECODE TO REDUCE NUMBER OF CALLERS ACCESSING RESOURCE. */N/*-- */#define PPL$_INCOMPEXI 31556100N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: ALL PPL OBJECTS MUST HAVE UNIQUE NAMES. */DN/* USER ACTION: RECODE THE CALL TO SPECIFY A DIFFERENT NAME. */N/*-- */#define PPL$_INSVIRMEM 31556108N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: CALLER DOES NOT HAVE SUFFICIENT AVAILABLE SPACE TO */B/* COMPLETE REQUEST. */N/*E USER ACTION: IF YOU USE EXTENSIVE PPL SERVICES, TRY SPECIFYING A */B/* LARGER VALUE TO PPL$INITIALIZE. OTHERWISE, CHECK */B/* YOUR SYSTEM QUOTAS TO SEE IF AN INCREASE IS NEEDED. */N/*-- */#define PPL$_INVDESC 31556116N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: DEFSCRIPTOR IS INVALID. */N/* USER ACTION: RECODE TO CORRECT THE DESCRIPTOR. */N/*-- */#define PPL$_INVELEID 31556124N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: SPECIFIED ELEMENT ID IS NOT A LEGITIMATE ID. */N/* USER ACTIOGN: EXAMINE PROGRAM CODE - SOME MODIFICATION OF THE */B/* ELEMENT ID HAS OCCURRED. */N/*-- */#define PPL$_INVELENAM 31556132N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: ILLEGAL CHARACTER STRING. */N/* USER ACTION: HFIX THE CHARACTER STRING. */N/*-- */#define PPL$_INVELETYP 31556140N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: USER SPECIFIED AN ELEMENT WHICH CANNOT BE OPERATED */B/* BY THE CALLED ROUTINE. */N/* USER ACTION: RECOIDE TO PASS THE PROPER ELEMENT TYPE. */N/*-- */#define PPL$_INVNUMCHI 31556148N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: USER REQUESTED CREATION OF A NUMBER < 1. */N/* USER ACTION: RECODE REQUEST TO USE THE PROPER VALUE. */N/*-- J */F/**** INVQUESIZ */N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: INVALID QUEUE SIZE. */N/* USER ACTION: SPECIFY A POSITIVE NUMBER. */N/*-- K */#define PPL$_INVSEMINI 31556156N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: A SEMAPHORE INITIAL VALUE MUST BE <= ITS MAXIMUM. */N/* USER ACTION: CHANGE THE SPECIFIED INITIAL VALUE. */N/*-- */#define PPL$_INVSEMMAX 31556164N/*++ L */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: A SEMAPHORE'S MAXIMUM VALUE MUST BE POSITIVE. */N/* USER ACTION: CHANGE THE SPECIFIED MAXIMUM VALUE. */N/*-- */#define PPL$_LOCNOTEST 31556172N/*++ */MN/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: YOU CANNOT RELEASE A LOCK YOU HAVE NOT BEEN GRANTED. */N/* USER ACTION: RECODE TO ASSURE THAT THE LOCK IS HELD BY THE */B/* CALLER ATTEMPTING TO RELEASE IT. */N/*-- */#define PPL$_NOSECEX 31556180N/*++ */N/* NFACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: SECTION SPECIFIED FOR FLUSH OR DELETE DOES NOT EXIST. */N/* USER ACTION: RECODE TO ASSURE THAT SECTION TO DELETE/FLUSH HAS BEEN */B/* CREATED. */N/*-- */D/**** NOSHRM */N/*++ O */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: NO SHARED MEMORY EXISTS. */N/* USER ACTION: DITTO. */N/*-- */#define PPL$_NOSUCHELE 31556188N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY P */N/* EXPLANATION: NO ELEMENT IS SPECIFIED BY THE INPUT ID. */N/* USER ACTION: RECODE TO ASSURE THAT THE INPUT ID IS FOR A */B/* LEGITIMATELY CREATED ELEMENT. */N/*-- */#define PPL$_NOSUCHLOC 31556196N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY Q */N/* EXPLANATION: NO LOCK ELEMENT IS SPECIFIED BY THE INPUT ID. */N/* USER ACTION: RECODE TO ASSURE THAT THE INPUT ID IS FOR A */B/* LEGITIMATELY CREATED LOCK ELEMENT. */N/*-- */#define PPL$_NOSUCHNAM 31556204N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY R */N/* EXPLANATION: INPUT NAME DOES NOT SPECIFY AN EXISTING ELEMENT. */N/* USER ACTION: RECODE TO ASSURE THAT THE NAME MATCHES A CREATED */B/* ELEMENT. */N/*-- */#define PPL$_WRONUMARG 31556212N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY S */N/* EXPLANATION: TOO MANY OR TOO FEW ARGUMENTS SPECIFIED IN THE CALL. */N/* USER ACTION: RECODE USING PROPER NUMBER OF ARGUMENTS. */N/*-- */#define PPL$_ABNTERMIN 31556220N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: ABNORMAL TERMINATION. T */N/* USER ACTION: AN APPLICATION PARTICIPANT HAS ENDED ABNORMALLY. */B/* SOME APPLICATION-SPECIFIC RECOVERY MAY BE DESIRED. */N/*-- */#define PPL$_EXHNEVCAL 31556228N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: AN APPLICATION PARTICIPANT TERMINAUTED WITHOUT */B/* EXECUTING ITS PPL EXIT HANDLER. */N/* USER ACTION: APPLICATION HAS BEEN ABNORMALLY TERMINATED. SOME */B/* APPLICATION-SPECIFIC RECOVERY MAY BE DESIRED. */N/*-- */#define PPL$_INVARG 31556236N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY V */N/* EXPLANATION: A SPECIFIED ARGUMENT IS INVALID. */N/* USER ACTION: RECODE TO PASS THE PROPER ARGUMENT. */N/*-- */#define PPL$_NOINIT 31556244N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: PPL$INITIALIZE MUST BE CALLED BEFORE THIS ROUTINE. W */N/* USER ACTION: RECODE TO ASSURE THAT CALLS ARE ISSUED IN PROPER ORDER. */B/* PPL$INITIALIZE IS PERFORMED AUTOMATICALLY FOR MOST */B/* CALLS, BUT NOT FOR THOSE WHICH REQUIRE THE PRIOR */B/* CREATION OF AN ELEMENT. */N/*-- */#define PPL$_NONPIC 31556252N/*++ */N/* FACILITY: PPXL, RUN-TIME LIBRARY */N/* EXPLANATION: PPL CANNOT MAP REQUESTED ADDRESS SPACE TO THE SAME */B/* ADDRESSES IN ALL PROCESSES. */N/* USER ACTION: IF IT IS CRITICAL TO THE APPLICATION THAT THE REQUESTED */B/* SPACE APPEAR AT THE SAME ADDRESSES IN ALL PROCESSES, */B/* THE USER MUST TAKE STEPS TO ASSURE THAT ENOUGH SPACE */B/* IS MADE AVAILABLE. THIS MAY REQUIRE INCREASING SYSTEM */B/* QUOTAS ORY RESERVING THE REQUIRED ADDRESSES THROUGH */B/* LINKTIME OPERATIONS. */N/*-- */#define PPL$_SEMININON 31556260N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: IMPROPER INITIAL VALUE SPECIFIED. */N/* USER ACTION: RECODE TO ASZSURE THAT PROPER VALUE IS PASSED. */N/*-- */#define PPL$_NOTIMP 31556268N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: A CALL HAS BEEN ISSUED TO AN UNIMPLEMENTED SERVICE. */N/* USER ACTION: RECODE TO ELIMINATE THIS CALL. */N/*-- [ */#define PPL$_ATTUSETWO 31556276N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: USER HAS ATTEMPTED TO WAIT ON 2 APPLICATION-WIDE */B/* BARRIERS AT THE SAME TIME. */N/* USER ACTION: RECODE TO ASSURE THAT DEADLOCK IS AVOIDED BY WAITING */B/* ON ONLY ONE APPLICATION-W\IDE BARRIER AT A TIME. */N/*-- */%#define PPL$_IN_BARRIER_WAIT 31556284N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: THE BARRIER WAS ALREADY IN EFFECT AT THE TIME OF */B/* THIS CALL. */N/* USER ACTION: RECODE TO ASSURE THAT ]THE BARRIER QUORUM IS ESTABLISHED */B/* BEFORE ANYONE ATTEMPTS TO WAIT ON THE BARRIER. */N/*-- */##define PPL$_NO_SUCH_PARTY 31556292N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: SPECIFIED PARTICIPANT DOES NOT EXIST IN THIS */B/* APPLICATION. ^ */N/* USER ACTION: RECODE TO ASSURE THAT PROPER PARTICIPANT IS SPECIFIED */B/* IN THE CALL TO THIS ROUTINE. */N/*-- */#define PPL$_APPALREXI 31556300N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: THIS PROCESS ATTEMPTED SPECIFICALLY TO _ FORM AN */B/* APPLICATION WITH A PARTICULAR NAME. THAT APPLICATION */B/* ALREADY EXISTS, AND SO CANNOT BE FORMED BY THIS */B/* PROCESS. */N/* USER ACTION: SINCE THE USER SPECIFICALLY REQUESTED TO FORM AN */B/* APPLICATION, THIS IS APPLICATION-DEPENDENT. */N/*-- */#define PPL$_ELEINUSE 31556308N/*++ ` */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: THIS PROCESS ATTEMPTED AN OPERATION WHICH MAY ONLY */B/* BE PERFORMED ON AN OBJECT WHICH IS NOT IN USE. */B/* THE SPECIFIED OBJECT IS CURRENTLY IN USE AND THEREFORE */B/* THE OPERATION MAY NOT BE PERFORMED. */N/* USER ACTION: RECODE TO FREE THE OBJECT BEFORE ATTEMPTING THIS */Ba/* OPERATION, OR, IF APPLICABLE, SPECIFY THE OPTION TO FORCE */B/* THIS OPERATION. */N/*-- */#define PPL$_INCOMPARG 31556316N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: THIS PROCESS SPECIFIED A SIZE, PROTECTION, OR FLAG ON A */B/* CALL TO PPLb$INITIALIZE WHICH IS INCOMPATIBLE WITH THE */B/* EXISTING APPLICATION WHICH THIS PROCESS IS ATTEMPTING */B/* TO JOIN. */N/* USER ACTION: RECODE THE CALL TO OMIT THE ARGUMENTS, OR SPECIFY */B/* ARGUMENTS WHICH ARE COMPATIBLE WITH THE EXISTING */B/* APPLICATION. */N/*-- */#define PPL$_INVAPPNAMc 31556324N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: ILLEGAL CHARACTER STRING. */N/* USER ACTION: FIX THE CHARACTER STRING. */N/*-- */#define PPL$_NOSUCHAPP 31556332N/*++ d */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: THIS PROCESS ATTEMPTED SPECIFICALLY TO JOIN AN EXISTING */B/* APPLICATION WITH A PARTICULAR NAME. THAT APPLICATION */B/* DOES NOT EXIST, AND SO CANNOT BE JOINED BY THIS */B/* PROCESS. */N/* USER ACTION: SINCE THE USER SPECIFICALLY REQUESTED TO JOIN AN */B/* APPLICATION, THIS IS APPLICATION-DEPEeNDENT. */N/*-- */#define PPL$_BUFOVFL 31559680N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: BUFFER COULD NOT CONTAIN THE COMPLETE OUTPUT STRING. */N/* USER ACTION: RECODE TO PASS A LARGER BUFFER. */N/*-- f */#define PPL$_ALTSIZE 31559688N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: PPL$INITIALIZE HAS ALREADY BEEN CALLED. */N/* USER ACTION: RECODE TO ASSURE THAT CALLS ARE ISSUED IN PROPER ORDER. */B/* PPL$INITIALIZE IS PERFORMED AUTOMATICALLY FOR MOST */B/* CALLS. ALTERING THE INTERNAL STRUCTURE SIZE MUST g BE */B/* DONE BEFORE ANY OTHER CALL TO PPL. */N/*-- */#define PPL$_ELEALREXI 31571971N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: AN ELEMENT BY THIS NAME ALREADY EXISTS, AND ITS */B/* ID HAS BEEN RETURNED. */N/*h USER ACTION: CONTINUE NORMALLY IF THE NAME IS EXPECTED TO EXIST. */N/*-- */#define PPL$_SEMALRMAX 31571979N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: SEMAPHORE CANNOT BE INCREMENTED FURTHER. */N/* USER ACTION: RECODE TO ASSURE THAT ONLY THE PROPER MAXIMUM NUMBER i */B/* OF PPL$INCREMENT_SEMAPHORE REQUESTS ARE ISSUED. */N/*-- */#define PPL$_INTDELPRC 31571987N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: AN APPLICATION CALL TO PPL$STOP FORCED THE TEMINATION */B/* OF THIS PARTICIPANT. */N/* USER AjCTION: SINCE THE APPLICATION ITSELF TERMINATED THIS PARTY, */B/* ANY ACTIONS ARE APPLICATION-DEPENDENT. */N/*-- */#define PPL$_INTTERMIN 31571995N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: AN APPLICATION CALL TO PPL$TERMINATE FORCED THE */B/* TEMINATIOkN OF THIS PARTICIPANT. */N/* USER ACTION: SINCE THE APPLICATION ITSELF TERMINATED THIS PARTY, */B/* ANY ACTIONS ARE APPLICATION-DEPENDENT. */N/*-- */ #define PPL$_EXITSTATUS 31572003N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: AN APPLICATIlON PARTICIPANT EXITED WITH THIS STATUS. */N/* USER ACTION: DETERMINE THE CAUSE OF THE TERMINATION BY EXAMINING */B/* THE STATUS CODE. */N/*-- */$#define PPL$_EVENT_OCCURRED 31572011N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: THIS CODE INmDICATES THE OCCURRENCE OF AN EVENT FOR */B/* WHICH NOTIFICATION HAS BEEN REQUESTED BY THE USER. */N/* USER ACTION: SINCE THE APPLICATION REQUESTED THIS NOTIFICATION, */B/* RESPONSE IS APPLICATION-DEPENDENT. */N/*-- */!#define PPL$_NORMAL_EXIT 31572019N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY n */N/* EXPLANATION: THIS CODE INDICATES THE OCCURRENCE OF THE NORMAL */B/* PARTICIPANT TERMINATION EVENT. */N/* USER ACTION: SINCE THE APPLICATION REQUESTED THIS NOTIFICATION, */B/* RESPONSE IS APPLICATION-DEPENDENT. */N/*-- */##define PPL$_ABNORMAL_EXIT 31572027N/*++ o */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: THIS CODE INDICATES THE OCCURRENCE OF THE ABNORMAL */B/* PARTICIPANT TERMINATION EVENT. */N/* USER ACTION: SINCE THE APPLICATION REQUESTED THIS NOTIFICATION, */B/* RESPONSE IS APPLICATION-DEPENDENT. */N/*-- */#define PPL$_FORMEDAPP 315p72035N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: THIS PROCESS FORMED A NEW APPLICATION. */N/* USER ACTION: CONTINUE NORMALLY IF THIS WAS AN EXPECTED RESULT. */N/*-- */#define PPL$_JOINEDAPP 31572043N/*++ q */N/* FACILITY: PPL, RUN-TIME LIBRARY */N/* EXPLANATION: THIS PROCESS JOINED AN EXISTING APPLICATION. */N/* USER ACTION: CONTINUE NORMALLY IF THIS WAS AN EXPECTED RESULT. */N/*-- */#define PPL$_NOMATCH 31572051N/*++ */N/* FACILITY: PPL, RUN-TIME LIBRARY r */N/* EXPLANATION: NO MATCH FOR THE SPECIFIED ELEMENT WAS FOUND. */N/* USER ACTION: CONTINUE NORMALLY IF THIS WAS AN EXPECTED RESULT. */N/*-- */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __c splusplus }#endif#pragma __standard #endif /* __PPLDEF_LOADED */ ww)6/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//************************************************************************************************************************* t*******//*** MODULE $PPROPDEF ***/#ifndef __PPROPDEF_LOADED#define __PPROPDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 pointersu */#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 N/*+ v */N/* */N/* Set Process Properties Data Identifier Definitions */N/* */N/* **** NOTE **** */N/* */N/* New items must always be added to the END of each item list */N/* w (preceeding the ENDlistname item) so that users will not have */N/* to relink. */N/*- */N/* Property definitions */]#define PPROP$C_PARSE_STYLE_TEMP 0 /* Change the parse style for the life of an image */`#define PPROP$C_PARSE_STYLE_PERM 1 /* Change the parse style for the life of the process x*/O#define PPROP$C_HOME_RAD 2 /* Change the home rad of the thread */b#define PPROP$C_CASE_LOOKUP_TEMP 3 /* Change the case lookup mode for the life of an image */e#define PPROP$C_CASE_LOOKUP_PERM 4 /* Change the case lookup mode for the life of the process */_#define PPROP$C_MEDDLE_ENABLE 5 /* Record the fact of alterations to process logical */N/* names or symbols */`#define PPROP$C_MEDDLE 6 y /* Process logical names or symbols have been altered */i#define PPROP$C_UNITS 7 /* Change the units for the life of the process (blocks/bytes) */[#define PPROP$C_SS_LOG_ENABLE 8 /* Enable system service logging for the process */\#define PPROP$C_SS_LOG_DISABLE 9 /* Disable system service logging for the process */Z#define PPROP$C_SS_LOG_UNLOAD 10 /* Stop system service logging & delete buffers */c#define PPROP$C_TOKEN 11 /* Change the DCL ztoken size for the life of the process */`#define PPROP$C_DEADLOCK_WAIT 12 /* Change per-process deadlock wait (in 10msec units) */e#define PPROP$C_SEARCH_SYMLINK_TEMP 13 /* Change the symlink search mode for the life of an image */h#define PPROP$C_SEARCH_SYMLINK_PERM 14 /* Change the symlink search mode for the life of the process */T#define PPROP$C_KERNEL_THREAD_LIMIT 15 /* Change per-process kernel thread limit */N/* Parse style definitions { */X#define PARSE_STYLE$C_ODS2 0 /* Values for the above properties (old name) */X#define PARSE_STYLE$C_ODS5 1 /* Values for the above properties (old name) */X#define PARSE_STYLE$C_TRADITIONAL 0 /* Values for the above properties (new name) */X#define PARSE_STYLE$C_EXTENDED 1 /* Values for the above properties (new name) */N/* case lookup definitions */N#define PPROP$K_CASE_BLIND 0 /* case blind |operation */N#define PPROP$K_CASE_SENSITIVE 1 /* case sensitive operation */N/* symlink search mode definitions */T/* NOTE: Symlink search mode encodings are coordinated across $JPIDEF, $LIBCQDEF, */N/* $LIBFILDEF, $PPROPDEF, and $NAMLDEF. */N#define PPROP$K_SEARCH_SYMLINK_NONE 1 /* use no symlinks */N#define PPROP$K_SEARCH_SYMLINK_ALL 2 /* use symlinks always } */O#define PPROP$K_SEARCH_SYMLINK_NOELLIPS 3 /* use symlinks except in ellipsis */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PPROPDEF_LOADED */ www6/*************************************************************** ~*****************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $PQLDEF ***/#ifndef __PQLDEF_LOADED#define __PQLDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* PROCESS QUOTA LIST CODES */N/*- */N#define PQL$_LISTEND 0 /*LIST END CODE (MUST BE FIRST) */N#define PQL$_ASTLM 1 /*AST LIMIT */N#define PQL$_BIOLM 2 /*BUFFERED I/O LIMIT */N#define PQL$_BYTLM 3 /*BYTE LIMIT FOR BUFFERED I/O */N#define PQL$_CPULM 4 /*CPU TIME LIMIT */N#define PQL$_DIOLM 5 /*DIRECT I/O LIMIT */N#define PQL$_FILLM 6  /*OPEN FILE LIMIT */N#define PQL$_PGFLQUOTA 7 /*PAGING FILE QUOTA */N#define PQL$_PRCLM 8 /*SUB-PROCESS LIMIT */N#define PQL$_TQELM 9 /*TIMER QUEUE ENTRY LIMIT */N#define PQL$_WSQUOTA 10 /*WORKING SET QUOTA */N#define PQL$_WSDEFAULT 11 /*WORKING SET DEFAULT */N#define PQL$_ENQLM 12 /*ENQUEUE LIMIT */N#define PQL$_WSEXTENT 13 /*WORKING SET EXTENT LIMIT */W#define PQL$_JTQUOTA 14 /*JOB-WIDE LOGICAL NAME TABLE CREATION QUOTA */N#define PQL$_LENGTH 15 /*NUMBER OF QUOTAS (MUST BE LAST) */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PQLDEF_LOADED */ ww6/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//***************************************************************************************************** ***************************//*** MODULE $PRCDEF ***/#ifndef __PRCDEF_LOADED#define __PRCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+  */N/* $CREPRC STATUS FLAGS AND ITEM CODES */N/*- */#define PRC$M_SSRWAIT 0x1#define PRC$M_SSFEXCU 0x2#define PRC$M_PSWAPM 0x4#define PRC$M_NOACNT 0x8#define PRC$M_BATCH 0x10#define PRC$M_HIBER 0x20#define PRC$M_NOUAF 0x40#define PRC$M_NETWRK 0x80#define PRC$M_DISAWS 0x100#define PRC$M_DETACH 0x200#define PRC$M_INTER 0x400#define PRC$M_IMGDMP 0x800#define PRC$M_CLISPEC 0x1000#define PRC$M_NOPASSWORD 0x2000#define PRC$M_DEBUG 0x4000#define PRC$M_DBGTRU 0x8000#define PRC$M_SUBSYSTEM 0x10000#define PRC$M_TCB 0x20000$#define PRC$M_NO_IMAGE_PRIVS 0x40000$#define PRC$M_PERM_SUBSYSTEM 0x80000%#define PRC$M_PARSE_EXTENDED 0x100000&#define PRC$M_INHERIT_PERSONA 0x200000#define PRC$M_HOME_RAD 0x400000%#define PRC$M_CASE_SENSITIVE 0x800000&#define PRC$M_SPAWN_DETACHED 0x1000000$#define PRC$M_SSLOG_ENABLE 0x2000000  #define PRC$M_KT_LIMIT 0x4000000#define PRC$M_LOGIN 0x40 #ifdef __NEW_STARLETtypedef union _prcdef { __struct {N unsigned prc$v_ssrwait : 1; /* RESOURCE WAIT DISABLE */Q unsigned prc$v_ssfexcu : 1; /* SYSTEM SERVICE FAIL EXCEPTION MODE */N unsigned prc$v_pswapm : 1; /* PROCESS SWAP MODE */N unsigned prc$v_noacnt : 1; /* ACCOUNTING MESSAGE DISABLE */N unsigned prc$v_batch : 1; /* BATCH INDICATOR */U unsigned prc$v_hiber : 1; /* HIBERNATE BEFORE CALLING INITIAL IMAGE */[ unsigned prc$v_nouaf : 1; /* BYPASS LOGIN VERIFICATION FOR DETACHED PROC. */N unsigned prc$v_netwrk : 1; /* NETWORK INDICATOR */N unsigned prc$v_disaws : 1; /* DISABLE WORKING SET ADJUST */N unsigned prc$v_detach : 1; /* DETACHED PROCESS */N unsigned prc$v_inter : 1; /* INTERACTIVE INDICATOR */N unsigned prc$v_imgdmp : 1; /* IMAGE DUMP REQUESTED */N unsigned prc$v_clispec : 1; /* PASS CLI SPECIFICATIONS */T unsigned prc$v_nopassword : 1; /* DON'T PROMPT FOR USERNAME AND PASSWORD */N unsigned prc$v_debug : 1; /* /DEBUG desired */N unsigned prc$v_dbgtru : 1; /* debugger present */V unsigned prc$v_subsystem : 1; /* inherit protected subsystem identifiers */N unsigned prc$v_tcb : 1; /* process is part of TCB */V unsigned prc$v_no_image_privs : 1; /* image privileges not to be propagated */P unsigned prc$v_perm_subsystem : 1; /* make subsystem rights permanent */[ unsigned prc$v_parse_extended : 1; /* make new process have parse_style extended */P unsigned prc$v_inherit_persona : 1; /* process gets persona of caller */N unsigned prc$v_home_rad : 1; /* Home RAD specified by c reator */N unsigned prc$v_case_sensitive : 1; /* Use CASE_LOOKUP = SENSITIVE */N unsigned prc$v_spawn_detached : 1; /* Spawn a detached process */N unsigned prc$v_sslog_enable : 1; /* Enable system service logging */V unsigned prc$v_kt_limit : 1; /* Kernel thread limit specified by creator */$ unsigned prc$v_fill_66_ : 5; } prc$r_prcdef_bits; __struct {" unsigned prc$v_fill_0 : 6;[ unsigned prc$v_login : 1; /*  BYPASS LOGIN VERIFICATION FOR DETACHED PROC. */$ unsigned prc$v_fill_67_ : 1; } prc$r_prcdef_obsolete; } PRCDEF; #if !defined(__VAXC)5#define prc$v_ssrwait prc$r_prcdef_bits.prc$v_ssrwait5#define prc$v_ssfexcu prc$r_prcdef_bits.prc$v_ssfexcu3#define prc$v_pswapm prc$r_prcdef_bits.prc$v_pswapm3#define prc$v_noacnt prc$r_prcdef_bits.prc$v_noacnt1#define prc$v_batch prc$r_prcdef_bits.prc$v_batch1#define prc$v_hiber prc$r_prcdef_bits.prc$v_hiber1#define prc$v_no uaf prc$r_prcdef_bits.prc$v_nouaf3#define prc$v_netwrk prc$r_prcdef_bits.prc$v_netwrk3#define prc$v_disaws prc$r_prcdef_bits.prc$v_disaws3#define prc$v_detach prc$r_prcdef_bits.prc$v_detach1#define prc$v_inter prc$r_prcdef_bits.prc$v_inter3#define prc$v_imgdmp prc$r_prcdef_bits.prc$v_imgdmp5#define prc$v_clispec prc$r_prcdef_bits.prc$v_clispec;#define prc$v_nopassword prc$r_prcdef_bits.prc$v_nopassword1#define prc$v_debug prc$r_prcdef_bits.prc$v_debug3#define prc$v_dbgtru prc$r_prcde f_bits.prc$v_dbgtru9#define prc$v_subsystem prc$r_prcdef_bits.prc$v_subsystem-#define prc$v_tcb prc$r_prcdef_bits.prc$v_tcbC#define prc$v_no_image_privs prc$r_prcdef_bits.prc$v_no_image_privsC#define prc$v_perm_subsystem prc$r_prcdef_bits.prc$v_perm_subsystemC#define prc$v_parse_extended prc$r_prcdef_bits.prc$v_parse_extendedE#define prc$v_inherit_persona prc$r_prcdef_bits.prc$v_inherit_persona7#define prc$v_home_rad prc$r_prcdef_bits.prc$v_home_radC#define prc$v_case_sensitive prc$r_p rcdef_bits.prc$v_case_sensitiveC#define prc$v_spawn_detached prc$r_prcdef_bits.prc$v_spawn_detached?#define prc$v_sslog_enable prc$r_prcdef_bits.prc$v_sslog_enable7#define prc$v_kt_limit prc$r_prcdef_bits.prc$v_kt_limit5#define prc$v_login prc$r_prcdef_obsolete.prc$v_login"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union prcdef { __struct {N unsigned prc$v_ssrwait : 1; /* RESOURCE WAIT DISABLE */Q unsigned prc$v_ssfexcu : 1;  /* SYSTEM SERVICE FAIL EXCEPTION MODE */N unsigned prc$v_pswapm : 1; /* PROCESS SWAP MODE */N unsigned prc$v_noacnt : 1; /* ACCOUNTING MESSAGE DISABLE */N unsigned prc$v_batch : 1; /* BATCH INDICATOR */U unsigned prc$v_hiber : 1; /* HIBERNATE BEFORE CALLING INITIAL IMAGE */[ unsigned prc$v_nouaf : 1; /* BYPASS LOGIN VERIFICATION FOR DETACHED PROC. */N unsigned prc$v_netwrk : 1;  /* NETWORK INDICATOR */N unsigned prc$v_disaws : 1; /* DISABLE WORKING SET ADJUST */N unsigned prc$v_detach : 1; /* DETACHED PROCESS */N unsigned prc$v_inter : 1; /* INTERACTIVE INDICATOR */N unsigned prc$v_imgdmp : 1; /* IMAGE DUMP REQUESTED */N unsigned prc$v_clispec : 1; /* PASS CLI SPECIFICATIONS */T unsigned prc$v_nopassword : 1; /* DON'T PROMPT FOR USERNAME AND PASSWORD */N unsigned prc$v_debug : 1; /* /DEBUG desired */N unsigned prc$v_dbgtru : 1; /* debugger present */V unsigned prc$v_subsystem : 1; /* inherit protected subsystem identifiers */N unsigned prc$v_tcb : 1; /* process is part of TCB */V unsigned prc$v_no_image_privs : 1; /* image privileges not to be propagated */P unsigned prc$v_perm_subsystem : 1; /* make subsystem rights permanent */[ unsigned prc$v_parse_extended : 1; /* make new process have parse_style extended */P unsigned prc$v_inherit_persona : 1; /* process gets persona of caller */N unsigned prc$v_home_rad : 1; /* Home RAD specified by creator */N unsigned prc$v_case_sensitive : 1; /* Use CASE_LOOKUP = SENSITIVE */N unsigned prc$v_spawn_detached : 1; /* Spawn a detached process */N unsigned prc$v_sslog_enable : 1; /* Enable system service logging  */V unsigned prc$v_kt_limit : 1; /* Kernel thread limit specified by creator */$ unsigned prc$v_fill_66_ : 5; } prc$r_prcdef_bits; __struct {" unsigned prc$v_fill_0 : 6;[ unsigned prc$v_login : 1; /* BYPASS LOGIN VERIFICATION FOR DETACHED PROC. */$ unsigned prc$v_fill_67_ : 1; } prc$r_prcdef_obsolete; } ; #if !defined(__VAXC)5#define prc$v_ssrwait prc$r_prcdef_bits.prc$v_ssrwait5#define prc$v_ssfexcu prc$r_prcd ef_bits.prc$v_ssfexcu3#define prc$v_pswapm prc$r_prcdef_bits.prc$v_pswapm3#define prc$v_noacnt prc$r_prcdef_bits.prc$v_noacnt1#define prc$v_batch prc$r_prcdef_bits.prc$v_batch1#define prc$v_hiber prc$r_prcdef_bits.prc$v_hiber1#define prc$v_nouaf prc$r_prcdef_bits.prc$v_nouaf3#define prc$v_netwrk prc$r_prcdef_bits.prc$v_netwrk3#define prc$v_disaws prc$r_prcdef_bits.prc$v_disaws3#define prc$v_detach prc$r_prcdef_bits.prc$v_detach1#define prc$v_inter prc$r_prcdef_bits.prc$v_inter3#def ine prc$v_imgdmp prc$r_prcdef_bits.prc$v_imgdmp5#define prc$v_clispec prc$r_prcdef_bits.prc$v_clispec;#define prc$v_nopassword prc$r_prcdef_bits.prc$v_nopassword1#define prc$v_debug prc$r_prcdef_bits.prc$v_debug3#define prc$v_dbgtru prc$r_prcdef_bits.prc$v_dbgtru9#define prc$v_subsystem prc$r_prcdef_bits.prc$v_subsystem-#define prc$v_tcb prc$r_prcdef_bits.prc$v_tcbC#define prc$v_no_image_privs prc$r_prcdef_bits.prc$v_no_image_privsC#define prc$v_perm_subsystem prc$r_prcdef_bits.prc$v_p erm_subsystemC#define prc$v_parse_extended prc$r_prcdef_bits.prc$v_parse_extendedE#define prc$v_inherit_persona prc$r_prcdef_bits.prc$v_inherit_persona7#define prc$v_home_rad prc$r_prcdef_bits.prc$v_home_radC#define prc$v_case_sensitive prc$r_prcdef_bits.prc$v_case_sensitiveC#define prc$v_spawn_detached prc$r_prcdef_bits.prc$v_spawn_detached?#define prc$v_sslog_enable prc$r_prcdef_bits.prc$v_sslog_enable7#define prc$v_kt_limit prc$r_prcdef_bits.prc$v_kt_limit5#define prc$v_login prc$r_ prcdef_obsolete.prc$v_login"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */\#define PRC$M_IMPERSONATE 512 /* Impersonate other - synonym for DETACH - 0x200 */N/*+ */N/* */N/* Create Process Item List Data Identifier Definitions */N/*  */N/* **** NOTE **** */N/* */N/* New items must always be added at the END of the list so that */N/* users will not have to relink or reassemble. */N/* */N/*- */N#define PRC$_LISTEND 0 /* End of list (must be first code) */N#define PRC$_PGFLCHAR 1 /* Page file characteristics */N#define PRC$_PGFLINDEX 2 /* Page file index */N#define PRC$_INPUT_ATT 3 /* SYS$INPUT attributes */N#define PRC$_OUTPUT_ATT 4 /* SYS$OUTPUT attributes */N#define PRC$_ERROR_ATT 5 /* SYS$ERROR attributes */N#define PRC$_CLASS 6  /* Process classification */N#define PRC$_SSLOG_FLAGS 7 /* System service logging flags */P#define PRC$_SSLOG_BUFSIZE 8 /* System service logging buffer size */Q#define PRC$_SSLOG_BUFCNT 9 /* System service logging buffer count */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PRCDEF_LOADED */ ww 6/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// -----------------------------------------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * * */P/* * Confidential computer software. Valid license from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. * */P/* *  * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty. * */P/* * * */P/* ************************************************************************* *//* ******************************************************************************************************************************** */@/* Created: 5-Apr-2012 13:00:56 by OpenVMS SDL EV3-3 */L/* Sou rce: 08-JUN-2004 15:02:05 $1$DGA7304:[STARLET_H.SRC]PRDEF.SDL;1 *//* ******************************************************************************************************************************** */  /* .MACRO $PRDEF,$GBL */ /* $DEFINI PR,$GBL *//* + */'/* PROCESSOR REGISTER DEFINITIONS *//* */B/* The following IPR symbols are provided for the convenience */D/* of common Macro-32 code using the VAX MFPR/MTPR instructions */@/* to operate against IPRs that exist in  both architectures */F/* architectures. Even Alpha-specific Macro-32 code would benefit */F/* since the compiler can calculate register live-ness around the */#/* VAX MFPR/MTPR instructions. *//* */A/* The assigned values for the PR$_ipr symbols match the VAX */F/* IPR numbers themselves wherever possible. VAX IPR numbers that */I/* are extremely unlikely ever to be encountered are otherwise used. */F/* The compiler uses the VAX values to validate the invocation of *//*  MTPR/MFPR instructions. *//* - */G#define PR$_ESP 1 /* Executive Stack Pointer */H#define PR$_SSP 2 /* Supervisor Stack Pointer */B#define PR$_USP 3 /* User Stack Pointer */D#define PR$_ASN 6 /* Address Space Number */J#define PR$_ASTEN 48 /* AST Enabled Register (MFPR only) */J#define PR$_ASTSR 49 /* AST Summary Register (MFPR only) */U#define PR$_DATFX 23  /* Data Alignment Trap Fixup in PALcode Enable */G#define PR$_IPIR 22 /* Interprocess Interrupt Request */H#define PR$_IPL 18 /* Interrupt Priority Level */D#define PR$_MCES 38 /* Machine Check Error Summary */F#define PR$_PCBB 16 /* Privileged Context Block Base */J#define PR$_PME 61 /* Performance Monitor Enable */@#define PR$_PRBR 15 /* Processor Base Register */B#define PR$_SCBB 17 /* System Control Block Base */C#define PR$_SIRR 20 /* Software Interrupt Request */C#define PR$_SISR 21 /* Software Interrupt Summary */J#define PR$_TBIA 57 /* Translation Buffer Invalidate All */S#define PR$_TBIAP 50 /* Translation Buffer Invalidate All Process */Y#define PR$_TBIS 58 /* Translation Buffer Invalidate Single - 32 bit VA */\#define PR$_TBIS_64 60 /* Translation Buf fer Invalidate Single - 64 bit VA */j#define PR$_TBISD 59 /* Translation Buffer Invalidate Single - 64 bit VA - D-stream only */j#define PR$_TBISI 47 /* Translation Buffer Invalidate Single - 64 bit VA - I-stream only */I#define PR$_VPTB 12 /* Virtual Page Table Base Register *//* + */-/* PROCESSOR REGISTER FIELD DEFINITIONS *//* - */:#define PR$_SID_TYP780 1 /* VAX 11/780 */:#define PR$_SID_TYP750 2 /* VAX 11/750 */:#define PR$_SID_TYP730 3 /* VAX 11/730 */9#define PR$_SID_TYP790 4 /* VAX 11/790 */>#define PR$_SID_TYP8SS 5 /* Scorpio for now */?#define PR$_SID_TYP8NN 6 /* Nautilus for now */:#define PR$_SID_TYPUV1 7 /* MicroVAX I */;#define PR$_SID_TYPUV2 8 /* MicroVAX II */6#define PR$_SID_TYP410 8 /* VAXstar */:#define PR$_SID_TYP009 9 /* Virtual VAX */3#defin e PR$_SID_TYP420 10 /* PVAX */7#define PR$_SID_TYP520 10 /* Cirrus I */6#define PR$_SID_TYP650 10 /* Mayfair */:#define PR$_SID_TYP9CC 10 /* Calypso/XCP */#define PR$_SID_TYP9CI 105#define PR$_SID_TYP60 10 /* Firefox */;#define PR$_SID_TYP670 11 /* KA670 (Pele) */2#define PR$_SID_TYP9RR 11 /* XRP */=#define PR$_SID_TYP43 11 /* KA43 (RigelMAX) */7#define PR$_SID_TYP9AQ  14 /* Aquarius */8#define PR$_SID_TYP8PS 17 /* Polarstar */:#define PR$_SID_TYP1202 18 /* Mariah/XMP */7#define PR$_SID_TYP46 18 /* PV-Mariah */#define PR$_SID_TYP600 19#define PR$_SID_TYP690 19#define PR$_SID_TYP700 19#define PR$_SID_TYP1302 19#define PR$_SID_TYP49 19#define PR$_SID_TYP1303 19?#define PR$_SID_TYP660 20 /* KA660 (Spitfire) */4#define PR$_SID_TYP440 20 /* PVAX2 */3#define PR$_SID_TYP4A 20 /* PCVAX */8#define PR$_SID_TYP550 20 /* Cirrus II */:#define PR$_SID_TYP1701 23 /* Laser/Neon */B#define PR$_SID_TYPMAX 23 /* MAX LEGAL CPU TYPE */O#define PR$_SID_TYP_NOTAVAX 128 /* Not a VAX (i.e. Alpha or some such) *//* Chip CPU types */;#define PR$_SID_TYPUV 8 /* MicroVAX chip */!/* MicroVAX chip CPU Subtypes */P#define PR$_XSID_UV_UV 0 /* Generic MicroVAX (unused s ubtype) */;#define PR$_XSID_UV_UV2 1 /* MicroVAX II */7#define PR$_XSID_UV_410 4 /* VAXstar */7#define PR$_SID_TYPCV 10 /* CVAX chip *//* CVAX chip CPU Subtypes */L#define PR$_XSID_CV_CV 0 /* Generic CVAX (unused subtype) */7#define PR$_XSID_CV_650 1 /* Mayfair */;#define PR$_XSID_CV_9CC 2 /* Calypso/XCP */6#define PR$_XSID_CV_60 3 /* Firefox */4#define PR$_XSID_CV_420 4  /* PVAX */#define PR$_XSID_CV_9CI 58#define PR$_XSID_CV_520 7 /* CIRRUS I */8#define PR$_SID_TYPRV 11 /* Rigel chip *//* Rigel chip CPU Subtypes */M#define PR$_XSID_RV_RV 0 /* Generic Rigel (unused subtype) */<#define PR$_XSID_RV_670 1 /* KA670 (Pele) */;#define PR$_XSID_RV_9RR 2 /* Calypso/XRP */>#define PR$_XSID_RV_43 4 /* KA43 (RigelMAX) */>#define PR$_SID_TYPV12 18  /* Mariah chip set */ /* Mariah chip CPU Subtypes */H#define PR$_XSID_V12_V12 0 /* Generic Mariah (unused subtype) */4#define PR$_XSID_V12_1202 2 /* MARIAH/XMP */D#define PR$_XSID_V12_46 4 /* PVAX- mariah subtype */#define PR$_SID_TYPV13 19#define PR$_XSID_V13_V13 0#define PR$_XSID_V13_690 1#define PR$_XSID_V13_1302 2#define PR$_XSID_V13_1303 3#define PR$_XSID_V13_49 4#define PR$_XSID_V13_700 5#define PR$_XSID_V13_600 6;#define PR$_SID_TY PV14 20 /* SOC Chip SID *//* SOC chip CPU subtypes */7#define PR$_XSID_V14_V14 0 /* unused subtype */9#define PR$_XSID_V14_660 1 /* KA660 (Spitfire) */6#define PR$_XSID_V14_440 4 /* PVAX2 subtype */=#define PR$_XSID_V14_4A 5 /* PCVAX subtype */2#define PR$_XSID_V14_550 7 /* CIRRUS II */=#define PR$_SID_TYPV17 23 /* NVAX+ Chip SID *//* NVAX+ chip CPU subtypes */7#define PR$_XSID_V17_V17 0 /* unus ed subtype */4#define PR$_XSID_V17_1701 1 /* Laser/Neon *//* Nautilus CPU Subtypes */7#define PR$_XSID_N8800 0 /* VAX 8800 */7#define PR$_XSID_N8700 1 /* VAX 8700 */B#define PR$_XSID_N2 2 /* Undefined Nautilus CPU */B#define PR$_XSID_N3 3 /* Undefined Nautilus CPU */B#define PR$_XSID_N4 4 /* Undefined Nautilus CPU */B#define PR$_XSID_N5 5 /* Undefined Nautilus CPU */7#define PR$_XSID_N 8550 6 /* VAX 8550 */7#define PR$_XSID_N8500 7 /* VAX 8500 */C#define PR$_XSID_N8NNN -1 /* Unknown Nautilus CPU */J/* ------------------------------------------------------------------- */#define PR$M_ASTEN 0xF#define PR$M_ASTEN_KEN 0x1#define PR$M_ASTEN_EEN 0x2#define PR$M_ASTEN_SEN 0x4#define PR$M_ASTEN_UEN 0x8<#define PR$M_ASTEN_DSBL_ALL 0 /* Disable all ASTs */;#define PR$M_ASTEN_ENBL_ALL 255 /* Enable all ASTs */<#define PR$M_ASTEN_ENBL_K 17 /* Enable kernel ASTs */?#define PR$M_ASTEN_ENBL_E 34 /* Enable executive ASTs */@#define PR$M_ASTEN_ENBL_S 68 /* Enable supervisor ASTs */:#define PR$M_ASTEN_ENBL_U 136 /* Enable user ASTs */O#define PR$M_ASTEN_PRSRV_ALL 15 /* Preserve all enable/disable states */I#define PR$M_ASTEN_PRSRV_K 1 /* Preserve kernel enable/disable */L#define PR$M_ASTEN_PRSRV_E 2 /* Preserve executive enable/disable */M#define PR$M_ASTEN _PRSRV_S 4 /* Preserve supervisor enable/disable */G#define PR$M_ASTEN_PRSRV_U 8 /* Preserve user enable/disable */J/* ------------------------------------------------------------------- */#define PR$M_ASTSR 0xF#define PR$M_ASTSR_KPD 0x1#define PR$M_ASTSR_EPD 0x2#define PR$M_ASTSR_SPD 0x4#define PR$M_ASTSR_UPD 0x8=#define PR$M_ASTSR_CLR_ALL 0 /* Clear pending ASTs */?#define PR$M_ASTSR_SET_ALL 255 /* Set all ASTs pending */?#define PR$M_ASTSR_SET_K 17  /* Set kernel AST pending */B#define PR$M_ASTSR_SET_E 34 /* Set executive AST pending */C#define PR$M_ASTSR_SET_S 68 /* Set supervisor AST pending */=#define PR$M_ASTSR_SET_U 136 /* Set user AST pending */F#define PR$M_ASTSR_PRSRV_ALL 15 /* Preserve all pending bits */B#define PR$M_ASTSR_PRSRV_K 1 /* Preserve kernel pending */E#define PR$M_ASTSR_PRSRV_E 2 /* Preserve executive pending */F#define PR$M_ASTSR_PRSRV_S 4 /* Preserve super visor pending */@#define PR$M_ASTSR_PRSRV_U 8 /* Preserve user pending */J/* ------------------------------------------------------------------- */#define PR$M_FEN_FEN 0x1#define PR$M_DATFX_DATFX 0x1#define PR$M_IPL_IPL 0x1F#define PR$M_MCES_MCK 0x1#define PR$M_MCES_SCE 0x2#define PR$M_MCES_PCE 0x4#define PR$M_MCES_DPC 0x8#define PR$M_MCES_DSC 0x10C#define PR$V_PCBB_PA 0 /* HWPCB Physical Address */C#define PR$S_PCBB_PA 48 /* HWPCB Physical Address */J/* ------------------------------------------------------------------- */#define PR$M_PS_SW 0x3#define PR$M_PS_PRVMOD 0x3#define PR$M_PS_SYSSTATE 0x4#define PR$M_PS_CURMOD 0x18#define PR$M_PS_VMM 0x80#define PR$M_PS_IPL 0x1F00+#define PR$M_PS_SP_ALIGN 0x3F00000000000000)#define PR$M_PS_MBZ_62 0x4000000000000000)#define PR$M_PS_MBZ_63 0x8000000000000000!#define PR$V_PS_MAX_PS_REG_BIT 13/* */:#define PR$C_PS_KERNEL 0 /* Kernel Mode */;#defin e PR$C_PS_EXEC 1 /* Executive Mode */=#define PR$C_PS_SUPER 2 /* Supervisor Mode */6#define PR$C_PS_USER 3 /* User Mode */J/* ------------------------------------------------------------------- */ #define PR$M_PTBR_PFN 0xFFFFFFFF #define PR$M_SCBB_PFN 0xFFFFFFFF#define PR$M_SIRR_LVL 0xF #define PR$M_SISR_SUMMARY 0xFFFF#define PR$M_SISR_RAZ 0x1#define PR$M_SISR_IR1 0x2#define PR$M_SISR_IR2 0x4#define PR$M_SISR_IR3 0x8#define PR$M_SISR_IR4 0x10#define PR$M_SISR_IR5 0x20#define PR$M_SISR_IR6 0x40#define PR$M_SISR_IR7 0x80#define PR$M_SISR_IR8 0x100#define PR$M_SISR_IR9 0x200#define PR$M_SISR_IR10 0x400#define PR$M_SISR_IR11 0x800#define PR$M_SISR_IR12 0x1000#define PR$M_SISR_IR13 0x2000#define PR$M_SISR_IR14 0x4000#define PR$M_SISR_IR15 0x8000!#define PR$M_TBCHK_VA_PRESENT 0x1%#define PR$M_IEEE_DNOD 0x800000000000%#define PR$M_IEEE_DNZ 0x1000000000000&#define PR$M_IEEE_INVD 0x2000000000000&#d efine PR$M_IEEE_DZED 0x4000000000000&#define PR$M_IEEE_OVFD 0x8000000000000&#define PR$M_IEEE_INV 0x10000000000000&#define PR$M_IEEE_DZE 0x20000000000000&#define PR$M_IEEE_OVF 0x40000000000000&#define PR$M_IEEE_UNF 0x80000000000000'#define PR$M_IEEE_INE 0x100000000000000'#define PR$M_IEEE_IOV 0x200000000000000)#define PR$M_IEEE_UNDZ 0x1000000000000000)#define PR$M_IEEE_UNFD 0x2000000000000000)#define PR$M_IEEE_INED 0x4000000000000000,#define PR$M_IEEE_SUMMARY 0x8000000000000000#defin e PR$S_PRDEF 8#define PR$S_QUAD_ACCESS 8I#define PR$Q_QUAD_ACCESS 0 /* Access to register as a quadword */#define PR$S_LONG_ACCESS 8I#define PR$L_LONG_ACCESS 0 /* Access to register as a quadword */#define PR$S_SID_SN 12@#define PR$V_SID_SN 0 /* SERIAL NUMBER FIELD */#define PR$S_SID_PL 35#define PR$V_SID_PL 12 /* PLANT ID */#define PR$S_SID_ECO 97#define PR$V_SID_ECO 15 /* ECO LEVEL */#define PR$S_SID_TYPE 8<#def ine PR$V_SID_TYPE 24 /* CPU TYPE CODE */#define PR$S_XSID_TYPE 8@#define PR$V_XSID_TYPE 24 /* CPU SUBTYPE CODE */%/* SYSTEM ID REGISTER CPU TYPES *//* Number assignments are *//* based upon the jumpers */ /* read by the console from *//* the MPS backplane */$/* ASTEN - AST Enabled Register *//* */P/* NOTE WELL: These bit symbols are to be used only when interfacing to the */G/* ASTEN internal processor register. They are NOT to be u sed when */H/* interfacing to the copy of ASTEN which is stored in the Hardware */H/* Privileged Context Block (HWPCB). See the HWPCB-specific symbols */9/* for how to refer to the ASTEN field in the HWPCB. *//* */#define PR$S_ASTEN 4;#define PR$V_ASTEN 0 /* Enabled AST mask */A#define PR$V_ASTEN_KEN 0 /* Kernel AST Enabled */D#define PR$V_ASTEN_EEN 1 /* Executive AST Enabled */E#define PR$V_ASTEN_SEN 2 /* Supervis or AST Enabled */?#define PR$V_ASTEN_UEN 3 /* User AST Enabled */$/* ASTSR - AST Summary Register *//* */P/* NOTE WELL: These bit symbols are to be used only when interfacing to the */G/* ASTSR internal processor register. They are NOT to be used when */H/* interfacing to the copy of ASTSR which is stored in the Hardware */H/* Privileged Context Block (HWPCB). See the HWPCB-specific symbols */9/* for how to refer to the ASTSR field in the HWPCB. *//* */ #define PR$S_ASTSR 4C#define PR$V_ASTSR 0 /* AST pending summary mask */A#define PR$V_ASTSR_KPD 0 /* Kernel AST Pending */D#define PR$V_ASTSR_EPD 1 /* Executive AST Pending */E#define PR$V_ASTSR_SPD 2 /* Supervisor AST Pending */?#define PR$V_ASTSR_UPD 3 /* User AST Pending */#/* FEN - Floating Point Enable *//* */P/* NOTE WELL: These bit symbols are to be used only when interfacing to the */E/* F EN internal processor register. They are NOT to be used when */F/* interfacing to the copy of FEN which is stored in the Hardware */H/* Privileged Context Block (HWPCB). See the HWPCB-specific symbols */7/* for how to refer to the FEN field in the HWPCB. *//* */G#define PR$V_FEN_FEN 0 /* Floating point enabled = 1 */J/* ------------------------------------------------------------------- */)/* DATFX - Data Alignment Trap Fixup *//* */B#define PR$V_DATFX_DAT FX 0 /* Data Alignment Trap Fixup */J/* ------------------------------------------------------------------- */&/* IPL - Interrupt Priority Level *//* */#define PR$S_IPL_IPL 5E#define PR$V_IPL_IPL 0 /* Interrupt Priority Level */J/* ------------------------------------------------------------------- */3/* MCES - Machine Check Error Summary Register *//* */A#define PR$V_MCES_MCK 0 /* Machine Check (W1C) */L#define PR$V_MCES_SCE 1  /* System Correctable Error (W1C) */O#define PR$V_MCES_PCE 2 /* Processor Correctable Error (W1C) */X#define PR$V_MCES_DPC 3 /* Disable Processor Correctable Error report */U#define PR$V_MCES_DSC 4 /* Disable System Correctable Error report */J/* ------------------------------------------------------------------- */,/* PCBB - Privileged Context Block Base *//* *//* PS - Processor Status *//* */J/* The PS is not an IP R in the sense that it isn't read/written using */H/* the MxPR operators. However, the bitfields of the PS are defined */L/* here since this is the repository for bitfields of architected IPRs, */2/* hence it's convenient to define them here. *//* */K/* Although the 'software' field of the PS is not privileged state and */H/* may be used by users as they see fit in User mode, VMS imposes a */K/* privileged interpretation on the bits when used in any of the three */H/* inner  processor modes (Kernel, Executive, Supervisor). There are *//* consequences of this: *//* */E/* 1) Should User mode code be using the software field bits, it */</* must be assumed that the User mode setting of these */:/* bits are entirely ignored by inner mode software. *//* */C/* 2) VMS reserves the right to redefine its privileged (inner */8/* mode) interpretation of these bits at any time. *//* */#define PR$S_PS_SW 28#define PR$V_PS_SW 0 / * Software Bits */#define PR$S_PS_PRVMOD 2F#define PR$V_PS_PRVMOD 0 /* Previous Processor Mode */?#define PR$V_PS_SYSSTATE 2 /* System State Indicator */#define PR$S_PS_CURMOD 2E#define PR$V_PS_CURMOD 3 /* Current Processor Mode */C#define PR$V_PS_VMM 7 /* Virtual Machine Monitor */#define PR$S_PS_IPL 5D#define PR$V_PS_IPL 8 /* Interrupt Priority Level */#define PR$S_PS_SP_ALIGN 6@#define PR$V_PS_SP_ALIGN 56  /* Stack Pointer Alignment */N#define PR$V_PS_MBZ_62 62 /* Reserved bit above SP alignment */N#define PR$V_PS_MBZ_63 63 /* Reserved bit above SP alignment *//* */3/* Maximum bit number used in the PS register *//* *//* MODE SYMBOL DEFINITIONS *//* */'/* PTBR - Page Table Base Register *//* */#define PR$S_PTBR_PFN 32A#define PR$V_PTBR_PFN 0 /* PFN of current L1PT */J/* ------------------------------------------ ------------------------- */(/* SCBB - System Control Block Base *//* */#define PR$S_SCBB_PFN 328#define PR$V_SCBB_PFN 0 /* PFN of SCB */J/* ------------------------------------------------------------------- */2/* SIRR - Software Interrupt Request Register *//* */#define PR$S_SIRR_LVL 4N#define PR$V_SIRR_LVL 0 /* Software Interrupt Request Level */J/* ------------------------------------------------------------------- */2/* SISR - Software  Interrupt Summary Register *//* */#define PR$S_SISR_SUMMARY 16C#define PR$V_SISR_SUMMARY 0 /* Sofware Interrupt Summary */?#define PR$V_SISR_IR1 1 /* Softint 1 pending */?#define PR$V_SISR_IR2 2 /* Softint 2 pending */?#define PR$V_SISR_IR3 3 /* Softint 3 pending */?#define PR$V_SISR_IR4 4 /* Softint 4 pending */?#define PR$V_SISR_IR5 5 /* Softint 5 pending */?#define PR$V_SISR_IR6 6  /* Softint 6 pending */?#define PR$V_SISR_IR7 7 /* Softint 7 pending */?#define PR$V_SISR_IR8 8 /* Softint 8 pending */?#define PR$V_SISR_IR9 9 /* Softint 9 pending */A#define PR$V_SISR_IR10 10 /* Softint 10 pending */A#define PR$V_SISR_IR11 11 /* Softint 11 pending */A#define PR$V_SISR_IR12 12 /* Softint 12 pending */A#define PR$V_SISR_IR13 13 /* Softint 13 pending */A#def ine PR$V_SISR_IR14 14 /* Softint 14 pending */A#define PR$V_SISR_IR15 15 /* Softint 15 pending */J/* ------------------------------------------------------------------- */(/* TBCHK - Translation Buffer Check *//* */L/* This IPR may always be referenced with MFPR without causing an error */K/* to occur (unlike VAX), but the feature provided by TBCHK may or may */P/* not be implemented. If not, then #define PR$V_IEEE_INED 62 /* Inexact disable */K#define PR$V_IEEE_SUMMARY 63 /* Bitwise OR of FPCR exception bits */ /* $DEFEND PR,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//************************************************************************************* *******************************************//*** MODULE $PRDEF ***/#ifndef __PRDEF_LOADED#define __PRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+  */N/* PROCESSOR REGISTER DEFINITIONS */N/* */I/* The following IPR symbols are provided for the convenience */I/* of common Macro-32 code using the VAX MFPR/MTPR instructions */I/* to operate against IPRs that exist in both architectures */I/* architectures. Even Alpha-specific Macro-32 code would benefit  */I/* since the compiler can calculate register live-ness around the */I/* VAX MFPR/MTPR instructions. */N/* */I/* The assigned values for the PR$_ipr symbols match the VAX */I/* IPR numbers themselves wherever possible. VAX IPR numbers that */I/* are extremely unlikely ever to be encountered are otherwise used. */I/* The compiler uses the VAX values to validate the invocation of */I/* MTPR/MFPR instructions. */N/*- */N#define PR$_ESP 1 /* Executive Stack Pointer */N#define PR$_SSP 2 /* Supervisor Stack Pointer */N#define PR$_USP 3 /* User Stack Pointer */N#define PR$_ASN 6 /* Address Space Number  */N#define PR$_ASTEN 48 /* AST Enabled Register (MFPR only) */N#define PR$_ASTSR 49 /* AST Summary Register (MFPR only) */Y#define PR$_DATFX 23 /* Data Alignment Trap Fixup in PALcode Enable */N#define PR$_IPIR 22 /* Interprocess Interrupt Request */N#define PR$_IPL 18 /* Interrupt Priority Level */N#define PR$_MCES 38 /* Machine Check Error Summary */N#define PR$_PCBB 16 /* Privileged Context Block Base */N#define PR$_PME 61 /* Performance Monitor Enable */N#define PR$_PRBR 15 /* Processor Base Register */N#define PR$_SCBB 17 /* System Control Block Base */N#define PR$_SIRR 20 /* Software Interrupt Request */N#define PR$_SISR 21 /* Software Interrupt Summary */O#define PR$_TBIA 57  /* Translation Buffer Invalidate All */W#define PR$_TBIAP 50 /* Translation Buffer Invalidate All Process */^#define PR$_TBIS 58 /* Translation Buffer Invalidate Single - 32 bit VA */^#define PR$_TBIS_64 60 /* Translation Buffer Invalidate Single - 64 bit VA */n#define PR$_TBISD 59 /* Translation Buffer Invalidate Single - 64 bit VA - D-stream only */n#define PR$_TBISI 47 /* Translation Buffer Invalidate Single - 64 bit VA - I-stream only */N#define PR$_VPTB 12 /* Virtual Page Table Base Register */N/*+ */N/* PROCESSOR REGISTER FIELD DEFINITIONS */N/*- */N#define PR$_SID_TYP780 1 /* VAX 11/780 */N#define PR$_SID_TYP750 2 /* VAX 11/750  */N#define PR$_SID_TYP730 3 /* VAX 11/730 */N#define PR$_SID_TYP790 4 /* VAX 11/790 */N#define PR$_SID_TYP8SS 5 /* Scorpio for now */N#define PR$_SID_TYP8NN 6 /* Nautilus for now */N#define PR$_SID_TYPUV1 7 /* MicroVAX I */N#define PR$_SID_TYPUV2 8 /* MicroVAX II */N#define PR$_SID_TYP410 8 /* VAXstar */N#define PR$_SID_TYP009 9 /* Virtual VAX */N#define PR$_SID_TYP420 10 /* PVAX */N#define PR$_SID_TYP520 10 /* Cirrus I */N#define PR$_SID_TYP650 10 /* Mayfair */N#define PR$_SID_TYP9CC 10 /* Calypso/XCP */#define PR$_SID_TYP9CI 10N#define PR$_SID_TYP60 10 /* Firefox */N#define PR$_SID_TYP670 11 /* KA670 (Pele) */N#define PR$_SID_TYP9RR 11 /* XRP */N#define PR$_SID_TYP43 11 /* KA43 (RigelMAX) */N#define PR$_SID_TYP9AQ 14 /* Aquarius */N#define PR$_SID_TYP8PS 17 /* Polarstar */N#define PR$_SID_TYP1202 18  /* Mariah/XMP */N#define PR$_SID_TYP46 18 /* PV-Mariah */#define PR$_SID_TYP600 19#define PR$_SID_TYP690 19#define PR$_SID_TYP700 19#define PR$_SID_TYP1302 19#define PR$_SID_TYP49 19#define PR$_SID_TYP1303 19N#define PR$_SID_TYP660 20 /* KA660 (Spitfire) */N#define PR$_SID_TYP440 20 /* PVAX2 */N#define PR$_SID_TYP4A 20 /* PCVAX */N#define PR$_SID_TYP550 20 /* Cirrus II */N#define PR$_SID_TYP1701 23 /* Laser/Neon */N#define PR$_SID_TYPMAX 23 /* MAX LEGAL CPU TYPE */Q#define PR$_SID_TYP_NOTAVAX 128 /* Not a VAX (i.e. Alpha or some such) */N/*Chip CPU types */N#define PR$_SID_TYPUV 8 /* MicroVAX chip  */N/*MicroVAX chip CPU Subtypes */O#define PR$_XSID_UV_UV 0 /* Generic MicroVAX (unused subtype) */N#define PR$_XSID_UV_UV2 1 /* MicroVAX II */N#define PR$_XSID_UV_410 4 /* VAXstar */N#define PR$_SID_TYPCV 10 /* CVAX chip */N/*CVAX chip CPU Subtypes */N#define PR$_XSID_CV_CV 0 /* Generic CVAX (unused subtype) */N#define PR$_XSID_CV_650 1 /* Mayfair */N#define PR$_XSID_CV_9CC 2 /* Calypso/XCP */N#define PR$_XSID_CV_60 3 /* Firefox */N#define PR$_XSID_CV_420 4 /* PVAX */#define PR$_XSID_CV_9CI 5N#define PR$_XSID_CV_520 7 /* CIRRUS I */N#define PR$_SID_TYPRV 11 /* Rigel chip */N/* Rigel chip CPU Subtypes */N#define PR$_XSID_RV_RV 0 /* Generic Rigel (unused subtype) */N#define PR$_XSID_RV_670 1 /* KA670 (Pele) */N#define PR$_XSID_RV_9RR 2 /* Calypso/XRP */N#define PR$_XSID_RV_43 4 /* KA43 (RigelMAX) */N#define PR$_SID_TYPV12 18  /* Mariah chip set */N/* Mariah chip CPU Subtypes */N#define PR$_XSID_V12_V12 0 /* Generic Mariah (unused subtype) */N#define PR$_XSID_V12_1202 2 /* MARIAH/XMP */N#define PR$_XSID_V12_46 4 /* PVAX- mariah subtype */#define PR$_SID_TYPV13 19#define PR$_XSID_V13_V13 0#define PR$_XSID_V13_690 1#define PR$_XSID_V13_1302 2#define PR$_XSID_V13_1303 3 #define PR$_XSID_V13_49 4#define PR$_XSID_V13_700 5#define PR$_XSID_V13_600 6N#define PR$_SID_TYPV14 20 /* SOC Chip SID */N/* SOC chip CPU subtypes */N#define PR$_XSID_V14_V14 0 /* unused subtype */N#define PR$_XSID_V14_660 1 /* KA660 (Spitfire) */N#define PR$_XSID_V14_440 4 /* PVAX2 subtype */N#define PR$_XSID_V14_4A 5 /* PCVAX subtype */N#define PR$_XSID_V14_550 7 /* CIRRUS II */N#define PR$_SID_TYPV17 23 /* NVAX+ Chip SID */N/* NVAX+ chip CPU subtypes */N#define PR$_XSID_V17_V17 0 /* unused subtype */N#define PR$_XSID_V17_1701 1 /* Laser/Neon */N/*Nautilus CPU Subtypes  */N#define PR$_XSID_N8800 0 /* VAX 8800 */N#define PR$_XSID_N8700 1 /* VAX 8700 */N#define PR$_XSID_N2 2 /* Undefined Nautilus CPU */N#define PR$_XSID_N3 3 /* Undefined Nautilus CPU */N#define PR$_XSID_N4 4 /* Undefined Nautilus CPU */N#define PR$_XSID_N5 5 /* Undefined Nautilus CPU  */N#define PR$_XSID_N8550 6 /* VAX 8550 */N#define PR$_XSID_N8500 7 /* VAX 8500 */N#define PR$_XSID_N8NNN -1 /* Unknown Nautilus CPU */N/*------------------------------------------------------------------- */#define PR$M_ASTEN 0xF#define PR$M_ASTEN_KEN 0x1#define PR$M_ASTEN_EEN 0x2#define PR$M_ASTEN_SEN 0x4#define PR$M_ASTEN_UEN 0x8N#define PR$M_ASTEN_DSBL_ALL 0 /* Disable all ASTs */N#define PR$M_ASTEN_ENBL_ALL 255 /* Enable all ASTs */N#define PR$M_ASTEN_ENBL_K 17 /* Enable kernel ASTs */N#define PR$M_ASTEN_ENBL_E 34 /* Enable executive ASTs */N#define PR$M_ASTEN_ENBL_S 68 /* Enable supervisor ASTs */N#define PR$M_ASTEN_ENBL_U 136 /* Enable user ASTs */P#define PR$M_ASTEN_PRSRV_ALL 15 /* Preserve all enable/disable  states */N#define PR$M_ASTEN_PRSRV_K 1 /* Preserve kernel enable/disable */O#define PR$M_ASTEN_PRSRV_E 2 /* Preserve executive enable/disable */P#define PR$M_ASTEN_PRSRV_S 4 /* Preserve supervisor enable/disable */N#define PR$M_ASTEN_PRSRV_U 8 /* Preserve user enable/disable */N/*------------------------------------------------------------------- */#define PR$M_ASTSR 0xF#define PR$M_ASTSR_KPD 0x1#define PR$M_ASTSR_EPD 0x2#define PR$M_ASTSR_SPD 0x4#define PR$M_ASTSR_UPD 0x8N#define PR$M_ASTSR_CLR_ALL 0 /* Clear pending ASTs */N#define PR$M_ASTSR_SET_ALL 255 /* Set all ASTs pending */N#define PR$M_ASTSR_SET_K 17 /* Set kernel AST pending */N#define PR$M_ASTSR_SET_E 34 /* Set executive AST pending */N#define PR$M_ASTSR_SET_S 68 /* Set supervisor AST pending */N#define PR$M_ASTSR_SET_U 136 /* Set user AST pending */N#define PR$M_ASTSR_PRSRV_ALL 15 /* Preserve all pending bits */N#define PR$M_ASTSR_PRSRV_K 1 /* Preserve kernel pending */N#define PR$M_ASTSR_PRSRV_E 2 /* Preserve executive pending */N#define PR$M_ASTSR_PRSRV_S 4 /* Preserve supervisor pending */N#define PR$M_ASTSR_PRSRV_U 8 /* Preserve user pending */N/*------------------------------------------------------------------- */#defin e PR$M_FEN_FEN 0x1#define PR$M_DATFX_DATFX 0x1#define PR$M_IPL_IPL 0x1F#define PR$M_MCES_MCK 0x1#define PR$M_MCES_SCE 0x2#define PR$M_MCES_PCE 0x4#define PR$M_MCES_DPC 0x8#define PR$M_MCES_DSC 0x10N#define PR$V_PCBB_PA 0 /* HWPCB Physical Address */N#define PR$S_PCBB_PA 48 /* HWPCB Physical Address */N/*------------------------------------------------------------------- */#define PR$M_PS_SW 0x3#define PR$M_PS_PRVMOD 0 x3#define PR$M_PS_SYSSTATE 0x4#define PR$M_PS_CURMOD 0x18#define PR$M_PS_VMM 0x80#define PR$M_PS_IPL 0x1F00+#define PR$M_PS_SP_ALIGN 0x3F00000000000000)#define PR$M_PS_MBZ_62 0x4000000000000000)#define PR$M_PS_MBZ_63 0x8000000000000000!#define PR$V_PS_MAX_PS_REG_BIT 13N/* */N#define PR$C_PS_KERNEL 0 /* Kernel Mode */N#define PR$C_PS_EXEC 1 /* Executive Mode  */N#define PR$C_PS_SUPER 2 /* Supervisor Mode */N#define PR$C_PS_USER 3 /* User Mode */N/*------------------------------------------------------------------- */ #define PR$M_PTBR_PFN 0xFFFFFFFF #define PR$M_SCBB_PFN 0xFFFFFFFF#define PR$M_SIRR_LVL 0xF #define PR$M_SISR_SUMMARY 0xFFFF#define PR$M_SISR_RAZ 0x1#define PR$M_SISR_IR1 0x2#define PR$M_SISR_IR2 0x4#define PR$M_SISR_IR3 0x8#define PR$M_SISR_IR4 0x10#define PR$M_SISR_IR5 0x20#define PR$M_SISR_IR6 0x40#define PR$M_SISR_IR7 0x80#define PR$M_SISR_IR8 0x100#define PR$M_SISR_IR9 0x200#define PR$M_SISR_IR10 0x400#define PR$M_SISR_IR11 0x800#define PR$M_SISR_IR12 0x1000#define PR$M_SISR_IR13 0x2000#define PR$M_SISR_IR14 0x4000#define PR$M_SISR_IR15 0x8000!#define PR$M_TBCHK_VA_PRESENT 0x1%#define PR$M_IEEE_DNOD 0x800000000000%#define PR$M_IEEE_DNZ 0x1000000000000&#define PR$M_IEEE_INVD 0x2000000 000000&#define PR$M_IEEE_DZED 0x4000000000000&#define PR$M_IEEE_OVFD 0x8000000000000&#define PR$M_IEEE_INV 0x10000000000000&#define PR$M_IEEE_DZE 0x20000000000000&#define PR$M_IEEE_OVF 0x40000000000000&#define PR$M_IEEE_UNF 0x80000000000000'#define PR$M_IEEE_INE 0x100000000000000'#define PR$M_IEEE_IOV 0x200000000000000)#define PR$M_IEEE_UNDZ 0x1000000000000000)#define PR$M_IEEE_UNFD 0x2000000000000000)#define PR$M_IEEE_INED 0x4000000000000000,#define PR$M_IEEE_SUMMARY 0x80000000000000 00 #ifdef __NEW_STARLETtypedef union _prdef {N unsigned __int64 pr$q_quad_access; /* Access to register as a quadword */N unsigned int pr$l_long_access [2]; /* Access to register as a quadword */ __struct {N unsigned pr$v_sid_sn : 12; /* SERIAL NUMBER FIELD */N unsigned pr$v_sid_pl : 3; /* PLANT ID */N unsigned pr$v_sid_eco : 9; /* ECO LEVEL */N unsigned pr$v_sid_type : 8 ; /* CPU TYPE CODE */ } pr$r_prdef_bits; __struct {N unsigned pr$v_fill_xsid_bits : 24; /* CPU-SPECIFIC XSID BITS */N unsigned pr$v_xsid_type : 8; /* CPU SUBTYPE CODE */ } pr$r_prdef_xbits;N/* SYSTEM ID REGISTER CPU TYPES */N/* Number assignments are */N/* based upon the jumpers  */N/* read by the console from */N/* the MPS backplane */N/* ASTEN - AST Enabled Register */N/* */N/* NOTE WELL: These bit symbols are to be used only when interfacing to the */I/* ASTEN internal processor register. They are NOT to be used when */I/* interfacing  to the copy of ASTEN which is stored in the Hardware */I/* Privileged Context Block (HWPCB). See the HWPCB-specific symbols */I/* for how to refer to the ASTEN field in the HWPCB. */N/* */ __union {N unsigned pr$v_asten : 4; /* Enabled AST mask */ __struct {N unsigned pr$v_asten_ken : 1; /* Kernel AST Enabled */N un signed pr$v_asten_een : 1; /* Executive AST Enabled */N unsigned pr$v_asten_sen : 1; /* Supervisor AST Enabled */N unsigned pr$v_asten_uen : 1; /* User AST Enabled */' unsigned pr$v_fill_68_ : 4; } pr$r_asten_bits; } pr$r_asten_def;N/* ASTSR - AST Summary Register */N/* */N/* NOTE WELL: These bit symbols are to be used only when interfacing to the */I/* ASTSR internal processor register. They are NOT to be used when */I/* interfacing to the copy of ASTSR which is stored in the Hardware */I/* Privileged Context Block (HWPCB). See the HWPCB-specific symbols */I/* for how to refer to the ASTSR field in the HWPCB. */N/* */ __union {N unsigned pr$v_astsr : 4; /* A ST pending summary mask */ __struct {N unsigned pr$v_astsr_kpd : 1; /* Kernel AST Pending */N unsigned pr$v_astsr_epd : 1; /* Executive AST Pending */N unsigned pr$v_astsr_spd : 1; /* Supervisor AST Pending */N unsigned pr$v_astsr_upd : 1; /* User AST Pending */' unsigned pr$v_fill_69_ : 4; } pr$r_astsr_bits; } pr$r_astsr_def;N/* FEN - Floating Point Enable */N/* */N/* NOTE WELL: These bit symbols are to be used only when interfacing to the */I/* FEN internal processor register. They are NOT to be used when */I/* interfacing to the copy of FEN which is stored in the Hardware */I/* Privileged Context Block (HWPCB). See the HWPCB-specific symbols */I/* for how to refer to the FEN field in the HWPCB.  */N/* */N unsigned pr$v_fen_fen : 1; /* Floating point enabled = 1 */N/*------------------------------------------------------------------- */N/* DATFX - Data Alignment Trap Fixup */N/* */N unsigned pr$v_datfx_datfx : 1; /* Data Alignment Trap Fixup */N/*------------------------------------------------------------------- */N/* IPL - Interrupt Priority Level */N/* */N unsigned pr$v_ipl_ipl : 5; /* Interrupt Priority Level */N/*------------------------------------------------------------------- */N/* MCES - Machine Check Error Summary Register */N/*  */ __struct {N unsigned pr$v_mces_mck : 1; /* Machine Check (W1C) */N unsigned pr$v_mces_sce : 1; /* System Correctable Error (W1C) */O unsigned pr$v_mces_pce : 1; /* Processor Correctable Error (W1C) */X unsigned pr$v_mces_dpc : 1; /* Disable Processor Correctable Error report */U unsigned pr$v_mces_dsc : 1; /* Disable System Correctable Error report */# unsigned pr$v_fill_70_ : 3; } pr$r_mces_overlay;N/*------------------------------------------------------------------- */N/* PCBB - Privileged Context Block Base */N/* */N/* PS - Processor Status */N/* */N/* The PS is not an IPR in the sense that it isn't read/written using */N/* the MxPR operators. However, the bitfields of the PS are defined */N/* here since this is the repository for bitfields of architected IPRs, */N/* hence it's convenient to define them here. */N/* */N/* Although the 'software' field of the PS is not privileged state and */N/* may be used by users as they see fit in User mode, VMS imposes a */N/* privileged interpretation on the bits when used in any of the three */N/* inner processor modes (Kernel, Executive, Supervisor). There are */N/* consequences of this: */N/* */I/* 1) Should User mode code be using the software field bits, it */B/* must be assumed that the User mode setting of these */B/* bits are entirely ignored by inner mode software.  */N/* */I/* 2) VMS reserves the right to redefine its privileged (inner */B/* mode) interpretation of these bits at any time. */N/* */ __struct {N unsigned pr$v_ps_sw : 2; /* Software Bits */# unsigned pr$v_fill_71_ : 6; } pr$r_ps_swdef_bits; __struct {N  unsigned pr$v_ps_prvmod : 2; /* Previous Processor Mode */N unsigned pr$v_ps_sysstate : 1; /* System State Indicator */N unsigned pr$v_ps_curmod : 2; /* Current Processor Mode */' unsigned psdef$$_ps_fill_1 : 2;N unsigned pr$v_ps_vmm : 1; /* Virtual Machine Monitor */N unsigned pr$v_ps_ipl : 5; /* Interrupt Priority Level */( unsigned psdef$$_ps_fill_2 : 20;( unsigned psdef$$_ps_fill_3 : 23;N unsigned pr$v_ps_sp_align : 6; /* Stack Pointer Alignment */N unsigned pr$v_ps_mbz_62 : 1; /* Reserved bit above SP alignment */N unsigned pr$v_ps_mbz_63 : 1; /* Reserved bit above SP alignment */ } pr$r_psdef_bits;N/* */N/* Maximum bit number used in the PS register */N/*  */N/* MODE SYMBOL DEFINITIONS */N/* */N/* PTBR - Page Table Base Register */N/* */N unsigned pr$v_ptbr_pfn : 32; /* PFN of current L1PT */N/*------------------------------------------------------------------- */N/* SCBB - System Control Block Base */N/* */N unsigned pr$v_scbb_pfn : 32; /* PFN of SCB */N/*------------------------------------------------------------------- */N/* SIRR - Software Interrupt Request Register */N/* */N unsigned pr$v_sirr_lvl : 4;  /* Software Interrupt Request Level */N/*------------------------------------------------------------------- */N/* SISR - Software Interrupt Summary Register */N/* */ __union {N unsigned pr$v_sisr_summary : 16; /* Sofware Interrupt Summary */ __struct {N unsigned pr$v_sisr_raz : 1; /* Read As Zero */N unsigned pr$v_sisr_ir1 : 1; /* Softint 1 pending */N unsigned pr$v_sisr_ir2 : 1; /* Softint 2 pending */N unsigned pr$v_sisr_ir3 : 1; /* Softint 3 pending */N unsigned pr$v_sisr_ir4 : 1; /* Softint 4 pending */N unsigned pr$v_sisr_ir5 : 1; /* Softint 5 pending */N unsigned pr$v_sisr_ir6 : 1; /* Softint 6 pending */N unsigned pr$v_sisr_ir7 : 1; /* Softint 7 pending */N unsigned pr$v_sisr_ir8 : 1; /* Softint 8 pending */N unsigned pr$v_sisr_ir9 : 1; /* Softint 9 pending */N unsigned pr$v_sisr_ir10 : 1; /* Softint 10 pending */N unsigned pr$v_sisr_ir11 : 1; /* Softint 11 pending */N unsigned pr$v_sisr_ir12 : 1; /* Softint 12 pending */N unsigned pr$v_sisr_ir13 : 1; /* Softint 13 pending  */N unsigned pr$v_sisr_ir14 : 1; /* Softint 14 pending */N unsigned pr$v_sisr_ir15 : 1; /* Softint 15 pending */ } pr$r_sisr_bits; } pr$r_sisr_fields;N/*------------------------------------------------------------------- */N/* TBCHK - Translation Buffer Check */N/* */N/* This IPR may always be referenced with MFPR without causing an error */N/* to occur (unlike VAX), but the feature provided by TBCHK may or may */P/* not be implemented. If not, then =1 and */N/* should be ignored. If TBCHK's function IS implemented, then */N/* =0 and returns the desired data. */N/* */ __struct {N unsigned pr$v_tbchk_va_present : 1 ; /* VA in TB = 1 */" unsigned pr$v_fill_1 : 31;" unsigned pr$v_fill_2 : 31;N unsigned pr$v_tbchk_no_tbchk : 1; /* Not implemented = 1 */ } pr$r_tbchk_bits;N/*------------------------------------------------------------------- */N/* FPCR - Floating Point Control Register */N/* */N/* NOTE WELL: These bit symbols are to be used only when interfacing to the */M/* hardware FPCR internal processor register. They are NOT to be used when */L/* interfacing to the software floating point control register pointed to */J/* by CTL$GQ_IEEE_FP_CONTROL/PKTA$Q_IEEE_FP_CONTROL. */N/* */K/* The hardware FPCR should only be manipulated via the system service, */I/* SYS$IEEE_FP_CONTROL, rather than directly. */N/*  */ __struct {' unsigned pr$v_fpcr_fill_1 : 32;' unsigned pr$v_fpcr_fill_2 : 15;P unsigned pr$v_ieee_dnod : 1; /* Denormal operand exception disable */N unsigned pr$v_ieee_dnz : 1; /* Denormal operands to 0.0 */N unsigned pr$v_ieee_invd : 1; /* Invalid operation disable */N unsigned pr$v_ieee_dzed : 1; /* Division by zero disable */N  unsigned pr$v_ieee_ovfd : 1; /* Overflow disable */N unsigned pr$v_ieee_inv : 1; /* Invalid operation. */N unsigned pr$v_ieee_dze : 1; /* Division by zero occured. */N unsigned pr$v_ieee_ovf : 1; /* Overflow occured. */N unsigned pr$v_ieee_unf : 1; /* Underflow occured. */N unsigned pr$v_ieee_ine : 1; /* Inexact result occured. */N unsigned pr$v_ieee_iov : 1 ; /* Integer overflow occured */N unsigned pr$v_ieee_dyn_rnd : 2; /* Dynamic Rounding mode */N unsigned pr$v_ieee_undz : 1; /* Underflow to zero */N unsigned pr$v_ieee_unfd : 1; /* Underflow disable */N unsigned pr$v_ieee_ined : 1; /* Inexact disable */O unsigned pr$v_ieee_summary : 1; /* Bitwise OR of FPCR exception bits */ } pr$r_fpcr_bits; } PRDEF; #if !defined (__VAXC)/#define pr$v_sid_sn pr$r_prdef_bits.pr$v_sid_sn/#define pr$v_sid_pl pr$r_prdef_bits.pr$v_sid_pl1#define pr$v_sid_eco pr$r_prdef_bits.pr$v_sid_eco3#define pr$v_sid_type pr$r_prdef_bits.pr$v_sid_type6#define pr$v_xsid_type pr$r_prdef_xbits.pr$v_xsid_type,#define pr$v_asten pr$r_asten_def.pr$v_astenD#define pr$v_asten_ken pr$r_asten_def.pr$r_asten_bits.pr$v_asten_kenD#define pr$v_asten_een pr$r_asten_def.pr$r_asten_bits.pr$v_asten_eenD#define pr$v_asten_sen pr$r_asten_def.pr$r_asten _bits.pr$v_asten_senD#define pr$v_asten_uen pr$r_asten_def.pr$r_asten_bits.pr$v_asten_uen,#define pr$v_astsr pr$r_astsr_def.pr$v_astsrD#define pr$v_astsr_kpd pr$r_astsr_def.pr$r_astsr_bits.pr$v_astsr_kpdD#define pr$v_astsr_epd pr$r_astsr_def.pr$r_astsr_bits.pr$v_astsr_epdD#define pr$v_astsr_spd pr$r_astsr_def.pr$r_astsr_bits.pr$v_astsr_spdD#define pr$v_astsr_upd pr$r_astsr_def.pr$r_astsr_bits.pr$v_astsr_upd5#define pr$v_mces_mck pr$r_mces_overlay.pr$v_mces_mck5#define pr$v_mces_sce pr$r_mces_ overlay.pr$v_mces_sce5#define pr$v_mces_pce pr$r_mces_overlay.pr$v_mces_pce5#define pr$v_mces_dpc pr$r_mces_overlay.pr$v_mces_dpc5#define pr$v_mces_dsc pr$r_mces_overlay.pr$v_mces_dsc0#define pr$v_ps_sw pr$r_ps_swdef_bits.pr$v_ps_sw5#define pr$v_ps_prvmod pr$r_psdef_bits.pr$v_ps_prvmod9#define pr$v_ps_sysstate pr$r_psdef_bits.pr$v_ps_sysstate5#define pr$v_ps_curmod pr$r_psdef_bits.pr$v_ps_curmod/#define pr$v_ps_vmm pr$r_psdef_bits.pr$v_ps_vmm/#define pr$v_ps_ipl pr$r_psdef_bits.pr$v_p s_ipl9#define pr$v_ps_sp_align pr$r_psdef_bits.pr$v_ps_sp_align5#define pr$v_ps_mbz_62 pr$r_psdef_bits.pr$v_ps_mbz_625#define pr$v_ps_mbz_63 pr$r_psdef_bits.pr$v_ps_mbz_63<#define pr$v_sisr_summary pr$r_sisr_fields.pr$v_sisr_summaryC#define pr$v_sisr_ir1 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir1C#define pr$v_sisr_ir2 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir2C#define pr$v_sisr_ir3 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir3C#define pr$v_sisr_ir4 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir4C#define pr$v_sisr_ir5 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir5C#define pr$v_sisr_ir6 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir6C#define pr$v_sisr_ir7 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir7C#define pr$v_sisr_ir8 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir8C#define pr$v_sisr_ir9 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir9E#define pr$v_sisr_ir10 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir10E#define pr$v_sisr_ir11 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir1 1E#define pr$v_sisr_ir12 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir12E#define pr$v_sisr_ir13 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir13E#define pr$v_sisr_ir14 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir14E#define pr$v_sisr_ir15 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir15C#define pr$v_tbchk_va_present pr$r_tbchk_bits.pr$v_tbchk_va_present?#define pr$v_tbchk_no_tbchk pr$r_tbchk_bits.pr$v_tbchk_no_tbchk4#define pr$v_ieee_dnod pr$r_fpcr_bits.pr$v_ieee_dnod2#define pr$v_ieee_dnz pr $r_fpcr_bits.pr$v_ieee_dnz4#define pr$v_ieee_invd pr$r_fpcr_bits.pr$v_ieee_invd4#define pr$v_ieee_dzed pr$r_fpcr_bits.pr$v_ieee_dzed4#define pr$v_ieee_ovfd pr$r_fpcr_bits.pr$v_ieee_ovfd2#define pr$v_ieee_inv pr$r_fpcr_bits.pr$v_ieee_inv2#define pr$v_ieee_dze pr$r_fpcr_bits.pr$v_ieee_dze2#define pr$v_ieee_ovf pr$r_fpcr_bits.pr$v_ieee_ovf2#define pr$v_ieee_unf pr$r_fpcr_bits.pr$v_ieee_unf2#define pr$v_ieee_ine pr$r_fpcr_bits.pr$v_ieee_ine2#define pr$v_ieee_iov pr$r_fpcr_bits.pr$v_ieee_iov:#def ine pr$v_ieee_dyn_rnd pr$r_fpcr_bits.pr$v_ieee_dyn_rnd4#define pr$v_ieee_undz pr$r_fpcr_bits.pr$v_ieee_undz4#define pr$v_ieee_unfd pr$r_fpcr_bits.pr$v_ieee_unfd4#define pr$v_ieee_ined pr$r_fpcr_bits.pr$v_ieee_ined:#define pr$v_ieee_summary pr$r_fpcr_bits.pr$v_ieee_summary"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ union prdef {N unsigned int pr$q_quad_access [2]; /* Access to register as a quadword */N unsigned int pr$l_long_access [2]; /* Access to registe r as a quadword */ __struct {N unsigned pr$v_sid_sn : 12; /* SERIAL NUMBER FIELD */N unsigned pr$v_sid_pl : 3; /* PLANT ID */N unsigned pr$v_sid_eco : 9; /* ECO LEVEL */N unsigned pr$v_sid_type : 8; /* CPU TYPE CODE */ } pr$r_prdef_bits; __struct {N unsigned pr$v_fill_xsid_bits : 24; /* CPU-SPECIFIC XSID BITS */N unsigned pr$v_xsid_type : 8; /* CPU SUBTYPE CODE */ } pr$r_prdef_xbits;N/* SYSTEM ID REGISTER CPU TYPES */N/* Number assignments are */N/* based upon the jumpers */N/* read by the console from */N/* the MPS backplane */N/* ASTEN - AST Enabled Register */N/* */N/* NOTE WELL: These bit symbols are to be used only when interfacing to the */I/* ASTEN internal processor register. They are NOT to be used when */I/* interfacing to the copy of ASTEN which is stored in the Hardware */I/* Privileged Context Block (HWPCB). See the HWPCB-specific symbols */I/* for how to refer to the ASTEN field in the HWPCB.  */N/* */ __union {N unsigned pr$v_asten : 4; /* Enabled AST mask */ __struct {N unsigned pr$v_asten_ken : 1; /* Kernel AST Enabled */N unsigned pr$v_asten_een : 1; /* Executive AST Enabled */N unsigned pr$v_asten_sen : 1; /* Supervisor AST Enabled */N unsigned pr$v_asten_uen : 1; /* User  AST Enabled */' unsigned pr$v_fill_68_ : 4; } pr$r_asten_bits; } pr$r_asten_def;N/* ASTSR - AST Summary Register */N/* */N/* NOTE WELL: These bit symbols are to be used only when interfacing to the */I/* ASTSR internal processor register. They are NOT to be used when */I/* interfacing to the copy of ASTSR which is stored in t he Hardware */I/* Privileged Context Block (HWPCB). See the HWPCB-specific symbols */I/* for how to refer to the ASTSR field in the HWPCB. */N/* */ __union {N unsigned pr$v_astsr : 4; /* AST pending summary mask */ __struct {N unsigned pr$v_astsr_kpd : 1; /* Kernel AST Pending */N unsigned pr$v_astsr_epd : 1; /* Executive AS T Pending */N unsigned pr$v_astsr_spd : 1; /* Supervisor AST Pending */N unsigned pr$v_astsr_upd : 1; /* User AST Pending */' unsigned pr$v_fill_69_ : 4; } pr$r_astsr_bits; } pr$r_astsr_def;N/* FEN - Floating Point Enable */N/* */N/* NOTE WELL: These bit symbols are to be used only when interfacing to the */I/* FEN internal processor register. They are NOT to be used when */I/* interfacing to the copy of FEN which is stored in the Hardware */I/* Privileged Context Block (HWPCB). See the HWPCB-specific symbols */I/* for how to refer to the FEN field in the HWPCB. */N/* */N unsigned pr$v_fen_fen : 1; /* Floating point enabled = 1 */N/*------------------------------------------------------------------- */N/* DATFX - Data Alignment Trap Fixup */N/* */N unsigned pr$v_datfx_datfx : 1; /* Data Alignment Trap Fixup */N/*------------------------------------------------------------------- */N/* IPL - Interrupt Priority Level */N/*  */N unsigned pr$v_ipl_ipl : 5; /* Interrupt Priority Level */N/*------------------------------------------------------------------- */N/* MCES - Machine Check Error Summary Register */N/* */ __struct {N unsigned pr$v_mces_mck : 1; /* Machine Check (W1C) */N unsigned pr$v_mces_sce : 1; /* System Correctable Error (W1C) */O unsigned pr$v_mces_pce : 1; /* Processor Correctable Error (W1C) */X unsigned pr$v_mces_dpc : 1; /* Disable Processor Correctable Error report */U unsigned pr$v_mces_dsc : 1; /* Disable System Correctable Error report */# unsigned pr$v_fill_70_ : 3; } pr$r_mces_overlay;N/*------------------------------------------------------------------- */N/* PCBB - Privileged Context Block Base  */N/* */N/* PS - Processor Status */N/* */N/* The PS is not an IPR in the sense that it isn't read/written using */N/* the MxPR operators. However, the bitfields of the PS are defined */N/* here since this is the repository for bitfields of architected IPRs, */N/* hence it's conven ient to define them here. */N/* */N/* Although the 'software' field of the PS is not privileged state and */N/* may be used by users as they see fit in User mode, VMS imposes a */N/* privileged interpretation on the bits when used in any of the three */N/* inner processor modes (Kernel, Executive, Supervisor). There are */N/* consequences of this: ! */N/* */I/* 1) Should User mode code be using the software field bits, it */B/* must be assumed that the User mode setting of these */B/* bits are entirely ignored by inner mode software. */N/* */I/* 2) VMS reserves the right to redefine its privileged (inner */B/* mode) interpretation " of these bits at any time. */N/* */ __struct {N unsigned pr$v_ps_sw : 2; /* Software Bits */# unsigned pr$v_fill_71_ : 6; } pr$r_ps_swdef_bits; __struct {N unsigned pr$v_ps_prvmod : 2; /* Previous Processor Mode */N unsigned pr$v_ps_sysstate : 1; /* System State Indicator */N unsigned pr$v_ps_curmod : 2; # /* Current Processor Mode */' unsigned psdef$$_ps_fill_1 : 2;N unsigned pr$v_ps_vmm : 1; /* Virtual Machine Monitor */N unsigned pr$v_ps_ipl : 5; /* Interrupt Priority Level */( unsigned psdef$$_ps_fill_2 : 20;( unsigned psdef$$_ps_fill_3 : 23;N unsigned pr$v_ps_sp_align : 6; /* Stack Pointer Alignment */N unsigned pr$v_ps_mbz_62 : 1; /* Reserved bit above SP alignment */N unsigned$ pr$v_ps_mbz_63 : 1; /* Reserved bit above SP alignment */ } pr$r_psdef_bits;N/* */N/* Maximum bit number used in the PS register */N/* */N/* MODE SYMBOL DEFINITIONS */N/* */N/* PTBR - Page% Table Base Register */N/* */N unsigned pr$v_ptbr_pfn : 32; /* PFN of current L1PT */N/*------------------------------------------------------------------- */N/* SCBB - System Control Block Base */N/* */N unsigned pr$v_scbb_pfn : 32; &/* PFN of SCB */N/*------------------------------------------------------------------- */N/* SIRR - Software Interrupt Request Register */N/* */N unsigned pr$v_sirr_lvl : 4; /* Software Interrupt Request Level */N/*------------------------------------------------------------------- */N/* SISR - Software Interrupt Summary Register ' */N/* */ __union {N unsigned pr$v_sisr_summary : 16; /* Sofware Interrupt Summary */ __struct {N unsigned pr$v_sisr_raz : 1; /* Read As Zero */N unsigned pr$v_sisr_ir1 : 1; /* Softint 1 pending */N unsigned pr$v_sisr_ir2 : 1; /* Softint 2 pending */N unsigned pr$v_sisr_ir3 : 1; /* Softint 3 p(ending */N unsigned pr$v_sisr_ir4 : 1; /* Softint 4 pending */N unsigned pr$v_sisr_ir5 : 1; /* Softint 5 pending */N unsigned pr$v_sisr_ir6 : 1; /* Softint 6 pending */N unsigned pr$v_sisr_ir7 : 1; /* Softint 7 pending */N unsigned pr$v_sisr_ir8 : 1; /* Softint 8 pending */N unsigned pr$v_sisr_ir9 : 1; /* Softint 9 pending */N) unsigned pr$v_sisr_ir10 : 1; /* Softint 10 pending */N unsigned pr$v_sisr_ir11 : 1; /* Softint 11 pending */N unsigned pr$v_sisr_ir12 : 1; /* Softint 12 pending */N unsigned pr$v_sisr_ir13 : 1; /* Softint 13 pending */N unsigned pr$v_sisr_ir14 : 1; /* Softint 14 pending */N unsigned pr$v_sisr_ir15 : 1; /* Softint 15 pending */ } pr$r_sisr_bi*ts; } pr$r_sisr_fields;N/*------------------------------------------------------------------- */N/* TBCHK - Translation Buffer Check */N/* */N/* This IPR may always be referenced with MFPR without causing an error */N/* to occur (unlike VAX), but the feature provided by TBCHK may or may */P/* not be implemented. If not, then =1 and */N/* should be ignored. If TBCHK's function IS implemented, then */N/* =0 and returns the desired data. */N/* */ __struct {N unsigned pr$v_tbchk_va_present : 1; /* VA in TB = 1 */" unsigned pr$v_fill_1 : 31;" unsigned pr$v_fill_2 : 31;N unsigned pr$v_tbchk_no_tbchk : 1; /* Not implemented = 1 */ , } pr$r_tbchk_bits;N/*------------------------------------------------------------------- */N/* FPCR - Floating Point Control Register */N/* */N/* NOTE WELL: These bit symbols are to be used only when interfacing to the */M/* hardware FPCR internal processor register. They are NOT to be used when */L/* interfacing to the software floating point control register pointed to */J/* -by CTL$GQ_IEEE_FP_CONTROL/PKTA$Q_IEEE_FP_CONTROL. */N/* */K/* The hardware FPCR should only be manipulated via the system service, */I/* SYS$IEEE_FP_CONTROL, rather than directly. */N/* */ __struct {' unsigned pr$v_fpcr_fill_1 : 32;' unsigned pr$v_fpcr_fill_2 : 15;P unsigned p.r$v_ieee_dnod : 1; /* Denormal operand exception disable */N unsigned pr$v_ieee_dnz : 1; /* Denormal operands to 0.0 */N unsigned pr$v_ieee_invd : 1; /* Invalid operation disable */N unsigned pr$v_ieee_dzed : 1; /* Division by zero disable */N unsigned pr$v_ieee_ovfd : 1; /* Overflow disable */N unsigned pr$v_ieee_inv : 1; /* Invalid operation. */N unsigned pr$v_ieee_dze : 1; /*/ Division by zero occured. */N unsigned pr$v_ieee_ovf : 1; /* Overflow occured. */N unsigned pr$v_ieee_unf : 1; /* Underflow occured. */N unsigned pr$v_ieee_ine : 1; /* Inexact result occured. */N unsigned pr$v_ieee_iov : 1; /* Integer overflow occured */N unsigned pr$v_ieee_dyn_rnd : 2; /* Dynamic Rounding mode */N unsigned pr$v_ieee_undz : 1; /* Underflow to zero 0 */N unsigned pr$v_ieee_unfd : 1; /* Underflow disable */N unsigned pr$v_ieee_ined : 1; /* Inexact disable */O unsigned pr$v_ieee_summary : 1; /* Bitwise OR of FPCR exception bits */ } pr$r_fpcr_bits; } ; #if !defined(__VAXC)/#define pr$v_sid_sn pr$r_prdef_bits.pr$v_sid_sn/#define pr$v_sid_pl pr$r_prdef_bits.pr$v_sid_pl1#define pr$v_sid_eco pr$r_prdef_bits.pr$v_sid_eco3#define pr$v_sid_type pr$r_prdef_bit 1s.pr$v_sid_type6#define pr$v_xsid_type pr$r_prdef_xbits.pr$v_xsid_type,#define pr$v_asten pr$r_asten_def.pr$v_astenD#define pr$v_asten_ken pr$r_asten_def.pr$r_asten_bits.pr$v_asten_kenD#define pr$v_asten_een pr$r_asten_def.pr$r_asten_bits.pr$v_asten_eenD#define pr$v_asten_sen pr$r_asten_def.pr$r_asten_bits.pr$v_asten_senD#define pr$v_asten_uen pr$r_asten_def.pr$r_asten_bits.pr$v_asten_uen,#define pr$v_astsr pr$r_astsr_def.pr$v_astsrD#define pr$v_astsr_kpd pr$r_astsr_def.pr$r_astsr_bits.pr$v_a 2stsr_kpdD#define pr$v_astsr_epd pr$r_astsr_def.pr$r_astsr_bits.pr$v_astsr_epdD#define pr$v_astsr_spd pr$r_astsr_def.pr$r_astsr_bits.pr$v_astsr_spdD#define pr$v_astsr_upd pr$r_astsr_def.pr$r_astsr_bits.pr$v_astsr_upd5#define pr$v_mces_mck pr$r_mces_overlay.pr$v_mces_mck5#define pr$v_mces_sce pr$r_mces_overlay.pr$v_mces_sce5#define pr$v_mces_pce pr$r_mces_overlay.pr$v_mces_pce5#define pr$v_mces_dpc pr$r_mces_overlay.pr$v_mces_dpc5#define pr$v_mces_dsc pr$r_mces_overlay.pr$v_mces_dsc0#defin 3e pr$v_ps_sw pr$r_ps_swdef_bits.pr$v_ps_sw5#define pr$v_ps_prvmod pr$r_psdef_bits.pr$v_ps_prvmod9#define pr$v_ps_sysstate pr$r_psdef_bits.pr$v_ps_sysstate5#define pr$v_ps_curmod pr$r_psdef_bits.pr$v_ps_curmod/#define pr$v_ps_vmm pr$r_psdef_bits.pr$v_ps_vmm/#define pr$v_ps_ipl pr$r_psdef_bits.pr$v_ps_ipl9#define pr$v_ps_sp_align pr$r_psdef_bits.pr$v_ps_sp_align5#define pr$v_ps_mbz_62 pr$r_psdef_bits.pr$v_ps_mbz_625#define pr$v_ps_mbz_63 pr$r_psdef_bits.pr$v_ps_mbz_63<#define pr$v_sisr_4summary pr$r_sisr_fields.pr$v_sisr_summaryC#define pr$v_sisr_ir1 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir1C#define pr$v_sisr_ir2 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir2C#define pr$v_sisr_ir3 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir3C#define pr$v_sisr_ir4 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir4C#define pr$v_sisr_ir5 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir5C#define pr$v_sisr_ir6 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir6C#define pr$v_sisr_ir7 pr$r_sisr_fields.pr$5r_sisr_bits.pr$v_sisr_ir7C#define pr$v_sisr_ir8 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir8C#define pr$v_sisr_ir9 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir9E#define pr$v_sisr_ir10 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir10E#define pr$v_sisr_ir11 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir11E#define pr$v_sisr_ir12 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir12E#define pr$v_sisr_ir13 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir13E#define pr$v_sisr_ir14 pr$r_sisr_fields.pr$r_sisr_ 6bits.pr$v_sisr_ir14E#define pr$v_sisr_ir15 pr$r_sisr_fields.pr$r_sisr_bits.pr$v_sisr_ir15C#define pr$v_tbchk_va_present pr$r_tbchk_bits.pr$v_tbchk_va_present?#define pr$v_tbchk_no_tbchk pr$r_tbchk_bits.pr$v_tbchk_no_tbchk4#define pr$v_ieee_dnod pr$r_fpcr_bits.pr$v_ieee_dnod2#define pr$v_ieee_dnz pr$r_fpcr_bits.pr$v_ieee_dnz4#define pr$v_ieee_invd pr$r_fpcr_bits.pr$v_ieee_invd4#define pr$v_ieee_dzed pr$r_fpcr_bits.pr$v_ieee_dzed4#define pr$v_ieee_ovfd pr$r_fpcr_bits.pr$v_ieee_ovfd2#define 7pr$v_ieee_inv pr$r_fpcr_bits.pr$v_ieee_inv2#define pr$v_ieee_dze pr$r_fpcr_bits.pr$v_ieee_dze2#define pr$v_ieee_ovf pr$r_fpcr_bits.pr$v_ieee_ovf2#define pr$v_ieee_unf pr$r_fpcr_bits.pr$v_ieee_unf2#define pr$v_ieee_ine pr$r_fpcr_bits.pr$v_ieee_ine2#define pr$v_ieee_iov pr$r_fpcr_bits.pr$v_ieee_iov:#define pr$v_ieee_dyn_rnd pr$r_fpcr_bits.pr$v_ieee_dyn_rnd4#define pr$v_ieee_undz pr$r_fpcr_bits.pr$v_ieee_undz4#define pr$v_ieee_unfd pr$r_fpcr_bits.pr$v_ieee_unfd4#define pr$v_ieee_ined pr$r_fpcr_b8its.pr$v_ieee_ined:#define pr$v_ieee_summary pr$r_fpcr_bits.pr$v_ieee_summary"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PRDEF_LOADED */ /* CC header en 9ds here */#endif /* IAS_ASSEMBLER */ww ^9/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $PRODEF ***/#ifndef __ :PRODEF_LOADED#define __PRODEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* GSD entry - Procedure defin<ition, normal symbols */N/* */#define PRO$K_NAME 12#define PRO$C_NAME 12 #ifdef __NEW_STARLETtypedef struct _prodef { __union {N unsigned char pro$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {! char prodef$$_fill_1;" } pro$r_gsdtyp_fields; } pro$r_gsdtyp_overlay;N unsigned char pro$b_datyp; /*Maps over =GSY$B_DATYP */N unsigned short int pro$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char pro$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int pro$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned short int pro$w_mask; /*Entry point mask */N unsigned char pro$b_namlng; /*Length of name */N char pro$t_name [31]; /*Symbol name > */ } PRODEF; #if !defined(__VAXC)6#define pro$b_gsdtyp pro$r_gsdtyp_overlay.pro$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct prodef { __union {N unsigned char pro$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {! char prodef$$_fill_1;" } pro$r_gsdtyp_fields; } pro$r_gsdtyp_overlay;N unsigned char pro$b_datyp; /*Maps over GSY$B_DATYP */N ? unsigned short int pro$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char pro$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int pro$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned short int pro$w_mask; /*Entry point mask */N unsigned char pro$b_namlng; /*Length of name */N char pro$t_name [31]; /*Symbol name */ } ; #if @!defined(__VAXC)6#define pro$b_gsdtyp pro$r_gsdtyp_overlay.pro$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PRODEF_LOADED */ ww+9 A/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $PROMDEF ***/#ifndef __PROMDEF_LOADED#define __PROMDEF_LOADED 1 G#pragma __nostan Bdard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 ...C#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 N/* */N/* GSD entry - Procedure definition, version mask symbols */N/* D */#define PROM$K_NAME 16#define PROM$C_NAME 16 #ifdef __NEW_STARLETtypedef struct _promdef { __union {N unsigned char prom$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char promdef$$_fill_1;# } prom$r_gsdtyp_fields; } prom$r_gsdtyp_overlay;N unsigned char prom$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int prom$w_flEags; /*Maps over GSY$W_FLAGS */N unsigned char prom$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int prom$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned int prom$l_version_mask; /*Mask value for symbol */N unsigned short int prom$w_mask; /*Entry point mask */N unsigned char prom$b_namlng; /*Length of name */N char prom$t_name [31]; /*SymbolF name */ } PROMDEF; #if !defined(__VAXC)9#define prom$b_gsdtyp prom$r_gsdtyp_overlay.prom$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct promdef { __union {N unsigned char prom$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char promdef$$_fill_1;# } prom$r_gsdtyp_fields; } prom$r_gsdtyp_overlay;N unsigned char prom$b_datyp; /*Maps over GSY$GB_DATYP */N unsigned short int prom$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char prom$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int prom$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned int prom$l_version_mask; /*Mask value for symbol */N unsigned short int prom$w_mask; /*Entry point mask */N unsigned char prom$b_namlng; /*Length of name H */N char prom$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define prom$b_gsdtyp prom$r_gsdtyp_overlay.prom$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef _ I_cplusplus }#endif#pragma __standard #endif /* __PROMDEF_LOADED */ wwK9/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//************************************************************************************************************************* J*******//*** MODULE $PROVDEF ***/#ifndef __PROVDEF_LOADED#define __PROVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 */K#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 N/* L */N/* GSD entry - Procedure definition, vectored symbols */N/* */#define PROV$K_NAME 16#define PROV$C_NAME 16 #ifdef __NEW_STARLETtypedef struct _provdef { __union {N unsigned char prov$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char provdef$$_fill_1;# } prov$r_gsdtyp_fields; } prov$r_gsdtyp_overlay;NM unsigned char prov$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int prov$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char prov$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int prov$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned int prov$l_vector; /*Vectored entry point address */N unsigned short int prov$w_mask; /*Entry point mask */N unsigned chaNr prov$b_namlng; /*Length of name */N char prov$t_name [31]; /*Symbol name */ } PROVDEF; #if !defined(__VAXC)9#define prov$b_gsdtyp prov$r_gsdtyp_overlay.prov$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct provdef { __union {N unsigned char prov$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char provdef$$_fill_1;# } prOov$r_gsdtyp_fields; } prov$r_gsdtyp_overlay;N unsigned char prov$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int prov$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char prov$b_psindx; /*Maps over SDF$B_PSINDX */X unsigned int prov$l_addrs; /*Entry point address, maps over SDF$L_VALUE */N unsigned int prov$l_vector; /*Vectored entry point address */N unsigned short int prov$w_mask; P/*Entry point mask */N unsigned char prov$b_namlng; /*Length of name */N char prov$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define prov$b_gsdtyp prov$r_gsdtyp_overlay.prov$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#praQgma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PROVDEF_LOADED */ wwkH:/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********* R***********************************************************************************************************************//*** MODULE $PROWDEF ***/#ifndef __PROWDEF_LOADED#define __PROWDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined reSquired 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#dTefine __union variant_union#endif#endif N/* */N/* GSD entry - Procedure definition with word of psect value */N/* */#define PROW$K_NAME 13#define PROW$C_NAME 13 #ifdef __NEW_STARLETtypedef struct _prowdef { __union {N unsigned char prow$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct U{" char prowdef$$_fill_1;# } prow$r_gsdtyp_fields; } prow$r_gsdtyp_overlay;N unsigned char prow$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int prow$w_flags; /*Maps over GSY$W_FLAGS */N unsigned short int prow$w_psindx; /*Maps over SDFW$W_PSINDX */Y unsigned int prow$l_addrs; /*Entry point address, maps over SDFW$L_VALUE */N unsigned short int prow$w_mask; /*Entry point mask V */N unsigned char prow$b_namlng; /*Length of name */N char prow$t_name [31]; /*Symbol name */ } PROWDEF; #if !defined(__VAXC)9#define prow$b_gsdtyp prow$r_gsdtyp_overlay.prow$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct prowdef { __union {N unsigned char prow$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char p Wrowdef$$_fill_1;# } prow$r_gsdtyp_fields; } prow$r_gsdtyp_overlay;N unsigned char prow$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int prow$w_flags; /*Maps over GSY$W_FLAGS */N unsigned short int prow$w_psindx; /*Maps over SDFW$W_PSINDX */Y unsigned int prow$l_addrs; /*Entry point address, maps over SDFW$L_VALUE */N unsigned short int prow$w_mask; /*Entry point mask */N Xunsigned char prow$b_namlng; /*Length of name */N char prow$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define prow$b_gsdtyp prow$r_gsdtyp_overlay.prow$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* RYestore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PROWDEF_LOADED */ ww:/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// ------------------------------- Z----------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * * */P/* * Confidential computer software. Valid l[icense from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. \ * */P/* * * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanyin]g * */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty. * */P/* * * */P/* ************************************************************************* *//* ******************************************************************************************************************************** */@/* Created: 5-Apr-2012 13:00: ^56 by OpenVMS SDL EV3-3 */M/* Source: 11-FEB-2004 15:12:25 $1$DGA7304:[STARLET_H.SRC]PRTDEF.SDL;1 *//* ******************************************************************************************************************************** */  /* .MACRO $PRTDEF,$GBL */ /* $DEFINI PRT,$GBL *//* + */$/* Protection field definitions *//* - */2#define PRT$C_NA 0 /* No Access */9#define PRT$C_KR 3 /* Kernel Read only */5#define PRT$C_KW 2 _ /* Kernel Write */7#define PRT$C_ER 7 /* Exec Read only */3#define PRT$C_EW 5 /* Exec Write */8#define PRT$C_SR 11 /* Super Read only */4#define PRT$C_SW 8 /* Super Write */7#define PRT$C_UR 15 /* User Read only */3#define PRT$C_UW 4 /* User Write */A#define PRT$C_ERKW 6 /* Exec Read Kernel Write */B#define PRT$C_SRKW 10 /* Super Read Kernel Write */@#def `ine PRT$C_SREW 9 /* Super Read Exec Write */A#define PRT$C_URKW 14 /* User Read Kernel Write */?#define PRT$C_UREW 13 /* User Read Exec Write */@#define PRT$C_URSW 12 /* User Read Super Write */7#define PRT$C_RESERVED 1 /* Reserved *//* */9/* These protections are not VAX / Alpha compatible: *//* */:#define PRT$C_KRO 16 /* Kernel Read Only */8#define PRT$C_ERO 17 /* Exec Re aad Only */9#define PRT$C_SRO 18 /* Super Read Only */8#define PRT$C_URO 19 /* User Read Only */?#define PRT$C_KWX 20 /* Kernel Write+Execute */=#define PRT$C_EWX 21 /* Exec Write+Execute */>#define PRT$C_SWX 22 /* Super Write+Execute */=#define PRT$C_UWX 23 /* User Write+Execute */F#define PRT$C_KPX 24 /* Kernel promote, execute only */D#define PRT$C_EPX 25 /* Exec prbomote, execute only */E#define PRT$C_SPX 26 /* Super promote, execute only */:#define PRT$C_UX 27 /* User execute only */ /* $DEFEND PRT,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* S cource: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $PRTDEF ***/#ifndef __PRTDEF_LOADED#define __PRTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas suppdorted */\#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#eendif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* Protection field definitions */N/*- */N#define PRT$C_NA 0 /* No Access */N#define PRT$C_KR 3 /* Kernel Refad only */N#define PRT$C_KW 2 /* Kernel Write */N#define PRT$C_ER 7 /* Exec Read only */N#define PRT$C_EW 5 /* Exec Write */N#define PRT$C_SR 11 /* Super Read only */N#define PRT$C_SW 8 /* Super Write */N#define PRT$C_UR 15 /* User Read only */gN#define PRT$C_UW 4 /* User Write */N#define PRT$C_ERKW 6 /* Exec Read Kernel Write */N#define PRT$C_SRKW 10 /* Super Read Kernel Write */N#define PRT$C_SREW 9 /* Super Read Exec Write */N#define PRT$C_URKW 14 /* User Read Kernel Write */N#define PRT$C_UREW 13 /* User Read Exec Write */N#define PRT$C_URSW 12 h /* User Read Super Write */N#define PRT$C_RESERVED 1 /* Reserved */N/* */N/* These protections are not VAX / Alpha compatible: */N/* */N#define PRT$C_KRO 16 /* Kernel Read Only */N#define PRT$C_ERO 17 /* Exec Reiad Only */N#define PRT$C_SRO 18 /* Super Read Only */N#define PRT$C_URO 19 /* User Read Only */N#define PRT$C_KWX 20 /* Kernel Write+Execute */N#define PRT$C_EWX 21 /* Exec Write+Execute */N#define PRT$C_SWX 22 /* Super Write+Execute */N#define PRT$C_UWX 23 /* User Write+Execute j*/N#define PRT$C_KPX 24 /* Kernel promote, execute only */N#define PRT$C_EPX 25 /* Exec promote, execute only */N#define PRT$C_SPX 26 /* Super promote, execute only */N#define PRT$C_UX 27 /* User execute only */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore tkhe previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PRTDEF_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */ww:/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 */ l/********************************************************************************************************************************//*** MODULE $PRVDEF ***/#ifndef __PRVDEF_LOADED#define __PRVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-demfined 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#enlse#define __union variant_union#endif#endif N/* */N/* PRIVILEGE BIT DEFINITIONS */N/* */#define PRV$M_CMKRNL 0x1#define PRV$M_CMEXEC 0x2#define PRV$M_SYSNAM 0x4#define PRV$M_GRPNAM 0x8#define PRV$M_ALLSPOOL 0x10#define PRV$M_IMPERSONATE 0x20#define PRV$M_DIAGNOSE 0x40#define PRV$oM_LOG_IO 0x80#define PRV$M_GROUP 0x100#define PRV$M_NOACNT 0x200#define PRV$M_PRMCEB 0x400#define PRV$M_PRMMBX 0x800#define PRV$M_PSWAPM 0x1000#define PRV$M_SETPRI 0x2000#define PRV$M_SETPRV 0x4000#define PRV$M_TMPMBX 0x8000#define PRV$M_WORLD 0x10000#define PRV$M_MOUNT 0x20000#define PRV$M_OPER 0x40000#define PRV$M_EXQUOTA 0x80000#define PRV$M_NETMBX 0x100000#define PRV$M_VOLPRO 0x200000#define PRV$M_PHY_IO 0x400000#define PRV$M_BUGCHK 0x800000#define PRpV$M_PRMGBL 0x1000000#define PRV$M_SYSGBL 0x2000000#define PRV$M_PFNMAP 0x4000000#define PRV$M_SHMEM 0x8000000#define PRV$M_SYSPRV 0x10000000#define PRV$M_BYPASS 0x20000000#define PRV$M_SYSLCK 0x40000000#define PRV$M_SHARE 0x80000000!#define PRV$M_UPGRADE 0x100000000##define PRV$M_DOWNGRADE 0x200000000 #define PRV$M_GRPPRV 0x400000000!#define PRV$M_READALL 0x800000000!#define PRV$M_IMPORT 0x1000000000 #define PRV$M_AUDIT 0x2000000000##define PRV$M_SECURITY 0x4000000000N#d qefine PRV$K_NUMBER_OF_PRIVS 39 /* Total number of privilege bits. */#define PRV$M_ACNT 0x200#define PRV$M_ALTPRI 0x2000#define PRV$M_DETACH 0x20 #ifdef __NEW_STARLETtypedef union _prvdef { __struct {N unsigned prv$v_cmkrnl : 1; /* MAY CHANGE MODE TO KERNEL */N unsigned prv$v_cmexec : 1; /* MAY CHANGE MODE TO EXEC */V unsigned prv$v_sysnam : 1; /* MAY INSERT IN SYSTEM LOGICAL NAME TABLE */U unsigned prv$v_grprnam : 1; /* MAY INSERT IN GROUP LOGICAL NAME TABLE */N unsigned prv$v_allspool : 1; /* MAY ALLOCATE SPOOLED DEVICE */T unsigned prv$v_impersonate : 1; /* Replacement name for DETACH (synonyms) */N unsigned prv$v_diagnose : 1; /* MAY DIAGNOSE DEVICES */N unsigned prv$v_log_io : 1; /* MAY DO LOGICAL I/O */W unsigned prv$v_group : 1; /* MAY AFFECT OTHER PROCESSES IN SAME GROUP */N unsigned prv$v_noacnst : 1; /* MAY SUPPRESS ACCOUNTING MESSAGE */Y unsigned prv$v_prmceb : 1; /* MAY CREATE PERMANENT COMMON EVENT CLUSTERS */N unsigned prv$v_prmmbx : 1; /* MAY CREATE PERMANENT MAILBOX */N unsigned prv$v_pswapm : 1; /* MAY CHANGE PROCESS SWAP MODE */N unsigned prv$v_setpri : 1; /* MAY SET ANY PRIORITY VALUE */N unsigned prv$v_setprv : 1; /* MAY SET ANY PRIVILEGE BIT */N unsigned prv$v_tmpmbx : 1; /*t MAY CREATE TEMPORARY MAILBOX */V unsigned prv$v_world : 1; /* MAY AFFECT OTHER PROCESSES IN THE WORLD */N unsigned prv$v_mount : 1; /* MAY EXECUTE MOUNT ACP FUNCTIONS */N unsigned prv$v_oper : 1; /* OPERATOR PRIVILEGE */N unsigned prv$v_exquota : 1; /* MAY EXCEED QUOTAS */N unsigned prv$v_netmbx : 1; /* MAY CREATE NETWORK DEVICE */N unsigned prv$v_volpro : 1; /* MAY OVERRIDE VOLUuME PROTECTION */N unsigned prv$v_phy_io : 1; /* MAY DO PHYSICAL I/O */S unsigned prv$v_bugchk : 1; /* MAY MAKE BUG CHECK ERROR LOG ENTRIES */S unsigned prv$v_prmgbl : 1; /* MAY CREATE PERMANENT GLOBAL SECTIONS */U unsigned prv$v_sysgbl : 1; /* MAY CREATE SYSTEM WIDE GLOBAL SECTIONS */N unsigned prv$v_pfnmap : 1; /* MAY MAP TO SECTION BY PFN */W unsigned prv$v_shmem : 1; /* MAY ALLOCATE STRUCTURESv IN SHARED MEMORY */S unsigned prv$v_sysprv : 1; /* ELIGIBLE FOR SYSTEM PROTECTION FIELD */N unsigned prv$v_bypass : 1; /* MAY BYPASS UIC BASED PROTECTION */N unsigned prv$v_syslck : 1; /* MAY CREATE SYSTEM WIDE LOCKS */U unsigned prv$v_share : 1; /* MAY ASSIGN CHANNEL TO NON-SHARED DEVICE */N unsigned prv$v_upgrade : 1; /* May upgrade object integrity */N unsigned prv$v_downgrade : 1; /* May downgrade object secrwecy */b unsigned prv$v_grpprv : 1; /* May access group objects via system protection field */N unsigned prv$v_readall : 1; /* May read any object */Y unsigned prv$v_import : 1; /* May set classification for unlabeled object */[ unsigned prv$v_audit : 1; /* May direct audit to system security audit log */N unsigned prv$v_security : 1; /* May perform security functions */4/* XXXXXX bitfield mask; /* Reserved for SEVM xS */# unsigned prv$v_fill_1 : 25; } prv$r_prvdef_bits0; __struct {" unsigned prv$v_fill_2 : 9;X unsigned prv$v_acnt : 1; /* MAY SUPPRESS ACCOUNTING MESSAGES (NOACNT) */" unsigned prv$v_fill_3 : 3;Q unsigned prv$v_altpri : 1; /* MAY SET ANY PRIORITY VALE (SETPRI) */$ unsigned prv$v_fill_72_ : 2; } prv$r_prvdef_bits1; __struct {N unsigned int prv$l_l1_bits; /* Bits in first longword */ yN unsigned int prv$l_l2_bits; /* Bits in second longword */ } prv$r_prvdef_bits2; __struct {P unsigned prv$v_fill_4 : 5; /* Offset to obsolete DETACH bitfield */N unsigned prv$v_detach : 1; /* MAY CREATE DETACHED PROCESSES */$ unsigned prv$v_fill_73_ : 2; } prv$r_prvdef_bits3; } PRVDEF; #if !defined(__VAXC)4#define prv$v_cmkrnl prv$r_prvdef_bits0.prv$v_cmkrnl4#define prv$v_cmexec prv$r_prvdef_bits0.prv$v_ zcmexec4#define prv$v_sysnam prv$r_prvdef_bits0.prv$v_sysnam4#define prv$v_grpnam prv$r_prvdef_bits0.prv$v_grpnam8#define prv$v_allspool prv$r_prvdef_bits0.prv$v_allspool>#define prv$v_impersonate prv$r_prvdef_bits0.prv$v_impersonate8#define prv$v_diagnose prv$r_prvdef_bits0.prv$v_diagnose4#define prv$v_log_io prv$r_prvdef_bits0.prv$v_log_io2#define prv$v_group prv$r_prvdef_bits0.prv$v_group4#define prv$v_noacnt prv$r_prvdef_bits0.prv$v_noacnt4#define prv$v_prmceb prv$r_prvdef_bits0.prv$v_prmc {eb4#define prv$v_prmmbx prv$r_prvdef_bits0.prv$v_prmmbx4#define prv$v_pswapm prv$r_prvdef_bits0.prv$v_pswapm4#define prv$v_setpri prv$r_prvdef_bits0.prv$v_setpri4#define prv$v_setprv prv$r_prvdef_bits0.prv$v_setprv4#define prv$v_tmpmbx prv$r_prvdef_bits0.prv$v_tmpmbx2#define prv$v_world prv$r_prvdef_bits0.prv$v_world2#define prv$v_mount prv$r_prvdef_bits0.prv$v_mount0#define prv$v_oper prv$r_prvdef_bits0.prv$v_oper6#define prv$v_exquota prv$r_prvdef_bits0.prv$v_exquota4#define prv$v_netmbx p |rv$r_prvdef_bits0.prv$v_netmbx4#define prv$v_volpro prv$r_prvdef_bits0.prv$v_volpro4#define prv$v_phy_io prv$r_prvdef_bits0.prv$v_phy_io4#define prv$v_bugchk prv$r_prvdef_bits0.prv$v_bugchk4#define prv$v_prmgbl prv$r_prvdef_bits0.prv$v_prmgbl4#define prv$v_sysgbl prv$r_prvdef_bits0.prv$v_sysgbl4#define prv$v_pfnmap prv$r_prvdef_bits0.prv$v_pfnmap2#define prv$v_shmem prv$r_prvdef_bits0.prv$v_shmem4#define prv$v_sysprv prv$r_prvdef_bits0.prv$v_sysprv4#define prv$v_bypass prv$r_prvdef_bits0.prv$ }v_bypass4#define prv$v_syslck prv$r_prvdef_bits0.prv$v_syslck2#define prv$v_share prv$r_prvdef_bits0.prv$v_share6#define prv$v_upgrade prv$r_prvdef_bits0.prv$v_upgrade:#define prv$v_downgrade prv$r_prvdef_bits0.prv$v_downgrade4#define prv$v_grpprv prv$r_prvdef_bits0.prv$v_grpprv6#define prv$v_readall prv$r_prvdef_bits0.prv$v_readall4#define prv$v_import prv$r_prvdef_bits0.prv$v_import2#define prv$v_audit prv$r_prvdef_bits0.prv$v_audit8#define prv$v_security prv$r_prvdef_bits0.prv$v_security0 ~#define prv$v_acnt prv$r_prvdef_bits1.prv$v_acnt4#define prv$v_altpri prv$r_prvdef_bits1.prv$v_altpri6#define prv$l_l1_bits prv$r_prvdef_bits2.prv$l_l1_bits6#define prv$l_l2_bits prv$r_prvdef_bits2.prv$l_l2_bits4#define prv$v_detach prv$r_prvdef_bits3.prv$v_detach"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union prvdef { __struct {N unsigned prv$v_cmkrnl : 1; /* MAY CHANGE MODE TO KERNEL */N unsigned prv$v_cmexec : 1; /* MAY CHANGE MODE TO EXEC */V unsigned prv$v_sysnam : 1; /* MAY INSERT IN SYSTEM LOGICAL NAME TABLE */U unsigned prv$v_grpnam : 1; /* MAY INSERT IN GROUP LOGICAL NAME TABLE */N unsigned prv$v_allspool : 1; /* MAY ALLOCATE SPOOLED DEVICE */T unsigned prv$v_impersonate : 1; /* Replacement name for DETACH (synonyms) */N unsigned prv$v_diagnose : 1; /* MAY DIAGNOSE DEVICES */N unsigned prv$v_log_io : 1; /* MAY DO LOGICAL I/O */W unsigned prv$v_group : 1; /* MAY AFFECT OTHER PROCESSES IN SAME GROUP */N unsigned prv$v_noacnt : 1; /* MAY SUPPRESS ACCOUNTING MESSAGE */Y unsigned prv$v_prmceb : 1; /* MAY CREATE PERMANENT COMMON EVENT CLUSTERS */N unsigned prv$v_prmmbx : 1; /* MAY CREATE PERMANENT MAILBOX */N unsigned prv$v_pswapm : 1; /* MAY CHANGE PROCESS SWAP MODE */N unsigned prv$v_setpri : 1; /* MAY SET ANY PRIORITY VALUE */N unsigned prv$v_setprv : 1; /* MAY SET ANY PRIVILEGE BIT */N unsigned prv$v_tmpmbx : 1; /* MAY CREATE TEMPORARY MAILBOX */V unsigned prv$v_world : 1; /* MAY AFFECT OTHER PROCESSES IN THE WORLD */N unsigned prv$v_mount : 1; /* MAY EXECUTE MOUNT ACP FUNCTIONS */N unsigned prv$v_oper : 1; /* OPERATOR PRIVILEGE */N unsigned prv$v_exquota : 1; /* MAY EXCEED QUOTAS */N unsigned prv$v_netmbx : 1; /* MAY CREATE NETWORK DEVICE */N unsigned prv$v_volpro : 1; /* MAY OVERRIDE VOLUME PROTECTION */N unsigned prv$v_phy_io : 1; /* MAY DO PHYSICAL I/O */S unsigned prv$v_bugchk : 1; /* MAY MAKE BUG CHECK ERROR LOG ENTRIES */S unsigned prv$v_prmgbl : 1; /* MAY CREATE PERMANENT GLOBAL SECTIONS */U unsigned prv$v_sysgbl : 1; /* MAY CREATE SYSTEM WIDE GLOBAL SECTIONS */N  unsigned prv$v_pfnmap : 1; /* MAY MAP TO SECTION BY PFN */W unsigned prv$v_shmem : 1; /* MAY ALLOCATE STRUCTURES IN SHARED MEMORY */S unsigned prv$v_sysprv : 1; /* ELIGIBLE FOR SYSTEM PROTECTION FIELD */N unsigned prv$v_bypass : 1; /* MAY BYPASS UIC BASED PROTECTION */N unsigned prv$v_syslck : 1; /* MAY CREATE SYSTEM WIDE LOCKS */U unsigned prv$v_share : 1; /* MAY ASSIGN CHANNEL TO NON-SHARED DEVICE */N  unsigned prv$v_upgrade : 1; /* May upgrade object integrity */N unsigned prv$v_downgrade : 1; /* May downgrade object secrecy */b unsigned prv$v_grpprv : 1; /* May access group objects via system protection field */N unsigned prv$v_readall : 1; /* May read any object */Y unsigned prv$v_import : 1; /* May set classification for unlabeled object */[ unsigned prv$v_audit : 1; /* May direct audit to system security  audit log */N unsigned prv$v_security : 1; /* May perform security functions */4/* XXXXXX bitfield mask; /* Reserved for SEVMS */# unsigned prv$v_fill_1 : 25; } prv$r_prvdef_bits0; __struct {" unsigned prv$v_fill_2 : 9;X unsigned prv$v_acnt : 1; /* MAY SUPPRESS ACCOUNTING MESSAGES (NOACNT) */" unsigned prv$v_fill_3 : 3;Q unsigned prv$v_altpri : 1; /* MAY SET ANY PRIORITY VALE (SETPRI) */$ unsigned prv$v _fill_72_ : 2; } prv$r_prvdef_bits1; __struct {N unsigned int prv$l_l1_bits; /* Bits in first longword */N unsigned int prv$l_l2_bits; /* Bits in second longword */ } prv$r_prvdef_bits2; __struct {P unsigned prv$v_fill_4 : 5; /* Offset to obsolete DETACH bitfield */N unsigned prv$v_detach : 1; /* MAY CREATE DETACHED PROCESSES */$ unsigned prv$v_fill_73_ : 2; } prv$r_prvdef_bits3;  } ; #if !defined(__VAXC)4#define prv$v_cmkrnl prv$r_prvdef_bits0.prv$v_cmkrnl4#define prv$v_cmexec prv$r_prvdef_bits0.prv$v_cmexec4#define prv$v_sysnam prv$r_prvdef_bits0.prv$v_sysnam4#define prv$v_grpnam prv$r_prvdef_bits0.prv$v_grpnam8#define prv$v_allspool prv$r_prvdef_bits0.prv$v_allspool>#define prv$v_impersonate prv$r_prvdef_bits0.prv$v_impersonate8#define prv$v_diagnose prv$r_prvdef_bits0.prv$v_diagnose4#define prv$v_log_io prv$r_prvdef_bits0.prv$v_log_io2#define prv$v_grou p prv$r_prvdef_bits0.prv$v_group4#define prv$v_noacnt prv$r_prvdef_bits0.prv$v_noacnt4#define prv$v_prmceb prv$r_prvdef_bits0.prv$v_prmceb4#define prv$v_prmmbx prv$r_prvdef_bits0.prv$v_prmmbx4#define prv$v_pswapm prv$r_prvdef_bits0.prv$v_pswapm4#define prv$v_setpri prv$r_prvdef_bits0.prv$v_setpri4#define prv$v_setprv prv$r_prvdef_bits0.prv$v_setprv4#define prv$v_tmpmbx prv$r_prvdef_bits0.prv$v_tmpmbx2#define prv$v_world prv$r_prvdef_bits0.prv$v_world2#define prv$v_mount prv$r_prvdef_bits0.prv $v_mount0#define prv$v_oper prv$r_prvdef_bits0.prv$v_oper6#define prv$v_exquota prv$r_prvdef_bits0.prv$v_exquota4#define prv$v_netmbx prv$r_prvdef_bits0.prv$v_netmbx4#define prv$v_volpro prv$r_prvdef_bits0.prv$v_volpro4#define prv$v_phy_io prv$r_prvdef_bits0.prv$v_phy_io4#define prv$v_bugchk prv$r_prvdef_bits0.prv$v_bugchk4#define prv$v_prmgbl prv$r_prvdef_bits0.prv$v_prmgbl4#define prv$v_sysgbl prv$r_prvdef_bits0.prv$v_sysgbl4#define prv$v_pfnmap prv$r_prvdef_bits0.prv$v_pfnmap2#define prv$ v_shmem prv$r_prvdef_bits0.prv$v_shmem4#define prv$v_sysprv prv$r_prvdef_bits0.prv$v_sysprv4#define prv$v_bypass prv$r_prvdef_bits0.prv$v_bypass4#define prv$v_syslck prv$r_prvdef_bits0.prv$v_syslck2#define prv$v_share prv$r_prvdef_bits0.prv$v_share6#define prv$v_upgrade prv$r_prvdef_bits0.prv$v_upgrade:#define prv$v_downgrade prv$r_prvdef_bits0.prv$v_downgrade4#define prv$v_grpprv prv$r_prvdef_bits0.prv$v_grpprv6#define prv$v_readall prv$r_prvdef_bits0.prv$v_readall4#define prv$v_import prv$r _prvdef_bits0.prv$v_import2#define prv$v_audit prv$r_prvdef_bits0.prv$v_audit8#define prv$v_security prv$r_prvdef_bits0.prv$v_security0#define prv$v_acnt prv$r_prvdef_bits1.prv$v_acnt4#define prv$v_altpri prv$r_prvdef_bits1.prv$v_altpri6#define prv$l_l1_bits prv$r_prvdef_bits2.prv$l_l1_bits6#define prv$l_l2_bits prv$r_prvdef_bits2.prv$l_l2_bits4#define prv$v_detach prv$r_prvdef_bits3.prv$v_detach"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define PRV$M_SORTED 0x1#define PRV$M_BRIEF 0x2#define PRV$M_FILLED 0x4 #ifdef __NEW_STARLETtypedef struct _prvdsp_bits {N unsigned prv$v_sorted : 1; /* sort privilege list */N unsigned prv$v_brief : 1; /* display only privilege names */N unsigned prv$v_filled : 1; /* display names in columns */ unsigned prv$v_fill_74_ : 5; } PRVDSP_BITS;#else /* __OLD_STARLET */struct prvdsp_bits {N unsigned prv$v_sorted : 1; /* sort privilege list */N unsigned prv$v_brief : 1; /* display only privilege names */N unsigned prv$v_filled : 1; /* display names in columns */ unsigned prv$v_fill_74_ : 5; } ;%#endif /* #ifdef __NEW_STARLET */V#define PRV$K_PRVMASK_WORKING 0 /* Working (Temporary) privs to be modified */N#define PRV$K_PRVMASK_PERMANENT 1 /* Permanent privs to be modified */N#define PRV$K_PRVMASK_IMAGE 2 /* Image privs to be modified */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PRVDEF_LOADED */ wwY;/******************************************************************************************************************************* */=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************/"/*** MODULE $PRXDEF IDENT X-9 ***/#ifndef __PRXDEF_LOADED#define __PRXDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #define PRX$K_ADD 1#define PRX$K_DELETE 2#define PRX$K_SHOW 3#define PRX$K_VERIFY 4#define PRX$K_PERFORMANCE 5 #define PRX$K_ZERO_PERFORMANCE 6#define PRX$K_CREATE 7#define PRX$K_STOP 8#define PRX$K_START 9#define PRX$K_MAX_PROXY_CODE 10  ##define PRX$K_PERFORMANCE_LENGTH 48 #ifdef __NEW_STARLET!typedef struct _prx$performance {& unsigned int prx$l_total_messages;( unsigned int prx$l_total_exceptions; unsigned int prx$l_shows; unsigned int prx$l_adds; unsigned int prx$l_deletes; unsigned int prx$l_verifys;# unsigned int prx$l_performance; unsigned int prx$l_creates; unsigned int prx$l_stops; unsigned int prx$l_starts; unsigned int prx$l_audits;( unsigned int prx$l_invalid_messages; } PRX$PERFORMANCE;#else /* __OLD_STARLET */struct prx$performance {& unsigned int prx$l_total_messages;( unsigned int prx$l_total_exceptions; unsigned int prx$l_shows; unsigned int prx$l_adds; unsigned int prx$l_deletes; unsigned int prx$l_verifys;# unsigned int prx$l_performance; unsigned int prx$l_creates; unsigned int prx$l_stops; unsigned int prx$l_starts; unsigned int prx$l_audits;( unsigned int prx$l_invalid_messages; } ;%#endif /* #ifdef __NEW_STARLET */#define PRX$M_IGNORE_RETURN 0x1#define PRX$M_BYPASS_EXPAND 0x2#define PRX$M_RESERVE_1 0xFC#define PRX$M_DEFAULT 0x100#define PRX$M_EXACT 0x200"#define PRX$M_DELETE_ALLOWED 0x400#define PRX$M_FILL_1 0xFFFFF800#define PRX$K_HEADER_LENGTH 8 #ifdef __NEW_STARLETtypedef struct _prx$header { unsigned int prx$l_context; __union {! unsigned int prx$l_flags; __struct {- unsigned prx$v_ignore_return : 1;- unsigned prx$v_bypass_expand : 1;) unsigned prx$v_reserve_1 : 6;' unsigned prx$v_default : 1;% unsigned prx$v_exact : 1;. unsigned prx$v_delete_allowed : 1;' unsigned prx$v_fill_1 : 21; } prx$r_fill_78_; } prx$r_fill_77_; } PRX$HEADER; #if !defined(__VAXC).#define prx$l_flags prx$r_fill_77_.prx$l_flagsM#define prx$v_ignore_return prx$r_fill_77_.prx$r_fill_78_.prx$v_ignore_returnM#d efine prx$v_bypass_expand prx$r_fill_77_.prx$r_fill_78_.prx$v_bypass_expandA#define prx$v_default prx$r_fill_77_.prx$r_fill_78_.prx$v_default=#define prx$v_exact prx$r_fill_77_.prx$r_fill_78_.prx$v_exactO#define prx$v_delete_allowed prx$r_fill_77_.prx$r_fill_78_.prx$v_delete_allowed?#define prx$v_fill_1 prx$r_fill_77_.prx$r_fill_78_.prx$v_fill_1"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct prx$header { unsigned int prx$l_context; __union {!  unsigned int prx$l_flags; __struct {- unsigned prx$v_ignore_return : 1;- unsigned prx$v_bypass_expand : 1;) unsigned prx$v_reserve_1 : 6;' unsigned prx$v_default : 1;% unsigned prx$v_exact : 1;. unsigned prx$v_delete_allowed : 1;' unsigned prx$v_fill_1 : 21; } prx$r_fill_78_; } prx$r_fill_77_; } ; #if !defined(__VAXC).#define prx$l_flags prx$r_fill_77_.prx$l_fla gsM#define prx$v_ignore_return prx$r_fill_77_.prx$r_fill_78_.prx$v_ignore_returnM#define prx$v_bypass_expand prx$r_fill_77_.prx$r_fill_78_.prx$v_bypass_expandA#define prx$v_default prx$r_fill_77_.prx$r_fill_78_.prx$v_default=#define prx$v_exact prx$r_fill_77_.prx$r_fill_78_.prx$v_exactO#define prx$v_delete_allowed prx$r_fill_77_.prx$r_fill_78_.prx$v_delete_allowed?#define prx$v_fill_1 prx$r_fill_77_.prx$r_fill_78_.prx$v_fill_1"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLET#typedef struct _prx$generic_desc1 {) unsigned short int prx$w_desc_length;# unsigned short int prx$w_fill1; char prx$t_desc_data; } PRX$GENERIC_DESC1;#else /* __OLD_STARLET */struct prx$generic_desc1 {) unsigned short int prx$w_desc_length;# unsigned short int prx$w_fill1; char prx$t_desc_data; } ;%#endif /* #ifdef __NEW_STARLET */!#define PRX$K_USER_NAME_LENGTH 32*#define PRX$K_REMOTE_NODE_NAME_LENGTH 1024 #define PRX$K_MAX_LOCAL_USERS 16!#define PRX$K_LOCAL_USER_ENTRY 36  #ifdef __NEW_STARLETtypedef struct _data {/ unsigned short int prx$w_local_user_length;& unsigned short int prx$w_unused_3;$ char prx$t_local_user_name [32];0 unsigned short int prx$w_remote_user_length;& unsigned short int prx$w_unused_4;% char prx$t_remote_user_name [32];0 unsigned short int prx$w_remote_node_length;& unsigned short int prx$w_unused_5;' char prx$t_remote_node_name [1024]; } DATA;#else /* __OLD_STARLET */ struct data {/ unsigned short int prx$w_local_user_length;& unsigned short int prx$w_unused_3;$ char prx$t_local_user_name [32];0 unsigned short int prx$w_remote_user_length;& unsigned short int prx$w_unused_4;% char prx$t_remote_user_name [32];0 unsigned short int prx$w_remote_node_length;& unsigned short int prx$w_unused_5;' char prx$t_remote_node_name [1024]; } ;%#endif /* #ifdef __N EW_STARLET */#define PRX$K_DATA_LENGTH 1100 #ifdef __NEW_STARLET typedef struct _bufsiz_summary {N unsigned short int prx$w_bufsiz_user; /* proxy user length */N unsigned short int prx$w_bufsiz_node; /* proxy node length */N unsigned short int prx$w_bufsiz_local_count; /* number of local users */N unsigned short int prx$w_bufsiz_def_user; /* length of default user */ } BUFSIZ_SUMMARY;#else /* __OLD_STARLET */struct bufsiz_summary {N unsigned short int prx$w_bufsiz_user; /* proxy user length */N unsigned short int prx$w_bufsiz_node; /* proxy node length */N unsigned short int prx$w_bufsiz_local_count; /* number of local users */N unsigned short int prx$w_bufsiz_def_user; /* length of default user */ } ;%#endif /* #ifdef __NEW_STARLET */#define PRX$K_MAX_REPLY 1692 #ifdef __NEW_STARLETtypedef union _reply_union { __struct {N unsigned int prx$l_r eply_status; /* status of request */ } prx$r_generic_reply; __struct {N unsigned int prx$l_unused_6; /* space for STATUS */N unsigned short int prx$w_valid_user; /* length of proxy user_name */* unsigned short int prx$w_unused_7;N char prx$t_valid_user [32]; /* proxy usernname */ } prx$r_verify_reply; __struct {N unsigned int prx$l_unused_8; /* space for STATUS  */N unsigned int prx$l_show_context; /* returned context */Q unsigned short int prx$w_show_def_user; /* length of default user_name */* unsigned short int prx$w_unused_8;N char prx$t_show_def_user [32]; /* default user_name */P unsigned short int prx$w_show_rem_user; /* length of remote user_name */* unsigned short int prx$w_unused_9;N char prx$t_show_rem_user [32]; /* remote user_name */R  unsigned short int prx$w_show_local_count; /* count of local user_names */W unsigned short int prx$w_show_local_size; /* size of local user_name (bytes) */N __struct { /* start of local user_names */) unsigned int prx$l_unused_10;$ } prx$r_show_local_data; } prx$r_show_reply; } REPLY_UNION; #if !defined(__VAXC)A#define prx$l_reply_status prx$r_generic_reply.prx$l_reply_status<#define prx$w_valid_user prx $r_verify_reply.prx$w_valid_user<#define prx$t_valid_user prx$r_verify_reply.prx$t_valid_user>#define prx$l_show_context prx$r_show_reply.prx$l_show_context@#define prx$w_show_def_user prx$r_show_reply.prx$w_show_def_user@#define prx$t_show_def_user prx$r_show_reply.prx$t_show_def_user@#define prx$w_show_rem_user prx$r_show_reply.prx$w_show_rem_user@#define prx$t_show_rem_user prx$r_show_reply.prx$t_show_rem_userF#define prx$w_show_local_count prx$r_show_reply.prx$w_show_local_countD#define pr x$w_show_local_size prx$r_show_reply.prx$w_show_local_sizeD#define prx$r_show_local_data prx$r_show_reply.prx$r_show_local_data"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union reply_union { __struct {N unsigned int prx$l_reply_status; /* status of request */ } prx$r_generic_reply; __struct {N unsigned int prx$l_unused_6; /* space for STATUS */N unsigned short int prx$w_valid_user; /* length  of proxy user_name */* unsigned short int prx$w_unused_7;N char prx$t_valid_user [32]; /* proxy usernname */ } prx$r_verify_reply; __struct {N unsigned int prx$l_unused_8; /* space for STATUS */N unsigned int prx$l_show_context; /* returned context */Q unsigned short int prx$w_show_def_user; /* length of default user_name */* unsigned short int prx$w_unused_8;N char prx$t_show_def_user [32]; /* default user_name */P unsigned short int prx$w_show_rem_user; /* length of remote user_name */* unsigned short int prx$w_unused_9;N char prx$t_show_rem_user [32]; /* remote user_name */R unsigned short int prx$w_show_local_count; /* count of local user_names */W unsigned short int prx$w_show_local_size; /* size of local user_name (bytes) */N __struct { /* start of local user_n ames */) unsigned int prx$l_unused_10;$ } prx$r_show_local_data; } prx$r_show_reply; } ; #if !defined(__VAXC)A#define prx$l_reply_status prx$r_generic_reply.prx$l_reply_status<#define prx$w_valid_user prx$r_verify_reply.prx$w_valid_user<#define prx$t_valid_user prx$r_verify_reply.prx$t_valid_user>#define prx$l_show_context prx$r_show_reply.prx$l_show_context@#define prx$w_show_def_user prx$r_show_reply.prx$w_show_def_user@#define prx$t_show_d ef_user prx$r_show_reply.prx$t_show_def_user@#define prx$w_show_rem_user prx$r_show_reply.prx$w_show_rem_user@#define prx$t_show_rem_user prx$r_show_reply.prx$t_show_rem_userF#define prx$w_show_local_count prx$r_show_reply.prx$w_show_local_countD#define prx$w_show_local_size prx$r_show_reply.prx$w_show_local_size"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define PRX$K_MAX_LENGTH 1108 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE  /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PRXDEF_LOADED */ ww;/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42  $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $PSCANDEF ***/#ifndef __PSCANDEF_LOADED#define __PSCANDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __un ion#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* */N/* Process_Scan item code definitions */N/* */N/*-  */N/* Item code definitions */#define PSCAN$_BEGIN 0N#define PSCAN$_ACCOUNT 1 /* Match on account name */N#define PSCAN$_AUTHPRI 2 /* Match on authorized priority */N#define PSCAN$_CURPRIV 3 /* Match on current privs */N#define PSCAN$_GRP 4 /* Match on GRP field */N#define PSCAN$_HW_MODEL 5 /* Match on system's HW_MODEL */N#define PSCAN$_HW_NAME 6 /* Match on system's HW_NAME */N#define PSCAN$_JOBPRCCNT 7 /* Match on job subprocess count */N#define PSCAN$_JOBTYPE 8 /* Match on job origin type field */N#define PSCAN$_MASTER_PID 9 /* Match on PID of master process */N#define PSCAN$_MEM 10 /* Match on MEM field */N#define PSCAN$_MODE 11 /* Match on process mode */N#define PSCAN$_NODE_CSID 12 /* Match on system's CSID */N#define PSCAN$_NODENAME 13 /* Match on system's nodename */N#define PSCAN$_OWNER 14 /* Match on PID of owner */N#define PSCAN$_PRCCNT 15 /* Match on subprocess count */N#define PSCAN$_PRCNAM 16 /* Match on process name */N#define PSCAN$_PRI 17 /* Match on current priority */N#define PSCAN$_PRIB 18 /* Match on base priority */N#define PSCAN$_STATE 19 /* Match on process state */N#define PSCAN$_STS 20 /* Match on process status */N#define PSCAN$_TERMINAL 21 /* Match on terminal name */N#define PSCAN$_UIC 22 /* Match on UIC field */N#define PSCAN$_USERNAME 23 /* Match on username */N#define PSCAN$_GETJPI_BUFFER_SIZE 24 /* Buffer for blocking  */N#define PSCAN$_PSCAN_CONTROL_FLAGS 25 /* Control Flags */N#define PSCAN$_KT_COUNT 26 /* Current count of kernel threads */N#define PSCAN$_MULTITHREAD 27 /* Maximum number of kernel threads */X#define PSCAN$_SCHED_CLASS_NAME 28 /* Match on name of process' scheduling class */#define PSCAN$_END 29#define PSCAN$K_TYPE 129#define PSCAN$M_THREAD 0x1 #ifdef __NEW_STARLETtypedef struct _pscanctldef { __union {N unsigned int pscan$l_pscanctlflgs; /* Control item flags */ __struct {o unsigned pscan$v_thread : 1; /* Return information about each thread for multithreaded processes */* unsigned pscan$v_fill_81_ : 7; } pscan$r_fill_80_; } pscan$r_fill_79_; } PSCANCTLDEF; #if !defined(__VAXC)G#define pscan$v_thread pscan$r_fill_79_.pscan$r_fill_80_.pscan$v_thread"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct pscanctldef { __union {N unsigned int pscan$l_pscanctlflgs; /* Control item flags */ __struct {o unsigned pscan$v_thread : 1; /* Return information about each thread for multithreaded processes */* unsigned pscan$v_fill_81_ : 7; } pscan$r_fill_80_; } pscan$r_fill_79_; } ; #if !defined(__VAXC)G#define pscan$v_thread pscan$r_fill_79_.pscan$r_fill_80_.pscan$v_thread"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define PSCAN$M_OR 0x1#define PSCAN$M_BIT_ALL 0x2#define PSCAN$M_BIT_ANY 0x4#define PSCAN$M_GEQ 0x8#define PSCAN$M_GTR 0x10#define PSCAN$M_LEQ 0x20#define PSCAN$M_LSS 0x40!#define PSCAN$M_PREFIX_MATCH 0x80#define PSCAN$M_WILDCARD 0x100 #define PSCAN$M_CASE_BLIND 0x200#define PSCAN$M_EQL 0x400#define PSCAN$M_NEQ 0x800 #ifdef __NEW_STARLET%typedef struct _item_specific_flags {N unsigned pscan$v_or : 1; /* Logical OR of  items */N unsigned pscan$v_bit_all : 1; /* All bits set in pattern */N unsigned pscan$v_bit_any : 1; /* Any bit set in pattern */ unsigned pscan$v_geq : 1; unsigned pscan$v_gtr : 1; unsigned pscan$v_leq : 1; unsigned pscan$v_lss : 1;N unsigned pscan$v_prefix_match : 1; /* Match on leading substring */N unsigned pscan$v_wildcard : 1; /* Wildcard pattern */N unsigned pscan$v_case_blind : 1; /* Ignore case of text strings */ unsigned pscan$v_eql : 1; unsigned pscan$v_neq : 1;" unsigned pscan$v_fill_82_ : 4; } ITEM_SPECIFIC_FLAGS;#else /* __OLD_STARLET */struct item_specific_flags {N unsigned pscan$v_or : 1; /* Logical OR of items */N unsigned pscan$v_bit_all : 1; /* All bits set in pattern */N unsigned pscan$v_bit_any : 1; /* Any bit set in pattern */ unsigned pscan$v_geq : 1;  unsigned pscan$v_gtr : 1; unsigned pscan$v_leq : 1; unsigned pscan$v_lss : 1;N unsigned pscan$v_prefix_match : 1; /* Match on leading substring */N unsigned pscan$v_wildcard : 1; /* Wildcard pattern */N unsigned pscan$v_case_blind : 1; /* Ignore case of text strings */ unsigned pscan$v_eql : 1; unsigned pscan$v_neq : 1;" unsigned pscan$v_fill_82_ : 4; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PSCANDEF_LOADED */ ww;/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// -----------------------------------------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * * */P/* * Confidential computer software. Valid license from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. * */P/* * * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty. * */P/* * * */P/* ************************************************************************* *//* ********** ********************************************************************************************************************** */@/* Created: 5-Apr-2012 13:00:56 by OpenVMS SDL EV3-3 */N/* Source: 12-SEP-2003 15:25:12 $1$DGA7304:[STARLET_H.SRC]PSIGDEF.SDL;1 *//* ******************************************************************************************************************************** */  /* .MACRO $PSIGDEF,$GBL */ /* $DEFINI PSIG,$GBL *//* */O/* Signature block offset definitions for the Alpha/IA64 calling standard. *//* */:#define PSIG$K_FR_I64 0 /* 64 bit in R0 */(/* or - No function result provided */a#define PSIG$K_FR_D64 1 /* 32 bit low in R0, 32 bit high in r1 - sign extended */H#define PSIG$K_FR_I32 2 /* 32 bit sign extended in R0 */C#define PSIG$K_FR_U32 3 /* 32 bit unsigned in R0 */=#define PSIG$K_FR_FF 4 /* F floating in F0 */=#define PSIG$K_FR_FD 5  /* D floating in F0 */=#define PSIG$K_FR_FG 6 /* G floating in F0 */=#define PSIG$K_FR_FS 7 /* S floating in F0 */=#define PSIG$K_FR_FT 8 /* T floating in F0 */M#define PSIG$K_FR_FFC 11 /* F floating complex in F0 and F1 */M#define PSIG$K_FR_FDC 12 /* D floating complex in F0 and F1 */M#define PSIG$K_FR_FGC 13 /* G floating complex in F0 and F1 */M#define PSIG$K_FR_FSC 14 /*  S floating complex in F0 and F1 */M#define PSIG$K_FR_FTC 15 /* T floating complex in F0 and F1 *//* */#define PSIG$M_CTRL 0x7#define PSIG$M_X 0xF8 #define PSIG$M_FUNC_RETURN 0xF00,#define PSIG$M_REG_ARG_INFO 0xFFFFFFFF000000#define PSIG$M_SU_VLIST 0x40008#define PSIG$K_MIN_LENGTH 8 /* Minimum length */8#define PSIG$K_MAX_LENGTH 72 /* Maximum length */<#define PSIG$K_MIN_SIZE 8 /* Minimum size */<#define PSIG$K_MAX_SIZE 72  /* Maximum size */+/* or - First parameter mechanism used */)/* First quadword of signature block *//* */#define PSIG$S_REGISTER_INFO 8#define PSIG$Q_REGISTER_INFO 0#define PSIG$S_CTRL 3E#define PSIG$V_CTRL 0 /* Control information field */#define PSIG$S_X 5?#define PSIG$V_X 3 /* Not used. Must be zero */#define PSIG$S_FUNC_RETURN 4M#define PSIG$V_FUNC_RETURN 8 /* Function return signature encoding */#define PSIG$S_SUMMARY 4C #define PSIG$V_SUMMARY 12 /* Entire summary field */7#define PSIG$B_ARG_COUNT 2 /* Argument count */#define PSIG$S_REG_ARG_INFO 32Q#define PSIG$V_REG_ARG_INFO 24 /* Register argument signature encodings */ #define PSIG$S_MEMORY_ARG_INFO 8]#define PSIG$V_MEMORY_ARG_INFO 56 /* Minimum length for memory argument information *//* */K/* Summary bits which are contained in the high bits of the first word *//* */#define PSIG$S_SUMMARY_INFO 8#d efine PSIG$Q_SUMMARY_INFO 0#define PSIG$S_FILL 12#define PSIG$V_FILL 0#define PSIG$S_SU_ASUM 2W#define PSIG$V_SU_ASUM 12 /* summary of arguments 9 through arg_count */P#define PSIG$V_SU_VLIST 14 /* VAX style argument list expected */#define PSIG$V_UNUSED 15#define RASE$M_SIG_ENC 0xF9#define RASE$K_RA_I64 0 /* (obsolete) */G#define RASE$K_RA_NOARG 0 /* Argument is not present */9#define RASE$K_RA_Q 1 /* 64 bit in Rxx */I#define RASE$K_RA_I32 2 /* 32 bit sign extended in Rxx */D#define RASE$K_RA_U32 3 /* 32 bit unsigned in Rxx */E#define RASE$K_RA_FF 4 /* F floating passed in Fxx */E#define RASE$K_RA_FD 5 /* D floating passed in Fxx */E#define RASE$K_RA_FG 6 /* G floating passed in Fxx */E#define RASE$K_RA_FS 7 /* S floating passed in Fxx */E#define RASE$K_RA_FT 8 /* T floating p assed in Fxx */#define RASE$S_SIG_ENC 4N#define RASE$V_SIG_ENC 0 /* per register signature encoding */8#define MASE$K_MA_I64 0 /* (obsolete) */;#define MASE$K_MA_Q 0 /* 64 bit argument */D#define MASE$K_MA_I32 2 /* 32 bit signed argument */#define MASE$S_SIG_ENC 2U#define MASE$V_SIG_ENC 0 /* per memory location signature encoding *//* */V/* Argument Information structure definition for the Alpha/IA64 ca lling standard. *//* */<#define AI$K_AR_I64 0 /* Integer argument */?#define AI$K_AR_FF 1 /* VAX F float argument */?#define AI$K_AR_FD 2 /* VAX D float argument */?#define AI$K_AR_FG 3 /* VAX G float argument */@#define AI$K_AR_FS 4 /* IEEE S float argument */@#define AI$K_AR_FT 5 /* IEEE T float argument */;#define AI$K_AR_RESERVED_6 6 /* Reserved value 6 */;#define AI$K_AR_RESERVED_7 7 /* Reserved value 7 */#define AI$M_ARG_REG_INFO 0x700;#define AI$K_AI_SIZE 8 /* Minimum length */A#define AI$K_REGNO 25 /* The AI register number */#define AI$B_ARG_COUNT 0#define AI$S_ARG_REG_INFO 3Q#define AI$V_ARG_REG_INFO 8 /* per arg type info for up to 8 arguments */ /* $DEFEND PSIG,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//*********** *********************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $PSIGDEF ***/#ifndef __PSIGDEF_LOADED#define __PSIGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* Signature block offset definitions for the Alpha/IA64 calling standard. */N/*  */N#define PSIG$K_FR_I64 0 /* 64 bit in R0 */N/* or - No function result provided */a#define PSIG$K_FR_D64 1 /* 32 bit low in R0, 32 bit high in r1 - sign extended */N#define PSIG$K_FR_I32 2 /* 32 bit sign extended in R0 */N#define PSIG$K_FR_U32 3 /* 32 bit unsigned in R0 */N#define PSIG$K_FR_FF 4  /* F floating in F0 */N#define PSIG$K_FR_FD 5 /* D floating in F0 */N#define PSIG$K_FR_FG 6 /* G floating in F0 */N#define PSIG$K_FR_FS 7 /* S floating in F0 */N#define PSIG$K_FR_FT 8 /* T floating in F0 */N#define PSIG$K_FR_FFC 11 /* F floating complex in F0 and F1 */N#define PSIG$K_FR_FDC 12 /* D floating complex in F0 and F1 */N#define PSIG$K_FR_FGC 13 /* G floating complex in F0 and F1 */N#define PSIG$K_FR_FSC 14 /* S floating complex in F0 and F1 */N#define PSIG$K_FR_FTC 15 /* T floating complex in F0 and F1 */N/* */#define PSIG$M_CTRL 0x7#define PSIG$M_X 0xF8 #define PSIG$M_FUNC_RETURN 0xF00,#define PSIG$M_REG_ARG_INFO 0xFFFFFFFF000000#define PSIG$M_SU_VLIST 0x4000 N#define PSIG$K_MIN_LENGTH 8 /* Minimum length */N#define PSIG$K_MAX_LENGTH 72 /* Maximum length */N#define PSIG$K_MIN_SIZE 8 /* Minimum size */N#define PSIG$K_MAX_SIZE 72 /* Maximum size */ #ifdef __NEW_STARLETtypedef struct _psigdef {N/* or - First parameter mechanism used */N/* First quadword of signature block  */N/* */ __union { __union {2 unsigned __int64 psig$q_register_info; __struct {N unsigned psig$v_ctrl : 3; /* Control information field */N unsigned psig$v_x : 5; /* Not used. Must be zero */Y unsigned psig$v_func_return : 4; /* Function return signature encoding */N unsigned psig$v_summary : 4; /* Entire summary field */N unsigned char psig$b_arg_count; /* Argument count */^ unsigned psig$v_reg_arg_info : 32; /* Register argument signature encodings */i unsigned psig$v_memory_arg_info : 8; /* Minimum length for memory argument information */" } psig$r_fill_84_; } psig$r_fill_83_;N/* */N/* Summary bits which ar e contained in the high bits of the first word */N/* */ __union {1 unsigned __int64 psig$q_summary_info; __struct {* unsigned psig$v_fill : 12;[ unsigned psig$v_su_asum : 2; /* summary of arguments 9 through arg_count */T unsigned psig$v_su_vlist : 1; /* VAX style argument list expected */+ unsigned psig$v_unused : 1;"  } psig$r_fill_86_; } psig$r_fill_85_;' } psig$r_register_info_overlay; } PSIGDEF; #if !defined(__VAXC)^#define psig$q_register_info psig$r_register_info_overlay.psig$r_fill_83_.psig$q_register_info\#define psig$v_ctrl psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_ctrlV#define psig$v_x psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_xj#define psig$v_func_return psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_func_returnb#define psig$v_summary psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_summaryf#define psig$b_arg_count psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$b_arg_countl#define psig$v_reg_arg_info psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_reg_arg_infor#define psig$v_memory_arg_info psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_memory_arg_info\#define psig$q_summary_info psig$r_register_info_overlay.psig$r_fill_85_.psig$q_summary_info\#define psig$v_fill psig$r_register_info_overlay.psig$r_fill_85_.psig$r_fill_86_.psig$v_fillb#define psig$v_su_asum psig$r_register_info_overlay.psig$r_fill_85_.psig$r_fill_86_.psig$v_su_asumd#define psig$v_su_vlist psig$r_register_info_overlay.psig$r_fill_85_.psig$r_fill_86_.psig$v_su_vlist`#define psig$v_unused psig$r_register_info_overlay.psig$r_fill_85_.psig$r_fill_86_.psig$v_unused"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARL ET */typedef struct _psigdef {N/* or - First parameter mechanism used */N/* First quadword of signature block */N/* */ __union { __union {2 unsigned int psig$q_register_info [2]; __struct {N unsigned psig$v_ctrl : 3; /* Control information field */N unsigned psig$v_x : 5; /* Not used. Must be zero */Y unsigned psig$v_func_return : 4; /* Function return signature encoding */N unsigned psig$v_summary : 4; /* Entire summary field */N unsigned char psig$b_arg_count; /* Argument count */^ unsigned psig$v_reg_arg_info : 32; /* Register argument signature encodings */i unsigned psig$v_memory_arg_info : 8; /* Minimum length for memory argument information */"  } psig$r_fill_84_; } psig$r_fill_83_;N/* */N/* Summary bits which are contained in the high bits of the first word */N/* */ __union {1 unsigned int psig$q_summary_info [2]; __struct {* unsigned psig$v_fill : 12;[ unsigned psig$v_su_asum : 2; /* summary of arg uments 9 through arg_count */T unsigned psig$v_su_vlist : 1; /* VAX style argument list expected */+ unsigned psig$v_unused : 1;" } psig$r_fill_86_; } psig$r_fill_85_;' } psig$r_register_info_overlay; } psigdef; #if !defined(__VAXC)^#define psig$q_register_info psig$r_register_info_overlay.psig$r_fill_83_.psig$q_register_info\#define psig$v_ctrl psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_ctrlV#define psig$v_x psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_xj#define psig$v_func_return psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_func_returnb#define psig$v_summary psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_summaryf#define psig$b_arg_count psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$b_arg_countl#define psig$v_reg_arg_info psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_reg_arg_infor#define psig$v_memory_arg_info psig$r_register_info_overlay.psig$r_fill_83_.psig$r_fill_84_.psig$v_memory_arg_info\#define psig$q_summary_info psig$r_register_info_overlay.psig$r_fill_85_.psig$q_summary_info\#define psig$v_fill psig$r_register_info_overlay.psig$r_fill_85_.psig$r_fill_86_.psig$v_fillb#define psig$v_su_asum psig$r_register_info_overlay.psig$r_fill_85_.psig$r_fill_86_.psig$v_su_asumd#define psig$v_su_vlist psig$r_register_info_overlay.psig$r_fill_85_.psig$r_fill_86_.psig$v_su_vli st`#define psig$v_unused psig$r_register_info_overlay.psig$r_fill_85_.psig$r_fill_86_.psig$v_unused"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define RASE$M_SIG_ENC 0xFN#define RASE$K_RA_I64 0 /* (obsolete) */N#define RASE$K_RA_NOARG 0 /* Argument is not present */N#define RASE$K_RA_Q 1 /* 64 bit in Rxx */N#define RASE$K_RA_I32 2 /* 32 bit sign extended in Rxx */N#define RASE$K_RA_U32 3 /* 32 bit unsigned in Rxx */N#define RASE$K_RA_FF 4 /* F floating passed in Fxx */N#define RASE$K_RA_FD 5 /* D floating passed in Fxx */N#define RASE$K_RA_FG 6 /* G floating passed in Fxx */N#define RASE$K_RA_FS 7 /* S floating passed in Fxx */N#define RASE$K_RA_FT 8 /* T floating passed in Fxx */ #ifdef __NEW_STARLETtypedef struct _rasedef {N unsigned rase$v_sig_enc : 4; /* per register signature encoding */! unsigned rase$v_fill_87_ : 4; } RASEDEF;#else /* __OLD_STARLET */typedef struct _rasedef {N unsigned rase$v_sig_enc : 4; /* per register signature encoding */! unsigned rase$v_fill_87_ : 4; } rasedef;%#endif /* #ifdef __NEW_STARLET */N#define MASE$K_MA_I64 0 /* (obsolete) */N#define MA SE$K_MA_Q 0 /* 64 bit argument */N#define MASE$K_MA_I32 2 /* 32 bit signed argument */ #ifdef __NEW_STARLETtypedef struct _masedef {T unsigned mase$v_sig_enc : 2; /* per memory location signature encoding */! unsigned mase$v_fill_88_ : 6; } MASEDEF;#else /* __OLD_STARLET */typedef struct _masedef {T unsigned mase$v_sig_enc : 2; /* per memory location signature encoding */! unsigned mase$ v_fill_88_ : 6; } masedef;%#endif /* #ifdef __NEW_STARLET */N/* */T/* Argument Information structure definition for the Alpha/IA64 calling standard. */N/* */N#define AI$K_AR_I64 0 /* Integer argument */N#define AI$K_AR_FF 1 /* VAX F float argument */N#define AI$K_AR_FD 2  /* VAX D float argument */N#define AI$K_AR_FG 3 /* VAX G float argument */N#define AI$K_AR_FS 4 /* IEEE S float argument */N#define AI$K_AR_FT 5 /* IEEE T float argument */N#define AI$K_AR_RESERVED_6 6 /* Reserved value 6 */N#define AI$K_AR_RESERVED_7 7 /* Reserved value 7 */#define AI$M_ARG_REG_INFO 0x700N#define AI$K_AI_SI ZE 8 /* Minimum length */N#define AI$K_REGNO 25 /* The AI register number */ #ifdef __NEW_STARLETtypedef struct _aidef {! unsigned char ai$b_arg_count; unsigned ai$v_arg_reg_info : 24 /** WARNING: bitfield array has been reduced to a string **/ ; /* per arg type info for up to 8\ arguments */N unsigned ai$v_arg_mbz2 : 32; /* must be zero */ } AIDEF;#else /* __OLD_STARLET */ typedef struct _aidef {! unsigned char ai$b_arg_count; unsigned ai$v_arg_reg_info : 24 /** WARNING: bitfield array has been reduced to a string **/ ; /* per arg type info for up to 8\ arguments */N unsigned ai$v_arg_mbz2 : 32; /* must be zero */ } aidef;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PSIGDEF_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */ww[</********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.S RC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $PSLDEF ***/#ifndef __PSLDEF_LOADED#define __PSLDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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)#d efine __union union#else#define __union variant_union#endif#endif N/*+ */N/* PROCESSOR STATUS LONGWORD MASK AND FIELD DEFINITIONS */N/* */I/* This definition file provides PSL$xxxx symbols */I/* strictly for the purpose of providing compatibility */I/* for code being ported from VAX which refers to the */I/* fields of the PSL. Only those fields that exist in */I/* both architectures are defined. */N/* */I/* The preferred approach for code that DOES NOT run */I/* on VAX is to use the symbols defined by the $PRDEF */I/* macro instead. */N/* - */#define PSL$M_PRVMOD 0x3#define PSL$M_CURMOD 0x18#define PSL$M_IPL 0x1F00#define PSL$V_MAX_PS_REG_BIT 13N/* */N#define PSL$C_KERNEL 0 /* Kernel Mode */N#define PSL$C_EXEC 1 /* Executive Mode */N#define PSL$C_SUPER 2 /* Supervisor Mode  */N#define PSL$C_USER 3 /* User Mode */ #ifdef __NEW_STARLETtypedef union _psldef { __struct {N unsigned psl$v_prvmod : 2; /* Previous Processor Mode */% unsigned psldef$$_fill_1 : 1;N unsigned psl$v_curmod : 2; /* Current Processor Mode */% unsigned psldef$$_fill_2 : 3;N unsigned psl$v_ipl : 5; /* Interrupt Priority Level */$ unsigned psl$v_fill_89 _ : 3; } psl$r_psldef_bits;N/* */N/* Maximum bit number used in the PS register */N/* */N/* MODE SYMBOL DEFINITIONS */N/* */ } PSLDEF; #if !defined(__VAXC)3#define psl$v_prvmod psl$r _psldef_bits.psl$v_prvmod3#define psl$v_curmod psl$r_psldef_bits.psl$v_curmod-#define psl$v_ipl psl$r_psldef_bits.psl$v_ipl"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union psldef { __struct {N unsigned psl$v_prvmod : 2; /* Previous Processor Mode */% unsigned psldef$$_fill_1 : 1;N unsigned psl$v_curmod : 2; /* Current Processor Mode */% unsigned psldef$$_fill_2 : 3;N unsigned psl$v_ipl : 5; /* Interrupt Priority Level */$ unsigned psl$v_fill_89_ : 3; } psl$r_psldef_bits;N/* */N/* Maximum bit number used in the PS register */N/* */N/* MODE SYMBOL DEFINITIONS */N/*  */ } ; #if !defined(__VAXC)3#define psl$v_prvmod psl$r_psldef_bits.psl$v_prvmod3#define psl$v_curmod psl$r_psldef_bits.psl$v_curmod-#define psl$v_ipl psl$r_psldef_bits.psl$v_ipl"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PSLDEF_LOADED */ ww{</********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]PSM$ROUTINES.SDI;1 *//************************************************************************************************* *******************************/'/*** MODULE PSM$ROUTINES IDENT X-1 ***/#ifndef __PSM_ROUTINES_LOADED#define __PSM_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*  */N/* Print Symbiont Modification (PSM) Routines */N/* */N/* */N/* PSM$PRINT - Invoke VMS-Supplied Print Symbiont */N/* */N/* status = PSM$PRINT ([streams], [buf siz], [worksiz]) */N/* */N/* streams - Maximum number of streams to support */N/* bufsiz - Maximum buffer size in bytes for output operations */N/* worksiz - Size in bytes of work area to be allocated */N/* */#define psm$print PSM$PRINT #ifdef __NEW_STARLETunsign ed int psm$print( __optional_params );#else /* __OLD_STARLET */)unsigned int psm$print(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* PSM$READ_ITEM_DX - Obtain Value of Message Items */N/* */N/* status = PSM$READ_ITEM_DX (request_id, item, buffer) */N/*  */O/* request_id - Request identifier supplied by the symbiont to user routine */N/* item - Item code identifying message item to be returned */N/* buffer - Buffer into which data is returned */N/* */+#define psm$read_item_dx PSM$READ_ITEM_DX #ifdef __NEW_STARLETunsigned int psm$read_item_dx( unsigned int *request_id, uns igned int *item, void *buffer);#else /* __OLD_STARLET */0unsigned int psm$read_item_dx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* PSM$REPLACE - Declare User Service Routine */N/* */N/* status = PSM$REPLACE (code, routine) */N/*  */N/* code - Code identifying symbiont routine to be replaced */N/* routine - User routine to replace symbiont routine */N/* */!#define psm$replace PSM$REPLACE #ifdef __NEW_STARLETunsigned int psm$replace( unsigned int *code, int (*routine)(void));#else /* __OLD_STARLET */+unsigned int psm$replace(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* PSM$REPORT - Report Completion Status */N/* */N/* status = PSM$REPORT (request_id [, status]) */N/* */O/* request_id - Request identifier supplied by the symbiont to user routine */N/* status - Completion status of asynchronous operation completed */N/* */#define psm$report PSM$REPORT #ifdef __NEW_STARLETunsigned int psm$report( unsigned int *request_id, __optional_params);#else /* __OLD_STARLET */*unsigned int psm$report(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __PSM_ROUTINES_LOADED */ ww.=/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET _H.SRC]PSMMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $PSMMSGDEF ***/#ifndef __PSMMSGDEF_LOADED#define __PSMMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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(__V AXC)#define __union union#else#define __union variant_union#endif#endif N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:38.40 */N/* */N/* */Q/***************************************************************************** *//**  * */C/** COPYRIGHT (C) 1978, 1980, 1982, 1984, 1993, 1994 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE P ROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/* */N/*++ */N/* FACILITY: */I/* PRINT SYMBIONT.  */N/* */N/* ABSTRACT: */I/* SYMBIONT MESSAGES. */N/* */N/* ENVIRONMENT: */I/* VAX/VMS USER AND KERNEL MODE. */N/*  */N/* AUTHOR: G. ROBERT, CREATION DATE: 31-AUG-1982 */N/* */N/* MODIFIED BY: */N/* */?/* X-4 SG047 SHEELA GAYATRI 27-DEC-1994 */B/* ADDED PSM$_INVPREFIX.  */N/* */N/* X-3 ILR003 IRIS LANGSTEIN REALMUTO 26-OCT-1993 */N/* CHANGED COPYRIGHT TO 1993 */N/* */N/* X-2 ILR002 IRIS LANGSTEIN REALMUTO 27-AUG-1993 */N/* ADDED PSM$_LATSYM */N/*  */9/* 3B-010 BLS0336 BENN SCHREIBER 5-AUG-1984 */B/* ADD MISSING .END STATEMENT. */N/* */</* 3B-009 RRB3009 ROWLAND R. BRADLEY 24-JUL-1984 */B/* SEPARATE THE PSM MESSAGES AND THE SMB MESSAGES. */B/* */;/* 3B-008 GRR3008 GREGORY R. ROBERT 29-AP R-1984 */B/* ADDED PSM$_FLUSH */N/* */;/* 3B-007 GRR3007 GREGORY R. ROBERT 23-AUG-1983 */B/* BUGFIXES, PAGE_SETUP_MODULES, FORM_SETUP_MODULES, */B/* SHEET_FEED, SYMBIONT INITIATED PAUSE_TASK AND STOP_STREAM, */B/* HANGUP CODE, READ AND WRITE ITEM SERVICES */N/*  */;/* 3B-006 GRR3006 GREGORY R. ROBERT 03-AUG-1983 */B/* CHANGED FUNNOTSUP TO SUCCESS. */N/* */;/* 3B-005 GRR3005 GREGORY R. ROBERT 29-JUL-1983 */B/* ADDED MESSAGES FOR FT1. */N/* */;/* 3B-004 GRR3004 GREGORY R. ROBERT 23-JUN-1983 */B/* ADDED "modul e not found" AND "too many levels" MESSAGES. */N/* */;/* 3B-003 GRR3003 GREGORY R. ROBERT 27-MAY-1983 */B/* REMOVED UNUSED MESSAGES. ADDED NOMOREITEMS AND INVSTMNBR. */N/* */;/* 3B-002 GRR3002 GREGORY R. ROBERT 04-APR-1983 */B/* ADDED PSM$_NOMOREITEMS. */N/*  */N/*** */N/* */N/* THESE ARE THE MESSAGES COMMON TO VAX/VMS SYMBIONTS. MESSAGE TYPES FOR */N/* MESSAGES SENT FROM THE SYMBIONTS TO THE JOB CONTROLLER ARE DEFINED BY */N/* THE $MSGDEF MACRO. */N/*  */#define PSM$_FACILITY 262#define PSM$_FUNNOTSUP 17203201#define PSM$_PENDING 17203209#define PSM$_FLUSH 17203217#define PSM$_BUFFEROVF 17203224#define PSM$_NEWPAGE 17203232#define PSM$_SUSPEND 17203240#define PSM$_ESCAPE 17203248#define PSM$_EOF 17203258#define PSM$_INVVMSOSC 17203266#define PSM$_MODNOTFND 17203274#define PSM$_NOFILEID 17203282#define PSM$_OSCTOOLON 17203290 #define PSM$_TOOMANYLEV 17203298#define PSM$_INVITMCOD 17203308#def ine PSM$_LATSYM 17203314#define PSM$_INVPREFIX 17203324 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PSMMSGDEF_LOADED */ ww|=/*****************************************************************************************  ***************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFMP.SDI;1 *//********************************************************************************************************************************//*** MODULE $PTDDEF ***/#ifndef __PTDDEF_LOADED#define __PTDDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __s ave#pragma __nomember_alignmentR#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 N/*+ */N/* */N/* Pseudo terminal driver notification AST type definitions. */N/*  */N/* N.B. */I/* These definitions are in a specific order and must not be changed */N/* without matching changes to FTUCBDEF, and FTDRIVER. */N/* */N/*- */N#define PTD$C_SEND_XON 0 /* Enable or disable XON AST */N#define PTD$C_SEND_BELL 1 /* Enable or disable BELL AST */N#define PTD$C_SEND_XOFF 2 /* Enable or disable XOFF AST */O#define PTD$C_STOP_OUTPUT 3 /* Enable or disable stop output AST */Q#define PTD$C_RESUME_OUTPUT 4 /* Enable or disable resume output AST */Z#define PTD$C_CHAR_CHANGED 5 /* Enable or disable characteristics change AST */P#define PTD$C_ABORT_OUTPUT 6 /* Enable or disable abort output AST */N#define PTD$C_START_READ 7 /* Enable or disable start read AST */O#define PTD$C_MIDDLE_READ 8 /* Enable or disable middle read AST */N#define PTD$C_END_READ 9 /* Enable or disable end read AST */N#define PTD$C_ENABLE_READ 10 /* Enable read ASTs */N#define PTD$C_DISABLE_READ 11 /* Disable read ASTs */#define PTD$C_MAX_EVENTS 12 $#pragma __member_alignment __restoreR#ifdef __I NITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __PTDDEF_LOADED */ wwˣ=/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source:  05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************/#/*** MODULE $QSRVDEF IDENT X-9 ***/#ifndef __QSRVDEF_LOADED#define __QSRVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragma s 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#end if#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* QIOserver Control and Information ($QIOSERVER) definitions. */N/* */X/* NOTE: New items must always be added at the end so users will not have to relink. */N/*  */N/* */N/* Function codes */N/* */N#define QSRV$_CANCEL_OPERATION 1 /* Cancel a wildcard operation */\#define QSRV$_COMMIT_VOLATILE 2 /* Commit the volatile configuration to permanent */O#define QSRV$_SET_CLIENT 3 /* Set c lient configuration controls */O#define QSRV$_SET_DEVICE 4 /* Set device configuration controls */N#define QSRV$_SET_LOGGING 5 /* Set logging */O#define QSRV$_SET_SERVER 6 /* Set server configuration controls */N#define QSRV$_SET_SERVICE 7 /* Set client-server path service */\#define QSRV$_SHOW_CLIENT 8 /* Show client configuration and operational data */N#define QSRV$_SHOW_DEVICE 9 /* Show device configuration */N#define QSRV$_SHOW_LOGGING 10 /* Show logging */\#define QSRV$_SHOW_SERVER 11 /* Show server configuration and operational data */N#define QSRV$_SHOW_SERVICE 12 /* Show client-server path service */N#define QSRV$K_MIN_FUNC 1 /* Minimum QIOSERVER function code */N#define QSRV$K_MAX_FUNC 12 /* Maximum QIOSERVER function code */N/*  */N/* Item codes */N/* */V/* Item codes are limited to a byte value for use with the context block validation */N/* */N#define QSRV$_ADD_FILTER 1 /* Add message event filter 3 tuple */V#define QSRV$_ADD_POOL 2 /* Add a block of memory for server I/O use  */N#define QSRV$_AUTO_ADD_NPP 3 /* T/F auto add NPP for server I/O */N#define QSRV$_CLEAR_FILTERS 4 /* Clear all message event filters */R#define QSRV$_CLIENT_NAME 5 /* Client SCSNODE name - SYSGEN SCSNODE */W#define QSRV$_CLIENT_SCSSYSTEMID 6 /* Client SCS system id - SYSGEN SCSSYSTEMID */N#define QSRV$_DEFAULT_PRIORITY 7 /* The default path priority */N#define QSRV$_DELETE_POOL_BLOCK 8 /* Remove an allocated pool block */N#define  QSRV$_DEVICE_NAME 9 /* Full device name */N#define QSRV$_FLAGS 10 /* System service control flags */N#define QSRV$_KCC_COUNTERS 11 /* KClient connection counter data */N#define QSRV$_KCD_COUNTERS 12 /* KClient device counter data */N#define QSRV$_KCR_COUNTERS 13 /* KClient root counter data */N#define QSRV$_KSC_COUNTERS 14 /* KServer connection counter data */N#define QSRV$_KSD_COUNTERS 15  /* KServer device counter data */N#define QSRV$_KSR_COUNTERS 16 /* KServer root counter data */N#define QSRV$_KSR_FUNCTION_HISTOGRAM 17 /* KServer function code histogram */T#define QSRV$_KSR_IO_BUFFER_HISTOGRAM 18 /* KServer histogram of I/O buffer sizes */N#define QSRV$_LIST_FILTERS 19 /* List all message event filters */N#define QSRV$_LIST_POOL_BLOCKS 20 /* Display server I/O pool blocks */P#define QSRV$_LIST_POOL_STATS 21 /* Display ser ver I/O pool statistics */N#define QSRV$_LOG_MODE 22 /* Logging modes */N#define QSRV$_LOG_NODE 23 /* Logging SCSNODE name */N#define QSRV$_LOG_RESTART 24 /* Restart data logging */W#define QSRV$_NBR_ALTERNATE_PATHS 25 /* Number of client resident alternate paths */N#define QSRV$_NBR_CLIENTS 26 /* Number of clients seen by server */P#define QSRV$_NBR_CLIENT_THREADS 27 /* Number of client configur e threads */N#define QSRV$_NBR_CREDITS 28 /* Number of SCS credits */R#define QSRV$_NBR_DEVICES 29 /* Number of devices seen and available */U#define QSRV$_NBR_FILTERS 30 /* Number of message event filters in list */V#define QSRV$_NBR_IO_FRAGMENTS 31 /* Max number of I/O fragments per transfer */N#define QSRV$_NBR_SERVERS 32 /* Number of servers seen by client */P#define QSRV$_NBR_SERVER_THREADS 33 /* Number of server configure th reads */N#define QSRV$_PATH_STATE 34 /* Path state */Q#define QSRV$_POOL_WAIT_TMO 35 /* Number of seconds KServer Pool hold */T#define QSRV$_QSLUN_AUTO 36 /* T/F KClient to get QSLUN automatically */S#define QSRV$_QSRV_COMPONENT 37 /* Component of the QIOserver sub-system */Q#define QSRV$_REMOVE_FILTER 38 /* Remove message event filter 3 tuple */U#define QSRV$_SEARCH_NAME 39 /* Node or device name for wildcard  search */Z#define QSRV$_SEQUENTIAL_ORDER 40 /* T/F Order IRPs by sequence #, def - priority */S#define QSRV$_SERVER_NAME 41 /* Server SCS node name - SYSGEN SCSNODE */W#define QSRV$_SERVER_SCSSYSTEMID 42 /* Server SCS system id - SYSGEN SCSSYSTEMID */N#define QSRV$_SERVICE_STATE 43 /* Device serve/noserve state */N#define QSRV$_UCC_COUNTERS 44 /* UClient connection counter data */N#define QSRV$_UCR_COUNTERS 45 /* UClient root counter da ta */N#define QSRV$_USC_COUNTERS 46 /* UServer connection counter data */N#define QSRV$_USR_COUNTERS 47 /* UServer root counter data */N#define QSRV$K_MIN_ITEM 1 /* Minimum documented item code */N#define QSRV$K_MAX_ITEM 47 /* Maximum documented item code */N/* */R/* The following structure defines the bit masks for the QSRV$_FLAGS item code. */N/*  */#define QSRV$M_PERMANENT 0x1#define QSRV$M_VOLATILE 0x2#define QSRV$M_ADD 0x4$#define QSRV$M_CLIENT_CONFIG 0x10000$#define QSRV$M_SERVER_CONFIG 0x20000$#define QSRV$M_CLIENT_SEARCH 0x40000$#define QSRV$M_DEVICE_SEARCH 0x80000%#define QSRV$M_SERVER_SEARCH 0x100000##define QSRV$M_SEARCH_DONE 0x200000%#define QSRV$M_CTX_ALLOCATED 0x400000 #ifdef __NEW_STARLETtypedef union _qsrv_flags { unsigned int qsrv$l_  flags; __struct {N unsigned qsrv$v_permanent : 1; /* Applies to permanent database */N unsigned qsrv$v_volatile : 1; /* Applies to volatile database */X unsigned qsrv$v_add : 1; /* Allow volatile database structure creation */N/* The following flags are reserved for Compaq internal use. */% unsigned qsrv$v_filler1 : 13;N unsigned qsrv$v_client_config : 1; /* Use the client configuration */N unsigned qsrv$v_server _config : 1; /* Use the server configuration */N unsigned qsrv$v_client_search : 1; /* Search name is for clients */N unsigned qsrv$v_device_search : 1; /* Search name is for devices */N unsigned qsrv$v_server_search : 1; /* Search name is for servers */N unsigned qsrv$v_search_done : 1; /* Search is done */N unsigned qsrv$v_ctx_allocated : 1; /* Allocated context block */$ unsigned qsrv$v_filler2 : 9; } qsrv$r_f ! lag_bits; } QSRV_FLAGS; #if !defined(__VAXC):#define qsrv$v_permanent qsrv$r_flag_bits.qsrv$v_permanent8#define qsrv$v_volatile qsrv$r_flag_bits.qsrv$v_volatile.#define qsrv$v_add qsrv$r_flag_bits.qsrv$v_addB#define qsrv$v_client_config qsrv$r_flag_bits.qsrv$v_client_configB#define qsrv$v_server_config qsrv$r_flag_bits.qsrv$v_server_configB#define qsrv$v_client_search qsrv$r_flag_bits.qsrv$v_client_searchB#define qsrv$v_device_search qsrv$r_flag_bits.qsrv$v_device_searchB#define qs " rv$v_server_search qsrv$r_flag_bits.qsrv$v_server_search>#define qsrv$v_search_done qsrv$r_flag_bits.qsrv$v_search_doneB#define qsrv$v_ctx_allocated qsrv$r_flag_bits.qsrv$v_ctx_allocated"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef union _qsrv_flags { unsigned int qsrv$l_flags; __struct {N unsigned qsrv$v_permanent : 1; /* Applies to permanent database */N unsigned qsrv$v_volatile : 1; /* Applies to volatile database */X # unsigned qsrv$v_add : 1; /* Allow volatile database structure creation */N/* The following flags are reserved for Compaq internal use. */% unsigned qsrv$v_filler1 : 13;N unsigned qsrv$v_client_config : 1; /* Use the client configuration */N unsigned qsrv$v_server_config : 1; /* Use the server configuration */N unsigned qsrv$v_client_search : 1; /* Search name is for clients */N unsigned qsrv$v_device_search : 1; /* Search name is $ for devices */N unsigned qsrv$v_server_search : 1; /* Search name is for servers */N unsigned qsrv$v_search_done : 1; /* Search is done */N unsigned qsrv$v_ctx_allocated : 1; /* Allocated context block */$ unsigned qsrv$v_filler2 : 9; } qsrv$r_flag_bits; } qsrv_flags; #if !defined(__VAXC):#define qsrv$v_permanent qsrv$r_flag_bits.qsrv$v_permanent8#define qsrv$v_volatile qsrv$r_flag_bits.qsrv$v_volatile.#define qsrv$v % _add qsrv$r_flag_bits.qsrv$v_addB#define qsrv$v_client_config qsrv$r_flag_bits.qsrv$v_client_configB#define qsrv$v_server_config qsrv$r_flag_bits.qsrv$v_server_configB#define qsrv$v_client_search qsrv$r_flag_bits.qsrv$v_client_searchB#define qsrv$v_device_search qsrv$r_flag_bits.qsrv$v_device_searchB#define qsrv$v_server_search qsrv$r_flag_bits.qsrv$v_server_search>#define qsrv$v_search_done qsrv$r_flag_bits.qsrv$v_search_doneB#define qsrv$v_ctx_allocated qsrv$r_flag_bits.qsrv$v_ctx_allocated" & #endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define QSRV_FLAGS$C_LENGTH 4#define QSRV_FLAGS$K_LENGTH 4 !#define QSRV_FLAGS$S_QSRV_FLAGS 4N/* */U/* The following structure defines the bit masks for the QSRV$_LOG_MODE item code. */N/* */&#define QSRV_LOG$M_ACTIV_UCLOG 0x10000&#define QSRV_LOG$M_ACTIV_USLOG 0x2' 0000&#define QSRV_LOG$M_ACTIV_KCLOG 0x40000&#define QSRV_LOG$M_ACTIV_KSLOG 0x80000%#define QSRV_LOG$M_ACTIV_MSG 0x100000%#define QSRV_LOG$M_ACTIV_EVT 0x200000%#define QSRV_LOG$M_ACTIV_CNT 0x400000%#define QSRV_LOG$M_ACTIV_HST 0x800000&#define QSRV_LOG$M_ACTIV_VBS 0x1000000 #ifdef __NEW_STARLETtypedef union _qsrv_log {" unsigned int qsrv_log$l_flags; __struct {N unsigned qsrv_log$v_filler1 : 16; /* Reserved Compaq internal use */N unsigned qsrv_log$v_acti( v_uclog : 1; /* Turn on Uclient logging */N unsigned qsrv_log$v_activ_uslog : 1; /* Turn on Userver logging */N unsigned qsrv_log$v_activ_kclog : 1; /* Turn on Kclient logging */N unsigned qsrv_log$v_activ_kslog : 1; /* Turn on Kserver logging */N unsigned qsrv_log$v_activ_msg : 1; /* Turn on message logging */N unsigned qsrv_log$v_activ_evt : 1; /* Turn on event logging */N unsigned qsrv_log$v_activ_cnt : 1; /* Turn on coun ) ter logging */N unsigned qsrv_log$v_activ_hst : 1; /* Turn on histogram logging */N unsigned qsrv_log$v_activ_vbs : 1; /* Turn on QIO$CONFIGURE verbose */N unsigned qsrv_log$v_filler2 : 7; /* Reserved Compaq internal use */ } qsrv_log$r_bits; } QSRV_LOG; #if !defined(__VAXC)=#define qsrv_log$v_filler1 qsrv_log$r_bits.qsrv_log$v_filler1E#define qsrv_log$v_activ_uclog qsrv_log$r_bits.qsrv_log$v_activ_uclogE#define qsrv_log$v_activ_uslog qsrv_* log$r_bits.qsrv_log$v_activ_uslogE#define qsrv_log$v_activ_kclog qsrv_log$r_bits.qsrv_log$v_activ_kclogE#define qsrv_log$v_activ_kslog qsrv_log$r_bits.qsrv_log$v_activ_kslogA#define qsrv_log$v_activ_msg qsrv_log$r_bits.qsrv_log$v_activ_msgA#define qsrv_log$v_activ_evt qsrv_log$r_bits.qsrv_log$v_activ_evtA#define qsrv_log$v_activ_cnt qsrv_log$r_bits.qsrv_log$v_activ_cntA#define qsrv_log$v_activ_hst qsrv_log$r_bits.qsrv_log$v_activ_hstA#define qsrv_log$v_activ_vbs qsrv_log$r_bits.qsrv_log$ + v_activ_vbs=#define qsrv_log$v_filler2 qsrv_log$r_bits.qsrv_log$v_filler2"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef union _qsrv_log {" unsigned int qsrv_log$l_flags; __struct {N unsigned qsrv_log$v_filler1 : 16; /* Reserved Compaq internal use */N unsigned qsrv_log$v_activ_uclog : 1; /* Turn on Uclient logging */N unsigned qsrv_log$v_activ_uslog : 1; /* Turn on Userver logging */N unsigned qsrv_log$v_activ_, kclog : 1; /* Turn on Kclient logging */N unsigned qsrv_log$v_activ_kslog : 1; /* Turn on Kserver logging */N unsigned qsrv_log$v_activ_msg : 1; /* Turn on message logging */N unsigned qsrv_log$v_activ_evt : 1; /* Turn on event logging */N unsigned qsrv_log$v_activ_cnt : 1; /* Turn on counter logging */N unsigned qsrv_log$v_activ_hst : 1; /* Turn on histogram logging */N unsigned qsrv_log$v_activ_vbs : 1; /* Turn on QIO$CO - NFIGURE verbose */N unsigned qsrv_log$v_filler2 : 7; /* Reserved Compaq internal use */ } qsrv_log$r_bits; } qsrv_log; #if !defined(__VAXC)=#define qsrv_log$v_filler1 qsrv_log$r_bits.qsrv_log$v_filler1E#define qsrv_log$v_activ_uclog qsrv_log$r_bits.qsrv_log$v_activ_uclogE#define qsrv_log$v_activ_uslog qsrv_log$r_bits.qsrv_log$v_activ_uslogE#define qsrv_log$v_activ_kclog qsrv_log$r_bits.qsrv_log$v_activ_kclogE#define qsrv_log$v_activ_kslog qsrv_log$r_bits.qsrv_lo . g$v_activ_kslogA#define qsrv_log$v_activ_msg qsrv_log$r_bits.qsrv_log$v_activ_msgA#define qsrv_log$v_activ_evt qsrv_log$r_bits.qsrv_log$v_activ_evtA#define qsrv_log$v_activ_cnt qsrv_log$r_bits.qsrv_log$v_activ_cntA#define qsrv_log$v_activ_hst qsrv_log$r_bits.qsrv_log$v_activ_hstA#define qsrv_log$v_activ_vbs qsrv_log$r_bits.qsrv_log$v_activ_vbs=#define qsrv_log$v_filler2 qsrv_log$r_bits.qsrv_log$v_filler2"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#def / ine QSRV_LOG$C_LENGTH 4#define QSRV_LOG$K_LENGTH 4 #define QSRV_LOG$S_QSRV_LOG 4N/* */N/* Message logging type codes */N/* */N#define QSRV$K_MSG_SCS 1 /* SCS messages */N#define QSRV$K_MSG_QSP 2 /* QSP messages */R#define QSRV$K0 _MSG_ICC_CONN 3 /* ICC messages - connection management */N#define QSRV$K_MSG_ICC_DATA 4 /* ICC messages - data transfer */Y#define QSRV$K_MIN_MSG 1 /* Minimum documented message filter type code */Y#define QSRV$K_MAX_MSG 4 /* Minimum documented message filter type code */N/* */N/* The following structure defines the data required to specify or receive */N/* a logging 1 data filter tuple. Associated with QSRV$_ADD_FILTER, */N/* QSV$_LIST_FILTERS, and QSRV$_REMOVE_FILTER item codes. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_filter {N char qsrv_filter$t_node [16]; /* Message source node */N unsigned int qsrv_filter$l_type; /* Message source type */N char qsrv_filter$t_device [64]; /* Message source de 2 vice */ } QSRV_FILTER;#else /* __OLD_STARLET */typedef struct _qsrv_filter {N char qsrv_filter$t_node [16]; /* Message source node */N unsigned int qsrv_filter$l_type; /* Message source type */N char qsrv_filter$t_device [64]; /* Message source device */ } qsrv_filter;%#endif /* #ifdef __NEW_STARLET */#define QSRV_FILTER$C_LENGTH 84#define QSRV_FILTER$K_LENGTH 84 $#define QSRV_FILTER$S_QSRV_FIL3 TER 84N/* */N/* The following structure is used to receive histogram data */N/* with QSRV$_KSR_FUNCTION_HISTOGRAM and QSRV$_KSR_IO_BUFFER_HISTOGRAM */N/* item codes. */N/* */N/* The bucket_count is within the range 1 to 64. data[1] to data[64] */N/* will hold the i 4 n range histogram data. data[0] will hold the */N/* underflow data and data[65] will hold the overflow data. This */N/* structure is for reporting predefined histograms via item code. The */N/* low value is in bucket_base and the high value is bucket_base plus */N/* bucket_range. */N/* */ #ifdef __NEW_STARLET typedef struct _qs 5 rv_histogram {N unsigned int qsrv_histogram$l_bucket_count; /* Number of buckets - 2 */& char qsrv_histogram$b_fill_0_ [4];c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifN unsigned __int64 qsrv_histogram$q_bucket_base; /* Base value */#pragma __nomember_alignmentN unsigned __int64 qsrv_histogram$q_bucket_range; /* Value range 6 */N unsigned __int64 qsrv_histogram$q_data [66]; /* Histogram data */ } QSRV_HISTOGRAM;#else /* __OLD_STARLET */ typedef struct _qsrv_histogram {N unsigned int qsrv_histogram$l_bucket_count; /* Number of buckets - 2 */& char qsrv_histogram$b_fill_0_ [4];c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifN unsigned int 7 qsrv_histogram$q_bucket_base [2]; /* Base value */#pragma __nomember_alignmentN unsigned int qsrv_histogram$q_bucket_range [2]; /* Value range */N unsigned int qsrv_histogram$q_data [66] [2]; /* Histogram data */ } qsrv_histogram;%#endif /* #ifdef __NEW_STARLET */$#define QSRV_HISTOGRAM$C_UNDERFLOW 0$#define QSRV_HISTOGRAM$C_OVERFLOW 65##define QSRV_HISTOGRAM$C_LENGTH 552##define QSRV_HISTOGRAM$K_LENGTH 552 +#define QSRV_HISTOGRAM$S_QSRV_HI 8 STOGRAM 552N/* */N/* The following structure is used for the IOSB declaration. The IOSB is a */O/* 2 longword structure which is initialized to zero by the QIOSERVER system */Q/* service as part of request initialization. The first longword will receive */N/* the final condition code for the request as determined by QIO$CONFIGURE. */N/* */ #i 9 fdef __NEW_STARLETtypedef struct _qsrv_iosb {N unsigned int qsrv_iosb$l_pri_status; /* Primary request status */N unsigned int qsrv_iosb$l_sec_status; /* Secondary request status */ } QSRV_IOSB;#else /* __OLD_STARLET */typedef struct _qsrv_iosb {N unsigned int qsrv_iosb$l_pri_status; /* Primary request status */N unsigned int qsrv_iosb$l_sec_status; /* Secondary request status */ } qsrv_iosb;%#endif /* #ifdef __NEW_STARLET */ : #define QSRV_IOSB$C_LENGTH 8#define QSRV_IOSB$K_LENGTH 8 #define QSRV_IOSB$S_QSRV_IOSB 8N/* */R/* The following structure defines the bit masks for the QSRV$_DEFAULT_PRIORITY */N/* and QSRV$_PATH_STATE item codes. */N/* */O/* For the QSRV$_DEFAULT_PRIORITY item code only the priority mask is valid. */N; /* */O/* For the QSRV$_PATH_STATE item code an array of two of these structures is */P/* used. The first entry contains a mask of the associated bits in the value */N/* component (second entry) which are valid for the operation during a SET */N/* function. Only the value component is filled for a SHOW function. */N/* */!#define QSRV_PATH$M_PR< IORITY 0xFF*#define QSRV_PATH$M_LOCAL2SERVER 0x4000000$#define QSRV_PATH$M_QVALID 0x8000000$#define QSRV_PATH$M_VALID 0x10000000%#define QSRV_PATH$M_SERVED 0x20000000(#define QSRV_PATH$M_EXCLUSIVE 0x40000000&#define QSRV_PATH$M_CURRENT 0x80000000%#define QSRV_PATH$M_FILLER2 0x3FFFFFF+#define QSRV_PATH$M_USEABLE_PATH 0x3C000000&#define QSRV_PATH$M_FILLER3 0xC0000000 #ifdef __NEW_STARLETtypedef union _qsrv_path {N unsigned int qsrv_path$l_path_state; /* Path state = */ __struct {N unsigned qsrv_path$v_priority : 8; /* Path priority */* unsigned qsrv_path$v_filler1 : 18;R unsigned qsrv_path$v_local2server : 1; /* Device is local to the server */N unsigned qsrv_path$v_qvalid : 1; /* Path QSLUN is valid */N unsigned qsrv_path$v_valid : 1; /* Path is valid */N unsigned qsrv_path$v_served : 1; /* Path is served */N unsigned qsrv_path$v_e > xclusive : 1; /* Path exclusivity */N unsigned qsrv_path$v_current : 1; /* This path is the current path */& } qsrv_path$r_path_state_bits; __struct {* unsigned qsrv_path$v_filler2 : 26;U unsigned qsrv_path$v_useable_path : 4; /* Mask for Qvalid,valid,and served */) unsigned qsrv_path$v_filler3 : 2;( } qsrv_path$r_path_useable_bits; } QSRV_PATH; #if !defined(__VAXC)M#define qsrv_path$v_priority qsrv_path$r_path_state_bits? .qsrv_path$v_priorityU#define qsrv_path$v_local2server qsrv_path$r_path_state_bits.qsrv_path$v_local2serverI#define qsrv_path$v_qvalid qsrv_path$r_path_state_bits.qsrv_path$v_qvalidG#define qsrv_path$v_valid qsrv_path$r_path_state_bits.qsrv_path$v_validI#define qsrv_path$v_served qsrv_path$r_path_state_bits.qsrv_path$v_servedO#define qsrv_path$v_exclusive qsrv_path$r_path_state_bits.qsrv_path$v_exclusiveK#define qsrv_path$v_current qsrv_path$r_path_state_bits.qsrv_path$v_currentM#define @ qsrv_path$v_filler2 qsrv_path$r_path_useable_bits.qsrv_path$v_filler2W#define qsrv_path$v_useable_path qsrv_path$r_path_useable_bits.qsrv_path$v_useable_pathM#define qsrv_path$v_filler3 qsrv_path$r_path_useable_bits.qsrv_path$v_filler3"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef union _qsrv_path {N unsigned int qsrv_path$l_path_state; /* Path state */ __struct {N unsigned qsrv_path$v_priority : 8; /* Path priority A */* unsigned qsrv_path$v_filler1 : 18;R unsigned qsrv_path$v_local2server : 1; /* Device is local to the server */N unsigned qsrv_path$v_qvalid : 1; /* Path QSLUN is valid */N unsigned qsrv_path$v_valid : 1; /* Path is valid */N unsigned qsrv_path$v_served : 1; /* Path is served */N unsigned qsrv_path$v_exclusive : 1; /* Path exclusivity */N unsigned qsrv_path$v_current : 1; /* B This path is the current path */& } qsrv_path$r_path_state_bits; __struct {* unsigned qsrv_path$v_filler2 : 26;U unsigned qsrv_path$v_useable_path : 4; /* Mask for Qvalid,valid,and served */) unsigned qsrv_path$v_filler3 : 2;( } qsrv_path$r_path_useable_bits; } qsrv_path; #if !defined(__VAXC)M#define qsrv_path$v_priority qsrv_path$r_path_state_bits.qsrv_path$v_priorityU#define qsrv_path$v_local2server qsrv_path$r_path_state_bits.qsrv_pathC $v_local2serverI#define qsrv_path$v_qvalid qsrv_path$r_path_state_bits.qsrv_path$v_qvalidG#define qsrv_path$v_valid qsrv_path$r_path_state_bits.qsrv_path$v_validI#define qsrv_path$v_served qsrv_path$r_path_state_bits.qsrv_path$v_servedO#define qsrv_path$v_exclusive qsrv_path$r_path_state_bits.qsrv_path$v_exclusiveK#define qsrv_path$v_current qsrv_path$r_path_state_bits.qsrv_path$v_currentM#define qsrv_path$v_filler2 qsrv_path$r_path_useable_bits.qsrv_path$v_filler2W#define qsrv_path$v_us D eable_path qsrv_path$r_path_useable_bits.qsrv_path$v_useable_pathM#define qsrv_path$v_filler3 qsrv_path$r_path_useable_bits.qsrv_path$v_filler3"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define QSRV_PATH$C_LENGTH 4#define QSRV_PATH$K_LENGTH 4 #define QSRV_PATH$S_QSRV_PATH 4N/* */N/* The following structure defines bit masks for the QSRV$_ADD_POOL item */N/* code and a struct E ure for the QSRV$_DELETE_POOL_BLOCK item code. */N/* */##define QSRV_POOL$M_SIZE 0x7FFFFFFF"#define QSRV_POOL$M_NPP 0x80000000 #ifdef __NEW_STARLETtypedef union _qsrv_pool {N unsigned int qsrv_pool$l_block_id; /* ID of pool block to delete */N __struct { /* Add to pool */N unsigned qsrv_pool$v_size : 31; /* Number of bytes */ F N unsigned qsrv_pool$v_npp : 1; /* From non-paged pool and */% } qsrv_pool$r_add_block_bits;N/* from S2 space if not set */N unsigned int qsrv_pool$l_modify; /* Change to pool */ } QSRV_POOL; #if !defined(__VAXC)D#define qsrv_pool$v_size qsrv_pool$r_add_block_bits.qsrv_pool$v_sizeB#define qsrv_pool$v_npp qsrv_pool$r_add_block_bits.qsrv_pool$v_npp"#endif /* #if !defined(__VAXC) */ #e G lse /* __OLD_STARLET */typedef union _qsrv_pool {N unsigned int qsrv_pool$l_block_id; /* ID of pool block to delete */N __struct { /* Add to pool */N unsigned qsrv_pool$v_size : 31; /* Number of bytes */N unsigned qsrv_pool$v_npp : 1; /* From non-paged pool and */% } qsrv_pool$r_add_block_bits;N/* from S2 space if not set */N unsiH gned int qsrv_pool$l_modify; /* Change to pool */ } qsrv_pool; #if !defined(__VAXC)D#define qsrv_pool$v_size qsrv_pool$r_add_block_bits.qsrv_pool$v_sizeB#define qsrv_pool$v_npp qsrv_pool$r_add_block_bits.qsrv_pool$v_npp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define QSRV_POOL$C_LENGTH 4#define QSRV_POOL$K_LENGTH 4 #define QSRV_POOL$S_QSRV_POOL 4N/* I */N/* The following structure defines the data for the QSRV$_LIST_POOL_STATS */N/* item code. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_plst { __struct {O unsigned int qsrv_plst$l_tot_size; /* Total number of bytes for type */O unsigned int qsrv_plst$l_free_size; /* Amount of free space in bytes */N unsigned int q J srv_plst$l_nbr_blocks; /* Number of active additions */O unsigned int qsrv_plst$l_nbr_fragments; /* Total number of fragments */W unsigned int qsrv_plst$l_max_frag_size; /* Size in bytes of largest fragment */Q unsigned int qsrv_plst$l_npp_add_reqs; /* Count of requests to add NPP */N unsigned int qsrv_plst$l_max_npp_add_req; /* Max NPP request size */$ } qsrv_plst$r_pool_stat [2]; } QSRV_PLST; #if !defined(__VAXC)1#define qsrv_plst$l_tot_size q K srv_plst$l_tot_size3#define qsrv_plst$l_free_size qsrv_plst$l_free_size5#define qsrv_plst$l_nbr_blocks qsrv_plst$l_nbr_blocks;#define qsrv_plst$l_nbr_fragments qsrv_plst$l_nbr_fragments;#define qsrv_plst$l_max_frag_size qsrv_plst$l_max_frag_size9#define qsrv_plst$l_npp_add_reqs qsrv_plst$l_npp_add_reqs?#define qsrv_plst$l_max_npp_add_req qsrv_plst$l_max_npp_add_req"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _qsrv_plst { __struct {O L unsigned int qsrv_plst$l_tot_size; /* Total number of bytes for type */O unsigned int qsrv_plst$l_free_size; /* Amount of free space in bytes */N unsigned int qsrv_plst$l_nbr_blocks; /* Number of active additions */O unsigned int qsrv_plst$l_nbr_fragments; /* Total number of fragments */W unsigned int qsrv_plst$l_max_frag_size; /* Size in bytes of largest fragment */Q unsigned int qsrv_plst$l_npp_add_reqs; /* Count of requests to add NPP */N un M signed int qsrv_plst$l_max_npp_add_req; /* Max NPP request size */$ } qsrv_plst$r_pool_stat [2]; } qsrv_plst; #if !defined(__VAXC)1#define qsrv_plst$l_tot_size qsrv_plst$l_tot_size3#define qsrv_plst$l_free_size qsrv_plst$l_free_size5#define qsrv_plst$l_nbr_blocks qsrv_plst$l_nbr_blocks;#define qsrv_plst$l_nbr_fragments qsrv_plst$l_nbr_fragments;#define qsrv_plst$l_max_frag_size qsrv_plst$l_max_frag_size9#define qsrv_plst$l_npp_add_reqs qsrv_plst$l_npp_add_reqs?#define N qsrv_plst$l_max_npp_add_req qsrv_plst$l_max_npp_add_req"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* The following constants may be used to reference the pool statistics */N/* data defined previously. */N/* */N#define QSRV_PLST$K_S2 0 /* S2 Sp O ace pool */N#define QSRV_PLST$K_NPP 1 /* Non-paged pool */#define QSRV_PLST$C_LENGTH 56#define QSRV_PLST$K_LENGTH 56 #define QSRV_PLST$S_QSRV_PLST 56N/* */N/* The following structure defines the data for the QSRV$_LIST_POOL_BLOCKS */N/* item code. */N/* P */$#define QSRV_PLBLK$M_SIZE 0x7FFFFFFF##define QSRV_PLBLK$M_NPP 0x80000000 #ifdef __NEW_STARLETtypedef struct _qsrv_plblk {N unsigned int qsrv_plblk$l_block_id; /* Block identifier */ __union {2 unsigned int qsrv_plblk$l_block_size_type; __struct {N unsigned qsrv_plblk$v_size : 31; /* Number of bytes in block */N unsigned qsrv_plblk$v_npp : 1; /* From non-paged pool if set */) } qs Q rv_plblk$r_block_st_bits;" } qsrv_plblk$r_block_desc;N unsigned int qsrv_plblk$l_free_size; /* Amount of free space in bytes */N unsigned int qsrv_plblk$l_nbr_fragments; /* Total number of fragments */T unsigned int qsrv_plblk$l_max_frag_size; /* Size in bytes of largest fragment */ } QSRV_PLBLK; #if !defined(__VAXC)Y#define qsrv_plblk$l_block_size_type qsrv_plblk$r_block_desc.qsrv_plblk$l_block_size_type^#define qsrv_plblk$v_size qsrv_plblk$r_block_desc.qsrv_plb R lk$r_block_st_bits.qsrv_plblk$v_size\#define qsrv_plblk$v_npp qsrv_plblk$r_block_desc.qsrv_plblk$r_block_st_bits.qsrv_plblk$v_npp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _qsrv_plblk {N unsigned int qsrv_plblk$l_block_id; /* Block identifier */ __union {2 unsigned int qsrv_plblk$l_block_size_type; __struct {N unsigned qsrv_plblk$v_size : 31; /* Number of bytes in block */N unsigned q S srv_plblk$v_npp : 1; /* From non-paged pool if set */) } qsrv_plblk$r_block_st_bits;" } qsrv_plblk$r_block_desc;N unsigned int qsrv_plblk$l_free_size; /* Amount of free space in bytes */N unsigned int qsrv_plblk$l_nbr_fragments; /* Total number of fragments */T unsigned int qsrv_plblk$l_max_frag_size; /* Size in bytes of largest fragment */ } qsrv_plblk; #if !defined(__VAXC)Y#define qsrv_plblk$l_block_size_type qsrv_plblk$r_block_desc.qsrv_plblk$l_bl T ock_size_type^#define qsrv_plblk$v_size qsrv_plblk$r_block_desc.qsrv_plblk$r_block_st_bits.qsrv_plblk$v_size\#define qsrv_plblk$v_npp qsrv_plblk$r_block_desc.qsrv_plblk$r_block_st_bits.qsrv_plblk$v_npp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define QSRV_PLBLK$C_LENGTH 20#define QSRV_PLBLK$K_LENGTH 20 "#define QSRV_PLBLK$S_QSRV_PLBLK 20N/* */N/* The following structure defines t U he data for the QSRV$_KCR_COUNTERS */N/* item code. It will receive QIOServer Client root data. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_kcrc {N unsigned int qsrv_kcrc$l_drivers; /* Number of drivers configured */N unsigned int qsrv_kcrc$l_devices; /* Number of devices configured */X unsigned int qsrv_kcrc$l_act_server_conns; /* Number of active server connections V */V unsigned int qsrv_kcrc$l_tot_servers_seen; /* Total number of servers ever seen */W unsigned __int64 qsrv_kcrc$q_cycles_per_sec; /* Number of cycle ticks per second */X unsigned __int64 qsrv_kcrc$q_tot_sio_tics; /* Accumulated CPU time per simple I/O */N unsigned __int64 qsrv_kcrc$q_tot_sio; /* Total simple I/Os */ } QSRV_KCRC;#else /* __OLD_STARLET */typedef struct _qsrv_kcrc {N unsigned int qsrv_kcrc$l_drivers; /* Number of drivers configured W */N unsigned int qsrv_kcrc$l_devices; /* Number of devices configured */X unsigned int qsrv_kcrc$l_act_server_conns; /* Number of active server connections */V unsigned int qsrv_kcrc$l_tot_servers_seen; /* Total number of servers ever seen */W unsigned int qsrv_kcrc$q_cycles_per_sec [2]; /* Number of cycle ticks per second */X unsigned int qsrv_kcrc$q_tot_sio_tics [2]; /* Accumulated CPU time per simple I/O */N unsigned int qsrv_kcrc$q_tot_sio [2]; /* Total simple I/Os X */ } qsrv_kcrc;%#endif /* #ifdef __NEW_STARLET */#define QSRV_KCRC$C_LENGTH 40#define QSRV_KCRC$K_LENGTH 40 #define QSRV_KCRC$S_QSRV_KCRC 40N/* */N/* The following structure defines the data for the QSRV$_KCC_COUNTERS */N/* item code. It will receive QIOServer Client connection event data. */N/* */N/* QSRV_ Y KCRC$L_SERVERS indicates the number of active connections. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_kccc {] unsigned __int64 qsrv_kccc$q_scssystemid; /* SCSSYSTEMID of server for this connection */Z unsigned __int64 qsrv_kccc$q_io_count; /* Overall I/O operations on this connection */e unsigned __int64 qsrv_kccc$q_complex_count; /* Total complex I/O operations on this connection */e unZ signed __int64 qsrv_kccc$q_control_count; /* Total control I/O operations on this connection */j unsigned __int64 qsrv_kccc$q_nbr_conn; /* Number of times a connection has been made to this server */N unsigned __int64 qsrv_kccc$q_conn_time; /* Time of last connection */k unsigned __int64 qsrv_kccc$q_nbr_devices; /* Number of devices using this connection as current path */g unsigned int qsrv_kccc$l_ops_stalled; /* Total operations stalled in Kclient for this connection */g [ unsigned short int qsrv_kccc$w_credit_wait; /* SCS credit waits for this connection from the CDT */N unsigned short int qsrv_kccc$w_reserved_1; /* Reserved for alignment */ } QSRV_KCCC;#else /* __OLD_STARLET */typedef struct _qsrv_kccc {] unsigned int qsrv_kccc$q_scssystemid [2]; /* SCSSYSTEMID of server for this connection */Z unsigned int qsrv_kccc$q_io_count [2]; /* Overall I/O operations on this connection */e unsigned int qsrv_kccc$q_complex_count [2]; /* Total\ complex I/O operations on this connection */e unsigned int qsrv_kccc$q_control_count [2]; /* Total control I/O operations on this connection */j unsigned int qsrv_kccc$q_nbr_conn [2]; /* Number of times a connection has been made to this server */N unsigned int qsrv_kccc$q_conn_time [2]; /* Time of last connection */k unsigned int qsrv_kccc$q_nbr_devices [2]; /* Number of devices using this connection as current path */g unsigned int qsrv_kccc$l_ops_stalled; /* Total opera ] tions stalled in Kclient for this connection */g unsigned short int qsrv_kccc$w_credit_wait; /* SCS credit waits for this connection from the CDT */N unsigned short int qsrv_kccc$w_reserved_1; /* Reserved for alignment */ } qsrv_kccc;%#endif /* #ifdef __NEW_STARLET */#define QSRV_KCCC$C_LENGTH 64#define QSRV_KCCC$K_LENGTH 64 #define QSRV_KCCC$S_QSRV_KCCC 64N/* */N/* The following structure def ^ ines the data for the QSRV$_KCD_COUNTERS */N/* item code. It will receive QIOServer Client device data. */N/* */N/* QSRV_KCRC$L_DEVICES indicates the number of devices. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_kcdc { __union {N char qsrv_kcdc$t_name [16]; /* Device name in ASCIC _ form */ __struct { __union {3 unsigned char qsrv_kcdc$b_name_len; __struct {O unsigned char qsrv_kcdc$ib_name_len; /* Character count */* } qsrv_kcdc$r_fill_2_;& } qsrv_kcdc$r_fill_1_;N char qsrv_kcdc$t_name_str [15]; /* Character string */% } qsrv_kcdc$r_name_ascic;# } qsrv_kcdc$r_name_overlay;V unsigned __int64 qsrv_kcdc$q_io_` count; /* Overall I/O operations to this device */a unsigned __int64 qsrv_kcdc$q_complex_count; /* Total complex I/O operations to this device */a unsigned __int64 qsrv_kcdc$q_control_count; /* Total control I/O operations to this device */N unsigned __int64 qsrv_kcdc$q_rt_time; /* Overall round-trip time */^ unsigned int qsrv_kcdc$l_ops_in_server; /* Current operations in server for this device */c unsigned int qsrv_kcdc$l_ops_stalled; /* Total operations stalled in Kclie a nt for this device */T unsigned int qsrv_kcdc$l_paths; /* Total paths configured for this device */& unsigned int qsrv_kcdc$l_reserved; } QSRV_KCDC; #if !defined(__VAXC)B#define qsrv_kcdc$t_name qsrv_kcdc$r_name_overlay.qsrv_kcdc$t_nameu#define qsrv_kcdc$b_name_len qsrv_kcdc$r_name_overlay.qsrv_kcdc$r_name_ascic.qsrv_kcdc$r_fill_1_.qsrv_kcdc$b_name_len#define qsrv_kcdc$ib_name_len qsrv_kcdc$r_name_overlay.qsrv_kcdc$r_name_ascic.qsrv_kcdc$r_fill_1_.qsrv_kcdc$r_fill_2_.qsrv_kb cdc$ib_\name_lena#define qsrv_kcdc$t_name_str qsrv_kcdc$r_name_overlay.qsrv_kcdc$r_name_ascic.qsrv_kcdc$t_name_str"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _qsrv_kcdc { __union {N char qsrv_kcdc$t_name [16]; /* Device name in ASCIC form */ __struct { __union {3 unsigned char qsrv_kcdc$b_name_len; __struct {O unsigned char qsrv_kcdc$ib_name_len; / c * Character count */* } qsrv_kcdc$r_fill_2_;& } qsrv_kcdc$r_fill_1_;N char qsrv_kcdc$t_name_str [15]; /* Character string */% } qsrv_kcdc$r_name_ascic;# } qsrv_kcdc$r_name_overlay;V unsigned int qsrv_kcdc$q_io_count [2]; /* Overall I/O operations to this device */a unsigned int qsrv_kcdc$q_complex_count [2]; /* Total complex I/O operations to this device */a unsigned int qsrv_kcdc$q_control_count [2]; /* T d otal control I/O operations to this device */N unsigned int qsrv_kcdc$q_rt_time [2]; /* Overall round-trip time */^ unsigned int qsrv_kcdc$l_ops_in_server; /* Current operations in server for this device */c unsigned int qsrv_kcdc$l_ops_stalled; /* Total operations stalled in Kclient for this device */T unsigned int qsrv_kcdc$l_paths; /* Total paths configured for this device */& unsigned int qsrv_kcdc$l_reserved; } qsrv_kcdc; #if !defined(__VAXC)B#define qs e rv_kcdc$t_name qsrv_kcdc$r_name_overlay.qsrv_kcdc$t_nameu#define qsrv_kcdc$b_name_len qsrv_kcdc$r_name_overlay.qsrv_kcdc$r_name_ascic.qsrv_kcdc$r_fill_1_.qsrv_kcdc$b_name_len#define qsrv_kcdc$ib_name_len qsrv_kcdc$r_name_overlay.qsrv_kcdc$r_name_ascic.qsrv_kcdc$r_fill_1_.qsrv_kcdc$r_fill_2_.qsrv_kcdc$ib_\name_lena#define qsrv_kcdc$t_name_str qsrv_kcdc$r_name_overlay.qsrv_kcdc$r_name_ascic.qsrv_kcdc$t_name_str"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#def f ine QSRV_KCDC$C_LENGTH 64#define QSRV_KCDC$K_LENGTH 64 #define QSRV_KCDC$S_QSRV_KCDC 64N/* */N/* The following structure defines the data for the QSRV$_KSR_COUNTERS */N/* item code. It will receive QIOServer Server root data. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_ksrc {N unsigned int qsrv_ksrc$l_dev g ices; /* Number of devices configured */^ unsigned int qsrv_ksrc$l_act_client_conns; /* Number of active connections with clients */V unsigned int qsrv_ksrc$l_tot_clients_seen; /* Total number of clients ever seen */! char qsrv_ksrc$b_fill_3_ [4];c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifW unsigned __int64 qsrv_ksrc$q_cycles_per_sec;h /* Number of cycle ticks per second */#pragma __nomember_alignmentP unsigned __int64 qsrv_ksrc$q_peak_buffer; /* Peak buffer pool usage in KB */` unsigned __int64 qsrv_ksrc$q_buffer_wait; /* Number of times I/Os waited for buffer space */S unsigned __int64 qsrv_ksrc$q_fragments; /* Number of I/O fragments performed */S unsigned __int64 qsrv_ksrc$q_frag_io; /* Number of I/O operations fragmented */] unsigned __int64 qsrv_ksrc$q_qsmqe_exp; /* Number of times Kserver expanded QS i MQE list */V unsigned __int64 qsrv_ksrc$q_peak_qsmqe; /* Max number of QSMQEs ever allocated */X unsigned __int64 qsrv_ksrc$q_tot_sio_tics; /* Accumulated CPU time per simple I/O */L unsigned __int64 qsrv_ksrc$q_tot_sio; /* Total simple I/O operations */ } QSRV_KSRC;#else /* __OLD_STARLET */typedef struct _qsrv_ksrc {N unsigned int qsrv_ksrc$l_devices; /* Number of devices configured */^ unsigned int qsrv_ksrc$l_act_client_conns; /* Number of active connectio j ns with clients */V unsigned int qsrv_ksrc$l_tot_clients_seen; /* Total number of clients ever seen */! char qsrv_ksrc$b_fill_3_ [4];c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifW unsigned int qsrv_ksrc$q_cycles_per_sec [2]; /* Number of cycle ticks per second */#pragma __nomember_alignmentP unsigned int qsrv_ksrc$q_peak_buffer [2]; /* Peak k buffer pool usage in KB */` unsigned int qsrv_ksrc$q_buffer_wait [2]; /* Number of times I/Os waited for buffer space */S unsigned int qsrv_ksrc$q_fragments [2]; /* Number of I/O fragments performed */S unsigned int qsrv_ksrc$q_frag_io [2]; /* Number of I/O operations fragmented */] unsigned int qsrv_ksrc$q_qsmqe_exp [2]; /* Number of times Kserver expanded QSMQE list */V unsigned int qsrv_ksrc$q_peak_qsmqe [2]; /* Max number of QSMQEs ever allocated */X unsigned int qsrv_ l ksrc$q_tot_sio_tics [2]; /* Accumulated CPU time per simple I/O */L unsigned int qsrv_ksrc$q_tot_sio [2]; /* Total simple I/O operations */ } qsrv_ksrc;%#endif /* #ifdef __NEW_STARLET */#define QSRV_KSRC$C_LENGTH 88#define QSRV_KSRC$K_LENGTH 88 #define QSRV_KSRC$S_QSRV_KSRC 88N/* */N/* The following structure defines the data for the QSRV$_KSC_COUNTERS */N/* item code. It will receive QIOServer m Server connection event data. */N/* */N/* QSRV_KSRC$L_CLIENTS indicates the number of connections. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_kscc {] unsigned __int64 qsrv_kscc$q_scssystemid; /* SCSSYSTEMID of client for this connection */Z unsigned __int64 qsrv_kscc$q_io_count; /* Overall I/O operations on thn is connection */e unsigned __int64 qsrv_kscc$q_complex_count; /* Total complex I/O operations on this connection */e unsigned __int64 qsrv_kscc$q_control_count; /* Total control I/O operations on this connection */j unsigned __int64 qsrv_kscc$q_nbr_conn; /* Number of times a connection has been made to this client */N unsigned __int64 qsrv_kscc$q_conn_time; /* Time of last connection */c unsigned __int64 qsrv_kscc$q_bad_msgs; /* Number of bad messages received on this connec o tion */Z unsigned short int qsrv_kscc$w_credit_wait; /* SCS credit waits for this connection */V unsigned short int qsrv_kscc$w_bdlt_wait; /* SCS BDLT waits for this connection */& unsigned int qsrv_kscc$l_reserved; } QSRV_KSCC;#else /* __OLD_STARLET */typedef struct _qsrv_kscc {] unsigned int qsrv_kscc$q_scssystemid [2]; /* SCSSYSTEMID of client for this connection */Z unsigned int qsrv_kscc$q_io_count [2]; /* Overall I/O operations on this connection */e unsip gned int qsrv_kscc$q_complex_count [2]; /* Total complex I/O operations on this connection */e unsigned int qsrv_kscc$q_control_count [2]; /* Total control I/O operations on this connection */j unsigned int qsrv_kscc$q_nbr_conn [2]; /* Number of times a connection has been made to this client */N unsigned int qsrv_kscc$q_conn_time [2]; /* Time of last connection */c unsigned int qsrv_kscc$q_bad_msgs [2]; /* Number of bad messages received on this connection */Z unsigned sho q rt int qsrv_kscc$w_credit_wait; /* SCS credit waits for this connection */V unsigned short int qsrv_kscc$w_bdlt_wait; /* SCS BDLT waits for this connection */& unsigned int qsrv_kscc$l_reserved; } qsrv_kscc;%#endif /* #ifdef __NEW_STARLET */#define QSRV_KSCC$C_LENGTH 64#define QSRV_KSCC$K_LENGTH 64 #define QSRV_KSCC$S_QSRV_KSCC 64N/* */N/* The following structure defines the data for the QSRV$_KSD_ r COUNTERS */N/* item code. It will receive QIOServer server device data. */N/* */N/* QSRV_KSRC$L_DEVICES indicates the number of devices. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_ksdc { __union {N char qsrv_ksdc$t_name [16]; /* Device name in ASCIC form */ __struct s { __union {3 unsigned char qsrv_ksdc$b_name_len; __struct {O unsigned char qsrv_ksdc$ib_name_len; /* Character count */* } qsrv_ksdc$r_fill_5_;& } qsrv_ksdc$r_fill_4_;N char qsrv_ksdc$t_name_str [15]; /* Character string */% } qsrv_ksdc$r_name_ascic;# } qsrv_ksdc$r_name_overlay;V unsigned __int64 qsrv_ksdc$q_io_count; /* Overall I/O operationst to this device */a unsigned __int64 qsrv_ksdc$q_complex_count; /* Total complex I/O operations to this device */a unsigned __int64 qsrv_ksdc$q_control_count; /* Total control I/O operations to this device */m unsigned __int64 qsrv_ksdc$q_sio_dev_time; /* Total time spent in the device for simple I/O operations */d unsigned int qsrv_ksdc$l_queue_length; /* Number of operations in the device now from Kserver */N unsigned int qsrv_ksdc$l_ops_stalled; /* Number of operations stalle u d */ } QSRV_KSDC; #if !defined(__VAXC)B#define qsrv_ksdc$t_name qsrv_ksdc$r_name_overlay.qsrv_ksdc$t_nameu#define qsrv_ksdc$b_name_len qsrv_ksdc$r_name_overlay.qsrv_ksdc$r_name_ascic.qsrv_ksdc$r_fill_4_.qsrv_ksdc$b_name_len#define qsrv_ksdc$ib_name_len qsrv_ksdc$r_name_overlay.qsrv_ksdc$r_name_ascic.qsrv_ksdc$r_fill_4_.qsrv_ksdc$r_fill_5_.qsrv_ksdc$ib_\name_lena#define qsrv_ksdc$t_name_str qsrv_ksdc$r_name_overlay.qsrv_ksdc$r_name_ascic.qsrv_ksdc$t_name_str"#endif /* #if !definev d(__VAXC) */ #else /* __OLD_STARLET */typedef struct _qsrv_ksdc { __union {N char qsrv_ksdc$t_name [16]; /* Device name in ASCIC form */ __struct { __union {3 unsigned char qsrv_ksdc$b_name_len; __struct {O unsigned char qsrv_ksdc$ib_name_len; /* Character count */* } qsrv_ksdc$r_fill_5_;& } qsrv_ksdc$r_fill_4_;N char qsrv_ksdc$t_name_w str [15]; /* Character string */% } qsrv_ksdc$r_name_ascic;# } qsrv_ksdc$r_name_overlay;V unsigned int qsrv_ksdc$q_io_count [2]; /* Overall I/O operations to this device */a unsigned int qsrv_ksdc$q_complex_count [2]; /* Total complex I/O operations to this device */a unsigned int qsrv_ksdc$q_control_count [2]; /* Total control I/O operations to this device */m unsigned int qsrv_ksdc$q_sio_dev_time [2]; /* Total time spent in the device for simple I/ x O operations */d unsigned int qsrv_ksdc$l_queue_length; /* Number of operations in the device now from Kserver */N unsigned int qsrv_ksdc$l_ops_stalled; /* Number of operations stalled */ } qsrv_ksdc; #if !defined(__VAXC)B#define qsrv_ksdc$t_name qsrv_ksdc$r_name_overlay.qsrv_ksdc$t_nameu#define qsrv_ksdc$b_name_len qsrv_ksdc$r_name_overlay.qsrv_ksdc$r_name_ascic.qsrv_ksdc$r_fill_4_.qsrv_ksdc$b_name_len#define qsrv_ksdc$ib_name_len qsrv_ksdc$r_name_overlay.qsrv_ksdc$r_name_as y cic.qsrv_ksdc$r_fill_4_.qsrv_ksdc$r_fill_5_.qsrv_ksdc$ib_\name_lena#define qsrv_ksdc$t_name_str qsrv_ksdc$r_name_overlay.qsrv_ksdc$r_name_ascic.qsrv_ksdc$t_name_str"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define QSRV_KSDC$C_LENGTH 56#define QSRV_KSDC$K_LENGTH 56 #define QSRV_KSDC$S_QSRV_KSDC 56N/* */N/* The following structure defines the data for the QSRV$_UCR_COUNTERS z */N/* item code. It will receive QIO$CONFIGURE Client root data. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_ucrc {N unsigned int qsrv_ucrc$l_devices; /* Number of configured devices */N unsigned int qsrv_ucrc$l_paths; /* Total number of configured paths */P unsigned int qsrv_ucrc$l_servers; /* Total number of configured servers */S unsigned int qsrv_ucrc$l_pk_dc_threads { ; /* Peak device configuration threads */N unsigned int qsrv_ucrc$l_pk_srv_thread; /* Peak servers per thread */! char qsrv_ucrc$b_fill_6_ [4];c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifU unsigned __int64 qsrv_ucrc$q_sysmgt_rqsts; /* Total system management requests */#pragma __nomember_alignmentO unsigned __int64 qsrv_ucrc$q_ubuf_ | waits; /* Total waits for Ubuf/Uapibuf */ } QSRV_UCRC;#else /* __OLD_STARLET */typedef struct _qsrv_ucrc {N unsigned int qsrv_ucrc$l_devices; /* Number of configured devices */N unsigned int qsrv_ucrc$l_paths; /* Total number of configured paths */P unsigned int qsrv_ucrc$l_servers; /* Total number of configured servers */S unsigned int qsrv_ucrc$l_pk_dc_threads; /* Peak device configuration threads */N unsigned int qsrv_ucrc$l_pk_srv_thread; /* Peak se } rvers per thread */! char qsrv_ucrc$b_fill_6_ [4];c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifU unsigned int qsrv_ucrc$q_sysmgt_rqsts [2]; /* Total system management requests */#pragma __nomember_alignmentO unsigned int qsrv_ucrc$q_ubuf_waits [2]; /* Total waits for Ubuf/Uapibuf */ } qsrv_ucrc;%#endif /* #ifdef __NEW_STARLET * ~ /#define QSRV_UCRC$C_LENGTH 40#define QSRV_UCRC$K_LENGTH 40 #define QSRV_UCRC$S_QSRV_UCRC 40N/* */N/* The following structure defines the data for the QSRV$_UCC_COUNTERS */N/* item code. It will receive QIO$CONFIGURE Client connection event data. */N/* */N/* QSRV_UCRC$L_SERVERS indicates the number of connections. */N  /* */N/* Note that Uclient does not maintain an active connection to a server; */N/* it establishes a connection only when Uclient wants something. These */N/* counters count all events since Uclient discovered the server. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_uccc {N unsigned __int64 qsrv_uccc$q_scssystemid; /* S CSSYSTEMID of this server */^ unsigned __int64 qsrv_uccc$q_connections; /* Number of ICC connections made to a server */N unsigned __int64 qsrv_uccc$q_conn_time; /* Time of last ICC connection */P unsigned __int64 qsrv_uccc$q_dc_msgs; /* Number of device config messages */X unsigned __int64 qsrv_uccc$q_cm_msgs; /* Number of connection management messages */ } QSRV_UCCC;#else /* __OLD_STARLET */typedef struct _qsrv_uccc {N unsigned int qsrv_uccc$q_scssystemid [2]; /* SCSSYSTEMID of this server */^ unsigned int qsrv_uccc$q_connections [2]; /* Number of ICC connections made to a server */N unsigned int qsrv_uccc$q_conn_time [2]; /* Time of last ICC connection */P unsigned int qsrv_uccc$q_dc_msgs [2]; /* Number of device config messages */X unsigned int qsrv_uccc$q_cm_msgs [2]; /* Number of connection management messages */ } qsrv_uccc;%#endif /* #ifdef __NEW_STARLET */#define QSRV_UCCC$C_LENGTH 40#define QSRV_UCCC$K_LENGTH 40 #define QSRV_UCCC$S_QSRV_UCCC 40N/* */N/* The following structure defines the data for the QSRV$_USR_COUNTERS */N/* item code. It will receive QIO$CONFIGURE Server root data. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_usrc {N unsigned int qsrv_usrc$l_devices; /* Number of configured devices */P unsigned int qsrv_usrc$l_clients; /* Total number of configured servers */S unsigned int qsrv_usrc$l_pk_dc_threads; /* Peak device configuration threads */N unsigned int qsrv_usrc$l_pk_clt_thread; /* Peak clients per thread */U unsigned __int64 qsrv_usrc$q_sysmgt_rqsts; /* Total system management requests */O unsigned __int64 qsrv_usrc$q_ubuf_waits; /* Total waits for Ubuf/Uapibuf */ } QSRV_USRC;#else /* __OLD_STARLET */typedef struct _qsrv_usrc {N unsigned int qsrv_us rc$l_devices; /* Number of configured devices */P unsigned int qsrv_usrc$l_clients; /* Total number of configured servers */S unsigned int qsrv_usrc$l_pk_dc_threads; /* Peak device configuration threads */N unsigned int qsrv_usrc$l_pk_clt_thread; /* Peak clients per thread */U unsigned int qsrv_usrc$q_sysmgt_rqsts [2]; /* Total system management requests */O unsigned int qsrv_usrc$q_ubuf_waits [2]; /* Total waits for Ubuf/Uapibuf */ } qsrv_usrc;%#endif /* #ifdef __NEW_STARLET */#define QSRV_USRC$C_LENGTH 32#define QSRV_USRC$K_LENGTH 32 #define QSRV_USRC$S_QSRV_USRC 32N/* */N/* The following structure defines the data for the QSRV$_USC_COUNTERS */N/* item code. It will receive QIO$CONFIGURE Server connection event data. */N/* */N/* QSRV_USRC$L_CLIENTS indicates the number of connections . */N/* */P/* These counters count all events since Userver was connected to the client. */N/* */ #ifdef __NEW_STARLETtypedef struct _qsrv_uscc {N unsigned __int64 qsrv_uscc$q_scssystemid; /* SCSSYSTEMID of this client */^ unsigned __int64 qsrv_uscc$q_connections; /* Number of ICC connections made to a client */N unsign ed __int64 qsrv_uscc$q_conn_time; /* Time of last ICC connection */P unsigned __int64 qsrv_uscc$q_dc_msgs; /* Number of device config messages */X unsigned __int64 qsrv_uscc$q_cm_msgs; /* Number of connection management messages */ } QSRV_USCC;#else /* __OLD_STARLET */typedef struct _qsrv_uscc {N unsigned int qsrv_uscc$q_scssystemid [2]; /* SCSSYSTEMID of this client */^ unsigned int qsrv_uscc$q_connections [2]; /* Number of ICC connections made to a client */N unsi gned int qsrv_uscc$q_conn_time [2]; /* Time of last ICC connection */P unsigned int qsrv_uscc$q_dc_msgs [2]; /* Number of device config messages */X unsigned int qsrv_uscc$q_cm_msgs [2]; /* Number of connection management messages */ } qsrv_uscc;%#endif /* #ifdef __NEW_STARLET */#define QSRV_USCC$C_LENGTH 40#define QSRV_USCC$K_LENGTH 40 #define QSRV_USCC$S_QSRV_USCC 40N/* */N/* QIOserver Counters Buffer. This defines the buffer header, */N/* and contains a union of all the various counter types included. */N/* */N/* */N/* The following structure defines the data for the common portion of */N/* each of the counter item codes and forms the root structure. */N/* */-#define QSRV_COUNTERS$M_RESERVED_FLAGS 0xFFFF #ifdef __NEW_STARLET typedef struct _qsrv_cntr_root {N unsigned int qsrv_counters$l_kc_vers; /* KClient version identifier */N unsigned int qsrv_counters$l_ks_vers; /* KServer version identifier */v unsigned short int qsrv_counters$w_counters_type; /* Counter type -- value matches the system service item code */] __union { /* Flags -- passed from QIO$CONFIGURE to reque stor */1 unsigned short int qsrv_counters$w_flags; __struct {Z unsigned qsrv_counters$v_reserved_flags : 16; /* No flags currently defined */) } qsrv_counters$r_flags_bits;( } qsrv_counters$r_flags_overlay;m unsigned int qsrv_counters$l_size; /* Size in bytes of counters structure returned from QIO$CONFIGURE */W unsigned __int64 qsrv_counters$q_time; /* System Time when the counters obtained */ } QSRV_CNTR_ROOT; #if !defined(_ _VAXC)Q#define qsrv_counters$w_flags qsrv_counters$r_flags_overlay.qsrv_counters$w_flags~#define qsrv_counters$v_reserved_flags qsrv_counters$r_flags_overlay.qsrv_counters$r_flags_bits.qsrv_counters$v_reserved_flags"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ typedef struct _qsrv_cntr_root {N unsigned int qsrv_counters$l_kc_vers; /* KClient version identifier */N unsigned int qsrv_counters$l_ks_vers; /* KServer version identifier */v unsigned short i nt qsrv_counters$w_counters_type; /* Counter type -- value matches the system service item code */] __union { /* Flags -- passed from QIO$CONFIGURE to requestor */1 unsigned short int qsrv_counters$w_flags; __struct {Z unsigned qsrv_counters$v_reserved_flags : 16; /* No flags currently defined */) } qsrv_counters$r_flags_bits;( } qsrv_counters$r_flags_overlay;m unsigned int qsrv_counters$l_size; /* Size in bytes o f counters structure returned from QIO$CONFIGURE */W unsigned int qsrv_counters$q_time [2]; /* System Time when the counters obtained */ } qsrv_cntr_root; #if !defined(__VAXC)Q#define qsrv_counters$w_flags qsrv_counters$r_flags_overlay.qsrv_counters$w_flags~#define qsrv_counters$v_reserved_flags qsrv_counters$r_flags_overlay.qsrv_counters$r_flags_bits.qsrv_counters$v_reserved_flags"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */"#define QSRV_CNTR_RO OT$C_LENGTH 24"#define QSRV_CNTR_ROOT$K_LENGTH 24 *#define QSRV_CNTR_ROOT$S_QSRV_CNTR_ROOT 24N/* Note changes to this structure will need to be matched in */N/* [LIB]QSMQEDEF */(#define QSRV_COUNTERS$K_KCROOT_LENGTH 64(#define QSRV_COUNTERS$K_KCCONN_LENGTH 88'#define QSRV_COUNTERS$K_KCDEV_LENGTH 88)#define QSRV_COUNTERS$K_KSROOT_LENGTH 112(#define QSRV_COUNTERS$K_KSCONN_LENGTH 88'#define QSRV_COUNTERS$K_KSDEV_LENG TH 80(#define QSRV_COUNTERS$K_UCROOT_LENGTH 64(#define QSRV_COUNTERS$K_UCCONN_LENGTH 64(#define QSRV_COUNTERS$K_USROOT_LENGTH 56(#define QSRV_COUNTERS$K_USCONN_LENGTH 64 #ifdef __NEW_STARLETtypedef struct _qsrv_counters {0 QSRV_CNTR_ROOT qsrv_counters$r_qsrvcntrroot;N __union { /* Counters union */N QSRV_KCRC qsrv_counters$r_kcroot; /* Kclient root counters */N QSRV_KCCC qsrv_counters$r_kcconn; /* Kclient connect ion counters */N QSRV_KCDC qsrv_counters$r_kcdev; /* Kclient device counters */N QSRV_KSRC qsrv_counters$r_ksroot; /* Kserver root counters */N QSRV_KSCC qsrv_counters$r_ksconn; /* Kserver connection counters */N QSRV_KSDC qsrv_counters$r_ksdev; /* Kserver device counters */N QSRV_UCRC qsrv_counters$r_ucroot; /* Uclient root counters */N QSRV_UCCC qsrv_counters$r_ucconn; /* Uclient connection counters */N QSRV_USRC qsrv_counters$r_usroot; /* Userver root counters */N QSRV_USCC qsrv_counters$r_usconn; /* Userver connection counters */( } qsrv_counters$r_counters_body; } QSRV_COUNTERS; #if !defined(__VAXC)S#define qsrv_counters$r_kcroot qsrv_counters$r_counters_body.qsrv_counters$r_kcrootS#define qsrv_counters$r_kcconn qsrv_counters$r_counters_body.qsrv_counters$r_kcconnQ#define qsrv_counters$r_kcdev qsrv_counters$r_counters_body.qsrv_counters$r_kcdevS#defin e qsrv_counters$r_ksroot qsrv_counters$r_counters_body.qsrv_counters$r_ksrootS#define qsrv_counters$r_ksconn qsrv_counters$r_counters_body.qsrv_counters$r_ksconnQ#define qsrv_counters$r_ksdev qsrv_counters$r_counters_body.qsrv_counters$r_ksdevS#define qsrv_counters$r_ucroot qsrv_counters$r_counters_body.qsrv_counters$r_ucrootS#define qsrv_counters$r_ucconn qsrv_counters$r_counters_body.qsrv_counters$r_ucconnS#define qsrv_counters$r_usroot qsrv_counters$r_counters_body.qsrv_counters$r_usroot S#define qsrv_counters$r_usconn qsrv_counters$r_counters_body.qsrv_counters$r_usconn"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _qsrv_counters {0 qsrv_cntr_root qsrv_counters$r_qsrvcntrroot;N __union { /* Counters union */N qsrv_kcrc qsrv_counters$r_kcroot; /* Kclient root counters */N qsrv_kccc qsrv_counters$r_kcconn; /* Kclient connection counters */N qsrv_kcdc qsrv _counters$r_kcdev; /* Kclient device counters */N qsrv_ksrc qsrv_counters$r_ksroot; /* Kserver root counters */N qsrv_kscc qsrv_counters$r_ksconn; /* Kserver connection counters */N qsrv_ksdc qsrv_counters$r_ksdev; /* Kserver device counters */N qsrv_ucrc qsrv_counters$r_ucroot; /* Uclient root counters */N qsrv_uccc qsrv_counters$r_ucconn; /* Uclient connection counters */N qsrv_usrc qsrv_counters$r_usroot; /* Use rver root counters */N qsrv_uscc qsrv_counters$r_usconn; /* Userver connection counters */( } qsrv_counters$r_counters_body; } qsrv_counters; #if !defined(__VAXC)S#define qsrv_counters$r_kcroot qsrv_counters$r_counters_body.qsrv_counters$r_kcrootS#define qsrv_counters$r_kcconn qsrv_counters$r_counters_body.qsrv_counters$r_kcconnQ#define qsrv_counters$r_kcdev qsrv_counters$r_counters_body.qsrv_counters$r_kcdevS#define qsrv_counters$r_ksroot qsrv_counters$r_c ounters_body.qsrv_counters$r_ksrootS#define qsrv_counters$r_ksconn qsrv_counters$r_counters_body.qsrv_counters$r_ksconnQ#define qsrv_counters$r_ksdev qsrv_counters$r_counters_body.qsrv_counters$r_ksdevS#define qsrv_counters$r_ucroot qsrv_counters$r_counters_body.qsrv_counters$r_ucrootS#define qsrv_counters$r_ucconn qsrv_counters$r_counters_body.qsrv_counters$r_ucconnS#define qsrv_counters$r_usroot qsrv_counters$r_counters_body.qsrv_counters$r_usrootS#define qsrv_counters$r_usconn qsrv_coun ters$r_counters_body.qsrv_counters$r_usconn"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */"#define QSRV_COUNTERS$C_LENGTH 112"#define QSRV_COUNTERS$K_LENGTH 112 )#define QSRV_COUNTERS$S_QSRV_COUNTERS 112 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus } #endif#pragma __standard #endif /* __QSRVDEF_LOADED */ ww;>/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $QUIDEF ***/#ifndef __QUIDEF_LOADED#define __QUIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #i fdef __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 N/* */ N/* Get Queue Information Service ($GETQUI) definitions. */N/* */X/* NOTE: New items must always be added at the end so users will not have to relink. */N/* */N/* NOTE: Update [VMSLIB.SRC]QUITABLE.MAR to reflect changes in $QUIDEF. */N/* */N/*  */N/* Function codes */N/* */N#define QUI$_CANCEL_OPERATION 1 /* Cancel a wildcard operation */N#define QUI$_DISPLAY_CHARACTERISTIC 2 /* Return characteristic attributes */N#define QUI$_DISPLAY_FILE 3 /* Return file attributes */N#define QUI$_DISPLAY_FORM 4  /* Return form attributes */N#define QUI$_DISPLAY_JOB 5 /* Return job attributes */N#define QUI$_DISPLAY_QUEUE 6 /* Return queue attributes */O#define QUI$_TRANSLATE_QUEUE 7 /* Validate and translate queue name */}#define QUI$_DISPLAY_ENTRY 8 /* Return entry (job) attributes (without first having to establish queue context) */p#define QUI$_DISPLAY_QMAN 9 /* Reserved for Digital (used by job control to get qman information) */N#define QUI$_DISPLAY_MANAGER 10 /* Return queue manager attributes */N#define QUI$K_MIN_FUNC 1 /* Minimum GETQUI function code */N#define QUI$K_MAX_FUNC 10 /* Maximum GETQUI function code */N/* */N/* Item codes */N/* */N#define  QUI$_ACCOUNT_NAME 1 /* Job: Submitter's account name */N#define QUI$_AFTER_TIME 2 /* Job: /AFTER=time */N#define QUI$_ASSIGNED_QUEUE_NAME 3 /* Queue: ASSIGN/QUEUE target */N#define QUI$_BASE_PRIORITY 4 /* Queue: /BASE_PRIORITY=n */N#define QUI$_CHARACTERISTIC_NAME 5 /* Characteristic: Name */N#define QUI$_CHARACTERISTIC_NUMBER 6 /* Characteristic: Number */R#define QUI$_CHARACTERISTICS 7  /* Job, queue: /CHARACTERISTICS=(c,...) */N#define QUI$_CHECKPOINT_DATA 8 /* Job: Checkpoint data */N#define QUI$_CLI 9 /* Job: /CLI=filename */X#define QUI$_COMPLETED_BLOCKS 10 /* Job: Completed blocks including checkpoint */N#define QUI$_CONDITION_VECTOR 11 /* Job: Completion status */N#define QUI$_CPU_DEFAULT 12 /* Queue: /CPUDEFAULT=t */N#define QUI$_CPU_LIMIT 13 /* Job , queue: /CPUMAXIMUM=t */N#define QUI$_DEVICE_NAME 14 /* Queue: /ON=device */N#define QUI$_ENTRY_NUMBER 15 /* Job: Entry number */N#define QUI$_FILE_COPIES 16 /* File: /COPIES=n */b#define QUI$_FILE_COPIES_CHKPT 17 /* File: File copies checkpoint (for internal use only) */X/* (note this item code is intentionally not documented and reserved for Digital use) */N#define QUI$_FILE_COPIES_DONE 18 /* File: File copies completed */N#define QUI$_FILE_FLAGS 19 /* File: Boolean information */N#define QUI$_FILE_SETUP_MODULES 20 /* File: /SETUP=(module,...) */N#define QUI$_FILE_SPECIFICATION 21 /* File: Full file specification */N#define QUI$_FILE_STATUS 22 /* File: Status information */N#define QUI$_FIRST_PAGE 23 /* File: /PAGES=(n,"") */N#define QUI$_FORM_DESCRIPTION 24 /* Form: /DESCRIPTION=string */N#define QUI$_FORM_FLAGS 25 /* Form: Boolean information */N#define QUI$_FORM_LENGTH 26 /* Form: /LENGTH=n */N#define QUI$_FORM_MARGIN_BOTTOM 27 /* Form: /MARGIN=BOTTOM=n */N#define QUI$_FORM_MARGIN_LEFT 28 /* Form: /MARGIN=LEFT=n */N#define QUI$_FORM_MARGIN_RIGHT 29 /* Form: /MARGIN=RIGHT=n */N#define QUI$_FORM_MARGIN_TOP 30 /* Form: /MARGIN=TOP=n */N#define QUI$_F ORM_NAME 31 /* Form, job, queue: Form name */N#define QUI$_FORM_NUMBER 32 /* Form: Number */N#define QUI$_FORM_SETUP_MODULES 33 /* Form: /SETUP=(module,...) */N#define QUI$_FORM_STOCK 34 /* Form: /STOCK=stock-name */N#define QUI$_FORM_WIDTH 35 /* Form: /WIDTH=n */N#define QUI$_GENERIC_TARGET 36 /* Queue: /GENERIC=(queue-name,...) */N#define QUI$_INTERVENING_BLOCKS 37  /* Job: Intervening pending blocks */N#define QUI$_INTERVENING_JOBS 38 /* Job: Intervening pending jobs */N#define QUI$_JOB_COPIES 39 /* Job: /JOB_COUNT=n */`#define QUI$_JOB_COPIES_CHKPT 40 /* Job: Job copies checkpoint (for internal use only) */X/* (note this item code is intentionally not documented and reserved for Digital use) */N#define QUI$_JOB_COPIES_DONE 41 /* Job: Job copies completed */N#define QUI$_JOB_FLAGS 42  /* Job: Boolean information */N#define QUI$_JOB_LIMIT 43 /* Queue: /JOB_LIMIT=n */N#define QUI$_JOB_NAME 44 /* Job: Name */Q#define QUI$_JOB_RESET_MODULES 45 /* Queue: /SEPARATE=RESET=(module,...) */N#define QUI$_JOB_SIZE 46 /* Job: Total blocks in job */N#define QUI$_JOB_SIZE_MAXIMUM 47 /* Queue: /BLOCK_LIMIT=n */N#define QUI$_JOB_SIZE_MINIMUM 48 /* Queue: /BLOCK_LIM IT=(n,"") */N#define QUI$_JOB_STATUS 49 /* Job: Status information */N#define QUI$_LAST_PAGE 50 /* File: /PAGES=n */P#define QUI$_LIBRARY_SPECIFICATION 51 /* Queue: /LIBRARY=file-specification */N#define QUI$_LOG_QUEUE 52 /* Job: /PRINTER=queue-name */O#define QUI$_LOG_SPECIFICATION 53 /* Job: /LOG_FILE=file-specification */N#define QUI$_NOTE 54 /* Job: /NOTE=string */N#d efine QUI$_OPERATOR_REQUEST 55 /* Job: /OPERATOR=string */N#define QUI$_OWNER_UIC 56 /* Queue: /OWNER=uic */N#define QUI$_PAGE_SETUP_MODULES 57 /* Form: /PAGE_SETUP=(module,...) */N#define QUI$_PARAMETER_1 58 /* Job: /PARAMETER=string */#define QUI$_PARAMETER_2 59#define QUI$_PARAMETER_3 60#define QUI$_PARAMETER_4 61#define QUI$_PARAMETER_5 62#define QUI$_PARAMETER_6 63#define QUI$_PARAMETER_7 64#define  QUI$_PARAMETER_8 65N#define QUI$_PRIORITY 66 /* Job: /PRIORITY=n */N#define QUI$_PROCESSOR 67 /* Queue: /PROCESSOR=filename */N#define QUI$_PROTECTION 68 /* Queue: /PROTECTION=mask */N#define QUI$_QUEUE_FLAGS 69 /* Queue: Boolean information */N#define QUI$_QUEUE_NAME 70 /* Job, queue: Queue name */N#define QUI$_QUEUE_STATUS 71 /* Queue: Status information */f#def ine QUI$_REFUSAL_REASON 72 /* Job: Reason symbiont refused job (for internal use only) */X/* (note this item code is intentionally not documented and reserved for Digital use) */a#define QUI$_REQUEUE_PRIORITY 73 /* Job: Priority after requeue (for internal use only) */X/* (note this item code is intentionally not documented and reserved for Digital use) */N#define QUI$_REQUEUE_QUEUE_NAME 74 /* Job: Queue after requeue */N#define QUI$_SCSNODE_NAME 75 /* Que ue: /ON=node:: */N#define QUI$_SEARCH_FLAGS 76 /* Flags to control search */K#define QUI$_SEARCH_NAME 77 /* Object name to search for */N#define QUI$_SEARCH_NUMBER 78 /* Object number to search for */N#define QUI$_SUBMISSION_TIME 79 /* Job: Submission time */N#define QUI$_UIC 80 /* Job: Submitter's UIC */N#define QUI$_USERNAME 81 /* Job: Submitter's username  */N#define QUI$_WSDEFAULT 82 /* Job, queue: /WSDEFAULT=n */N#define QUI$_WSEXTENT 83 /* Job, queue: /WSEXTENT=n */N#define QUI$_WSQUOTA 84 /* Job, queue: /WSQUOTA=n */P#define QUI$_RAD 85 /* RAD assigned to queue or batch job */X#define QUI$_RESERVED_OUTPUT_86 86 /* Reserved for Digital use (name may change) */k#define QUI$_JOB_CONTROL_GQC 87 /* Reserved for Digital (Use to send GQC to job  control process) */W#define QUI$_SEARCH_USERNAME 88 /* Username of owner of job to modify search */N#define QUI$_DEFAULT_FORM_NAME 89 /* Default form name on queue */N#define QUI$_DEFAULT_FORM_NUMBER 90 /* Default form number on queue */N#define QUI$_DEFAULT_FORM_STOCK 91 /* Stock name for default form */N#define QUI$_JOB_PID 92 /* Pid of batch job */V#define QUI$_FILE_IDENTIFICATION 93 /* File identification (From RMS N AM block) */Y#define QUI$_PENDING_JOB_BLOCK_COUNT 94 /* Total number of blocks for all pending jobs */v#define QUI$_JOB_RETENTION_TIME 95 /* The amount of time the job should be retained (may be delta or absolute) */R#define QUI$_JOB_COMPLETION_TIME 96 /* The time the job completed execution */b#define QUI$_JOB_COMPLETION_QUEUE 97 /* The name of the queue the job completed execution on */X#define QUI$_RESERVED_OUTPUT_98 98 /* Reserved for Digital use (name may change) */X#defin e QUI$_RESERVED_OUTPUT_99 99 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_100 100 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_101 101 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_102 102 /* Reserved for Digital use (name may change) */N#define QUI$_SEARCH_BATCH_EPID 103 /* Batch job EPID to search for */N#define QUI$_SEARCH_JOB_NAME 104 /* Job name to search for  */X#define QUI$_RESERVED_INPUT_105 105 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_INPUT_106 106 /* Reserved for Digital use (name may change) */O#define QUI$_EXECUTING_JOB_COUNT 107 /* Number of jobs that are executing */N#define QUI$_HOLDING_JOB_COUNT 108 /* Number of holding jobs */X#define QUI$_TIMED_RELEASE_JOB_COUNT 109 /* Number of jobs specified with /AFTER_TIME */\#define QUI$_PENDING_JOB_REASON 110 /* Secondary status descri bing why job is pending */N#define QUI$_ORB 111 /* ORB data in TLV format */X/* (note this item code is intentionally not documented and reserved for Digital use) */N#define QUI$_QUEUE_DESCRIPTION 112 /* Queue: /DESCRIPTION */b#define QUI$_SYMBIONT_FLAGS 113 /* Symbiont options (requests) passed to job controller */X/* (note this item code is intentionally not documented and reserved for Digital use) */b#define QUI$_JOB_ACCESS_CLASS 114  /* Job access class information (for internal use only) */X/* (note this item code is intentionally not documented and reserved for Digital use) */{#define QUI$_ORB_LOCK_KEY 115 /* Key value for locking of in-memory ORB data structure (for internal use only) */X/* (note this item code is intentionally not documented and reserved for Digital use) */h#define QUI$_CHECKPOINT_FREQUENCY 116 /* Number of pages in interval at which symbiont takes chkpts */N#define QUI$_PENDING_JOB_COUNT 1 17 /* Number of pending jobs */N#define QUI$_RETAINED_JOB_COUNT 118 /* Number of retained jobs */o#define QUI$_RESTART_QUEUE_NAME 119 /* Name of queue into which a job would be restarted, if appropriate */N#define QUI$_FILE_COUNT 120 /* Count of files in job */u#define QUI$_ATTRIBUTES 121 /* Keywds and values of extens attribs associated with queue, job, or file */r#define QUI$_ATTRIBUTES_SIZE 122 /* Length of list of ext ens attribs associated with queue, job, or file */X#define QUI$_QUEUE_SUPPORT 123 /* Queue Support Images defined on this queue */`#define QUI$_QUEUE_ATTRIBUTES 124 /* Valid keywords for operations that alter the queue */j#define QUI$_QUEUE_ATTRIBUTES_SIZE 125 /* Length of list of keywords for queue-oriented extens attribs */e#define QUI$_JOB_ATTRIBUTES 126 /* Valid keywords for operations that create or alter jobs */h#define QUI$_JOB_ATTRIBUTES_SIZE 127 /* Length of l ist of keywords for job-oriented extens attribs */a#define QUI$_FILE_ATTRIBUTES 128 /* Valid keywords for file submissions or alter_file's */i#define QUI$_FILE_ATTRIBUTES_SIZE 129 /* Length of list of keywords for file-oriented extens attribs */z#define QUI$_AUTOSTART_ON 130 /* Node(s) (and for print queues, device(s)) on which queue can be auto started */N#define QUI$_AGENT_PROFILE 131 /* Security information */N#define QUI$_MANAGER_NAME 132 /* Queue manager name */X#define QUI$_MANAGER_STATUS 133 /* Queue manager state and status information */X#define QUI$_RESERVED_OUTPUT_134 134 /* Reserved for Digital use (name may change) */d#define QUI$_MANAGER_NODES 135 /* Preferred node listed specified on start queue manager */V#define QUI$_MANAGER_AUTOSTART 136 /* List of nodes that are autostart enabled */m#define QUI$_QUEUE_DIRECTORY 137 /* Directory specification provided when queue manager was started */X#define QUI$_RESERVED_OUTPUT_138 138 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_139 139 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_140 140 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_141 141 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_142 142 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_143 143 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_144 144 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_145 145 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_146 146 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_147 147 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_148 148 /* Reserved for Digital use (name may change) */X#define  QUI$_RESERVED_OUTPUT_149 149 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_150 150 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_151 151 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_152 152 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_153 153 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_154 154 /* Reserved for Digital  use (name may change) */X#define QUI$_RESERVED_OUTPUT_155 155 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_156 156 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_157 157 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_158 158 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_OUTPUT_159 159 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_INPUT_16 0 160 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_INPUT_161 161 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_INPUT_162 162 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_INPUT_163 163 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_INPUT_164 164 /* Reserved for Digital use (name may change) */X#define QUI$_RESERVED_INPUT_165 165 /* Reserved for Digital use (name may change)  */N#define QUI$K_MIN_ITEM 1 /* Minimum GETQUI item code */N#define QUI$K_MAX_ITEM 165 /* Maximum GETQUI item code */N#define QUI$_CHARGE_CODE 1 /* synonym for QUI$_ACCOUNT_NAME */N/* */N/* Subfields of FILE_FLAGS item code. */N/* */#define QUI$M_FILE_BUR ST 0x1 #define QUI$M_FILE_BURST_EXP 0x2#define QUI$M_FILE_DELETE 0x4##define QUI$M_FILE_DOUBLE_SPACE 0x8#define QUI$M_FILE_FLAG 0x10 #define QUI$M_FILE_FLAG_EXP 0x20#define QUI$M_FILE_TRAILER 0x40##define QUI$M_FILE_TRAILER_EXP 0x80$#define QUI$M_FILE_PAGE_HEADER 0x100!#define QUI$M_FILE_PAGINATE 0x200 #define QUI$M_FILE_PASSALL 0x400%#define QUI$M_FILE_PAGINATE_EXP 0x800'#define QUI$M_FILE_DELETE_ALWAYS 0x1000 #ifdef __NEW_STARLETtypedef struct _file_flags {N unsigned qui$v_file_burst : 1; /* /BURST */` unsigned qui$v_file_burst_exp : 1; /* /[NO]BURST explicit (intentionally not documented) */N unsigned qui$v_file_delete : 1; /* /DELETE */N unsigned qui$v_file_double_space : 1; /* /SPACE */N unsigned qui$v_file_flag : 1; /* /FLAG */_ unsigned qui$v_file_flag_exp : 1; /* /[NO]FLAG explicit (intentionally not documented) */N  unsigned qui$v_file_trailer : 1; /* /TRAILER */c unsigned qui$v_file_trailer_exp : 1; /* /[NO]TRAILER explicit (intentionally not documented) */N unsigned qui$v_file_page_header : 1; /* /HEADER */N unsigned qui$v_file_paginate : 1; /* /FEED */N unsigned qui$v_file_passall : 1; /* /PASSALL */a unsigned qui$v_file_paginate_exp : 1; /* /[NO]FEED explicit (intentionally not doc umented) */N unsigned qui$v_file_delete_always : 1; /* /DELETE_ALWAYS */ unsigned qui$v_filler : 19; } FILE_FLAGS;#else /* __OLD_STARLET */struct file_flags {N unsigned qui$v_file_burst : 1; /* /BURST */` unsigned qui$v_file_burst_exp : 1; /* /[NO]BURST explicit (intentionally not documented) */N unsigned qui$v_file_delete : 1; /* /DELETE */N unsigned qui$v_file_double_space : 1; /* / SPACE */N unsigned qui$v_file_flag : 1; /* /FLAG */_ unsigned qui$v_file_flag_exp : 1; /* /[NO]FLAG explicit (intentionally not documented) */N unsigned qui$v_file_trailer : 1; /* /TRAILER */c unsigned qui$v_file_trailer_exp : 1; /* /[NO]TRAILER explicit (intentionally not documented) */N unsigned qui$v_file_page_header : 1; /* /HEADER */N unsigned qui$v_file_paginate : 1; /* /FEED */N unsigned qui$v_file_passall : 1; /* /PASSALL */a unsigned qui$v_file_paginate_exp : 1; /* /[NO]FEED explicit (intentionally not documented) */N unsigned qui$v_file_delete_always : 1; /* /DELETE_ALWAYS */ unsigned qui$v_filler : 19; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Subfields of FILE_STATUS item c ode. */N/* */##define QUI$M_FILE_CHECKPOINTED 0x1 #define QUI$M_FILE_EXECUTING 0x2 #ifdef __NEW_STARLETtypedef struct _file_status {N unsigned qui$v_file_checkpointed : 1; /* File checkpointed */N unsigned qui$v_file_executing : 1; /* File currently executing */ unsigned qui$v_filler : 30; } FILE_STATUS;#else /* __OLD_STARLET */stru ct file_status {N unsigned qui$v_file_checkpointed : 1; /* File checkpointed */N unsigned qui$v_file_executing : 1; /* File currently executing */ unsigned qui$v_filler : 30; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Subfields of FORM_FLAGS item code. */N/* */!#def ine QUI$M_FORM_SHEET_FEED 0x1#define QUI$M_FORM_TRUNCATE 0x2#define QUI$M_FORM_WRAP 0x4 #ifdef __NEW_STARLETtypedef struct _form_flags {N unsigned qui$v_form_sheet_feed : 1; /* /SHEET_FEED */N unsigned qui$v_form_truncate : 1; /* /TRUNCATE */N unsigned qui$v_form_wrap : 1; /* /WRAP */ unsigned qui$v_filler : 29; } FORM_FLAGS;#else /* __OLD_STARLET */struct form_flags {N un signed qui$v_form_sheet_feed : 1; /* /SHEET_FEED */N unsigned qui$v_form_truncate : 1; /* /TRUNCATE */N unsigned qui$v_form_wrap : 1; /* /WRAP */ unsigned qui$v_filler : 29; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Subfields of JOB_FLAGS item code. */N/*  */#define QUI$M_JOB_CPU_LIMIT 0x1 #define QUI$M_JOB_FILE_BURST 0x2$#define QUI$M_JOB_FILE_BURST_ONE 0x4$#define QUI$M_JOB_FILE_BURST_EXP 0x8 #define QUI$M_JOB_FILE_FLAG 0x10$#define QUI$M_JOB_FILE_FLAG_ONE 0x20$#define QUI$M_JOB_FILE_FLAG_EXP 0x40##define QUI$M_JOB_FILE_TRAILER 0x80(#define QUI$M_JOB_FILE_TRAILER_ONE 0x100(#define QUI$M_JOB_FILE_TRAILER_EXP 0x200"#define QUI$M_JOB_LOG_DELETE 0x400 #define QUI$M_JOB_LOG_NULL 0x800"#define  QUI$M_JOB_LOG_SPOOL 0x1000"#define QUI$M_JOB_LOWERCASE 0x2000#define QUI$M_JOB_NOTIFY 0x4000 #define QUI$M_JOB_RESTART 0x8000##define QUI$M_JOB_WSDEFAULT 0x10000"#define QUI$M_JOB_WSEXTENT 0x20000!#define QUI$M_JOB_WSQUOTA 0x40000'#define QUI$M_JOB_FILE_PAGINATE 0x80000,#define QUI$M_JOB_FILE_PAGINATE_EXP 0x100000$#define QUI$M_JOB_RETENTION 0x200000*#define QUI$M_JOB_ERROR_RETENTION 0x400000#define QUI$M_JOB_RAD 0x800000 #ifdef __NEW_STARLETtypedef struct _job_flags {N un signed qui$v_job_cpu_limit : 1; /* /CPUTIME explicit */N unsigned qui$v_job_file_burst : 1; /* /BURST=ALL */N unsigned qui$v_job_file_burst_one : 1; /* /BURST=ONE */c unsigned qui$v_job_file_burst_exp : 1; /* /[NO]BURST explicit (intentionally not documented) */N unsigned qui$v_job_file_flag : 1; /* /FLAG=ALL */N unsigned qui$v_job_file_flag_one : 1; /* /FLAG=ONE */a unsign ed qui$v_job_file_flag_exp : 1; /* /[NO]FLAG explicit (intentionally not documented) */N unsigned qui$v_job_file_trailer : 1; /* /TRAILER=ALL */N unsigned qui$v_job_file_trailer_one : 1; /* /TRAILER=ONE */g unsigned qui$v_job_file_trailer_exp : 1; /* /[NO]TRAILER explicit (intentionally not documented) */N unsigned qui$v_job_log_delete : 1; /* /NOKEEP */N unsigned qui$v_job_log_null : 1; /* /NOLOG_FILE  */N unsigned qui$v_job_log_spool : 1; /* /PRINTER */N unsigned qui$v_job_lowercase : 1; /* /LOWERCASE */N unsigned qui$v_job_notify : 1; /* /NOTIFY */N unsigned qui$v_job_restart : 1; /* /RESTART */N unsigned qui$v_job_wsdefault : 1; /* /WSDEFAULT explicit */N unsigned qui$v_job_wsextent : 1; /* /WSEXTENT explicit */N unsigned qui $v_job_wsquota : 1; /* /WSQUOTA explicit */N unsigned qui$v_job_file_paginate : 1; /* /FEED */e unsigned qui$v_job_file_paginate_exp : 1; /* /[NO]FEED explicit (intentionally not documented) */N unsigned qui$v_job_retention : 1; /* /RETAIN=ALWAYS */N unsigned qui$v_job_error_retention : 1; /* /RETAIN=ERROR */N unsigned qui$v_job_rad : 1; /* /RAD explicit */ unsigned qui$v _filler : 8; } JOB_FLAGS;#else /* __OLD_STARLET */struct job_flags {N unsigned qui$v_job_cpu_limit : 1; /* /CPUTIME explicit */N unsigned qui$v_job_file_burst : 1; /* /BURST=ALL */N unsigned qui$v_job_file_burst_one : 1; /* /BURST=ONE */c unsigned qui$v_job_file_burst_exp : 1; /* /[NO]BURST explicit (intentionally not documented) */N unsigned qui$v_job_file_flag : 1; /* /FLAG=ALL */N unsigned qui$v_job_file_flag_one : 1; /* /FLAG=ONE */a unsigned qui$v_job_file_flag_exp : 1; /* /[NO]FLAG explicit (intentionally not documented) */N unsigned qui$v_job_file_trailer : 1; /* /TRAILER=ALL */N unsigned qui$v_job_file_trailer_one : 1; /* /TRAILER=ONE */g unsigned qui$v_job_file_trailer_exp : 1; /* /[NO]TRAILER explicit (intentionally not documented) */N unsigned qui$v_job_log_delete : 1; /* /NOKEEP  */N unsigned qui$v_job_log_null : 1; /* /NOLOG_FILE */N unsigned qui$v_job_log_spool : 1; /* /PRINTER */N unsigned qui$v_job_lowercase : 1; /* /LOWERCASE */N unsigned qui$v_job_notify : 1; /* /NOTIFY */N unsigned qui$v_job_restart : 1; /* /RESTART */N unsigned qui$v_job_wsdefault : 1; /* /WSDEFAULT explicit */N un signed qui$v_job_wsextent : 1; /* /WSEXTENT explicit */N unsigned qui$v_job_wsquota : 1; /* /WSQUOTA explicit */N unsigned qui$v_job_file_paginate : 1; /* /FEED */e unsigned qui$v_job_file_paginate_exp : 1; /* /[NO]FEED explicit (intentionally not documented) */N unsigned qui$v_job_retention : 1; /* /RETAIN=ALWAYS */N unsigned qui$v_job_error_retention : 1; /* /RETAIN=ERROR */N unsi gned qui$v_job_rad : 1; /* /RAD explicit */ unsigned qui$v_filler : 8; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Subfields of JOB_STATUS item code. */N/* */#define QUI$M_JOB_ABORTING 0x1#define QUI$M_JOB_EXECUTING 0x2#define QUI$M_JOB_HOLDING 0x4"#define QUI$M_ JOB_INACCESSIBLE 0x8#define QUI$M_JOB_REFUSED 0x10#define QUI$M_JOB_REQUEUE 0x20!#define QUI$M_JOB_RESTARTING 0x40#define QUI$M_JOB_RETAINED 0x80 #define QUI$M_JOB_STARTING 0x100%#define QUI$M_JOB_TIMED_RELEASE 0x200!#define QUI$M_JOB_SUSPENDED 0x400#define QUI$M_JOB_PENDING 0x800"#define QUI$M_JOB_UNDEFINED 0x1000 #define QUI$M_JOB_STALLED 0x2000##define QUI$M_JOB_INCOMPLETE 0x4000##define QUI$M_JOB_COMPLETING 0x8000 #ifdef __NEW_STARLETtypedef struct _job_status {N  unsigned qui$v_job_aborting : 1; /* Job is aborting */N unsigned qui$v_job_executing : 1; /* Job is executing */N unsigned qui$v_job_holding : 1; /* Job is holding for /HOLD */N unsigned qui$v_job_inaccessible : 1; /* Job is inaccessible */N unsigned qui$v_job_refused : 1; /* Job was refused by symbiont */i unsigned qui$v_job_requeue : 1; /* Job will requeue after abort (intentionally not documented) */p  unsigned qui$v_job_restarting : 1; /* Job started execution at least once (intentionally not documented) */N unsigned qui$v_job_retained : 1; /* Job was retained by /RETAIN */N unsigned qui$v_job_starting : 1; /* Job is starting */N unsigned qui$v_job_timed_release : 1; /* Job is holding for /AFTER */T unsigned qui$v_job_suspended : 1; /* Job is suspended by STOP/QUEUE command */o unsigned qui$v_job_pending : 1; /* Job is pending (see QUI$_ JOB_PENDING_REASON for more information) */f unsigned qui$v_job_undefined : 1; /* Job does not yet exist in db or is being removed from db */N unsigned qui$v_job_stalled : 1; /* Current job on stalled queue */s unsigned qui$v_job_incomplete : 1; /* Job was processed by the symbiont but further processing is necessary */O unsigned qui$v_job_completing : 1; /* Job has been completely processed */ unsigned qui$v_filler : 16; } JOB_STATUS;#else /* __OLD_STA RLET */struct job_status {N unsigned qui$v_job_aborting : 1; /* Job is aborting */N unsigned qui$v_job_executing : 1; /* Job is executing */N unsigned qui$v_job_holding : 1; /* Job is holding for /HOLD */N unsigned qui$v_job_inaccessible : 1; /* Job is inaccessible */N unsigned qui$v_job_refused : 1; /* Job was refused by symbiont */i unsigned qui$v_job_requeue : 1; /* Job will requeue after abort (i ntentionally not documented) */p unsigned qui$v_job_restarting : 1; /* Job started execution at least once (intentionally not documented) */N unsigned qui$v_job_retained : 1; /* Job was retained by /RETAIN */N unsigned qui$v_job_starting : 1; /* Job is starting */N unsigned qui$v_job_timed_release : 1; /* Job is holding for /AFTER */T unsigned qui$v_job_suspended : 1; /* Job is suspended by STOP/QUEUE command */o unsigned qui$v_job_pending : 1; /* Job is pending (see QUI$_JOB_PENDING_REASON for more information) */f unsigned qui$v_job_undefined : 1; /* Job does not yet exist in db or is being removed from db */N unsigned qui$v_job_stalled : 1; /* Current job on stalled queue */s unsigned qui$v_job_incomplete : 1; /* Job was processed by the symbiont but further processing is necessary */O unsigned qui$v_job_completing : 1; /* Job has been completely processed */ unsigned qui$v_filler : 16; }  ;%#endif /* #ifdef __NEW_STARLET */f#define QUI$V_JOB_TIMED 9 /* Synonym for QUI$V_JOB_TIMED_RELEASE for V4 compatibility */f#define QUI$M_JOB_TIMED 512 /* Synonym for QUI$M_JOB_TIMED_RELEASE for V4 compatibility */N/* */N/* Subfields of PENDING_JOB_REASON. */N/* *//* Note that i n the descriptions below "queue" refers to the execution queue in which a job resides, or to the set of execution */N/* queues that is the target of the generic queue in which a job resides. */N/* */$#define QUI$M_PEND_CHAR_MISMATCH 0x1##define QUI$M_PEND_JOB_SIZE_MAX 0x2##define QUI$M_PEND_JOB_SIZE_MIN 0x4)#define QUI$M_PEND_LOWERCASE_MISMATCH 0x8!#define QUI$M_PEND_NO_ACCESS 0x10"#define QUI$M_PEND_QUEUE_BUSY 0x20 ##define QUI$M_PEND_QUEUE_STATE 0x40&#define QUI$M_PEND_STOCK_MISMATCH 0x80 #ifdef __NEW_STARLET$typedef struct _pending_job_reason {h unsigned qui$v_pend_char_mismatch : 1; /* Queue's characteristics do not match job's requirements */x unsigned qui$v_pend_job_size_max : 1; /* Print job's block size is too large to execute on queue (print job only) */x unsigned qui$v_pend_job_size_min : 1; /* Print job's block size is too small to execute on queue (print job only) */ unsigned qui$v_pend_lowercase_mismatch : 1; /* Queue's lowercase attribute does not match job's requirements (print job only) */P unsigned qui$v_pend_no_access : 1; /* User does not have access to queue */} unsigned qui$v_pend_queue_busy : 1; /* Job is ready to execute but must wait until other jobs ahead of it in the queue */T/* complete execution (this is a normal state that requires no user intervention) */| unsigned qui$v_pend_queue_state : 1; /* Queue state prevents job from executing (see QUI$_QUEUE_STATUS for more info) */u unsigned qui$v_pend_stock_mismatch : 1; /* Stock type of mounted form on output execution queue does not match */N/* stock stock type required by form associated with job (print job only) */ unsigned qui$v_filler : 24; } PENDING_JOB_REASON;#else /* __OLD_STARLET */struct pending_job_reason {h unsigned qui$v_pend_char_mismatch : 1; /* Queue's characteristics do not match job's requirements */x unsigned qui$v_pend_job_size_max : 1; /* Print job's block size is too large to execute on queue (print job only) */x unsigned qui$v_pend_job_size_min : 1; /* Print job's block size is too small to execute on queue (print job only) */ unsigned qui$v_pend_lowercase_mismatch : 1; /* Queue's lowercase attribute does not match job's requirements (print job only) */P unsigned qui$v_pend_no_access : 1; /* User does not have access to queue */} unsigned qui$v_pend_queue_busy : 1; /* Job is ready to execute but must wait unt il other jobs ahead of it in the queue */T/* complete execution (this is a normal state that requires no user intervention) */| unsigned qui$v_pend_queue_state : 1; /* Queue state prevents job from executing (see QUI$_QUEUE_STATUS for more info) */u unsigned qui$v_pend_stock_mismatch : 1; /* Stock type of mounted form on output execution queue does not match */N/* stock stock type required by form associated with job (print job only) */ unsigned qui$v_filler : 24; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Subfields of QUEUE_FLAGS item code. */N/* */#define QUI$M_QUEUE_BATCH 0x1##define QUI$M_QUEUE_CPU_DEFAULT 0x2!#define QUI$M_QUEUE_CPU_LIMIT 0x4"#define QUI$M_QUEUE_FILE_BURST 0x8'#define QUI$M_QUEUE_FILE_BURST_ONE 0x10"#define QUI$M_QUEUE_FILE_FLAG 0x20&#define QUI$ M_QUEUE_FILE_FLAG_ONE 0x40%#define QUI$M_QUEUE_FILE_TRAILER 0x80*#define QUI$M_QUEUE_FILE_TRAILER_ONE 0x100!#define QUI$M_QUEUE_GENERIC 0x200+#define QUI$M_QUEUE_GENERIC_SELECTION 0x400##define QUI$M_QUEUE_JOB_BURST 0x800##define QUI$M_QUEUE_JOB_FLAG 0x1000)#define QUI$M_QUEUE_JOB_SIZE_SCHED 0x2000&#define QUI$M_QUEUE_JOB_TRAILER 0x4000%#define QUI$M_QUEUE_RETAIN_ALL 0x8000(#define QUI$M_QUEUE_RETAIN_ERROR 0x10000 #define QUI$M_QUEUE_SWAP 0x20000$#define QUI$M_QUEUE_TERMINAL 0x40000 %#define QUI$M_QUEUE_WSDEFAULT 0x80000%#define QUI$M_QUEUE_WSEXTENT 0x100000$#define QUI$M_QUEUE_WSQUOTA 0x200000*#define QUI$M_QUEUE_FILE_PAGINATE 0x400000,#define QUI$M_QUEUE_RECORD_BLOCKING 0x800000%#define QUI$M_QUEUE_PRINTER 0x1000000+#define QUI$M_QUEUE_ACL_SPECIFIED 0x20000001#define QUI$M_QUEUE_NOTIFY_ON_INTERRUPT 0x4000000-#define QUI$M_QUEUE_CHECKPOINT_FREQ 0x8000000(#define QUI$M_QUEUE_AUTOSTART 0x10000000.#define QUI$M_SECURITY_INACCESSIBLE 0x20000000,#define QUI$M_QUEUE_ NO_INITIAL_FF 0x40000000"#define QUI$M_QUEUE_RAD 0x80000000 #ifdef __NEW_STARLETtypedef struct _queue_flags {N unsigned qui$v_queue_batch : 1; /* /BATCH */N unsigned qui$v_queue_cpu_default : 1; /* /CPUDEFAULT specified */N unsigned qui$v_queue_cpu_limit : 1; /* /CPUMAXIMUM specified */N unsigned qui$v_queue_file_burst : 1; /* /DEFAULT=BURST=ALL */N unsigned qui$v_queue_file_burst_one : 1; /* /DEFAULT=BURST=ONE */N unsigned qui$v_queue_file_flag : 1; /* /DEFAULT=FLAG=ALL */N unsigned qui$v_queue_file_flag_one : 1; /* /DEFAULT=FLAG=ONE */N unsigned qui$v_queue_file_trailer : 1; /* /DEFAULT=TRAILER=ALL */N unsigned qui$v_queue_file_trailer_one : 1; /* /DEFAULT=TRAILER=ONE */N unsigned qui$v_queue_generic : 1; /* /GENERIC */N unsigned qui$v_queue_generic_selection : 1; /* /ENABLE_GENERIC */N unsigned qui$v_queue_job_burst : 1; /* /SEPARATE=BURST */H unsigned qui$v_queue_job_flag : 1; /* /SEPARATE=FLAG */N unsigned qui$v_queue_job_size_sched : 1; /* /SCHEDULE=SIZE */N unsigned qui$v_queue_job_trailer : 1; /* /SEPARATE=TRAILER */N unsigned qui$v_queue_retain_all : 1; /* /RETAIN=ALL */N unsigned qui$v_queue_retain_error : 1; /* /RETAIN=ERROR */N unsigned qui$v_queue_swap : 1; /* / NODISABLE_SWAPPING */k unsigned qui$v_queue_terminal : 1; /* /DEVICE=TERMINAL or terminal device type reported by symbiont */N unsigned qui$v_queue_wsdefault : 1; /* /WSDEFAULT specified */N unsigned qui$v_queue_wsextent : 1; /* /WSEXTENT specified */N unsigned qui$v_queue_wsquota : 1; /* /WSQUOTA specified */N unsigned qui$v_queue_file_paginate : 1; /* /DEFAULT=FEED */N unsigned qui$v_queue_record_blocking : 1; /* /RECORD_BLOCKING */i unsigned qui$v_queue_printer : 1; /* /DEVICE=PRINTER or printer device type reported by symbiont */R unsigned qui$v_queue_acl_specified : 1; /* ACL has been specified for queue */N unsigned qui$v_queue_notify_on_interrupt : 1; /* /NOTIFY=INTERRUPTION */S unsigned qui$v_queue_checkpoint_freq : 1; /* /CHECKPOINT_FREQUENCY specified */N unsigned qui$v_queue_autostart : 1; /* /AUTOSTART_ON specified */j unsigned qui$v_security_ inaccessible : 1; /* Requestor does not have access to security information */N unsigned qui$v_queue_no_initial_ff : 1; /* /NO_INITIAL_FF */N unsigned qui$v_queue_rad : 1; /* /RAD specified */ } QUEUE_FLAGS;#else /* __OLD_STARLET */struct queue_flags {N unsigned qui$v_queue_batch : 1; /* /BATCH */N unsigned qui$v_queue_cpu_default : 1; /* /CPUDEFAULT specified */N unsigned qui$v_queue_cpu_lim it : 1; /* /CPUMAXIMUM specified */N unsigned qui$v_queue_file_burst : 1; /* /DEFAULT=BURST=ALL */N unsigned qui$v_queue_file_burst_one : 1; /* /DEFAULT=BURST=ONE */N unsigned qui$v_queue_file_flag : 1; /* /DEFAULT=FLAG=ALL */N unsigned qui$v_queue_file_flag_one : 1; /* /DEFAULT=FLAG=ONE */N unsigned qui$v_queue_file_trailer : 1; /* /DEFAULT=TRAILER=ALL */N unsigned qui$v_queue_file_trailer_one : 1; /* /DEFAULT =TRAILER=ONE */N unsigned qui$v_queue_generic : 1; /* /GENERIC */N unsigned qui$v_queue_generic_selection : 1; /* /ENABLE_GENERIC */N unsigned qui$v_queue_job_burst : 1; /* /SEPARATE=BURST */H unsigned qui$v_queue_job_flag : 1; /* /SEPARATE=FLAG */N unsigned qui$v_queue_job_size_sched : 1; /* /SCHEDULE=SIZE */N unsigned qui$v_queue_job_trailer : 1; /* /SEPARATE=TRAILER */N unsign ed qui$v_queue_retain_all : 1; /* /RETAIN=ALL */N unsigned qui$v_queue_retain_error : 1; /* /RETAIN=ERROR */N unsigned qui$v_queue_swap : 1; /* /NODISABLE_SWAPPING */k unsigned qui$v_queue_terminal : 1; /* /DEVICE=TERMINAL or terminal device type reported by symbiont */N unsigned qui$v_queue_wsdefault : 1; /* /WSDEFAULT specified */N unsigned qui$v_queue_wsextent : 1; /* /WSEXTENT specified */N un signed qui$v_queue_wsquota : 1; /* /WSQUOTA specified */N unsigned qui$v_queue_file_paginate : 1; /* /DEFAULT=FEED */N unsigned qui$v_queue_record_blocking : 1; /* /RECORD_BLOCKING */i unsigned qui$v_queue_printer : 1; /* /DEVICE=PRINTER or printer device type reported by symbiont */R unsigned qui$v_queue_acl_specified : 1; /* ACL has been specified for queue */N unsigned qui$v_queue_notify_on_interrupt : 1; /* /NOTIFY=INTERRUPTION */S unsigned qui$v_queue_checkpoint_freq : 1; /* /CHECKPOINT_FREQUENCY specified */N unsigned qui$v_queue_autostart : 1; /* /AUTOSTART_ON specified */j unsigned qui$v_security_inaccessible : 1; /* Requestor does not have access to security information */N unsigned qui$v_queue_no_initial_ff : 1; /* /NO_INITIAL_FF */N unsigned qui$v_queue_rad : 1; /* /RAD specified */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Subfields of QUEUE_STATUS item code. */N/* */ #define QUI$M_QUEUE_ALIGNING 0x1#define QUI$M_QUEUE_IDLE 0x2!#define QUI$M_QUEUE_LOWERCASE 0x4(#define QUI$M_QUEUE_OPERATOR_REQUEST 0x8#define QUI$M_QUEUE_PAUSED 0x10 #define QUI$M_QUEUE_PAUSING 0x20#define QUI$M_QUEUE_REMOTE 0x40"#define QUI$M_QUEUE_RESETTING 0x80"#define  QUI$M_QUEUE_RESUMING 0x100 #define QUI$M_QUEUE_SERVER 0x200!#define QUI$M_QUEUE_STALLED 0x400"#define QUI$M_QUEUE_STARTING 0x800"#define QUI$M_QUEUE_STOPPED 0x1000##define QUI$M_QUEUE_STOPPING 0x2000&#define QUI$M_QUEUE_UNAVAILABLE 0x4000!#define QUI$M_QUEUE_CLOSED 0x8000 #define QUI$M_QUEUE_BUSY 0x10000%#define QUI$M_QUEUE_UNDEFINED 0x20000%#define QUI$M_QUEUE_AVAILABLE 0x40000$#define QUI$M_QUEUE_DISABLED 0x80000/#define QUI$M_QUEUE_AUTOSTART_INACTIVE 0x100000)#define QUI$M_QUEUE_ STOP_PENDING 0x200000 #ifdef __NEW_STARLETtypedef struct _queue_status {N unsigned qui$v_queue_aligning : 1; /* Queue is aligning */p unsigned qui$v_queue_idle : 1; /* Queue is idle: no jobs executing and none available for execution */N unsigned qui$v_queue_lowercase : 1; /* Lowercase device */l unsigned qui$v_queue_operator_request : 1; /* Queue is doing /OPERATOR (intentionally not documented) */N unsigned qui$v_queue_paused : 1;  /* Queue is paused */N unsigned qui$v_queue_pausing : 1; /* Queue is pausing */N unsigned qui$v_queue_remote : 1; /* Remote device */\ unsigned qui$v_queue_resetting : 1; /* Incomplete remote request to reset (OBSOLETE) */Q unsigned qui$v_queue_resuming : 1; /* Queue is resuming from paused state */m unsigned qui$v_queue_server : 1; /* /DEVICE=SERVER or reported to be a served queue by the symbiont */N unsigned qui $v_queue_stalled : 1; /* Device is stalled */N unsigned qui$v_queue_starting : 1; /* Queue is starting */N unsigned qui$v_queue_stopped : 1; /* Queue is stopped */N unsigned qui$v_queue_stopping : 1; /* Queue is stopping */N unsigned qui$v_queue_unavailable : 1; /* Device is unavailable */N unsigned qui$v_queue_closed : 1; /* Queue is closed */k unsigned qui$v_queue_busy : 1; /* Queue is executing as many jobs as it is capable of executing */h unsigned qui$v_queue_undefined : 1; /* Queue does not yet exist in db or is being removed from db */w unsigned qui$v_queue_available : 1; /* At least one job is executing, but the queue is capable of executing more */p unsigned qui$v_queue_disabled : 1; /* Queue is not able to accept or process jobs; its QSIs are inactive */Y unsigned qui$v_queue_autostart_inactive : 1; /* AUTOSTART queue explicitly stopped */t unsigned qui$v_queue_stop_pending : 1; /* Queue will be stopped when work currently in progress has completed */ unsigned qui$v_filler : 10; } QUEUE_STATUS;#else /* __OLD_STARLET */struct queue_status {N unsigned qui$v_queue_aligning : 1; /* Queue is aligning */p unsigned qui$v_queue_idle : 1; /* Queue is idle: no jobs executing and none available for execution */N unsigned qui$v_queue_lowercase : 1; /* Lowercase device */l un signed qui$v_queue_operator_request : 1; /* Queue is doing /OPERATOR (intentionally not documented) */N unsigned qui$v_queue_paused : 1; /* Queue is paused */N unsigned qui$v_queue_pausing : 1; /* Queue is pausing */N unsigned qui$v_queue_remote : 1; /* Remote device */\ unsigned qui$v_queue_resetting : 1; /* Incomplete remote request to reset (OBSOLETE) */Q unsigned qui$v_queue_resuming : 1; /* Queue is resuming from pa used state */m unsigned qui$v_queue_server : 1; /* /DEVICE=SERVER or reported to be a served queue by the symbiont */N unsigned qui$v_queue_stalled : 1; /* Device is stalled */N unsigned qui$v_queue_starting : 1; /* Queue is starting */N unsigned qui$v_queue_stopped : 1; /* Queue is stopped */N unsigned qui$v_queue_stopping : 1; /* Queue is stopping */N unsigned qui$v_queue_unavailable : 1; /* Device is una vailable */N unsigned qui$v_queue_closed : 1; /* Queue is closed */k unsigned qui$v_queue_busy : 1; /* Queue is executing as many jobs as it is capable of executing */h unsigned qui$v_queue_undefined : 1; /* Queue does not yet exist in db or is being removed from db */w unsigned qui$v_queue_available : 1; /* At least one job is executing, but the queue is capable of executing more */p unsigned qui$v_queue_disabled : 1; /* Queue is not able to ac cept or process jobs; its QSIs are inactive */Y unsigned qui$v_queue_autostart_inactive : 1; /* AUTOSTART queue explicitly stopped */t unsigned qui$v_queue_stop_pending : 1; /* Queue will be stopped when work currently in progress has completed */ unsigned qui$v_filler : 10; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Subfields of SEARCH_FLAGS item code. */N/* */!#define QUI$M_SEARCH_ALL_JOBS 0x1!#define QUI$M_SEARCH_WILDCARD 0x2#define QUI$M_SEARCH_BATCH 0x4!#define QUI$M_SEARCH_SYMBIONT 0x8"#define QUI$M_SEARCH_THIS_JOB 0x10!#define QUI$M_SEARCH_PRINTER 0x20 #define QUI$M_SEARCH_SERVER 0x40"#define QUI$M_SEARCH_TERMINAL 0x80"#define QUI$M_SEARCH_GENERIC 0x100)#define QUI$M_SEARCH_GENERIC_TARGET 0x200'#define QUI$M_SEARCH_PENDING_JOBS 0x400)#define QUI$M_SEARCH_EXECU TING_JOBS 0x800.#define QUI$M_SEARCH_TIMED_RELEASE_JOBS 0x1000(#define QUI$M_SEARCH_HOLDING_JOBS 0x2000)#define QUI$M_SEARCH_RETAINED_JOBS 0x4000*#define QUI$M_SEARCH_FREEZE_CONTEXT 0x8000&#define QUI$M_SEARCH_OPEN_JOBS 0x10000*#define QUI$M_SEARCH_RESERVED_BIT1 0x20000*#define QUI$M_SEARCH_RESERVED_BIT2 0x40000 #ifdef __NEW_STARLETtypedef struct _search_flags {l unsigned qui$v_search_all_jobs : 1; /* Select all jobs (else only those with same username as caller) */N unsigned q ui$v_search_wildcard : 1; /* Force a wildcard operation */N unsigned qui$v_search_batch : 1; /* Select batch queues */| unsigned qui$v_search_symbiont : 1; /* Select symbiont (output) queues (note that QUI$V_SEARCH_SYMBIONT is equivalent */V/* to setting QUI$V_SEARCH_PRINTER, QUI$V_SEARCH_SERVER, and QUI$V_SEARCH_TERMINAL) */b unsigned qui$v_search_this_job : 1; /* Select only caller's batch job (forcing new context) */N unsigned qui$v_search_printer : 1; /* Sel ect printer queues */N unsigned qui$v_search_server : 1; /* Select server queues */N unsigned qui$v_search_terminal : 1; /* Select terminal queues */N unsigned qui$v_search_generic : 1; /* Select generic queues */ unsigned qui$v_search_generic_target : 1; /* Select generic target queues after selecting generic queue (for internal use) */P/* (note this option is NOT supported; it is intentionally not documented and */N/* reserved for Di gital use) */N unsigned qui$v_search_pending_jobs : 1; /* Select only pending jobs */N unsigned qui$v_search_executing_jobs : 1; /* Select only executing jobs */V unsigned qui$v_search_timed_release_jobs : 1; /* Select only timed release jobs */N unsigned qui$v_search_holding_jobs : 1; /* Select only holding jobs */N unsigned qui$v_search_retained_jobs : 1; /* Select only retained jobs */~ unsigned qui$v_search_freeze_con text : 1; /* Do not advance wildcard context to next object in list at end of operation */N unsigned qui$v_search_open_jobs : 1; /* Select only open jobs */N unsigned qui$v_search_reserved_bit1 : 1; /* Reserved to Compaq */N unsigned qui$v_search_reserved_bit2 : 1; /* Reserved to Compaq */ unsigned qui$v_filler : 13; } SEARCH_FLAGS;#else /* __OLD_STARLET */struct search_flags {l unsigned qui$v_search_all_jobs : 1; /* Select all jobs (el!se only those with same username as caller) */N unsigned qui$v_search_wildcard : 1; /* Force a wildcard operation */N unsigned qui$v_search_batch : 1; /* Select batch queues */| unsigned qui$v_search_symbiont : 1; /* Select symbiont (output) queues (note that QUI$V_SEARCH_SYMBIONT is equivalent */V/* to setting QUI$V_SEARCH_PRINTER, QUI$V_SEARCH_SERVER, and QUI$V_SEARCH_TERMINAL) */b unsigned qui$v_search_this_job : 1; /* Select only caller's batch job (forcing n!ew context) */N unsigned qui$v_search_printer : 1; /* Select printer queues */N unsigned qui$v_search_server : 1; /* Select server queues */N unsigned qui$v_search_terminal : 1; /* Select terminal queues */N unsigned qui$v_search_generic : 1; /* Select generic queues */ unsigned qui$v_search_generic_target : 1; /* Select generic target queues after selecting generic queue (for internal use) */P/* (note this option is NOT supported;! it is intentionally not documented and */N/* reserved for Digital use) */N unsigned qui$v_search_pending_jobs : 1; /* Select only pending jobs */N unsigned qui$v_search_executing_jobs : 1; /* Select only executing jobs */V unsigned qui$v_search_timed_release_jobs : 1; /* Select only timed release jobs */N unsigned qui$v_search_holding_jobs : 1; /* Select only holding jobs */N unsigned qui$v_search_retained_jobs : 1; /* Select ! only retained jobs */~ unsigned qui$v_search_freeze_context : 1; /* Do not advance wildcard context to next object in list at end of operation */N unsigned qui$v_search_open_jobs : 1; /* Select only open jobs */N unsigned qui$v_search_reserved_bit1 : 1; /* Reserved to Compaq */N unsigned qui$v_search_reserved_bit2 : 1; /* Reserved to Compaq */ unsigned qui$v_filler : 13; } ;%#endif /* #ifdef __NEW_STARLET */N/* ! */N/* Subfields of SYMBIONT_FLAGS item code. */N/* */X/* Note: this item code is intentionally not documented and reserved for Digital use. */N/* */#define QUI$M_SYM_NOTIFIES 0x1##define QUI$M_SYM_REQUESTS_OPER 0x2!#define QUI$M_SYM_COPIES_FILE 0x4 #define QUI$M_SYM_ !COPIES_JOB 0x8(#define QUI$M_SYM_ACCEPTS_ALL_FORMS 0x10(#define QUI$M_SYM_NO_JOB_CHECKPOINT 0x20 #ifdef __NEW_STARLET typedef struct _symbiont_flags {S unsigned qui$v_sym_notifies : 1; /* Symbiont notifies for job completions */T unsigned qui$v_sym_requests_oper : 1; /* Symbiont generates operator messages */U unsigned qui$v_sym_copies_file : 1; /* Symbiont generates multiple file copies */T unsigned qui$v_sym_copies_job : 1; /* Symbiont generates multiple job copies */U ! unsigned qui$v_sym_accepts_all_forms : 1; /* Symbiont processes all form types */Z unsigned qui$v_sym_no_job_checkpoint : 1; /* Always reprocess full job on a restart */ unsigned qui$v_filler : 26; } SYMBIONT_FLAGS;#else /* __OLD_STARLET */struct symbiont_flags {S unsigned qui$v_sym_notifies : 1; /* Symbiont notifies for job completions */T unsigned qui$v_sym_requests_oper : 1; /* Symbiont generates operator messages */U unsigned qui$v_sym_copies_file : 1 !; /* Symbiont generates multiple file copies */T unsigned qui$v_sym_copies_job : 1; /* Symbiont generates multiple job copies */U unsigned qui$v_sym_accepts_all_forms : 1; /* Symbiont processes all form types */Z unsigned qui$v_sym_no_job_checkpoint : 1; /* Always reprocess full job on a restart */ unsigned qui$v_filler : 26; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Subfields of MANAGER_ST !ATUS item code. */N/* */'#define QUI$M_MANAGER_START_PENDING 0x1"#define QUI$M_MANAGER_STARTING 0x2!#define QUI$M_MANAGER_RUNNING 0x4"#define QUI$M_MANAGER_FAILOVER 0x8##define QUI$M_MANAGER_STOPPING 0x10"#define QUI$M_MANAGER_STOPPED 0x20 #ifdef __NEW_STARLET typedef struct _manager_status {e unsigned qui$v_manager_start_pending : 1; /* Queue manager will start when a node is ! available */N unsigned qui$v_manager_starting : 1; /* Queue manager is starting */N unsigned qui$v_manager_running : 1; /* Queue manager is processing work */j unsigned qui$v_manager_failover : 1; /* Queue manager is failing over to pick up new startup values */N unsigned qui$v_manager_stopping : 1; /* Queue manager is shutting down */N unsigned qui$v_manager_stopped : 1; /* Queue manager is stopped */ unsigned qui$v_filler : 26; } MANAGER_STATUS;#els !e /* __OLD_STARLET */struct manager_status {e unsigned qui$v_manager_start_pending : 1; /* Queue manager will start when a node is available */N unsigned qui$v_manager_starting : 1; /* Queue manager is starting */N unsigned qui$v_manager_running : 1; /* Queue manager is processing work */j unsigned qui$v_manager_failover : 1; /* Queue manager is failing over to pick up new startup values */N unsigned qui$v_manager_stopping : 1; /* Queue manager is shutting down */N ! unsigned qui$v_manager_stopped : 1; /* Queue manager is stopped */ unsigned qui$v_filler : 26; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __QUIDEF_LOADED */ ww !{Q?/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $RABDEF ***/#ifndef __RABDEF_LOADED#define __RABDEF_LOADED 1 G#pragma !__nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_par!ams ...#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 N/* */N/* record access block (rab) definitions */N/* ! */N/* there is one rab per connected stream */N/* it is used for all communications between the user */N/* and rms concerning operations on the stream */N/* */N/* the fields thru ctx cannot be changed due to commonality */N/* with the fab ! */N/* */ #ifdef __NEW_STARLETstruct _fabdef;#elsestruct fabdef;#endifN#define RAB$C_BID 1 /* code for rab */#define RAB$M_PPF_RAT 0x3FC0#define RAB$M_PPF_IND 0x4000#define RAB$M_PPISI 0x8000#define RAB$M_ASY 0x1#define RAB$M_TPT 0x2#define RAB$M_REA 0x4#define RAB$M_RRL 0x8#define RAB$M_UIF 0x10#define RAB$M_!MAS 0x20#define RAB$M_FDL 0x40#define RAB$M_REV 0x80#define RAB$M_EOF 0x100#define RAB$M_RAH 0x200#define RAB$M_WBH 0x400#define RAB$M_BIO 0x800#define RAB$M_CDK 0x1000#define RAB$M_LOA 0x2000#define RAB$M_LIM 0x4000#define RAB$M_SYNCSTS 0x8000#define RAB$M_LOC 0x10000#define RAB$M_WAT 0x20000#define RAB$M_ULK 0x40000#define RAB$M_RLK 0x80000#define RAB$M_NLK 0x100000#define RAB$M_KGE 0x200000#define RAB$M_KGT 0x400000#define RAB$M_NXR 0x800000#define RAB$!M_RNE 0x1000000#define RAB$M_TMO 0x2000000#define RAB$M_CVT 0x4000000#define RAB$M_RNF 0x8000000#define RAB$M_ETO 0x10000000#define RAB$M_PTA 0x20000000#define RAB$M_PMT 0x40000000#define RAB$M_CCO 0x80000000#define RAB$M_EQNXT 0x200000#define RAB$M_NXT 0x400000#define RAB$M_NQL 0x1#define RAB$M_NODLCKWT 0x2#define RAB$M_NODLCKBLK 0x4N#define RAB$C_SEQ 0 /* sequential access */N#define RAB$C_KEY 1 /* keyed access ! */N#define RAB$C_RFA 2 /* rfa access */[#define RAB$C_STM 3 /* stream access (valid only for sequential org) */Z#define RAB$C_MAXRAC 2 /* Maximum RAC value currently supported by RMS */  9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If us !ing pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _rabdef {#pragma __nomember_alignmentN unsigned char rab$b_bid; /* block id */N unsigned char rab$b_bln; /* block length */ __union {N unsigned short int rab$w_isi; /* internal stream index */N/* (ifi in fab) !*/ __struct {N unsigned rabdef$$_fill_1 : 6; /* move to bit 6 */S unsigned rab$v_ppf_rat : 8; /* rat value for process-permanent files */W unsigned rab$v_ppf_ind : 1; /* indirect access to process-permanent file */N/* (i.e., restricted operations) */] unsigned rab$v_ppisi : 1; /* indicates that this is process-permanent stream */ } rab$r_isi_bits; } rab$r_ !isi_overlay; __union {N unsigned int rab$l_rop; /* record options */ __struct {N unsigned rab$v_asy : 1; /* asynchronous operations */X unsigned rab$v_tpt : 1; /* truncate put - allow sequential put not at */N/* eof, thus truncating file (seq. org only) */N/* */N/* these next two should be in the byte for !bits */N/* input to $find or $get, but there is no room there */N/* */\ unsigned rab$v_rea : 1; /* lock record for read only, allow other readers */N unsigned rab$v_rrl : 1; /* read record regardless of lock */N/* */N unsigned rab$v_uif : 1; /* update if exi!stent */N unsigned rab$v_mas : 1; /* mass-insert mode */N unsigned rab$v_fdl : 1; /* fast record deletion */` unsigned rab$v_rev : 1; /* reverse-search - can only be set with NXT or EQNXT */N/* */N unsigned rab$v_eof : 1; /* connect to eof */N unsigned rab$v_rah : 1; /* read ahead ! */N unsigned rab$v_wbh : 1; /* write behind */N unsigned rab$v_bio : 1; /* connect for bio only */N unsigned rab$v_cdk : 1; /* check for duplicate keys on $GET */N unsigned rab$v_loa : 1; /* use bucket fill percentage */i unsigned rab$v_lim : 1; /* compare for key limit reached on $get/$find seq. (idx only) */h unsigned rab$v_syncsts : 1; /* Synchronous status !notification for asynchronous routines. */N/* */N/* the following bits are input to */N/* $find or $get, (see above also REA and RRL) */N/* (separate byte) */N/* */N unsigned rab$v_loc : 1; /* use locate mode ! */N unsigned rab$v_wat : 1; /* wait if record not available */N unsigned rab$v_ulk : 1; /* manual unlocking */R unsigned rab$v_rlk : 1; /* allow readers for this locked record */N unsigned rab$v_nlk : 1; /* do not lock record */N unsigned rab$v_kge : 1; /* key > or = */N unsigned rab$v_kgt : 1; /* key greater than */N ! unsigned rab$v_nxr : 1; /* get non-existent record */N/* */N/* the following bits are terminal qualifiers only */N/* (separate byte) */N/* */N unsigned rab$v_rne : 1; /* read no echo */N unsigned rab$v_tmo! : 1; /* use time-out period */N unsigned rab$v_cvt : 1; /* convert to upper case */N unsigned rab$v_rnf : 1; /* read no filter */N unsigned rab$v_eto : 1; /* extended terminal operation */N unsigned rab$v_pta : 1; /* purge type ahead */N unsigned rab$v_pmt : 1; /* use prompt buffer */N unsigned rab$v_cco : 1; /* cancel contro !l o on output */ } rab$r_rop_bits0; __struct {* unsigned rabdef$$_fill_6 : 21;N unsigned rab$v_eqnxt : 1; /* Synonyms for KGE and */N unsigned rab$v_nxt : 1; /* KGT */' unsigned rab$v_fill_3_ : 1; } rab$r_rop_bits1;N/* the following bits may be */N/* input to various rab-related ! */N/* operations */N/* */ __struct {! char rabdef$$_fill_3;N unsigned char rab$b_rop1; /* various options */] unsigned char rab$b_rop2; /* get/find options (use of this field discouraged */N/* due to REA and RRL being in a different byte) */N unsigned c !har rab$b_rop3; /* terminal read options */N/* */ } rab$r_rop_fields; } rab$r_rop_overlay;N unsigned int rab$l_sts; /* status */ __union {N unsigned int rab$l_stv; /* status value */ __struct {N unsigned short int rab$w_stv0; /* low word of stv */N unsigned short !! int rab$w_stv2; /* high word of stv */ } rab$r_stv_fields; } rab$r_stv_overlay; __union {N unsigned short int rab$w_rfa [3]; /* record's file address */ __struct {$ unsigned int rab$l_rfa0;* unsigned short int rab$w_rfa4; } rab$r_rfa_fields; } rab$r_rfa_overlay;X short int rabdef$$_fill_4; /* (reserved - rms release 1 optimizes stores */N/* to the rfa field to be a move "!quad, overwriting */N/* this reserved word) */N unsigned int rab$l_ctx; /* user context */N/*-----***** */N __union { /* */] unsigned short int rab$w_rop_2; /* extension to record options in traditional RAB */ __struct {N unsigned r#!ab$v_nql : 1; /* no query locking (record level) */N unsigned rab$v_nodlckwt : 1; /* no deadlock wait */N unsigned rab$v_nodlckblk : 1; /* no deadlock blocking */P unsigned rabdef$$_fill_5 : 13; /* reserved for future development */ } rab$r_rop_2_bits0; } rab$r_rop_2_overlay;N unsigned char rab$b_rac; /* record access */N unsigned char rab$b_tmo; /* time-out period $! */N unsigned short int rab$w_usz; /* user buffer size */N unsigned short int rab$w_rsz; /* record buffer size */N char *rab$l_ubf; /* user buffer address */N char *rab$l_rbf; /* record buffer address */N char *rab$l_rhb; /* record header buffer addr */ __union {N char *rab$l_kbf; /* key buffer address %! */N char *rab$l_pbf; /* prompt buffer addr */ } rab$r_kbf_overlay; __union {N unsigned char rab$b_ksz; /* key buffer size */N unsigned char rab$b_psz; /* prompt buffer size */ } rab$r_ksz_overlay;N unsigned char rab$b_krf; /* key of reference */N char rab$b_mbf; /* multi-buffer count */N unsigned char ra &!b$b_mbc; /* multi-block count */ __union {N unsigned int rab$l_bkt; /* bucket hash code, vbn, or rrn */_ unsigned int rab$l_dct; /* duplicates count on key accessed on alternate key */ } rab$r_bkt_overlay;[ struct _fabdef *rab$l_fab; /* related fab for connect ~~~ struct fabdef ~~~ */N void *rab$l_xab; /* XAB address */ } RABDEF; #if !defined(__VAXC)-#defin '!e rab$w_isi rab$r_isi_overlay.rab$w_isi7#define rab$r_isi_bits rab$r_isi_overlay.rab$r_isi_bits2#define rab$v_ppf_rat rab$r_isi_bits.rab$v_ppf_rat2#define rab$v_ppf_ind rab$r_isi_bits.rab$v_ppf_ind.#define rab$v_ppisi rab$r_isi_bits.rab$v_ppisi-#define rab$l_rop rab$r_rop_overlay.rab$l_rop9#define rab$r_rop_bits0 rab$r_rop_overlay.rab$r_rop_bits0+#define rab$v_asy rab$r_rop_bits0.rab$v_asy+#define rab$v_tpt rab$r_rop_bits0.rab$v_tpt+#define rab$v_rea rab$r_rop_bits0.rab$v_rea+#define (!rab$v_rrl rab$r_rop_bits0.rab$v_rrl+#define rab$v_uif rab$r_rop_bits0.rab$v_uif+#define rab$v_mas rab$r_rop_bits0.rab$v_mas+#define rab$v_fdl rab$r_rop_bits0.rab$v_fdl+#define rab$v_rev rab$r_rop_bits0.rab$v_rev+#define rab$v_eof rab$r_rop_bits0.rab$v_eof+#define rab$v_rah rab$r_rop_bits0.rab$v_rah+#define rab$v_wbh rab$r_rop_bits0.rab$v_wbh+#define rab$v_bio rab$r_rop_bits0.rab$v_bio+#define rab$v_cdk rab$r_rop_bits0.rab$v_cdk+#define rab$v_loa rab$r_rop_bits0.rab$v_loa+#define )!rab$v_lim rab$r_rop_bits0.rab$v_lim3#define rab$v_syncsts rab$r_rop_bits0.rab$v_syncsts+#define rab$v_loc rab$r_rop_bits0.rab$v_loc+#define rab$v_wat rab$r_rop_bits0.rab$v_wat+#define rab$v_ulk rab$r_rop_bits0.rab$v_ulk+#define rab$v_rlk rab$r_rop_bits0.rab$v_rlk+#define rab$v_nlk rab$r_rop_bits0.rab$v_nlk+#define rab$v_kge rab$r_rop_bits0.rab$v_kge+#define rab$v_kgt rab$r_rop_bits0.rab$v_kgt+#define rab$v_nxr rab$r_rop_bits0.rab$v_nxr+#define rab$v_rne rab$r_rop_bits0.rab$v_rne+ *!#define rab$v_tmo rab$r_rop_bits0.rab$v_tmo+#define rab$v_cvt rab$r_rop_bits0.rab$v_cvt+#define rab$v_rnf rab$r_rop_bits0.rab$v_rnf+#define rab$v_eto rab$r_rop_bits0.rab$v_eto+#define rab$v_pta rab$r_rop_bits0.rab$v_pta+#define rab$v_pmt rab$r_rop_bits0.rab$v_pmt+#define rab$v_cco rab$r_rop_bits0.rab$v_cco9#define rab$r_rop_bits1 rab$r_rop_overlay.rab$r_rop_bits1/#define rab$v_eqnxt rab$r_rop_bits1.rab$v_eqnxt+#define rab$v_nxt rab$r_rop_bits1.rab$v_nxt;#define rab$r_rop_fields rab +!$r_rop_overlay.rab$r_rop_fields.#define rab$b_rop1 rab$r_rop_fields.rab$b_rop1.#define rab$b_rop2 rab$r_rop_fields.rab$b_rop2.#define rab$b_rop3 rab$r_rop_fields.rab$b_rop3-#define rab$l_stv rab$r_stv_overlay.rab$l_stv;#define rab$r_stv_fields rab$r_stv_overlay.rab$r_stv_fields.#define rab$w_stv0 rab$r_stv_fields.rab$w_stv0.#define rab$w_stv2 rab$r_stv_fields.rab$w_stv2-#define rab$w_rfa rab$r_rfa_overlay.rab$w_rfa;#define rab$r_rfa_fields rab$r_rfa_overlay.rab$r_rfa_fields.#define rab$ ,!l_rfa0 rab$r_rfa_fields.rab$l_rfa0.#define rab$w_rfa4 rab$r_rfa_fields.rab$w_rfa43#define rab$w_rop_2 rab$r_rop_2_overlay.rab$w_rop_2?#define rab$r_rop_2_bits0 rab$r_rop_2_overlay.rab$r_rop_2_bits0-#define rab$v_nql rab$r_rop_2_bits0.rab$v_nql7#define rab$v_nodlckwt rab$r_rop_2_bits0.rab$v_nodlckwt9#define rab$v_nodlckblk rab$r_rop_2_bits0.rab$v_nodlckblk-#define rab$l_kbf rab$r_kbf_overlay.rab$l_kbf-#define rab$l_pbf rab$r_kbf_overlay.rab$l_pbf-#define rab$b_ksz rab$r_ksz_overlay.rab$-!b_ksz-#define rab$b_psz rab$r_ksz_overlay.rab$b_psz-#define rab$l_bkt rab$r_bkt_overlay.rab$l_bkt-#define rab$l_dct rab$r_bkt_overlay.rab$l_dct"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct rabdef {#pragma __nomember_alignmentN unsigned char rab$b_bid; /* b .!lock id */N unsigned char rab$b_bln; /* block length */ __union {N unsigned short int rab$w_isi; /* internal stream index */N/* (ifi in fab) */ __struct {N unsigned rabdef$$_fill_1 : 6; /* move to bit 6 */S unsigned rab$v_ppf_rat : 8; /* rat value for process-permanent files */W unsigned rab$v /!_ppf_ind : 1; /* indirect access to process-permanent file */N/* (i.e., restricted operations) */] unsigned rab$v_ppisi : 1; /* indicates that this is process-permanent stream */ } rab$r_isi_bits; } rab$r_isi_overlay; __union {N unsigned int rab$l_rop; /* record options */ __struct {N unsigned rab$v_asy : 1; /* asynchronous operations */X 0! unsigned rab$v_tpt : 1; /* truncate put - allow sequential put not at */N/* eof, thus truncating file (seq. org only) */N/* */N/* these next two should be in the byte for bits */N/* input to $find or $get, but there is no room there */N/* */\ unsigned r1!ab$v_rea : 1; /* lock record for read only, allow other readers */N unsigned rab$v_rrl : 1; /* read record regardless of lock */N/* */N unsigned rab$v_uif : 1; /* update if existent */N unsigned rab$v_mas : 1; /* mass-insert mode */N unsigned rab$v_fdl : 1; /* fast record deletion */` unsigned rab$v_rev : 12!; /* reverse-search - can only be set with NXT or EQNXT */N/* */N unsigned rab$v_eof : 1; /* connect to eof */N unsigned rab$v_rah : 1; /* read ahead */N unsigned rab$v_wbh : 1; /* write behind */N unsigned rab$v_bio : 1; /* connect for bio only */N unsigned rab$v_cdk : 1; /*3! check for duplicate keys on $GET */N unsigned rab$v_loa : 1; /* use bucket fill percentage */i unsigned rab$v_lim : 1; /* compare for key limit reached on $get/$find seq. (idx only) */h unsigned rab$v_syncsts : 1; /* Synchronous status notification for asynchronous routines. */N/* */N/* the following bits are input to */N/* $find or $g4!et, (see above also REA and RRL) */N/* (separate byte) */N/* */N unsigned rab$v_loc : 1; /* use locate mode */N unsigned rab$v_wat : 1; /* wait if record not available */N unsigned rab$v_ulk : 1; /* manual unlocking */R unsigned rab$v_rlk : 1; 5!/* allow readers for this locked record */N unsigned rab$v_nlk : 1; /* do not lock record */N unsigned rab$v_kge : 1; /* key > or = */N unsigned rab$v_kgt : 1; /* key greater than */N unsigned rab$v_nxr : 1; /* get non-existent record */N/* */N/* the following bits are terminal qualifiers only 6! */N/* (separate byte) */N/* */N unsigned rab$v_rne : 1; /* read no echo */N unsigned rab$v_tmo : 1; /* use time-out period */N unsigned rab$v_cvt : 1; /* convert to upper case */N unsigned rab$v_rnf : 1; /* read no filter */N 7! unsigned rab$v_eto : 1; /* extended terminal operation */N unsigned rab$v_pta : 1; /* purge type ahead */N unsigned rab$v_pmt : 1; /* use prompt buffer */N unsigned rab$v_cco : 1; /* cancel control o on output */ } rab$r_rop_bits0; __struct {* unsigned rabdef$$_fill_6 : 21;N unsigned rab$v_eqnxt : 1; /* Synonyms for KGE and */N unsi 8!gned rab$v_nxt : 1; /* KGT */' unsigned rab$v_fill_3_ : 1; } rab$r_rop_bits1;N/* the following bits may be */N/* input to various rab-related */N/* operations */N/* */ __struct {! char rabdef$$_ 9!fill_3;N unsigned char rab$b_rop1; /* various options */] unsigned char rab$b_rop2; /* get/find options (use of this field discouraged */N/* due to REA and RRL being in a different byte) */N unsigned char rab$b_rop3; /* terminal read options */N/* */ } rab$r_rop_fields; } rab$r_rop_overlay;N unsigned int :! rab$l_sts; /* status */ __union {N unsigned int rab$l_stv; /* status value */ __struct {N unsigned short int rab$w_stv0; /* low word of stv */N unsigned short int rab$w_stv2; /* high word of stv */ } rab$r_stv_fields; } rab$r_stv_overlay; __union {N unsigned short int rab$w_rfa [3]; /* record's file address */ ;! __struct {$ unsigned int rab$l_rfa0;* unsigned short int rab$w_rfa4; } rab$r_rfa_fields; } rab$r_rfa_overlay;X short int rabdef$$_fill_4; /* (reserved - rms release 1 optimizes stores */N/* to the rfa field to be a move quad, overwriting */N/* this reserved word) */N unsigned int rab$l_ctx; /* user context */N/*-----*****! /* user buffer address */N char *rab$l_rbf; /* record buffer address */N char *rab$l_rhb; /* record header buffer addr */ __union {N char *rab$l_kbf; /* key buffer address */N char *rab$l_pbf; /* prompt buffer addr */ } rab$r_kbf_overlay; __union {N unsigned char rab$b_ksz; /* key buffer size */N ?! unsigned char rab$b_psz; /* prompt buffer size */ } rab$r_ksz_overlay;N unsigned char rab$b_krf; /* key of reference */N char rab$b_mbf; /* multi-buffer count */N unsigned char rab$b_mbc; /* multi-block count */ __union {N unsigned int rab$l_bkt; /* bucket hash code, vbn, or rrn */_ unsigned int rab$l_dct; /* duplicates count on @! key accessed on alternate key */ } rab$r_bkt_overlay;Q struct fabdef *rab$l_fab; /* related fab for connect */N void *rab$l_xab; /* XAB address */ } ; #if !defined(__VAXC)-#define rab$w_isi rab$r_isi_overlay.rab$w_isiD#define rab$v_ppf_rat rab$r_isi_overlay.rab$r_isi_bits.rab$v_ppf_ratD#define rab$v_ppf_ind rab$r_isi_overlay.rab$r_isi_bits.rab$v_ppf_ind@#define rab$v_ppisi rab$r_isi_overlay.rab$r_isi_bits A!.rab$v_ppisi-#define rab$l_rop rab$r_rop_overlay.rab$l_rop=#define rab$v_asy rab$r_rop_overlay.rab$r_rop_bits0.rab$v_asy=#define rab$v_tpt rab$r_rop_overlay.rab$r_rop_bits0.rab$v_tpt=#define rab$v_rea rab$r_rop_overlay.rab$r_rop_bits0.rab$v_rea=#define rab$v_rrl rab$r_rop_overlay.rab$r_rop_bits0.rab$v_rrl=#define rab$v_uif rab$r_rop_overlay.rab$r_rop_bits0.rab$v_uif=#define rab$v_mas rab$r_rop_overlay.rab$r_rop_bits0.rab$v_mas=#define rab$v_fdl rab$r_rop_overlay.rab$r_rop_bits0.rab$v_fd B!l=#define rab$v_rev rab$r_rop_overlay.rab$r_rop_bits0.rab$v_rev=#define rab$v_eof rab$r_rop_overlay.rab$r_rop_bits0.rab$v_eof=#define rab$v_rah rab$r_rop_overlay.rab$r_rop_bits0.rab$v_rah=#define rab$v_wbh rab$r_rop_overlay.rab$r_rop_bits0.rab$v_wbh=#define rab$v_bio rab$r_rop_overlay.rab$r_rop_bits0.rab$v_bio=#define rab$v_cdk rab$r_rop_overlay.rab$r_rop_bits0.rab$v_cdk=#define rab$v_loa rab$r_rop_overlay.rab$r_rop_bits0.rab$v_loa=#define rab$v_lim rab$r_rop_overlay.rab$r_rop_bits0.ra C!b$v_limE#define rab$v_syncsts rab$r_rop_overlay.rab$r_rop_bits0.rab$v_syncsts=#define rab$v_loc rab$r_rop_overlay.rab$r_rop_bits0.rab$v_loc=#define rab$v_wat rab$r_rop_overlay.rab$r_rop_bits0.rab$v_wat=#define rab$v_ulk rab$r_rop_overlay.rab$r_rop_bits0.rab$v_ulk=#define rab$v_rlk rab$r_rop_overlay.rab$r_rop_bits0.rab$v_rlk=#define rab$v_nlk rab$r_rop_overlay.rab$r_rop_bits0.rab$v_nlk=#define rab$v_kge rab$r_rop_overlay.rab$r_rop_bits0.rab$v_kge=#define rab$v_kgt rab$r_rop_overlay.rab$ D!r_rop_bits0.rab$v_kgt=#define rab$v_nxr rab$r_rop_overlay.rab$r_rop_bits0.rab$v_nxr=#define rab$v_rne rab$r_rop_overlay.rab$r_rop_bits0.rab$v_rne=#define rab$v_tmo rab$r_rop_overlay.rab$r_rop_bits0.rab$v_tmo=#define rab$v_cvt rab$r_rop_overlay.rab$r_rop_bits0.rab$v_cvt=#define rab$v_rnf rab$r_rop_overlay.rab$r_rop_bits0.rab$v_rnf=#define rab$v_eto rab$r_rop_overlay.rab$r_rop_bits0.rab$v_eto=#define rab$v_pta rab$r_rop_overlay.rab$r_rop_bits0.rab$v_pta=#define rab$v_pmt rab$r_rop_overla E!y.rab$r_rop_bits0.rab$v_pmt=#define rab$v_cco rab$r_rop_overlay.rab$r_rop_bits0.rab$v_ccoA#define rab$v_eqnxt rab$r_rop_overlay.rab$r_rop_bits1.rab$v_eqnxt=#define rab$v_nxt rab$r_rop_overlay.rab$r_rop_bits1.rab$v_nxt@#define rab$b_rop1 rab$r_rop_overlay.rab$r_rop_fields.rab$b_rop1@#define rab$b_rop2 rab$r_rop_overlay.rab$r_rop_fields.rab$b_rop2@#define rab$b_rop3 rab$r_rop_overlay.rab$r_rop_fields.rab$b_rop3-#define rab$l_stv rab$r_stv_overlay.rab$l_stv@#define rab$w_stv0 rab$r_stv_overl F!ay.rab$r_stv_fields.rab$w_stv0@#define rab$w_stv2 rab$r_stv_overlay.rab$r_stv_fields.rab$w_stv2-#define rab$w_rfa rab$r_rfa_overlay.rab$w_rfa@#define rab$l_rfa0 rab$r_rfa_overlay.rab$r_rfa_fields.rab$l_rfa0@#define rab$w_rfa4 rab$r_rfa_overlay.rab$r_rfa_fields.rab$w_rfa43#define rab$w_rop_2 rab$r_rop_2_overlay.rab$w_rop_2A#define rab$v_nql rab$r_rop_2_overlay.rab$r_rop_2_bits0.rab$v_nqlK#define rab$v_nodlckwt rab$r_rop_2_overlay.rab$r_rop_2_bits0.rab$v_nodlckwtM#define rab$v_nodlckblk rab$ G!r_rop_2_overlay.rab$r_rop_2_bits0.rab$v_nodlckblk-#define rab$l_kbf rab$r_kbf_overlay.rab$l_kbf-#define rab$l_pbf rab$r_kbf_overlay.rab$l_pbf-#define rab$b_ksz rab$r_ksz_overlay.rab$b_ksz-#define rab$b_psz rab$r_ksz_overlay.rab$b_psz-#define rab$l_bkt rab$r_bkt_overlay.rab$l_bkt-#define rab$l_dct rab$r_bkt_overlay.rab$l_dct"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* end of traditional 32-bit rab */N#defin H!e RAB$K_BLN 68 /* length of traditional 32-bit rab */N#define RAB$C_BLN 68 /* length of traditional 32-bit rab */ S/* These are traditional macros that should be hand-maintained for compatibility */W/* Do not have to add new ones, but do have to maintain those that are here already. */D#define RAB$V_PPF_RAT 6 /* rat value for process-permanent files */#define RAB$S_PPF_RAT 8I#define RAB$V_PPF_IND 14 /* indirect access to process-permanent file */2 I!#define RAB$V_ASY 0 /* asynchronous operations */L#define RAB$V_TPT 1 /* truncate-on-put - allow sequential put not at eof */I#define RAB$V_REA 2 /* lock record for read only, allow other readers */9#define RAB$V_RRL 3 /* read record regardless of lock */-#define RAB$V_UIF 4 /* update if existent */+#define RAB$V_MAS 5 /* mass-insert mode *//#define RAB$V_FDL 6 /* fast record deletion */)#define RAB$V_REV 7 /* reverse-search */1#define RAB$V_EOF 8 /* connect to end-of-file */% J!#define RAB$V_RAH 9 /* read ahead */(#define RAB$V_WBH 10 /* write behind */6#define RAB$V_BIO 11 /* connect for block I/O only */<#define RAB$V_CDK 12 /* check for duplicate keys on $GET */C#define RAB$V_LOA 13 /* load buckets according to the file size */V#define RAB$V_LIM 14 /* compare for key limit reached on $get/$find seq.(idx only) */Z#define RAB$V_SYNCSTS 15 /* Synchronous status notification for asynchronous routines. */+#define RAB$V_LOC 16 /* use locate mode */8#define RA K!B$V_WAT 17 /* wait if record not available */,#define RAB$V_ULK 18 /* manual unlocking */@#define RAB$V_RLK 19 /* allow readers for this locked record */.#define RAB$V_NLK 20 /* do not lock record */;#define RAB$V_KGE 21 /* key is greater than or equal to *//#define RAB$V_KGT 22 /* key is greater than */:#define RAB$V_NXR 23 /* non-existent record processing */(#define RAB$V_RNE 24 /* read no echo *//#define RAB$V_TMO 25 /* use time-out period */1#define RAB$V_CVT 26 /* convert tL!o upper case */*#define RAB$V_RNF 27 /* read no filter */7#define RAB$V_ETO 28 /* extended terminal operation */,#define RAB$V_PTA 29 /* purge type ahead */-#define RAB$V_PMT 30 /* use prompt buffer */6#define RAB$V_CCO 31 /* cancel control O on output *//#define RAB$V_EQNXT 21 /* Synonym for KGE */.#define RAB$V_NXT 22 /* Synonym for KGT */#ifdef __NEW_STARLET#define RAB _rabdef#else#define RAB rabdef#endif%#define cc$rms_rab (*decc$ga_rms_rab)(#if defined(__DECC M!) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdefV extern struct RAB cc$rms_rab; /* Declare initialized prototype data structures */# pragma extern_model __restore#elseY globalref struct RAB cc$rms_rab; /* Declare initialized prototype data structures */#endifN/* */N/* 64-bit variant of the record access block (rab) definitions */N/* N! */N/* The 64-bit rab consists of the traditional 32-bit rab */N/* followed by additional cells, added mainly to provide */N/* support for a 64-bit address for user buffers (UBF, RBF, */N/* KBF, RHB). */N/* */N/* O! */ N#define RAB64$C_BID 1 /* code for rab */#define RAB64$M_PPF_RAT 0x3FC0#define RAB64$M_PPF_IND 0x4000#define RAB64$M_PPISI 0x8000#define RAB64$M_ASY 0x1#define RAB64$M_TPT 0x2#define RAB64$M_REA 0x4#define RAB64$M_RRL 0x8#define RAB64$M_UIF 0x10#define RAB64$M_MAS 0x20#define RAB64$M_FDL 0x40#define RAB64$M_REV 0x80#define RAB64$M_EOF 0x100#define RAB64$M_RAH 0x200#define RAB64$M_WBH 0x400#definP!e RAB64$M_BIO 0x800#define RAB64$M_CDK 0x1000#define RAB64$M_LOA 0x2000#define RAB64$M_LIM 0x4000#define RAB64$M_SYNCSTS 0x8000#define RAB64$M_LOC 0x10000#define RAB64$M_WAT 0x20000#define RAB64$M_ULK 0x40000#define RAB64$M_RLK 0x80000#define RAB64$M_NLK 0x100000#define RAB64$M_KGE 0x200000#define RAB64$M_KGT 0x400000#define RAB64$M_NXR 0x800000#define RAB64$M_RNE 0x1000000#define RAB64$M_TMO 0x2000000#define RAB64$M_CVT 0x4000000#define RAB64$M_RNF 0x8000000 Q!#define RAB64$M_ETO 0x10000000#define RAB64$M_PTA 0x20000000#define RAB64$M_PMT 0x40000000#define RAB64$M_CCO 0x80000000#define RAB64$M_EQNXT 0x200000#define RAB64$M_NXT 0x400000#define RAB64$M_NQL 0x1#define RAB64$M_NODLCKWT 0x2#define RAB64$M_NODLCKBLK 0x4N#define RAB64$C_SEQ 0 /* sequential access */N#define RAB64$C_KEY 1 /* keyed access */N#define RAB64$C_RFA 2 /* rfa access R! */[#define RAB64$C_STM 3 /* stream access (valid only for sequential org) */Z#define RAB64$C_MAXRAC 2 /* Maximum RAC value currently supported by RMS */%#define RAB64$M_RESERVED29 0x20000000%#define RAB64$M_RESERVED30 0x40000000%#define RAB64$M_RESERVED31 0x80000000"#define RAB$M_RESERVED29 536870912##define RAB$M_RESERVED30 1073741824$#define RAB$M_RESERVED31 -2147483648  9#ifdef __cplusplus /* Define structure prototypes */struct _S!fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _rab64def {#pragma __nomember_alignmentN unsigned char rab64$b_bid; /* block id */N unsigned char rab64$b_bln; /* block length */ __union {N unsiT!gned short int rab64$w_isi; /* internal stream index */N/* (ifi in fab) */ __struct {N unsigned rab64def$$_fill_1 : 6; /* move to bit 6 */U unsigned rab64$v_ppf_rat : 8; /* rat value for process-permanent files */Y unsigned rab64$v_ppf_ind : 1; /* indirect access to process-permanent file */N/* (i.e., restricted operations) U!*/] unsigned rab64$v_ppisi : 1; /* indicates that this is process-permanent stream */ } rab64$r_isi_bits; } rab64$r_isi_overlay; __union {N unsigned int rab64$l_rop; /* record options */ __struct {N unsigned rab64$v_asy : 1; /* asynchronous operations */X unsigned rab64$v_tpt : 1; /* truncate put - allow sequential put not at */N/* eof, thus truncating file (seq. org only) V! */N/* */N/* these next two should be in the byte for bits */N/* input to $find or $get, but there is no room there */N/* */\ unsigned rab64$v_rea : 1; /* lock record for read only, allow other readers */N unsigned rab64$v_rrl : 1; /* read record regardlesW!s of lock */N/* */N unsigned rab64$v_uif : 1; /* update if existent */N unsigned rab64$v_mas : 1; /* mass-insert mode */N unsigned rab64$v_fdl : 1; /* fast record deletion */` unsigned rab64$v_rev : 1; /* reverse-search - can only be set with NXT or EQNXT */N/* X! */N unsigned rab64$v_eof : 1; /* connect to eof */N unsigned rab64$v_rah : 1; /* read ahead */N unsigned rab64$v_wbh : 1; /* write behind */N unsigned rab64$v_bio : 1; /* connect for bio only */N unsigned rab64$v_cdk : 1; /* check for duplicate keys on $GET */N unsigned rab64$v_loa : 1; /* use bucket fill percentage */i unsignY!ed rab64$v_lim : 1; /* compare for key limit reached on $get/$find seq. (idx only) */j unsigned rab64$v_syncsts : 1; /* Synchronous status notification for asynchronous routines. */N/* */N/* the following bits are input to */N/* $find or $get, (see above also REA and RRL) */N/* (separate byte) Z! */N/* */N unsigned rab64$v_loc : 1; /* use locate mode */N unsigned rab64$v_wat : 1; /* wait if record not available */N unsigned rab64$v_ulk : 1; /* manual unlocking */R unsigned rab64$v_rlk : 1; /* allow readers for this locked record */N unsigned rab64$v_nlk : 1; /* do not lock record */N [! unsigned rab64$v_kge : 1; /* key > or = */N unsigned rab64$v_kgt : 1; /* key greater than */N unsigned rab64$v_nxr : 1; /* get non-existent record */N/* */N/* the following bits are terminal qualifiers only */N/* (separate byte) */N/* \! */N unsigned rab64$v_rne : 1; /* read no echo */N unsigned rab64$v_tmo : 1; /* use time-out period */N unsigned rab64$v_cvt : 1; /* convert to upper case */N unsigned rab64$v_rnf : 1; /* read no filter */N unsigned rab64$v_eto : 1; /* extended terminal operation */N unsigned rab64$v_pta : 1; /* purge type ahead ]! */N unsigned rab64$v_pmt : 1; /* use prompt buffer */N unsigned rab64$v_cco : 1; /* cancel control o on output */ } rab64$r_rop_bits0; __struct {, unsigned rab64def$$_fill_6 : 21;N unsigned rab64$v_eqnxt : 1; /* Synonyms for KGE and */N unsigned rab64$v_nxt : 1; /* KGT */) unsigned rab64$v_fill_4_ : 1; } rab64$r_ ^!rop_bits1;N/* the following bits may be */N/* input to various rab-related */N/* operations */N/* */ __struct {# char rab64def$$_fill_3;N unsigned char rab64$b_rop1; /* various options */] unsigned char rab64$b_ _!rop2; /* get/find options (use of this field discouraged */N/* due to REA and RRL being in a different byte) */N unsigned char rab64$b_rop3; /* terminal read options */N/* */! } rab64$r_rop_fields; } rab64$r_rop_overlay;N unsigned int rab64$l_sts; /* status */ __union {N unsigned int rab64$l_stv; `!/* status value */ __struct {N unsigned short int rab64$w_stv0; /* low word of stv */N unsigned short int rab64$w_stv2; /* high word of stv */! } rab64$r_stv_fields; } rab64$r_stv_overlay; __union {N unsigned short int rab64$w_rfa [3]; /* record's file address */ __struct {& unsigned int rab64$l_rfa0;, unsigned short int rab64$w_rfa4;! a!} rab64$r_rfa_fields; } rab64$r_rfa_overlay;X short int rab64def$$_fill_4; /* (reserved - rms release 1 optimizes stores */N/* to the rfa field to be a move quad, overwriting */N/* this reserved word) */N unsigned int rab64$l_ctx; /* user context */N/*-----***** */N __union { b!/* */_ unsigned short int rab64$w_rop_2; /* extension to record options in traditional RAB */ __struct {N unsigned rab64$v_nql : 1; /* no query locking (record level) */N unsigned rab64$v_nodlckwt : 1; /* no deadlock wait */N unsigned rab64$v_nodlckblk : 1; /* no deadlock blocking */R unsigned rab64def$$_fill_5 : 13; /* reserved for future development */" } rab64$r_c!rop_2_bits0; } rab64$r_rop_2_overlay;N unsigned char rab64$b_rac; /* record access */N unsigned char rab64$b_tmo; /* time-out period */N unsigned short int rab64$w_usz; /* user buffer size */N unsigned short int rab64$w_rsz; /* record buffer size */N char *rab64$l_ubf; /* user buffer address */N char *rab64$l_rbf; /* record buffer a d!ddress */N char *rab64$l_rhb; /* record header buffer addr */ __union {N char *rab64$l_kbf; /* key buffer address */N char *rab64$l_pbf; /* prompt buffer addr */ } rab64$r_kbf_overlay; __union {N unsigned char rab64$b_ksz; /* key buffer size */N unsigned char rab64$b_psz; /* prompt buffer size */ } rab64$r_ks e!z_overlay;N unsigned char rab64$b_krf; /* key of reference */N char rab64$b_mbf; /* multi-buffer count */N unsigned char rab64$b_mbc; /* multi-block count */ __union {N unsigned int rab64$l_bkt; /* bucket hash code, vbn, or rrn */_ unsigned int rab64$l_dct; /* duplicates count on key accessed on alternate key */ } rab64$r_bkt_overlay;[ struct _fabdef *rab64$l_ f!fab; /* related fab for connect ~~~ struct fabdef ~~~ */N void *rab64$l_xab; /* XAB address */ __union {N unsigned int rab64$l_version; /* 64-bit rab extension version */N unsigned int rab$l_version; /* 64-bit rab extension version */ __struct {N unsigned short int rab64$w_verminor; /* minor version ident */N unsigned short int rab64$w_vermajor; /* major version ident */' g! } rab64$r_version_fields_1; __struct {N unsigned short int rab$w_verminor; /* minor version ident */N unsigned short int rab$w_vermajor; /* major version ident */' } rab64$r_version_fields_2;$ } rab64$r_version64_overlay; __union {c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endif h!R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *rab64$pq_ubf; /* 64-bit user buffer address */#else unsigned __int64 rab64$pq_ubf;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *rab$pq_u i!bf; /* 64-bit user buffer address */#else unsigned __int64 rab$pq_ubf;#endif } rab64$r_ubf64_overlay;#pragma __nomember_alignment __union {N unsigned __int64 rab64$q_usz; /* 64-bit user buffer size */N unsigned __int64 rab$q_usz; /* 64-bit user buffer size */ } rab64$r_usz64_overlay; __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer j!_size __long /* And set ptr size default to 64-bit pointers */N void *rab64$pq_rbf; /* 64-bit record buffer address */#else unsigned __int64 rab64$pq_rbf;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *rab$pq_rbf; /* 64-bit record buffer address */#else unsigned __int64 rab$pq_rbf;#endif k! } rab64$r_rbf64_overlay; __union {N unsigned __int64 rab64$q_rsz; /* 64-bit record buffer size */N unsigned __int64 rab$q_rsz; /* 64-bit record buffer size */ } rab64$r_rsz64_overlay; __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *rab64$pq_kbf; /* 64-bit key buffer address l!*/#else unsigned __int64 rab64$pq_kbf;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *rab$pq_kbf; /* 64-bit key buffer address */#else unsigned __int64 rab$pq_kbf;#endif } rab64$r_kbf64_overlay; __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __requ m!ired_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *rab64$pq_rhb; /* 64-bit record header buffer addr */#else unsigned __int64 rab64$pq_rhb;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *rab$pq_rhb; /* 64-bit record header buffer addr */#else unsigned __int64 rab$pq_rhb;#e n!ndif } rab64$r_rhb64_overlay; __union {N unsigned __int64 rab64$q_ctx; /* 64-bit user context */N unsigned __int64 rab$q_ctx; /* 64-bit user context */ } rab64$r_ctx64_overlay; __union {N unsigned int rab64$l_ropext; /* extended record options */N unsigned int rab$l_ropext; /* extended record options */ __struct {. unsigned rab64def$$_fill_7_1 : 29;N o! unsigned rab64$v_reserved29 : 1; /* MBZ - reserved for Digital */N unsigned rab64$v_reserved30 : 1; /* MBZ - reserved for Digital */N unsigned rab64$v_reserved31 : 1; /* MBZ - reserved for Digital */% } rab64$r_ropext_bits0_1; __struct {. unsigned rab64def$$_fill_7_2 : 29;N unsigned rab$v_reserved29 : 1; /* MBZ - reserved for Digital */N unsigned rab$v_reserved30 : 1; /* MBZ - reserved for Digital */N p! unsigned rab$v_reserved31 : 1; /* MBZ - reserved for Digital */% } rab64$r_ropext_bits0_2;' } rab64$r_ropext_overlay_rab64; __union {N unsigned int rab64$l_mbf; /* longword multi-buffer count */N unsigned int rab$l_mbf; /* longword multi-buffer count */ } rab64$r_mbf_overlay; __union {N unsigned int rab64$l_mbc; /* longword multi-block count */N unsigned int rab$l_mbc; /* lon q!gword multi-block count */ } rab64$r_mbc_overlay; __union {N unsigned int rab64$l_reserved_1; /* MBZ - reserved for Digital */N unsigned int rab$l_reserved_1; /* MBZ - reserved for Digital */% } rab64$r_reserved_1_overlay; } RAB64DEF; #if !defined(__VAXC)3#define rab64$w_isi rab64$r_isi_overlay.rab64$w_isi=#define rab64$r_isi_bits rab64$r_isi_overlay.rab64$r_isi_bits8#define rab64$v_ppf_rat rab64$r_isi_bits.rab64$v_ppf_rat8#def r!ine rab64$v_ppf_ind rab64$r_isi_bits.rab64$v_ppf_ind4#define rab64$v_ppisi rab64$r_isi_bits.rab64$v_ppisi3#define rab64$l_rop rab64$r_rop_overlay.rab64$l_rop?#define rab64$r_rop_bits0 rab64$r_rop_overlay.rab64$r_rop_bits01#define rab64$v_asy rab64$r_rop_bits0.rab64$v_asy1#define rab64$v_tpt rab64$r_rop_bits0.rab64$v_tpt1#define rab64$v_rea rab64$r_rop_bits0.rab64$v_rea1#define rab64$v_rrl rab64$r_rop_bits0.rab64$v_rrl1#define rab64$v_uif rab64$r_rop_bits0.rab64$v_uif1#define rab64$v_ma s!s rab64$r_rop_bits0.rab64$v_mas1#define rab64$v_fdl rab64$r_rop_bits0.rab64$v_fdl1#define rab64$v_rev rab64$r_rop_bits0.rab64$v_rev1#define rab64$v_eof rab64$r_rop_bits0.rab64$v_eof1#define rab64$v_rah rab64$r_rop_bits0.rab64$v_rah1#define rab64$v_wbh rab64$r_rop_bits0.rab64$v_wbh1#define rab64$v_bio rab64$r_rop_bits0.rab64$v_bio1#define rab64$v_cdk rab64$r_rop_bits0.rab64$v_cdk1#define rab64$v_loa rab64$r_rop_bits0.rab64$v_loa1#define rab64$v_lim rab64$r_rop_bits0.rab64$v_lim9#def t!ine rab64$v_syncsts rab64$r_rop_bits0.rab64$v_syncsts1#define rab64$v_loc rab64$r_rop_bits0.rab64$v_loc1#define rab64$v_wat rab64$r_rop_bits0.rab64$v_wat1#define rab64$v_ulk rab64$r_rop_bits0.rab64$v_ulk1#define rab64$v_rlk rab64$r_rop_bits0.rab64$v_rlk1#define rab64$v_nlk rab64$r_rop_bits0.rab64$v_nlk1#define rab64$v_kge rab64$r_rop_bits0.rab64$v_kge1#define rab64$v_kgt rab64$r_rop_bits0.rab64$v_kgt1#define rab64$v_nxr rab64$r_rop_bits0.rab64$v_nxr1#define rab64$v_rne rab64$r_rop_bi u!ts0.rab64$v_rne1#define rab64$v_tmo rab64$r_rop_bits0.rab64$v_tmo1#define rab64$v_cvt rab64$r_rop_bits0.rab64$v_cvt1#define rab64$v_rnf rab64$r_rop_bits0.rab64$v_rnf1#define rab64$v_eto rab64$r_rop_bits0.rab64$v_eto1#define rab64$v_pta rab64$r_rop_bits0.rab64$v_pta1#define rab64$v_pmt rab64$r_rop_bits0.rab64$v_pmt1#define rab64$v_cco rab64$r_rop_bits0.rab64$v_cco?#define rab64$r_rop_bits1 rab64$r_rop_overlay.rab64$r_rop_bits15#define rab64$v_eqnxt rab64$r_rop_bits1.rab64$v_eqnxt1#d v!efine rab64$v_nxt rab64$r_rop_bits1.rab64$v_nxtA#define rab64$r_rop_fields rab64$r_rop_overlay.rab64$r_rop_fields4#define rab64$b_rop1 rab64$r_rop_fields.rab64$b_rop14#define rab64$b_rop2 rab64$r_rop_fields.rab64$b_rop24#define rab64$b_rop3 rab64$r_rop_fields.rab64$b_rop33#define rab64$l_stv rab64$r_stv_overlay.rab64$l_stvA#define rab64$r_stv_fields rab64$r_stv_overlay.rab64$r_stv_fields4#define rab64$w_stv0 rab64$r_stv_fields.rab64$w_stv04#define rab64$w_stv2 rab64$r_stv_fields.rab64$w_st w!v23#define rab64$w_rfa rab64$r_rfa_overlay.rab64$w_rfaA#define rab64$r_rfa_fields rab64$r_rfa_overlay.rab64$r_rfa_fields4#define rab64$l_rfa0 rab64$r_rfa_fields.rab64$l_rfa04#define rab64$w_rfa4 rab64$r_rfa_fields.rab64$w_rfa49#define rab64$w_rop_2 rab64$r_rop_2_overlay.rab64$w_rop_2E#define rab64$r_rop_2_bits0 rab64$r_rop_2_overlay.rab64$r_rop_2_bits03#define rab64$v_nql rab64$r_rop_2_bits0.rab64$v_nql=#define rab64$v_nodlckwt rab64$r_rop_2_bits0.rab64$v_nodlckwt?#define rab64$v_nodlck x!blk rab64$r_rop_2_bits0.rab64$v_nodlckblk3#define rab64$l_kbf rab64$r_kbf_overlay.rab64$l_kbf3#define rab64$l_pbf rab64$r_kbf_overlay.rab64$l_pbf3#define rab64$b_ksz rab64$r_ksz_overlay.rab64$b_ksz3#define rab64$b_psz rab64$r_ksz_overlay.rab64$b_psz3#define rab64$l_bkt rab64$r_bkt_overlay.rab64$l_bkt3#define rab64$l_dct rab64$r_bkt_overlay.rab64$l_dctA#define rab64$l_version rab64$r_version64_overlay.rab64$l_version=#define rab$l_version rab64$r_version64_overlay.rab$l_versionS#definy!e rab64$r_version_fields_1 rab64$r_version64_overlay.rab64$r_version_fields_1B#define rab64$w_verminor rab64$r_version_fields_1.rab64$w_verminorB#define rab64$w_vermajor rab64$r_version_fields_1.rab64$w_vermajorS#define rab64$r_version_fields_2 rab64$r_version64_overlay.rab64$r_version_fields_2>#define rab$w_verminor rab64$r_version_fields_2.rab$w_verminor>#define rab$w_vermajor rab64$r_version_fields_2.rab$w_vermajor7#define rab64$pq_ubf rab64$r_ubf64_overlay.rab64$pq_ubf3#define rab$pq_ubf z! rab64$r_ubf64_overlay.rab$pq_ubf5#define rab64$q_usz rab64$r_usz64_overlay.rab64$q_usz1#define rab$q_usz rab64$r_usz64_overlay.rab$q_usz7#define rab64$pq_rbf rab64$r_rbf64_overlay.rab64$pq_rbf3#define rab$pq_rbf rab64$r_rbf64_overlay.rab$pq_rbf5#define rab64$q_rsz rab64$r_rsz64_overlay.rab64$q_rsz1#define rab$q_rsz rab64$r_rsz64_overlay.rab$q_rsz7#define rab64$pq_kbf rab64$r_kbf64_overlay.rab64$pq_kbf3#define rab$pq_kbf rab64$r_kbf64_overlay.rab$pq_kbf7#define rab64$pq_rhb rab64$r_r {!hb64_overlay.rab64$pq_rhb3#define rab$pq_rhb rab64$r_rhb64_overlay.rab$pq_rhb5#define rab64$q_ctx rab64$r_ctx64_overlay.rab64$q_ctx1#define rab$q_ctx rab64$r_ctx64_overlay.rab$q_ctxB#define rab64$l_ropext rab64$r_ropext_overlay_rab64.rab64$l_ropext>#define rab$l_ropext rab64$r_ropext_overlay_rab64.rab$l_ropextR#define rab64$r_ropext_bits0_1 rab64$r_ropext_overlay_rab64.rab64$r_ropext_bits0_1D#define rab64$v_reserved29 rab64$r_ropext_bits0_1.rab64$v_reserved29D#define rab64$v_reserved30 rab |!64$r_ropext_bits0_1.rab64$v_reserved30D#define rab64$v_reserved31 rab64$r_ropext_bits0_1.rab64$v_reserved31R#define rab64$r_ropext_bits0_2 rab64$r_ropext_overlay_rab64.rab64$r_ropext_bits0_2@#define rab$v_reserved29 rab64$r_ropext_bits0_2.rab$v_reserved29@#define rab$v_reserved30 rab64$r_ropext_bits0_2.rab$v_reserved30@#define rab$v_reserved31 rab64$r_ropext_bits0_2.rab$v_reserved313#define rab64$l_mbf rab64$r_mbf_overlay.rab64$l_mbf/#define rab$l_mbf rab64$r_mbf_overlay.rab$l_mbf3#define ra }!b64$l_mbc rab64$r_mbc_overlay.rab64$l_mbc/#define rab$l_mbc rab64$r_mbc_overlay.rab$l_mbcH#define rab64$l_reserved_1 rab64$r_reserved_1_overlay.rab64$l_reserved_1D#define rab$l_reserved_1 rab64$r_reserved_1_overlay.rab$l_reserved_1"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifstruct ~! rab64def {#pragma __nomember_alignmentN unsigned char rab64$b_bid; /* block id */N unsigned char rab64$b_bln; /* block length */ __union {N unsigned short int rab64$w_isi; /* internal stream index */N/* (ifi in fab) */ __struct {N unsigned rab64def$$_fill_1 : 6; /* move to bit 6 */U unsigned rab !64$v_ppf_rat : 8; /* rat value for process-permanent files */Y unsigned rab64$v_ppf_ind : 1; /* indirect access to process-permanent file */N/* (i.e., restricted operations) */] unsigned rab64$v_ppisi : 1; /* indicates that this is process-permanent stream */ } rab64$r_isi_bits; } rab64$r_isi_overlay; __union {N unsigned int rab64$l_rop; /* record options */ __st!ruct {N unsigned rab64$v_asy : 1; /* asynchronous operations */X unsigned rab64$v_tpt : 1; /* truncate put - allow sequential put not at */N/* eof, thus truncating file (seq. org only) */N/* */N/* these next two should be in the byte for bits */N/* input to $find or $get, but there is no room there */N/* ! */\ unsigned rab64$v_rea : 1; /* lock record for read only, allow other readers */N unsigned rab64$v_rrl : 1; /* read record regardless of lock */N/* */N unsigned rab64$v_uif : 1; /* update if existent */N unsigned rab64$v_mas : 1; /* mass-insert mode */N unsign!ed rab64$v_fdl : 1; /* fast record deletion */` unsigned rab64$v_rev : 1; /* reverse-search - can only be set with NXT or EQNXT */N/* */N unsigned rab64$v_eof : 1; /* connect to eof */N unsigned rab64$v_rah : 1; /* read ahead */N unsigned rab64$v_wbh : 1; /* write behind */N unsigned rab64!$v_bio : 1; /* connect for bio only */N unsigned rab64$v_cdk : 1; /* check for duplicate keys on $GET */N unsigned rab64$v_loa : 1; /* use bucket fill percentage */i unsigned rab64$v_lim : 1; /* compare for key limit reached on $get/$find seq. (idx only) */j unsigned rab64$v_syncsts : 1; /* Synchronous status notification for asynchronous routines. */N/* !*/N/* the following bits are input to */N/* $find or $get, (see above also REA and RRL) */N/* (separate byte) */N/* */N unsigned rab64$v_loc : 1; /* use locate mode */N unsigned rab64$v_wat : 1; /* wait if record not available */N unsigned r!ab64$v_ulk : 1; /* manual unlocking */R unsigned rab64$v_rlk : 1; /* allow readers for this locked record */N unsigned rab64$v_nlk : 1; /* do not lock record */N unsigned rab64$v_kge : 1; /* key > or = */N unsigned rab64$v_kgt : 1; /* key greater than */N unsigned rab64$v_nxr : 1; /* get non-existent record */N/* ! */N/* the following bits are terminal qualifiers only */N/* (separate byte) */N/* */N unsigned rab64$v_rne : 1; /* read no echo */N unsigned rab64$v_tmo : 1; /* use time-out period */N unsigned rab64$v_cvt : 1; /* convert to upper case ! */N unsigned rab64$v_rnf : 1; /* read no filter */N unsigned rab64$v_eto : 1; /* extended terminal operation */N unsigned rab64$v_pta : 1; /* purge type ahead */N unsigned rab64$v_pmt : 1; /* use prompt buffer */N unsigned rab64$v_cco : 1; /* cancel control o on output */ } rab64$r_rop_bits0; __struct {, unsigned rab64def$$_fill_6 : ! 21;N unsigned rab64$v_eqnxt : 1; /* Synonyms for KGE and */N unsigned rab64$v_nxt : 1; /* KGT */) unsigned rab64$v_fill_4_ : 1; } rab64$r_rop_bits1;N/* the following bits may be */N/* input to various rab-related */N/* operations */N/* ! */ __struct {# char rab64def$$_fill_3;N unsigned char rab64$b_rop1; /* various options */] unsigned char rab64$b_rop2; /* get/find options (use of this field discouraged */N/* due to REA and RRL being in a different byte) */N unsigned char rab64$b_rop3; /* terminal read options */N/* ! */! } rab64$r_rop_fields; } rab64$r_rop_overlay;N unsigned int rab64$l_sts; /* status */ __union {N unsigned int rab64$l_stv; /* status value */ __struct {N unsigned short int rab64$w_stv0; /* low word of stv */N unsigned short int rab64$w_stv2; /* high word of stv */! } rab64$r_stv_fields; } rab64$ !r_stv_overlay; __union {N unsigned short int rab64$w_rfa [3]; /* record's file address */ __struct {& unsigned int rab64$l_rfa0;, unsigned short int rab64$w_rfa4;! } rab64$r_rfa_fields; } rab64$r_rfa_overlay;X short int rab64def$$_fill_4; /* (reserved - rms release 1 optimizes stores */N/* to the rfa field to be a move quad, overwriting */N/* this reserved word) ! */N unsigned int rab64$l_ctx; /* user context */N/*-----***** */N __union { /* */_ unsigned short int rab64$w_rop_2; /* extension to record options in traditional RAB */ __struct {N unsigned rab64$v_nql : 1; /* no query locking (record level) */N unsigned rab64$v_nodlc!kwt : 1; /* no deadlock wait */N unsigned rab64$v_nodlckblk : 1; /* no deadlock blocking */R unsigned rab64def$$_fill_5 : 13; /* reserved for future development */" } rab64$r_rop_2_bits0; } rab64$r_rop_2_overlay;N unsigned char rab64$b_rac; /* record access */N unsigned char rab64$b_tmo; /* time-out period */N unsigned short int rab64$w_usz; /* user buffer size ! */N unsigned short int rab64$w_rsz; /* record buffer size */N char *rab64$l_ubf; /* user buffer address */N char *rab64$l_rbf; /* record buffer address */N char *rab64$l_rhb; /* record header buffer addr */ __union {N char *rab64$l_kbf; /* key buffer address */N char *rab64$l_pbf; /* prompt buffer addr !*/ } rab64$r_kbf_overlay; __union {N unsigned char rab64$b_ksz; /* key buffer size */N unsigned char rab64$b_psz; /* prompt buffer size */ } rab64$r_ksz_overlay;N unsigned char rab64$b_krf; /* key of reference */N char rab64$b_mbf; /* multi-buffer count */N unsigned char rab64$b_mbc; /* multi-block count */ __union {N ! unsigned int rab64$l_bkt; /* bucket hash code, vbn, or rrn */_ unsigned int rab64$l_dct; /* duplicates count on key accessed on alternate key */ } rab64$r_bkt_overlay;Q struct fabdef *rab64$l_fab; /* related fab for connect */N void *rab64$l_xab; /* XAB address */ __union {N unsigned int rab64$l_version; /* 64-bit rab extension version */N unsigned int rab$l_version; /* ! 64-bit rab extension version */ __struct {N unsigned short int rab64$w_verminor; /* minor version ident */N unsigned short int rab64$w_vermajor; /* major version ident */' } rab64$r_version_fields_1; __struct {N unsigned short int rab$w_verminor; /* minor version ident */N unsigned short int rab$w_vermajor; /* major version ident */' } rab64$r_version_fields_2;$ } rab64$r_ve !rsion64_overlay; __union {c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endifN unsigned __int64 rab64$pq_ubf; /* 64-bit user buffer address */N unsigned __int64 rab$pq_ubf; /* 64-bit user buffer address */ } rab64$r_ubf64_overlay;#pragma __nomember_alignment __union {N unsigned int rab64$q_usz [2]; /* ! 64-bit user buffer size */N unsigned int rab$q_usz [2]; /* 64-bit user buffer size */ } rab64$r_usz64_overlay; __union {N unsigned __int64 rab64$pq_rbf; /* 64-bit record buffer address */N unsigned __int64 rab$pq_rbf; /* 64-bit record buffer address */ } rab64$r_rbf64_overlay; __union {N unsigned int rab64$q_rsz [2]; /* 64-bit record buffer size */N unsigned int rab$q_rsz [2]; /* 64-bi !t record buffer size */ } rab64$r_rsz64_overlay; __union {N unsigned __int64 rab64$pq_kbf; /* 64-bit key buffer address */N unsigned __int64 rab$pq_kbf; /* 64-bit key buffer address */ } rab64$r_kbf64_overlay; __union {N unsigned __int64 rab64$pq_rhb; /* 64-bit record header buffer addr */N unsigned __int64 rab$pq_rhb; /* 64-bit record header buffer addr */ } rab64$r_rhb64_overlay; __union {N ! unsigned int rab64$q_ctx [2]; /* 64-bit user context */N unsigned int rab$q_ctx [2]; /* 64-bit user context */ } rab64$r_ctx64_overlay; __union {N unsigned int rab64$l_ropext; /* extended record options */N unsigned int rab$l_ropext; /* extended record options */ __struct {. unsigned rab64def$$_fill_7_1 : 29;N unsigned rab64$v_reserved29 : 1; /* MBZ - reserved for Dig !ital */N unsigned rab64$v_reserved30 : 1; /* MBZ - reserved for Digital */N unsigned rab64$v_reserved31 : 1; /* MBZ - reserved for Digital */% } rab64$r_ropext_bits0_1; __struct {. unsigned rab64def$$_fill_7_2 : 29;N unsigned rab$v_reserved29 : 1; /* MBZ - reserved for Digital */N unsigned rab$v_reserved30 : 1; /* MBZ - reserved for Digital */N unsigned rab$v_reserved31 : 1; /* MBZ - reserved for D !igital */% } rab64$r_ropext_bits0_2;' } rab64$r_ropext_overlay_rab64; __union {N unsigned int rab64$l_mbf; /* longword multi-buffer count */N unsigned int rab$l_mbf; /* longword multi-buffer count */ } rab64$r_mbf_overlay; __union {N unsigned int rab64$l_mbc; /* longword multi-block count */N unsigned int rab$l_mbc; /* longword multi-block count */ } rab64$r_mbc_over !lay; __union {N unsigned int rab64$l_reserved_1; /* MBZ - reserved for Digital */N unsigned int rab$l_reserved_1; /* MBZ - reserved for Digital */% } rab64$r_reserved_1_overlay; } ; #if !defined(__VAXC)3#define rab64$w_isi rab64$r_isi_overlay.rab64$w_isiL#define rab64$v_ppf_rat rab64$r_isi_overlay.rab64$r_isi_bits.rab64$v_ppf_ratL#define rab64$v_ppf_ind rab64$r_isi_overlay.rab64$r_isi_bits.rab64$v_ppf_indH#define rab64$v_ppisi rab64$r_isi_over!lay.rab64$r_isi_bits.rab64$v_ppisi3#define rab64$l_rop rab64$r_rop_overlay.rab64$l_ropE#define rab64$v_asy rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_asyE#define rab64$v_tpt rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_tptE#define rab64$v_rea rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_reaE#define rab64$v_rrl rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_rrlE#define rab64$v_uif rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_uifE#define rab64$v_mas rab64$r_rop_overlay.rab64$r_rop_bits!0.rab64$v_masE#define rab64$v_fdl rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_fdlE#define rab64$v_rev rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_revE#define rab64$v_eof rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_eofE#define rab64$v_rah rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_rahE#define rab64$v_wbh rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_wbhE#define rab64$v_bio rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_bioE#define rab64$v_cdk rab64$r_rop_overlay.rab64$r_rop_bits0.!rab64$v_cdkE#define rab64$v_loa rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_loaE#define rab64$v_lim rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_limM#define rab64$v_syncsts rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_syncstsE#define rab64$v_loc rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_locE#define rab64$v_wat rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_watE#define rab64$v_ulk rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_ulkE#define rab64$v_rlk rab64$r_rop_overlay.rab64$r_rop_!bits0.rab64$v_rlkE#define rab64$v_nlk rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_nlkE#define rab64$v_kge rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_kgeE#define rab64$v_kgt rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_kgtE#define rab64$v_nxr rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_nxrE#define rab64$v_rne rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_rneE#define rab64$v_tmo rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_tmoE#define rab64$v_cvt rab64$r_rop_overlay.rab64$r_rop_bi!ts0.rab64$v_cvtE#define rab64$v_rnf rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_rnfE#define rab64$v_eto rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_etoE#define rab64$v_pta rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_ptaE#define rab64$v_pmt rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_pmtE#define rab64$v_cco rab64$r_rop_overlay.rab64$r_rop_bits0.rab64$v_ccoI#define rab64$v_eqnxt rab64$r_rop_overlay.rab64$r_rop_bits1.rab64$v_eqnxtE#define rab64$v_nxt rab64$r_rop_overlay.rab64$r_rop_ !bits1.rab64$v_nxtH#define rab64$b_rop1 rab64$r_rop_overlay.rab64$r_rop_fields.rab64$b_rop1H#define rab64$b_rop2 rab64$r_rop_overlay.rab64$r_rop_fields.rab64$b_rop2H#define rab64$b_rop3 rab64$r_rop_overlay.rab64$r_rop_fields.rab64$b_rop33#define rab64$l_stv rab64$r_stv_overlay.rab64$l_stvH#define rab64$w_stv0 rab64$r_stv_overlay.rab64$r_stv_fields.rab64$w_stv0H#define rab64$w_stv2 rab64$r_stv_overlay.rab64$r_stv_fields.rab64$w_stv23#define rab64$w_rfa rab64$r_rfa_overlay.rab64$w_rfaH#define !rab64$l_rfa0 rab64$r_rfa_overlay.rab64$r_rfa_fields.rab64$l_rfa0H#define rab64$w_rfa4 rab64$r_rfa_overlay.rab64$r_rfa_fields.rab64$w_rfa49#define rab64$w_rop_2 rab64$r_rop_2_overlay.rab64$w_rop_2I#define rab64$v_nql rab64$r_rop_2_overlay.rab64$r_rop_2_bits0.rab64$v_nqlS#define rab64$v_nodlckwt rab64$r_rop_2_overlay.rab64$r_rop_2_bits0.rab64$v_nodlckwtU#define rab64$v_nodlckblk rab64$r_rop_2_overlay.rab64$r_rop_2_bits0.rab64$v_nodlckblk3#define rab64$l_kbf rab64$r_kbf_overlay.rab64$l_kbf3#d !efine rab64$l_pbf rab64$r_kbf_overlay.rab64$l_pbf3#define rab64$b_ksz rab64$r_ksz_overlay.rab64$b_ksz3#define rab64$b_psz rab64$r_ksz_overlay.rab64$b_psz3#define rab64$l_bkt rab64$r_bkt_overlay.rab64$l_bkt3#define rab64$l_dct rab64$r_bkt_overlay.rab64$l_dctA#define rab64$l_version rab64$r_version64_overlay.rab64$l_version=#define rab$l_version rab64$r_version64_overlay.rab$l_version\#define rab64$w_verminor rab64$r_version64_overlay.rab64$r_version_fields_1.rab64$w_verminor\#define rab6!4$w_vermajor rab64$r_version64_overlay.rab64$r_version_fields_1.rab64$w_vermajorX#define rab$w_verminor rab64$r_version64_overlay.rab64$r_version_fields_2.rab$w_verminorX#define rab$w_vermajor rab64$r_version64_overlay.rab64$r_version_fields_2.rab$w_vermajor7#define rab64$pq_ubf rab64$r_ubf64_overlay.rab64$pq_ubf3#define rab$pq_ubf rab64$r_ubf64_overlay.rab$pq_ubf5#define rab64$q_usz rab64$r_usz64_overlay.rab64$q_usz1#define rab$q_usz rab64$r_usz64_overlay.rab$q_usz7#define rab64$pq_rbf rab !64$r_rbf64_overlay.rab64$pq_rbf3#define rab$pq_rbf rab64$r_rbf64_overlay.rab$pq_rbf5#define rab64$q_rsz rab64$r_rsz64_overlay.rab64$q_rsz1#define rab$q_rsz rab64$r_rsz64_overlay.rab$q_rsz7#define rab64$pq_kbf rab64$r_kbf64_overlay.rab64$pq_kbf3#define rab$pq_kbf rab64$r_kbf64_overlay.rab$pq_kbf7#define rab64$pq_rhb rab64$r_rhb64_overlay.rab64$pq_rhb3#define rab$pq_rhb rab64$r_rhb64_overlay.rab$pq_rhb5#define rab64$q_ctx rab64$r_ctx64_overlay.rab64$q_ctx1#define rab$q_ctx rab64$r_ctx6!4_overlay.rab$q_ctxB#define rab64$l_ropext rab64$r_ropext_overlay_rab64.rab64$l_ropext>#define rab$l_ropext rab64$r_ropext_overlay_rab64.rab$l_ropexta#define rab64$v_reserved29 rab64$r_ropext_overlay_rab64.rab64$r_ropext_bits0_1.rab64$v_reserved29a#define rab64$v_reserved30 rab64$r_ropext_overlay_rab64.rab64$r_ropext_bits0_1.rab64$v_reserved30a#define rab64$v_reserved31 rab64$r_ropext_overlay_rab64.rab64$r_ropext_bits0_1.rab64$v_reserved31]#define rab$v_reserved29 rab64$r_ropext_overlay_rab6!4.rab64$r_ropext_bits0_2.rab$v_reserved29]#define rab$v_reserved30 rab64$r_ropext_overlay_rab64.rab64$r_ropext_bits0_2.rab$v_reserved30]#define rab$v_reserved31 rab64$r_ropext_overlay_rab64.rab64$r_ropext_bits0_2.rab$v_reserved313#define rab64$l_mbf rab64$r_mbf_overlay.rab64$l_mbf/#define rab$l_mbf rab64$r_mbf_overlay.rab$l_mbf3#define rab64$l_mbc rab64$r_mbc_overlay.rab64$l_mbc/#define rab$l_mbc rab64$r_mbc_overlay.rab$l_mbcH#define rab64$l_reserved_1 rab64$r_reserved_1_overlay.rab64$l_ !reserved_1D#define rab$l_reserved_1 rab64$r_reserved_1_overlay.rab$l_reserved_1"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* end of 64-bit rab variant */N#define RAB64$K_BLN64 144 /* length of 64-bit rab variant */N#define RAB64$C_BLN64 144 /* length of 64-bit rab variant */N#define RAB$K_BLN64 144 /* length of 64-bit rab variant */N#define RAB$C_BLN64 144 ! /* length of 64-bit rab variant */N#define RAB$K_MAXBLN 144 /* current maximum length of rab */N#define RAB$C_MAXBLN 144 /* current maximum length of rab */ S/* These are traditional macros that should be hand-maintained for compatibility */W/* Do not have to add new ones, but do have to maintain those that are here already. */F#define RAB64$V_PPF_RAT 6 /* rat value for process-permanent files */#define RAB64$S_PPF_RAT 8K#define RA !B64$V_PPF_IND 14 /* indirect access to process-permanent file */4#define RAB64$V_ASY 0 /* asynchronous operations */N#define RAB64$V_TPT 1 /* truncate-on-put - allow sequential put not at eof */K#define RAB64$V_REA 2 /* lock record for read only, allow other readers */;#define RAB64$V_RRL 3 /* read record regardless of lock *//#define RAB64$V_UIF 4 /* update if existent */-#define RAB64$V_MAS 5 /* mass-insert mode */1#define RAB64$V_FDL 6 /* fast record deletion */+#define RAB64$ !V_REV 7 /* reverse-search */3#define RAB64$V_EOF 8 /* connect to end-of-file */'#define RAB64$V_RAH 9 /* read ahead */*#define RAB64$V_WBH 10 /* write behind */8#define RAB64$V_BIO 11 /* connect for block I/O only */>#define RAB64$V_CDK 12 /* check for duplicate keys on $GET */E#define RAB64$V_LOA 13 /* load buckets according to the file size */X#define RAB64$V_LIM 14 /* compare for key limit reached on $get/$find seq.(idx only) */\#define RAB64$V_SYNCSTS 15 /* Synchronous status !notification for asynchronous routines. */-#define RAB64$V_LOC 16 /* use locate mode */:#define RAB64$V_WAT 17 /* wait if record not available */.#define RAB64$V_ULK 18 /* manual unlocking */B#define RAB64$V_RLK 19 /* allow readers for this locked record */0#define RAB64$V_NLK 20 /* do not lock record */=#define RAB64$V_KGE 21 /* key is greater than or equal to */1#define RAB64$V_KGT 22 /* key is greater than */<#define RAB64$V_NXR 23 /* non-existent record processing */*#define RA !B64$V_RNE 24 /* read no echo */1#define RAB64$V_TMO 25 /* use time-out period */3#define RAB64$V_CVT 26 /* convert to upper case */,#define RAB64$V_RNF 27 /* read no filter */9#define RAB64$V_ETO 28 /* extended terminal operation */.#define RAB64$V_PTA 29 /* purge type ahead *//#define RAB64$V_PMT 30 /* use prompt buffer */8#define RAB64$V_CCO 31 /* cancel control O on output */1#define RAB64$V_EQNXT 21 /* Synonym for KGE */0#define RAB64$V_NXT 22 /* Synonym for KGT */#i !fdef __NEW_STARLET#define RAB64 _rab64def#else#define RAB64 rab64def#endif)#define cc$rms_rab64 (*decc$ga_rms_rab64)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdef^#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` extern struct RAB64 cc$rms_rab64; /* Declare initialized prototype data structures */^#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */c#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif# pragma extern_model __restore#else` globalref struct RAB64 cc$rms_rab64; /* Declare initialized prototype data structures */#endif  $#pragma __memb!er_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __RABDEF_LOADED */ ww @/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by Open !VMS SDL EV3-3 */L/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]MOUNTMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $RBLDDEF ***/#ifndef __RBLDDEF_LOADED#define __RBLDDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined wh!enever 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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:38.67 */N/* */#define REBUILD$_FACILITY 1814 #define RBLD$_NODEVICE 118915082#define RBLD$_ADDERR 118915090!#d!efine RBLD$_MODIFYERR 118915098#define RBLD$_CLOSERR 118915106#define RBLD$_LOCKERR 118915114!#define RBLD$_UNLOCKERR 118915122#define RBLD$_MAXVOLS 118915130!#define RBLD$_ACCINDEXF 118915138!#define RBLD$_ACCBITMAP 118915146 #define RBLD$_ACCQFILE 118915154!#define RBLD$_QUOTARERR 118915162!#define RBLD$_BITMAPERR 118915170#define RBLD$_READSCB 118915178 #define RBLD$_WRITESCB 118915186 #define RBLD$_WRTIBMAP 118915194!#define RBLD$_WRTBITMAP 118915202 #define RBLD$_MEMA!LLOC 118915210!#define RBLD$_HOMEBLOCK 118915218!#define RBLD$_SYSHEADER 118915226#define RBLD$_ERRORS 118915234#define RBLD$_SHADSCB 118915242#define RBLD$_DUALLOC 118915248!#define RBLD$_HEADERERR 118915256 #define RBLD$_WRITEHDR 118915264!#define RBLD$_ERASEBLKS 118915272%#define RBLD$_VOLNOTPRESENT 118915280##define RBLD$_INVBACKLINK 118915288##define RBLD$_NOREBLDREQD 118915299!#define RBLD$_REBLDREQD 118915307!#define RBLD$_REBLDDONE 118915313"#define RBLD$_INVALIDSCB! 118915322 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __RBLDDEF_LOADED */ ww@/********************************************************************************************************************************/=/* Creat !ed: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $REGDEF ***/#ifndef __REGDEF_LOADED#define __REGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITI!AL_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 s!truct#else#define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif #ifndef __REGDEF#define __REGDEFN/* */N/* +===================================================================+ */N/* | */N/* | REG - Registry system service! ($REGISTRY) definition */N/* | */N/* +===================================================================+ */N/* */N/* +-------------------------------------------------------------------+ */N/* | Function codes */N/* +---------------------------------------------------------!----------+ */N/* */T#define REG$FC_CLOSE_KEY 1 /* Releases the resources for a given key */m#define REG$FC_CREATE_KEY 2 /* Either creates a specified key or opens it if it already exists */W#define REG$FC_DELETE_KEY 3 /* Removes a specified key from the registry */Z#define REG$FC_DELETE_VALUE 4 /* Deletes the specified value from a given key */R#define REG$FC_ENUM_KEY 5 ! /* Retrieves information about a subkey */Q#define REG$FC_ENUM_VALUE 6 /* Retrieves information about a value */b#define REG$FC_FLUSH_KEY 7 /* Write all the information of a specified key to disk */e#define REG$FC_LOAD_KEY 8 /* Create a subkey and store information from a given file */X#define REG$FC_MODIFY_KEY 9 /* Modifies information about a specified key */l#define REG$FC_MODIFY_TREE_KEY 10 /* Modifies information about a !specified key and all its subkeys */m#define REG$FC_NOTIFY_CHANGE_KEY_VALUE 11 /* Notifies the calling process when a specified key has changed */N#define REG$FC_OPEN_KEY 12 /* Opens a specified key */Y#define REG$FC_QUERY_KEY 13 /* Retrieves information about a specified key */[#define REG$FC_QUERY_VALUE 14 /* Retrieves information about a specified value */u#define REG$FC_REPLACE_KEY 15 /* Replaces a key and all its subkeys with informa!tion in a specified file */R#define REG$FC_RESTORE_KEY 16 /* Restores a key from a specified file */]#define REG$FC_SAVE_KEY 17 /* Saves a key and its subkeys to a specified file */c#define REG$FC_SEARCH_TREE_DATA 18 /* Scan a key and its subkeys for a given data component */[#define REG$FC_SEARCH_TREE_KEY 19 /* Scan a key and its subkeys for a given subkey */Z#define REG$FC_SEARCH_TREE_VALUE 20 /* Scan a key and its subkeys for a given value */N#define !REG$FC_SET_VALUE 21 /* Sets value infornation */R#define REG$FC_UNLOAD_KEY 22 /* Removes a key tree form the registry */N#define REG$FC_GET_KEY_SECURITY 23 /* Retrieves a key security profile */N#define REG$FC_SET_KEY_SECURITY 24 /* Sets a key security profile */O#define REG$FC_GET_PERFORMANCE 25 /* Retrieves performance information */N#define REG$FC_GET_FILE_INFO 26 /* Retrieves file statistics */V#define REG$FC_GET_FILE_UPDA!TE 27 /* Retrieves segment allocation information */N#define REG$FC_CREATE_DATABASE 28 /* Creates the registry database */V#define REG$FC_MAKE_SNAPSHOT 29 /* Take a snpashot of the Registry database */N#define REG$FC_ARCHIVE 30 /* Archive the registry database */N#define REG$FC_LAST 31 /* Always last */N/* */N/* +---------------------------------!----------------------------------+ */N/* | Item Code Modifiers */N/* +-------------------------------------------------------------------+ */N/* */N#define REG$M_UNICODE_STRING 8192 /* 0x2000 string is Unicode */N/* */N/* +-----------------------------------------------------------!--------+ */N/* | Item Codes */N/* +-------------------------------------------------------------------+ */N/* */N#define REG$_TERMINATOR 0 /* network packet terminator */N#define REG$_SEPARATOR 1 /* item code list seperator */N#define REG$_SECPROFILE 514 /* security profile */N#define RE!G$_REQUEST 515 /* TLV of item code TLVs (request) */N#define REG$_ACMODE 1284 /* access mode */Q#define REG$_ACTIONCODE 1285 /* action code for performance & space */N#define REG$_CACHEACTION 1286 /* cache action (thru/behind ) */N#define REG$_CANCELNOTIFICATION 519 /* Cancel notify key change notify */N#define REG$_CLASSNAME 264 /* class name */N#define REG$_CLASSNAMEMAX 1289 ! /* longest class name length */R#define REG$_CLASSNAMESIZE 1290 /* destination's class name buffer size */N#define REG$_DATAFLAGS 1547 /* data flags */N#define REG$_DATATYPE 1292 /* data type */N#define REG$_DISPOSITION 1293 /* createnewkey/openexistingkey */N#define REG$_FILEINFODATA 526 /* File info data */N#define REG$_FILELOAD 1807 /* OpenVMS fil!e name to load */N#define REG$_FILESAVE 1808 /* OpenVMS file name to save */N#define REG$_FILEUPDATEDATA 529 /* File update data */N#define REG$_FLAGOPCODE 1298 /* how data flags is used */N#define REG$_FLAGSUBKEY 1299 /* report (sub)key changes */N#define REG$_KEYID 1300 /* input key id in longword format */R#define REG$_KEYID_INTERNAL 533 /* internal key id in UID/FSO/LH format !*/N#define REG$_KEYFLAGS 1302 /* KEY flags */N#define REG$_KEYPATH 279 /* Path to key object */N#define REG$_KEYRESULT 1304 /* output key id in longword format */R#define REG$_KEYRESULT_INTERNAL 537 /* internal key id in UID/FSO/LH format */N#define REG$_LASTWRITE 1562 /* time key was last written */N#define REG$_LINKCOUNT 1307 /* Count of links refer to item */N#define REG$_LINKP!ATH 284 /* key path a key is linked to */Q#define REG$_LINKPATHSIZE 1309 /* destination's link path buffer size */N#define REG$_LINKTYPE 1310 /* Link type (logical/physical) */N#define REG$_LOCK 1311 /* what lock on open/create key */N#define REG$_NEWNAME 288 /* new name of a key create/rename */N#define REG$_NOTIFYFILTER 1313 /* which key changes to reported */Q#define REG$_PATHBUFFER 546 !/* set of paths separated by null byte */N#define REG$_PERFORMANCEDATA 547 /* Performance data */N#define REG$_REQLENGTH 1316 /* required buffer size */Q#define REG$_RETURNSTATUS 1317 /* return status for a given operation */N#define REG$_SECACCESS 1318 /* security access for a new key */T#define REG$_SECONDSTATUS 1319 /* secondary status for a given operation */R#define REG$_SECURITYPOLICY 1320 /* Security !policy to enforce for a key */T#define REG$_SEGMENTNUMBER 1321 /* Segment Number for locating space info */N#define REG$_SNAPSHOTDESTINATION 1834 /* Snapshot destination directory */N#define REG$_SNAPSHOTVERSIONS 1323 /* Snapshot versions to maintain */N#define REG$_SUBKEYINDEX 1324 /* Index of the subkey to retrieve */N#define REG$_SUBKEYNAME 301 /* name of a subkey */Q#define REG$_SUBKEYNAMEMAX 1326 /* longest subkey name for a! given key */S#define REG$_SUBKEYNAMESIZE 1327 /* destination's subkey name buffer size */N#define REG$_SUBKEYSNUMBER 1328 /* Number of subkeys in a given key */N#define REG$_SECURITYINFORMATION 1329 /* NT Security information */N#define REG$_SECURITYDESCRIPTOR 562 /* NT Security descriptor */N#define REG$_VALUEINDEX 1331 /* index of the value to retrieve */N#define REG$_VALUEDATA 564 /* value data component */P#def!ine REG$_VALUEDATAMAX 1333 /* longest value data for a given key */R#define REG$_VALUEDATASIZE 1334 /* destination's value data buffer size */N#define REG$_VALUENAME 311 /* specifies the name of a value */P#define REG$_VALUENAMEMAX 1336 /* longest value name for a given key */R#define REG$_VALUENAMESIZE 1337 /* destination's value name buffer size */N#define REG$_VALUENUMBER 1338 /* number of values in a given key */P#define REG$_VOLAT!ILE 1339 /* Identifies volatility of an object */O#define REG$_WILDASTERISK 316 /* char to replace asterisk wildcard */N#define REG$_WILDPERCENT 317 /* char to replace percent wildcard */N#define REG$_WILDPERIODS 318 /* char to replace periods wildcard */N#define REG$_INSTRUMENTFILE 575 /* unknown */N#define REG$_INSTRUMENTKEY 576 /* unknown */N#define REG$_INSTRUMENTDATA 577 !/* unknown */Q#define REG$_FILENAME 1858 /* file requested for space monitoring */N#define REG$_COUNTER 1347 /* a counter index */N#define REG$_SECDESCRIPTORLEN 1348 /* Length of security descriptor */U#define REG$_SECDESCLEN_INTERNAL 1349 /* Internal length of security descriptor */S#define REG$_VALUEDATASIZE_INTERNAL 1350 /* Internal dest value data buffer size */P#define REG$_SAMDESIRED 1351 /* SamDe!sired - for AS & Bristol only */R#define REG$_DATABASE_VERSION 1352 /* Database version for Create Database */N#define REG$_LAST 73 /* Always last */N/* */N/* +-------------------------------------------------------------------+ */N/* | Item Code Values */N/* +---------------------------------------------------------------!----+ */N/* */N#define REG$K_NONE 0 /* The item is not volatile */Z#define REG$K_CLUSTER 1 /* The item is removed when the cluster reboots */Y#define REG$K_SYSTEM 2 /* The item is removed when the system reboots */f#define REG$K_PROCESS 3 /* The item is removed when the creating process terminates */d#define REG$K_IMAGE 4 /* The! item is removes when the creating image terminates */x#define REG$K_WRITEBEHIND 5 /* The information on the given object can be written to disk at a later time */u#define REG$K_WRITETHRU 6 /* The information on the given object must be written to disk immediately */N#define REG$K_CREATENEWKEY 7 /* Created a new key */N#define REG$K_OPENEXISTINGKEY 8 /* Opened an existing key */\#define REG$K_POLICY_OPENVMS 9 /* Acces!s is required to all keys in the key path */g#define REG$K_POLICY_NT_40 10 /* Access is required to the first key and the requested key */N#define REG$K_INTERNAL 11 /* */N#define REG$K_HARDLINK 12 /* Hard (physical) link */N#define REG$K_SYMBOLICLINK 13 /* Symbolic (logical) link */N#define REG$K_BINARY 14 /* Binary data */N#define REG$K_DWORD 15 ! /* A 32 bit number */V#define REG$K_DWLITTLEENDIAN 16 /* A 32 bit number in little endian format */Q#define REG$K_DWBIGENDIAN 17 /* A 32 bit number in bi endian format */q#define REG$K_EXPAND_SZ 18 /* A string of ISO-1 Latin characters containing environment variables */N#define REG$K_LINK 19 /* A link to another value */V#define REG$K_MULTI_SZ 20 /* A concatenated array of REG$K_SZ strings */N#def!ine REG$K_QWORD 21 /* A 64 bit number */N#define REG$K_RESOURCELIST 22 /* A device driver resource list */N#define REG$K_SZ 23 /* A null terminated string */N#define REG$K_START_FILE 24 /* */N#define REG$K_START_PERF 25 /* */N#define REG$K_STOP_FILE 26 /* */N#define REG$K_STOP_PERF 27 ! /* */N#define REG$K_ZERO_FILE 28 /* */N#define REG$K_ZERO_PERF 29 /* */N#define REG$K_SHOW_CTR_FILE 30 /* */N#define REG$K_SHOW_CTR_PERF 31 /* */N#define REG$K_SHOW_FILE 32 /* */N#define REG$K_NORMAL 33 /* String size !<= 8K */N#define REG$K_LARGE 34 /* String size > 8K */N#define REG$K_EXACTMATCH 35 /* */N#define REG$K_INCLUDE 36 /* */N#define REG$K_EXCLUDE 37 /* */N#define REG$K_ANY 38 /* */N#define REG$K_NOTANY 39 /* */N/* ! */N/* +-------------------------------------------------------------------+ */N/* | Function Code Modifiers */N/* +-------------------------------------------------------------------+ */N/* */#define REG$M_FC 0x3FF"#define REG$M_CASE_SENSITIVE 0x400%#define REG$M_DISABLE_WILDCARDS 0x800!#define !REG$M_IGNORE_LINKS 0x1000#define REG$M_NOW 0x2000#define REG$M_NOWAIT 0x4000##define REG$M_UNICODE_VALUES 0x8000#define REG$M_BYPASS 0x10000#define REG$M_INTERNAL 0x20000 #ifdef __NEW_STARLETtypedef union _regdef { __struct { unsigned reg$v_fc : 10;p unsigned reg$v_case_sensitive : 1; /* Indicates that the case sensitivity of keys be uses for matches */~ unsigned reg$v_disable_wildcards : 1; /* Indicates that wildcards characters should be traited a!s normal characters */c unsigned reg$v_ignore_links : 1; /* Indicates that symbolic links should not be followed */y unsigned reg$v_now : 1; /* Indicates whether or not an operation should be written to disk immediately */l unsigned reg$v_nowait : 1; /* Indicates that operation should be aborted rather than stalled */Y unsigned reg$v_unicode_values : 1; /* Indicates that data is an UNICODE string */N unsigned reg$v_bypass : 1; /* ! */N unsigned reg$v_internal : 1; /* Indicates internal operation */# unsigned reg$v_fill_7_ : 6; } reg$r_fc_modifiers; } REGDEF; #if !defined(__VAXC),#define reg$v_fc reg$r_fc_modifiers.reg$v_fcD#define reg$v_case_sensitive reg$r_fc_modifiers.reg$v_case_sensitiveJ#define reg$v_disable_wildcards reg$r_fc_modifiers.reg$v_disable_wildcards@#define reg$v_ignore_links reg$r_fc_modifiers.reg$v_ignore_links.#define reg$v_now reg$r_fc_mod !ifiers.reg$v_now4#define reg$v_nowait reg$r_fc_modifiers.reg$v_nowaitD#define reg$v_unicode_values reg$r_fc_modifiers.reg$v_unicode_values4#define reg$v_bypass reg$r_fc_modifiers.reg$v_bypass8#define reg$v_internal reg$r_fc_modifiers.reg$v_internal"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union regdef { __struct { unsigned reg$v_fc : 10;p unsigned reg$v_case_sensitive : 1; /* Indicates that the case sensitivity of keys be uses for matches */!~ unsigned reg$v_disable_wildcards : 1; /* Indicates that wildcards characters should be traited as normal characters */c unsigned reg$v_ignore_links : 1; /* Indicates that symbolic links should not be followed */y unsigned reg$v_now : 1; /* Indicates whether or not an operation should be written to disk immediately */l unsigned reg$v_nowait : 1; /* Indicates that operation should be aborted rather than stalled */Y unsigned reg$v_unicode_values : !1; /* Indicates that data is an UNICODE string */N unsigned reg$v_bypass : 1; /* */N unsigned reg$v_internal : 1; /* Indicates internal operation */# unsigned reg$v_fill_7_ : 6; } reg$r_fc_modifiers; } ; #if !defined(__VAXC),#define reg$v_fc reg$r_fc_modifiers.reg$v_fcD#define reg$v_case_sensitive reg$r_fc_modifiers.reg$v_case_sensitiveJ#define reg$v_disable_wildcards reg$r_fc_modifiers.reg$v_disable_wildcar !ds@#define reg$v_ignore_links reg$r_fc_modifiers.reg$v_ignore_links.#define reg$v_now reg$r_fc_modifiers.reg$v_now4#define reg$v_nowait reg$r_fc_modifiers.reg$v_nowaitD#define reg$v_unicode_values reg$r_fc_modifiers.reg$v_unicode_values4#define reg$v_bypass reg$r_fc_modifiers.reg$v_bypass8#define reg$v_internal reg$r_fc_modifiers.reg$v_internal"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* ! */N/* +-------------------------------------------------------------------+ */N/* | Key Change Notify Flags */N/* +-------------------------------------------------------------------+ */N/* */#define REG$M_CHANGENAME 0x1"#define REG$M_CHANGEATTRIBUTES 0x2#define REG$M_CHANGELASTSET 0x4 #define REG$M_CHANGESECURITY 0x8 #ifdef __NEW_STARLETtypedef union _key !changedef { __struct {o unsigned reg$v_changename : 1; /* A key name change, includes creation and deletion of its subkeys. */U unsigned reg$v_changeattributes : 1; /* Attribute change of key or subkeys */X unsigned reg$v_changelastset : 1; /* Last write time change of key or subkeys */] unsigned reg$v_changesecurity : 1; /* Security descriptor change of key or subkeys */# unsigned reg$v_fill_8_ : 4; } reg$r_keychange_flags; } KEYCHANG !EDEF; #if !defined(__VAXC)?#define reg$v_changename reg$r_keychange_flags.reg$v_changenameK#define reg$v_changeattributes reg$r_keychange_flags.reg$v_changeattributesE#define reg$v_changelastset reg$r_keychange_flags.reg$v_changelastsetG#define reg$v_changesecurity reg$r_keychange_flags.reg$v_changesecurity"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union keychangedef { __struct {o unsigned reg$v_changename : 1; /* A key name change, includes ! creation and deletion of its subkeys. */U unsigned reg$v_changeattributes : 1; /* Attribute change of key or subkeys */X unsigned reg$v_changelastset : 1; /* Last write time change of key or subkeys */] unsigned reg$v_changesecurity : 1; /* Security descriptor change of key or subkeys */# unsigned reg$v_fill_8_ : 4; } reg$r_keychange_flags; } ; #if !defined(__VAXC)?#define reg$v_changename reg$r_keychange_flags.reg$v_changenameK#define reg$v_ !changeattributes reg$r_keychange_flags.reg$v_changeattributesE#define reg$v_changelastset reg$r_keychange_flags.reg$v_changelastsetG#define reg$v_changesecurity reg$r_keychange_flags.reg$v_changesecurity"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* +-------------------------------------------------------------------+ */N/* | Security access Mask ! */N/* +-------------------------------------------------------------------+ */N/* */#define REG$M_ALLACCESS 0x1#define REG$M_CREATELINK 0x2#define REG$M_CREATESUBKEY 0x4#define REG$M_ENUMSUBKEYS 0x8#define REG$M_EXECUTE 0x10#define REG$M_NOTIFY 0x20#define REG$M_QUERYVALUE 0x40#define REG$M_READ 0x80#define REG$M_SETVALUE 0x100#define REG$M_WRITE 0x200 #define REG$M_DELETEACCESS! 0x400#define REG$M_READCONTROL 0x800#define REG$M_WRITEDAC 0x1000#define REG$M_WRITEOWNER 0x2000 #define REG$M_SYNCHRONIZE 0x4000)#define REG$M_ACCESSSYSTEMSECURITY 0x8000$#define REG$M_MAXIMUMALLOWED 0x10000 #define REG$M_GENERICALL 0x20000$#define REG$M_GENERICEXECUTE 0x40000"#define REG$M_GENERICWRITE 0x80000"#define REG$M_GENERICREAD 0x100000 #ifdef __NEW_STARLETtypedef union _secaccessdef { __struct {N/* NT equivalent ! */N unsigned reg$v_allaccess : 1; /* KEY_ALL_ACCESS */N unsigned reg$v_createlink : 1; /* KEY_CREATE_LINK */N unsigned reg$v_createsubkey : 1; /* KEY_CREATE_SUB_KEY */N unsigned reg$v_enumsubkeys : 1; /* KEY_ENUMERATE_SUB_KEYS */N unsigned reg$v_execute : 1; /* KEY_EXECUTE */N unsigned reg$v_notify : 1; /* KEY_NOTIFY */N !unsigned reg$v_queryvalue : 1; /* KEY_QUERY_VALUE */l unsigned reg$v_read : 1; /* READ_CONTROL|KEY_QUERY_VALUE|KEY_ENUMERATE_SUB_KEYS|KEY_NOTIFY */N unsigned reg$v_setvalue : 1; /* KEY_SET_VALUE */[ unsigned reg$v_write : 1; /* READ_CONTROL|KEY_SET_VALUE|KEY_CREATE_SUB_KEY */N unsigned reg$v_deleteaccess : 1; /* DELETE_ACCESS */N unsigned reg$v_readcontrol : 1; /* READ_CONTROL ! */N unsigned reg$v_writedac : 1; /* WRITE_DAC */N unsigned reg$v_writeowner : 1; /* WRITE_OWNER */N unsigned reg$v_synchronize : 1; /* SYNCHRONIZE */N unsigned reg$v_accesssystemsecurity : 1; /* ACCESS_SYSTEM_SECURITY */N unsigned reg$v_maximumallowed : 1; /* MAXIMUM_ALLOWED */N unsigned reg$v_genericall : 1; /* GENERIC_ALL */N unsigned ! reg$v_genericexecute : 1; /* GENERIC_EXECUTE */N unsigned reg$v_genericwrite : 1; /* GENERIC_WRITE */N unsigned reg$v_genericread : 1; /* GENERIC_READ */# unsigned reg$v_fill_9_ : 3; } reg$r_secaccess_mask; } SECACCESSDEF; #if !defined(__VAXC)<#define reg$v_allaccess reg$r_secaccess_mask.reg$v_allaccess>#define reg$v_createlink reg$r_secaccess_mask.reg$v_createlinkB#define reg$v_createsubkey reg$r_sec !access_mask.reg$v_createsubkey@#define reg$v_enumsubkeys reg$r_secaccess_mask.reg$v_enumsubkeys8#define reg$v_execute reg$r_secaccess_mask.reg$v_execute6#define reg$v_notify reg$r_secaccess_mask.reg$v_notify>#define reg$v_queryvalue reg$r_secaccess_mask.reg$v_queryvalue2#define reg$v_read reg$r_secaccess_mask.reg$v_read:#define reg$v_setvalue reg$r_secaccess_mask.reg$v_setvalue4#define reg$v_write reg$r_secaccess_mask.reg$v_writeB#define reg$v_deleteaccess reg$r_secaccess_mask.reg$v_deleteacce !ss@#define reg$v_readcontrol reg$r_secaccess_mask.reg$v_readcontrol:#define reg$v_writedac reg$r_secaccess_mask.reg$v_writedac>#define reg$v_writeowner reg$r_secaccess_mask.reg$v_writeowner@#define reg$v_synchronize reg$r_secaccess_mask.reg$v_synchronizeR#define reg$v_accesssystemsecurity reg$r_secaccess_mask.reg$v_accesssystemsecurityF#define reg$v_maximumallowed reg$r_secaccess_mask.reg$v_maximumallowed>#define reg$v_genericall reg$r_secaccess_mask.reg$v_genericallF#define reg$v_genericexecu !te reg$r_secaccess_mask.reg$v_genericexecuteB#define reg$v_genericwrite reg$r_secaccess_mask.reg$v_genericwrite@#define reg$v_genericread reg$r_secaccess_mask.reg$v_genericread"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union secaccessdef { __struct {N/* NT equivalent */N unsigned reg$v_allaccess : 1; /* KEY_ALL_ACCESS */N unsigned reg$v_createlink : 1; /* KEY_CREATE_!LINK */N unsigned reg$v_createsubkey : 1; /* KEY_CREATE_SUB_KEY */N unsigned reg$v_enumsubkeys : 1; /* KEY_ENUMERATE_SUB_KEYS */N unsigned reg$v_execute : 1; /* KEY_EXECUTE */N unsigned reg$v_notify : 1; /* KEY_NOTIFY */N unsigned reg$v_queryvalue : 1; /* KEY_QUERY_VALUE */l unsigned reg$v_read : 1; /* READ_CONTROL|KEY_QUERY_VALUE|KEY_ENUM!ERATE_SUB_KEYS|KEY_NOTIFY */N unsigned reg$v_setvalue : 1; /* KEY_SET_VALUE */[ unsigned reg$v_write : 1; /* READ_CONTROL|KEY_SET_VALUE|KEY_CREATE_SUB_KEY */N unsigned reg$v_deleteaccess : 1; /* DELETE_ACCESS */N unsigned reg$v_readcontrol : 1; /* READ_CONTROL */N unsigned reg$v_writedac : 1; /* WRITE_DAC */N unsigned reg$v_writeowner : 1; /* WRITE_OWNER ! */N unsigned reg$v_synchronize : 1; /* SYNCHRONIZE */N unsigned reg$v_accesssystemsecurity : 1; /* ACCESS_SYSTEM_SECURITY */N unsigned reg$v_maximumallowed : 1; /* MAXIMUM_ALLOWED */N unsigned reg$v_genericall : 1; /* GENERIC_ALL */N unsigned reg$v_genericexecute : 1; /* GENERIC_EXECUTE */N unsigned reg$v_genericwrite : 1; /* GENERIC_WRITE */N !unsigned reg$v_genericread : 1; /* GENERIC_READ */# unsigned reg$v_fill_9_ : 3; } reg$r_secaccess_mask; } ; #if !defined(__VAXC)<#define reg$v_allaccess reg$r_secaccess_mask.reg$v_allaccess>#define reg$v_createlink reg$r_secaccess_mask.reg$v_createlinkB#define reg$v_createsubkey reg$r_secaccess_mask.reg$v_createsubkey@#define reg$v_enumsubkeys reg$r_secaccess_mask.reg$v_enumsubkeys8#define reg$v_execute reg$r_secaccess_mask.reg$v_execute6#define !reg$v_notify reg$r_secaccess_mask.reg$v_notify>#define reg$v_queryvalue reg$r_secaccess_mask.reg$v_queryvalue2#define reg$v_read reg$r_secaccess_mask.reg$v_read:#define reg$v_setvalue reg$r_secaccess_mask.reg$v_setvalue4#define reg$v_write reg$r_secaccess_mask.reg$v_writeB#define reg$v_deleteaccess reg$r_secaccess_mask.reg$v_deleteaccess@#define reg$v_readcontrol reg$r_secaccess_mask.reg$v_readcontrol:#define reg$v_writedac reg$r_secaccess_mask.reg$v_writedac>#define reg$v_writeowner reg$r_sec!access_mask.reg$v_writeowner@#define reg$v_synchronize reg$r_secaccess_mask.reg$v_synchronizeR#define reg$v_accesssystemsecurity reg$r_secaccess_mask.reg$v_accesssystemsecurityF#define reg$v_maximumallowed reg$r_secaccess_mask.reg$v_maximumallowed>#define reg$v_genericall reg$r_secaccess_mask.reg$v_genericallF#define reg$v_genericexecute reg$r_secaccess_mask.reg$v_genericexecuteB#define reg$v_genericwrite reg$r_secaccess_mask.reg$v_genericwrite@#define reg$v_genericread reg$r_secaccess_mask.reg !$v_genericread"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* +-------------------------------------------------------------------+ */N/* | HKEY Definitions */N/* +-------------------------------------------------------------------+ */N/* */N#define RE!G$_HKEY_NONE 0 /* %x00000000 */N#define REG$_HKEY_CLASSES_ROOT -2147483648 /* %x80000000 */N#define REG$_HKEY_CURRENT_USER -2147483647 /* %x80000001 */N#define REG$_HKEY_LOCAL_MACHINE -2147483646 /* %x80000002 */N#define REG$_HKEY_USERS -2147483645 /* %x80000003 */N#define REG$_HKEY_PERFORMANCE_DATA -2147483644 /* %x80000004 */N#define REG$_HKEY_LAST_ROOT_KEY 5 ! /* */ #endif /* __REGDEF */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __REGDEF_LOADED */ ww[tA/********************************************************************************* !***********************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]REGMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $REGMSG ***/#ifndef __REGMSG_LOADED#define __REGMSG_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment! __save#pragma __nomember_alignmentR#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 #ifn!def __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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:40.90 */N/* */N/*! ! */I/*! FILE: REGMSG.MSG */N/*! */J/*! IDENT: X-17 */N/*! */R/*! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */R/*! ! * */R/*! COPYRIGHT 1996 BY * */R/*! DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS. * */R/*! ALL RIGHTS RESERVED * */R/*! * */R/*! THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */R/*! ONLY IN ACCORDANCE WITH THE TERMS O!F SUCH LICENSE AND WITH THE * */R/*! INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */R/*! COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */R/*! OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */R/*! TRANSFERRED. * */R/*! * */R/*! THE INFORMATION IN THIS SOFTWARE IS SUBJECT! TO CHANGE WITHOUT NOTICE * */R/*! AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */R/*! CORPORATION. * */R/*! * */R/*! DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */R/*! SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * */R/*! ! * */R/*! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */N/*!++ */N/*! FACILITY: */N/*! */N/*! OPENVMS REGISTRY - SERVER */N/*! ! */N/*! ABSTRACT: */N/*! */J/*! THIS MODULE CONTAINS THE REGISTRY ERROR MESSAGES */N/*! */N/*! AUTHORS: */N/*! */N/*! ELIE COHE!N */N/*! */N/*! CREATION DATE: 25-JAN-1996 */N/*! */N/*! MODIFICATION HISTORY: */N/*! */N/*! ! */4/*! X-017 PRD PAUL R. DESTEFANO 17-JAN-2001 */C/*! ADDED DTRWLOCKSELF AND DTRWLOCKLOCKED MESSAGES. */N/*! */7/*! X-016 MPD0134 MATTHEW DOREMUS 16-FEB-1999 */C/*! ADDED MESSAGES: CVTDATATYPE, CANTOPENINFILE, & INVVALNAME. */N/*! */7/*! X-015 MPD0123 MATTHEW DOREMUS 14-JAN-1999 */C!/*! ADDED MESSAGES: INVTLV, ACTIVE, INACTIVE, & NOTSTARTED. */N/*! */4/*! X-014 PRD PAUL R. DESTEFANO 06-AUG-1998 */C/*! FIX TYPOS, FIX CAPITALIZATION, REPHRASE A FEW MESSAGES. */J/*! */6/*! X-013 PRD PAUL R. DESTEFANO 01-JUL-1998 */C/*! ADD IDNOTADDED AND NORESPONSE MESSAGES. */N/*! ! */6/*! X-012 PRD PAUL R. DESTEFANO 29-JUN-1998 */H/*! ADD /MACRO=$REGMSG TO THE .FACILITY DIRECTIVE. THIS INSURES THAT */I/*! THE OUTPUT OF A MESSAGE/SDL CONTAINS A "module $REGMSG" STATEMENT */G/*! AND THAT CONVERTING FROM .MSG TO .SDL TO .SDI TO .H (AS DONE BY */F/*! THE BUILD OF THE [STARLET_H] FACILITY RESULTS IN A FILE CALLED */F/*! REGMSG.H. WITHOUT THIS, THE MESSAGE GETS THE MODULE NAME FROM */G/*! THE FACILITY NAME "REG" AND! APPENDS "DEF" TO IT. THE RESULT IS */G/*! A MODULE CALLED "REGDEF.H", WHICH CONFLICTS WITH ANOTHER HEADER */C/*! MODULE OF THE SAME NAME. */N/*! */J/*! X-011 ELIE COHEN 14-MAR-1998 */C/*! ADD NOTDELIVER MESSAGE */J/*! X-010 ELIE COHEN 19-FEB-1998 */C/*! ADD INVCRED"ENTIALS MESSAGE */K/*!! X-009 ELIE COHEN 10-FEB-1998 */C/*! ADD INVSECDESCRIPTOR MESSAGE */J/*! X-008 ELIE COHEN 28-JAN-1998 */C/*! REWORD CONTENT OF REG$_EXQUOTA */J/*! X-007 ELIE COHEN 20-NOV-1997 */C/*! ADD CANTCONVCS MESSAGE */H/*! X-006 " ELIE COHEN 13-AUG-1997 */C/*! MODIFY INVDATA MESSAGE TEXT */H/*! X-005 ELIE COHEN 12-AUG-1997 */C/*! CORRECT TYPOS */H/*! X-004 ELIE COHEN 23-MAY-1997 */C/*! ADD STRINGTOOLONG MESSAGE */H/*! X-003 PAT NELSON 03-APR-1997 */C/*! ADD KEY"NAMEEXIST. EDITED MESSAGE TEXT */N/*! X-002 KEN MATSUDA 28-MAR-1997 */N/*! ADD INVDATA MESSAGE FOR INVALID VALUE ENTRIES. */N/*! X-001 ELIE COHEN 25-JAN-1995 */N/*! MODULE CREATION */N/*!-- */#define REG$_FACILITY 1862!#define REG$_KEYCHANGE"D 122060803"#define REG$_NOMOREITEMS 122060811&#define REG$_NOMORESUBSTRING 122060819"#define REG$_OBJWITHLINK 122060827"#define REG$_REQRECEIVED 122060835!#define REG$_IDNOTADDED 122060843##define REG$_DTRWLOCKSELF 122060851!#define REG$_BADFILEVER 122061200!#define REG$_DELROOTKEY 122061208$#define REG$_DOUBLEDEALLOC 122061216#define REG$_HASLINK 122061224#define REG$_KEYEXIST 122061232!#define REG$_VALUEEXIST 122061240#define REG$_NOKEY 122061248!#define REG$_NOSUCHFILE 1220"61256#define REG$_NOVALUE 122061264!#define REG$_NOTDELIVER 122061272"#define REG$_CVTDATATYPE 122061280 #define REG$_BUFFEROVF 122061602!#define REG$_CANTCONVCS 122061610"#define REG$_CANTCONVUNI 122061618&#define REG$_CANTOPENOUTFILE 122061626&#define REG$_DBALREADYLOADED 122061634##define REG$_DBCSMISMATCH 122061642%#define REG$_DBNOTYETLOADED 122061650$#define REG$_DBVERMISMATCH 122061658"#define REG$_DUPLREQUEST 122061666##define REG$_DTMUTEXERROR 122061674"#define REG$_DTMUT"EXINIT 122061682"#define REG$_DTMUTEXLOCK 122061690$#define REG$_DTMUTEXLOCKED 122061698$#define REG$_DTMUTEXUNLOCK 122061706##define REG$_DTRWLOCKINIT 122061714##define REG$_DTRWLOCKLOCK 122061722%#define REG$_DTRWLOCKUNLOCK 122061730#define REG$_EXQUOTA 122061738!#define REG$_FILECREATE 122061746$#define REG$_FILENAMEINVAL 122061754#define REG$_FILEOPEN 122061762"#define REG$_FILEREADEOF 122061770##define REG$_FNAMMISMATCH 122061778!#define REG$_FSOCORRUPT 122061786##define RE"G$_FSOFILEINDEX 122061794 #define REG$_FSOOFFSET 122061802##define REG$_FSOSEGNUMBER 122061810$#define REG$_FSOSEGREADERR 122061818#define REG$_FTEALLOC 122061826#define REG$_FTEINUSE 122061834!#define REG$_FTEDUPNAME 122061842$#define REG$_FTEINSUFFINFO 122061850%#define REG$_FTEALREADYOPEN 122061858!#define REG$_FTENOTOPEN 122061866"#define REG$_FTENOTEXIST 122061874&#define REG$_FTEALREADYEXIST 122061882"#define REG$_HAVESUBKEYS 122061890%#define REG$_INVCACHEACTION 122061898"#define REG$_INVDATA 122061906"#define REG$_INVDATATYPE 122061914"#define REG$_INVFUNCCODE 122061922#define REG$_INVKEYID 122061930"#define REG$_INVKEYFLAGS 122061938!#define REG$_INVKEYNAME 122061946#define REG$_INVLINK 122061954"#define REG$_INVLINKPATH 122061962#define REG$_INVLOG 122061970#define REG$_INVPARAM 122061978#define REG$_INVPATH 122061986##define REG$_INVSECPOLICY 122061994$#define REG$_INVVOLROOTKEY 122062002 #define REG$_IOREADERR 122062010 #define REG$_IOWRI"TERR 122062018!#define REG$_IPLTOOHIGH 122062026 #define REG$_KEYLOCKED 122062034##define REG$_KEYNAMEEXIST 122062042%#define REG$_LOGFILETABFULL 122062050"#define REG$_LTENOTEXIST 122062058#define REG$_MOREDATA 122062066!#define REG$_NOTROOTKEY 122062074##define REG$_NOTSUPPORTED 122062082"#define REG$_NOPATHFOUND 122062090#define REG$_RESERVED 122062098"#define REG$_ROOTINSFILE 122062106##define REG$_RUIDMISMATCH 122062114#define REG$_SECVIO 122062122!#define REG$_SEGREADER "R 122062130"#define REG$_STRINGTRUNC 122062138%#define REG$_SVRVERMISMATCH 122062146"#define REG$_SVRSHUTDOWN 122062154%#define REG$_TOOMANYOPENKEY 122062162 #define REG$_UNKTHRREQ 122062170"#define REG$_VOLMISMATCH 122062178$#define REG$_STRINGTOOLONG 122062186'#define REG$_INVSECDESCRIPTOR 122062194##define REG$_ACCESSDENIED 122062202%#define REG$_INVCREDENTIALS 122062210#define REG$_INVTLV 122062218#define REG$_ACTIVE 122062226#define REG$_INACTIVE 122062234!#define REG$_N "OTSTARTED 122062242%#define REG$_CANTOPENINFILE 122062250!#define REG$_INVVALNAME 122062258%#define REG$_DTRWLOCKLOCKED 122062266&#define REG$_CANTCLEANVOLSEG 122062404#define REG$_DBACCESS 122062412#define REG$_DBCREATE 122062420#define REG$_DBFIND 122062428#define REG$_DBFULL 122062436#define REG$_DBLOAD 122062444"#define REG$_FTIMISMATCH 122062452 #define REG$_INTERNERR 122062460 #define REG$_INVLOGREC 122062468 #define REG$_INVSEGNUM 122062476 #define REG$_IPCCONACC 122 "062484 #define REG$_IPCCONREJ 122062492 #define REG$_IPCDCLAST 122062500 #define REG$_IPCOPEASS 122062508##define REG$_NOBLOCKFOUND 122062516#define REG$_NOMEMORY 122062524 #define REG$_NOMORESEG 122062532!#define REG$_NORESPONSE 122062540#define REG$_NOLOGNAM 122062548 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr siz "e */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __REGMSG_LOADED */ ww^B/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//***************************************************************************************************** "***************************//*** MODULE $RMEDEF ***/#ifndef __RMEDEF_LOADED#define __RMEDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 3"2-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 #define RME$C_SETRFM 1#define RME$C_PPFECH"O 2#define RME$C_SETRCF 3#define RME$C_KEEP_LOCK_ON 4#define RME$C_KEEP_LOCK_OFF 5#define RME$C_RU_ACE_ON 6#define RME$C_RU_ACE_OFF 7#define RME$C_SET_RECATTR 8 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __RMEDEF_LOADED */  "ww˅B/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $RMIDEF ***/#ifndef __RMIDEF_LOADED#define __RMIDEF_LOADE4PTHREAD5 PTHREAD_D4F5 PTHREAD_DEBUGl6 PTHREAD_EXC6PTHREAD_EXCEPTION6 PTHREAD_TRACE QSRVDEF PQUIDEFhRAB !RABDEF!@RBLDDEF!`REGDEF!REGMSG "vRMEDEF" RMIDEF.RMS"RRMSDEFV# RNHBLKDEF\#RSDMDEFd#PS2DGBDEF#SBKDEF#SCRDEF#SDBDEF#SDDEFW$$SDFDEF^$(SDFMDEFf$SDFVDEFn$SDFWDEFu$SDVDEF{$zSECDEF$ SECIDDEF$ SECSRVDEFAGE& SYS_PAL_QINSTXAB"D 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 ...#def"ine __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 N/*+ */N/* Get System Performance Information Data Identifier Definitions " */N/* */I/* The following constants define the items which can be collected */I/* with the Get System Performance Information service (GETRMI). */I/* The item numbers are defined as follows: */N/* */I/* 16 12 0 */I/* +------------------+-------"------+ */I/* | Structure number | Item number | */I/* +------------------+-------------+ */N/* */K/* The top four bits represent the structure of the item and the last 12 */I/* bits represent the item within the structure. */N/* " */N/******* Caution! */N/******* This file is no longer intended to be modified. */N/******* */N/* The following had been guidelines for adding symbols to RMIDEF. */N/* This interface is now defined in [STARLET]GETSYIDEF.SDL. */N/* Therefore, changing any item number is unacceptable. Some spare item */O/* number exist in "each range; if these are ever exhausted, new ranges must */N/* be defined and support added, rather than changing item numbers. */N/* */N/* As any enhancements are mode to $GETRMI, changes should be made to */N/* STARLET, and modules should be changed to use the new GETRMI$ symbols */N/* to replace RMI$ symbols. */N/* " */L/* * The item numbers start */N/* * at 0 and increase sequentially to the last item (even across tables). */N/* * If new items are added to a table, programs MUST be relinked to allow */L/* * the old definitions to change. This was done to simplify some table */M/* * lookups in the Monitor Utility. To get around this, new items can be */L/* * added at the end of the list. "*/N/* * */O/* * Each table has one item at the end to act as a place holder. It should */M/* * have the same item number as the first item of the next table. These */S/* * items are not counters in the total number of RMI items GETRMI$_TABLESIZE. */N/*- */N/* DEFINE TABLE TYPES */N#define RMI$C_"EXETYPE 1 /* Executive cells */N#define RMI$C_EWSTYPE 2 /* Executive writable storage area */N#define RMI$C_MONTYPE 3 /* Monitor specific items */N#define RMI$C_RMSTYPE 4 /* Monitor RMS specific items */N#define RMI$C_EX2TYPE 5 /* Ececutive cells extension */N#define RMI$C_LISTEND 0 /* End of table list */N/* " */T/* The following section defines items which are collected during initialization. */P/* There items include general system information, and server version number. */N/* The server version number is also defined here. */N/* */N#define RMI$_INITIAL -1 /* Initialization item list */N#define RMI$_DATA_COLLECTION -2 /* Data collection " item list */N#define RMI$_SYSINFO -3 /* System information item */N#define RMI$_VERSION_NUMBER -4 /* Monitor version number */N#define RMI$_RMS_FILE -5 /* Parse file name */N#define RMI$_RMS_GS -6 /* Get global section address */#define RMI$_LAST_TYPE -7#define RMI$_SERVER_VERSION 5N/* */N/* Define bits in the PM "S flags field PMS$GL_FLAGS. These are used to */N/* synchronize access to some PMS field and enable other activity. */N/* */ #ifdef __NEW_STARLETtypedef struct _rmi$pms_flags {T __struct { /* Class qualifier flags for CDB (Active) */X unsigned rmi$v_disk_enable : 1; /* YES => Enable disk queue length collection */N/* This field must be accessed via an interlock"ed */N/* bit instruction. */N unsigned rmi$v_filler1 : 7; /* Fill out remainder of first byte */_ unsigned rmi$v_disk_sync : 1; /* YES => Synchronize access to several PMS counters */N/* used in the collection of disk queue length. */N/* This field must be accessed via an interlocked */N/* bit instruction, AND MUST BE IN A SEPARATE " */N/* BYTE from the disk_enable bit (required by */N/* the architecture to maintain synchronization). */N unsigned rmi$v_filler2 : 23; /* Fill out remainder of field */ } rmi$l_flags; } RMI$PMS_FLAGS; #if !defined(__VAXC)7#define rmi$v_disk_enable rmi$l_flags.rmi$v_disk_enable/#define rmi$v_filler1 rmi$l_flags.rmi$v_filler13#define rmi$v_disk_sync rmi$l_flags.rmi$v_disk_sync/#define rmi$v_ "filler2 rmi$l_flags.rmi$v_filler2"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct rmi$pms_flags {T __struct { /* Class qualifier flags for CDB (Active) */X unsigned rmi$v_disk_enable : 1; /* YES => Enable disk queue length collection */N/* This field must be accessed via an interlocked */N/* bit instruction. */N unsigned rmi$v_filler1 : 7; !" /* Fill out remainder of first byte */_ unsigned rmi$v_disk_sync : 1; /* YES => Synchronize access to several PMS counters */N/* used in the collection of disk queue length. */N/* This field must be accessed via an interlocked */N/* bit instruction, AND MUST BE IN A SEPARATE */N/* BYTE from the disk_enable bit (required by */N/* the architecture to maintain synchro""nization). */N unsigned rmi$v_filler2 : 23; /* Fill out remainder of field */ } rmi$l_flags; } ; #if !defined(__VAXC)7#define rmi$v_disk_enable rmi$l_flags.rmi$v_disk_enable/#define rmi$v_filler1 rmi$l_flags.rmi$v_filler13#define rmi$v_disk_sync rmi$l_flags.rmi$v_disk_sync/#define rmi$v_filler2 rmi$l_flags.rmi$v_filler2"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* #" */N/* Define two contants to handle help handle large lookaside lists. The */N/* maximum number that RMISHR will count to is defined with */N/* RMI$K_MAX_PACKET and the value returned when this threshold is */N/* reached is defined as RMI$K_POOL_OVF. */N/* */#define RMI$K_MAX_PACKET 500"#define RMI$K_POOL_OVF -2147483647N$"/* */N/* Define item identifier numbers. Each data item has an associated */N/* value which is used to find its entry in the EXETBL. The item table */N/* is defined by the macros RMI_GENERATE_TABLE which makes multiple calls */N/* to the macro RMI_ITEM_CODE defined in the SYSGETRMI module. */N/* */N#define RMI$_MODES 4096 %" /* All modes counters on all CPU's */P#define RMI$_INTERRUPT 4097 /* time on interrupt stack -- primary */N#define RMI$_KERNEL 4098 /* time in kernel mode -- primary */N#define RMI$_EXEC 4099 /* time in exec mode -- primary */P#define RMI$_SUPER 4100 /* time in supervisor mode -- primary */N#define RMI$_USER 4101 /* time in user mode -- primary */N#define RMI$_COMPAT 4102 /* time &"in compat. mode -- primary */X#define RMI$_INTERRUPT_BUSY 4103 /* Time spent RMInning on the interrupt stack */U#define RMI$_KERNEL_BUSY 4104 /* Time spent RMInning on the lernel stack */N#define RMI$_IDLE 4105 /* idle time -- primary */N#define RMI$_CPUBUSY 4106 /* RETIRED ITEM - RETURNS 0 */N#define RMI$_COLPG 4107 /* collided page wait */N#define RMI$_MWAIT 4108 /* memory wait '" */N#define RMI$_CEF 4109 /* common event flag wait */N#define RMI$_PFW 4110 /* page wait */N#define RMI$_LEF 4111 /* local event flag wait */N#define RMI$_LEFO 4112 /* lef wait out of bal. set */N#define RMI$_HIB 4113 /* hibernating */N#define RMI$_HIBO 4114 /* hibernating outswapped */N#d("efine RMI$_SUSP 4115 /* suspended */N#define RMI$_SUSPO 4116 /* suspended outswapped */N#define RMI$_FPG 4117 /* free page wait */N#define RMI$_COM 4118 /* computing */N#define RMI$_COMO 4119 /* computable outswapped */N#define RMI$_CUR 4120 /* current */N#define RMI$_OTHSTAT 4121 )" /* RETIRED ITEM - RETURNS 0 */N#define RMI$_PROCS 4122 /* process count for SYSTEM class */N#define RMI$_PROC 4123 /* collect all process information */N#define RMI$_FRLIST 4124 /* size of free list */N#define RMI$_MODLIST 4125 /* size of modified list */N#define RMI$_FAULTS 4126 /* page fault count */N#define RMI$_PREADS 4127 /* page reads *" */N#define RMI$_PWRITES 4128 /* page writes */N#define RMI$_PWRITIO 4129 /* physical page write I/O's */N#define RMI$_PREADIO 4130 /* physical page read I/O's */N#define RMI$_GVALFLTS 4131 /* global valid faults */N#define RMI$_WRTINPROG 4132 /* faults from write in progress */N#define RMI$_FREFLTS 4133 /* faults from free list */N+"#define RMI$_MFYFLTS 4134 /* faults from modified list */N#define RMI$_DZROFLTS 4135 /* demand zero faults */N#define RMI$_SYSFAULTS 4136 /* system page faults */N#define RMI$_LRPCNT 4137 /* number of LRP packets available */N#define RMI$_LRPINUSE 4138 /* number of LRPs in use */N#define RMI$_IRPCNT 4139 /* number of IRP packets available */N#define RMI$_IRPINUSE 4140," /* number of IRPs in use */N#define RMI$_SRPCNT 4141 /* number of SRP packets available */N#define RMI$_SRPINUSE 4142 /* number of SRPs in use */N#define RMI$_HOLECNT 4143 /* number of blocks in dyn. memory */N#define RMI$_BIGHOLE 4144 /* largest hole */N#define RMI$_SMALLHOLE 4145 /* smallest hole */R#define RMI$_HOLESUM 4146 /* total spa-"ce in dyn. memory available */N#define RMI$_DYNINUSE 4147 /* dynamic memory space in use */Q#define RMI$_SMALLCNT 4148 /* number of blocks < 32 bytes in size */N#define RMI$_ISWPCNT 4149 /* total inswaps */N#define RMI$_DIRIO 4150 /* count of direct I/Os */N#define RMI$_BUFIO 4151 /* count of buffered I/Os */N#define RMI$_MBREADS 4152 /* total mailbox reads ." */N#define RMI$_MBWRITES 4153 /* total mailbox writes */N#define RMI$_LOGNAM 4154 /* logical name translations */N#define RMI$_FCPCALLS 4155 /* total fcp calls */N#define RMI$_FCPREAD 4156 /* number of disk reads by FCP */N#define RMI$_FCPWRITE 4157 /* number of disk writes by FCP */N#define RMI$_FCPCACHE 4158 /* number of FCP cache hits */N#define RMI$_FCP/"CPU 4159 /* number of CPU tics by FCP */N#define RMI$_FCPHIT 4160 /* number of window hits */N#define RMI$_FCPSPLIT 4161 /* number of split transfers */N#define RMI$_FCPFAULT 4162 /* number of FCP page faults */N#define RMI$_ENQNEW 4163 /* number of ENQ's (new) */N#define RMI$_ENQCVT 4164 /* number of ENQ's (conversions) */N#define RMI$_DEQ 4165 /*0" number of DEQ's */N#define RMI$_BLKAST 4166 /* number of blocking AST's */N#define RMI$_ENQWAIT 4167 /* number of ENQ's forced to wait */N#define RMI$_ENQNOTQD 4168 /* number of ENQ's not queued */N#define RMI$_DLCKSRCH 4169 /* number of deadlock searches */N#define RMI$_DLCKFND 4170 /* number of deadlocks found */N#define RMI$_NUMLOCKS 4171 /* total locks 1" */N#define RMI$_NUMRES 4172 /* total resources */N#define RMI$_ARRLOCPK 4173 /* arriving local packets */N#define RMI$_DEPLOCPK 4174 /* departing local packets */N#define RMI$_ARRTRAPK 4175 /* arriving transit packets */N#define RMI$_TRCNGLOS 4176 /* transit congestion loss */N#define RMI$_RCVBUFFL 4177 /* receiver buffer failures */N#define RMI$_R2"ESERVED1 4178 /* Reserved PMS location 1 */N#define RMI$_RESERVED2 4179 /* Reserved PMS location 2 */N#define RMI$_RESERVED3 4180 /* Reserved PMS location 3 */N#define RMI$_RESERVED4 4181 /* Reserved PMS location 4 */N#define RMI$_RESERVED5 4182 /* Reserved PMS location 5 */N#define RMI$_RESERVED6 4183 /* Reserved PMS location 6 */N#define RMI$_RESERVED7 4184 3"/* Reserved PMS location 7 */N#define RMI$_RESERVED8 4185 /* Reserved PMS location 8 */N#define RMI$_RESERVED9 4186 /* Reserved PMS location 9 */N#define RMI$_RESERVED10 4187 /* Reserved PMS location 10 */N#define RMI$_RESERVED11 4188 /* Reserved PMS location 11 */N#define RMI$_RESERVED12 4189 /* Reserved PMS location 12 */N#define RMI$_RESERVED13 4190 /* Reserved PMS location 14"3 */N#define RMI$_RESERVED14 4191 /* Reserved PMS location 14 */N#define RMI$_RESERVED15 4192 /* Reserved PMS location 15 */N#define RMI$_RESERVED16 4193 /* Reserved PMS location 16 */N#define RMI$_RESERVED17 4194 /* Reserved PMS location 17 */N#define RMI$_RESERVED18 4195 /* Reserved PMS location 18 */N#define RMI$_FID_TRIES 4196 /* count of File Id cache attempts */Q#define RMI$5"_FILHDR_TRIES 4197 /* count of File header cache attempts */U#define RMI$_DIRFCB_TRIES 4198 /* count of Directory block cache attempts */T#define RMI$_DIRDATA_TRIES 4199 /* count of Directory data cache attempts */N#define RMI$_EXT_TRIES 4200 /* count of Extent cache attempts */N#define RMI$_QUO_TRIES 4201 /* count of Quota cache attempts */T#define RMI$_STORAGMAP_TRIES 4202 /* count of storage bitmap cache attempts */N#define RMI$_D6"ISKS 4203 /* all disk data */x#define RMI$_TOTAL_LOCKS 4204 /* Total of all locking activity - NOT COLLECTED BY RMI - COMPUTED BY MONITOR */N#define RMI$_ENQNEWLOC 4205 /* new lock requests (local) */N#define RMI$_ENQNEWIN 4206 /* new lock requests (incoming) */N#define RMI$_ENQNEWOUT 4207 /* new lock requests (outgoing) */N#define RMI$_ENQCVTLOC 4208 /* lock conversion requests (local) */7"Q#define RMI$_ENQCVTIN 4209 /* lock conversion requests (incoming) */Q#define RMI$_ENQCVTOUT 4210 /* lock conversion requests (outgoing) */N#define RMI$_DEQLOC 4211 /* dequeues (local) */N#define RMI$_DEQIN 4212 /* dequeues (incoming) */N#define RMI$_DEQOUT 4213 /* dequeues (outgoing) */N#define RMI$_BLKLOC 4214 /* blocking ASTs queued (local) */N#define RMI$_BLK8"IN 4215 /* blocking ASTs queued (incoming) */N#define RMI$_BLKOUT 4216 /* blocking ASTs queued (outgoing) */N#define RMI$_DIRIN 4217 /* directory operations (incoming) */N#define RMI$_DIROUT 4218 /* directory operations (outgoing) */T#define RMI$_DLCKMSGS 4219 /* deadlock detection messages (in & out) */N#define RMI$_SCS 4220 /* All SCS information */N#define RMI$_SYSTIME 4221 9" /* Current system time */P#define RMI$_MSCP_REQUEST 4222 /* IO request rate to the MSCP server */R#define RMI$_MSCP_READ 4223 /* Read request rate to the MSCP server */S#define RMI$_MSCP_WRITE 4224 /* Write request rate to the MSCP server */P#define RMI$_MSCP_FRAGMENT 4225 /* Rate at which I/O's are fragmented */N#define RMI$_MSCP_SPLIT 4226 /* Rate at which I/O's are split */g#define RMI$_MSCP_BUFWAIT 4227 /* Rate :"at which incoming requests have to wait for a buffer */N#define RMI$_MSCP_SIZE1 4228 /* I/O rate for sizes 1-2 blocks */N#define RMI$_MSCP_SIZE2 4229 /* I/O rate for sizes 2-3 blocks */N#define RMI$_MSCP_SIZE3 4230 /* I/O rate for sizes 4-7 blocks */N#define RMI$_MSCP_SIZE4 4231 /* I/O rate for sizes 8-15 blocks */N#define RMI$_MSCP_SIZE5 4232 /* I/O rate for sizes 16-31 blocks */N#define RMI$_MSCP_SIZE6 4233 /* I/O r;"ate for sizes 32-63 blocks */N#define RMI$_MSCP_SIZE7 4234 /* I/O rate for sizes 64-127 blocks */_#define RMI$_MSCP_ALL 4235 /* Dummy item to collect all MSCP server class items */N#define RMI$_DDTM_STARTS 4236 /* Local Transaction starts */N#define RMI$_DDTM_PREPARES 4237 /* Local Transaction prepare event */P#define RMI$_DDTM_ONE_PHASE 4238 /* Transaction ONE_PHASE commit event */k#define RMI$_DDTM_COMMITS 4239 /* Local Trans<"action commit event (sum of phase 1 and 2 commits) */N#define RMI$_DDTM_ABORTS 4240 /* Local Transaction abort event */N#define RMI$_DDTM_ENDS 4241 /* Local Transaction ends */N#define RMI$_DDTM_BRANCHS 4242 /* Start branch event */N#define RMI$_DDTM_ADDS 4243 /* Add branch event */N#define RMI$_DDTM_BUCKETS1 4244 /* TPS rate for < 1 */N#define RMI$_DDTM_BUCKETS2 4245 /* TPS rat="e for 1-2 */N#define RMI$_DDTM_BUCKETS3 4246 /* TPS rate for 2-3 */N#define RMI$_DDTM_BUCKETS4 4247 /* TPS rate for 3-4 */N#define RMI$_DDTM_BUCKETS5 4248 /* TPS rate for 4-5 */N#define RMI$_DDTM_BUCKETS6 4249 /* TPS rate for > 6 */_#define RMI$_DDTM_ALL 4250 /* Dummy item to collect all TRANSACTION class items */N#define RMI$_VECTORP 4251 /* Vector Processo>"r tics scheduled */N#define RMI$_VBYTE_READ 4252 /* VBS bytes read */N#define RMI$_VBYTE_WRITE 4253 /* VBS bytes written */#define RMI$_VVBS_TRAN 4254#define RMI$_VRBS_TRAN 4255#define RMI$_VDIO_SEL 4256#define RMI$_VDIOMAP_ALLOC 4257#define RMI$_VRBS_AVAIL 4258#define RMI$_VSEL_FAIL 4259#define RMI$_VVBSM_HIT 4260#define RMI$_VVBSM_CACHE 4261#define RMI$_VFLUIDBAL 4262#define RMI$_VRECOPY 4263#define RMI$_VCPUTICKS?" 4264r#define RMI$_MSCP_EVERYTHING 4265 /* All MSCP server class items including the NEW items not in MSCP_ALL */N#define RMI$_TMSCP_EVERYTHING 4266 /* All TMSCP server class items */N#define RMI$_DDTM_TWOPHASE_ACKRCV 4267 /* # of 2 PHASE commit ack msg rcvd */N#define RMI$_DDTM_TWOPHASE_ACKSNT 4268 /* # of 2 PHASE commit ack msg sent */Q#define RMI$_DDTM_TWOPHASE_CANRCV 4269 /* # of 2 PHASE commit cancel msg rcvd */Q#define RMI$_DDTM_TWOPHASE_CANSNT 4270 /* # of 2 PHASE co@"mmit cancel msg sent */P#define RMI$_DDTM_TWOPHASE_RDYRCV 4271 /* # of 2 PHASE commit ready msg rcvd */P#define RMI$_DDTM_TWOPHASE_RDYSNT 4272 /* # of 2 PHASE commit ready msg sent */R#define RMI$_DDTM_TWOPHASE_REQRCV 4273 /* # of 2 PHASE commit request msg rcvd */R#define RMI$_DDTM_TWOPHASE_REQSNT 4274 /* # of 2 PHASE commit request msg sent */N#define RMI$_DDTM_TWOPHASE_COMMITS 4275 /* Total # of phase 2 transitions */N#define RMI$_DDTM_DECLARES 4276 /* Total # of $DECLARE_RMs A" */N#define RMI$_DDTM_JOINS 4277 /* Total # of $JOIN_RMs */N#define RMI$_DDTM_FORGETS 4278 /* Total # of $FORGET_RMs */N#define RMI$_DDTM_SEQNO 4279 /* Total # of XCBs created */N#define RMI$_DDTM_LOG_COMMITS 4280 /* # of Commit records written */N#define RMI$_DDTM_LOG_PREPARES 4281 /* # of Prepare records written */N#define RMI$_DDTM_LOG_FORGETS 4282 /* # of Forget records written */N#define RMI$_DB"DTM_WRITES_STARTED 4283 /* # of Writes started */N#define RMI$_DDTM_WRITES_FORKED 4284 /* # of forked writes */N#define RMI$_DDTM_BAD_TYPECODE 4285 /* # of bad msg typecodes rcvd */N#define RMI$_DDTM_BAD_LINKS 4286 /* # of bad msg links rcvd */N#define RMI$_DDTM_FOR_UNLINKS 4287 /* # of forced unlinks */N#define RMI$_DDTM_VOL_UNLINKS 4288 /* # of voluntary unlinks */N#define RMI$_DDTM_DISC_COMP 4289 C"/* # of disconnect complete events */N#define RMI$_DDTM_BAD_PARTS 4290 /* # of invalid part ids found */_#define RMI$_LCKMGR_CPU 4291 /* The ID of the cpu on which the lock manager runs. */U#define RMI$_LCKMGR_PID 4292 /* Process ID of the lock manager process. */h#define RMI$_LCKMGR_REQCNT 4293 /* Accumulated count of requests handled by the lock manager. */l#define RMI$_LCKMGR_REQTIME 4294 /* Accumulated time spent by the lock manager servicinD"g requests. */f#define RMI$_LCKMGR_SPINCNT 4295 /* The number of times the lock manager entered a spinloop. */f#define RMI$_LCKMGR_SPINTIME 4296 /* Spin time in cycles, the lock manager spent in spinloop. */N#define RMI$_LOCK_MAX 4297 /* The length of the Lock ID Table. */[#define RMI$_LPZ_PAKSIZ 4298 /* Its the lock manager's pool zone packet size. */h#define RMI$_LPZ_PAGCNT 4299 /* Number of pages currently in the lock manager's pool zone. */n#dE"efine RMI$_LPZ_MAXPAG 4300 /* Its the maximum number of pages in the lock manager's pool zone. */q#define RMI$_LPZ_FREEPGCNT 4301 /* The number of free pages currently in the lock manager's pool zone. */b#define RMI$_LPZ_HITS 4302 /* The number of hits for the lock manager's pool zone. */d#define RMI$_LPZ_MISSES 4303 /* The number of misses for the lock manager's pool zone. */g#define RMI$_LPZ_EXPCNT 4304 /* The number of expansions of the locF"k manager's pool zone. */q#define RMI$_LPZ_ALLOCF 4305 /* The number of failed allocations from the lock manager's pool zone. */#define RMI$_LPZ_ALLOC2 4306 /* The number of allocations from other than the first page of the lock manager's pool zone\. */l#define RMI$_LPZ_EMPTY 4307 /* Its the number of empty pages in the lock manager's pool zone. */a#define RMI$_RML_ACQUIRE 4308 /* System-wide count of lock trees moved to this node. */#define RMI$G"_RML_BETTER 4309 /* Count of lock trees moved from this node to a cluster node with a higher value for SYSGE\N param LOCKDIRWT. */#define RMI$_RML_MORE_ACT 4310 /* Count of lock trees moved from this node due to a higher locking activity on another nod\e in the cluster. */_#define RMI$_RML_MSGRCV 4311 /* Count of remaster messages received by this node. */]#define RMI$_RML_MSGSENT 4312 /* Count of remaster messages sent from this node. */o#define RMH"I$_RML_NOQUOTA 4313 /* Count of remaster operations which failed due to a lack of quota. */l#define RMI$_RML_NOTAKER 4314 /* Count of remaster operations which were proposed and declined. */e#define RMI$_RML_OPCNT 4315 /* Count of remaster operations which have been completed. */g#define RMI$_RML_RBLDMSGRCV 4316 /* Count of remaster rebuild messages received by this node. */e#define RMI$_RML_RBLDMSGSENT 4317 /* Count of remaster rebuild messages sentI" from this node. */#define RMI$_RML_SINGLE 4318 /* Count of lock trees moved from this node to another cluster node which is the only node \#with locks remaining on the tree */W#define RMI$_RML_UNLOAD 4319 /* Count of lock trees moved from this node. */N#define RMI$_RESERVEDEXE1 4320 /* Reserved EXE items */N#define RMI$_RESERVEDEXE2 4321 /* Reserved EXE items */N#define RMI$_RESERVEDEXE3 4322 /* Reserved EXE items J" */N#define RMI$_RESERVEDEXE4 4323 /* Reserved EXE items */N#define RMI$_RESERVEDEXE5 4324 /* Reserved EXE items */N#define RMI$_RESERVEDEXE6 4325 /* Reserved EXE items */N#define RMI$_RESERVEDEXE7 4326 /* Reserved EXE items */N#define RMI$_RESERVEDEXE8 4327 /* Reserved EXE items */N#define RMI$_RESERVEDEXE9 4328 /* Reserved EXE items */N#define K"RMI$_RESERVEDEXE10 4329 /* Reserved EXE items */N#define RMI$_RESERVEDEXE11 4330 /* Reserved EXE items */N#define RMI$_RESERVEDEXE12 4331 /* Reserved EXE items */N#define RMI$_RESERVEDEXE13 4332 /* Reserved EXE items */N#define RMI$_RESERVEDEXE14 4333 /* Reserved EXE items */N#define RMI$_RESERVEDEXE15 4334 /* Reserved EXE items */N#define RMI$_RESERVEDEXE16 4335 L" /* Reserved EXE items */N#define RMI$_LASTEXE 4336 /* Last item in the EXE table */N/* */N/* These next items are located in an executive writable page in memory */N/* */N#define RMI$_ACCESS 8432 /* number of file accesses */N#define RMI$_ALLOC 8433 /* number of file exM"tends */N#define RMI$_FCPCREATE 8434 /* number of file creations */S#define RMI$_VOLWAIT 8435 /* # of times XQP waited for volume lock */N#define RMI$_FCPTURN 8436 /* number of window turns */N#define RMI$_FCPERASE 8437 /* number of erase calls */N#define RMI$_OPENS 8438 /* number of file opens */N#define RMI$_FIDHIT 8439 /* count of File Id cache hits */NN"#define RMI$_FIDMISS 8440 /* count of File Id cache misses */N#define RMI$_FILHDR_HIT 8441 /* count of File header cache hits */Q#define RMI$_DIRFCB_HIT 8442 /* count of Directory block cache hits */S#define RMI$_DIRFCB_MISS 8443 /* count of Directory block cache misses */P#define RMI$_DIRDATA_HIT 8444 /* count of Directory data cache hits */N#define RMI$_EXTHIT 8445 /* count of Extent cache hits */N#define RMI$_EO"XTMISS 8446 /* count of Extent cache misses */N#define RMI$_QUOHIT 8447 /* count of Quota cache hits */N#define RMI$_QUOMISS 8448 /* count of Quota cache misses */P#define RMI$_STORAGMAP_HIT 8449 /* count of storage bitmap cache hits */N#define RMI$_VOLLCK 8450 /* Volume synch locks */N#define RMI$_SYNCHLCK 8451 /* directory and file synch locks */f#define RMI$_SYNCHWAIT 8452 P" /* # of times XQP waited for a directory or file synch lock */N#define RMI$_ACCLCK 8453 /* access locks */b#define RMI$_XQPCACHEWAIT 8454 /* # of times XQP had to wait for free space in a cache */R#define RMI$_DIRDATA_MISS 8455 /* count of Directory data cache misses */O#define RMI$_FILHDR_MISS 8456 /* count of File header cache misses */R#define RMI$_STORAGMAP_MISS 8457 /* count of storage bitmap cache misses */N#define RMQ"I$_RESERVEDEWS1 8458 /* Reserved EWS items */N#define RMI$_RESERVEDEWS2 8459 /* Reserved EWS items */N#define RMI$_RESERVEDEWS3 8460 /* Reserved EWS items */N#define RMI$_RESERVEDEWS4 8461 /* Reserved EWS items */N#define RMI$_RESERVEDEWS5 8462 /* Reserved EWS items */N#define RMI$_RESERVEDEWS6 8463 /* Reserved EWS items */N#define RMI$_RESERVEDEWS7 8464 R" /* Reserved EWS items */N#define RMI$_RESERVEDEWS8 8465 /* Reserved EWS items */N#define RMI$_RESERVEDEWS9 8466 /* Reserved EWS items */N#define RMI$_RESERVEDEWS10 8467 /* Reserved EWS items */N#define RMI$_RESERVEDEWS11 8468 /* Reserved EWS items */N#define RMI$_RESERVEDEWS12 8469 /* Reserved EWS items */N#define RMI$_RESERVEDEWS13 8470 /* Reserved EWS items S" */N#define RMI$_RESERVEDEWS14 8471 /* Reserved EWS items */N#define RMI$_RESERVEDEWS15 8472 /* Reserved EWS items */N#define RMI$_RESERVEDEWS16 8473 /* Reserved EWS items */N#define RMI$_RESERVEDEWS17 8474 /* Reserved EWS items */N#define RMI$_RESERVEDEWS18 8475 /* Reserved EWS items */N#define RMI$_RESERVEDEWS19 8476 /* Reserved EWS items */N#define T"RMI$_RESERVEDEWS20 8477 /* Reserved EWS items */N#define RMI$_RESERVEDEWS21 8478 /* Reserved EWS items */N#define RMI$_RESERVEDEWS22 8479 /* Reserved EWS items */N#define RMI$_RESERVEDEWS23 8480 /* Reserved EWS items */N#define RMI$_RESERVEDEWS24 8481 /* Reserved EWS items */N#define RMI$_RESERVEDEWS25 8482 /* Reserved EWS items */N#define RMI$_RESERVEDEWS26 8483 U" /* Reserved EWS items */N#define RMI$_RESERVEDEWS27 8484 /* Reserved EWS items */N#define RMI$_RESERVEDEWS28 8485 /* Reserved EWS items */N#define RMI$_RESERVEDEWS29 8486 /* Reserved EWS items */N#define RMI$_RESERVEDEWS30 8487 /* Reserved EWS items */N#define RMI$_RESERVEDEWS31 8488 /* Reserved EWS items */N#define RMI$_RESERVEDEWS32 8489 /* Reserved EWS itemV"s */N#define RMI$_RESERVEDEWS33 8490 /* Reserved EWS items */N#define RMI$_RESERVEDEWS34 8491 /* Reserved EWS items */N#define RMI$_RESERVEDEWS35 8492 /* Reserved EWS items */N#define RMI$_RESERVEDEWS36 8493 /* Reserved EWS items */N#define RMI$_RESERVEDEWS37 8494 /* Reserved EWS items */N#define RMI$_RESERVEDEWS38 8495 /* Reserved EWS items */N#definW"e RMI$_RESERVEDEWS39 8496 /* Reserved EWS items */N#define RMI$_RESERVEDEWS40 8497 /* Reserved EWS items */N#define RMI$_RESERVEDEWS41 8498 /* Reserved EWS items */N#define RMI$_RESERVEDEWS42 8499 /* Reserved EWS items */N#define RMI$_RESERVEDEWS43 8500 /* Reserved EWS items */N#define RMI$_RESERVEDEWS44 8501 /* Reserved EWS items */N#define RMI$_RESERVEDEWS45 8502 X" /* Reserved EWS items */N#define RMI$_RESERVEDEWS46 8503 /* Reserved EWS items */N#define RMI$_RESERVEDEWS47 8504 /* Reserved EWS items */N#define RMI$_RESERVEDEWS48 8505 /* Reserved EWS items */N#define RMI$_RESERVEDEWS49 8506 /* Reserved EWS items */N#define RMI$_RESERVEDEWS50 8507 /* Reserved EWS items */N#define RMI$_RESERVEDEWS51 8508 /* Reserved EWS itY"ems */N#define RMI$_RESERVEDEWS52 8509 /* Reserved EWS items */N#define RMI$_RESERVEDEWS53 8510 /* Reserved EWS items */N#define RMI$_RESERVEDEWS54 8511 /* Reserved EWS items */N#define RMI$_RESERVEDEWS55 8512 /* Reserved EWS items */N#define RMI$_RESERVEDEWS56 8513 /* Reserved EWS items */N#define RMI$_RESERVEDEWS57 8514 /* Reserved EWS items */N#defZ"ine RMI$_RESERVEDEWS58 8515 /* Reserved EWS items */N#define RMI$_RESERVEDEWS59 8516 /* Reserved EWS items */N#define RMI$_RESERVEDEWS60 8517 /* Reserved EWS items */N#define RMI$_RESERVEDEWS61 8518 /* Reserved EWS items */N#define RMI$_RESERVEDEWS62 8519 /* Reserved EWS items */N#define RMI$_RESERVEDEWS63 8520 /* Reserved EWS items */N#define RMI$_RESERVEDEWS64 852["1 /* Reserved EWS items */N#define RMI$_RESERVEDEWS65 8522 /* Reserved EWS items */N#define RMI$_RESERVEDEWS66 8523 /* Reserved EWS items */N#define RMI$_RESERVEDEWS67 8524 /* Reserved EWS items */N#define RMI$_RESERVEDEWS68 8525 /* Reserved EWS items */N#define RMI$_RESERVEDEWS69 8526 /* Reserved EWS items */N#define RMI$_RESERVEDEWS70 8527 /* Reserved EWS \"items */N#define RMI$_RESERVEDEWS71 8528 /* Reserved EWS items */N#define RMI$_RESERVEDEWS72 8529 /* Reserved EWS items */N#define RMI$_RESERVEDEWS73 8530 /* Reserved EWS items */N#define RMI$_RESERVEDEWS74 8531 /* Reserved EWS items */N#define RMI$_RESERVEDEWS75 8532 /* Reserved EWS items */N#define RMI$_RESERVEDEWS76 8533 /* Reserved EWS items */N#d]"efine RMI$_RESERVEDEWS77 8534 /* Reserved EWS items */N#define RMI$_RESERVEDEWS78 8535 /* Reserved EWS items */N#define RMI$_RESERVEDEWS79 8536 /* Reserved EWS items */N#define RMI$_RESERVEDEWS80 8537 /* Reserved EWS items */N#define RMI$_RESERVEDEWS81 8538 /* Reserved EWS items */N#define RMI$_RESERVEDEWS82 8539 /* Reserved EWS items */N#define RMI$_RESERVEDEWS83 8^"540 /* Reserved EWS items */N#define RMI$_RESERVEDEWS84 8541 /* Reserved EWS items */N#define RMI$_RESERVEDEWS85 8542 /* Reserved EWS items */N#define RMI$_RESERVEDEWS86 8543 /* Reserved EWS items */N#define RMI$_RESERVEDEWS87 8544 /* Reserved EWS items */N#define RMI$_RESERVEDEWS88 8545 /* Reserved EWS items */N#define RMI$_RESERVEDEWS89 8546 /* Reserved EW_"S items */N#define RMI$_RESERVEDEWS90 8547 /* Reserved EWS items */N#define RMI$_RESERVEDEWS91 8548 /* Reserved EWS items */N#define RMI$_RESERVEDEWS92 8549 /* Reserved EWS items */N#define RMI$_RESERVEDEWS93 8550 /* Reserved EWS items */N#define RMI$_RESERVEDEWS94 8551 /* Reserved EWS items */N#define RMI$_RESERVEDEWS95 8552 /* Reserved EWS items */N`"#define RMI$_RESERVEDEWS96 8553 /* Reserved EWS items */N#define RMI$_RESERVEDEWS97 8554 /* Reserved EWS items */R#define RMI$_LASTEWS 8555 /* Last item in the exec writable table */N/* */N/* Begin monitor specific data items. The items listed below are */N/* NOT collected by the RMI as individual items. Some are NOT collected */N/* at all but are compa"uted by MONITOR. */N/* */Z#define RMI$_FIDHITPCNT 12651 /* percentage of file id cache hits/hits+misses */^#define RMI$_FILHDR_HITPCNT 12652 /* percentage of file header cache hits/hits+misses */b#define RMI$_DIRFCB_HITPCNT 12653 /* percentage of directory block cache hits/hits+misses */a#define RMI$_DIRDATA_HITPCNT 12654 /* percentage of directory data cache hib"ts/hits+misses */Y#define RMI$_EXTHITPCNT 12655 /* percentage of extent cache hits/hits+misses */X#define RMI$_QUOHITPCNT 12656 /* percentage of quota cache hits/hits+misses */^#define RMI$_STORAGMAP_HITPCNT 12657 /* percentage of storage map cache hits/hits+misses */N#define RMI$_OPCNT 12658 /* disk io operation count */N#define RMI$_IOQUELEN 12659 /* disk io queue length */N#define RMI$_IOAQUELEN 12660 /* Accurc"ate disk io queue length */N#define RMI$_DISKRESPTIM 12661 /* disk io response time */W#define RMI$_JNLIOCNT 12662 /* journaling io operation count (for disks) */N#define RMI$_JDNQLEN 12663 /* jdevice normal io queue length */N#define RMI$_JDWQLEN 12664 /* jdevice wait irp queue length */N#define RMI$_JDFQLEN 12665 /* jdevice force io queue length */N#define RMI$_JDEXCNT 12666 /* jdevice extend count d" */N#define RMI$_JNLWRTSS 12667 /* obsolete */N#define RMI$_JNLBUFWR 12668 /* obsolete */N#define RMI$_DGSENT 12669 /* SCS application datagrams sent */P#define RMI$_DGRCVD 12670 /* SCS application datagrams received */Q#define RMI$_DGDISCARD 12671 /* SCS application datagrams discarded */N#define RMI$_MSGSENT 12672 /* SCS application messages sent */O#defe"ine RMI$_MSGRCVD 12673 /* SCS application messages received */N#define RMI$_SNDATS 12674 /* SCS block send datas initiated */N#define RMI$_KBYTSENT 12675 /* SCS kbytes sent via send datas */O#define RMI$_REQDATS 12676 /* SCS block request datas initiated */S#define RMI$_KBYTREQD 12677 /* SCS kbytes received via request datas */R#define RMI$_KBYTMAPD 12678 /* SCS kbytes mapped for block transfer */Y#define RMI$_QCRf"_CNT 12679 /* SCS times connection queued for send credit */_#define RMI$_QBDT_CNT 12680 /* SCS times connection queued for buffer descriptor */N#define RMI$_DIRLOOK 12681 /* directory lookups */N#define RMI$_DIRINS 12682 /* directory inserts */N#define RMI$_DIRDEL 12683 /* directory deletes */N#define RMI$_PACKETS 12684 /* Ethernet packets/second */N#define RMI$g"_KBYTES 12685 /* Kbytes/second */N#define RMI$_PACKETSIZE 12686 /* Packets size (bytes) */N#define RMI$_MPACKETS 12687 /* Multicast packets/second */N#define RMI$_MKBYTES 12688 /* Multicast Kbytes/second */N#define RMI$_MPACKETSIZE 12689 /* Multicast packet size (bytes) */P#define RMI$_SINGLECOLL 12690 /* Transmit single collision detected */P#define RMI$_MULTICOLL 12691 h" /* Transmit multi collisions detected */N#define RMI$_INITDEFER 12692 /* Transmit initially deferred */N#define RMI$_INTERNALBUFERR 12693 /* Receive internal buffer error */N#define RMI$_LOCBUFERR 12694 /* Receive local buffer error */N#define RMI$_BUFFUNAVAIL 12695 /* System buffer unavailable */N#define RMI$_FILLER 12696 /* Dummy pad item */N#define RMI$_RESERVEDMON1 12697 /* Reserved MON itemi"s */N#define RMI$_RESERVEDMON2 12698 /* Reserved MON items */N#define RMI$_RESERVEDMON3 12699 /* Reserved MON items */N#define RMI$_RESERVEDMON4 12700 /* Reserved MON items */N#define RMI$_RESERVEDMON5 12701 /* Reserved MON items */N#define RMI$_RESERVEDMON6 12702 /* Reserved MON items */N#define RMI$_RESERVEDMON7 12703 /* Reserved MON items */N#definj"e RMI$_RESERVEDMON8 12704 /* Reserved MON items */N#define RMI$_RESERVEDMON9 12705 /* Reserved MON items */N#define RMI$_RESERVEDMON10 12706 /* Reserved MON items */N#define RMI$_RESERVEDMON11 12707 /* Reserved MON items */N#define RMI$_RESERVEDMON12 12708 /* Reserved MON items */N#define RMI$_RESERVEDMON13 12709 /* Reserved MON items */N#define RMI$_RESERVEDMON14 12710k" /* Reserved MON items */N#define RMI$_RESERVEDMON15 12711 /* Reserved MON items */N#define RMI$_RESERVEDMON16 12712 /* Reserved MON items */N#define RMI$_RESERVEDMON17 12713 /* Reserved MON items */N#define RMI$_RESERVEDMON18 12714 /* Reserved MON items */N#define RMI$_RESERVEDMON19 12715 /* Reserved MON items */N#define RMI$_RESERVEDMON20 12716 /* Reserved MON itl"ems */N#define RMI$_RESERVEDMON21 12717 /* Reserved MON items */N#define RMI$_RESERVEDMON22 12718 /* Reserved MON items */N#define RMI$_RESERVEDMON23 12719 /* Reserved MON items */N#define RMI$_RESERVEDMON24 12720 /* Reserved MON items */N#define RMI$_RESERVEDMON25 12721 /* Reserved MON items */N#define RMI$_RESERVEDMON26 12722 /* Reserved MON items */N#defm"ine RMI$_RESERVEDMON27 12723 /* Reserved MON items */N#define RMI$_RESERVEDMON28 12724 /* Reserved MON items */N#define RMI$_RESERVEDMON29 12725 /* Reserved MON items */N#define RMI$_RESERVEDMON30 12726 /* Reserved MON items */N#define RMI$_RESERVEDMON31 12727 /* Reserved MON items */N#define RMI$_RESERVEDMON32 12728 /* Reserved MON items */N#define RMI$_RESERVEDMON33 127n"29 /* Reserved MON items */N#define RMI$_RESERVEDMON34 12730 /* Reserved MON items */N#define RMI$_RESERVEDMON35 12731 /* Reserved MON items */N#define RMI$_RESERVEDMON36 12732 /* Reserved MON items */N#define RMI$_RESERVEDMON37 12733 /* Reserved MON items */N#define RMI$_RESERVEDMON38 12734 /* Reserved MON items */N#define RMI$_RESERVEDMON39 12735 /* Reserved MON o"items */N#define RMI$_RESERVEDMON40 12736 /* Reserved MON items */N#define RMI$_RESERVEDMON41 12737 /* Reserved MON items */N#define RMI$_RESERVEDMON42 12738 /* Reserved MON items */N#define RMI$_RESERVEDMON43 12739 /* Reserved MON items */N#define RMI$_RESERVEDMON44 12740 /* Reserved MON items */N#define RMI$_RESERVEDMON45 12741 /* Reserved MON items */N#dp"efine RMI$_RESERVEDMON46 12742 /* Reserved MON items */N#define RMI$_RESERVEDMON47 12743 /* Reserved MON items */N#define RMI$_RESERVEDMON48 12744 /* Reserved MON items */N#define RMI$_RESERVEDMON49 12745 /* Reserved MON items */N#define RMI$_RESERVEDMON50 12746 /* Reserved MON items */N#define RMI$_RESERVEDMON51 12747 /* Reserved MON items */N#define RMI$_RESERVEDMON52 1q"2748 /* Reserved MON items */N#define RMI$_RESERVEDMON53 12749 /* Reserved MON items */N#define RMI$_RESERVEDMON54 12750 /* Reserved MON items */N#define RMI$_RESERVEDMON55 12751 /* Reserved MON items */N#define RMI$_RESERVEDMON56 12752 /* Reserved MON items */N#define RMI$_RESERVEDMON57 12753 /* Reserved MON items */N#define RMI$_RESERVEDMON58 12754 /* Reserved MOr"N items */N#define RMI$_RESERVEDMON59 12755 /* Reserved MON items */N#define RMI$_RESERVEDMON60 12756 /* Reserved MON items */N#define RMI$_RESERVEDMON61 12757 /* Reserved MON items */N#define RMI$_RESERVEDMON62 12758 /* Reserved MON items */N#define RMI$_RESERVEDMON63 12759 /* Reserved MON items */N#define RMI$_RESERVEDMON64 12760 /* Reserved MON items */Ns"#define RMI$_RESERVEDMON65 12761 /* Reserved MON items */N#define RMI$_RESERVEDMON66 12762 /* Reserved MON items */N#define RMI$_RESERVEDMON67 12763 /* Reserved MON items */N#define RMI$_RESERVEDMON68 12764 /* Reserved MON items */N#define RMI$_RESERVEDMON69 12765 /* Reserved MON items */N#define RMI$_RESERVEDMON70 12766 /* Reserved MON items */N#define RMI$_RESERVEDMON71t" 12767 /* Reserved MON items */N#define RMI$_RESERVEDMON72 12768 /* Reserved MON items */N#define RMI$_RESERVEDMON73 12769 /* Reserved MON items */N#define RMI$_RESERVEDMON74 12770 /* Reserved MON items */N#define RMI$_RESERVEDMON75 12771 /* Reserved MON items */N#define RMI$_RESERVEDMON76 12772 /* Reserved MON items */N#define RMI$_RESERVEDMON77 12773 /* Reserved u"MON items */N#define RMI$_RESERVEDMON78 12774 /* Reserved MON items */N#define RMI$_RESERVEDMON79 12775 /* Reserved MON items */N#define RMI$_RESERVEDMON80 12776 /* Reserved MON items */N#define RMI$_RESERVEDMON81 12777 /* Reserved MON items */N#define RMI$_RESERVEDMON82 12778 /* Reserved MON items */N#define RMI$_RESERVEDMON83 12779 /* Reserved MON items */v"N#define RMI$_RESERVEDMON84 12780 /* Reserved MON items */N#define RMI$_RESERVEDMON85 12781 /* Reserved MON items */N#define RMI$_RESERVEDMON86 12782 /* Reserved MON items */N#define RMI$_RESERVEDMON87 12783 /* Reserved MON items */N#define RMI$_RESERVEDMON88 12784 /* Reserved MON items */N#define RMI$_RESERVEDMON89 12785 /* Reserved MON items */N#define RMI$_RESERVEDMONw"90 12786 /* Reserved MON items */N#define RMI$_RESERVEDMON91 12787 /* Reserved MON items */N#define RMI$_RESERVEDMON92 12788 /* Reserved MON items */N#define RMI$_RESERVEDMON93 12789 /* Reserved MON items */N#define RMI$_RESERVEDMON94 12790 /* Reserved MON items */N#define RMI$_RESERVEDMON95 12791 /* Reserved MON items */N#define RMI$_RESERVEDMON96 12792 /* Reservex"d MON items */N#define RMI$_RESERVEDMON97 12793 /* Reserved MON items */N#define RMI$_RESERVEDMON98 12794 /* Reserved MON items */N#define RMI$_RESERVEDMON99 12795 /* Reserved MON items */N#define RMI$_RESERVEDMON100 12796 /* Reserved MON items */U#define RMI$_LASTMON 12797 /* Last item in the monitor specific table */N/* y" */O/* Begin items specific to the Monitor RMS class. These items are maintained */R/* by RMS and collected from a global section with the following naming scheme: */O/* _RMS$xxxxxxxxyyyyyy where x is the volume lock id and y is the fid of the */N/* file being monitored. */N/* */Q#define RMI$_RMS_STATS 16893 /* All of the following rms statistics */N#dz"efine RMI$_SEQGETS 16894 /* Total # of sequential gets */N#define RMI$_KEYGETS 16895 /* Total # of keyed gets */N#define RMI$_RFAGETS 16896 /* Total # of gets by RFA */N#define RMI$_GETBYTES 16897 /* Total size in bytes of all GETS */N#define RMI$_SEQPUTS 16898 /* Total # of sequential puts */N#define RMI$_KEYPUTS 16899 /* Total # of puts by key */N#define RMI$_PUTBYTES 16900 {" /* Total # of bytes put to file */N#define RMI$_UPDATES 16901 /* Total # of updates to the file */N#define RMI$_UPDATEBYTES 16902 /* Total # of bytes updated in file */N#define RMI$_DELETES 16903 /* Total # of deletes to file */V#define RMI$_TRUNCATES 16904 /* Total # of times file has been truncated */W#define RMI$_TRUNCBLKS 16905 /* Total # of blocks file has been truncated */N#define RMI$_SEQFINDS 16906 |" /* Total # of sequential finds */N#define RMI$_KEYFINDS 16907 /* Total # of keyed finds */N#define RMI$_RFAFINDS 16908 /* Total # of RFA finds */N#define RMI$_READS 16909 /* Total # of $READS */O#define RMI$_READBYTES 16910 /* Total # of bytes read from $READS */N#define RMI$_CONNECTS 16911 /* Total connect requests */N#define RMI$_DISCONNECTS 16912 /* Total disconnect }"requests */N#define RMI$_EXTENDS 16913 /* Total extends */[#define RMI$_EXTBLOCKS 16914 /* Total number of blocks file has been extended */N#define RMI$_FLUSHES 16915 /* Total number of calls to flush */N#define RMI$_REWINDS 16916 /* Total number of calls to REWIND */N#define RMI$_WRITES 16917 /* Total number of calls to $WRITE */N#define RMI$_WRITEBYTES 16918 /* Total bytes written using $WR~"ITE */N#define RMI$_FLCKENQS 16919 /* Total number of file lock ENQ's */N#define RMI$_FLCKDEQS 16920 /* Total number of file lock DEQ's */S#define RMI$_FLCKCNVS 16921 /* Total number of file lock conversions */U#define RMI$_LBLCKENQS 16922 /* Total number of local buffer lock ENQ's */U#define RMI$_LBLCKDEQS 16923 /* Total number of local buffer lock DEQ's */[#define RMI$_LBLCKCNVS 16924 /* Total number of local buffer lock" conversions */V#define RMI$_GBLCKENQS 16925 /* Total number of global buffer lock ENQ's */V#define RMI$_GBLCKDEQS 16926 /* Total number of global buffer lock DEQ's */\#define RMI$_GBLCKCNVS 16927 /* Total number of global buffer lock conversions */W#define RMI$_GSLCKENQS 16928 /* Total number of global section lock ENQ's */W#define RMI$_GSLCKDEQS 16929 /* Total number of global section lock DEQ's */]#define RMI$_GSLCKCNVS 16930 " /* Total number of global section lock conversions */O#define RMI$_RLCKENQS 16931 /* Total number of record lock ENQ's */O#define RMI$_RLCKDEQS 16932 /* Total number of record lock DEQ's */U#define RMI$_RLCKCNVS 16933 /* Total number of record lock conversions */O#define RMI$_APPLCKENQS 16934 /* Total number of append lock ENQ's */O#define RMI$_APPLCKDEQS 16935 /* Total number of append lock DEQ's */U#define RMI$_APPLCKCNVS 16936 " /* Total number of append lock conversions */U#define RMI$_FLBLKASTS 16937 /* Total number of file lock blocking ASTs */]#define RMI$_LBLBLKASTS 16938 /* Total number of local buffer lock blocking ASTs */^#define RMI$_GBLBLKASTS 16939 /* Total number of global buffer lock blocking ASTs */^#define RMI$_APPBLKASTS 16940 /* Total number of shared append lock blocking ASTs */Z#define RMI$_LCACHEHITS 16941 /* Total cache hits on buckets in "local buffers */^#define RMI$_LCACHETRIES 16942 /* Total cache attempts on buckets in local buffers */[#define RMI$_GCACHEHITS 16943 /* Total cache hits on buckets in global buffers */_#define RMI$_GCACHETRIES 16944 /* Total cache attempts on buckets in global buffers */c#define RMI$_GBRDIRIOS 16945 /* Total direct IO's causes by global buffer cache reads */d#define RMI$_GBWDIRIOS 16946 /* Total direct IO's causes by global buffer cache writes "*/b#define RMI$_LBRDIRIOS 16947 /* Total direct IO's causes by local buffer cache reads */c#define RMI$_LBWDIRIOS 16948 /* Total direct IO's causes by local buffer cache writes */`#define RMI$_BKTSPLT 16949 /* Total number of 2 bucket splits done for this file */d#define RMI$_MBKTSPLT 16950 /* Total number of multi-bucket splits done for this file */X#define RMI$_RMSOPENS 16951 /* Total number of times file has been opened */X#define RM"I$_CLOSES 16952 /* Total number of times file has been closed */N#define RMI$_GSBLKASTS 16953 /* Global Section Blocking ASTS */N#define RMI$_FLWAITS 16954 /* File lock ENQs forced to wait */N#define RMI$_LBWAITS 16955 /* Local buffer ENQs forced to wait */O#define RMI$_GBWAITS 16956 /* Global buffer ENQs forced to wait */P#define RMI$_GSWAITS 16957 /* Global section ENQs forced to wait */N#define RMI$_RLWAITS 1"6958 /* Record lock ENQs forced to wait */N#define RMI$_APWAITS 16959 /* Append lock ENQs forced to wait */N#define RMI$_TOTWAITS 16960 /* Total ENQs forced to wait */`#define RMI$_OUTBUFQUO 16961 /* Number of times a process runs out of buffer quota */]#define RMI$_RMSDEV1 16962 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV2 16963 /* Reserved for RMS development private monitoring */"]#define RMI$_RMSDEV3 16964 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV4 16965 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV5 16966 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV6 16967 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV7 16968 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV8 169"69 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV9 16970 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV10 16971 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV11 16972 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV12 16973 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV13 16974 /* Reserve"d for RMS development private monitoring */]#define RMI$_RMSDEV14 16975 /* Reserved for RMS development private monitoring */]#define RMI$_RMSDEV15 16976 /* Reserved for RMS development private monitoring */[#define RMI$_XQPQIOS 16977 /* Number of XQP operations for this file by RMS */N#define RMI$_LCACHEHITPCNT 16978 /* Local RMS buffer hit percent */N#define RMI$_GCACHEHITPCNT 16979 /* Global RMS buffer hit percent */N#define RMI$_T"OTALGET 16980 /* Total $GET call rate */N#define RMI$_TOTALPUT 16981 /* Total $PUT call rate */N#define RMI$_TOTALFIND 16982 /* Total $FIND call rate */N#define RMI$_BYTESGET 16983 /* Bytes per $GET */N#define RMI$_BYTESPUT 16984 /* Bytes per $PUT */N#define RMI$_BYTESUPDATE 16985 /* Bytes per $UPDATE */N#define RMI$_BYTESREAD 16986 "/* Bytes per $READ */N#define RMI$_BYTESWRITE 16987 /* Bytes per $WRITE */N#define RMI$_BLOCKSTRUNCATE 16988 /* Bytes per $TRUNCATE */N#define RMI$_BLOCKSEXTEND 16989 /* Bytes per $EXTEND */N#define RMI$_ACTIVE_STREAMS 16990 /* Active connects to file */N#define RMI$_TOTAL_ENQS 16991 /* Total new ENQs */N#define RMI$_TOTAL_DEQS 16992 /* Total DEQs " */N#define RMI$_TOTAL_CNVS 16993 /* Total ENQ conversions */N#define RMI$_TOTAL_BLKAST 16994 /* Total blocking ASTs */N#define RMI$_RMS_ORG 16995 /* RMS File org */]#define RMI$_INTCOL_GBHSH 16996 /* Interlock collision on global buffer hash table */Y#define RMI$_INTCOL_GBH 16997 /* Interlock Collision on global buffer header */V#define RMI$_INTRNDWN_GBHSH 16998 /* Interlock still held "at rundown on GBHSH */T#define RMI$_INTRNDWN_GBH 16999 /* Interlock still held at rundown on GBH */N#define RMI$_RESERVEDRMS5 17000 /* Reserved RMS items */N#define RMI$_RESERVEDRMS6 17001 /* Reserved RMS items */N#define RMI$_RESERVEDRMS7 17002 /* Reserved RMS items */N#define RMI$_RESERVEDRMS8 17003 /* Reserved RMS items */N#define RMI$_RESERVEDRMS9 17004 /* Reserved RMS items "*/N#define RMI$_RESERVEDRMS10 17005 /* Reserved RMS items */N#define RMI$_RESERVEDRMS11 17006 /* Reserved RMS items */N#define RMI$_RESERVEDRMS12 17007 /* Reserved RMS items */N#define RMI$_RESERVEDRMS13 17008 /* Reserved RMS items */N#define RMI$_RESERVEDRMS14 17009 /* Reserved RMS items */N#define RMI$_RESERVEDRMS15 17010 /* Reserved RMS items */N#define RMI$_RESERVEDR"MS16 17011 /* Reserved RMS items */N#define RMI$_RESERVEDRMS17 17012 /* Reserved RMS items */N#define RMI$_RESERVEDRMS18 17013 /* Reserved RMS items */N#define RMI$_RESERVEDRMS19 17014 /* Reserved RMS items */N#define RMI$_RESERVEDRMS20 17015 /* Reserved RMS items */N#define RMI$_RESERVEDRMS21 17016 /* Reserved RMS items */N#define RMI$_RESERVEDRMS22 17017 /* Reser"ved RMS items */N#define RMI$_RESERVEDRMS23 17018 /* Reserved RMS items */N#define RMI$_RESERVEDRMS24 17019 /* Reserved RMS items */N#define RMI$_RESERVEDRMS25 17020 /* Reserved RMS items */N#define RMI$_RESERVEDRMS26 17021 /* Reserved RMS items */N#define RMI$_RESERVEDRMS27 17022 /* Reserved RMS items */N#define RMI$_RESERVEDRMS28 17023 /* Reserved RMS items " */N#define RMI$_RESERVEDRMS29 17024 /* Reserved RMS items */N#define RMI$_RESERVEDRMS30 17025 /* Reserved RMS items */N#define RMI$_RESERVEDRMS31 17026 /* Reserved RMS items */N#define RMI$_RESERVEDRMS32 17027 /* Reserved RMS items */N#define RMI$_RESERVEDRMS33 17028 /* Reserved RMS items */N#define RMI$_RESERVEDRMS34 17029 /* Reserved RMS items */N#define RMI$_RESERVE"DRMS35 17030 /* Reserved RMS items */N#define RMI$_RESERVEDRMS36 17031 /* Reserved RMS items */N#define RMI$_RESERVEDRMS37 17032 /* Reserved RMS items */N#define RMI$_RESERVEDRMS38 17033 /* Reserved RMS items */N#define RMI$_RESERVEDRMS39 17034 /* Reserved RMS items */N#define RMI$_RESERVEDRMS40 17035 /* Reserved RMS items */N#define RMI$_RESERVEDRMS41 17036 /* Res"erved RMS items */N#define RMI$_RESERVEDRMS42 17037 /* Reserved RMS items */N#define RMI$_RESERVEDRMS43 17038 /* Reserved RMS items */N#define RMI$_RESERVEDRMS44 17039 /* Reserved RMS items */N#define RMI$_RESERVEDRMS45 17040 /* Reserved RMS items */N#define RMI$_RESERVEDRMS46 17041 /* Reserved RMS items */N#define RMI$_RESERVEDRMS47 17042 /* Reserved RMS items " */N#define RMI$_RESERVEDRMS48 17043 /* Reserved RMS items */N#define RMI$_RESERVEDRMS49 17044 /* Reserved RMS items */N#define RMI$_RESERVEDRMS50 17045 /* Reserved RMS items */N#define RMI$_RESERVEDRMS51 17046 /* Reserved RMS items */N#define RMI$_RESERVEDRMS52 17047 /* Reserved RMS items */N#define RMI$_RESERVEDRMS53 17048 /* Reserved RMS items */N#define RMI$_RESER"VEDRMS54 17049 /* Reserved RMS items */N#define RMI$_RESERVEDRMS55 17050 /* Reserved RMS items */N#define RMI$_RESERVEDRMS56 17051 /* Reserved RMS items */N#define RMI$_RESERVEDRMS57 17052 /* Reserved RMS items */N#define RMI$_RESERVEDRMS58 17053 /* Reserved RMS items */N#define RMI$_RESERVEDRMS59 17054 /* Reserved RMS items */N#define RMI$_RESERVEDRMS60 17055 /* R"eserved RMS items */N#define RMI$_RESERVEDRMS61 17056 /* Reserved RMS items */N#define RMI$_RESERVEDRMS62 17057 /* Reserved RMS items */N#define RMI$_RESERVEDRMS63 17058 /* Reserved RMS items */N#define RMI$_RESERVEDRMS64 17059 /* Reserved RMS items */N#define RMI$_RESERVEDRMS65 17060 /* Reserved RMS items */N#define RMI$_RESERVEDRMS66 17061 /* Reserved RMS items " */N#define RMI$_RESERVEDRMS67 17062 /* Reserved RMS items */N#define RMI$_RESERVEDRMS68 17063 /* Reserved RMS items */N#define RMI$_RESERVEDRMS69 17064 /* Reserved RMS items */N#define RMI$_RESERVEDRMS70 17065 /* Reserved RMS items */N#define RMI$_RESERVEDRMS71 17066 /* Reserved RMS items */N#define RMI$_RESERVEDRMS72 17067 /* Reserved RMS items */N#define RMI$_RES"ERVEDRMS73 17068 /* Reserved RMS items */N#define RMI$_RESERVEDRMS74 17069 /* Reserved RMS items */N#define RMI$_RESERVEDRMS75 17070 /* Reserved RMS items */N#define RMI$_RESERVEDRMS76 17071 /* Reserved RMS items */N#define RMI$_RESERVEDRMS77 17072 /* Reserved RMS items */N#define RMI$_RESERVEDRMS78 17073 /* Reserved RMS items */N#define RMI$_RESERVEDRMS79 17074 /*" Reserved RMS items */N#define RMI$_RESERVEDRMS80 17075 /* Reserved RMS items */N#define RMI$_RESERVEDRMS81 17076 /* Reserved RMS items */N#define RMI$_RESERVEDRMS82 17077 /* Reserved RMS items */N#define RMI$_RESERVEDRMS83 17078 /* Reserved RMS items */N#define RMI$_RESERVEDRMS84 17079 /* Reserved RMS items */N#define RMI$_RESERVEDRMS85 17080 /* Reserved RMS items " */N#define RMI$_RESERVEDRMS86 17081 /* Reserved RMS items */N#define RMI$_RESERVEDRMS87 17082 /* Reserved RMS items */N#define RMI$_RESERVEDRMS88 17083 /* Reserved RMS items */N#define RMI$_RESERVEDRMS89 17084 /* Reserved RMS items */N#define RMI$_RESERVEDRMS90 17085 /* Reserved RMS items */N#define RMI$_RESERVEDRMS91 17086 /* Reserved RMS items */N#define RMI$_R"ESERVEDRMS92 17087 /* Reserved RMS items */N#define RMI$_RESERVEDRMS93 17088 /* Reserved RMS items */N#define RMI$_RESERVEDRMS94 17089 /* Reserved RMS items */N#define RMI$_RESERVEDRMS95 17090 /* Reserved RMS items */N#define RMI$_RESERVEDRMS96 17091 /* Reserved RMS items */N#define RMI$_RESERVEDRMS97 17092 /* Reserved RMS items */N#define RMI$_RESERVEDRMS98 17093 "/* Reserved RMS items */N#define RMI$_RESERVEDRMS99 17094 /* Reserved RMS items */N#define RMI$_RESERVEDRMS100 17095 /* Reserved RMS items */U#define RMI$_LASTRMS 17096 /* Last item in the monitor specific table */N/* EX2TABLE : Extended EXE table */N/* Define item identifier numbers. Each data item has an associated */N/* value which is used to find its entry in the EXETBL. Th"e item table */N/* is defined by the macros RMI_GENERATE_TABLE which makes multiple calls */N/* to the macro RMI_ITEM_CODE defined in the SYSGETRMI module. */N/* */N#define RMI$_CPUID 21192 /* Primary cpu id */N#define RMI$_CPUCOMPAT 21193 /* time in compat. mode */N#define RMI$_CPUINTSTK 21194 /* time on interrupt stack */N#def"ine RMI$_CPUMPSYNCH 21195 /* time spent in synch mode */N#define RMI$_CPUKERNEL 21196 /* time in kernel mode */N#define RMI$_CPUEXEC 21197 /* time in exec mode */N#define RMI$_CPUSUPER 21198 /* time in supervisor mode */N#define RMI$_CPUUSER 21199 /* time in user mode */N#define RMI$_CPUIDLE 21200 /* idle time */g#define RMI$_PROCCNTMAX 21201 " /* Maximum number of concurrent processes seen by the system */[#define RMI$_PROCBATCNT 21202 /* Total number of batch processes in the system */a#define RMI$_PROCINTCNT 21203 /* Total number of interactive processes in the system */]#define RMI$_PROCNETCNT 21204 /* Total number of network processes in the system */o#define RMI$_PROCSWITCHCNT 21205 /* Total count of switches from the then-currently executing process */Z#define RMI$_PROCBALSETCNT" 21206 /* Total number of processe in the balance set. */]#define RMI$_PROCLOADCNT 21207 /* Total count of process context load operations. */N#define RMI$_BADFLTS 21208 /* Number of bad_list faults */N#define RMI$_EXEFAULTS 21209 /* Number of execute page faults. */d#define RMI$_HDRINSWAPS 21210 /* Count of system wide process header inswap operations. */e#define RMI$_HDROUTSWAPS 21211 /* Count of system wide process header out"swap operations. */{#define RMI$_IOPAGCNT 21212 /* Count of pages in transit to disk from the modified page list (system wide ). */`#define RMI$_ISWPCNTPG 21213 /* Accumulated system wide count of pages in-swapped. */j#define RMI$_OSWPCNT 21214 /* Accumulated system wide count of process owtswap operations. */`#define RMI$_OSWPCNTPG 21215 /* Accumulated system-wide count of pages out-swapped */Q#define RMI$_RDFAULTS 21216 /* Count of fa"ult-on-read page faults. */a#define RMI$_TRANSFLTS 21217 /* Accumulated system-wide count of transition faults. */R#define RMI$_WRTFAULTS 21218 /* Count of fault-on-write page faults. */`#define RMI$_USERPAGES 21219 /* Number of pages available for use by applications. */\#define RMI$_VMSPAGES 21220 /* Number of pages actually allocated to OpenVMS. */N#define RMI$_LOGNAMCRE 21221 /* Count of logical name creations. */N#define RMI$_LOGNAMD"EL 21222 /* Count of logical name deletions. */]#define RMI$_LOGNAMFAIL 21223 /* Count of logical name translations that failed. */S#define RMI$_LOGNAMTBLCRE 21224 /* Count of logical name tables created. */n#define RMI$_TTREADCNT 21225 /* Accumulated system wide count of characters read from terminals. */d#define RMI$_TTREADS 21226 /* Accumulated system wide count of reads from terminals. */o#define RMI$_TTWRITECNT 21227 /* Accumul"ated system wide count of characters written to terminals. */c#define RMI$_TTWRITES 21228 /* Accumulated system wide count of writes to terminals. */h#define RMI$_BUFOBJPAG 21229 /* Count of buffer object physical pages currently allocated. */q#define RMI$_BUFOBJPAGPEAK 21230 /* Maximum number of buffer object physical pages currently allocated. */o#define RMI$_BUFOBJPAGS01 21231 /* Number of buffer object pages currently allocated in S0/S1 space. */p#def"ine RMI$_BUFOBJPAGS2 21232 /* Max number of buffer object pages currently allocated in S2 space. */_#define RMI$_BUFOBJPAGMAXS01 21233 /* Max number of buffer object pages in S0/S1 space. */i#define RMI$_BUFOBJPAGMAXS2 21234 /* Maximum number of buffer object physical pages in S2 space. */s#define RMI$_BUFOBJPAGPEAKS01 21235 /* Max number of buffer object pages currently allocated in S0/S1 space. */}#define RMI$_BUFOBJPAGPEAKS2 21236 /* Maximum number of buffer obje"ct physical pages currently allocated in S2 space. */h#define RMI$_BUFOBJPGLTMAXS01 21237 /* Number of available buffer object pagelets in S0/S1 space. */e#define RMI$_BUFOBJPGLTMAXS2 21238 /* Number of available buffer object pagelets in S2 space. */`#define RMI$_DLCK_INCMPLT 21239 /* System-wide count of incomplete deadlock searches. */h#define RMI$_DLCKMSGS_IN 21240 /* System-wide count of incoming deadlock detection messages. */k#define RMI$_DLCKMSGS_OUT 21241 " /* System-wide count of of outgoing deadlock detection messages. */N#define RMI$_TQETOTAL 21242 /* Count of timer requests. */g#define RMI$_TQESYSUB 21243 /* Count of timer requests made by OpenVMS operating system. */#define RMI$_TQEUSRTIMR 21244 /* Count of timer requests made by application programs through $SETIMR system service. */#define RMI$_TQEUSRWAKE 21245 /* Count of timer requests made by application programs through $SCHDWK sy"stem service. */#define RMI$_CWPSBYTESIN 21246 /* Count of Cluster-wide process services "CWPS" message bytes received by the system. */]#define RMI$_CWPSBYTESOUT 21247 /* Count of CWPS message bytes sent by the system. */d#define RMI$_CWPSJPISIN 21248 /* Count of CWPS $GETJPI requests received by the system. */`#define RMI$_CWPSJPISOUT 21249 /* Count of CWPS $GETJPI requests sent by the system. */\#define RMI$_CWPSMSGSIN 21250 /* Count of CWPS mes"sages received by the system. */X#define RMI$_CWPSMSGSOUT 21251 /* Count of CWPS messages sent by the system. */c#define RMI$_CWPSPCNTRLIN 21252 /* Count of CWPS PCNTRL requests received by the system. */_#define RMI$_CWPSPCNTRLOUT 21253 /* Count of CWPS PCNTRL requests sent by the system. */j#define RMI$_CWPSRSRCIN 21254 /* Count of CWPS resource-fail messages received by the system. */f#define RMI$_CWPSRSRCOUT 21255 /* Count of CWPS resource-fail mes"sages sent by the system. */N#define RMI$_CHME 21256 /* Count of $CMEXEC service calls. */N#define RMI$_CHMK 21257 /* Count of $CMKRNL service calls. */b#define RMI$_MCHKERRS 21258 /* Count of machine checks since the system was booted. */a#define RMI$_MEMERRS 21259 /* Count of memory errors since the system was booted. */#define RMI$_RESMASK 21260 /* A bit mask summarizing the system resources for which processes in the MW"AIT state are c\urrently waiting. */N#define RMI$_CACHE_STATE 21261 /* Cache stats bits */Y#define RMI$_CACHE_MEMORY 21262 /* Pages of memory currently held by the cache */h#define RMI$_CACHE_FREE 21263 /* Pages of memory held by the cache but not currently in use */N#define RMI$_CACHE_READ_HITS 21264 /* Read hits */N#define RMI$_CACHE_VIRT_READS 21265 /* Virtual reads to cacheable files */O#define RMI$_CACHE_VIRT_WRIT"ES 21266 /* Virtual writes to cacheable files */O#define RMI$_CACHE_R_ARND_MOD 21267 /* Read arounds due to modifier bits */P#define RMI$_CACHE_R_ARND_SIZ 21268 /* Read arounds due to size too large */P#define RMI$_CACHE_W_ARND_MOD 21269 /* Write arounds due to modifier bits */Q#define RMI$_CACHE_W_ARND_SIZ 21270 /* Write arounds due to size too large */N#define RMI$_CACHE_LIMBO_LEN 21271 /* Length of limbo queue */N#define RMI$_CACHE_MIN_SIZE 21272 /*" Minimum cache size in Pages */Q#define RMI$_CACHE_MAX_SIZE 21273 /* Current maximum cache size in Pages */s#define RMI$_CACHE_MAX_LIMIT 21274 /* Maximum ever cache size in Pages (limited by boot-time VA allocation) */N#define RMI$_CACHE_MAX_IO_SIZE 21275 /* Value of VCC_MAX_IO_SIZE */N#define RMI$_CACHE_MAX_LOCKS 21276 /* Value of VCC_MAX_LOCKS */N#define RMI$_CACHE_READAHEAD 21277 /* Value of VCC_READAHEAD */N#define RMI$_CACHE_WRITEBE"HIND 21278 /* Value of VCC_WRITEBEHIND */N#define RMI$_CACHE_WRITEDELAY 21279 /* Value of VCC_WRITE_DELAY */O#define RMI$_CACHE_VOLS_FXFC_MODE 21280 /* Count of volumes in Full XFC mode */Y#define RMI$_CACHE_VOLS_RXFC_MODE 21281 /* Count of volumes in VIOC compatability mode */Q#define RMI$_CACHE_VOLS_NC_MODE 21282 /* Count of volumes in No Caching mode */[#define RMI$_CACHE_VOLS_PNC_MODE 21283 /* Count of volumes in Permanent No Caching mode */N#define RMI$_CACHE_O"PEN_FILES 21284 /* Number of open files */V#define RMI$_CACHE_UNSYNCHED_IOS 21285 /* Number of physical/logical unsynched IOs */N#define RMI$_CACHE_DELAYED_WRITES 21286 /* Number of write-behind writes */N#define RMI$_CACHE_LOST_WRITES 21287 /* Writes lost due to disk errors */R#define RMI$_CACHE_FULL_BARRIERS 21288 /* Number of full barriers in dep graph */W#define RMI$_CACHE_PARTIAL_BARRIERS 21289 /* Number of partial barriers in dep graph */T#define RMI$_CACHE_READS"_AROUND 21290 /* Total number of reads around the cache */U#define RMI$_CACHE_WRITES_AROUND 21291 /* Total number of writes around the cache */U#define RMI$_CACHE_CURRENT_LOCKS 21292 /* Number of locks currently held by cache */Z#define RMI$_CACHE_BARRIER_COUNT 21293 /* Number of barrier calls made since boot-time */X#define RMI$_CACHE_SUPER_WRITES 21294 /* Number of writes that supersede dirty data */c#define RMI$_CACHE_NON_PAGED_POOL 21295 /* Amount of non-paged pool cuurrently held by" the cache */Z#define RMI$_CACHE_EVERYTHING 21296 /* Dummy item to collect everything about cache */V#define RMI$_GBP_CURMAP 21297 /* Count of global pages currently mapped. */[#define RMI$_GBP_CURMAP_GRP 21298 /* Count of group global pages currently mapped. */d#define RMI$_GBP_CURMAP_GRPWRT 21299 /* Count of writable group global pages currently mapped. */\#define RMI$_GBP_CURMAP_SYS 21300 /* Count of system global pages currently mapped. */i#define RMI$_GBP_CUR"MAP_SYSWRT 21301 /* Count of writable system global pages currently mapped. */a#define RMI$_GBP_MAXMAP 21302 /* Maximum count of global pages simultaneouly mapped. */X#define RMI$_GBS_CURMAP 21303 /* Count of global sections currently mapped. */^#define RMI$_GBS_CURMAP_GRP 21304 /* Count of group global sections currently mapped. */g#define RMI$_GBS_CURMAP_GRPWRT 21305 /* Count of writable group global sections currently mapped. */_#define RMI$_GBS_CURMAP_SY"S 21306 /* Count of system global sections currently mapped. */h#define RMI$_GBS_CURMAP_SYSWRT 21307 /* Count of writable system global sections currently mapped. */d#define RMI$_GBS_MAXMAP 21308 /* Maximum count of global sections simutaneously mapped. */_#define RMI$_GBS_NOREF 21309 /* Count of global sections not mapped to a process. */f#define RMI$_NP_POOL_ALLOC 21310 /* Accumulated count of non-paged pool allocation requests. */g#define RMI$_NP_POOL_ALL"OCF 21311 /* Count of unsuccessful non-paged pool allocation requests. */_#define RMI$_NP_POOL_EXP 21312 /* Count of successful expansions on non-paged pool. */f#define RMI$_NP_POOL_EXPF 21313 /* Count of unsuccessful attempts to expand non-paged pool. */V#define RMI$_PG_POOL_ALLOC 21314 /* Count of paged pool allocation requests. */c#define RMI$_PG_POOL_ALLOCF 21315 /* Count of unsuccessful paged pool allocation requests. */b#define RMI$_PG_POOL_EXPF 21316 " /* Count of unsuccessful attempts to expand paged pool. */n#define RMI$_SMP_CURMAP 21317 /* Count of global pages currently mapped for galaxy shared memory. */t#define RMI$_SMP_CURMAP_GRP 21318 /* Count of group global pages currently mapped for galaxy shared memory. */}#define RMI$_SMP_CURMAP_GRPWRT 21319 /* Count of writable group global pages currently mapped for galaxy shared memory. */u#define RMI$_SMP_CURMAP_SYS 21320 /* Count of system global pages currentl"y mapped for galaxy shared memory. */~#define RMI$_SMP_CURMAP_SYSWRT 21321 /* Count of writable system global pages currently mapped for galaxy shared memory. */q#define RMI$_SMS_CURMAP 21322 /* Count of global sections currently mapped for galaxy shared memory. */w#define RMI$_SMS_CURMAP_GRP 21323 /* Count of group global sections currently mapped for galaxy shared memory. */#define RMI$_SMS_CURMAP_GRPWRT 21324 /* Count of writable group global sections currently mapped "for galaxy shared memory. */x#define RMI$_SMS_CURMAP_SYS 21325 /* Count of system global sections currently mapped for galaxy shared memory. */#define RMI$_SMS_CURMAP_SYSWRT 21326 /* Count of writable system global sections currently mapped for galaxy shared memory. */#define RMI$_SMS_NOREF 21327 /* Current count of global sections for galaxy shared memory which are not mapped to a proc\ess. */N#define RMI$_RESERVEDEXT1 21328 /* Reserved EXE items */"N#define RMI$_RESERVEDEXT2 21329 /* Reserved EXE items */N#define RMI$_RESERVEDEXT3 21330 /* Reserved EXE items */N#define RMI$_RESERVEDEXT4 21331 /* Reserved EXE items */N#define RMI$_RESERVEDEXT5 21332 /* Reserved EXE items */N#define RMI$_RESERVEDEXT6 21333 /* Reserved EXE items */N#define RMI$_RESERVEDEXT7 21334 /* Reserved EXE items */N#define RMI$_RESERVEDEXT"8 21335 /* Reserved EXE items */N#define RMI$_RESERVEDEXT9 21336 /* Reserved EXE items */N#define RMI$_RESERVEDEXT10 21337 /* Reserved EXE items */N#define RMI$_RESERVEDEXT11 21338 /* Reserved EXE items */N#define RMI$_RESERVEDEXT12 21339 /* Reserved EXE items */N#define RMI$_RESERVEDEXT13 21340 /* Reserved EXE items */N#define RMI$_RESERVEDEXT14 21341 /* Reserve"d EXE items */N#define RMI$_RESERVEDEXT15 21342 /* Reserved EXE items */N#define RMI$_RESERVEDEXT16 21343 /* Reserved EXE items */N#define RMI$_RESERVEDEXT17 21344 /* Reserved EXE items */N#define RMI$_RESERVEDEXT18 21345 /* Reserved EXE items */N#define RMI$_RESERVEDEXT19 21346 /* Reserved EXE items */N#define RMI$_RESERVEDEXT20 21347 /* Reserved EXE items "*/N#define RMI$_RESERVEDEXT21 21348 /* Reserved EXE items */N#define RMI$_RESERVEDEXT22 21349 /* Reserved EXE items */N#define RMI$_RESERVEDEXT23 21350 /* Reserved EXE items */N#define RMI$_RESERVEDEXT24 21351 /* Reserved EXE items */N#define RMI$_RESERVEDEXT25 21352 /* Reserved EXE items */N#define RMI$_RESERVEDEXT26 21353 /* Reserved EXE items */N#define RMI$_RESERVEDE"XT27 21354 /* Reserved EXE items */N#define RMI$_RESERVEDEXT28 21355 /* Reserved EXE items */N#define RMI$_RESERVEDEXT29 21356 /* Reserved EXE items */N#define RMI$_RESERVEDEXT30 21357 /* Reserved EXE items */N#define RMI$_RESERVEDEXT31 21358 /* Reserved EXE items */N#define RMI$_RESERVEDEXT32 21359 /* Reserved EXE items */N#define RMI$_RESERVEDEXT33 21360 /* Reser"ved EXE items */N#define RMI$_RESERVEDEXT34 21361 /* Reserved EXE items */N#define RMI$_RESERVEDEXT35 21362 /* Reserved EXE items */N#define RMI$_RESERVEDEXT36 21363 /* Reserved EXE items */N#define RMI$_RESERVEDEXT37 21364 /* Reserved EXE items */N#define RMI$_RESERVEDEXT38 21365 /* Reserved EXE items */N#define RMI$_RESERVEDEXT39 21366 /* Reserved EXE items " */N#define RMI$_RESERVEDEXT40 21367 /* Reserved EXE items */N#define RMI$_RESERVEDEXT41 21368 /* Reserved EXE items */N#define RMI$_RESERVEDEXT42 21369 /* Reserved EXE items */N#define RMI$_RESERVEDEXT43 21370 /* Reserved EXE items */N#define RMI$_RESERVEDEXT44 21371 /* Reserved EXE items */N#define RMI$_RESERVEDEXT45 21372 /* Reserved EXE items */N#define RMI$_RESERVE"DEXT46 21373 /* Reserved EXE items */N#define RMI$_RESERVEDEXT47 21374 /* Reserved EXE items */N#define RMI$_RESERVEDEXT48 21375 /* Reserved EXE items */N#define RMI$_RESERVEDEXT49 21376 /* Reserved EXE items */N#define RMI$_RESERVEDEXT50 21377 /* Reserved EXE items */N#define RMI$_RESERVEDEXT51 21378 /* Reserved EXE items */N#define RMI$_RESERVEDEXT52 21379 /* Res"erved EXE items */N#define RMI$_RESERVEDEXT53 21380 /* Reserved EXE items */N#define RMI$_RESERVEDEXT54 21381 /* Reserved EXE items */N#define RMI$_RESERVEDEXT55 21382 /* Reserved EXE items */N#define RMI$_RESERVEDEXT56 21383 /* Reserved EXE items */N#define RMI$_RESERVEDEXT57 21384 /* Reserved EXE items */N#define RMI$_RESERVEDEXT58 21385 /* Reserved EXE items " */N#define RMI$_RESERVEDEXT59 21386 /* Reserved EXE items */N#define RMI$_RESERVEDEXT60 21387 /* Reserved EXE items */N#define RMI$_RESERVEDEXT61 21388 /* Reserved EXE items */N#define RMI$_RESERVEDEXT62 21389 /* Reserved EXE items */N#define RMI$_RESERVEDEXT63 21390 /* Reserved EXE items */N#define RMI$_RESERVEDEXT64 21391 /* Reserved EXE items */N#define RMI$_RESER"VEDEXT65 21392 /* Reserved EXE items */N#define RMI$_RESERVEDEXT66 21393 /* Reserved EXE items */N#define RMI$_RESERVEDEXT67 21394 /* Reserved EXE items */N#define RMI$_RESERVEDEXT68 21395 /* Reserved EXE items */N#define RMI$_RESERVEDEXT69 21396 /* Reserved EXE items */N#define RMI$_RESERVEDEXT70 21397 /* Reserved EXE items */N#define RMI$_RESERVEDEXT71 21398 /* R"eserved EXE items */N#define RMI$_RESERVEDEXT72 21399 /* Reserved EXE items */N#define RMI$_RESERVEDEXT73 21400 /* Reserved EXE items */N#define RMI$_RESERVEDEXT74 21401 /* Reserved EXE items */N#define RMI$_RESERVEDEXT75 21402 /* Reserved EXE items */N#define RMI$_RESERVEDEXT76 21403 /* Reserved EXE items */N#define RMI$_RESERVEDEXT77 21404 /* Reserved EXE items " */N#define RMI$_RESERVEDEXT78 21405 /* Reserved EXE items */N#define RMI$_RESERVEDEXT79 21406 /* Reserved EXE items */N#define RMI$_RESERVEDEXT80 21407 /* Reserved EXE items */N#define RMI$_RESERVEDEXT81 21408 /* Reserved EXE items */N#define RMI$_RESERVEDEXT82 21409 /* Reserved EXE items */N#define RMI$_RESERVEDEXT83 21410 /* Reserved EXE items */N#define RMI$_RES"ERVEDEXT84 21411 /* Reserved EXE items */N#define RMI$_RESERVEDEXT85 21412 /* Reserved EXE items */N#define RMI$_RESERVEDEXT86 21413 /* Reserved EXE items */N#define RMI$_RESERVEDEXT87 21414 /* Reserved EXE items */N#define RMI$_RESERVEDEXT88 21415 /* Reserved EXE items */N#define RMI$_RESERVEDEXT89 21416 /* Reserved EXE items */N#define RMI$_RESERVEDEXT90 21417 /*" Reserved EXE items */N#define RMI$_RESERVEDEXT91 21418 /* Reserved EXE items */N#define RMI$_RESERVEDEXT92 21419 /* Reserved EXE items */N#define RMI$_RESERVEDEXT93 21420 /* Reserved EXE items */N#define RMI$_RESERVEDEXT94 21421 /* Reserved EXE items */N#define RMI$_RESERVEDEXT95 21422 /* Reserved EXE items */N#define RMI$_RESERVEDEXT96 21423 /* Reserved EXE items " */N#define RMI$_RESERVEDEXT97 21424 /* Reserved EXE items */N#define RMI$_RESERVEDEXT98 21425 /* Reserved EXE items */N#define RMI$_RESERVEDEXT99 21426 /* Reserved EXE items */N#define RMI$_RESERVEDEXT100 21427 /* Reserved EXE items */N#define RMI$_RESERVEDEXT101 21428 /* Reserved EXE items */N#define RMI$_RESERVEDEXT102 21429 /* Reserved EXE items */N#define RMI$_R"ESERVEDEXT103 21430 /* Reserved EXE items */N#define RMI$_RESERVEDEXT104 21431 /* Reserved EXE items */N#define RMI$_RESERVEDEXT105 21432 /* Reserved EXE items */N#define RMI$_RESERVEDEXT106 21433 /* Reserved EXE items */N#define RMI$_RESERVEDEXT107 21434 /* Reserved EXE items */N#define RMI$_RESERVEDEXT108 21435 /* Reserved EXE items */N#define RMI$_RESERVEDEXT109 21436 "/* Reserved EXE items */N#define RMI$_RESERVEDEXT110 21437 /* Reserved EXE items */N#define RMI$_RESERVEDEXT111 21438 /* Reserved EXE items */N#define RMI$_RESERVEDEXT112 21439 /* Reserved EXE items */N#define RMI$_RESERVEDEXT113 21440 /* Reserved EXE items */N#define RMI$_RESERVEDEXT114 21441 /* Reserved EXE items */N#define RMI$_RESERVEDEXT115 21442 /* Reserved EXE items " */N#define RMI$_RESERVEDEXT116 21443 /* Reserved EXE items */N#define RMI$_RESERVEDEXT117 21444 /* Reserved EXE items */N#define RMI$_RESERVEDEXT118 21445 /* Reserved EXE items */N#define RMI$_RESERVEDEXT119 21446 /* Reserved EXE items */N#define RMI$_RESERVEDEXT120 21447 /* Reserved EXE items */N#define RMI$_RESERVEDEXT121 21448 /* Reserved EXE items */N#define RMI$"_RESERVEDEXT122 21449 /* Reserved EXE items */N#define RMI$_RESERVEDEXT123 21450 /* Reserved EXE items */N#define RMI$_RESERVEDEXT124 21451 /* Reserved EXE items */N#define RMI$_RESERVEDEXT125 21452 /* Reserved EXE items */N#define RMI$_RESERVEDEXT126 21453 /* Reserved EXE items */N#define RMI$_RESERVEDEXT127 21454 /* Reserved EXE items */N#define RMI$_RESERVEDEXT128 21455 " /* Reserved EXE items */N#define RMI$_RESERVEDEXT129 21456 /* Reserved EXE items */N#define RMI$_RESERVEDEXT130 21457 /* Reserved EXE items */N#define RMI$_RESERVEDEXT131 21458 /* Reserved EXE items */N#define RMI$_RESERVEDEXT132 21459 /* Reserved EXE items */N#define RMI$_RESERVEDEXT133 21460 /* Reserved EXE items */N#define RMI$_RESERVEDEXT134 21461 /* Reserved EXE items " */N#define RMI$_RESERVEDEXT135 21462 /* Reserved EXE items */N#define RMI$_RESERVEDEXT136 21463 /* Reserved EXE items */N#define RMI$_RESERVEDEXT137 21464 /* Reserved EXE items */N#define RMI$_RESERVEDEXT138 21465 /* Reserved EXE items */N#define RMI$_RESERVEDEXT139 21466 /* Reserved EXE items */N#define RMI$_RESERVEDEXT140 21467 /* Reserved EXE items */N#define RM"I$_RESERVEDEXT141 21468 /* Reserved EXE items */N#define RMI$_RESERVEDEXT142 21469 /* Reserved EXE items */N#define RMI$_RESERVEDEXT143 21470 /* Reserved EXE items */N#define RMI$_RESERVEDEXT144 21471 /* Reserved EXE items */N#define RMI$_RESERVEDEXT145 21472 /* Reserved EXE items */N#define RMI$_RESERVEDEXT146 21473 /* Reserved EXE items */N#define RMI$_RESERVEDEXT147 21474 " /* Reserved EXE items */N#define RMI$_RESERVEDEXT148 21475 /* Reserved EXE items */N#define RMI$_RESERVEDEXT149 21476 /* Reserved EXE items */N#define RMI$_RESERVEDEXT150 21477 /* Reserved EXE items */N#define RMI$_RESERVEDEXT151 21478 /* Reserved EXE items */N#define RMI$_RESERVEDEXT152 21479 /* Reserved EXE items */N#define RMI$_RESERVEDEXT153 21480 /* Reserved EXE items " */N#define RMI$_RESERVEDEXT154 21481 /* Reserved EXE items */N#define RMI$_RESERVEDEXT155 21482 /* Reserved EXE items */N#define RMI$_RESERVEDEXT156 21483 /* Reserved EXE items */N#define RMI$_RESERVEDEXT157 21484 /* Reserved EXE items */N#define RMI$_RESERVEDEXT158 21485 /* Reserved EXE items */N#define RMI$_RESERVEDEXT159 21486 /* Reserved EXE items */N#define "RMI$_RESERVEDEXT160 21487 /* Reserved EXE items */N#define RMI$_RESERVEDEXT161 21488 /* Reserved EXE items */N#define RMI$_RESERVEDEXT162 21489 /* Reserved EXE items */N#define RMI$_RESERVEDEXT163 21490 /* Reserved EXE items */N#define RMI$_RESERVEDEXT164 21491 /* Reserved EXE items */N#define RMI$_RESERVEDEXT165 21492 /* Reserved EXE items */N#define RMI$_RESERVEDEXT166 21493 " /* Reserved EXE items */N#define RMI$_RESERVEDEXT167 21494 /* Reserved EXE items */N#define RMI$_RESERVEDEXT168 21495 /* Reserved EXE items */N#define RMI$_RESERVEDEXT169 21496 /* Reserved EXE items */N#define RMI$_RESERVEDEXT170 21497 /* Reserved EXE items */N#define RMI$_RESERVEDEXT171 21498 /* Reserved EXE items */N#define RMI$_RESERVEDEXT172 21499 /* Reserved EXE item"s */N#define RMI$_RESERVEDEXT173 21500 /* Reserved EXE items */N#define RMI$_RESERVEDEXT174 21501 /* Reserved EXE items */N#define RMI$_RESERVEDEXT175 21502 /* Reserved EXE items */N#define RMI$_RESERVEDEXT176 21503 /* Reserved EXE items */N#define RMI$_RESERVEDEXT177 21504 /* Reserved EXE items */N#define RMI$_RESERVEDEXT178 21505 /* Reserved EXE items */N#defin"e RMI$_RESERVEDEXT179 21506 /* Reserved EXE items */N#define RMI$_RESERVEDEXT180 21507 /* Reserved EXE items */N#define RMI$_RESERVEDEXT181 21508 /* Reserved EXE items */N#define RMI$_RESERVEDEXT182 21509 /* Reserved EXE items */N#define RMI$_RESERVEDEXT183 21510 /* Reserved EXE items */N#define RMI$_RESERVEDEXT184 21511 /* Reserved EXE items */N#define RMI$_RESERVEDEXT185 2151"2 /* Reserved EXE items */N#define RMI$_RESERVEDEXT186 21513 /* Reserved EXE items */N#define RMI$_RESERVEDEXT187 21514 /* Reserved EXE items */N#define RMI$_RESERVEDEXT188 21515 /* Reserved EXE items */N#define RMI$_RESERVEDEXT189 21516 /* Reserved EXE items */N#define RMI$_RESERVEDEXT190 21517 /* Reserved EXE items */N#define RMI$_RESERVEDEXT191 21518 /* Reserved EXE it"ems */N#define RMI$_RESERVEDEXT192 21519 /* Reserved EXE items */N#define RMI$_RESERVEDEXT193 21520 /* Reserved EXE items */N#define RMI$_RESERVEDEXT194 21521 /* Reserved EXE items */N#define RMI$_RESERVEDEXT195 21522 /* Reserved EXE items */N#define RMI$_RESERVEDEXT196 21523 /* Reserved EXE items */N#define RMI$_RESERVEDEXT197 21524 /* Reserved EXE items */N#def"ine RMI$_RESERVEDEXT198 21525 /* Reserved EXE items */N#define RMI$_RESERVEDEXT199 21526 /* Reserved EXE items */N#define RMI$_RESERVEDEXT200 21527 /* Reserved EXE items */N#define RMI$_RESERVEDEXT201 21528 /* Reserved EXE items */N#define RMI$_RESERVEDEXT202 21529 /* Reserved EXE items */N#define RMI$_RESERVEDEXT203 21530 /* Reserved EXE items */N#define RMI$_RESERVEDEXT204 21"531 /* Reserved EXE items */N#define RMI$_RESERVEDEXT205 21532 /* Reserved EXE items */N#define RMI$_RESERVEDEXT206 21533 /* Reserved EXE items */N#define RMI$_RESERVEDEXT207 21534 /* Reserved EXE items */N#define RMI$_RESERVEDEXT208 21535 /* Reserved EXE items */N#define RMI$_RESERVEDEXT209 21536 /* Reserved EXE items */N#define RMI$_RESERVEDEXT210 21537 /* Reserved EXE "items */N#define RMI$_RESERVEDEXT211 21538 /* Reserved EXE items */N#define RMI$_RESERVEDEXT212 21539 /* Reserved EXE items */N#define RMI$_RESERVEDEXT213 21540 /* Reserved EXE items */N#define RMI$_RESERVEDEXT214 21541 /* Reserved EXE items */N#define RMI$_RESERVEDEXT215 21542 /* Reserved EXE items */N#define RMI$_RESERVEDEXT216 21543 /* Reserved EXE items */N#d"efine RMI$_RESERVEDEXT217 21544 /* Reserved EXE items */N#define RMI$_RESERVEDEXT218 21545 /* Reserved EXE items */N#define RMI$_RESERVEDEXT219 21546 /* Reserved EXE items */N#define RMI$_RESERVEDEXT220 21547 /* Reserved EXE items */N#define RMI$_RESERVEDEXT221 21548 /* Reserved EXE items */N#define RMI$_RESERVEDEXT222 21549 /* Reserved EXE items */N#define RMI$_RESERVEDEXT223 "21550 /* Reserved EXE items */N#define RMI$_RESERVEDEXT224 21551 /* Reserved EXE items */N#define RMI$_RESERVEDEXT225 21552 /* Reserved EXE items */N#define RMI$_RESERVEDEXT226 21553 /* Reserved EXE items */N#define RMI$_RESERVEDEXT227 21554 /* Reserved EXE items */N#define RMI$_RESERVEDEXT228 21555 /* Reserved EXE items */N#define RMI$_RESERVEDEXT229 21556 /* Reserved EX"E items */N#define RMI$_RESERVEDEXT230 21557 /* Reserved EXE items */N#define RMI$_RESERVEDEXT231 21558 /* Reserved EXE items */N#define RMI$_RESERVEDEXT232 21559 /* Reserved EXE items */N#define RMI$_RESERVEDEXT233 21560 /* Reserved EXE items */N#define RMI$_RESERVEDEXT234 21561 /* Reserved EXE items */N#define RMI$_RESERVEDEXT235 21562 /* Reserved EXE items */N"#define RMI$_RESERVEDEXT236 21563 /* Reserved EXE items */N#define RMI$_RESERVEDEXT237 21564 /* Reserved EXE items */N#define RMI$_RESERVEDEXT238 21565 /* Reserved EXE items */N#define RMI$_RESERVEDEXT239 21566 /* Reserved EXE items */N#define RMI$_RESERVEDEXT240 21567 /* Reserved EXE items */N#define RMI$_RESERVEDEXT241 21568 /* Reserved EXE items */N#define RMI$_RESERVEDEXT24"2 21569 /* Reserved EXE items */N#define RMI$_RESERVEDEXT243 21570 /* Reserved EXE items */N#define RMI$_RESERVEDEXT244 21571 /* Reserved EXE items */N#define RMI$_RESERVEDEXT245 21572 /* Reserved EXE items */N#define RMI$_RESERVEDEXT246 21573 /* Reserved EXE items */N#define RMI$_RESERVEDEXT247 21574 /* Reserved EXE items */N#define RMI$_RESERVEDEXT248 21575 /* Reserved "EXE items */N#define RMI$_RESERVEDEXT249 21576 /* Reserved EXE items */N#define RMI$_RESERVEDEXT250 21577 /* Reserved EXE items */N#define RMI$_RESERVEDEXT251 21578 /* Reserved EXE items */N#define RMI$_RESERVEDEXT252 21579 /* Reserved EXE items */N#define RMI$_RESERVEDEXT253 21580 /* Reserved EXE items */N#define RMI$_RESERVEDEXT254 21581 /* Reserved EXE items */"N#define RMI$_RESERVEDEXT255 21582 /* Reserved EXE items */N#define RMI$_RESERVEDEXT256 21583 /* Reserved EXE items */N#define RMI$_RESERVEDEXT257 21584 /* Reserved EXE items */N#define RMI$_RESERVEDEXT258 21585 /* Reserved EXE items */N#define RMI$_RESERVEDEXT259 21586 /* Reserved EXE items */N#define RMI$_RESERVEDEXT260 21587 /* Reserved EXE items */N#define RMI$_RESERVEDEXT"261 21588 /* Reserved EXE items */N#define RMI$_RESERVEDEXT262 21589 /* Reserved EXE items */N#define RMI$_RESERVEDEXT263 21590 /* Reserved EXE items */N#define RMI$_RESERVEDEXT264 21591 /* Reserved EXE items */N#define RMI$_RESERVEDEXT265 21592 /* Reserved EXE items */N#define RMI$_RESERVEDEXT266 21593 /* Reserved EXE items */N#define RMI$_RESERVEDEXT267 21594 /* Reserve"d EXE items */N#define RMI$_RESERVEDEXT268 21595 /* Reserved EXE items */N#define RMI$_RESERVEDEXT269 21596 /* Reserved EXE items */N#define RMI$_RESERVEDEXT270 21597 /* Reserved EXE items */N#define RMI$_RESERVEDEXT271 21598 /* Reserved EXE items */N#define RMI$_RESERVEDEXT272 21599 /* Reserved EXE items */N#define RMI$_RESERVEDEXT273 21600 /* Reserved EXE items "*/N#define RMI$_RESERVEDEXT274 21601 /* Reserved EXE items */N#define RMI$_RESERVEDEXT275 21602 /* Reserved EXE items */N#define RMI$_RESERVEDEXT276 21603 /* Reserved EXE items */N#define RMI$_RESERVEDEXT277 21604 /* Reserved EXE items */N#define RMI$_RESERVEDEXT278 21605 /* Reserved EXE items */N#define RMI$_RESERVEDEXT279 21606 /* Reserved EXE items */N#define RMI$_RESERVEDE"XT280 21607 /* Reserved EXE items */N#define RMI$_RESERVEDEXT281 21608 /* Reserved EXE items */N#define RMI$_RESERVEDEXT282 21609 /* Reserved EXE items */N#define RMI$_RESERVEDEXT283 21610 /* Reserved EXE items */N#define RMI$_RESERVEDEXT284 21611 /* Reserved EXE items */N#define RMI$_RESERVEDEXT285 21612 /* Reserved EXE items */N#define RMI$_RESERVEDEXT286 21613 /* Reser"ved EXE items */N#define RMI$_RESERVEDEXT287 21614 /* Reserved EXE items */N#define RMI$_RESERVEDEXT288 21615 /* Reserved EXE items */N#define RMI$_RESERVEDEXT289 21616 /* Reserved EXE items */N#define RMI$_RESERVEDEXT290 21617 /* Reserved EXE items */N#define RMI$_RESERVEDEXT291 21618 /* Reserved EXE items */N#define RMI$_RESERVEDEXT292 21619 /* Reserved EXE items " */N#define RMI$_RESERVEDEXT293 21620 /* Reserved EXE items */N#define RMI$_RESERVEDEXT294 21621 /* Reserved EXE items */N#define RMI$_RESERVEDEXT295 21622 /* Reserved EXE items */N#define RMI$_RESERVEDEXT296 21623 /* Reserved EXE items */N#define RMI$_RESERVEDEXT297 21624 /* Reserved EXE items */N#define RMI$_RESERVEDEXT298 21625 /* Reserved EXE items */N#define RMI$_RESERVE"DEXT299 21626 /* Reserved EXE items */N#define RMI$_RESERVEDEXT300 21627 /* Reserved EXE items */R#define RMI$_LASTEX2 21628 /* Last item in the exec writable table */N/* */O/* Add new data items specific to MONITOR (not collected by the RMI on a per */N/* item basis) above this point. */N/* " */#define RMI$_TABLESIZE 1148N/* */N/* End of MONITOR specific data items. */N/* */ #ifdef __NEW_STARLETNtypedef struct _rmi$scs_offsets { /* SCS class information */N __int64 rmi$q_scs_nodename; /* System node name */N int rm"i$l_scs_dgsent; /* Application datagrams sent */N int rmi$l_scs_dgrcvd; /* Application datagrams received */N int rmi$l_scs_dgdiscard; /* Application datagrams discarded */N int rmi$l_scs_msgsent; /* Application messages sent */N int rmi$l_scs_msgrcvd; /* Application messages received */N int rmi$l_scs_snddats; /* Block send datas initiated */N int rmi$l_scs_kbytsent; " /* Kbytes sent via send datas */N int rmi$l_scs_reqdats; /* Block request datas initiated */O int rmi$l_scs_kbytreqd; /* Kbytes received via request datas */O int rmi$l_scs_kbytmapd; /* Kbytes mapped for block transfers */U int rmi$l_scs_qcr_cnt; /* Times connection queued for send credit */[ int rmi$l_scs_qbdt_cnt; /* Times connection queued for buffer descriptor */ } RMI$SCS_OFFSETS;#else /*" __OLD_STARLET */Nstruct rmi$scs_offsets { /* SCS class information */N int rmi$q_scs_nodename [2]; /* System node name */N int rmi$l_scs_dgsent; /* Application datagrams sent */N int rmi$l_scs_dgrcvd; /* Application datagrams received */N int rmi$l_scs_dgdiscard; /* Application datagrams discarded */N int rmi$l_scs_msgsent; /* Application messages sent */N in"t rmi$l_scs_msgrcvd; /* Application messages received */N int rmi$l_scs_snddats; /* Block send datas initiated */N int rmi$l_scs_kbytsent; /* Kbytes sent via send datas */N int rmi$l_scs_reqdats; /* Block request datas initiated */O int rmi$l_scs_kbytreqd; /* Kbytes received via request datas */O int rmi$l_scs_kbytmapd; /* Kbytes mapped for block transfers */U int rmi$l_scs_qcr_cnt; " /* Times connection queued for send credit */[ int rmi$l_scs_qbdt_cnt; /* Times connection queued for buffer descriptor */ } ;%#endif /* #ifdef __NEW_STARLET */X#define RMI$C_SCS_MINSIZE 56 /* Size of one collection block for scs class */ #ifdef __NEW_STARLETNtypedef struct _rmi$disk_offsets { /* DISK class information for */N/* current revision level */N short int rmi$w_disk_a"lloclass; /* Allocation class */N int rmi$l_disk_devname; /* Device name */N short int rmi$w_disk_unitnum; /* Unit number */W char rmi$b_disk_flags; /* Flags byte (low bit indicates served disk */N __int64 rmi$q_disk_nodename; /* Nodename */N __int64 rmi$q_disk_volnamel; /* Volume name (low) */N int rmi$l_disk_volnameh; /* " Volume name (high) */N int rmi$l_disk_optcnt; /* Operation count */N int rmi$l_disk_qcount; /* Queue length accumulator */ } RMI$DISK_OFFSETS;#else /* __OLD_STARLET */Nstruct rmi$disk_offsets { /* DISK class information for */N/* current revision level */N short int rmi$w_disk_alloclass; /* Allocation class */N int rm"i$l_disk_devname; /* Device name */N short int rmi$w_disk_unitnum; /* Unit number */W char rmi$b_disk_flags; /* Flags byte (low bit indicates served disk */N int rmi$q_disk_nodename [2]; /* Nodename */N int rmi$q_disk_volnamel [2]; /* Volume name (low) */N int rmi$l_disk_volnameh; /* Volume name (high) */N int rmi$l_disk_optcnt; " /* Operation count */N int rmi$l_disk_qcount; /* Queue length accumulator */ } ;%#endif /* #ifdef __NEW_STARLET */N#define RMI$C_DISK_MINSIZE 37 /* Size of one block */ #ifdef __NEW_STARLETNtypedef struct _rmi$disk_offsets_rev4 { /* DISK class information */N/* for "revision level 4" */N char rmi$b_disk_alloclass_rev4; /* Allocation cl"ass */N int rmi$l_disk_devname_rev4; /* Device name */N short int rmi$w_disk_unitnum_rev4; /* Unit number */W char rmi$b_disk_flags_rev4; /* Flags byte (low bit indicates served disk */N __int64 rmi$q_disk_nodename_rev4; /* Nodename */N __int64 rmi$q_disk_volnamel_rev4; /* Volume name (low) */N int rmi$l_disk_volnameh_rev4; /* Volume name (high) " */N int rmi$l_disk_optcnt_rev4; /* Operation count */N int rmi$l_disk_qcount_rev4; /* Queue length accumulator */ } RMI$DISK_OFFSETS_REV4;#else /* __OLD_STARLET */Nstruct rmi$disk_offsets_rev4 { /* DISK class information */N/* for "revision level 4" */N char rmi$b_disk_alloclass_rev4; /* Allocation class */N int rmi$l_disk_devname_rev4; " /* Device name */N short int rmi$w_disk_unitnum_rev4; /* Unit number */W char rmi$b_disk_flags_rev4; /* Flags byte (low bit indicates served disk */N int rmi$q_disk_nodename_rev4 [2]; /* Nodename */N int rmi$q_disk_volnamel_rev4 [2]; /* Volume name (low) */N int rmi$l_disk_volnameh_rev4; /* Volume name (high) */N int rmi$l_disk_optcnt_rev4; /* Operation " count */N int rmi$l_disk_qcount_rev4; /* Queue length accumulator */ } ;%#endif /* #ifdef __NEW_STARLET */N#define RMI$C_DISK_MINSIZE_REV4 36 /* Size of one block */ #ifdef __NEW_STARLETNtypedef struct _rmi$proc_class { /* PROCESSES Class Data Block */N int rmi$l_proc_ipid; /* Internal PID */N int rmi$l_proc_uic; /* UIC (Member is low-order word) */N " short int rmi$w_proc_state; /* State value */N char rmi$b_proc_pri; /* Priority (negative value) */N int rmi$o_proc_lname [4]; /* Process name (counted string) */N int rmi$l_proc_gpgcnt; /* Global page count */N int rmi$l_proc_ppgcnt; /* Process page count */N int rmi$l_proc_sts; /* PCB Status Vector */N/* (PCB$V_RES bit clear =>" swapped out) */N int rmi$l_proc_diocnt; /* Direct I/O count */N int rmi$l_proc_pageflts; /* Page fault count */N int rmi$l_proc_cputim; /* Accumulated CPU time (in ticks) */N int rmi$l_proc_biocnt; /* Buffered I/O count */N int rmi$l_proc_epid; /* Extended PID */O int rmi$l_proc_efwm; /* Event flag "wait mask (for MWAITs) */N int rmi$l_proc_rbstran; /* Real balance slot transitions */N/* Size of process data block */ } RMI$PROC_CLASS;#else /* __OLD_STARLET */Nstruct rmi$proc_class { /* PROCESSES Class Data Block */N int rmi$l_proc_ipid; /* Internal PID */N int rmi$l_proc_uic; /* UIC (Member is low-order word) */N short int rmi$w_pr"oc_state; /* State value */N char rmi$b_proc_pri; /* Priority (negative value) */N int rmi$o_proc_lname [4]; /* Process name (counted string) */N int rmi$l_proc_gpgcnt; /* Global page count */N int rmi$l_proc_ppgcnt; /* Process page count */N int rmi$l_proc_sts; /* PCB Status Vector */N/* (PCB$V_RES bit clear => swapped out) " */N int rmi$l_proc_diocnt; /* Direct I/O count */N int rmi$l_proc_pageflts; /* Page fault count */N int rmi$l_proc_cputim; /* Accumulated CPU time (in ticks) */N int rmi$l_proc_biocnt; /* Buffered I/O count */N int rmi$l_proc_epid; /* Extended PID */O int rmi$l_proc_efwm; /* Event flag wait mask (for MWAIT "s) */N int rmi$l_proc_rbstran; /* Real balance slot transitions */N/* Size of process data block */ } ;%#endif /* #ifdef __NEW_STARLET */#define RMI$C_PROC_MINSIZE 67 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus " }#endif#pragma __standard #endif /* __RMIDEF_LOADED */ ww[C/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSDEF.SDI;1 *//********************************************************************************************************************************//*** M "ODULE $RMSDEF ***/#ifndef __RMSDEF_LOADED#define __RMSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 #ifd"ef __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 N/* */Q"/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:57:37.00 */N/* */H/* .TITLE RMSMSG -RMS COMPLETION CODES */O/* ************************************************************************* */O/* * * */O/* * COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION, 1976, 1977, 1978, 1979, * */O/* * 1980, 1981, 1982," 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, * */O/* * 1991,1992-1999 * */O/* * COMPAQ COMPUTER CORPORATION, 2000-2002 * */O/* * HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P., 2003-2005 * */O/* * ALL RIGHTS RESERVED. * */O/* * UNPUBLISHED RIGHTS RESERVED UNDER THE COPYRIGHT LAWS OF THE UNITED * */O/* * STATES. # * */O/* * * */O/* * THE SOFTWARE CONTAINED ON THIS MEDIA IS PROPRIETARY TO AND EMBODIES * */O/* * THE CONFIDENTIAL TECHNOLOGY OF DIGITAL EQUIPMENT CORPORATION. * */O/* * POSSESSION, USE, DUPLICATION OR DISSEMINATION OF THE SOFTWARE AND * */O/* * MEDIA IS AUTHORIZED ONLY PURSUANT TO A VALID WRITTEN LICENSE FROM * */O/* * DIGITAL EQUIPMENT CORPORATION. # * */O/* * * */O/* * RESTRICTED RIGHTS LEGEND USE, DUPLICATION, OR DISCLOSURE BY THE U.S. * */O/* * GOVERNMENT IS SUBJECT TO RESTRICTIONS AS SET FORTH IN SUBPARAGRAPH * */O/* * (C)(1)(II) OF DFARS 252.227-7013, OR IN FAR 52.227-19, AS APPLICABLE. * */O/* * * */O/* *************************************************************#************ */N/*++ */N/* FACILITY: RMS */N/* */N/* ABSTRACT: */N/* */I/* THIS MODULE DEFINES ALL RMS COMPLETION CODES. */N/* # */N/* ENVIRONMENT: */N/* */I/* THE MESSAGE TRANSLATOR MUST BE USED TO CONVERT RMSMSG.MSG INTO */I/* RMSMSG.SDL. THE SDL TRANSLATOR MUST THEN BE USED TO CONVERT */I/* RMSMSG.SDL INTO RMSMSG.MAR (AND RMSMSG.B32). */N/* # */K/* AUTHOR: LEO F. LAVERDURE, CREATION DATE: 10-DEC-1976 */N/* */N/* MODIFIED BY: */N/* */?/* X-18 ACG0724 ANDY GOLDSTEIN, 10-FEB-2009 11:27 */B/* ADD RMS$_IVSF MESSAGE FOR INVALID SYMLINKS */N/* # */8/* X-17 EMW0362 ELINOR M. WOODS 02-MAY-2005 */B/* ADD 2 NEW FATAL STATUSES RMS$_FOPEXTMBZ AND */B/* RMS$_INVOP_SSIO (WITHOUT STV) FOR SSIO SUPPORT. */N/* */6/* X-16 SAD STUART A. DAVIDSON 5-OCT-2004 */B/* ADD RMS$_ELOOP FOR SYMBOLIC LINK SUPPORT. ELOOP IS */B/* RETURNED IF MORE THAN A CERTAIN NUMBER OF SYMBOL #IC LINKS */B/* ARE TRAVERSED IN A SINGLE FILE LOOKUP. */N/* */8/* X-15 EMW0300 ELINOR M. WOODS 03-JAN-2003 */B/* KP THREADING CHANGE: ADD ONE NEW FATAL ERROR STATUS */B/* (RSESTK_ALLOC) WITH AN ASSOCIATED STV THAT WILL CONTAIN */B/* THE ACTUAL STATUS RETURNED BY EXE$KP_ALLOC_RSE_STACK_P2. */N/* */8#/* X-14 EMW0196 ELINOR M. WOODS 08-SEP-1999 */B/* BKT-LOCK ENHANCEMENTS: ADD ONE NEW FATAL ERROR */B/* STATUS (CRBUFOBJ) WITH AN ASSOCIATED STV. */N/* */8/* X-13 EMW0195 ELINOR M. WOODS 25-AUG-1999 */B/* BKT-LOCK ENHANCEMENTS: ADD TWO NEW FATAL ERROR */B/* STATUSES (BADGBD AND BADGBH). */N/* # */4/* X-12 WBF BURNS FISHER 18-SEP-1997 */B/* CHANGE NAMLESS AND NAMLRSS TO FATAL. ADD NAMLFSINV AND */B/* NAMLFSSIZ. */N/* */4/* X-11 WBF BURNS FISHER 18-JULY-1997 */B/* INTEGRATE THE ONE HFS CHANGE INTO MAINSTREAM, AND ADD NAML */B/* MESSAGE */N/*  # */0/* TAM0015 TERI A. MANSEAU 18-APR-1997 */;/* ADDED TWO NAML WARNING MESSAGES RMS$_NAMLESS */;/* AND RMS$NAMLRSS. */N/* */;/* X-10 EMW0132 ELINOR M. WOODS 11-APR-1997 */B/* ADD NEW RMS-INTERNAL ERROR STATUS RMS$_EOFASY_SYNCH. */B/* FOR INTERNAL USE ONLY; NEVER RETURNED TO U #SER. */N/* */:/* X-9 EMW0084 ELINOR M. WOODS 08-FEB-1996 */B/* PW INTEGRATION: REMOVE NEW ALTERNATE SUCCESS STATUS: */B/* RMS$_OK_URECEOF. ENDED UP NOT NEEDED. */N/* */@/* X-8 WDBPI1 WALTER D. BLASCHUK, JR. 19-DEC-1995 */B/* PATHWORKS INTEGRATION: ADD NEW ALTERNATE SUCCESS # */B/* STATUS: RMS$_OK_URECEOF . THIS SYMBOL SIGNIFIES THAT AN */B/* END-OF-FILE MARKER WAS ENCOUNTERED AND THERE WAS DATA */B/* IN THE BUFFER. THIS OCCURS WHEN THE LAST RECORD OF A */B/* SEQUENTIAL STREAM FILE DOES NOT HAVE A TERMINATING */B/* CHARACTER. THIS IS A SUCCESS STATUS AND DOES NOT HAVE */B/* A STV STATUS ASSOCIATED WITH IT. */N/*  # */N/* */=/* X-7 EMW ELINOR M. WOODS 10-AUG-1994 */B/* MERGE IN OPENVMS VAX DRAGON CHANGE: */N/* */9/* X-13 EMW0023 ELINOR M. WOODS 04-AUG-1994 */B/* RMS$_KRF CAN BE RETURNED BY $CONNECT OR $REWIND, AS */B/* WELL AS $GET/$FIND. MAKE  #TEXT ASSOCIATED WITH KRF */B/* STATUS MORE GENERIC BY REMOVING "for $GET/$FIND." */N/* */=/* X-6 EMW ELINOR M. WOODS 30-JUN-1994 */B/* MERGE IN OPENVMS VAX DRAGON CHANGE: */N/* */;/* X-12 EMW0026 ELINOR M. WOODS 15-JUN-1994 */B/* ADD ONE NEW USER-REPORTABLE STATUS: NXR # */B/* . THIS STATUS VALUE IS USED */B/* AS AN STV ASSOCIATED WITH RNF STATUS (STS), AND IS */B/* REPORTED FOR AN EXACT KEY MATCH OF A SECONDARY KEY */B/* IF THE SECONDARY KEY ENTRY POINTS TO A NONEXISTENT */B/* PRIMARY DATA RECORD IN DISK FILE. NOTE: RNF ERROR */B/* STATUS PRE-EXISTED AS ERROR CODE WITHOUT STV. */N/* #*/N/* DEE RYAN 30-SEP-1993 */N/* CORRECTED USE OF DIGITAL PRODUCT NAMES. */N/* */3/* X-5 EMW ELINOR M. WOODS 28-SEP-1993 */B/* MERGE IN OPENVMS VAX CORAL FIX: */N/* */:/* X-10 EMW0019 ELINOR M. WOODS 21-SEP-1993 */B#/* ADD ONE NEW USER-REPORTABLE ERROR STATUS (WITH AN */B/* ASSOCIATED STV): NETBTS. RELOCATE NEW IDXSEARCH STATUS */B/* (SEE X-9) FROM "ERROR with STV" SECTION TO "ERROR WITHOUT */B/* STV" section. Expand "WITH STV' AND "without STV" */B/* COMMENTS TO CLARIFY DIFFERENCE BETWEEN TWO. */N/* */7/* X-4 EMW0016 ELINOR M. WOODS 10-AUG-1993 */B/* MERGE IN CORAL FIX: # */N/* */B/* MODIFY SEVERITY OF TWO DTF ERROR CODES (DTFACC AND */B/* DTFCRE) FROM FATAL TO ERROR, AS REQUESTED BY SNA/DTF */5/* FACILITY. */N/* */B/* ALSO MOVE NEW IDXSEARCH STATUS FROM ERROR WITH NO */B/* STV GROUPING TO ERROR WITH STV GROUPING. # */N/* */7/* X-3 EMW0010 ELINOR M. WOODS 02-JUL-1993 */B/* TO SUPPORT NEW KEY-LESS-THAN FUNCTIONALITY, ADDITION */B/* OF ONE USER-REPORTABLE ERROR STATUS: IDXSEARCH, AND */B/* TWO NEW RMS-INTERNAL ERROR STATUSES: LSCAN AND */5/* ROOTSRCH. */N/* */5/* X-2# CW0019 CHRIS WHITAKER 11-NOV-1992 */B/* MERGE IN OPENVMS VAX V6.0 CHANGES */N/* */2/* X-8 JM0012 JOHN MUNZER 11-NOV-1992 */B/* CHANGE TEXT FOR RMS$_LNE. */N/* */2/* X-7 JM0006 JOHN MUNZER 17-APR-1992 */B/* ADD !XL PARAMETER TO RMS$_BUG TO REPORT R2. # */N/* */4/* X-1 RAB RICHARD A. BISHOP 24-JUN-1991 */B/* MOVED TO [STARLET] FACILITY */N/* */I/* ================================== */I/* OLD AUDIT TRAIL FOLLOWS: */N/* # */</* X-33 LSS0154 LEONARD S. SZUBOWICZ 4-APR-1990 */B/* ALTER TEXT AND FAO PARAMETERS OF RMS$_RUH AND RMS$_BUG */B/* CONDITION VALUES FOR RMS/DDTM SUPPORT. */N/* */4/* X-32 PJH PAUL J. HOULIHAN 17-JAN-1990 */B/* CHANGE TEXT FOR RMS$_INCOMPSHR ERROR MESSAGE. */N/* */</* X-3#1 LSS0130 LEONARD S. SZUBOWICZ 12-OCT-1989 */B/* MERGE OF RMS/DDTM GENERATION X-30D2. */D/* ADD GENERAL DDTM_ERR ERROR MESSAGE FOR DDTM SERVICE FAILURES; */C/* STV WILL CONTAIN THE FAILING SYSTEM SERVICE CONDITION VALUE. */N/* */</* X-30 LSS0080 LEONARD S. SZUBOWICZ 06-OCT-1988 */B/* ADD RMS$_OK_ACT MESSAGE FOR USE BY FUTURE WORK TO $DISPLAY. */B/* THIS IS PART OF LATENT SUPPO#RT FOR RMS/DDTM. */N/* */8/* X-29 GJA0080 GARY J. ALLISON 06-JUN-1988 */B/* CHANGE TEXT OF SEMANTICS MESSAGE. */N/* */8/* X-28 GJA0072 GARY J. ALLISON 02-MAR-1988 */B/* ADD EXT_ERR, OPNOTSUP, EXTNOTFOU, AND SEMANTICS MESSAGES. */N/* # */7/* X-27 PMV0072 PETER M. VATNE 08-OCT-1987 */B/* CHANGE RMS$_NOJNLLIC TO RMS$_JNLNOTAUTH. */N/* */=/* X-26 LSS0057 LEONARD S. SZUBOWICZ 15-SEP-1987 */C/* CHANGE TEXT FOR THE RMS$_OK_DUP STATUS SUCH THAT THE MESSAGE */B/* IS APPLICABLE TO $GET AS WELL AS $PUT. */N/* #*/7/* X-25 PMV0068 PETER M. VATNE 11-SEP-1987 */B/* ADD RMS$_NOJNLLIC, NO RMS JOURNALING LICENSE, FOR LMF. */N/* */9/* X-24 RNM0026 RUSSELL N. MURRAY 15-AUG-1987 */B/* ADD RMS$_SYNCH MESSAGE FOR NOTIFICATION OF SYNCHRONOUS */B/* COMPLETION. */N/* */8/* X-23 JEJ0479 JAM#ES E JOHNSON 13-AUG-1987 */B/* ADD RMS$_IVATRACE MESSAGE. */N/* */7/* X-22 PMV0061 PETER M. VATNE 03-AUG-1987 */F/* CHANGE RESERVED MESSAGE RMS$_BUG_XX5 TO RMS$_BUG_RU_COMMIT_FAIL */B/* TO CORRESPOND TO POSITIVE RMS BUGCHECK FTL$_RU_COMMIT_FAIL. */N/* */=/* X-21 LSS0042 LEONARD S. SZUBOWICZ 13- #MAY-1987 */E/* CHANGE RESERVED MESSAGE RMS$_BUG_XX4 TO RMS$_BUG_RU_ABORT_FAIL */B/* TO CORRESPOND TO POSITIVE RMS BUGCHECK FTL$_RU_ABORT_FAIL */I/* */:/* X-20 SAD0034 STUART A. DAVIDSON 12-MAR-1987 */B/* DROP QUOTES FROM SNADTF MESSAGE TEXT. */N/* */4/* X-19 PJH PAUL J. HOULIHAN 19-JAN-1987 */B/* ME#RGE IN 17J1. */N/* *///* X-17J1 PJH PAUL J. HOULIHAN 15-JAN-1987 */;/* FIX SEVERAL SMALL JNL PROBLEMS. */;/* ADD RMS$_BUG_FLUSH_JNL_FAILED CODE. */N/* */9/* X-18 KPS0148 KENNETH P. SIEGEL 04-DEC-1986 */B/* ADDED SNPPF (STATISTICS MONITORING NOT SUPPORT#ED FOR */B/* PROCESS PERMANENT FILES) ERROR MESSAGE. */N/* */7/* X-17 PMV0025 PETER M. VATNE 24-NOV-1986 */B/* ADD NEW MESSAGE, RMS$_NOTSAMEJNL. THIS STATUS IS */B/* USED TO RESTRICT AI/BI WITH RU JOURNALING TO A */B/* SINGLE LONG-TERM JOURNAL FILE. */N/* */#4/* X-16 DAS DAVID A. SOLOMON 18-NOV-1986 */E/* ADD NEW MESSAGE, RMS$_DELJNS. REMOVE RMS$_XCR (BY REPLACING IT */B/* WITH A PLACEHOLDER), AS JOURNALING BITS ARE NO LONGER */B/* SPECIFIED IN THE $XABJNL. SLIGHT WORDING CHANGE ON DETACHED */B/* RU RECOVERY ERROR MESSAGES. */N/* */4/* X-15 DAS DAVID A. SOLOMON 12-NOV-1986 */B/* FIX ERROR IN X-5/X-6: JOURNALING VAR#IANT NOT MERGED */B/* CORRECTLY, RESULTING IN SEVERAL JOURNALING MESSAGES NUMBERS */B/* BEING DIFFERENT IN THE MAININE THAN WHAT THEY WERE ON THE */C/* JOURNALING VARIANT. ALSO, MOVE NEW SNADTF MESSAGES TO RE-USE */B/* AVAILABLE UNUSED MESSAGE NUMBERS, INSTEAD OF GENERATING NEW */B/* ONES. FINALLY, CHANGE RMS$_BUG_ABORT TO RMS$_BUG_RU_ACTIVE. */N/* */:/* X-14 SAD0014 STUART A. DAVIDSON 4-NOV-1986 #*/B/* SNADTF - FIX TYPO IN DTFACC, DTFCRE */N/* */:/* X-13 SAD0014 STUART A. DAVIDSON 3-NOV-1986 */B/* SNADTF - FIX TYPO, ADD 2 ADDITIONAL MESSAGES. */N/* */8/* X-12 JEJ0377 JAMES E JOHNSON 29-OCT-1986 */B/* ADD NOEXTEND ERROR CODE TO FLAG FAILED RELATIVE FILE */B/* EXTENDS DUE TO P!#REVIOUS FAILURES. */N/* */9/* X-11 KPS0131 KENNETH P. SIEGEL 25-OCT-1986 */B/* ADDED SNS ERROR CODE FOR STATISTICS NOT SUPPORT ON */B/* NON-DISK DEVICES. */N/* */9/* X-10 SAD009 STUART A. DAVIDSON 06-OCT-1986 */B/* ADD COMPLETION CODES FOR SNADTF (IBM D "#ATA XFER) */N/* */7/* X-9 GJA0003 GARY J. ALLISON 29-SEP-1986 */B/* ADD DETACHED RECOVERY ERROR MESSAGES */N/* */6/* X-8 PMV0008 PETER M. VATNE 24-SEP-1986 */B/* MODIFY RMS$_ACC_AIJ, RMS$_ACC_BIJ, AND RMS$_ACC_ATJ */B/* TO ALSO OUTPUT THE STV. */N/*## */2/* X-7 JWT0243 JIM TEAGUE 2-SEP-1986 */B/* ADD NEW ERRORS FOR COLLATED KEYS. */N/* */3/* X-6 GJA GARY J. ALLISON 29-JUL-1986 */B/* REMOVE DUPS FROM JNL MERGE. */N/* */3/* X-5 GJA GARY J. ALLISO $#N 29-JUL-1986 */B/* MERGE JOURNALING INTO MAINLINE */N/* */./* X-3J6 DAS DAVID A. SOLOMON 14-APR-1986 */C/* REMOVE RMS$_RUH_FILE (USING A GENERAL RUF MESSAGE INSTEAD). */</* CHANGE RMS$_RUH TEXT TO NOT HAVE FAO PARAMETERS. ADD */;/* RMS$_BUG_RURECERR. */I/* */2/* X-3J5 JE %#J0302 JAMES E JOHNSON 4-APR-1986 */;/* ADD RMS$_RRF (ERROR DURING RU RECOVERY) AND */F/* RMS$_RUH/RMS$_RUH_FILE (USED TO FORM TEXT OF RU HANDLER ERRORS */;/* SENT TO OPCOM). */I/* */2/* X-3J4 JEJ0272 JAMES E JOHNSON 11-FEB-1986 */;/* ADD RMS$_RUF, RMS$_BUG_ABORT CODES. */I/* */2/* &#X-3J3 JEJ0237 JAMES E JOHNSON 16-DEC-1985 */;/* ADD RMS$_RUNDOWN CODE */I/* */2/* X-3J2 JEJ0205 JAMES E JOHNSON 25-OCT-1985 */>/* ADD JOURNAL SPECIFIC WRTJNL_XXJ ERROR CODES TO REPLACE */;/* THE GENERIC ERRWRTJNL CODE. */N/* */7/* X-4 JEJ0216 JAMES E JOHNSON 18-NOV-1985 */B/* '#MERGE X-3J2 INTO MAIN LINE FOR V4.4. */N/* */2/* X-3J2 JEJ0205 JAMES E JOHNSON 25-OCT-1985 */>/* ADD JOURNAL SPECIFIC WRTJNL_XXJ ERROR CODES TO REPLACE */;/* THE GENERIC ERRWRTJNL CODE. */N/* */7/* X-3 JEJ0161 JAMES E JOHNSON 9-SEP-1985 */B/* UPDATE RMS JOURNALING MESSAGES. (# */N/* */2/* X-2 JWT0212 JIM TEAGUE 4-SEP-1985 */B/* ADD (WHAT IS FOR NOW) AN INTERNAL STATUS CODE TO */B/* DIFFERENTIATE BETWEEN FINDING A DELETED RECORD (DEL) */B/* AND FINDING IT BUT WITH A DIFFERENT KEY (KEY_MISMATCH). */B/* */8/* V03-024 RAS0314 RON SCHAEFER 21-JUN-1984 */B/* WORK OVER THE MESS)#AGES ONE MORE TIME: FIX TYPO IN OK_RNF, */B/* DELETE ACPEOF ERROR, DELETE WSF ERROR. */N/* */8/* V03-023 RAS0282 RON SCHAEFER 28-MAR-1984 */B/* MINOR TEXT CHANGES AND COMMENTS ADDED. */B/* DELETE RMS$_COP ERROR. */N/* */9/* V03-022 DAS0005 DAVID SOLOMON 19-*#MAR-1984 */B/* REMOVE RMS$_ECHO (NO LONGER NEEDED AS A RESULT OF NEW */B/* IMPLEMENTATION FOR ECHO SYS$INPUT -> SYS$OUTPUT). */N/* */6/* V03-021 JWT0150 JIM TEAGUE 01-FEB-1984 */B/* ADD RMS$_IFF FOR TRYING TO WRITE-ACCESS A FILE ON */B/* MAGTAPE THAT HAS NON-0 VALUE FOR ANSI BUFFER OFFSET. */N/* +#*/8/* V03-020 RAS0233 RON SCHAEFER 9-JAN-1984 */B/* ADD RMS$_NOVALPRS ERROR FOR $SEARCH NOT PRECEDED BY */B/* VALID $PARSE. */N/* */6/* V03-019 JWT0148 JIM TEAGUE 20-DEC-1983 */B/* ADD A JNL XAB ERROR FOR CONFLICTING RU ATTRIBUTES */B/* ON $CREATE: RMS$_XCR. */N/* ,# */8/* V03-018 RAS0171 RON SCHAEFER 28-JUL-1983 */B/* ADD RMS$_BUSY; A STRUCTURE-LESS ERROR (R0-ONLY STATUS) */B/* REPLACING TEMP3. */N/* */9/* V03-017 DAS0004 DAVID SOLOMON 28-JUN-1983 */B/* ADD RMS$_FILEPURGED; ADD RMS$_ACPEOF FOR ZALEWSKI. */N/* -# */</* V03-016 KPL0007 PETER LIEBERWIRTH 8-JUN-1983 */B/* FIX SPELLING IN JNL ERROR MESSAGES, ADD CJF ERROR WHICH */B/* WILL SOON SUBSUME COP AND CQE. */N/* */9/* V03-015 DAS0003 DAVID SOLOMON 18-FEB-1983 */B/* ADD XNF (REPLACING TEMP9), TMR (NEW), LWC (NEW). */N/* */<.#/* V03-014 KBT0497 KEITH B. THOMPSON 18-FEB-1983 */B/* ADD INCOMPSHR ERROR (REUSE OF TEMP1 SLOT) */N/* */8/* V03-013 RAS0120 RON SCHAEFER 2-FEB-1983 */B/* ADD ECHO PSEUDO-STATUS TO SUPPORT ECHO OF SYS$INPUT */B/* TO SYS$OUTPUT. */N/* */:/* V03-012 JWH0174 JE/#FFRY W. HORN 24-JAN-1983 */B/* ADD CQE AND COP ERRORS. */N/* */</* V03-011 KPL0006 PETER LIEBERWIRTH 7-JAN-1983 */B/* ADD OK_RULK FOR RECOVERY UNIT SUPPORT. */N/* */B/* ADD REENT ERROR FOR $RENAME. */B/* 0# */;/* V03-009 JWH0153 JEFFREY W. HORN 8-DEC-1982 */B/* ADD NRU ERROR. */N/* */;/* V03-008 JWH0152 JEFFREY W. HORN 8-DEC-1982 */B/* ADD JNS ERROR. */N/* */</* V03-007 MCN0002 MARIA DEL C. NASR 15-NOV-1982 */1#B/* REPLACE ORD ERROR CODE ELIMINATED BY MCN0001, SINCE */B/* THE NETWORK CODE REFERENCES IT. */N/* */</* V03-006 MCN0001 MARIA DEL C. NASR 26-OCT-1982 */B/* PRINT KEY OF REFERENCE OR AREA IDENTIFICATION NUMBER */B/* INSTEAD OF XAB ADDRESS FOR ERRORS RETURNED DURING */B/* INDEXED FILE CREATION. ALSO RENAME ALL UNUSED ERROR */B/* CODES TO TEMP. 2# */N/* */;/* V03-005 JWH0102 JEFFREY W. HORN 24-SEP-1982 */B/* ADD RUP ERROR. */N/* */8/* V03-004 RAS0095 RON SCHAEFER 7-SEP-1982 */B/* ADD OVRDSKQUOTA ERROR. */N/* 3# */;/* V03-002 JWH0002 JEFFREY W. HORN 26-JUL-1982 */B/* CONVERT TO .MSG FORMAT. ADD RUM ERROR. */N/* */;/* V03-001 JWH0001 JEFFREY W. HORN 20-JUL-1982 */B/* ADD JNF, JOP, AND NOJ ERRORS. */N/* */</* V02-042 KPL0005 PETER LIEBERWIRTH 4-FEB-1982 4# */B/* ADD ERROR MESSAGES RMS$_EXENQLM AND RMS$_DEADLOCK */B/* CORRECTLY. */N/* */>/* V02-041 CDS0001 C D SAETHER 24-JAN-1982 */B/* ADD GBC AND CRMP ERRORS. */N/* */=/* V02-040 JAK0069 J A KRYCKA 15-JAN-1982 */B/*5# ADD SUPPORT AND NETFAIL ERROR CODES. */N/* */=/* V02-039 JAK0068 J A KRYCKA 31-DEC-1981 */B/* MODIFY TEXT FOR SUP, NET, BUG_DAP, AND ENV ERROR MESSAGES. */N/* */B/* V02-038 LJA0001 LAURIE ANDERSON 20-DEC-1981 */B/* MODIFIED SOME MESSAGES TO READ BETTER. */N/* 6# */=/* V02-037 JAK0063 J A KRYCKA 31-AUG-1981 */B/* ADD CRE_STM SUCCESS CODE. */N/* */</* V02-036 KPL0004 PETER LIEBERWIRTH 13-JAN-1981 */C/* ADD ENQ SEVERE ERROR MESSAGE, TO INDICATE $ENQ/$DEQ FAILURE. */B/* ALSO ADD SUCCESS CODES OK_RRL, AND OK_WAT. */N/* 7# */=/* V02-035 REFORMAT J A KRYCKA 30-JUL-1980 */N/* */N/*-- */#define RMS$_FACILITY 1N#define RMS$V_STVSTATUS 14 /* MOVE TO BIT 14 OF THE */N/* STATUS CODE IT INDICATES */N/* THAT STV CONTAINS A SECONDARY 8# */N/* STATUS CODE. */#define RMS$_SUC 65537#define RMS$_NORMAL 65537N/*+ */N/* */I/* SUCCESS CODES */N/* */N/*- 9# */N/* BIT 16 = BIT 15 = 1 */#define RMS$_STALL 98305N/* (NOTE: USER NEVER RECEIVES THIS CODE) */#define RMS$_PENDING 98313#define RMS$_OK_DUP 98321#define RMS$_OK_IDX 98329N/* (RECORD HAS BEEN INSERTED, BUT INDEX STRUCTURE IS NO LONGER */N/* OPTIMAL.) */#define RMS$_OK_:#RLK 98337N/* (BECAUSE LOCKER SET RLK IN ROP FIELD WHEN RECORD WAS LOCKED.) */#define RMS$_OK_RRL 98345N/* (BECAUSE READER SET RRL IN ROP FIELD WHEN ACCESSING RECORD.) */N/* (THIS CODE USED TO BE OK_RRV) */G/*OK_RRV ;MSG */N/* (BUT IT MAY NOT BE ACCESSIBLE VIA ONE-OR-MORE SECONDARY KEYS, */N/* AND NOT BY RFA ADDRESSING. FILE RE-ORGANIZATION RECOMMENDED!) ;# */#define RMS$_KFF 98353#define RMS$_OK_ALK 98361#define RMS$_OK_DEL 98369#define RMS$_OK_RNF 98377#define RMS$_OK_LIM 98385#define RMS$_OK_NOP 98393#define RMS$_OK_WAT 98401N/* (BECAUSE WAT BIT IN ROP WAS SET AND RECORD WAS ALREADY */N/* LOCKED.) */#define RMS$_CRE_STM 98409#define RMS$_OK_RULK 98417#define RMS$_SYNCH 98425#define RMS$_OK_ACT 98433#define RMS$_OK_NOCURTID 98441N/*+ <# */N/* */B/* SUCCESS CODES PASSED THRU FROM DRIVERS AND ACP - BIT 15 = 0 */N/* */N/*- */P#define RMS$_CONTROLC 67153 /* TERMINAL I/O ABORTED DUE TO CTRL/C */#define RMS$_CONTROLO 67081N/* TERMINA =#L I/O ABORTED DUE TO CTRL/O */#define RMS$_CONTROLY 67089N/* TERMINAL I/O ABORTED DUE TO CTRL/Y */#define RMS$_CREATED 67097N/* FILE WAS CREATED, NOT OPENED */#define RMS$_SUPERSEDE 67121N/* CREATED FILE SUPERSEDED EXISTING VERSION */#define RMS$_OVRDSKQUOTA 67177N/* DISK USAGE EXCEEDS DISK QUOTA >#*/#define RMS$_FILEPURGED 67193N/* CREATE FILE CAUSED OLDEST FILE */N/* VERSION TO BE PURGED */N/*+ */N/* */I/* WARNING CODES */N/* ?# */N/*- */N/* BIT 16 = BIT 15 = 1, BIT 14 = 0 */#define RMS$_BOF 98712#define RMS$_RNL 98720#define RMS$_RTB 98728#define RMS$_TMO 98736#define RMS$_TNS 98744#define RMS$_BES 98752#define RMS$_PES 98760N/*+ */N/* */K/* ERROR COD @#ES - WITHOUT STV (THAT IS, STV MAY BE USED BUT NO ASSOCIATED */B/* CONDITION CODE IS IN STV) */N/* */N/*- */N/* BIT 16 = BIT 15 = 1, BIT 14 = 0 */#define RMS$_ACT 98906#define RMS$_DEL 98914#define RMS$_INCOMPSHR 98922#define RMS$_DNR 98930#define RMS$_EOF 98938#definA#e RMS$_FEX 98946#define RMS$_FLK 98954#define RMS$_FNF 98962#define RMS$_PRV 98970#define RMS$_REX 98978#define RMS$_RLK 98986#define RMS$_RNF 98994N/* (RECORD NEVER WAS IN FILE, OR HAS BEEN DELETED.) */#define RMS$_WLK 99002#define RMS$_EXP 99010#define RMS$_NMF 99018#define RMS$_SUP 99026N/* (NOTE THAT SUPPORT HAS REPLACED SUP EXCEPT WHEN RMS CANNOT */N/* MAP THE DAP STATUS CODE INTO A FAL STATUS CODE.) */N/* (NOTEB# ALSO THAT SUP SHOULD HAVE BEEN DEFINED AS A SEVERE */N/* ERROR CODE. HOWEVER, SUPPORT IS A SEVERE ERROR CODE.) */#define RMS$_RSA 99034#define RMS$_CRC 99042#define RMS$_WCC 99050#define RMS$_IDR 99058#define RMS$_LWC 99066#define RMS$_UNUSED1 99074#define RMS$_NOVALPRS 99082#define RMS$_KEY_MISMATCH 99090#define RMS$_RUH 99098#define RMS$_JND 99106#define RMS$_BADPHASE 99114#define RMS$_TOWDR 99122#define RMS$_NEXDR 99130#define RMS$C#_INVDRMSG 99138#define RMS$_RU_ACTIVE 99146#define RMS$_UNKRUFAC 99154#define RMS$_LIMBO 99162#define RMS$_IVATRACE 99170#define RMS$_OPNOTSUP 99178#define RMS$_EXTNOTFOU 99186#define RMS$_EXT_ERR 99194#define RMS$_SEMANTICS 99202#define RMS$_LSCAN 99210#define RMS$_ROOTSRCH 99218#define RMS$_IDXSEARCH 99226#define RMS$_NETBTS 99234#define RMS$_NXR 99242N/* IF EXACT KEY MATCH ON SECONDARY KEY AND SECONDARY KEY */N/* ENTRY POINTS TO NONEXISTENT PRIMAD#RY DATA RECORD IN */N/* DISK FILE. */#define RMS$_EOFASY_SYNCH 99250#define RMS$_ELOOP 99258N/*+ */N/* */\/* ERROR CODES - WITH STV ERROR CODE (THAT IS, STV CONTAINS AN ASSOCIATED CONDITION CODE) */N/* E# */N/*- */N/* BIT 16 = BIT 15 = BIT 14 = 1 */#define RMS$_ACC 114690#define RMS$_CRE 114698#define RMS$_DAC 114706#define RMS$_ENT 114714#define RMS$_EXT 114722#define RMS$_FND 114730#define RMS$_MKD 114738#define RMS$_DPE 114746#define RMS$_SPL 114754#define RMS$_DNF 114762#define RMS$_RUF 114770#define RMS$_WRTJNL_AIJ 114778#define RMS$_WRT F#JNL_BIJ 114786#define RMS$_WRTJNL_ATJ 114794#define RMS$_WRTJNL_RUJ 114802#define RMS$_RRF 114810#define RMS$_DDTM_ERR 114818N/*+ */N/* */R/* SEVERE ERROR CODES - WITHOUT STV (THAT IS, STV MAY BE USED BUT NO ASSOCIATED */;/* CONDITION CODE IS IN STV) */N/* G# */N/*- */N/* BIT 16 = BIT 15 = 1, BIT 14 = 0 */#define RMS$_DTFCDDREC 99308#define RMS$_AID 99316#define RMS$_ALN 99324#define RMS$_ALQ 99332#define RMS$_ANI 99340#define RMS$_AOP 99348#define RMS$_BKS 99356#define RMS$_BKZ 99364#define RMS$_BLN 99372#define RMS$_BUG 99380#define RMS$_BUG_DDI 99388#define RMS$_BUG_DAP 99396 #define RMS$_BUG_RU_ACTIVE 9H#9404#define RMS$_BUG_RURECERR 99412'#define RMS$_BUG_FLUSH_JNL_FAILED 99420$#define RMS$_BUG_RU_ABORT_FAIL 99428%#define RMS$_BUG_RU_COMMIT_FAIL 99436#define RMS$_BUG_XX6 99444#define RMS$_BUG_XX7 99452#define RMS$_BUG_XX8 99460#define RMS$_BUSY 99468#define RMS$_CCR 99476#define RMS$_CHG 99484#define RMS$_CHK 99492#define RMS$_COD 99500#define RMS$_CUR 99508#define RMS$_DAN 99516#define RMS$_DEV 99524#define RMS$_DIR 99532#define RMS$_DME 99540#define RMS$_DNA 995I#48#define RMS$_DTP 99556#define RMS$_DUP 99564#define RMS$_DVI 99572#define RMS$_ESA 99580#define RMS$_ESS 99588#define RMS$_FAB 99596#define RMS$_FAC 99604#define RMS$_FLG 99612#define RMS$_FNA 99620#define RMS$_FNM 99628#define RMS$_FSZ 99636#define RMS$_FOP 99644#define RMS$_FUL 99652#define RMS$_IAL 99660#define RMS$_IAN 99668#define RMS$_IDX 99676#define RMS$_IFI 99684#define RMS$_IMX 99692#define RMS$_IOP 99700#define RMS$_IRC 99708#define RMS$_ISI 99716J##define RMS$_KBF 99724#define RMS$_KEY 99732#define RMS$_KRF 99740#define RMS$_KSZ 99748#define RMS$_LAN 99756#define RMS$_RUNDOWN 99764#define RMS$_LNE 99772#define RMS$_DTFCVT 99780#define RMS$_MRN 99788#define RMS$_MRS 99796#define RMS$_NAM 99804#define RMS$_NEF 99812#define RMS$_DTFQUASYN 99820#define RMS$_NOD 99828#define RMS$_NPK 99836N#define RMS$_ORD 99844 /*! NOT USED AS OF V4 */#define RMS$_ORG 99852#define RMS$_PBF 99860#dK#efine RMS$_PLG 99868#define RMS$_POS 99876#define RMS$_DTFQUAVAL 99884#define RMS$_QUO 99892#define RMS$_RAB 99900#define RMS$_RAC 99908#define RMS$_RAT 99916#define RMS$_RBF 99924#define RMS$_RFA 99932#define RMS$_RFM 99940#define RMS$_RHB 99948#define RMS$_RLF 99956#define RMS$_ROP 99964#define RMS$_RRV 99972#define RMS$_RVU 99980#define RMS$_RSS 99988#define RMS$_RST 99996#define RMS$_RSZ 100004#define RMS$_SEQ 100012#define RMS$_SHR 100020#define RMS$_SIZL# 100028#define RMS$_SQO 100036#define RMS$_DTFSESEST 100044#define RMS$_SYN 100052#define RMS$_TRE 100060#define RMS$_TYP 100068#define RMS$_UBF 100076#define RMS$_USZ 100084#define RMS$_VER 100092#define RMS$_XNF 100100#define RMS$_XAB 100108#define RMS$_ESL 100116#define RMS$_DTFSESTER 100124#define RMS$_ENV 100132#define RMS$_PLV 100140#define RMS$_MBC 100148#define RMS$_RSL 100156#define RMS$_WLD 100164h#define RMS$_NET 100172 /* M# (NOTE THAT NETFAIL HAS REPLACED NET EXCEPT WHEN RMS CANNOT */N/* MAP THE DAP STATUS CODE INTO A FAL STATUS CODE.) */#define RMS$_IBF 100180#define RMS$_REF 100188#define RMS$_IFL 100196#define RMS$_DFL 100204#define RMS$_KNM 100212#define RMS$_IBK 100220#define RMS$_KSI 100228#define RMS$_LEX 100236#define RMS$_SEG 100244N#define RMS$_SNE 100252 /*! NOT USED AS OF V4 */N#define RMS$_SPE 100260 /*! NOT N#USED AS OF V4 */#define RMS$_UPI 100268#define RMS$_ACS 100276#define RMS$_STR 100284#define RMS$_FTM 100292#define RMS$_GBC 100300#define RMS$_DEADLOCK 100308#define RMS$_EXENQLM 100316#define RMS$_JOP 100324#define RMS$_RUM 100332#define RMS$_JNS 100340#define RMS$_NRU 100348#define RMS$_IFF 100356#define RMS$_DTFTRATBL 100364#define RMS$_DTFUNSTYP 100372#define RMS$_DTFVERMIS 100380N/*+ O# */N/* */I/* ERROR CODES - WITHOUT STV */N/* */J/* DTFACC AND DTFCRE WERE ORIGINALLY INCLUDED IN THIS FATAL SEVERITY */I/* (NO STV) GROUPING. IN ORDER TO CHANGE THEIR SEVERITY TO ERROR */I/* (NO STV) AND RETAIN THE SAME MESSAGE CODE VALUE, THE FOLLOWING */I/* SHIFTS IN SEVERP#ITY FROM FATAL TO ERROR AND THEN BACK AGAIN ARE */J/* DONE, WHILE RETAINING THE SAME ORIGINAL BASE ASSOCIATED WITH EACH. */N/* */N/*- */N/* BIT 16 = BIT 15 = 1, BIT 14 = 0 */#define RMS$_DTFACC 100386N/*+ */N/* Q# */I/* SEVERE ERROR CODES - WITHOUT STV */N/* */N/*- */N/* BIT 16 = BIT 15 = 1, BIT 14 = 0 */#define RMS$_BOGUSCOL 100396#define RMS$_ERRREADCOL 100404#define RMS$_ERRWRITECOL 100412#define RMS$_SNS 100420N#define RMS$_NR#OEXTEND 100428 /*+ */N/* */I/* ERROR CODES - WITHOUT STV */N/* */N/*- */N/* BIT 16 = BIT 15 = 1, BIT 14 = 0 */#define RMS$_DTFCRE 100434N/*+ S# */N/* */I/* SEVERE ERROR CODES - WITHOUT STV */N/* */N/*- */N/* BIT 16 = BIT 15 = 1, BIT 14 = 0 */#define RMS$_DELJNS 100444#define RMS$_NOTSAT#MEJNL 100452#define RMS$_SNPPF 100460#define RMS$_NAML 100468#define RMS$_NAMLESS 100476#define RMS$_NAMLRSS 100484#define RMS$_NAMLFSSIZ 100492#define RMS$_NAMLFSINV 100500#define RMS$_BADGBH 100508#define RMS$_BADGBD 100516#define RMS$_FOPEXTMBZ 100524#define RMS$_INVOP_SSIO 100532#define RMS$_IVSF 100540N/*+ */N/* */^/* SEVER U#E ERRORS - WITH STV ERROR CODE (THAT IS, STV CONTAINS AN ASSOCIATED CONDITION CODE) */N/* */N/*- */N/* BIT 16 = BIT 15 = BIT 14 = 1 */#define RMS$_ATR 114892#define RMS$_ATW 114900#define RMS$_CCF 114908#define RMS$_CDA 114916#define RMS$_CHN 114924#define RMS$_RER 114932#define RMS$_RMV 11494V#0#define RMS$_RPL 114948#define RMS$_SYS 114956#define RMS$_WER 114964#define RMS$_WPL 114972#define RMS$_IFA 114980#define RMS$_WBE 114988#define RMS$_ENQ 114996#define RMS$_NETFAIL 115004#define RMS$_SUPPORT 115012#define RMS$_CRMP 115020#define RMS$_DTFCFGFIL 115028#define RMS$_REENT 115036#define RMS$_ACC_RUJ 115044#define RMS$_TMR 115052#define RMS$_ACC_AIJ 115060#define RMS$_ACC_BIJ 115068#define RMS$_ACC_ATJ 115076#define RMS$_DTFDEFFIL 11508W#4#define RMS$_DTFREGFIL 115092#define RMS$_JNLNOTAUTH 115100#define RMS$_CRBUFOBJ 115108 #define RMS$_RSESTK_ALLOC 115116 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __RMSDEF_LOADED */ wwD/********************* X#***********************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $RNHBLKDEF ***/#ifndef __RNHBLKDEF_LOADED#define __RNHBLKDEF_LOADED 1 G#pragma __nostandard /* TY#his file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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#dZ#efine __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 N#define RNHBLK$K_LENGTH 20 /*length of overhead */N#define RNHBLK$C_LENGTH 20 /*length of overhead */ #ifdef __NEW_STARLET [#typedef struct _rnhblkdef {N unsigned int rnhblk$l_flnk; /*forward link */N unsigned int rnhblk$l_handler; /*handler address */N int rnhblk$l_fill_1; /*reserved */N unsigned int rnhblk$l_argcnt; /*argument count */N unsigned int rnhblk$l_event; /*address of the event code */ } RNHBLKDEF;#else /* __OLD_STARLET */struct rnhblkdef {N un \#signed int rnhblk$l_flnk; /*forward link */N unsigned int rnhblk$l_handler; /*handler address */N int rnhblk$l_fill_1; /*reserved */N unsigned int rnhblk$l_argcnt; /*argument count */N unsigned int rnhblk$l_event; /*address of the event code */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POI]#NTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __RNHBLKDEF_LOADED */ wwD/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-A ^#PR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $RSDMDEF ***/#ifndef __RSDMDEF_LOADED#define __RSDMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N#define RSDM$_JOIN_SYSTEM 1 /* System RD Join function */N#define RSDM$_JOIN_DEFAULT 2 /* Process default RD Join function */N#define RSDM$_JOIN_DOMAIN 3 /* Other RD Join function */N#define RSDM$_LEAVE 4 /* Leave RD function */#define RSDM$K_SYSTEM_RSDM_ID 1N/* System RSDM_ID a# */ #define RSDM$K_PROCESS_RSDM_ID 2N/* Process RSDM_ID */N/*+ */N/* RSDM$ bitfields */N/*- */#define RSDM$M_READ 0x1#define RSDM$M_WRITE 0x2#define RSDM$M_LOCK 0x4 #ifdef __NEW_STARLb#ETtypedef union _rsdmbits { __union { int rsdm$l_misc_access; __struct {N unsigned rsdm$v_read : 1; /* Read access */N unsigned rsdm$v_write : 1; /* Write access */N unsigned rsdm$v_lock : 1; /* Lock access */) unsigned rsdm$v_fill_12_ : 5; } rsdm$r_fill_11_; } rsdm$r_fill_10_; } RSDMBITS; #if !defined(__VAXC)?#define rsdm$v c#_read rsdm$r_fill_10_.rsdm$r_fill_11_.rsdm$v_readA#define rsdm$v_write rsdm$r_fill_10_.rsdm$r_fill_11_.rsdm$v_write?#define rsdm$v_lock rsdm$r_fill_10_.rsdm$r_fill_11_.rsdm$v_lock"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union rsdmbits { __union { int rsdm$l_misc_access; __struct {N unsigned rsdm$v_read : 1; /* Read access */N unsigned rsdm$v_write : 1; /* Write access */d#N unsigned rsdm$v_lock : 1; /* Lock access */) unsigned rsdm$v_fill_12_ : 5; } rsdm$r_fill_11_; } rsdm$r_fill_10_; } ; #if !defined(__VAXC)?#define rsdm$v_read rsdm$r_fill_10_.rsdm$r_fill_11_.rsdm$v_readA#define rsdm$v_write rsdm$r_fill_10_.rsdm$r_fill_11_.rsdm$v_write?#define rsdm$v_lock rsdm$r_fill_10_.rsdm$r_fill_11_.rsdm$v_lock"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $e##pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __RSDMDEF_LOADED */ wwE/********************************************************************************************************************************/=/* Created: 5-Apr-2012 f#13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $S2DGBDEF ***/#ifndef __S2DGBDEF_LOADED#define __S2DGBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTERg#_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#eh#lse#define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif  #define s2dgb S2DGBP#define S2DGB$K_OP_XCDB32 1 /* Diagnose opcode for 32-bit buffers */P#define S2DGB$K_OP_XCDB64 2 /* Diagnose opcode for 64-bit buffers */#define S2DGB$M_READ 0x1#define S2DGB$M_DISCPRIV 0x2#define S2DGB$M_SYNCHRONOUS 0x4#define S2DGB$M_OBSOLETE1 0x8#define S2 i#DGB$M_TAGGED_REQ 0x10#define S2DGB$M_TAG 0xE0N#define S2DGB$K_TAG_POSITION 5 /* Bit offset of TAG bitfield */N#define S2DGB$K_SIMPLE 0 /* Simple queue tag */N#define S2DGB$K_ORDERED 1 /* Ordered queue tag */N#define S2DGB$K_EXPRESS 2 /* Head of Queue queue tag */#define S2DGB$M_AUTOSENSE 0x100#define S2DGB$M_EXT_LUN 0x200T#define S2DGB$K_XCDB32_LENGTH 60 /* Diagnose buffer length, 32- j#bit buffers */T#define S2DGB$K_XCDB64_LENGTH 60 /* Diagnose buffer length, 64-bit buffers */N#define S2DGB$K_XCDB_MIN_LENGTH 60 /* Minimum s2gdb length */N#define S2DGB$K_EXT_XCDB_MIN_LENGTH 68 /* Length w/external LUN */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _s2dgb {#p k#ragma __nomember_alignmentN unsigned int s2dgb$l_opcode; /* Diagnose opcode */ __union { __union {' unsigned int s2dgb$l_flags; __struct {N unsigned s2dgb$v_read : 1; /* Read operation */Q unsigned s2dgb$v_discpriv : 1; /* DiscPriv val in Identigy msg */S unsigned s2dgb$v_synchronous : 1; /* Synchronous xfers permitted */N unsigned s2dgb$v_obsolete1 : l# 1; /* (Ignored) */N unsigned s2dgb$v_tagged_req : 1; /* Use TCQ */N unsigned s2dgb$v_tag : 3; /* Queue tag value type */N unsigned s2dgb$v_autosense : 1; /* Return Autosense data */O unsigned s2dgb$v_ext_lun : 1; /* Use externally-supplied LUN */. unsigned s2dgb$v_fill_15_ : 6;# } s2dgb$r_fill_14_; } s2dgb$r_fill_13_; } s2dgb$r_flags_over m#lay; __union { __struct {N/* Fields in this structure are valid if and */N/* only if s2dgb$l_opcode = S2DGB$K_OP_XCDB32 */N void *s2dgb$l_32cdbaddr; /* 32-bit addr of Cmd Desc Blk */N unsigned int s2dgb$l_32cdblen; /* Length of CDB in bytes */V void *s2dgb$l_32dataddr; /* 32-bit addr of DATAIN or DATAOUT address */\ unsigned int s2dgb$l_32datlen; /* Length on#f DATAIN or DATAOUT buffer in bytes */N unsigned int s2dgb$l_32padcnt; /* Number of pad bytes required. */O unsigned int s2dgb$l_32phstmo; /* Phase timeout value in seconds */T unsigned int s2dgb$l_32dsctmo; /* Disconnect timeout value in seconds */N void *s2dgb$l_32senseaddr; /* 32-bit addr of Autosense buffer */V unsigned int s2dgb$l_32senselen; /* Length of Autosense buffer in bytes */N unsigned int s2dgb$l_reserved1; /* Res o#erved field */N unsigned int s2dgb$l_reserved2; /* Reserved field */N unsigned int s2dgb$l_reserved3; /* Reserved field */N unsigned int s2dgb$l_reserved4; /* Reserved field */# } s2dgb$r_layout_32bit; __struct {N/* Fields in this structure are valid if and */N/* only if s2dgb$l_opcode = S2DGB$K_OP_XCDB64 */R#ifdef __INITIAL p#_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *s2dgb$pq_64cdbaddr; /* 64-bit addr of Cmd Desc Blk */#else% unsigned __int64 s2dgb$pq_64cdbaddr;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */V void *s2dgb$pq_64datad q#dr; /* 64-bit addr of DATAIN or DATAOUT address */#else% unsigned __int64 s2dgb$pq_64dataddr;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *s2dgb$pq_64senseaddr; /* 64-bit addr of Autosense buffer */#else' unsigned __int64 s2dgb$pq_64senseaddr;#endifN unsigned int s2dgb$l_64cdblen; /* Length of CDB in bytes */\ r# unsigned int s2dgb$l_64datlen; /* Length of DATAIN or DATAOUT buffer in bytes */V unsigned int s2dgb$l_64senselen; /* Length of Autosense buffer in bytes */N unsigned int s2dgb$l_64padcnt; /* Number of pad bytes required. */O unsigned int s2dgb$l_64phstmo; /* Phase timeout value in seconds */T unsigned int s2dgb$l_64dsctmo; /* Disconnect timeout value in seconds */N unsigned int s2dgb$l_reserved_1; /* Reserved field */ s## } s2dgb$r_layout_64bit;$ } s2dgb$r_remaining_overlay;N unsigned __int64 s2dgb$q_ext_lun; /* External LUN */ char s2dgb$b_fill_16_ [4]; } S2DGB; #if !defined(__VAXC)J#define s2dgb$l_flags s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$l_flagsY#define s2dgb$v_read s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_reada#define s2dgb$v_discpriv s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_discprivg#define t#s2dgb$v_synchronous s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_synchronousc#define s2dgb$v_obsolete1 s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_obsolete1e#define s2dgb$v_tagged_req s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_tagged_reqW#define s2dgb$v_tag s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_tagc#define s2dgb$v_autosense s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_autosense_#define s2u#dgb$v_ext_lun s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_ext_lunZ#define s2dgb$l_32cdbaddr s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32cdbaddrX#define s2dgb$l_32cdblen s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32cdblenZ#define s2dgb$l_32dataddr s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32dataddrX#define s2dgb$l_32datlen s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32datlenX#define s2dgb$l_32padcnt s2dgb$r_remaining_overlay.s2dv#gb$r_layout_32bit.s2dgb$l_32padcntX#define s2dgb$l_32phstmo s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32phstmoX#define s2dgb$l_32dsctmo s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32dsctmo^#define s2dgb$l_32senseaddr s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32senseaddr\#define s2dgb$l_32senselen s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32senselenZ#define s2dgb$l_reserved1 s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_reserved1Z#define w#s2dgb$l_reserved2 s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_reserved2Z#define s2dgb$l_reserved3 s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_reserved3Z#define s2dgb$l_reserved4 s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_reserved4\#define s2dgb$pq_64cdbaddr s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$pq_64cdbaddr\#define s2dgb$pq_64dataddr s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$pq_64dataddr`#define s2dgb$pq_64senseaddr s2dgb$r_remaining_ovex#rlay.s2dgb$r_layout_64bit.s2dgb$pq_64senseaddrX#define s2dgb$l_64cdblen s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64cdblenX#define s2dgb$l_64datlen s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64datlen\#define s2dgb$l_64senselen s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64senselenX#define s2dgb$l_64padcnt s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64padcntX#define s2dgb$l_64phstmo s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64phstmoX#def y#ine s2dgb$l_64dsctmo s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64dsctmo\#define s2dgb$l_reserved_1 s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_reserved_1"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _s2dgb {#pragma __nomember_alignmentN unsi z#gned int s2dgb$l_opcode; /* Diagnose opcode */ __union { __union {' unsigned int s2dgb$l_flags; __struct {N unsigned s2dgb$v_read : 1; /* Read operation */Q unsigned s2dgb$v_discpriv : 1; /* DiscPriv val in Identigy msg */S unsigned s2dgb$v_synchronous : 1; /* Synchronous xfers permitted */N unsigned s2dgb$v_obsolete1 : 1; /* (Ignored) */N {# unsigned s2dgb$v_tagged_req : 1; /* Use TCQ */N unsigned s2dgb$v_tag : 3; /* Queue tag value type */N unsigned s2dgb$v_autosense : 1; /* Return Autosense data */O unsigned s2dgb$v_ext_lun : 1; /* Use externally-supplied LUN */. unsigned s2dgb$v_fill_15_ : 6;# } s2dgb$r_fill_14_; } s2dgb$r_fill_13_; } s2dgb$r_flags_overlay; __union { __stru|#ct {N/* Fields in this structure are valid if and */N/* only if s2dgb$l_opcode = S2DGB$K_OP_XCDB32 */N int s2dgb$l_32cdbaddr; /* 32-bit addr of Cmd Desc Blk */N unsigned int s2dgb$l_32cdblen; /* Length of CDB in bytes */V int s2dgb$l_32dataddr; /* 32-bit addr of DATAIN or DATAOUT address */\ unsigned int s2dgb$l_32datlen; /* Length of DATAIN or DATAOUT buffer in bytes }#*/N unsigned int s2dgb$l_32padcnt; /* Number of pad bytes required. */O unsigned int s2dgb$l_32phstmo; /* Phase timeout value in seconds */T unsigned int s2dgb$l_32dsctmo; /* Disconnect timeout value in seconds */N int s2dgb$l_32senseaddr; /* 32-bit addr of Autosense buffer */V unsigned int s2dgb$l_32senselen; /* Length of Autosense buffer in bytes */N unsigned int s2dgb$l_reserved1; /* Reserved field */N ~# unsigned int s2dgb$l_reserved2; /* Reserved field */N unsigned int s2dgb$l_reserved3; /* Reserved field */N unsigned int s2dgb$l_reserved4; /* Reserved field */# } s2dgb$r_layout_32bit; __struct {N/* Fields in this structure are valid if and */N/* only if s2dgb$l_opcode = S2DGB$K_OP_XCDB64 */R unsigned __int64 s2dgb$pq_64cdbaddr; /* #64-bit addr of Cmd Desc Blk */_ unsigned __int64 s2dgb$pq_64dataddr; /* 64-bit addr of DATAIN or DATAOUT address */X unsigned __int64 s2dgb$pq_64senseaddr; /* 64-bit addr of Autosense buffer */N unsigned int s2dgb$l_64cdblen; /* Length of CDB in bytes */\ unsigned int s2dgb$l_64datlen; /* Length of DATAIN or DATAOUT buffer in bytes */V unsigned int s2dgb$l_64senselen; /* Length of Autosense buffer in bytes */N unsigned int # s2dgb$l_64padcnt; /* Number of pad bytes required. */O unsigned int s2dgb$l_64phstmo; /* Phase timeout value in seconds */T unsigned int s2dgb$l_64dsctmo; /* Disconnect timeout value in seconds */N unsigned int s2dgb$l_reserved_1; /* Reserved field */# } s2dgb$r_layout_64bit;$ } s2dgb$r_remaining_overlay;N unsigned int s2dgb$q_ext_lun [2]; /* External LUN */ char s2dgb$b_fill_16_ [4]; } s2dgb;# #if !defined(__VAXC)J#define s2dgb$l_flags s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$l_flagsY#define s2dgb$v_read s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_reada#define s2dgb$v_discpriv s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_discprivg#define s2dgb$v_synchronous s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_synchronousc#define s2dgb$v_obsolete1 s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_obsolete1e#def#ine s2dgb$v_tagged_req s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_tagged_reqW#define s2dgb$v_tag s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_tagc#define s2dgb$v_autosense s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_autosense_#define s2dgb$v_ext_lun s2dgb$r_flags_overlay.s2dgb$r_fill_13_.s2dgb$r_fill_14_.s2dgb$v_ext_lunZ#define s2dgb$l_32cdbaddr s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32cdbaddrX#define s2dgb$l_32cdblen# s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32cdblenZ#define s2dgb$l_32dataddr s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32dataddrX#define s2dgb$l_32datlen s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32datlenX#define s2dgb$l_32padcnt s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32padcntX#define s2dgb$l_32phstmo s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32phstmoX#define s2dgb$l_32dsctmo s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$#l_32dsctmo^#define s2dgb$l_32senseaddr s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32senseaddr\#define s2dgb$l_32senselen s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_32senselenZ#define s2dgb$l_reserved1 s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_reserved1Z#define s2dgb$l_reserved2 s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_reserved2Z#define s2dgb$l_reserved3 s2dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_reserved3Z#define s2dgb$l_reserved4 s2#dgb$r_remaining_overlay.s2dgb$r_layout_32bit.s2dgb$l_reserved4\#define s2dgb$pq_64cdbaddr s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$pq_64cdbaddr\#define s2dgb$pq_64dataddr s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$pq_64dataddr`#define s2dgb$pq_64senseaddr s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$pq_64senseaddrX#define s2dgb$l_64cdblen s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64cdblenX#define s2dgb$l_64datlen s2dgb$r_remaining_overlay.s2dgb$r_layout_#64bit.s2dgb$l_64datlen\#define s2dgb$l_64senselen s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64senselenX#define s2dgb$l_64padcnt s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64padcntX#define s2dgb$l_64phstmo s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64phstmoX#define s2dgb$l_64dsctmo s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_64dsctmo\#define s2dgb$l_reserved_1 s2dgb$r_remaining_overlay.s2dgb$r_layout_64bit.s2dgb$l_reserved_1"#endif /* #if !defined( #__VAXC) */ %#endif /* #ifdef __NEW_STARLET */  Z#ifdef __INITIAL_POINTER_SIZE /* If compiler supports 64-bit pointers... */J#pragma __required_pointer_size __save /* Save current pointer size */E#pragma __required_pointer_size __long /* Pointers are 64-bit */Otypedef struct _s2dgb * S2DGB_PQ; /* 64-bit pointer to a S2DGB structure. */Q#pragma __required_pointer_size __restore /* Return to previous pointer size */E#else /* If compiler supports o#nly 32-bit pointers... */`typedef unsigned __int64 S2DGB_PQ; /* S2DGB type must be a 64-bit wide integer. */##endif /* __INITIAL_POINTER_SIZE */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __S2DGBDEF_LOADED */ ww# E/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $SBKDEF ***/#ifndef __SBKDEF_LOADED#define __SBKDEF_LOADED 1 # G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* # */N/* Statistics block. This block is used to report various data regarding */N/* an open file to the requesting program. */N/* */N/*- */N/* */N/* The first two longwords are presented in inverted form for compatibility */N/* with the old RS #X-11 statistics block. */N/* */#define SBK$K_LENGTH 32#define SBK$C_LENGTH 32 #ifdef __NEW_STARLETtypedef struct _sbkdef { __union {N unsigned int sbk$l_stlbn; /* starting LBN if contiguous */ __struct {N unsigned short int sbk$w_stlbnh; /* high order word */N unsigned short int sbk$w_stlbnl; /* low order word # */! } sbk$r_stlbn_fields; } sbk$r_stlbn_overlay; __union {N unsigned int sbk$l_filesize; /* file size */ __struct {N unsigned short int sbk$w_filesizh; /* high order word */N unsigned short int sbk$w_filesizl; /* low order word */N/* */N/* The following two fields are for RSX-11 compatibility # */N/* */$ } sbk$r_filesize_fields;! } sbk$r_filesize_overlay;N unsigned char sbk$b_acnt; /* low byte of access count */N unsigned char sbk$b_lcnt; /* low byte of lock count */N unsigned int sbk$l_fcb; /* address of file control block */N short int sbkdef$$_fill_1; /* spare */N unsigned s #hort int sbk$w_acnt; /* access count */N unsigned short int sbk$w_lcnt; /* lock count (against writers) */N unsigned short int sbk$w_wcnt; /* writer count */N unsigned short int sbk$w_tcnt; /* truncate lock count */Q unsigned int sbk$l_reads; /* count of reads executed on channel */R unsigned int sbk$l_writes; /* count of writes executed on channel */ } SBKDEF; #if !defined #(__VAXC)3#define sbk$l_stlbn sbk$r_stlbn_overlay.sbk$l_stlbnH#define sbk$w_stlbnh sbk$r_stlbn_overlay.sbk$r_stlbn_fields.sbk$w_stlbnhH#define sbk$w_stlbnl sbk$r_stlbn_overlay.sbk$r_stlbn_fields.sbk$w_stlbnl<#define sbk$l_filesize sbk$r_filesize_overlay.sbk$l_filesizeR#define sbk$w_filesizh sbk$r_filesize_overlay.sbk$r_filesize_fields.sbk$w_filesizhR#define sbk$w_filesizl sbk$r_filesize_overlay.sbk$r_filesize_fields.sbk$w_filesizl"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARL #ET */struct sbkdef { __union {N unsigned int sbk$l_stlbn; /* starting LBN if contiguous */ __struct {N unsigned short int sbk$w_stlbnh; /* high order word */N unsigned short int sbk$w_stlbnl; /* low order word */! } sbk$r_stlbn_fields; } sbk$r_stlbn_overlay; __union {N unsigned int sbk$l_filesize; /* file size */ __struct {N unsi#gned short int sbk$w_filesizh; /* high order word */N unsigned short int sbk$w_filesizl; /* low order word */N/* */N/* The following two fields are for RSX-11 compatibility */N/* */$ } sbk$r_filesize_fields;! } sbk$r_filesize_overlay;N unsigned char sbk$b_acnt; /* low b#yte of access count */N unsigned char sbk$b_lcnt; /* low byte of lock count */N unsigned int sbk$l_fcb; /* address of file control block */N short int sbkdef$$_fill_1; /* spare */N unsigned short int sbk$w_acnt; /* access count */N unsigned short int sbk$w_lcnt; /* lock count (against writers) */N unsigned short int sbk$w_wcnt; /* writer count # */N unsigned short int sbk$w_tcnt; /* truncate lock count */Q unsigned int sbk$l_reads; /* count of reads executed on channel */R unsigned int sbk$l_writes; /* count of writes executed on channel */ } ; #if !defined(__VAXC)3#define sbk$l_stlbn sbk$r_stlbn_overlay.sbk$l_stlbnH#define sbk$w_stlbnh sbk$r_stlbn_overlay.sbk$r_stlbn_fields.sbk$w_stlbnhH#define sbk$w_stlbnl sbk$r_stlbn_overlay.sbk$r_stlbn_fields.sbk$w_stlbnl<#define sbk$l_ #filesize sbk$r_filesize_overlay.sbk$l_filesizeR#define sbk$w_filesizh sbk$r_filesize_overlay.sbk$r_filesize_fields.sbk$w_filesizhR#define sbk$w_filesizl sbk$r_filesize_overlay.sbk$r_filesize_fields.sbk$w_filesizl"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined requir#ed ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SBKDEF_LOADED */ ww+E/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SCRDEF.SDI;1 *//******************************************************************************************* #*************************************//*** MODULE $SCRDEF ***/#ifndef __SCRDEF_LOADED#define __SCRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 de#fault 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 N/* SCREEN PACKAGE REQUEST TYPES # */N#define SCR$C_PUT_SCREEN 0 /* SCR$PUT_SCREEN */N#define SCR$C_GET_SCREEN 1 /* SCR$GET_SCREEN */N#define SCR$C_ERASE_PAGE 2 /* SCR$ERASE_PAGE */N#define SCR$C_ERASE_LINE 3 /* SCR$ERASE_LINE */N#define SCR$C_SET_CURSOR 4 /* SCR$SET_CURSOR */N#define SCR$C_DOWN_SCROLL 5 /* SCR$DOWN_SCROLL # */N#define SCR$C_SCREEN_INFO 6 /* SCR$SCREEN_INFO */N#define SCR$C_PUT_LINE 7 /* SCR$PUT_LINE */N#define SCR$C_MOVE_CURSOR 8 /* SCR$MOVE_CURSOR */N#define SCR$C_SET_SCROLL 9 /* SCR$SET_SCROLL */N#define SCR$C_UP_SCROLL 10 /* SCR$UP_SCROLL */N/* */N/* # DEFINE BIT MASKS AND VALUES FOR SCREEN ATTRIBUTES */N/* */#define SCR$M_BOLD 0x1#define SCR$M_REVERSE 0x2#define SCR$M_BLINK 0x4#define SCR$M_UNDERLINE 0x8N#define SCR$M_NORMAL 0 /*no bits set */ #ifdef __NEW_STARLETtypedef union _scrdef { __struct { unsigned scr$v_bold : 1;# unsigned scr$v_reverse : 1;! unsigned scr$v#_blink : 1;% unsigned scr$v_underline : 1;# unsigned scr$v_fill_0_ : 4; } scr$r_scrdef_bits; } SCRDEF; #if !defined(__VAXC)/#define scr$v_bold scr$r_scrdef_bits.scr$v_bold5#define scr$v_reverse scr$r_scrdef_bits.scr$v_reverse1#define scr$v_blink scr$r_scrdef_bits.scr$v_blink9#define scr$v_underline scr$r_scrdef_bits.scr$v_underline"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union scrdef { __struct { unsigned s#cr$v_bold : 1;# unsigned scr$v_reverse : 1;! unsigned scr$v_blink : 1;% unsigned scr$v_underline : 1;# unsigned scr$v_fill_0_ : 4; } scr$r_scrdef_bits; } ; #if !defined(__VAXC)/#define scr$v_bold scr$r_scrdef_bits.scr$v_bold5#define scr$v_reverse scr$r_scrdef_bits.scr$v_reverse1#define scr$v_blink scr$r_scrdef_bits.scr$v_blink9#define scr$v_underline scr$r_scrdef_bits.scr$v_underline"#endif /* #if !defined(__VAXC) */ %#endif /* ##ifdef __NEW_STARLET */N/* */N/* DEFINE FORMAT OF SCR$SCREEN_INFO RETURN BUFFER */N/* */#define SCR$M_SCREEN 0x1#define SCR$M_ANSICRT 0x2#define SCR$M_REGIS 0x4#define SCR$M_BLOCK 0x8#define SCR$M_AVO 0x10#define SCR$M_EDIT 0x20#define SCR$M_DECCRT 0x40N#define SCR$K_LENGTH 20 /* LENGTH OF INF #O RETURN BUFFER */N#define SCR$C_LENGTH 20 /* LENGTH OF INFO RETURN BUFFER */ #ifdef __NEW_STARLETtypedef struct _scrdef1 { __union {N unsigned int scr$l_flags; /* FLAGS LONGWORD */ __struct {Q unsigned scr$v_screen : 1; /* 1 = SCREEN ORIENTED, 0 = SCROLLING */N unsigned scr$v_ansicrt : 1; /* ANSI TERMINAL */N unsigned scr$v_regis : 1; /* REGIS TERMINAL # */N unsigned scr$v_block : 1; /* BLOCK MODE TERMINAL */N unsigned scr$v_avo : 1; /* ADVANCED VIDEO TERMINAL */N unsigned scr$v_edit : 1; /* TERMINAL HAS EDIT CAPABILITY */N unsigned scr$v_deccrt : 1; /* TERMINAL IS A DEC CRT */' unsigned scr$v_fill_1_ : 1; } scr$r_flags_bits; } scr$r_flags_overlay;N unsigned short int scr$w_width; /* WIDTH OF EACH LINE # */N unsigned short int scr$w_pagesize; /* LINES IN SCREEN */N unsigned char scr$b_devtype; /* DEVICE TYPE (SEE $DCDEF) */N char scrdef$$_fill_1 [11]; /* (RESERVED) */ } SCRDEF1; #if !defined(__VAXC)3#define scr$l_flags scr$r_flags_overlay.scr$l_flags=#define scr$r_flags_bits scr$r_flags_overlay.scr$r_flags_bits2#define scr$v_screen scr$r_flags_bits.scr$v_screen4#define scr$v_ansicrt scr$r_flags_bits#.scr$v_ansicrt0#define scr$v_regis scr$r_flags_bits.scr$v_regis0#define scr$v_block scr$r_flags_bits.scr$v_block,#define scr$v_avo scr$r_flags_bits.scr$v_avo.#define scr$v_edit scr$r_flags_bits.scr$v_edit2#define scr$v_deccrt scr$r_flags_bits.scr$v_deccrt"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct scrdef1 { __union {N unsigned int scr$l_flags; /* FLAGS LONGWORD */ __struct {Q unsigned scr$v_screen : #1; /* 1 = SCREEN ORIENTED, 0 = SCROLLING */N unsigned scr$v_ansicrt : 1; /* ANSI TERMINAL */N unsigned scr$v_regis : 1; /* REGIS TERMINAL */N unsigned scr$v_block : 1; /* BLOCK MODE TERMINAL */N unsigned scr$v_avo : 1; /* ADVANCED VIDEO TERMINAL */N unsigned scr$v_edit : 1; /* TERMINAL HAS EDIT CAPABILITY */N unsigned scr$v_deccrt : 1; /* TERMINAL IS A D #EC CRT */' unsigned scr$v_fill_1_ : 1; } scr$r_flags_bits; } scr$r_flags_overlay;N unsigned short int scr$w_width; /* WIDTH OF EACH LINE */N unsigned short int scr$w_pagesize; /* LINES IN SCREEN */N unsigned char scr$b_devtype; /* DEVICE TYPE (SEE $DCDEF) */N char scrdef$$_fill_1 [11]; /* (RESERVED) */ } ; #if !defined(__VAXC)3#define scr$l_flags #scr$r_flags_overlay.scr$l_flagsF#define scr$v_screen scr$r_flags_overlay.scr$r_flags_bits.scr$v_screenH#define scr$v_ansicrt scr$r_flags_overlay.scr$r_flags_bits.scr$v_ansicrtD#define scr$v_regis scr$r_flags_overlay.scr$r_flags_bits.scr$v_regisD#define scr$v_block scr$r_flags_overlay.scr$r_flags_bits.scr$v_block@#define scr$v_avo scr$r_flags_overlay.scr$r_flags_bits.scr$v_avoB#define scr$v_edit scr$r_flags_overlay.scr$r_flags_bits.scr$v_editF#define scr$v_deccrt scr$r_flags_overlay.scr$r_flags#_bits.scr$v_deccrt"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SCRDEF_LOADED */ ww[VF/***************************************************** #***************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $SDBDEF ***/#ifndef __SDBDEF_LOADED#define __SDBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features# */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __option#al_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 N/*+ */N/* SDB Function Codes */N/* # */N/*- */N/*BASE AND OFFSET OF 1 */#define SDB$C_MODE_KERNEL 0#define SDB$C_MODE_EXEC 1#define SDB$C_MODE_SUPER 2#define SDB$C_MODE_USER 3#define SDB$M_MODE_KERNEL 1#define SDB$M_MODE_EXEC 2#define SDB$M_MODE_SUPER 4#define SDB$M_MODE_USER 8#define SDB$C_FUNC_GET_DSDB 0#define SDB$C_FUNC_FREE_DSDB 1#define SDB$C_FUNC_GET_ISDB 2#define #SDB$C_FUNC_FREE_ISDB 3#define SDB$C_FUNC_SET_SDB 4#define SDB$M_ACC_WRITE 1#define SDB$M_ACC_READ 2#define SDB$V_ACC_WRITE 0#define SDB$V_ACC_READ 1 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SDBDEF_LOADED */ ww{ #F/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $SDDEF ***/#ifndef __SDDEF_LOADED#define __SDDEF_LOADED 1 G#pragma __ #nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_param#s ...#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 N/* */N/* item codes for sd$xxx calls */N/* # */R#define SD$_MAJOR_ID 1 /* longword (major ODS version number) */R#define SD$_MINOR_ID 2 /* longword (minor ODS version number) */N#define SD$_POOL_ID 3 /* UID (16 bytes) (Pool identifier) */Y#define SD$_CREATION_DATE 4 /* Date/time (8 bytes) (Date pool was created) */i#define SD$_MODIFIED_DATE 5 /* Date/time (8 bytes) (Date pool membership was last #changed) */Z#define SD$_SEGMENT_SIZE 6 /* longword (Size of segment in pool # blocks) */[#define SD$_MAX_UNITS 7 /* longword (Maximum # members allowed in pool) */]#define SD$_UNIT_COUNT 8 /* longword (Number of members currently in pool) */D#define SD$_POOL_OPTIONS 9 /* longword (Pool flags) */Y#define SD$_UNIT_ID 10 /* UID (16 bytes) (Identifier of storage unit) */M#define SD$_UNIT_NUMBER 11 /* longw#ord (Storage unit number) */L#define SD$_UNIT_OPTIONS 12 /* longword (Storage unit flags) */S#define SD$_SEQUENCE_NUMBER 13 /* longword (Homeblock sequence number) */Z#define SD$_HIGHEST_UNIT 14 /* longword (Number of highest member in pool) */Y#define SD$_LOWEST_UNIT 15 /* longword (Number of lowest member in pool) */T#define SD$_TOTAL_SEGMENTS 16 /* longword (Total # of segment in pool) */Z#define SD$_FREE_SEGMENTS 17 #/* longword (Total # of free segments in pool) */_#define SD$_MAX_FAMILY 18 /* longword (Maximum # of families allowed in pool) */W#define SD$_MAX_DISK 19 /* longword (Maximum # members in a family) */X#define SD$_META_LBN 20 /* longword (Start of SD metadata on member) */W#define SD$_META_SIZE 21 /* longword (Size of SD metadata on member) */W#define SD$_DATA_LBN 22 /* longword (Start of pool space on member) *#/V#define SD$_DATA_SIZE 23 /* longword (Size of pool space on member) */T#define SD$_POOL_DEVICE 24 /* character string (Name of pool device) */V#define SD$_FAMILY_NUMBER 25 /* longword (Familiy number of a SnapDisk) */\#define SD$_MEMBER_NUMBER 26 /* longword (Number within family of a SnapDisk) */U#define SD$_DISK_NAME 27 /* character string (Name of SnapDisk) */U#define SD$_DISK_CAPACITY 28 /* longword (Size#/capacity of a SnapDisk) */o#define SD$_DELSPACE 29 /* longword (# segments that can be recovered by deleting SnapDisk) */g#define SD$_DISK_DEVICE 30 /* character string (Name of device as bound to OpenVMS) */l#define SD$_BACKUP_DATE 31 /* Date/time (8 bytes) (Date that recorded snap was last created) */[#define SD$_READS 32 /* longword (Number of read received from user) */]#define SD$_WRITES 33 /* longword # (Number of writes received from user) */_#define SD$_SPLIT_READS 34 /* longword (Number of reads that were split by SD) */`#define SD$_SPLIT_WRITES 35 /* longword (Number of writes that were split by SD) */b#define SD$_DISK_READS 36 /* longword (Number of reads to underlying pool units) */c#define SD$_DISK_WRITES 37 /* longword (Number of writes to underlying pool units) */\#define SD$_COPY_OUTS 38 /* longword (Number of #copy-on-write operations) */f#define SD$_CONVERT_CANCELS 39 /* longword (Number of cancelled lock requests) */l#define SD$_POOL_FULL_STALLS 40 /* longword (NUmber of requests stalled by pool full) */N#define SD$_SPARE1 41 /* longword */N#define SD$_SPARE2 42 /* longword */N#define SD$_SPARE3 43 /* longword */N#define SD$_SPARE4 44 # /* longword */N#define SD$_SPARE5 45 /* longword */N#define SD$_SPARE6 46 /* longword */N#define SD$_SPARE7 47 /* longword */N#define SD$_SPARE8 48 /* longword */R#define SD$_COPY_STATS 49 /* Array of SD$K_COPYCOUNTERS longwords */k#define SD$_DEV_LOCKID 50 /* l #ongword (LockId of device name consistancy lock) */h#define SD$_UID_LOCKID 51 /* longword (LockId of UID name consistancy lock) */#define SD$K_COPYCOUNTERS 24N/* */N/* options and flags for RTL routines */N/* */#define SD$M_CONTAINER_DISK 1#define SD$M_CONVERTED_DISK 2N #/* */N/* Function codes for cluster-server requests */N/* */#define SD$K_CLU_BIND_POOL 1#define SD$K_CLU_BIND_DISK 2#define SD$K_CLU_UNBIND 3N/* */N/* Define structures used by QIO interface to SD management functions */N/* # */N/* ++ */N/* Device list */N/* */N/* This structure is used to pass information between */N/* the runtime library, the FDT routines and the start */N/* I/O routines # */N/* -- */ #ifdef __NEW_STARLETtypedef struct _sddevlist {N unsigned int sd$l_start_lbn; /* Starting LBN of data space */N unsigned int sd$l_lbn_count; /* Size of data space */N unsigned int sd$l_meta_lbn; /* Location of SnapDisk metadata */N unsigned int sd$l_meta_count; /* Size of metadata area */R#ifdef __INITI #AL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endifN void *sd$ps_ucb; /* UCB of pool unit */N unsigned int sd$l_name_length; /* Length of device name */N char sd$t_name [64]; /* Device name */ } SDDEVLIST;#else /* __OLD_STARLET */typedef struct _sddevlist {N unsigned i#nt sd$l_start_lbn; /* Starting LBN of data space */N unsigned int sd$l_lbn_count; /* Size of data space */N unsigned int sd$l_meta_lbn; /* Location of SnapDisk metadata */N unsigned int sd$l_meta_count; /* Size of metadata area */N void *sd$ps_ucb; /* UCB of pool unit */N unsigned int sd$l_name_length; /* Length of device name */N char sd$t_name [64]; #/* Device name */ } sddevlist;%#endif /* #ifdef __NEW_STARLET */N/* */N/* SD Parameter list - This is used to pass Snapshot Services */N/* parameters/characteristics between the runtime library */N/* and the I/O functions */N/* */#define #SD$M_STALL 0x1#define SD$M_REDUNDANT 0x2#define SD$M_RECORD 0x4#define SD$M_CLUSTER 0x8#define SD$M_PARTIAL 0x10 #ifdef __NEW_STARLETtypedef struct _sdparamlist { __union {N unsigned int sd$l_segment_size; /* Segment size for copy-on-write */N unsigned int sd$l_disk_size; /* Disk size for create/disk */ } sd$r_size_overlay; __union {N unsigned int sd$l_flags; /* Miscellaneous flags */ __struct {N# unsigned sd$v_stall : 1; /* Stall/Fail on pool full */S unsigned sd$v_redundant : 1; /* Use redundancy for SnapDisk metadata */N unsigned sd$v_record : 1; /* Record snapshot creation time */N unsigned sd$v_cluster : 1; /* Operation is cluster-wide */N unsigned sd$v_partial : 1; /* Partial bind on pool */' unsigned sd$v_fill_17_ : 3; } sd$r_flags_bits; } sd$r_flags_overl #ay; } SDPARAMLIST; #if !defined(__VAXC)=#define sd$l_segment_size sd$r_size_overlay.sd$l_segment_size7#define sd$l_disk_size sd$r_size_overlay.sd$l_disk_size0#define sd$l_flags sd$r_flags_overlay.sd$l_flags@#define sd$v_stall sd$r_flags_overlay.sd$r_flags_bits.sd$v_stallH#define sd$v_redundant sd$r_flags_overlay.sd$r_flags_bits.sd$v_redundantB#define sd$v_record sd$r_flags_overlay.sd$r_flags_bits.sd$v_recordD#define sd$v_cluster sd$r_flags_overlay.sd$r_flags_bits.sd$v_clusterD#def #ine sd$v_partial sd$r_flags_overlay.sd$r_flags_bits.sd$v_partial"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _sdparamlist { __union {N unsigned int sd$l_segment_size; /* Segment size for copy-on-write */N unsigned int sd$l_disk_size; /* Disk size for create/disk */ } sd$r_size_overlay; __union {N unsigned int sd$l_flags; /* Miscellaneous flags */ __struct {N #unsigned sd$v_stall : 1; /* Stall/Fail on pool full */S unsigned sd$v_redundant : 1; /* Use redundancy for SnapDisk metadata */N unsigned sd$v_record : 1; /* Record snapshot creation time */N unsigned sd$v_cluster : 1; /* Operation is cluster-wide */N unsigned sd$v_partial : 1; /* Partial bind on pool */' unsigned sd$v_fill_17_ : 3; } sd$r_flags_bits; } sd$r_flags_overlay; } #sdparamlist; #if !defined(__VAXC)=#define sd$l_segment_size sd$r_size_overlay.sd$l_segment_size7#define sd$l_disk_size sd$r_size_overlay.sd$l_disk_size0#define sd$l_flags sd$r_flags_overlay.sd$l_flags@#define sd$v_stall sd$r_flags_overlay.sd$r_flags_bits.sd$v_stallH#define sd$v_redundant sd$r_flags_overlay.sd$r_flags_bits.sd$v_redundantB#define sd$v_record sd$r_flags_overlay.sd$r_flags_bits.sd$v_recordD#define sd$v_cluster sd$r_flags_overlay.sd$r_flags_bits.sd$v_clusterD#define sd$v_par #tial sd$r_flags_overlay.sd$r_flags_bits.sd$v_partial"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* IOCTL function codes - miscellaneous functions */N/* */#define SD$K_GET_DISK 1#define SD$K_GET_STATS 2#define SD$K_GET_UNIT 3#define SD$K_POOL_DISK 4#define SD$K_POOL_INFO 5#d#efine SD$K_POOL_UNIT 6#define SD$K_CLU_TEST 7#define SD$K_STORE_LOCKIDS 8#define SD$K_RETRIEVE_LOCKIDS 9##define SD$K_RETRIEVE_MEMBERLIST 10#define SD$K_SET_TRACE_LEVEL 11#define SD$K_GET_TRACE_LEVEL 12 &#if defined(__VAX) && !defined(__VAXC)=#define sd$l_segment_size sd$r_size_overlay.sd$l_segment_size7#define sd$l_disk_size sd$r_size_overlay.sd$l_disk_size0#define sd$l_flags sd$r_flags_overlay.sd$l_flags@#define sd$v_stall sd$r_flags_overlay.sd$r_flags_bits.sd$v_stallH#def #ine sd$v_redundant sd$r_flags_overlay.sd$r_flags_bits.sd$v_redundantB#define sd$v_record sd$r_flags_overlay.sd$r_flags_bits.sd$v_recordD#define sd$v_cluster sd$r_flags_overlay.sd$r_flags_bits.sd$v_cluster"#define SD$M_STALL sd$m_stall&#define SD$M_REDUNDANT sd$m_redundant##define SD$M_RECORD sd$m_record$#define SD$M_CLUSTER sd$m_cluster#endifN/* */N/* Define Snapshot Services runtime library functions # */N/* */N/* */N/*++ */N/* */N/* ROUTINE: */N/* */I/* s#d$add_units POOL_DEVICE, UNIT_LIST */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Add additional storage units to an existing pool */I/* This function takes care of all the creatio#n of container */I/* files etc. for the storage units being added. */N/* */N/* FORMAL PARAMETERS: */N/* */B/* POOL_DEVICE (IN) : Name of device to add members */A/* UNIT_LIST (IN) : Item List 3 containing Device list */Q/* FLAGS (IN) # : Indicates temporary or permanent pool member */N/* */N/* */N/* PRE-CONDITIONS: */N/* */I/* The set of devices must be mounted as Files-11 devices */N/* # */N/* POST-CONDITIONS: */N/* */I/* The new storage units are added as new members to the pool. */I/* All current and new members are stamped with a new membership list */N/* */N/* RETURN VALUE: */N/* # */I/* Various statuses */N/* */N/*-- */N/* */##define sd$add_units SD$ADD_UNITS #ifdef __NEW_STARLETunsigned int sd$add_units( void *pool_device, # void *unit_list, unsigned int flags);#else /* __OLD_STARLET */,unsigned int sd$add_units(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: */N/* # */I/* sd$bind_disk DISK_DEVICE, POOL_DEVICE, DISK_NAME, FLAGS */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Export a SnappyDisk from the pool as an OpenVMS device # */N/* */N/* FORMAL PARAMETERS: */N/* */B/* DISK_DEVICE (IN) : Name of disk device to create */B/* POOL_DEVICE (IN) : Name of pool device to use */A/* DISK_NAME (IN) : Name of disk to export from pool */=/* FLAGS (IN) : Optional flags SD$M_CLUSTER # */N/* */N/* PRE-CONDITIONS: */N/* */I/* The pool must be bound. */I/* The SnappyDisk name must exist in the pool. */N/* The SnappyDisk must not be bound to a device on another computer in the */I/* cluster. # */J/* Another SnappyDisk must not be bound to the specified device on any */I/* computer in the cluster. */N/* */N/* POST-CONDITIONS: */N/* */I/* The SnappyDisk is exposed as an OpenVMS device # */N/* */N/* RETURN VALUE: */N/* */I/* Various statuses */N/* */N/*-- */N/* # */##define sd$bind_disk SD$BIND_DISK #ifdef __NEW_STARLETunsigned int sd$bind_disk( void *disk_device, void *pool_device, void *disk_name, unsigned int flags);#else /* __OLD_STARLET */,unsigned int sd$bind_disk(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ # */N/* */N/* ROUTINE: */N/* */I/* sd$bind_pool POOL_DEVICE, UNIT_LIST, FLAGS */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* # */I/* Runtime library routine */I/* Rebind a pool from a set of devices that have been */I/* previously created as a pool. */I/* This function takes care of all the location of container */I/* files, driver loading. */N/* # */N/* FORMAL PARAMETERS: */N/* */B/* POOL_DEVICE (IN) : Name of device to create */B/* UNIT_LIST (IN) : Itemlist3 containing list of storage units */=/* FLAGS (IN) : Optional flags SD$M_CLUSTER */N/* */N/* PRE-CONDITIONS: # */N/* */I/* The storage units must be mounted as Files-11 devices. */I/* The storage units must have been previously used to create a pool. */I/* The list of storage units must not include storage units in another */I/* pool. */I/* The list of storage units must not include a SnappyDisk bound to a */I/* device. # */N/* */N/* POST-CONDITIONS: */N/* */I/* A pool is rebound and exported as the specified pool_device. */N/* */N/* RETURN VALUE: # */N/* */I/* Various statuses */N/* */N/*-- */N/* */##define sd$bind_pool SD$BIND_POOL #ifdef __NEW_STARLETunsigned int sd$bind_pool( # void *pool_device, void *unit_list, unsigned int flags);#else /* __OLD_STARLET */,unsigned int sd$bind_pool(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: */N/* # */I/* sd$create_disk POOL_DEVICE, DISK_NAME, DISK_CAPACITY */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Create a SnappyDisk in a pool # */N/* */N/* FORMAL PARAMETERS: */N/* */B/* POOL_DEVICE (IN) : Name of pool device to use */A/* DISK_NAME (IN) : Name of SnappyDisk to create */D/* DISK_CAPACITY (IN) : Size in blocks of SnappyDisk to create */N/* # */N/* PRE-CONDITIONS: */N/* */I/* The pool must be bound. */I/* The SnappyDisk name must not already exist in the pool. */M/* The pool must have enough free space to create a SnappyDisk of the size */I/* specified. # */N/* */N/* POST-CONDITIONS: */N/* */I/* A new SnappyDisk, named disk_name, is created in the pool */N/* */N/* RETURN VALUE: */N/* # */I/* Various statuses */N/* */N/*-- */N/* */'#define sd$create_disk SD$CREATE_DISK #ifdef __NEW_STARLETunsigned int sd$create_disk( void *pool_device, void *d #isk_name, unsigned int disk_capacity);#else /* __OLD_STARLET */.unsigned int sd$create_disk(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: */N/* # */N/* sd$create_pool UNIT_LIST, SEGMENT_SIZE, FLAGS */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Create a pool from a set of storage units. */I/* This function takes care of all the creation of container # */I/* files and driver loading that needs to be done before calling */I/* the IO$_BIND function. */N/* */N/* FORMAL PARAMETERS: */N/* */D/* UNIT_LIST (IN) : Item list 3 containing list of storage units */C/* SEGMENT_SIZE (IN) : Size of s#egments in pool (blocks) */=/* FLAGS (IN) : Optional flags SD$M_STALL, SD$M_FAIL */N/* */N/* PRE-CONDITIONS: */N/* */L/* The storage units must be initialised and mounted as Files-11 devices. */I/* The list of storage units must not include storage units in another */I/* pool. # */I/* The list of storage units must not include a SnappyDisk bound to a */I/* device. */N/* */N/* POST-CONDITIONS: */N/* */I/* A new pool is created on the storage units. # */I/* The storage units are stamped as belonging to the same pool. */N/* */N/* RETURN VALUE: */N/* */I/* Various statuses */N/* */N/*-- # */N/* */'#define sd$create_pool SD$CREATE_POOL #ifdef __NEW_STARLETunsigned int sd$create_pool( void *unit_list, unsigned int segment_size, unsigned int flags);#else /* __OLD_STARLET */.unsigned int sd$create_pool(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* # */N/*++ */N/* */N/* ROUTINE: */N/* */I/* sd$create_snap POOL_DEVICE, DISK_DEVICE, DISK_NAME, FLAGS */N/* */I/* FUNCTIONAL DESC#RIPTION: */N/* */I/* Runtime library routine */I/* Create a snap of an existing SnappyDisk */N/* */N/* FORMAL PARAMETERS: */N/* # */B/* POOL_DEVICE (IN) : Name of pool device to use */B/* DISK_DEVICE (IN) : Name of SnappyDisk device to use as basis */4/* for snap */A/* DISK_NAME (IN) : Name of SnappyDisk to create */=/* FLAGS (IN) : Should we record time snap was taken */7/* for incremental backup purposes, SD$M_RECORD */N/* */N/* PRE-CONDITIONS: # */N/* */I/* The pool must be bound */I/* The original SnappyDisk must be exported as a device */N/* */N/* POST-CONDITIONS: */N/* # */M/* A new SnappyDisk is created in the pool. That SnappyDisk will be a snap */I/* of the original SnappyDisk specified in the call. */N/* */N/* RETURN VALUE: */N/* */I/* Various statuses */N/* # */N/*-- */N/* */'#define sd$create_snap SD$CREATE_SNAP #ifdef __NEW_STARLETunsigned int sd$create_snap( void *pool_device, void *disk_device, void *disk_name, unsigned int flags);#else /* __OLD_STARLET */.unsigned int sd$create_snap(__unknown_params);!#endif /* #ifd#ef __NEW_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: */N/* */I/* sd$delete_disk POOL_DEVICE, DISK_NAME */N/* # */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Delete a SnapDisk from a pool */N/* */N/* FORMAL PARAMETERS: # */N/* */B/* POOL_DEVICE (IN) : Name of pool device to use */A/* DISK_NAME (IN) : Name of SnappyDisk to delete */N/* */N/* PRE-CONDITIONS: */N/* */I/* The pool must# be bound */I/* The SnappyDisk name must exist in the pool */N/* The SnappyDisk named must not be bound to a device on the local computer */N/* */N/* POST-CONDITIONS: */N/* */I/* The SnappyDisk is deleted from the pool # */N/* */N/* RETURN VALUE: */N/* */I/* Various statuses */N/* */N/*-- */N/* # */'#define sd$delete_disk SD$DELETE_DISK #ifdef __NEW_STARLETunsigned int sd$delete_disk( void *pool_device, void *disk_name);#else /* __OLD_STARLET */.unsigned int sd$delete_disk(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/* # */N/* ROUTINE: */N/* */I/* sd$remove_units POOL_DEVICE, UNIT_LIST */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* # */I/* Runtime library routine */I/* Removes members from a pool. */I/* If the members are successfully removed, the metadata files are */I/* removed from the devices. */N/* */N/* FORMAL PARAMETERS: */N/* # */B/* POOL_DEVICE (IN) : Name of device to remove members */D/* UNIT_LIST (IN) : Item list 3 containing list of storage units */N/* */N/* PRE-CONDITIONS: */N/* */I/* The list of storage units must be part of the specified poo#l. */K/* The pool must contain enough free space to allow data on the outgoing */I/* storage units to be copied to other storage units in the pool. */I/* The list of storage units must not be the complete set of units in */I/* the pool. */N/* */N/* POST-CONDITIONS: */N/* # */I/* The remaining members are updated with the new pool */I/* membership list. */N/* */N/* RETURN VALUE: */N/* */I/* Various statuses # */N/* */N/*-- */N/* */)#define sd$remove_units SD$REMOVE_UNITS #ifdef __NEW_STARLETunsigned int sd$remove_units( void *pool_device, void *unit_list);#else /* __OLD_STARLET *//unsigned int sd$remove_units(__unknown_params);!#endif /* #ifdef __NEW_STARL#ET */N/* */N/*++ */N/* */N/* ROUTINE: */N/* */I/* sd$unbind VIRTUAL_DEVICE, FLAGS */N/* # */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Unbind a pool or SnapDisk. */N/* */N/* FORMAL PARAMETERS: # */N/* */E/* VIRTUAL_DEVICE (IN) : Name of device to unbind */=/* FLAGS (IN) : Optional flags SD$M_CLUSTER */N/* */N/* PRE-CONDITIONS: */N/* */N/* The pool or SnappyDisk must# be bound to the device on the local computer */N/* */N/* POST-CONDITIONS: */N/* */I/* The pool or SnappyDisk is unbound from the device */N/* */N/* RETURN VALUE: # */N/* */I/* Various statuses */N/* */N/*-- */N/* */#define sd$unbind SD$UNBIND #ifdef __NEW_STARLETunsigned int sd$unbind( void $*virtual_device, unsigned int flags);#else /* __OLD_STARLET */)unsigned int sd$unbind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: */N/* $ */E/* sd$get_disk DISK_DEVICE, ITMLST */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Get information about an exported disk. */J/*$ The information is returned using a standard OpenVMS */J/* itemlist mechanism. */J/* NOTE: The itemlist must be zero terminated */N/* */I/* Valid item codes are: */N/* */I/* SD$_BACKUP_DATE $ */I/* SD$_CREATION_DATE */I/* SD$_DELSPACE */I/* SD$_DISK_CAPACITY */I/* SD$_DISK_DEVICE */I/* SD$_DISK_NAME */I/* SD$_FAMILY_NUMBER */I/* SD$_MEMBER_NUMB$ER */I/* SD$_POOL_DEVICE */N/* */N/* FORMAL PARAMETERS: */N/* */B/* DISK_DEVICE (IN) : Name of SnappyDisk device */I/* ITMLST (IN): Address of items to return $ */N/* */N/* PRE-CONDITIONS: */N/* */I/* The device must be a SnappyDisk device */N/* */N/* POST-CONDITIONS: */N/* $ */I/* The information requested is returned */N/* */N/* RETURN VALUE: */N/* */D/* SS$_NORMAL - Member info returned */D/* SS$_ACCVIO - Parameters not accessible $ */F/* SS$_BADPARAM - One or more item codes are invalid */N/* SS$_IVBUFLEN - one or more buffer lengths are invalid */F/* SS$_IVDEVNAM - ucb is not that of a pool member */F/* SS$_NOTBOUND - the member is not bound into a pool */I/* SS$_SDDISABLED - Snap-capable disk not loaded */N/*-- */N/* $ */!#define sd$get_disk SD$GET_DISK #ifdef __NEW_STARLETunsigned int sd$get_disk( void *disk_device, void *itmlst);#else /* __OLD_STARLET */+unsigned int sd$get_disk(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/*  $ */N/* ROUTINE: */N/* */>/* sd$get_pool POOL_DEVICE, ITMLST */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine  $ */I/* Get pool-wide information */J/* The information is returned using a standard OpenVMS */J/* itemlist mechanism. */J/* NOTE: The itemlist must be zero terminated */N/* */I/* Valid item codes are: */N/*  $ */I/* SD$_CREATION_DATE */I/* SD$_FREE_SEGMENTS */I/* SD$_HIGHEST_UNIT */I/* SD$_LOWEST_UNIT */I/* SD$_MAJOR_ID */I/* SD$_MAX_DISK  $ */I/* SD$_MAX_FAMILY */I/* SD$_MAX_UNITS */I/* SD$_MINOR_ID */I/* SD$_MODIFIED_DATE */I/* SD$_POOL_ID */I/* SD$_POOL_OPTIONS */I/* SD$_SEGMENT_SIZE  $ */I/* SD$_SEQUENCE_NUMBER */I/* SD$_TOTAL_SEGMENTS */I/* SD$_UNIT_COUNT */N/* */N/* FORMAL PARAMETERS: */N/* $ */B/* POOL_DEVICE (IN) : Name of storage pool */>/* ITMLST (IN) : Address of items to return */N/* */N/* PRE-CONDITIONS: */N/* */I/* A context must have been started with sd$get_pool_begin */N/* $ */N/* POST-CONDITIONS: */N/* */I/* The information requested is returned */N/* */N/* RETURN VALUE: */N/* $ */D/* SS$_NORMAL - Next member returned */F/* SS$_BADPARAM - One or more item codes are invalid */N/* SS$_IVBUFLEN - One or more buffer lengths are invalid */I/* SS$_SDDISABLED - Snap-capable disk not loaded */N/*-- */N/* */!#define sd$get_pool SD$GET_POOL #i $fdef __NEW_STARLETunsigned int sd$get_pool( void *pool_device, void *itmlst);#else /* __OLD_STARLET */+unsigned int sd$get_pool(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: $ */N/* */C/* sd$get_pool_begin POOL_DEVICE, POOL_CONTEXT */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Routine to setup context to r$ead SnapDisk pool */I/* parameters from a pool device. */N/* */N/* FORMAL PARAMETERS: */N/* */B/* POOL_DEVICE (IN) : Name of pool device to query */C/* POOL_CONTEXT (IN) : Address of context to return */N/* $ */N/* PRE-CONDITIONS: */N/* */I/* The pool device must exist */N/* */N/* POST-CONDITIONS: */N/* $ */I/* A context is setup to allow sd$get_pool and sd$get_pooldevice */I/* to be called to return the pool parameters. */N/* */N/* RETURN VALUE: */N/* */I/* Various statuses * $/N/* */N/*-- */N/* */-#define sd$get_pool_begin SD$GET_POOL_BEGIN #ifdef __NEW_STARLETunsigned int sd$get_pool_begin( void *pool_device, void *pool_context);#else /* __OLD_STARLET */1unsigned int sd$get_pool_begin(__unknown_params);!#endif /* #ifdef __NEW_STARL$ET */N/* */N/*++ */N/* */N/* ROUTINE: */N/* */;/* sd$get_pool_disk POOL_CONTEXT, ITMLST */N/* $ */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */L/* Routine to return the information for the next SnappyDisk in the pool. */N/* */I/* For example: *$/N/* */N/* status = sd$get_pool_begin(raw_device, context) */I/* while (success(status)) */I/* status = sd$get_pool_disk(context, itmlst) */N/* status = sd$get_pool_end(context) */N/* */I/* Valid item code are: $ */N/* */I/* SD$_BACKUP_DATE */I/* SD$_CREATION_DATE */I/* SD$_DELSPACE */I/* SD$_DISK_CAPACITY */I/* SD$_DISK_DEVICE */I$/* SD$_DISK_NAME */I/* SD$_FAMILY_NUMBER */I/* SD$_MEMBER_NUMBER */I/* SD$_POOL_DEVICE */N/* */N/* FORMAL PARAMETERS: */N/* $ */C/* POOL_CONTEXT (IN) : Address of pool context */I/* ITMLST (IN): Address of items to return */N/* */N/* PRE-CONDITIONS: */N/* */I/* A context must have been started with sd$get_pool_begin */N/* $ */N/* POST-CONDITIONS: */N/* */I/* The next member is returned */N/* */N/* RETURN VALUE: */N/* $ */D/* SS$_NORMAL - Next member returned */G/* SS$_NOMOREDEV - No more diks in pool */N/*-- */N/* */+#define sd$get_pool_disk SD$GET_POOL_DISK #ifdef __NEW_STARLETunsigned int sd$get_pool_disk( void *pool_context, void *itmlst);#else /* __OLD $_STARLET */0unsigned int sd$get_pool_disk(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: */N/* */B/* sd$ $get_pool_end POOL_CONTEXT */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Routine to tidy up the context associated with a */I/* sd$get_pool_begin. !$ */N/* */N/* FORMAL PARAMETERS: */N/* */C/* POOL_CONTEXT (IN) : Address of context to delete */N/* */N/* PRE-CONDITIONS: */N/* "$ */I/* A context must have been started with sd$get_pool_begin */N/* */N/* POST-CONDITIONS: */N/* */I/* The context is deleted */N/* #$ */N/* RETURN VALUE: */N/* */I/* SS$_NORMAL */N/* */N/*-- */N/* */) $$#define sd$get_pool_end SD$GET_POOL_END #ifdef __NEW_STARLETunsigned int sd$get_pool_end( void *pool_context);#else /* __OLD_STARLET *//unsigned int sd$get_pool_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: %$ */N/* */;/* sd$get_pool_unit POOL_CONTEXT, NEXT_UNIT */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */&$I/* Routine to return the next member device making up the pool. */I/* This routine is designed to be called in a loop to return */I/* all the members making up the pool. */I/* For example: */N/* */N/* status = sd$get_pool_begin(raw_device, context) */I/* while (success(status)) '$ */I/* status = sd$get_pool_unit(context, unit_device) */N/* status = sd$get_pool_end */N/* */N/* FORMAL PARAMETERS: */N/* */C/* POOL_CONTEXT (IN) : Address of context */C/* N($EXT_UNIT (OUT) : Address of descriptor to return */N/* */N/* PRE-CONDITIONS: */N/* */I/* A context must have been started with sd$get_pool_begin */N/* */N/* POST-CONDITIONS: )$ */N/* */I/* The next member is returned */N/* */N/* RETURN VALUE: */N/* */D/* SS$_NORMAL - Next member returned */G/* S*$S$_NOMOREDEV - No more devices */F/* SS$_BADPARAM - Invalid context */I/* SS$_SDDISABLED - Snap-capable disk not loaded */N/* */N/*-- */N/* */+#define sd$get_pool_unit SD$GET_POOL_UNIT +$#ifdef __NEW_STARLETunsigned int sd$get_pool_unit( void *pool_context, void *next_unit);#else /* __OLD_STARLET */0unsigned int sd$get_pool_unit(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: ,$ */N/* */B/* sd$get_raw_begin UNIT_DEVICE, UNIT_CONTEXT */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Routine to setup -$context to read SnappyDisk pool */I/* parameters from a raw (mounted but not bound) storage unit. */N/* */N/* FORMAL PARAMETERS: */N/* */B/* UNIT_DEVICE (IN) : Name of storage unit to query */C/* UNIT_CONTEXT (IN) : Address of context to return *.$/N/* */N/* PRE-CONDITIONS: */N/* */I/* The member device must be mounted but not bound */N/* */N/* POST-CONDITIONS: */N/* /$ */I/* A context is setup to allow sd$get_raw_info and sd$get_unitdevice */I/* to be called to return pool parameters stored on the member. */N/* */N/* RETURN VALUE: */N/* */I/* Various statuses 0$ */N/* */N/*-- */N/* */+#define sd$get_raw_begin SD$GET_RAW_BEGIN #ifdef __NEW_STARLETunsigned int sd$get_raw_begin( void *unit_device, void *unit_context);#else /* __OLD_STARLET */0unsigned int sd$get_raw_begin(__unknown_params);!#endif /* #ifdef __NEW1$_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: */N/* */A/* sd$get_raw_end UNIT_CONTEXT */N/* 2$ */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Routine to tidy up the context associated with a */I/* sd$get_raw_begin. */N/* 3$ */N/* FORMAL PARAMETERS: */N/* */C/* UNIT_CONTEXT (IN) : Address of context */N/* */N/* PRE-CONDITIONS: */N/* */I/* A context must have4$ been started with sd$get_raw_begin */N/* */N/* POST-CONDITIONS: */N/* */I/* The context is deleted */N/* */N/* RETURN VALUE: 5$ */N/* */I/* SS$_NORMAL */N/* */N/*-- */N/* */'#define sd$get_raw_end SD$GET_RAW_END #ifdef __NEW_STARLETunsigned int sd$ge 6$t_raw_end( void *unit_context);#else /* __OLD_STARLET */.unsigned int sd$get_raw_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/*++ */N/* */N/* ROUTINE: */N/* 7$ */B/* sd$get_raw_next UNIT_CONTEXT, NEXT_UNIT */N/* */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Routine to return the next member device making up the pool. */I/* This 8$routine is designed to be called in a loop to return */I/* all the members in the pool making up the device. */I/* For example: */N/* */N/* status = sd$get_raw_begin(raw_device, context) */I/* while (success(status)) */I/* status = sd$get_raw_next(context, unit_devi9$ce) */N/* status = sd$get_raw_end */N/* */N/* FORMAL PARAMETERS: */N/* */C/* UNIT_CONTEXT (IN) : Address of context */B/* NEXT_UNIT(OUT) : Address of descriptor to return */N/* :$ */N/* PRE-CONDITIONS: */N/* */I/* A context must have been started with sd$get_raw_begin */N/* */N/* POST-CONDITIONS: */N/* ;$ */I/* The next member is returned */N/* */N/* RETURN VALUE: */N/* */D/* SS$_NORMAL - Next member returned */G/* SS$_NOMOREDEV - No more devices */N/* <$ */N/*-- */N/* */)#define sd$get_raw_next SD$GET_RAW_NEXT #ifdef __NEW_STARLETunsigned int sd$get_raw_next( void *unit_context, void *next_unit);#else /* __OLD_STARLET *//unsigned int sd$get_raw_next(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* =$ */N/*++ */N/* */N/* ROUTINE: */N/* */B/* sd$get_raw_info UNIT_CONTEXT, ITMLST */N/* >$ */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Get information from the member */J/* The information is returned using a standard OpenVMS */J/* itemlist mechanism. */J/* NOTE: The itemlist must be?$ zero terminated */N/* */I/* Valid item codes are: */N/* */I/* SD$_CREATION_DATE */I/* SD$_HIGHEST_UNIT */I/* SD$_LOWEST_UNIT *@$/I/* SD$_MAJOR_ID */I/* SD$_MAX_DISK */I/* SD$_MAX_FAMILY */I/* SD$_MAX_UNITS */I/* SD$_MINOR_ID */I/* SD$_MODIFIED_DATE */I/* SD$_POOL_ID A$ */I/* SD$_POOL_OPTIONS */I/* SD$_SEGMENT_SIZE */I/* SD$_SEQUENCE_NUMBER */I/* SD$_UNIT_COUNT */I/* SD$_UNIT_ID */I/* SD$_UNIT_NUMBER */I/* SD$_UNIT_OPTIONS B$ */N/* */N/* FORMAL PARAMETERS: */N/* */C/* UNIT_CONTEXT (IN) : Address of context */E/* ITMLST (IN) : Address of items to return */N/* C$ */N/* PRE-CONDITIONS: */N/* */I/* A context must have been started with sd$get_raw_begin */N/* */N/* POST-CONDITIONS: */N/* */I/* The informationD$ requested is returned */N/* */N/* RETURN VALUE: */N/* */D/* SS$_NORMAL - Next member returned */F/* SS$_BADPARAM - One or more item codes are invalid */N/* SS$_IVBUFLEN - One or more buffer lengths are invalid E$ */N/*-- */N/* */)#define sd$get_raw_info SD$GET_RAW_INFO #ifdef __NEW_STARLETunsigned int sd$get_raw_info( void *unit_context, void *itmlst);#else /* __OLD_STARLET *//unsigned int sd$get_raw_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* F$*/N/*++ */N/* */N/* ROUTINE: */N/* */?/* sd$get_stats POOL_DEVICE, ITMLST */N/* */I/* FUNCTIONAL DESCRIPTION: G$ */N/* */I/* Runtime library routine */I/* Get monitor-type runtime statistics on a system-wide */I/* or per-pool basis. */N/* */I/* If POOL_DEVICE is NULL, this call returns the system-wide */I/*H$ statistics otherwise it returns the statistics for the */I/* specified pool. */N/* */J/* The information is returned using a standard OpenVMS */J/* itemlist mechanism. */J/* NOTE: The itemlist must be zero terminated */N/* I$ */I/* Valid item codes are: */N/* */I/* SD$_COPY_OUTS */I/* SD$_DISK_READS */I/* SD$_DISK_WRITES */I/* SD$_READS */I/* SD$_SPLIT_RJ$EADS */I/* SD$_SPLIT_WRITES */I/* SD$_WRITES */N/* */N/* FORMAL PARAMETERS: */N/* */B/* POOL_DEVICE(IN) : Pool device name K$ */E/* ITMLST (IN) : Address of items to return */N/* */N/* PRE-CONDITIONS: */N/* */I/* The SnappyDisk driver must be loaded and enabled. */I/* For a non NULL pool_device, the pool must be bound to the device on */I/* the local computer. L$ */N/* */N/* POST-CONDITIONS: */N/* */I/* The information requested is returned */N/* */N/* RETURN VALUE: M$ */N/* */D/* SS$_NORMAL - Stats returned */D/* SS$_ACCVIO - Parameters not accessible */F/* SS$_BADPARAM - One or more item codes are invalid */N/* SS$_IVBUFLEN - one or more buffer lengths are invalid */F/* SS$_IVDEVNAM - Device is not a pool device */G/* SS$_NOSUCHDEV - No such pool device N$ */I/* SS$_SDDISABLED - Snap-capable disk not loaded */N/*-- */N/* */##define sd$get_stats SD$GET_STATS #ifdef __NEW_STARLETunsigned int sd$get_stats( void *pool_device, void *itmlst);#else /* __OLD_STARLET */,unsigned int sd$get_stats(__unknown_params);!#endif /* #ifdef __NEW_STARLET *O$/N/* */N/*++ */N/* */N/* ROUTINE: */N/* */E/* sd$get_unit UNIT_DEVICE, ITMLST */N/* P$ */I/* FUNCTIONAL DESCRIPTION: */N/* */I/* Runtime library routine */I/* Get information about a pool member */J/* The information is returned using a standard OpenVMS */J/* itemlist mechanism. Q$*/J/* NOTE: The itemlist must be zero terminated */N/* */I/* Valid item codes are: */N/* */I/* SD$_DATA_LBN */I/* SD$_DATA_SIZE */I/* SD$_FREE_SEGMENTS R$ */I/* SD$_META_LBN */I/* SD$_META_SIZE */I/* SD$_POOL_DEVICE */I/* SD$_TOTAL_SEGMENTS */I/* SD$_UNIT_ID */I/* SD$_UNIT_NUMBER */I/* SD$_UNIT_S$OPTIONS */N/* */N/* FORMAL PARAMETERS: */N/* */B/* UNIT_DEVICE (IN) : Name of storage unit */E/* ITMLST (IN) : Address of items to return */N/* T$ */N/* PRE-CONDITIONS: */N/* */I/* The storage unit must exist on the local computer */N/* */N/* POST-CONDITIONS: */N/* */I/* The inforU$mation requested is returned */N/* */N/* RETURN VALUE: */N/* */D/* SS$_NORMAL - Member info returned */D/* SS$_ACCVIO - Parameters not accessible */F/* SS$_BADPARAM - One or more item codes are invalid V$ */N/* SS$_IVBUFLEN - one or more buffer lengths are invalid */F/* SS$_IVDEVNAM - ucb is not that of a pool member */F/* SS$_NOTBOUND - the member is not bound into a pool */I/* SS$_SDDISABLED - Snap-capable disk not loaded */N/*-- */N/* */!#define sd$get_unit SD$GET_UNITW$ #ifdef __NEW_STARLETunsigned int sd$get_unit( void *unit_device, void *itmlst);#else /* __OLD_STARLET */+unsigned int sd$get_unit(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif / X$* __SDDEF_LOADED */ ww;yH/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $SDFDEF ***/#ifndef __SDFDEF_LOADED Y$#define __SDFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __unZ$known_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 N/* */N/* Symbol definition [$ */N/* */#define SDF$K_NAME 10#define SDF$C_NAME 10 #ifdef __NEW_STARLETtypedef struct _sdfdef { __union {N unsigned char sdf$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {! char sdfdef$$_fill_1;" } sdf$r_gsdtyp_fields; } sdf$r_gsdtyp_overlay;N unsigned char sdf$b_datyp; /*Maps over GSY$B_DATYP \$ */N unsigned short int sdf$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char sdf$b_psindx; /*Owning psect number */N unsigned int sdf$l_value; /*Value of symbol */N unsigned char sdf$b_namlng; /*Length of name */N char sdf$t_name [31]; /*Symbol name */ } SDFDEF; #if !defined(__VAXC)6#define sdf$b_gsdtyp sdf$r_gsdtyp_overlay.sdf$b_gsdt]$yp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct sdfdef { __union {N unsigned char sdf$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {! char sdfdef$$_fill_1;" } sdf$r_gsdtyp_fields; } sdf$r_gsdtyp_overlay;N unsigned char sdf$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int sdf$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char sdf$b_psin^$dx; /*Owning psect number */N unsigned int sdf$l_value; /*Value of symbol */N unsigned char sdf$b_namlng; /*Length of name */N char sdf$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)6#define sdf$b_gsdtyp sdf$r_gsdtyp_overlay.sdf$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR_$#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SDFDEF_LOADED */ ww[H/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J `$/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $SDFMDEF ***/#ifndef __SDFMDEF_LOADED#define __SDFMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas sua$pported */\#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#endifb$#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* Symbol definition for version mask symbols */N/* */#define SDFM$K_NAME 14#define SDFM$C_NAME 14 #ifdef __NEW_STARLETtypedef struct _sdfmdef { __union {N unsi c$gned char sdfm$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char sdfmdef$$_fill_1;# } sdfm$r_gsdtyp_fields; } sdfm$r_gsdtyp_overlay;N unsigned char sdfm$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int sdfm$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char sdfm$b_psindx; /*Owning psect number */N unsigned int sdfm$l_value; /*Value of symbol d$ */N unsigned int sdfm$l_version_mask; /*Mask for symbol */N unsigned char sdfm$b_namlng; /*Length of name */N char sdfm$t_name [31]; /*Symbol name */ } SDFMDEF; #if !defined(__VAXC)9#define sdfm$b_gsdtyp sdfm$r_gsdtyp_overlay.sdfm$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct sdfmdef { __union {N unsigned char sdfm$b_gsdtyp; /*Maps e$ over GSY$B_GSDTYP */ __struct {" char sdfmdef$$_fill_1;# } sdfm$r_gsdtyp_fields; } sdfm$r_gsdtyp_overlay;N unsigned char sdfm$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int sdfm$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char sdfm$b_psindx; /*Owning psect number */N unsigned int sdfm$l_value; /*Value of symbol */N unsigned int sdfm$ f$l_version_mask; /*Mask for symbol */N unsigned char sdfm$b_namlng; /*Length of name */N char sdfm$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define sdfm$b_gsdtyp sdfm$r_gsdtyp_overlay.sdfm$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas g$supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SDFMDEF_LOADED */ ww{I/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SD h$I;1 *//********************************************************************************************************************************//*** MODULE $SDFVDEF ***/#ifndef __SDFVDEF_LOADED#define __SDFVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the prei$viously-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 j$union#else#define __union variant_union#endif#endif N/* */N/* Symbol definition for vectored symbols */N/* */#define SDFV$K_NAME 14#define SDFV$C_NAME 14 #ifdef __NEW_STARLETtypedef struct _sdfvdef { __union {N unsigned char sdfv$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ k$ __struct {" char sdfvdef$$_fill_1;# } sdfv$r_gsdtyp_fields; } sdfv$r_gsdtyp_overlay;N unsigned char sdfv$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int sdfv$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char sdfv$b_psindx; /*Owning psect number */N unsigned int sdfv$l_value; /*Value of symbol */N unsigned int sdfv$l_vector; /*Vectored valuel$ of symbol */N unsigned char sdfv$b_namlng; /*Length of name */N char sdfv$t_name [31]; /*Symbol name */ } SDFVDEF; #if !defined(__VAXC)9#define sdfv$b_gsdtyp sdfv$r_gsdtyp_overlay.sdfv$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct sdfvdef { __union {N unsigned char sdfv$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" m$char sdfvdef$$_fill_1;# } sdfv$r_gsdtyp_fields; } sdfv$r_gsdtyp_overlay;N unsigned char sdfv$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int sdfv$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char sdfv$b_psindx; /*Owning psect number */N unsigned int sdfv$l_value; /*Value of symbol */N unsigned int sdfv$l_vector; /*Vectored value of symbol */N unsign n$ed char sdfv$b_namlng; /*Length of name */N char sdfv$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define sdfv$b_gsdtyp sdfv$r_gsdtyp_overlay.sdfv$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restoreo$ the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SDFVDEF_LOADED */ wwcI/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//*********************************************************** p$*********************************************************************//*** MODULE $SDFWDEF ***/#ifndef __SDFWDEF_LOADED#define __SDFWDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_sizq$e __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 N r$/* */N/* Symbol definition with word of psect value */N/* */#define SDFW$K_NAME 11#define SDFW$C_NAME 11 #ifdef __NEW_STARLETtypedef struct _sdfwdef { __union {N unsigned char sdfw$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char sdfwdef$$_fill_1;# s$ } sdfw$r_gsdtyp_fields; } sdfw$r_gsdtyp_overlay;N unsigned char sdfw$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int sdfw$w_flags; /*Maps over GSY$W_FLAGS */N unsigned short int sdfw$w_psindx; /*Owning psect number */N unsigned int sdfw$l_value; /*Value of symbol */N unsigned char sdfw$b_namlng; /*Length of name */N char sdfw$t_name [31]; /*Syt$mbol name */ } SDFWDEF; #if !defined(__VAXC)9#define sdfw$b_gsdtyp sdfw$r_gsdtyp_overlay.sdfw$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct sdfwdef { __union {N unsigned char sdfw$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {" char sdfwdef$$_fill_1;# } sdfw$r_gsdtyp_fields; } sdfw$r_gsdtyp_overlay;N unsigned char sdfw$b_datyp; /*Maps over u$GSY$B_DATYP */N unsigned short int sdfw$w_flags; /*Maps over GSY$W_FLAGS */N unsigned short int sdfw$w_psindx; /*Owning psect number */N unsigned int sdfw$l_value; /*Value of symbol */N unsigned char sdfw$b_namlng; /*Length of name */N char sdfw$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)9#define sdfw$b_gsdtyp sdfw$r_gsdtyp_overlav$y.sdfw$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SDFWDEF_LOADED */ wwI/***************************************************** w$***************************************************************************/=/* Created: 5-Apr-2012 13:00:48 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $SDVDEF ***/#ifndef __SDVDEF_LOADED#define __SDVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard featuresx$ */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __optiony$al_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 N/*+ */N/* */N/* Switch, enable/disable device path information z$ */N/* */N/* **** NOTE **** */N/* */N/* New items must always be added at the END of the list so that */N/* users will not have to rebuild. */N/* */N/*- {$ */N#define SDV$_MP_SWITCH_PATH 1 /* Switch device path */N#define SDV$_MP_ENABLE_PATH 2 /* Enable device path */N#define SDV$_MP_DISABLE_PATH 3 /* Disable device path */N/* */L/**** ADD NEW ITEM-CODES IMMEDIATELY BEFORE THIS COMMENT ***** */N/* |$ */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SDVDEF_LOADED */ ww&J/***************************************************************************************************************** }$***************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $SECDEF ***/#ifndef __SECDEF_LOADED#define __SECDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember~$_alignmentR#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 N/*+ */N/* PROCESS OR GLOBAL SECTION DEFINITIONS */N/*- */N/* $ */N/* ***** L_VBN, L_WINDOW, and L_PFC must be the same offset values as the */N/* ***** equivalently named offsets in $PFLDEF. */N/* */ #define SEC$M_GBL 0x1#define SEC$M_CRF 0x2#define SEC$M_DZRO 0x4#define SEC$M_WRT 0x8#define SEC$M_SHMGS 0x10#define SEC$M_ARGS64 0x20#define SEC$M_WRTMOD 0xC0#define SEC$M_AMOD 0x300#define SEC$M_UNCACHED 0$x400"#define SEC$M_READ_ONLY_SHPT 0x800#define SEC$M_SHARED_PTS 0x1000#define SEC$M_MRES 0x2000#define SEC$M_PERM 0x4000#define SEC$M_SYSGBL 0x8000#define SEC$M_PFNMAP 0x10000#define SEC$M_EXPREG 0x20000#define SEC$M_PROTECT 0x40000#define SEC$M_PAGFIL 0x80000#define SEC$M_EXECUTE 0x100000 #define SEC$M_NOPROTCHK 0x200000!#define SEC$M_NO_OVERMAP 0x400000#define SEC$M_INPROG 0x800000 #define SEC$M_PARANOID 0x1000000 #define SEC$M_GRANHINT 0x2000000"#define SEC$M_MRES_A $LLOC 0x4000000 #define SEC$M_RAD_HINT 0x8000000 #ifdef __NEW_STARLETtypedef struct _secdef { __union {O int sec$l_gsd; /*GLOBAL SECTION DESCRIPTOR ADDRESS */^ int sec$l_ccb; /*CHANNEL CONTROL BLOCK ADDRESS IF PROCESS SECTION */ } sec$r_gsd_overlay;N unsigned int sec$l_secxfl; /*SECTION INDEX FORWARD LINK */N unsigned int sec$l_secxbl; /*SECTION INDEX BACKWARD LINK */N unsigned int sec $$l_pfc; /*PFC - Page Fault Cluster */ __union {T __int64 sec$q_mres_refcnt; /*REFERENCE COUNT FOR MRES/SHMGS SECTIONS */ __struct {N __union { /*BASE VIRTUAL BLOCK NUMBER */' unsigned int sec$l_vbn;+ unsigned __int64 sec$q_vbn;$ } sec$r_vbn_overlay;N int sec$l_window; /*WINDOW CONTROL BLOCK */ } sec$r_file_fields;" $ } sec$r_mres_file_overlay;N/* */N/* ***** NOTE ***** */N/* All flags in sec$l_flags must be kept in sync with flags in the */N/* SECFLG structure defined further in this module. */N/* **************** */N/* $ */ __union {O unsigned int sec$l_flags; /* VARIOUS CONTROL FLAGS IN LOW WORD */ __struct {N unsigned sec$v_gbl : 1; /* GLOBAL SECTION */N unsigned sec$v_crf : 1; /* COPY ON REFERENCE */N unsigned sec$v_dzro : 1; /* DEMAND ZERO */N unsigned sec$v_wrt : 1; /* WRITABLE */N unsigned sec$v_shmgs : 1; /* SHARED MEMORY G$LOBAL SECTION */N unsigned sec$v_args64 : 1; /* Arguments passed as quads */N unsigned sec$v_wrtmod : 2; /* WRITE ACCESS MODE FOR SECTION */N unsigned sec$v_amod : 2; /* ACCESS MODE OF SECTION */N unsigned sec$v_uncached : 1; /* PFN-map I/O space uncached. */] unsigned sec$v_read_only_shpt : 1; /* Shared page tables map section read-only */O unsigned sec$v_shared_pts : 1; /* Section is a shared PT$ section */N unsigned sec$v_mres : 1; /* MEMORY RESIDENT SECTION */N unsigned sec$v_perm : 1; /* PERMANENT SECTION */R unsigned sec$v_sysgbl : 1; /* 1 = SYSTEM GLOBAL, 0 = GROUP GLOBAL */N/* */N/* ***** THE FOLLOWING FLAGS ARE INDICATORS FOR PRIVATE AND GLOBAL SECTION */N/* ***** SYSTEM SERVICE REQUESTS AND ARE NOT STORED IN THE FLAGS LONGWORD */N/* *****$ FIELD. */N/* */N unsigned sec$v_pfnmap : 1; /* MAP TO SPECIFIC PFN'S */P unsigned sec$v_expreg : 1; /* MAP INTO FIRST FREE ADDRESS SPACE */O unsigned sec$v_protect : 1; /* CHECK WRITE ACCESS MODE (WRTMOD) */Y unsigned sec$v_pagfil : 1; /* GLOBAL SECTION HAS PAGE FILE BACKING STORE */N unsign$ed sec$v_execute : 1; /* CHECK FOR EXECUTE ACCESS */N unsigned sec$v_noprotchk : 1; /* INHIBIT PROTECTION CHECK */N unsigned sec$v_no_overmap : 1; /* DON'T OVERMAP ADDRESS SPACE */N unsigned sec$v_inprog : 1; /* Section creation in progress */N unsigned sec$v_paranoid : 1; /* Go into paranoia mode */N unsigned sec$v_granhint : 1; /* Allow enhanced GH regions */] unsigned sec$v_mres_alloc : 1; /$* Allocate memory resident pages during create */O unsigned sec$v_rad_hint : 1; /* Allocate pages based on RAD hint */( unsigned sec$v_fill_18_ : 4; } sec$r_flags_bits; } sec$r_flags_overlay;j int sec$l_refcnt; /* COUNT OF PTE'S REFERENCING THIS SECTION (unless MRES/SHMGS) */N/* */Z/* UNIT_CNT contains the number of pagelets (512 byte units) in the section, $ except for */d/* PFN-mapped sections. In that case, UNIT_CNT contains the number of PFNs mapped by the section. */N/* */N unsigned int sec$l_vpx; /* Starting virtual page index */T __union { /* Number of pagelets/PFNs in the section */$ unsigned int sec$l_unit_cnt;( unsigned __int64 sec$q_unit_cnt;! } sec$r_unit_cnt_overlay; } SECDEF; #if !d $efined(__VAXC)-#define sec$l_gsd sec$r_gsd_overlay.sec$l_gsd-#define sec$l_ccb sec$r_gsd_overlay.sec$l_ccbC#define sec$q_mres_refcnt sec$r_mres_file_overlay.sec$q_mres_refcntC#define sec$r_file_fields sec$r_mres_file_overlay.sec$r_file_fields?#define sec$l_vbn sec$r_file_fields.sec$r_vbn_overlay.sec$l_vbn?#define sec$q_vbn sec$r_file_fields.sec$r_vbn_overlay.sec$q_vbn3#define sec$l_window sec$r_file_fields.sec$l_window3#define sec$l_flags sec$r_flags_overlay.sec$l_flags@#define sec$v_$gbl sec$r_flags_overlay.sec$r_flags_bits.sec$v_gbl@#define sec$v_crf sec$r_flags_overlay.sec$r_flags_bits.sec$v_crfB#define sec$v_dzro sec$r_flags_overlay.sec$r_flags_bits.sec$v_dzro@#define sec$v_wrt sec$r_flags_overlay.sec$r_flags_bits.sec$v_wrtD#define sec$v_shmgs sec$r_flags_overlay.sec$r_flags_bits.sec$v_shmgsF#define sec$v_args64 sec$r_flags_overlay.sec$r_flags_bits.sec$v_args64F#define sec$v_wrtmod sec$r_flags_overlay.sec$r_flags_bits.sec$v_wrtmodB#define sec$v_amod sec$r_flags_overlay.s$ec$r_flags_bits.sec$v_amodJ#define sec$v_uncached sec$r_flags_overlay.sec$r_flags_bits.sec$v_uncachedV#define sec$v_read_only_shpt sec$r_flags_overlay.sec$r_flags_bits.sec$v_read_only_shptN#define sec$v_shared_pts sec$r_flags_overlay.sec$r_flags_bits.sec$v_shared_ptsB#define sec$v_mres sec$r_flags_overlay.sec$r_flags_bits.sec$v_mresB#define sec$v_perm sec$r_flags_overlay.sec$r_flags_bits.sec$v_permF#define sec$v_sysgbl sec$r_flags_overlay.sec$r_flags_bits.sec$v_sysgblF#define sec$v_pfnmap sec$r$_flags_overlay.sec$r_flags_bits.sec$v_pfnmapF#define sec$v_expreg sec$r_flags_overlay.sec$r_flags_bits.sec$v_expregH#define sec$v_protect sec$r_flags_overlay.sec$r_flags_bits.sec$v_protectF#define sec$v_pagfil sec$r_flags_overlay.sec$r_flags_bits.sec$v_pagfilH#define sec$v_execute sec$r_flags_overlay.sec$r_flags_bits.sec$v_executeL#define sec$v_noprotchk sec$r_flags_overlay.sec$r_flags_bits.sec$v_noprotchkN#define sec$v_no_overmap sec$r_flags_overlay.sec$r_flags_bits.sec$v_no_overmapF#define se$c$v_inprog sec$r_flags_overlay.sec$r_flags_bits.sec$v_inprogJ#define sec$v_paranoid sec$r_flags_overlay.sec$r_flags_bits.sec$v_paranoidJ#define sec$v_granhint sec$r_flags_overlay.sec$r_flags_bits.sec$v_granhintN#define sec$v_mres_alloc sec$r_flags_overlay.sec$r_flags_bits.sec$v_mres_allocJ#define sec$v_rad_hint sec$r_flags_overlay.sec$r_flags_bits.sec$v_rad_hint<#define sec$l_unit_cnt sec$r_unit_cnt_overlay.sec$l_unit_cnt<#define sec$q_unit_cnt sec$r_unit_cnt_overlay.sec$q_unit_cnt"#endif /* # $if !defined(__VAXC) */ #else /* __OLD_STARLET */struct secdef { __union {O int sec$l_gsd; /*GLOBAL SECTION DESCRIPTOR ADDRESS */^ int sec$l_ccb; /*CHANNEL CONTROL BLOCK ADDRESS IF PROCESS SECTION */ } sec$r_gsd_overlay;N unsigned int sec$l_secxfl; /*SECTION INDEX FORWARD LINK */N unsigned int sec$l_secxbl; /*SECTION INDEX BACKWARD LINK */N unsigned int sec$l_pfc; /*PF $C - Page Fault Cluster */ __union {T int sec$q_mres_refcnt [2]; /*REFERENCE COUNT FOR MRES/SHMGS SECTIONS */ __struct {N __union { /*BASE VIRTUAL BLOCK NUMBER */' unsigned int sec$l_vbn;+ unsigned int sec$q_vbn [2];$ } sec$r_vbn_overlay;N int sec$l_window; /*WINDOW CONTROL BLOCK */ } sec$r_file_fields;" } sec$r_mres_file_ $overlay;N/* */N/* ***** NOTE ***** */N/* All flags in sec$l_flags must be kept in sync with flags in the */N/* SECFLG structure defined further in this module. */N/* **************** */N/* */ __union {O$ unsigned int sec$l_flags; /* VARIOUS CONTROL FLAGS IN LOW WORD */ __struct {N unsigned sec$v_gbl : 1; /* GLOBAL SECTION */N unsigned sec$v_crf : 1; /* COPY ON REFERENCE */N unsigned sec$v_dzro : 1; /* DEMAND ZERO */N unsigned sec$v_wrt : 1; /* WRITABLE */N unsigned sec$v_shmgs : 1; /* SHARED MEMORY GLOBAL SECTION */N $ unsigned sec$v_args64 : 1; /* Arguments passed as quads */N unsigned sec$v_wrtmod : 2; /* WRITE ACCESS MODE FOR SECTION */N unsigned sec$v_amod : 2; /* ACCESS MODE OF SECTION */N unsigned sec$v_uncached : 1; /* PFN-map I/O space uncached. */] unsigned sec$v_read_only_shpt : 1; /* Shared page tables map section read-only */O unsigned sec$v_shared_pts : 1; /* Section is a shared PT section */N $ unsigned sec$v_mres : 1; /* MEMORY RESIDENT SECTION */N unsigned sec$v_perm : 1; /* PERMANENT SECTION */R unsigned sec$v_sysgbl : 1; /* 1 = SYSTEM GLOBAL, 0 = GROUP GLOBAL */N/* */N/* ***** THE FOLLOWING FLAGS ARE INDICATORS FOR PRIVATE AND GLOBAL SECTION */N/* ***** SYSTEM SERVICE REQUESTS AND ARE NOT STORED IN THE FLAGS LONGWORD */N/* ***** FIELD. $ */N/* */N unsigned sec$v_pfnmap : 1; /* MAP TO SPECIFIC PFN'S */P unsigned sec$v_expreg : 1; /* MAP INTO FIRST FREE ADDRESS SPACE */O unsigned sec$v_protect : 1; /* CHECK WRITE ACCESS MODE (WRTMOD) */Y unsigned sec$v_pagfil : 1; /* GLOBAL SECTION HAS PAGE FILE BACKING STORE */N unsigned sec$v_execute : 1; /*$ CHECK FOR EXECUTE ACCESS */N unsigned sec$v_noprotchk : 1; /* INHIBIT PROTECTION CHECK */N unsigned sec$v_no_overmap : 1; /* DON'T OVERMAP ADDRESS SPACE */N unsigned sec$v_inprog : 1; /* Section creation in progress */N unsigned sec$v_paranoid : 1; /* Go into paranoia mode */N unsigned sec$v_granhint : 1; /* Allow enhanced GH regions */] unsigned sec$v_mres_alloc : 1; /* Allocate memory reside $nt pages during create */O unsigned sec$v_rad_hint : 1; /* Allocate pages based on RAD hint */( unsigned sec$v_fill_18_ : 4; } sec$r_flags_bits; } sec$r_flags_overlay;j int sec$l_refcnt; /* COUNT OF PTE'S REFERENCING THIS SECTION (unless MRES/SHMGS) */N/* */Z/* UNIT_CNT contains the number of pagelets (512 byte units) in the section, except for */d/* PFN-m $apped sections. In that case, UNIT_CNT contains the number of PFNs mapped by the section. */N/* */N unsigned int sec$l_vpx; /* Starting virtual page index */T __union { /* Number of pagelets/PFNs in the section */$ unsigned int sec$l_unit_cnt;( unsigned int sec$q_unit_cnt [2];! } sec$r_unit_cnt_overlay; } ; #if !defined(__VAXC)-#define sec$l_$gsd sec$r_gsd_overlay.sec$l_gsd-#define sec$l_ccb sec$r_gsd_overlay.sec$l_ccbC#define sec$q_mres_refcnt sec$r_mres_file_overlay.sec$q_mres_refcntW#define sec$l_vbn sec$r_mres_file_overlay.sec$r_file_fields.sec$r_vbn_overlay.sec$l_vbnW#define sec$q_vbn sec$r_mres_file_overlay.sec$r_file_fields.sec$r_vbn_overlay.sec$q_vbnK#define sec$l_window sec$r_mres_file_overlay.sec$r_file_fields.sec$l_window3#define sec$l_flags sec$r_flags_overlay.sec$l_flags@#define sec$v_gbl sec$r_flags_overlay.sec$ $r_flags_bits.sec$v_gbl@#define sec$v_crf sec$r_flags_overlay.sec$r_flags_bits.sec$v_crfB#define sec$v_dzro sec$r_flags_overlay.sec$r_flags_bits.sec$v_dzro@#define sec$v_wrt sec$r_flags_overlay.sec$r_flags_bits.sec$v_wrtD#define sec$v_shmgs sec$r_flags_overlay.sec$r_flags_bits.sec$v_shmgsF#define sec$v_args64 sec$r_flags_overlay.sec$r_flags_bits.sec$v_args64F#define sec$v_wrtmod sec$r_flags_overlay.sec$r_flags_bits.sec$v_wrtmodB#define sec$v_amod sec$r_flags_overlay.sec$r_flags_bits.sec$v_amodJ$#define sec$v_uncached sec$r_flags_overlay.sec$r_flags_bits.sec$v_uncachedV#define sec$v_read_only_shpt sec$r_flags_overlay.sec$r_flags_bits.sec$v_read_only_shptN#define sec$v_shared_pts sec$r_flags_overlay.sec$r_flags_bits.sec$v_shared_ptsB#define sec$v_mres sec$r_flags_overlay.sec$r_flags_bits.sec$v_mresB#define sec$v_perm sec$r_flags_overlay.sec$r_flags_bits.sec$v_permF#define sec$v_sysgbl sec$r_flags_overlay.sec$r_flags_bits.sec$v_sysgblF#define sec$v_pfnmap sec$r_flags_overlay.sec$r_flags_b$its.sec$v_pfnmapF#define sec$v_expreg sec$r_flags_overlay.sec$r_flags_bits.sec$v_expregH#define sec$v_protect sec$r_flags_overlay.sec$r_flags_bits.sec$v_protectF#define sec$v_pagfil sec$r_flags_overlay.sec$r_flags_bits.sec$v_pagfilH#define sec$v_execute sec$r_flags_overlay.sec$r_flags_bits.sec$v_executeL#define sec$v_noprotchk sec$r_flags_overlay.sec$r_flags_bits.sec$v_noprotchkN#define sec$v_no_overmap sec$r_flags_overlay.sec$r_flags_bits.sec$v_no_overmapF#define sec$v_inprog sec$r_flags_overl $ay.sec$r_flags_bits.sec$v_inprogJ#define sec$v_paranoid sec$r_flags_overlay.sec$r_flags_bits.sec$v_paranoidJ#define sec$v_granhint sec$r_flags_overlay.sec$r_flags_bits.sec$v_granhintN#define sec$v_mres_alloc sec$r_flags_overlay.sec$r_flags_bits.sec$v_mres_allocJ#define sec$v_rad_hint sec$r_flags_overlay.sec$r_flags_bits.sec$v_rad_hint<#define sec$l_unit_cnt sec$r_unit_cnt_overlay.sec$l_unit_cnt<#define sec$q_unit_cnt sec$r_unit_cnt_overlay.sec$q_unit_cnt"#endif /* #if !defined(__VAXC) */ %$#endif /* #ifdef __NEW_STARLET */N/* */N/* ***** NOTE THAT NUMBER OF LONG WORDS MUST BE EVEN */N/* */N#define SEC$K_LENGTH 48 /*SIZE OF PSTE/GSTE */N#define SEC$C_LENGTH 48 /*SIZE OF PSTE/GSTE */N/* $ */N/* ***** NOTE ***** */N/* All flags in the SECFLG structure must be kept in sync with flags in */N/* sec$l_flags defined in the SECDEF structure. */N/* **************** */N/* */#define SECFLG$M_GBL 0x1#define SECFLG$M_CRF 0x2#define SECFLG$M_DZRO 0x4#define SECF$LG$M_WRT 0x8#define SECFLG$M_SHMGS 0x10#define SECFLG$M_ARGS64 0x20#define SECFLG$M_WRTMOD 0xC0#define SECFLG$M_AMOD 0x300#define SECFLG$M_UNCACHED 0x400%#define SECFLG$M_READ_ONLY_SHPT 0x800"#define SECFLG$M_SHARED_PTS 0x1000#define SECFLG$M_MRES 0x2000#define SECFLG$M_PERM 0x4000#define SECFLG$M_SYSGBL 0x8000#define SECFLG$M_PFNMAP 0x10000#define SECFLG$M_EXPREG 0x20000 #define SECFLG$M_PROTECT 0x40000#define SECFLG$M_PAGFIL 0x80000!#define SECFLG$M_EXECUTE 0x100000 $##define SECFLG$M_NOPROTCHK 0x200000$#define SECFLG$M_NO_OVERMAP 0x400000 #define SECFLG$M_INPROG 0x800000##define SECFLG$M_PARANOID 0x1000000##define SECFLG$M_GRANHINT 0x2000000%#define SECFLG$M_MRES_ALLOC 0x4000000##define SECFLG$M_RAD_HINT 0x8000000 #ifdef __NEW_STARLETtypedef struct _secdef_flags { __union {Y unsigned short int secflg$w_saved_flags; /* FLAGS SAVED IN SECTION TABLE ENTRY */O unsigned int secflg$l_flags; /* VARIOUS CONTROL FLAGS IN LOW WO$RD */ __struct {N unsigned secflg$v_gbl : 1; /* GLOBAL SECTION */N unsigned secflg$v_crf : 1; /* COPY ON REFERENCE */N unsigned secflg$v_dzro : 1; /* DEMAND ZERO */N unsigned secflg$v_wrt : 1; /* WRITABLE */N unsigned secflg$v_shmgs : 1; /* SHARED MEMORY GLOBAL SECTION */N unsigned secflg$v_args64 : 1; /* Arguments passed as quads $*/N unsigned secflg$v_wrtmod : 2; /* WRITE ACCESS MODE FOR SECTION */N unsigned secflg$v_amod : 2; /* ACCESS MODE OF SECTION */N unsigned secflg$v_uncached : 1; /* PFN-map I/O space uncached. */` unsigned secflg$v_read_only_shpt : 1; /* Shared page tables map section read-only */R unsigned secflg$v_shared_pts : 1; /* Section is a shared PT section */N unsigned secflg$v_mres : 1; /* MEMORY RESIDENT SECTION */N$ unsigned secflg$v_perm : 1; /* PERMANENT SECTION */T unsigned secflg$v_sysgbl : 1; /* 1 = SYSTEM GLOBAL, 0 = GROUP GLOBAL */N/* */N/* ***** THE FOLLOWING FLAGS ARE INDICATORS FOR PRIVATE AND GLOBAL SECTION */N/* ***** SYSTEM SERVICE REQUESTS AND ARE NOT STORED IN THE FLAGS LONGWORD */N/* ***** FIELD. */N/* $ */N unsigned secflg$v_pfnmap : 1; /* MAP TO SPECIFIC PFN'S */R unsigned secflg$v_expreg : 1; /* MAP INTO FIRST FREE ADDRESS SPACE */R unsigned secflg$v_protect : 1; /* CHECK WRITE ACCESS MODE (WRTMOD) */[ unsigned secflg$v_pagfil : 1; /* GLOBAL SECTION HAS PAGE FILE BACKING STORE */N unsigned secflg$v_execute : 1; /* CHECK FOR EXECUTE ACCESS */N unsigned sec$flg$v_noprotchk : 1; /* INHIBIT PROTECTION CHECK */P unsigned secflg$v_no_overmap : 1; /* DON'T OVERMAP ADDRESS SPACE */N unsigned secflg$v_inprog : 1; /* Section creation in progress */N unsigned secflg$v_paranoid : 1; /* Go into paranoia mode */N unsigned secflg$v_granhint : 1; /* Allow enhanced GH regions */` unsigned secflg$v_mres_alloc : 1; /* Allocate memory resident pages during create */R unsigned secflg$v_ $rad_hint : 1; /* Allocate pages based on RAD hint */+ unsigned secflg$v_fill_19_ : 4;" } secflg$r_flags_bits;! } secflg$r_flags_overlay; } SECDEF_FLAGS; #if !defined(__VAXC)H#define secflg$w_saved_flags secflg$r_flags_overlay.secflg$w_saved_flags<#define secflg$l_flags secflg$r_flags_overlay.secflg$l_flagsL#define secflg$v_gbl secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_gblL#define secflg$v_crf secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v$_crfN#define secflg$v_dzro secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_dzroL#define secflg$v_wrt secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_wrtP#define secflg$v_shmgs secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_shmgsR#define secflg$v_args64 secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_args64R#define secflg$v_wrtmod secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_wrtmodN#define secflg$v_amod secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_amodV#define secf$lg$v_uncached secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_uncachedb#define secflg$v_read_only_shpt secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_read_only_shptZ#define secflg$v_shared_pts secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_shared_ptsN#define secflg$v_mres secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_mresN#define secflg$v_perm secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_permR#define secflg$v_sysgbl secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_sy$sgblR#define secflg$v_pfnmap secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_pfnmapR#define secflg$v_expreg secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_expregT#define secflg$v_protect secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_protectR#define secflg$v_pagfil secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_pagfilT#define secflg$v_execute secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_executeX#define secflg$v_noprotchk secflg$r_flags_overlay.secflg$r_flags_bits.secflg$$v_noprotchkZ#define secflg$v_no_overmap secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_no_overmapR#define secflg$v_inprog secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_inprogV#define secflg$v_paranoid secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_paranoidV#define secflg$v_granhint secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_granhintZ#define secflg$v_mres_alloc secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_mres_allocV#define secflg$v_rad_hint secflg$r_flags_overlay $.secflg$r_flags_bits.secflg$v_rad_hint"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct secdef_flags { __union {Y unsigned short int secflg$w_saved_flags; /* FLAGS SAVED IN SECTION TABLE ENTRY */O unsigned int secflg$l_flags; /* VARIOUS CONTROL FLAGS IN LOW WORD */ __struct {N unsigned secflg$v_gbl : 1; /* GLOBAL SECTION */N unsigned secflg$v_crf : 1; /* COPY ON REFERENCE */$N unsigned secflg$v_dzro : 1; /* DEMAND ZERO */N unsigned secflg$v_wrt : 1; /* WRITABLE */N unsigned secflg$v_shmgs : 1; /* SHARED MEMORY GLOBAL SECTION */N unsigned secflg$v_args64 : 1; /* Arguments passed as quads */N unsigned secflg$v_wrtmod : 2; /* WRITE ACCESS MODE FOR SECTION */N unsigned secflg$v_amod : 2; /* ACCESS MODE OF SECTION */N unsigned sec$flg$v_uncached : 1; /* PFN-map I/O space uncached. */` unsigned secflg$v_read_only_shpt : 1; /* Shared page tables map section read-only */R unsigned secflg$v_shared_pts : 1; /* Section is a shared PT section */N unsigned secflg$v_mres : 1; /* MEMORY RESIDENT SECTION */N unsigned secflg$v_perm : 1; /* PERMANENT SECTION */T unsigned secflg$v_sysgbl : 1; /* 1 = SYSTEM GLOBAL, 0 = GROUP GLOBAL */N/* $ */N/* ***** THE FOLLOWING FLAGS ARE INDICATORS FOR PRIVATE AND GLOBAL SECTION */N/* ***** SYSTEM SERVICE REQUESTS AND ARE NOT STORED IN THE FLAGS LONGWORD */N/* ***** FIELD. */N/* */N unsigned secflg$v_pfnmap : 1; /* MAP TO SPECIFIC PFN'S */R unsigned secflg$v_expreg : 1; /* MAP$ INTO FIRST FREE ADDRESS SPACE */R unsigned secflg$v_protect : 1; /* CHECK WRITE ACCESS MODE (WRTMOD) */[ unsigned secflg$v_pagfil : 1; /* GLOBAL SECTION HAS PAGE FILE BACKING STORE */N unsigned secflg$v_execute : 1; /* CHECK FOR EXECUTE ACCESS */N unsigned secflg$v_noprotchk : 1; /* INHIBIT PROTECTION CHECK */P unsigned secflg$v_no_overmap : 1; /* DON'T OVERMAP ADDRESS SPACE */N unsigned secflg$v_inprog : 1; /* Secti $on creation in progress */N unsigned secflg$v_paranoid : 1; /* Go into paranoia mode */N unsigned secflg$v_granhint : 1; /* Allow enhanced GH regions */` unsigned secflg$v_mres_alloc : 1; /* Allocate memory resident pages during create */R unsigned secflg$v_rad_hint : 1; /* Allocate pages based on RAD hint */+ unsigned secflg$v_fill_19_ : 4;" } secflg$r_flags_bits;! } secflg$r_flags_overlay; } ; #i$f !defined(__VAXC)H#define secflg$w_saved_flags secflg$r_flags_overlay.secflg$w_saved_flags<#define secflg$l_flags secflg$r_flags_overlay.secflg$l_flagsL#define secflg$v_gbl secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_gblL#define secflg$v_crf secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_crfN#define secflg$v_dzro secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_dzroL#define secflg$v_wrt secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_wrtP#define secflg$v_shmgs secflg$r_flag$s_overlay.secflg$r_flags_bits.secflg$v_shmgsR#define secflg$v_args64 secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_args64R#define secflg$v_wrtmod secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_wrtmodN#define secflg$v_amod secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_amodV#define secflg$v_uncached secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_uncachedb#define secflg$v_read_only_shpt secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_read_only_shptZ#define secflg$v_shared_$pts secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_shared_ptsN#define secflg$v_mres secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_mresN#define secflg$v_perm secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_permR#define secflg$v_sysgbl secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_sysgblR#define secflg$v_pfnmap secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_pfnmapR#define secflg$v_expreg secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_expregT#define secflg$v_protect s$ecflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_protectR#define secflg$v_pagfil secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_pagfilT#define secflg$v_execute secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_executeX#define secflg$v_noprotchk secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_noprotchkZ#define secflg$v_no_overmap secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_no_overmapR#define secflg$v_inprog secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_inprogV#define se$cflg$v_paranoid secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_paranoidV#define secflg$v_granhint secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_granhintZ#define secflg$v_mres_alloc secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_mres_allocV#define secflg$v_rad_hint secflg$r_flags_overlay.secflg$r_flags_bits.secflg$v_rad_hint"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */O#define SEC$K_MATALL 0 /* MATCH ALWAYS, USE GLOBAL SECTION */ $N#define SEC$K_MATEQU 1 /* MATCH IF ISD$L_IDENT EQU GBL ID */N#define SEC$K_MATLEQ 2 /* MATCH IF ISD$L_IDENT LEQ GBL ID */ #ifdef __NEW_STARLETtypedef struct _secdef1 { char secdef$$_fill_6 [25];N unsigned char sec$b_amod; /*ACCESS MODE OF SECTION */N/*+ */N/* MATCH CONTROL VIELD VALUES */N/*- $ */N/* BASE OF ZERO , INCR 1 */ } SECDEF1;#else /* __OLD_STARLET */struct secdef1 { char secdef$$_fill_6 [25];N unsigned char sec$b_amod; /*ACCESS MODE OF SECTION */N/*+ */N/* MATCH CONTROL VIELD VALUES */N/*- $ */N/* BASE OF ZERO , INCR 1 */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Definitions for $GETSECI service */N/* */N#define SECI$_CHAIN 1 /* Chained item block */N#d$efine SECI$_GSMODE 2 /* Access mode of section */N#define SECI$_GSFLAGS 3 /* Flags */N#define SECI$_GSNAME 4 /* Global section name */N#define SECI$_GSIDENT 5 /* Global section ident */N#define SECI$_GSRELPAG 6 /* Relative page number */N/* */N/* Definitions for $UPDEC(W) $ AND $UPDSEC_64(W) system services */N/* */!#define UPDFLG$M_WRT_MODIFIED 0x1 #ifdef __NEW_STARLETtypedef struct _updsec_flags { __union {N unsigned int updflg$l_flags; /* Flags */ __struct {R unsigned updflg$v_wrt_modified : 1; /* Write pages only if modified */+ unsigned updflg$v_fill_20_ : 7;" } updflg$r_flags_bit$s;! } updflg$r_flags_overlay; } UPDSEC_FLAGS; #if !defined(__VAXC)<#define updflg$l_flags updflg$r_flags_overlay.updflg$l_flags^#define updflg$v_wrt_modified updflg$r_flags_overlay.updflg$r_flags_bits.updflg$v_wrt_modified"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct updsec_flags { __union {N unsigned int updflg$l_flags; /* Flags */ __struct {R unsigned updflg$v_wrt_modified : 1$; /* Write pages only if modified */+ unsigned updflg$v_fill_20_ : 7;" } updflg$r_flags_bits;! } updflg$r_flags_overlay; } ; #if !defined(__VAXC)<#define updflg$l_flags updflg$r_flags_overlay.updflg$l_flags^#define updflg$v_wrt_modified updflg$r_flags_overlay.updflg$r_flags_bits.updflg$v_wrt_modified"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE $ /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SECDEF_LOADED */ ww+J/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00: $42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $SECIDDEF ***/#ifndef __SECIDDEF_LOADED#define __SECIDDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* Define the global section identification structure. */N/*- */ !#define SECID$M_MINOR_ID 0xFFFFFF##define SECID$M_MAJOR_ID 0xFF000000 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined $(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _secid {#pragma __nomember_alignmentO unsigned int secid$l_match; /* Match control value, see secdef.h */ __union {N unsigned int secid$l_version; /* Version number */ __struct {N unsigned secid$v_minor_id : 24; /* Minor ID of version number */N unsigned secid$v $_major_id : 8; /* Minor ID of version number */ } secid$r_fill_22_; } secid$r_fill_21_; } SECID; #if !defined(__VAXC)8#define secid$l_version secid$r_fill_21_.secid$l_versionK#define secid$v_minor_id secid$r_fill_21_.secid$r_fill_22_.secid$v_minor_idK#define secid$v_major_id secid$r_fill_21_.secid$r_fill_22_.secid$v_major_id"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) $/* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _secid {#pragma __nomember_alignmentO unsigned int secid$l_match; /* Match control value, see secdef.h */ __union {N unsigned int secid$l_version; /* Version number */ __struct {N unsigned secid$v_minor_id : 24; /* Minor ID of version number */N unsigned secid$v_major_id : 8; / $* Minor ID of version number */ } secid$r_fill_22_; } secid$r_fill_21_; } secid; #if !defined(__VAXC)8#define secid$l_version secid$r_fill_21_.secid$l_versionK#define secid$v_minor_id secid$r_fill_21_.secid$r_fill_22_.secid$v_minor_idK#define secid$v_major_id secid$r_fill_21_.secid$r_fill_22_.secid$v_major_id"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define SECID$K_LENGTH 8 /* Length of SECID $ */N#define SECID$C_LENGTH 8 /* Length of SECID */ )#if defined (__ALPHA) || defined (__ia64)# ifdef __INITIAL_POINTER_SIZEO# pragma __required_pointer_size __save /* Save current pointer size */I# pragma __required_pointer_size 64 /* Pointers are 64-bits */H typedef struct _secid * SECID_PQ; /* 64-bit pointer to a SECID */U typedef struct _secid ** SECID_PPQ; /* 64-bit pointer to a pointer to a SECID */U# pragma __re $quired_pointer_size __restore /* Return to previous pointer size */# elseX typedef unsigned __int64 SECID_PQ; /* Same size as a 64-bit pointer to an SECID */f typedef unsigned __int64 SECID_PPQ; /* Same size as a 64-bit pointer to a pointer to an SECID */# endif#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined requ$ired ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SECIDDEF_LOADED */ wwKK/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//*********************************************************************************** $*********************************************/%/*** MODULE $SECSRVDEF IDENT X-4 ***/#ifndef __SECSRVDEF_LOADED#define __SECSRVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __shor$t /* 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 #define $SECSRV$K_SERVER 1#define SECSRV$K_CIA 2#define SECSRV$K_PROXY 3#define SECSRV$K_MAPPING 4#define SECSRV$K_SHUTDOWN 1#define SECSRV$K_PERFORMANCE 2##define SECSRV$K_ZERO_PERFORMANCE 3#define SECSRV$K_RESTART 4#define SECSRV$K_ADD_PROXY 0#define SECSRV$K_DELETE_PROXY 1#define SECSRV$K_SHOW_PROXY 2#define SECSRV$K_VERIFY_PROXY 3#define SECSRV$K_CREATE_PROXY 4!#define SECSRV$K_SCAN_INTRUSION 5##define SECSRV$K_DELETE_INTRUSION 6!#define SECSRV$K_SHOW_INTRUSION 7#defin$e SECSRV$K_STOP_SERVER 8!#define SECSRV$K_RESTART_SERVER 9#define SECSRV$K_ADD_MAPPING 10"#define SECSRV$K_CREATE_MAPPING 11"#define SECSRV$K_DEFINE_MAPPING 12"#define SECSRV$K_DELETE_MAPPING 13"#define SECSRV$K_MODIFY_MAPPING 14 #define SECSRV$K_SCAN_MAPPING 15"#define SECSRV$K_LOOKUP_MAPPING 16#define SECSRV$K_MAX_SERVICE 17#define SECSRV$K_MAXMSG 8192!#define SECSRV$K_MAX_MESSAGE 8192'#define SECSRV$K_REPLY_CONTEXT_LENGTH 4  "#define SECSRV$M_IGNORE_RETURN 0x1"#define SE$CSRV$M_FILL_1 0xFFFFFFFE!#define SECSRV$K_HEADER_LENGTH 92 #ifdef __NEW_STARLETtypedef struct _secsrv$header {' unsigned int secsrv$l_message_type;* unsigned int secsrv$l_message_subtype;& unsigned int secsrv$l_callers_pid;) unsigned int secsrv$l_return_mailbox; __union {$ unsigned int secsrv$l_flags; __struct {0 unsigned secsrv$v_ignore_return : 1;* unsigned secsrv$v_fill_1 : 31; } secsrv$r_fill_26_; } $secsrv$r_fill_25_; __struct {2 unsigned short int secsrv$w_username_size;+ unsigned short int secsrv$w_fill_2;+ char secsrv$t_username_string [32]; } secsrv$r_username; __struct {- unsigned char secsrv$b_terminal_size;) char secsrv$t_terminal_name [15]; } secsrv$r_terminal; __struct {+ unsigned char secsrv$b_prcnam_size;' char secsrv$t_prcnam_name [15]; } secsrv$r_process_name;* unsigned i $nt secsrv$l_message_context; } SECSRV$HEADER; #if !defined(__VAXC)7#define secsrv$l_flags secsrv$r_fill_25_.secsrv$l_flagsY#define secsrv$v_ignore_return secsrv$r_fill_25_.secsrv$r_fill_26_.secsrv$v_ignore_returnG#define secsrv$w_username_size secsrv$r_username.secsrv$w_username_sizeK#define secsrv$t_username_string secsrv$r_username.secsrv$t_username_stringG#define secsrv$b_terminal_size secsrv$r_terminal.secsrv$b_terminal_sizeG#define secsrv$t_terminal_name secsrv$r_terminal.sec$srv$t_terminal_nameG#define secsrv$b_prcnam_size secsrv$r_process_name.secsrv$b_prcnam_sizeG#define secsrv$t_prcnam_name secsrv$r_process_name.secsrv$t_prcnam_name"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct secsrv$header {' unsigned int secsrv$l_message_type;* unsigned int secsrv$l_message_subtype;& unsigned int secsrv$l_callers_pid;) unsigned int secsrv$l_return_mailbox; __union {$ unsigned int secsrv$l_flags; __struct$ {0 unsigned secsrv$v_ignore_return : 1;* unsigned secsrv$v_fill_1 : 31; } secsrv$r_fill_26_; } secsrv$r_fill_25_; __struct {2 unsigned short int secsrv$w_username_size;+ unsigned short int secsrv$w_fill_2;+ char secsrv$t_username_string [32]; } secsrv$r_username; __struct {- unsigned char secsrv$b_terminal_size;) char secsrv$t_terminal_name [15]; } secsrv$r_terminal; __stru $ct {+ unsigned char secsrv$b_prcnam_size;' char secsrv$t_prcnam_name [15]; } secsrv$r_process_name;* unsigned int secsrv$l_message_context; } ; #if !defined(__VAXC)7#define secsrv$l_flags secsrv$r_fill_25_.secsrv$l_flagsY#define secsrv$v_ignore_return secsrv$r_fill_25_.secsrv$r_fill_26_.secsrv$v_ignore_returnG#define secsrv$w_username_size secsrv$r_username.secsrv$w_username_sizeK#define secsrv$t_username_string secsrv$r_username.secsrv$t_username_str $ingG#define secsrv$b_terminal_size secsrv$r_terminal.secsrv$b_terminal_sizeG#define secsrv$t_terminal_name secsrv$r_terminal.secsrv$t_terminal_nameG#define secsrv$b_prcnam_size secsrv$r_process_name.secsrv$b_prcnam_sizeG#define secsrv$t_prcnam_name secsrv$r_process_name.secsrv$t_prcnam_name"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */!#define SECSRV$CLIENT -1762787327!#define SECSRV$OBJECT -1762787326(#define SECSRV$COMMUNICATION -1762787325 $#pragm$a __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SECSRVDEF_LOADED */ ww{K/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:0 $0:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SECSRVMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $SECSRVMSGDEF ***/#ifndef __SECSRVMSGDEF_LOADED#define __SECSRVMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 str$uct#else#define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:57:43.49 */N/* */N/*+ SECSRVMSG.MSG $ */N/*+ IDENT X-7 */N/* */N/* MESSAGE FILE FOR SECSRV FACILITY */N/* */N/* VAX AND AXP STREAMS SHOULD BE IDENTICAL. */N/* */N/* REVISION HIST$ORY: */5/* X-7 JAH0342 JOHN A HARNEY 05-OCT-1999 */B/* ADD CLUSTER-WIDE INTRUSION DETECTION MESSAGES: */B/* CIACRECLUDB CREATED CLUSTER DATABASE */B/* CIACRELOCDB CREATED LOCAL DATABASE */B/* CIAEXISTCLU USING EXISTING CLUSTER DATABASE */B/* CIAEXISTLOC USING EXISTING LOCAL DATABASE */N/* $ */5/* X-6 JAH0298 JOHN A HARNEY 10-JUN-1998 */B/* REMOVE "try again later" FROM PROXYNOTACTIVE MESSAGE. */N/* */5/* X-5 JAH0166 JOHN A HARNEY 14-NOV-1994 */B/* FIX MORE MESSAGE TEXT. */N/* */5/* X-4 JAH0166 JOHN A HARNEY 09-NOV-1994 */B/* FIX $MESSAGE TEXT AND SPELLING ERRORS AFTER REVIEW BY THE */B/* DOCUMENTATION GROUP. */N/* */c/* ** NOTE ** MAKE SURE WHEN YOU MODIFY THIS FILE THAT YOU ALSO MODIFY [SECSRV]SECSRVMSG_.ADA */C/* TO MATCH YOUR CHANGES HERE. */N/* */#define SECSRV$_FACILITY 1774N/* $ */+#define SECSRV$_SERVERRADIOACTIVE 116299635N/* */'#define SECSRV$_SERVERRESTART 116299643(#define SECSRV$_SERVERSHUTDOWN 116299651&#define SECSRV$_COULDNTSTART 116299659(#define SECSRV$_COULDNTRESTART 116299667'#define SECSRV$_PROXYSHUTDOWN 116299675%#define SECSRV$_CIASHUTDOWN 116299683*#define SECSRV$_SERVERSTARTINGUP 116299691)#define SECSRV$_PROXYS $TARTINGUP 116299699'#define SECSRV$_CIASTARTINGUP 116299707"#define SECSRV$_INTRUDER 116299715!#define SECSRV$_SUSPECT 116299723'#define SECSRV$_CREATEPROXYDB 116299731'#define SECSRV$_PROXYMODIFIED 116299739+#define SECSRV$_NOSCANNEDINTRUDER 116299747)#define SECSRV$_INVALIDTERMNAME 116299755%#define SECSRV$_CIACRECLUDB 116299763%#define SECSRV$_CIACRELOCDB 116299771%#define SECSRV$_CIAEXISTCLU 116299779%#define SECSRV$_CIAEXISTLOC 116299787&#define SECSRV$_NORDPROXYREC 1163056$32$#define SECSRV$_NOSUCHUSER 116311634'#define SECSRV$_DUPLICATEUSER 116311642'#define SECSRV$_INVALIDDELETE 116311650&#define SECSRV$_UPDATEFAILED 116311658%#define SECSRV$_NOSUCHPROXY 116311666)#define SECSRV$_DBALREADYEXISTS 116311674&#define SECSRV$_TOOMANYUSERS 116311682(#define SECSRV$_BADNODENAMELEN 116311690'#define SECSRV$_BADREMUSERLEN 116311698)#define SECSRV$_BADLOCALUSERLEN 116311706%#define SECSRV$_PROXYACTIVE 116311714(#define SECSRV$_PROXYNOTACTIVE 116311722##defin $e SECSRV$_NOPROXYDB 116311730N#define SECSRV$_NOSUCHINTRUDER 116311738 /* NOMATCH */N#define SECSRV$_CIADBEMPTY 116311746 /* DBEMPTY */##define SECSRV$_INSUFINFO 116311754%#define SECSRV$_AUDITFAILED 116311762&#define SECSRV$_ASSIGNFAILED 116311770##define SECSRV$_QIOFAILED 116311778&#define SECSRV$_DASSGNFAILED 116311786$#define SECSRV$_BADJOBTYPE 116311794)#define SECSRV$_SERVERNOTACTIVE 116311802&#define SECSRV$_PROXYNOTOPEN 1163118 $10)#define SECSRV$_PROXYTERMINATED 116317636'#define SECSRV$_CIATERMINATED 116317644*#define SECSRV$_SERVERTERMINATED 116317652&#define SECSRV$_CREMBXFAILED 116317660!#define SECSRV$_RUNNING 116317668$#define SECSRV$_CONSTERROR 116317676##define SECSRV$_TASKERROR 116317684*#define SECSRV$_OUTCOMTERMINATED 116317692N#define SECSRV$_SRVREPLYTIMEOUT 116317700 /* */N/* ADD TEMPORARY MESSAGES HERE. */N/* $ */!#define SECSRV$_CONVERT 116323635+#define SECSRV$_VERIFY_CONVERSION 116323643)#define SECSRV$_CONVERT_SUCCESS 116323651 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __SECSRVMSGD $EF_LOADED */ wwK/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $SGPSDEF ***/#ifndef __SGPSDEF_LOADED#defin $e __SGPSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* */N/* GSD entry - P-section definition in shareable ima$ge */N/* */#define SGPS$M_PIC 0x1#define SGPS$M_LIB 0x2#define SGPS$M_OVR 0x4#define SGPS$M_REL 0x8#define SGPS$M_GBL 0x10#define SGPS$M_SHR 0x20#define SGPS$M_EXE 0x40#define SGPS$M_RD 0x80#define SGPS$M_WRT 0x100#define SGPS$M_VEC 0x200#define SGPS$M_NOMOD 0x400#define SGPS$M_COM 0x800#define SGPS$K_NAME 13#define SGPS$C_NAME 13 #ifdef __NEW_STARLETtypedef struct _sgps $def { __union {N unsigned char sgps$b_gsdtyp; /*Typ field */ __struct {" char sgpsdef$$_fill_1;# } sgps$r_gsdtyp_fields; } sgps$r_gsdtyp_overlay;N unsigned char sgps$b_align; /*P-sect alignment */ __union {N unsigned short int sgps$w_flags; /*P-sect flags */ __struct {N unsigned sgps$v_pic : 1; /*Position independent $ */N unsigned sgps$v_lib : 1; /*From a shareable image */N unsigned sgps$v_ovr : 1; /*Overlaid memory allocation */N unsigned sgps$v_rel : 1; /*Relocatable */N unsigned sgps$v_gbl : 1; /*Global scope */N unsigned sgps$v_shr : 1; /*Shareable */N unsigned sgps$v_exe : 1; /*Executable */N unsigned $ sgps$v_rd : 1; /*Readable */N unsigned sgps$v_wrt : 1; /*Writeable */N unsigned sgps$v_vec : 1; /*Vector psect */N unsigned sgps$v_nomod : 1; /*Not stored into */N unsigned sgps$v_com : 1; /*Associated with COMM sym */) unsigned sgps$v_fill_16_ : 4; } sgps$r_flags_bits; } sgps$r_flags_overlay;O unsigned i $nt sgps$l_alloc; /*Length of this psect in shr image */N unsigned int sgps$l_base; /*Base of this psect in shr image */N unsigned char sgps$b_namlng; /*Length of p-sect name */N char sgps$t_name [31]; /*Name field */ } SGPSDEF; #if !defined(__VAXC)9#define sgps$b_gsdtyp sgps$r_gsdtyp_overlay.sgps$b_gsdtyp6#define sgps$w_flags sgps$r_flags_overlay.sgps$w_flagsD#define sgps$v_pic sgps$r_flags_overlay.$sgps$r_flags_bits.sgps$v_picD#define sgps$v_lib sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_libD#define sgps$v_ovr sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_ovrD#define sgps$v_rel sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_relD#define sgps$v_gbl sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_gblD#define sgps$v_shr sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_shrD#define sgps$v_exe sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_exeB#define sgps$v_rd sgps$r_flags_overlay.sgps$r_flags_bits $.sgps$v_rdD#define sgps$v_wrt sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_wrtD#define sgps$v_vec sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_vecH#define sgps$v_nomod sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_nomodD#define sgps$v_com sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_com"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct sgpsdef { __union {N unsigned char sgps$b_gsdtyp; /*Typ field */ __struct {" $ char sgpsdef$$_fill_1;# } sgps$r_gsdtyp_fields; } sgps$r_gsdtyp_overlay;N unsigned char sgps$b_align; /*P-sect alignment */ __union {N unsigned short int sgps$w_flags; /*P-sect flags */ __struct {N unsigned sgps$v_pic : 1; /*Position independent */N unsigned sgps$v_lib : 1; /*From a shareable image */N unsigned sgps$v_ovr : 1; /*$Overlaid memory allocation */N unsigned sgps$v_rel : 1; /*Relocatable */N unsigned sgps$v_gbl : 1; /*Global scope */N unsigned sgps$v_shr : 1; /*Shareable */N unsigned sgps$v_exe : 1; /*Executable */N unsigned sgps$v_rd : 1; /*Readable */N unsigned sgps$v_wrt : 1; /*Writeable $ */N unsigned sgps$v_vec : 1; /*Vector psect */N unsigned sgps$v_nomod : 1; /*Not stored into */N unsigned sgps$v_com : 1; /*Associated with COMM sym */) unsigned sgps$v_fill_16_ : 4; } sgps$r_flags_bits; } sgps$r_flags_overlay;O unsigned int sgps$l_alloc; /*Length of this psect in shr image */N unsigned int sgps$l_base; /*Base of this psect $ in shr image */N unsigned char sgps$b_namlng; /*Length of p-sect name */N char sgps$t_name [31]; /*Name field */ } ; #if !defined(__VAXC)9#define sgps$b_gsdtyp sgps$r_gsdtyp_overlay.sgps$b_gsdtyp6#define sgps$w_flags sgps$r_flags_overlay.sgps$w_flagsD#define sgps$v_pic sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_picD#define sgps$v_lib sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_libD#define sgps$v_ovr sgps$r_flags_ov$erlay.sgps$r_flags_bits.sgps$v_ovrD#define sgps$v_rel sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_relD#define sgps$v_gbl sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_gblD#define sgps$v_shr sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_shrD#define sgps$v_exe sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_exeB#define sgps$v_rd sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_rdD#define sgps$v_wrt sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_wrtD#define sgps$v_vec sgps$r_flags_overlay.sgps$r_flags$_bits.sgps$v_vecH#define sgps$v_nomod sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_nomodD#define sgps$v_com sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_com"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#e $ndif#pragma __standard #endif /* __SGPSDEF_LOADED */ wwIL/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SHRMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $$SHRDEF ***/#ifndef __SHRDEF_LOADED#define __SHRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __c$plusplus 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 N/* */Q/* Thi$s SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:56:55.54 */N/* */N/* SHRMSG.MSG - SYSTEM DEFINITION FILE FOR SHARED MESSAGES */N/* */J/* VERSION: 'X-13' */N/* */O/* *****************************$******************************************** */O/* * * */O/* * COPYRIGHT 2003 HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P. * */O/* * * */O/* * CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM HP AND/OR * */O/* * ITS SUBSIDIARIES REQUIRED FOR POSSESSION, USE, OR COPYING. * */O/* * $ * */O/* * CONSISTENT WITH FAR 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE, * */O/* * COMPUTER SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL * */O/* * ITEMS ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD * */O/* * COMMERCIAL LICENSE. * */O/* * * */O/* * NEITHER HP NOR ANY OF ITS SUBSIDIARIES SHALL BE LIABLE $FOR TECHNICAL * */O/* * OR EDITORIAL ERRORS OR OMISSIONS CONTAINED HEREIN. THE INFORMATION * */O/* * IN THIS DOCUMENT IS PROVIDED "as is" WITHOUT WARRANTY OF ANY KIND AND * */O/* * IS SUBJECT TO CHANGE WITHOUT NOTICE. THE WARRANTIES FOR HP PRODUCTS * */O/* * ARE SET FORTH IN THE EXPRESS LIMITED WARRANTY STATEMENTS ACCOMPANYING * */O/* * SUCH PRODUCTS. NOTHING HEREIN SHOULD BE CONSTRUED AS CONSTITUTING AN * */O/* * ADDITIONAL WARRANTY. $ * */O/* * * */O/* ************************************************************************* */N/*++ */N/* */N/* FACILITY: VAX/VMS SYSTEM MACRO LIBRARIES */N/* */N/* ABSTRACT: $ */N/* */I/* THIS FILE CONTAINS THE MDL SOURCE FOR THE SHARED MESSAGES. */N/* */N/* ENVIRONMENT: */N/* */I/* N/A $ */N/* */N/*-- */N/* */N/* */H/* AUTHOR: THE VMS GROUP CREATION DATE: 1-AUG-1976 */N/* */N$/* MODIFIED BY: */N/* */2/* X-13 GP072104 GUY PELEG 21-JUL-2004 */B/* ADD SYMLINKERR. */N/* */2/* X-12 GP011104 GUY PELEG 11-JAN-2004 */B/* CHANGED TEXT OF MBXDEL. */N/* $ */2/* X-11 GP010604 GUY PELEG 06-JAN-2004 */B/* ADD NEW MESSAGE TO SUPPORT DELETE/MAILBOX. */N/* */2/* X-10 GP022503 GUY PELEG 25-FEB-2003 */B/* ADD NEW MESSAGES TO SUPPORT B2B IN DELETE,COPY AND PURGE */N/* */6/* X-9 TMS0357 TODD SCHOELLER 19-FEB-1998 %*/B/* ADD NOFIDS -- FIDS NOT PERMITTED. */N/* */6/* X-8 TMS0317 TODD SCHOELLER 9-MAR-1997 */B/* ADD MESSAGES FOR HFS INVOLVING INABILITY FOR PROCESSING */B/* FILES WITH DIDS AND FIDS (FILDID, FILFID, AND FILDIDFID). */N/* */6/* X-7 RG40042 RAY GUZMAN 11-JAN-1991 */B/* ADD A MESSAGE BADFORMA%T TO INDICATE A FILE FORMAT IS */B/* INCOMPATIBLE. */N/* */8/* X-6 SEH0021 SUSAN E. HEIMBACH 14-DEC-1989 */B/* ADD MESSAGE NOMEANING; TO BE USED FOR QUEMAN'S */B/* START/QUEUE/MANAGER COMMAND'S OBSOLETE QUALIFIERS. */N/* ADD OPENERR AND CLOSEERR. */N/* % */8/* X-5 SEH0011 SUSAN E. HEIMBACH 09-DEC-1988 */B/* ADD MESSAGE NOTDELETED; TO BE USED BY QUEMAN DELETE */B/* COMMANDS. */N/* */./* X-4 RJS RON SOMMER 12-OCT_1987 */B/* ADD MESSAGE PRDCONT. COMMON LMF MESSAGE TO BE USED BY */B/* SYSTEM LAYERED PRODUCTS WHEN LICENSE CHECK HAS FAILED */B/* BUT PR%ODUCT EXECUTION IS CONTINUING. */N/* */6/* X-3 AEW0002 ANNE E. WARNER 08-DEC-1986 */B/* ADD MESSAGES ANBIGANS AND INVALANS USED FOR /CONFIRM */B/* IN COMMON QUALIFIER PACKAGE (LIBCQUAL). */N/* */0/* X-2 CWH5002 CW HOBBS 30-MAY-1986 */B/* CORRECT SPELLING IN NOSUCHID. % */N/* */;/* V03-011 TSK0002 TAMAR KRICHEVSKY 28-MAR-1984 */B/* ADD NOSUCHID. */N/* */N/* V03-010 AEW0001 ANNE E. WARNER 6-MAR-1984 */N/* ADD FILSPCSRCH AND NOSRCHLIST. */N/* FILSPCSRCH - FI%LE SPECIFICATION CONTAINS A SEARCH LIST. */N/* NOSRCHLST - COMMAND DOES NOT SUPPORT SEARCH LISTS. */N/* BOTH MESSAGES ORIGINALLY IN [CLIUTL.SRC]SETDIR.B32. */N/* */;/* V03-009 TSK0001 TAMAR KRICHEVSKY 8-FEB-1984 */B/* ADD QUALMISS. */N/* */?/* V03-008% SHZ0004 STEPHEN H. ZALEWSKI, 28-FEB-1983 */B/* CHANGED TEXT OF NOFILPURG. */N/* */?/* V03-007 SHZ0003 STEPHEN H. ZALEWSKI, 11-JAN-1983 */B/* ADD FILNOTACC. MAKE DELINTERR AND DIRTOBUSY OBSOLETE. */N/* */B/* V03-006 SBL3006 STEVEN B. LIONEL, 19-NOV-1982 */B/* ADD NOFILES. % */N/* */B/* V03-005 MLJ0094 MARTIN L. JACK, 31-JUL-1982 23:18 */B/* ADD INVQUAVAL. */N/* */?/* V03-004 SHZ0002 STEPHEN H. ZALEWSKI, 23-JUL-1982 16:40 */B/* ADDED TOTAL, PURGED, AND FILDELETED MESSAGES. */N/* % */A/* V03-003 BLS0152 BENN SCHREIBER 25-MAY-1982 */B/* ADD PRODNOTINS MESSAGE */N/* */>/* V03-002 GAS0068 GERRY SMITH 31-MAR-1982 */B/* ADD NOTRUNC MESSAGE. */N/* */B/* V03-001 MLJ0084 MARTIN % L. JACK, 28-MAR-1982 14:48 */B/* CLEAN UP INITIAL CAPITALIZATION ERRORS. */N/* */N/* THESE MESSAGE CODES SHOULD NOT BE USED DIRECTLY BY A FACILITY SINCE */N/* THEY DO NOT CONTAIN A SUBSYSTEM (I.E., FACILITY) IDENTIFIER OR A */N/* SEVERITY CODE. USE THE FOLLOWING FORMULA TO CALCULATE ACTUAL FACILITY */N/* MESSAGE CODES.  %*/I/* FACILITY MESSAGE CODE = COMMON MESSAGE CODE + */4/* FACILITY ID * 65536 + */4/* SEVERITY CODE */#define SHR$_FACILITY 0#define SHR$_APPENDEDB 4096#define SHR$_APPENDEDR 4104#define SHR$_BADBYTE 4112#define SHR$_BADFIELD 4120#define SHR$_BADLONG 4128#define SHR$_BADWORD 4136#define SHR$_BEGIN 4144#define SHR$_BEGIND 4152#define SHR$_BEGINT 4160#define SHR$_CLICB 4168#define SHR$_CLO %SEIN 4176#define SHR$_CLOSEOUT 4184#define SHR$_COPIEDB 4192#define SHR$_COPIEDR 4200#define SHR$_CREATED 4208#define SHR$_ENDED 4216#define SHR$_ENDEDD 4224#define SHR$_ENDEDT 4232#define SHR$_NEWFILES 4240#define SHR$_OPENIN 4248#define SHR$_OPENOUT 4256#define SHR$_OVERLAY 4264#define SHR$_READERR 4272#define SHR$_REPLACED 4280#define SHR$_WILDCONCAT 4288#define SHR$_WILDOUTVER 4296#define SHR$_WRITEERR 4304#define SHR$_ABEND 4312#define SHR$_ABENDD 4320 %#define SHR$_ABENDT 4328#define SHR$_SYSERRORPC 4336#define SHR$_SYNTAX 4344#define SHR$_NOVALUE 4352#define SHR$_BADKEY 4360#define SHR$_BADVALUE 4368#define SHR$_BADDELIM 4376#define SHR$_BADLOGIC 4384#define SHR$_NOWILD 4392#define SHR$_TEXT 4400#define SHR$_IDXCONCAT 4408#define SHR$_RELCONCAT 4416#define SHR$_HIGHVER 4424#define SHR$_BADLOGICPC 4432#define SHR$_ATPC 4440#define SHR$_BADCOPIES 4448#define SHR$_BADFORM 4456#define SHR$_BADJOBID 4464#defin %e SHR$_BADJOBNAME 4472#define SHR$_BADPRTY 4480#define SHR$_BADQNAME 4488#define SHR$_BADTIME 4496#define SHR$_NOQUEUE 4504#define SHR$_NOJOBID 4512#define SHR$_NOJOBNAME 4520#define SHR$_SYSERROR 4528#define SHR$_NOTCOPIED 4536#define SHR$_NOTCMPLT 4544#define SHR$_RMSERROR 4552#define SHR$_UNXPCTSTS 4560#define SHR$_HASHCONCAT 4568#define SHR$_INCOMPAT 4576#define SHR$_VALERR 4584#define SHR$_FILNOTDEL 4592#define SHR$_CONFDEL 4600#define SHR$_DELETED 4608%#define SHR$_DELVER 4616#define SHR$_PURGEVER 4624#define SHR$_CLOSEDEL 4632#define SHR$_DIRTOOBUS 4640#define SHR$_NOFILPURG 4648#define SHR$_FILNOTPUR 4656#define SHR$_SEARCHFAIL 4664#define SHR$_DELINTERR 4672#define SHR$_PARSEFAIL 4680#define SHR$_FILPURGED 4688#define SHR$_ENDABORT 4696#define SHR$_ENDDIAGS 4704#define SHR$_ENDNOOBJ 4712#define SHR$_HALTED 4720#define SHR$_NOCMDMEM 4728#define SHR$_QEMPTY 4736#define SHR$_CBT 4744#define SHR$_EXISTS 4752%#define SHR$_UNLOCKED 4760#define SHR$_RENAMED 4768#define SHR$_PROTECTED 4776#define SHR$_NOTLOCKED 4784#define SHR$_ACTIMAGE 4792#define SHR$_DIRNOTCRE 4800#define SHR$_NODESTQUE 4808#define SHR$_ILLDESQUE 4816#define SHR$_NOTTERM 4824#define SHR$_CONFQUAL 4832#define SHR$_ILLDIRCOPY 4840#define SHR$_INSVIRMEM 4848#define SHR$_CREATEDSTM 4856#define SHR$_NOTRUNC 4864#define SHR$_PRODNOTINS 4872#define SHR$_TOTAL 4880#define SHR$_FILPURG 4888#define SHR$%_FILDEL 4896#define SHR$_INVQUAVAL 4904#define SHR$_NOFILES 4912#define SHR$_FILNOTACC 4920#define SHR$_QUALMISS 4928#define SHR$_FILSPCSRCH 4936#define SHR$_NOSRCHLST 4944#define SHR$_NOSUCHID 4952#define SHR$_AMBIGANS 4960#define SHR$_INVALANS 4968#define SHR$_PRDCONT 4976#define SHR$_NOTDELETED 4984#define SHR$_NOMEANING 4992#define SHR$_OPENERR 5000#define SHR$_CLOSEERR 5008#define SHR$_BADFORMAT 5016#define SHR$_FILDID 5024#define SHR$_FILFID 5032#defin%e SHR$_FILDIDFID 5040#define SHR$_NOFIDS 5048#define SHR$_FILPURGBYT 5056#define SHR$_FILDELBYT 5064#define SHR$_TOTALBYT 5072#define SHR$_COPIEDBYT 5080#define SHR$_APPENDEDBYT 5088#define SHR$_MBXDEL 5096#define SHR$_SYMLINKERR 5104 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cpluspl %us }#endif#pragma __standard #endif /* __SHRDEF_LOADED */ wwL/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//******************************************************************************************************************************* %*//*** MODULE $SJCDEF ***/#ifndef __SJCDEF_LOADED#define __SJCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* % */N/* Send to Job Controller Service ($SNDJBC) definitions. */N/* */X/* NOTE: New items must always be added at the end so users will not have to relink. */N/* */N/* */N/* Function codes */N/* % */N#define SJC$_ABORT_JOB 1 /* Abort current job in a queue */N#define SJC$_ADD_FILE 2 /* Add a file to an open job */N#define SJC$_ALTER_JOB 3 /* Alter parameters of a job */N#define SJC$_ALTER_QUEUE 4 /* Alter parameters of a queue */Z#define SJC$_ASSIGN_QUEUE 5 /* Assign a logical queue to an execution queue */S#define SJC$_BATCH_C%HECKPOINT 6 /* Establish a checkpoint in a batch job */N#define SJC$_BATCH_SERVICE 7 /* LOGINOUT communication */N#define SJC$_CLOSE_DELETE 8 /* Close and delete an open job */N#define SJC$_CLOSE_JOB 9 /* Close and enqueue an open job */N#define SJC$_CREATE_JOB 10 /* Create an open job */N#define SJC$_CREATE_QUEUE 11 /* Create a queue */N#define SJC$_DEASSIGN_QUEUE 12 %/* Deassign a logical queue */P#define SJC$_DEFINE_CHARACTERISTIC 13 /* Create a characteristic definition */N#define SJC$_DEFINE_FORM 14 /* Create a form definition */P#define SJC$_DELETE_CHARACTERISTIC 15 /* Delete a characteristic definition */N#define SJC$_DELETE_FORM 16 /* Delete a form definition */N#define SJC$_DELETE_JOB 17 /* Delete a job */N#define SJC$_DELETE_QUEUE 18 /* Delete a queue % */P#define SJC$_ENTER_FILE 19 /* Enter a single file job in a queue */V#define SJC$_MERGE_QUEUE 20 /* Requeue all jobs in one queue to another */N#define SJC$_PAUSE_QUEUE 21 /* Suspend processing from a queue */N#define SJC$_RESET_QUEUE 22 /* Reset a queue */N#define SJC$_START_ACCOUNTING 23 /* Start accounting manager */L#define SJC$_START_QUEUE 24 /* Start processing from a queue */N%#define SJC$_START_QUEUE_MANAGER 25 /* Start system job queue manager */N#define SJC$_STOP_ACCOUNTING 26 /* Stop accounting manager */N#define SJC$_STOP_QUEUE 27 /* Stop processing from a queue */N#define SJC$_STOP_QUEUE_MANAGER 28 /* Stop system job queue manager */N#define SJC$_SYNCHRONIZE_JOB 29 /* Synchronize with job completion */N#define SJC$_WRITE_ACCOUNTING 30 /* Write user accounting record */b#define SJC$_CONTROL_DIAGN%OSTICS 31 /* Control diagnostic functions (for internal use only) */\/* (note this function code is intentionally not documented and reserved for Digital use) */m#define SJC$_DELETE_QUEUE_MANAGER 32 /* Remove all references to specified qmgr from shared master file */Z#define SJC$_ALTER_FILE 33 /* Modify the processing of a file within a job */]#define SJC$_STOP_ALL_QUEUES_ON_NODE 34 /* Stop all batch/print job processing on the node */X#define SJC$_DISABLE_QUEUE 35 % /* Cause all QSIs on the queue to be inactive */R#define SJC$_ENABLE_QUEUE 36 /* Allow disabled queue to be restarted */N#define SJC$_SYMBIONT_SERVICE 37 /* Symbiont-Qman communication */N#define SJC$_JOBCTL_SERVICE 38 /* Jobctl-Qman communication */v#define SJC$_ENABLE_AUTOSTART 39 /* Start all AUTOSTART queues on node and allow queues to fail over to node */e#define SJC$_DISABLE_AUTOSTART 40 /* Prevent AUTOSTART queues from failing over to t%his node */a#define SJC$_SHUTDOWN_NODE 41 /* Perform orderly shutdown of queuing system on node. */#define SJC$_RESERVED_FUNC_42 42 /* Reserved for Digital use (name may change) Reserved by security see [qman]tables.req */X#define SJC$_RESERVED_FUNC_43 43 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_FUNC_44 44 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_FUNC_45 45 /* Reserved for Digital use (name may ch%ange) */X#define SJC$_RESERVED_FUNC_46 46 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_FUNC_47 47 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_FUNC_48 48 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_FUNC_49 49 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_FUNC_50 50 /* Reserved for Digital use (name may change) */N#define SJC$K_MIN_FUNC 1 /* Min%imum SNDJBC function code */N#define SJC$K_MAX_FUNC 50 /* Maximum SNDJBC function code */N/* */N/* Item codes */N/* */N#define SJC$_ACCOUNTING_MESSAGE 1 /* User accounting message */N#define SJC$_ACCOUNTING_TYPES 2 /* Mask of accounting record typ %es */N#define SJC$_AFTER_TIME 3 /* Hold until time */#define SJC$_NO_AFTER_TIME 4N#define SJC$_ALIGNMENT_MASK 5 /* Mask alignment data */N#define SJC$_ALIGNMENT_PAGES 6 /* Number of alignment pages */N#define SJC$_BASE_PRIORITY 7 /* Batch process base priority */N#define SJC$_BATCH 8 /* Batch queue */#define SJC$_NO_BATCH 9c#define SJC$_BATCH_INPUT 10 /*!% LOGINOUT communication (Retired, see SERVICE_INPUT) */x#define SJC$_BATCH_OUTPUT 11 /* For use by LOGINOUT (for internal use only) (Retired, see SERVICE_OUTPUT) */X/* (note this item code is intentionally not documented and reserved for Digital use) */N#define SJC$_CHARACTERISTIC_NAME 12 /* Printer characteristic */%#define SJC$_CHARACTERISTIC_NUMBER 13"#define SJC$_NO_CHARACTERISTICS 14N#define SJC$_CHECKPOINT_DATA 15 /* Batch checkpoint string */ "%"#define SJC$_NO_CHECKPOINT_DATA 16N#define SJC$_CLI 17 /* Batch process CLI */#define SJC$_NO_CLI 18N#define SJC$_CPU_DEFAULT 19 /* Default CPU time limit */#define SJC$_NO_CPU_DEFAULT 20N#define SJC$_CPU_LIMIT 21 /* Maximum CPU time limit */#define SJC$_NO_CPU_LIMIT 22N#define SJC$_CREATE_START 23 /* Start queue after creation */N#define SJC$_DELETE_FILE 24 /* Delete file after p #%rocessing */#define SJC$_NO_DELETE_FILE 25N#define SJC$_DESTINATION_QUEUE 26 /* Destination queue name */N#define SJC$_DEVICE_NAME 27 /* Output device name */N#define SJC$_DOUBLE_SPACE 28 /* Double space output */#define SJC$_NO_DOUBLE_SPACE 29N#define SJC$_ENTRY_NUMBER 30 /* Job entry number */##define SJC$_ENTRY_NUMBER_OUTPUT 31N#define SJC$_FILE_BURST 32 /* Print file burst page $% */#define SJC$_FILE_BURST_ONE 33#define SJC$_NO_FILE_BURST 34N#define SJC$_FILE_COPIES 35 /* Print n copies of file */N#define SJC$_FILE_FLAG 36 /* Print file flag page */#define SJC$_FILE_FLAG_ONE 37#define SJC$_NO_FILE_FLAG 38N#define SJC$_FILE_IDENTIFICATION 39 /* DVI, FID, DID of file */N#define SJC$_FILE_SETUP_MODULES 40 /* Device control modules for file */%#define SJC$_NO_FILE_SETUP_MODULES 41N#def %%ine SJC$_FILE_SPECIFICATION 42 /* File specification of file */N#define SJC$_FILE_TRAILER 43 /* Print file trailer page */ #define SJC$_FILE_TRAILER_ONE 44#define SJC$_NO_FILE_TRAILER 45N#define SJC$_FIRST_PAGE 46 /* Starting page number */#define SJC$_NO_FIRST_PAGE 47N#define SJC$_FORM_DESCRIPTION 48 /* Textual description of form */N#define SJC$_FORM_LENGTH 49 /* Form length in lines */N#define SJ&%C$_FORM_MARGIN_BOTTOM 50 /* Form bottom margin in lines */N#define SJC$_FORM_MARGIN_LEFT 51 /* Form left margin in characters */N#define SJC$_FORM_MARGIN_RIGHT 52 /* Form right margin in characters */N#define SJC$_FORM_MARGIN_TOP 53 /* Form top margin in lines */N#define SJC$_FORM_NAME 54 /* Printer form */#define SJC$_FORM_NUMBER 55N#define SJC$_FORM_SETUP_MODULES 56 /* Device control modules for form */%#defin '%e SJC$_NO_FORM_SETUP_MODULES 57N#define SJC$_FORM_SHEET_FEED 58 /* Form is sheet fed */"#define SJC$_NO_FORM_SHEET_FEED 59N#define SJC$_FORM_STOCK 60 /* Stock name for form */N#define SJC$_FORM_TRUNCATE 61 /* Truncate long lines */ #define SJC$_NO_FORM_TRUNCATE 62N#define SJC$_FORM_WIDTH 63 /* Form width in characters */N#define SJC$_FORM_WRAP 64 /* Wrap long lines */#d (%efine SJC$_NO_FORM_WRAP 65N#define SJC$_GENERIC_QUEUE 66 /* Queue is a generic queue */ #define SJC$_NO_GENERIC_QUEUE 67T#define SJC$_GENERIC_SELECTION 68 /* Queue can take work from generic queue */$#define SJC$_NO_GENERIC_SELECTION 69X#define SJC$_GENERIC_TARGET 70 /* Possible execution queue for generic queue */N#define SJC$_HOLD 71 /* Place job on hold */#define SJC$_NO_HOLD 72N#define SJC$_JOB_BURST 73 /* P )%rint job burst page */#define SJC$_NO_JOB_BURST 74N#define SJC$_JOB_COPIES 75 /* Print n copies of entire job */N#define SJC$_JOB_FLAG 76 /* Print job flag page */#define SJC$_NO_JOB_FLAG 77N#define SJC$_JOB_LIMIT 78 /* Number of concurrent jobs */N#define SJC$_JOB_NAME 79 /* Identifying name of job */Q#define SJC$_JOB_RESET_MODULES 80 /* Device control modules between jobs */$#defin *%e SJC$_NO_JOB_RESET_MODULES 81N#define SJC$_JOB_SIZE_MAXIMUM 82 /* Largest job accepted by printer */##define SJC$_NO_JOB_SIZE_MAXIMUM 83N#define SJC$_JOB_SIZE_MINIMUM 84 /* Smallest job accepted by printer */##define SJC$_NO_JOB_SIZE_MINIMUM 85N#define SJC$_JOB_SIZE_SCHEDULING 86 /* Schedule printer queues by size */&#define SJC$_NO_JOB_SIZE_SCHEDULING 87N#define SJC$_JOB_STATUS_OUTPUT 88 /* Status message for submitted job */N#define SJC$_JOB_TRAILER 89 +% /* Print job trailer page */#define SJC$_NO_JOB_TRAILER 90N#define SJC$_LAST_PAGE 91 /* Ending page number */#define SJC$_NO_LAST_PAGE 92P#define SJC$_LIBRARY_SPECIFICATION 93 /* Filename of device control library */(#define SJC$_NO_LIBRARY_SPECIFICATION 94N#define SJC$_LOG_DELETE 95 /* Delete log file */#define SJC$_NO_LOG_DELETE 96N#define SJC$_LOG_QUEUE 97 /* Log file's print queue */N#defin ,%e SJC$_LOG_SPECIFICATION 98 /* File specification of log file */$#define SJC$_NO_LOG_SPECIFICATION 99N#define SJC$_LOG_SPOOL 100 /* Print log file */#define SJC$_NO_LOG_SPOOL 101N#define SJC$_LOWERCASE 102 /* Print on lowercase printer */#define SJC$_NO_LOWERCASE 103N#define SJC$_NEW_VERSION 104 /* Create new version of file */N#define SJC$_NEXT_JOB 105 /* Resume at next job */N#define SJ-%C$_NOTE 106 /* Flag page note text */#define SJC$_NO_NOTE 107N#define SJC$_NOTIFY 108 /* Notify user on job completion */X#define SJC$_NO_NOTIFY 109 /* Don't notify user on completion (for jobs) */N/* Don't notify user on interruption (for print queues) */N#define SJC$_OPERATOR_REQUEST 110 /* Operator service text */$#define SJC$_NO_OPERATOR_REQUEST 111N#define SJC$_OWNER_UIC 112 /* .% Queue owner UIC */N#define SJC$_PAGE_HEADER 113 /* Print page headers */#define SJC$_NO_PAGE_HEADER 114R#define SJC$_PAGE_SETUP_MODULES 115 /* Device control modules for form page */&#define SJC$_NO_PAGE_SETUP_MODULES 116R#define SJC$_PAGINATE 117 /* Paginate output with free form feeds */#define SJC$_NO_PAGINATE 118N#define SJC$_PARAMETER_1 119 /* Batch job parameters */#define SJC$_PARAMETER_2 120#defin /%e SJC$_PARAMETER_3 121#define SJC$_PARAMETER_4 122#define SJC$_PARAMETER_5 123#define SJC$_PARAMETER_6 124#define SJC$_PARAMETER_7 125#define SJC$_PARAMETER_8 126#define SJC$_NO_PARAMETERS 127N#define SJC$_PASSALL 128 /* Print file passall */#define SJC$_NO_PASSALL 129N#define SJC$_PRIORITY 130 /* Job scheduling priority */N#define SJC$_PROCESSOR 131 /* Filename of symbiont image */#define SJC$_NO_PROCESSOR 1320%N#define SJC$_PROTECTION 133 /* Queue protection mask */N#define SJC$_QUEUE 134 /* Queue on which to operate */P#define SJC$_QUEUE_FILE_SPECIFICATION 135 /* File specification of queue file */P#define SJC$_RELATIVE_PAGE 136 /* Resume after forward or back space */N#define SJC$_REQUEUE 137 /* Requeue job */N#define SJC$_RESTART 138 /* Job can restart */#define SJC$_NO_REST 1%ART 139N#define SJC$_RETAIN_ALL_JOBS 140 /* Retain completed jobs */"#define SJC$_RETAIN_ERROR_JOBS 141#define SJC$_NO_RETAIN_JOBS 142N#define SJC$_SCSNODE_NAME 143 /* Node name of execution node */N#define SJC$_SEARCH_STRING 144 /* Resume after finding string */N#define SJC$_SWAP 145 /* Swap batch processes */#define SJC$_NO_SWAP 146Q#define SJC$_TERMINAL 147 /* Queue is a (generic) terminal queue * 2%/#define SJC$_NO_TERMINAL 148N#define SJC$_TOP_OF_FILE 149 /* Resume at top of file */g#define SJC$_USER_IDENTIFICATION 150 /* Proxy user identification (not supported and is obsolete) */X/* (note this item code is intentionally not documented and reserved for Digital use) */N#define SJC$_WSDEFAULT 151 /* Working set default */#define SJC$_NO_WSDEFAULT 152N#define SJC$_WSEXTENT 153 /* Working set extent */#def3%ine SJC$_NO_WSEXTENT 154N#define SJC$_WSQUOTA 155 /* Working set quota */#define SJC$_NO_WSQUOTA 156\#define SJC$_ACCOUNT_NAME 157 /* Proxy account name (requires CMKRNL privilege) */S#define SJC$_UIC 158 /* Proxy UIC (requires CMKRNL privilege) */X#define SJC$_USERNAME 159 /* Proxy username (requires CMKRNL privilege) */N#define SJC$_BUFFER_COUNT 160 /* Multibuffer count for queue file */[#define SJC$_EXTEND_4%QUANTITY 161 /* Allocation and extend quantity for queue file */W#define SJC$_RECORD_BLOCKING 162 /* Symbiont record blocking of output stream */##define SJC$_NO_RECORD_BLOCKING 163y#define SJC$_QUEMAN_RESTART 164 /* qualifier on SJC$_START_QUEUE_MANAGER, restart queue manager after an abort */"#define SJC$_NO_QUEMAN_RESTART 165N#define SJC$_DEFAULT_FORM_NAME 166 /* Default queue form name */N#define SJC$_DEFAULT_FORM_NUMBER 167 /* Default queue form nu5%mber */j#define SJC$_SECURITY_CLASSIFICATION 168 /* Used by SeVMS to specify security classification of the job */X/* (note this item code is intentionally not documented and reserved for Digital use) */N#define SJC$_QUEUE_SUPPORT 169 /* Queue Support Images */z#define SJC$_JOB_COMPLETION_STATUS 170 /* Status of completed job - this buffer is used instead of IOSB when specified */t#define SJC$_DIAGNOSTIC_BUFFER_OUTPUT 171 /* Job controller's in-memory diagnostic buffe6%r (for internal use only) */X/* (note this item code is intentionally not documented and reserved for Digital use) */O#define SJC$_OPEN_QUEUE 172 /* Open queue - allow job submission */W#define SJC$_CLOSE_QUEUE 173 /* Close queue - do not allow job submission */N#define SJC$_SERVER 174 /* Server queue */N#define SJC$_PRINTER 175 /* Printer queue */j#define SJC$_UPDATE_ORB 176 /* Update ORB 7%information in queue file (for internal use only) */X/* (note this item code is intentionally not documented and reserved for Digital use) */N#define SJC$_NO_QUEUE_DESCRIPTION 177 /* No queue description supplied */N#define SJC$_JOB_RETAIN 178 /* Retain this job */N#define SJC$_JOB_ERROR_RETAIN 179 /* Retain this job on error */O#define SJC$_JOB_DEFAULT_RETAIN 180 /* Use queue's job retention setting */^#define SJC$_NOTIFY_ON_INTERRUPT 181 8%/* Notify users if their print jobs are interrupted */X#define SJC$_NO_RAD 182 /* Reserved for Digital use (name may change) */_#define SJC$_ACCEPT_ALL_ATTRIBUTES 183 /* Inhibits queue manager validation of QSI keywords */^#define SJC$_DIAGNOSTIC_FLAGS 184 /* Diagnostic flags bitmask (for internal use only) */X/* (note this item code is intentionally not documented and reserved for Digital use) */N#define SJC$_QUEUE_DESCRIPTION 185 /* Queue description 9%*/h#define SJC$_CHECKPOINT_FREQUENCY 186 /* Symbiont takes checkpoint at intervals of this many pages */v#define SJC$_DISPLAY_USERNAME 187 /* Used by DQS to pass a username to the remote system (symbol not renamed) */X/* (note this item code is intentionally not documented and reserved for Digital use) */N#define SJC$_FILE_NUMBER 188 /* File sequence number within job */h#define SJC$_FILE_ATTRIBUTE 189 /* "Keyword = (optional) value" for extensible attrib on file */g:%#define SJC$_JOB_ATTRIBUTE 190 /* "Keyword = (optional) value" for extensible attrib on job */i#define SJC$_QUEUE_ATTRIBUTE 191 /* "Keyword = (optional) value" for extensible attrib on queue */_#define SJC$_REMOVE_ATTRIBUTE 192 /* Remove extensible attribs for queue, job, or file */N#define SJC$_QUEUE_MANAGER_NAME 193 /* Queue manager process */k#define SJC$_QUEUE_MANAGER_NODES 194 /* Failover list of nodes on which queue manager process may run */z#def;%ine SJC$_AUTOSTART_ON 195 /* Node(s) (and for print queues, device(s)) on which queue can be auto started */#define SJC$_RESERVED_OUTPUT_196 196 /* Reserved for Digital use (name may change) SJC$_RESERVED_OUTPUT_196 to SJC$_RESERVED_OUT\ PUT_199 */v#define SJC$_RESERVED_OUTPUT_197 197 /* Reserved for Digital use (name may change) reserved by security group. */]#define SJC$_RESERVED_OUTPUT_198 198 /* Reserved for Digital use (name may change) see. */n#define SJC$_RESERVED_OU<%TPUT_199 199 /* Reserved for Digital use (name may change) [QMAN]Tables.req */S#define SJC$_SET_CONDITION_VECTOR 200 /* QSI can alter job's completion status */W#define SJC$_NOTIFY_MESSAGE 201 /* QSI Check Job can replace job completion */N/* message sent to user */_#define SJC$_DEFINE_FILE_ATTRIBUTES 202 /* Legal keywds for file submissions or alter_file's */_#define SJC$_DEFINE_JOB_ATTRIBUTES 203 /* Legal keywds in oper'=%ns that create or alter jobs */`#define SJC$_DEFINE_QUEUE_ATTRIBUTES 204 /* Legal keywords in operations that alter the queue */N#define SJC$_AGENT_PROFILE 205 /* Security information */u#define SJC$_ADD_QUEUE_MANAGER 206 /* Boolean item code telling sjc_start_queue_manager to add a new database */y#define SJC$_OUTSTANDING_JOBS 207 /* Boolean item code telling queue manager to not delete outstanding open jobs */|#define SJC$_NO_INITIAL_FF 208 /* To supp>%ress initial form feed when the queue is started with INIT or START cmd */!#define SJC$_NO_NO_INITIAL_FF 209b#define SJC$_DELETE_FILE_ALWAYS 210 /* delete file even if the job completes with a failure */&#define SJC$_NO_DELETE_FILE_ALWAYS 211X#define SJC$_RESERVED_BOOLEAN_212 212 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_213 213 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_214 214 /* Reserved for Digital use (name ?%may change) */X#define SJC$_RESERVED_BOOLEAN_215 215 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_216 216 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_217 217 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_218 218 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_219 219 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_220 220 @%/* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_221 221 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_222 222 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_223 223 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_224 224 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_225 225 /* Reserved for Digital use (name may change) */X#definA%e SJC$_RESERVED_BOOLEAN_226 226 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_227 227 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_228 228 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_229 229 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_230 230 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_231 231 /* Reserved for DigitaB%l use (name may change) */X#define SJC$_RESERVED_BOOLEAN_232 232 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_233 233 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_BOOLEAN_234 234 /* Reserved for Digital use (name may change) */e#define SJC$_JOB_RETAIN_TIME 235 /* The time the job should be retained (delta or absolute) */`#define SJC$_MANAGER_ATTRIBUTE 236 /* Any application specific queue manager attributes. */N#definC%e SJC$_RAD 237 /* RAD on which to run batch job. */r#define SJC$_RESERVED_INPUT_238 238 /* Reserved for Digital use (name may change) items RESERVED_INPUT_238 */d#define SJC$_RESERVED_INPUT_239 239 /* Reserved for Digital use (name may change) to */q#define SJC$_RESERVED_INPUT_240 240 /* Reserved for Digital use (name may change) SJC$_RESERVED_INPUT_241 */#define SJC$_RESERVED_INPUT_241 241 /* Reserved for Digital use (name may change) reserved by D%security (see [QMAN]tables.req */Y#define SJC$_RESERVED_INPUT_242 242 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_INPUT_243 243 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_INPUT_244 244 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_INPUT_245 245 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_INPUT_246 246 /* Reserved for Digital use (name may change) */X#define SJC$_RESERE%VED_INPUT_247 247 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_INPUT_248 248 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_INPUT_249 249 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_INPUT_250 250 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_OUTPUT_251 251 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_OUTPUT_252 252 /* Reserved for Digital use (name F%may change) */X#define SJC$_RESERVED_OUTPUT_253 253 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_OUTPUT_254 254 /* Reserved for Digital use (name may change) */X#define SJC$_RESERVED_OUTPUT_255 255 /* Reserved for Digital use (name may change) */N#define SJC$K_MIN_ITEM 1 /* Minimum SNDJBC item code */N#define SJC$K_MAX_ITEM 255 /* Maximum SNDJBC item code */N#define SJC$_CHARGE_CODE 157 /* synonym for SJC$_ G%ACCOUNT_NAME */N#define SJC$_RESERVED_INPUT_187 187 /* for DQS only */ #define SJC$_QUEUE_DIRECTORY 135N/* Disk & directory for non-shared job queue database */#define SJC$_SERVICE_INPUT 10#define SJC$_SERVICE_OUTPUT 11Z/* SERVICE item codes are used for communications with LOGINOUT, symbionts, and jobctl. */N/* */]/* Subfields of ACCOUNTING_TYPES item code. These definH%itions must track EXE$GL_ACMFLAGS. */N/* */#define SJC$M_ACCT_PROCESS 0x1#define SJC$M_ACCT_IMAGE 0x2"#define SJC$M_ACCT_INTERACTIVE 0x4$#define SJC$M_ACCT_LOGIN_FAILURE 0x8"#define SJC$M_ACCT_SUBPROCESS 0x10 #define SJC$M_ACCT_DETACHED 0x20#define SJC$M_ACCT_BATCH 0x40#define SJC$M_ACCT_NETWORK 0x80#define SJC$M_ACCT_PRINT 0x100 #define SJC$M_ACCT_MESSAGE 0x200!#define SJC$M_ACCT_ACM_FUNC 0x400 #define SJC$ I%M_ACCT_ACM_SYS 0x800!#define SJC$M_ACCT_CCAENAB 0x1000!#define SJC$M_ACCT_CCVENAB 0x2000 #ifdef __NEW_STARLET"typedef struct _accounting_types {N unsigned sjc$v_acct_process : 1; /* Process termination */N unsigned sjc$v_acct_image : 1; /* Image termination */N unsigned sjc$v_acct_interactive : 1; /* Interactive processes */N unsigned sjc$v_acct_login_failure : 1; /* Login failures */N unsigned sjc$v_acct_subproJ%cess : 1; /* Subprocesses */N unsigned sjc$v_acct_detached : 1; /* Detached processes */N unsigned sjc$v_acct_batch : 1; /* Batch processes */N unsigned sjc$v_acct_network : 1; /* Network processes */N unsigned sjc$v_acct_print : 1; /* Print job termination */N unsigned sjc$v_acct_message : 1; /* User messages */N unsigned sjc$v_acct_acm_func : 1; /* Acm function K% */N unsigned sjc$v_acct_acm_sys : 1; /* System function */N unsigned sjc$v_acct_ccaenab : 1; /* Charge code accounting */N unsigned sjc$v_acct_ccvenab : 1; /* Charge code validation */$ unsigned sjc$v_acct_unused : 18; } ACCOUNTING_TYPES;#else /* __OLD_STARLET */struct accounting_types {N unsigned sjc$v_acct_process : 1; /* Process termination */N unsigned sjc$v_acct_image : 1; L% /* Image termination */N unsigned sjc$v_acct_interactive : 1; /* Interactive processes */N unsigned sjc$v_acct_login_failure : 1; /* Login failures */N unsigned sjc$v_acct_subprocess : 1; /* Subprocesses */N unsigned sjc$v_acct_detached : 1; /* Detached processes */N unsigned sjc$v_acct_batch : 1; /* Batch processes */N unsigned sjc$v_acct_network : 1; /* Network processes M% */N unsigned sjc$v_acct_print : 1; /* Print job termination */N unsigned sjc$v_acct_message : 1; /* User messages */N unsigned sjc$v_acct_acm_func : 1; /* Acm function */N unsigned sjc$v_acct_acm_sys : 1; /* System function */N unsigned sjc$v_acct_ccaenab : 1; /* Charge code accounting */N unsigned sjc$v_acct_ccvenab : 1; /* Charge code validation */$ unsign N%ed sjc$v_acct_unused : 18; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Subfields of DIAGNOSTIC_FLAGS item code. */N/* */#define SJC$M_DIAG_COPY_QF 0x1 #define SJC$M_DIAG_CREATE_MF 0x2#define SJC$M_DIAG_CLOSE_MF 0x4#define SJC$M_DIAG_OPEN_MF 0x8##define SJC$M_DIAG_CLEAR_FLAGS 0x10%#define SJC$M_DIAG O%_LOG_ALL_TRANS 0x20$#define SJC$M_DIAG_JOURNAL_PUTS 0x40(#define SJC$M_DIAG_DUMP_DIAG_BUFFER 0x80)#define SJC$M_DIAG_INIT_DIAG_BUFFER 0x100 #ifdef __NEW_STARLET"typedef struct _diagnostic_flags {N unsigned sjc$v_diag_copy_qf : 1; /* Make copy of the queue file */^ unsigned sjc$v_diag_create_mf : 1; /* Create new monitor log file and begin monitoring */X unsigned sjc$v_diag_close_mf : 1; /* Stop monitoring and close monitor log file */b unsigned sjc$v_diag_open_mf P%: 1; /* Open existing monitor log file and resume monitoring */a unsigned sjc$v_diag_clear_flags : 1; /* Clear monitoring flags in queue file header record */k unsigned sjc$v_diag_log_all_trans : 1; /* Log read-only transactions in addition to basic monitoring */r unsigned sjc$v_diag_journal_puts : 1; /* Journal queue file $PUT operations in addition to basic monitoring */b unsigned sjc$v_diag_dump_diag_buffer : 1; /* Return contents of diagnostic buffer to caller */m unsigned Q% sjc$v_diag_init_diag_buffer : 1; /* Initialize diagnostic buffer and zero cumulative counters */$ unsigned sjc$v_diag_unused : 23; } DIAGNOSTIC_FLAGS;#else /* __OLD_STARLET */struct diagnostic_flags {N unsigned sjc$v_diag_copy_qf : 1; /* Make copy of the queue file */^ unsigned sjc$v_diag_create_mf : 1; /* Create new monitor log file and begin monitoring */X unsigned sjc$v_diag_close_mf : 1; /* Stop monitoring and close monitor log file */b unsigned sjcR%$v_diag_open_mf : 1; /* Open existing monitor log file and resume monitoring */a unsigned sjc$v_diag_clear_flags : 1; /* Clear monitoring flags in queue file header record */k unsigned sjc$v_diag_log_all_trans : 1; /* Log read-only transactions in addition to basic monitoring */r unsigned sjc$v_diag_journal_puts : 1; /* Journal queue file $PUT operations in addition to basic monitoring */b unsigned sjc$v_diag_dump_diag_buffer : 1; /* Return contents of diagnostic buffer to caller S%*/m unsigned sjc$v_diag_init_diag_buffer : 1; /* Initialize diagnostic buffer and zero cumulative counters */$ unsigned sjc$v_diag_unused : 23; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif / T%* __SJCDEF_LOADED */ ww+4M/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SMB$ROUTINES.SDI;1 *//********************************************************************************************************************************/'/*** MODULE SMB$ROUTINES IDENT X-1 ***/#ifn U%def __SMB_ROUTINES_LOADED#define __SMB_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __cplusplV%us 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 N/* */N/* Symbiont/W%Job Controller Interface (SMB) Routines */N/* */N/* */N/* SMB$CHECK_FOR_MESSAGE - Check for Message from Job Controller */N/* */N/* status = SMB$CHECK_FOR_MESSAGE () */N/* X% */5#define smb$check_for_message SMB$CHECK_FOR_MESSAGE#ifdef __NEW_STARLET)unsigned int smb$check_for_message(void);#else /* __OLD_STARLET */)unsigned int smb$check_for_message(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SMB$INITIALIZE - Initialize User-Written Symbiont */N/* Y% */N/* status = SMB$INITIALIZE (structure_level [,ast_routine] [,streams]) */N/* */N/* structure_level - Version of the job-controller/symbiont interface */N/* ast_routine - Message-handling AST routine */N/* streams - Maximum number of streams to support */N/* */'#define smb$initialZ%ize SMB$INITIALIZE #ifdef __NEW_STARLETunsigned int smb$initialize( unsigned int *structure_level, __optional_params );#else /* __OLD_STARLET */.unsigned int smb$initialize(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SMB$READ_MESSAGE - Obtain Message Sent by Job Controller */N/* */N/* status = SMB$[%READ_MESSAGE (stream, buffer, request) */N/* */N/* stream - Stream number for message */N/* buffer - Buffer into which message is written */N/* request - Code that identifies the request */N/* */+#define smb$read_message SMB$READ_MESSAG\%E #ifdef __NEW_STARLETunsigned int smb$read_message( unsigned int *stream, void *buffer, unsigned int *request);#else /* __OLD_STARLET */0unsigned int smb$read_message(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SMB$READ_MESSAGE_ITEM - Parse Next Item from Message Buffer */N/* */N/* status = SMB$READ_MES]%SAGE_ITEM (message, context, item_code, buffer */N/* [, size]) */N/* */N/* message - Message items to read */N/* context - Context value */N/* item_code - Item code of message read */N/* buffer - Message item ^% */N/* size - Size of message item */N/* */5#define smb$read_message_item SMB$READ_MESSAGE_ITEM #ifdef __NEW_STARLET#unsigned int smb$read_message_item( void *message, unsigned int *context, unsigned int *item_code, void *buffer, __optional_params);#else /* __OLD_STARLET */5unsigned int smb$read_message_item(__unknown_params);!#e_%ndif /* #ifdef __NEW_STARLET */N/* */N/* SMB$SEND_TO_JOBCTL - Send Message to Job Controller */N/* */N/* status = SMB$SEND_TO_JOBCTL (stream [,request] [,accounting] */;/* [,checkpoint] [,device_status] [,error]) */N/* */N/* stream`% - Number of stream to which message refers */N/* request - Code identifying request being completed */N/* accounting - Accounting information about a task */N/* checkpoint - Checkpoint data about current task */N/* device_status - Status of device served by the symbiont */N/* error - Condition code returned by the requested task */N/* a% *//#define smb$send_to_jobctl SMB$SEND_TO_JOBCTL #ifdef __NEW_STARLET unsigned int smb$send_to_jobctl( unsigned int *stream, __optional_params );#else /* __OLD_STARLET */2unsigned int smb$send_to_jobctl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the pb%reviously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __SMB_ROUTINES_LOADED */ wwKM/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SMBMSG.SDI;1 *//************************************************************* c%*******************************************************************//*** MODULE $SMBMSGDEF ***/#ifndef __SMBMSGDEF_LOADED#define __SMBMSGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined required ptr size */[#pragma __required_pointerd%_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 e% N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:38.48 */N/* */N/* */Q/***************************************************************************** *//** * */8/** COPYRIGHT (C) 1978, 1980, 1982, 1984 BY * */E/** DIGITAL Ef%QUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP g%OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** h% * */Q/***************************************************************************** */N/* */N/*++ */N/* FACILITY: */I/* SYMBIONT. */N/* */N/* ABSTRi%ACT: */I/* SYMBIONT MESSAGES. */N/* */L/* THESE ARE THE MESSAGES COMMON TO VAX/VMS SYMBIONTS. MESSAGE TYPES FOR */K/* MESSAGES SENT FROM THE SYMBIONTS TO THE JOB CONTROLLER ARE DEFINED BY */I/* THE $MSGDEF MACRO. */N/* j% */N/* ENVIRONMENT: */I/* VAX/VMS USER AND KERNEL MODE. */N/* */N/* AUTHOR: ROWLAND R. BRADLEY, CREATION DATE: 20-JULY-1984 */N/* */N/* MODIFIED BY: k%*/N/* */7/* X-2 LMP0560 L. MARK PILANT, 27-MAR-1992 14:08 */B/* CHANGE THE MACRO NAME FROM $PSMMSGDEF TO $SMBMSGDEF. */N/* */9/* 3B-010 BLS0336 BENN SCHREIBER 5-AUG-1984 */B/* ADD .END. */N/* */</* 3B-00l%9 RRB0009 ROWLAND R. BRADLEY 20-JUL-1984 */B/* REMOVED THESE DEFINITIONS FOR SMB AND PLACED IN A SEPARATE */D/* FILE SMBMSG.MSG. THIS ACCOMPLISHES THE RENAMING OF MESSAGES */B/* WITH A SEPARATE FACILITY CODE. NOW TWO TYPES OF MESSAGES */B/* SMB$... AND PSM$... DEPENDING ON THE CONTEXT OF THE */B/* ERROR. AUDIT TRAIL BEGINS AT HIGHER NUMBER SINCE THIS IS */B/* A CONTINUATION OF PSMMSG.MSG. */N/* m% */N/*** */N/* */#define SMB$_FACILITY 272!#define SMB$_NOMOREITEMS 17858562#define SMB$_INVSTMNBR 17858572#define SMB$_INVSTRLEV 17858580 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Resn%tore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SMBMSGDEF_LOADED */ ww[M/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SMG$ROUTINES.SDI;1 *//*********************************************** o%*********************************************************************************//*** MODULE smg$routines ***/#ifndef __SMG_ROUTINES_LOADED#define __SMG_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined required ptr size */[#pp%ragma __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_ q%union#endif#endif P/**************************************************************************** *//* * */-/* COPYRIGHT (c) 1992, 1995 BY * */D/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */&/* ALL RIGHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */P/* INCLUSION OF THE ABOVE COP r%YRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */P/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */&/* TRANSFERRED. * *//* * */P/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. * *//* * */P/* DIs%GITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * *//* * */P/**************************************************************************** */N/* SMG$ADD_KEY_DEF */N/* */N/* Add Key Definition t% */N/* */N/* The Add Key Definition routine adds a keypad key definition to a */N/* table of key definitions. */N/* */N/* */)#define smg$add_key_def SMG$ADD_KEY_DEF #ifdef __NEW_STARLETunsigned int smg$add_key_def u%( unsigned int *key_table_id, void *key_name, __optional_params );#else /* __OLD_STARLET *//unsigned int smg$add_key_def(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$ALLOW_ESCAPE */N/* */N/* Allow Escape Sequences */N/* v% */N/* SMG$ALLOW_ESCAPE enables or disables SMG parsing of escape sequences */N/* which are output to a virtual display. */N/* */N/* */+#define smg$allow_escape SMG$ALLOW_ESCAPE #ifdef __NEW_STARLETunsigned int smg$allow_escape( unsigned int *display_id, unsigned int *esc_flag);#else /* __OLD_STARL w%ET */0unsigned int smg$allow_escape(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$BEGIN_DISPLAY_UPDATE */N/* */N/* Begin Batching of Display Updates */N/* */N/* The Begin Batching of Display Updates routine saves, or batches, all */N/* output x% to a virtual display until a matching call to */N/* SMG$END_DISPLAY_UPDATE is encountered. */N/* */N/* */;#define smg$begin_display_update SMG$BEGIN_DISPLAY_UPDATE #ifdef __NEW_STARLET&unsigned int smg$begin_display_update( unsigned int *display_id);#else /* __OLD_STARLET */8unsigned inty% smg$begin_display_update(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$BEGIN_PASTEBOARD_UPDATE */N/* */N/* Begin Batching of Pasteboard Updates */N/* */N/* The Begin Batching of Pasteboard Updates routine saves, or */N/* batches, all outpu z%t to a pasteboard until a matching call to */N/* SMG$END_PASTEBOARD_UPDATE is encountered. */N/* */N/* */A#define smg$begin_pasteboard_update SMG$BEGIN_PASTEBOARD_UPDATE #ifdef __NEW_STARLET)unsigned int smg$begin_pasteboard_update( unsigned int *pasteboard_id);#else /* __OLD_STARLET */;unsigned int{% smg$begin_pasteboard_update(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CANCEL_INPUT */N/* */N/* Cancel Input Request */N/* */N/* The Cancel Input Request routine immediately cancels any */N/* read-in-progre |%ss that was issued by SMG$READ_COMPOSED_LINE, */N/* SMG$READ_KEYSTROKE, SMG$READ_STRING, or SMG$READ_VERIFY. */N/* */N/* */+#define smg$cancel_input SMG$CANCEL_INPUT #ifdef __NEW_STARLETunsigned int smg$cancel_input( unsigned int *keyboard_id);#else /* __OLD_STARLET */0unsigned int smg$cancel_input(__unknown_para}%ms);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CHANGE_PBD_CHARACTERISTICS */N/* */N/* Change Pasteboard Characteristics */N/* */N/* The Change Pasteboard Characteristics routine lets you change the */N/* characteristics associated with a pasteboard. ~% */N/* */G#define smg$change_pbd_characteristics SMG$CHANGE_PBD_CHARACTERISTICS #ifdef __NEW_STARLET,unsigned int smg$change_pbd_characteristics( unsigned int *pasteboard_id, __optional_params );#else /* __OLD_STARLET */>unsigned int smg$change_pbd_characteristics(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CHANGE_RENDITION */%N/* */N/* Change Default Rendition */N/* */N/* The Change Default Rendition routine changes the video attributes */N/* for all or part of a virtual display. */N/* */N/* % */3#define smg$change_rendition SMG$CHANGE_RENDITION #ifdef __NEW_STARLET"unsigned int smg$change_rendition( unsigned int *display_id, int *start_row, int *start_column, int *number_of_rows, int *number_of_columns, __optional_params );#else /* __OLD_STARLET */4unsigned int smg$change_rendition(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CHANGE_VIEWPORT % */N/* */N/* Change the Viewport */N/* */N/* The Change the Viewport Associated with a Virtual Display routine */N/* changes the size of an existing viewport in a virtual display. The */N/* text that is currently in the viewport is remapped to fit the new */N/* dimensions. % */N/* */1#define smg$change_viewport SMG$CHANGE_VIEWPORT #ifdef __NEW_STARLET!unsigned int smg$change_viewport( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */3unsigned int smg$change_viewport(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CHANGE_VIRTUAL_DISPLAY */%N/* */N/* Change Virtual Display */N/* */N/* The Change Virtual Display routine lets you change the dimensions, */N/* border, and video attributes of a virtual display. */N/* */?#define smg$change_virt %ual_display SMG$CHANGE_VIRTUAL_DISPLAY #ifdef __NEW_STARLET(unsigned int smg$change_virtual_display( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */:unsigned int smg$change_virtual_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CHECK_FOR_OCCLUSION */N/* */N/* Check for Occlusion % */N/* */N/* The Check for Occlusion routine checks to see whether a virtual */N/* display is covered (occluded) by another virtual display. */N/* */9#define smg$check_for_occlusion SMG$CHECK_FOR_OCCLUSION #ifdef __NEW_STARLET%unsigned int smg$check_for_occlusion( unsigned int *display_id, unsigned %int *pasteboard_id, int *occlusion_state);#else /* __OLD_STARLET */7unsigned int smg$check_for_occlusion(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CONTROL_MODE */N/* */N/* Control Mode */N/* */N/* The Contro %l Mode routine controls the mode of the pasteboard. This */N/* includes buffering, minimal updating, whether the screen is cleared */N/* when the pasteboard is deleted, and whether tab characters are used */N/* for screen formatting. */N/* */+#define smg$control_mode SMG$CONTROL_MODE #ifdef __NEW_STARLETunsigned int smg$control_mode( unsigned int *pas %teboard_id, __optional_params );#else /* __OLD_STARLET */0unsigned int smg$control_mode(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$COPY_VIRTUAL_DISPLAY */N/* */N/* Copy a Virtual Display */N/* */N/* The Copy a Virtual Display % routine creates a copy of an existing */N/* virtual display and assigns to it a new virtual display identifier. */N/* */;#define smg$copy_virtual_display SMG$COPY_VIRTUAL_DISPLAY #ifdef __NEW_STARLET&unsigned int smg$copy_virtual_display(" unsigned int *current_display_id, unsigned int *new_display_id);#else /* __OLD_STARLET */8unsigned int smg$copy_virtual_display(__unknown_params);!#endif /* #ifd%ef __NEW_STARLET */N/* SMG$CREATE_KEY_TABLE */N/* */N/* Create Key Table */N/* */N/* The Create Key Table routine creates a table for key definitions. */N/* */3#def %ine smg$create_key_table SMG$CREATE_KEY_TABLE #ifdef __NEW_STARLET"unsigned int smg$create_key_table( unsigned int *key_table_id);#else /* __OLD_STARLET */4unsigned int smg$create_key_table(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CREATE_MENU */N/* */N/* Fill the Virtual Display with a Menu */N/* % */N/* The Fill the Virtual Display with a Menu routine displays menu */N/* choices */N/* in the virtual display indicated, starting at the specified row. */N/* */)#define smg$create_menu SMG$CREATE_MENU #ifdef __NEW_STARLETunsigned int smg$create_menu( unsigne %d int *display_id, void *choices, __optional_params );#else /* __OLD_STARLET *//unsigned int smg$create_menu(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CREATE_PASTEBOARD */N/* */N/* Create a Pasteboard */N/* */T/* Th %e Create Pasteboard routine creates a pasteboard and returns its assigned */N/* pasteboard identifier. */N/* */5#define smg$create_pasteboard SMG$CREATE_PASTEBOARD #ifdef __NEW_STARLET#unsigned int smg$create_pasteboard( unsigned int *pasteboard_id, __optional_params );#else /* __OLD_STARLET */5unsigned int smg$create_pasteboard(__unknown_params);!#endif% /* #ifdef __NEW_STARLET */N/* SMG$CREATE_SUBPROCESS */N/* */N/* Create and Initialize a Subprocess */N/* */N/* The Create and Initialize a Subprocess routine creates a DCL */N/* subprocess and associates it with a virtual display. %*/N/* */5#define smg$create_subprocess SMG$CREATE_SUBPROCESS #ifdef __NEW_STARLET#unsigned int smg$create_subprocess( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */5unsigned int smg$create_subprocess(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CREATE_VIEWPORT */N/* % */N/* Create a Virtual Viewport */N/* */N/* The Create a Virtual Viewport routine creates a viewport and */N/* associates it with a virtual display. The location and size of the */N/* viewport are specified by the caller. */N/* % */1#define smg$create_viewport SMG$CREATE_VIEWPORT #ifdef __NEW_STARLET!unsigned int smg$create_viewport( unsigned int *display_id, int *viewport_row_start, int *viewport_column_start, int *viewport_number_rows, int *viewport_number_columns);#else /* __OLD_STARLET */3unsigned int smg$create_viewport(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CREATE_VIRTUAL_DISPLAY */N/* % */N/* Create a Virtual Display */N/* */N/* The Create Virtual Display routine creates a virtual display and */N/* returns */N/* assigned display identifier. */N/* % */?#define smg$create_virtual_display SMG$CREATE_VIRTUAL_DISPLAY #ifdef __NEW_STARLET(unsigned int smg$create_virtual_display( int *number_of_rows, int *number_of_columns, unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */:unsigned int smg$create_virtual_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CREATE_VIRTUAL_KEYBOARD */N/* % */N/* Create Virtual Keyboard */N/* */N/* The Create Virtual Keyboard routine creates a virtual keyboard and */N/* returns its assigned keyboard identifier. */N/* */A#define smg$create_virtual_keyboard SMG$CREATE_VIRTUAL_KEYBOARD #i %fdef __NEW_STARLET)unsigned int smg$create_virtual_keyboard( unsigned int *keyboard_id, __optional_params );#else /* __OLD_STARLET */;unsigned int smg$create_virtual_keyboard(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CURSOR_COLUMN */N/* */N/* Return Cursor Column Position */N/* % */N/* The Return Cursor Column Position routine returns the virtual */N/* cursor's */N/* current column position in a specified virtual display. */N/* */-#define smg$cursor_column SMG$CURSOR_COLUMN #ifdef __NEW_STARLETunsigned int smg$cursor_column( unsigned int *dis %play_id);#else /* __OLD_STARLET */1unsigned int smg$cursor_column(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$CURSOR_ROW */N/* */N/* Return Cursor Row Position */N/* */N/* The Return Cursor Row Position routine returns the v %irtual cursor's */N/* current row position in a specified virtual display. */N/* */'#define smg$cursor_row SMG$CURSOR_ROW #ifdef __NEW_STARLETunsigned int smg$cursor_row( unsigned int *display_id);#else /* __OLD_STARLET */.unsigned int smg$cursor_row(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DEFINE_KEY */N/* % */N/* Perform a DEFINE/KEY Command */N/* */N/* The Perform a DEFINE/KEY Command routine performs the DEFINE/KEY */N/* command you provide. */N/* */'#define smg$define_key SMG$D %EFINE_KEY #ifdef __NEW_STARLETunsigned int smg$define_key( unsigned int *key_table_id, void *command_string);#else /* __OLD_STARLET */.unsigned int smg$define_key(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DELETE_CHARS */N/* */N/* Delete Characters */N/* % */N/* The Delete Characters routine deletes characters in a virtual */N/* display. */N/* */+#define smg$delete_chars SMG$DELETE_CHARS #ifdef __NEW_STARLETunsigned int smg$delete_chars( unsigned int *display_id, int *number_of_characters, int *start_row, int *start_column);#else /* __OLD %_STARLET */0unsigned int smg$delete_chars(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DELETE_KEY_DEF */N/* */N/* Delete Key Definition */N/* */N/* The Delete Key Definition routine deletes a key definition from the */N/* %specified table of key definitions. */N/* *//#define smg$delete_key_def SMG$DELETE_KEY_DEF #ifdef __NEW_STARLET unsigned int smg$delete_key_def( unsigned int *key_table_id, void *key_name, __optional_params);#else /* __OLD_STARLET */2unsigned int smg$delete_key_def(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DELETE_LINE % */N/* */N/* Delete Line */N/* */N/* The Delete Line routine deletes lines from a virtual display. */N/* */)#define smg$delete_line SMG$DELETE_LINE #ifdef __NEW_STARLETunsigned int % smg$delete_line( unsigned int *display_id, int *start_row, __optional_params);#else /* __OLD_STARLET *//unsigned int smg$delete_line(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DELETE_MENU */N/* */N/* End Access to a Menu in the Virtual Display */N/* % */N/* The End Access to a Menu in the Virtual Display routine ends access */N/* to the menu choices in the specified virtual display. */N/* */)#define smg$delete_menu SMG$DELETE_MENU #ifdef __NEW_STARLETunsigned int smg$delete_menu( unsigned int *display_id, __optional_params);#else /* __OLD_STARLET *//unsigned int smg$delete_menu(__unknown_params);!#endif /* #ifdef __N%EW_STARLET */N/* SMG$DELETE_PASTEBOARD */N/* */N/* Delete Pasteboard */N/* */N/* The Delete Pasteboard routine deletes a pasteboard. */N/* */5#define s %mg$delete_pasteboard SMG$DELETE_PASTEBOARD #ifdef __NEW_STARLET#unsigned int smg$delete_pasteboard( unsigned int *pasteboard_id, __optional_params);#else /* __OLD_STARLET */5unsigned int smg$delete_pasteboard(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DELETE_SUBPROCESS */N/* */N/* Terminate a Subprocess % */N/* */N/* The Terminate a Subprocess routine deletes a subprocess that was */N/* created with the SMG$CREATE_SUBPROCESS routine. */N/* */5#define smg$delete_subprocess SMG$DELETE_SUBPROCESS #ifdef __NEW_STARLET#unsigned int smg$delete_subprocess( unsigned int *display_id);#else /* __OLD_STA %RLET */5unsigned int smg$delete_subprocess(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DELETE_VIEWPORT */N/* */N/* Delete a Viewport */N/* */N/* The Delete a Viewport routine deletes the specified viewport from */N/* % any pasteboards to which it is pasted. */N/* */1#define smg$delete_viewport SMG$DELETE_VIEWPORT #ifdef __NEW_STARLET!unsigned int smg$delete_viewport( unsigned int *display_id);#else /* __OLD_STARLET */3unsigned int smg$delete_viewport(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DELETE_VIRTUAL_DISPLAY */N/* % */N/* Delete Virtual Display */N/* */N/* The Delete Virtual Display routine deletes a virtual display. */N/* */?#define smg$delete_virtual_display SMG$DELETE_VIRTUAL_DISPLAY #ifdef __NEW_STARLET(unsigned int smg$delet %e_virtual_display( unsigned int *display_id);#else /* __OLD_STARLET */:unsigned int smg$delete_virtual_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DELETE_VIRTUAL_KEYBOARD */N/* */N/* Delete Virtual Keyboard */N/* */N/* The De %lete Virtual Keyboard routine deletes a virtual keyboard. */N/* */A#define smg$delete_virtual_keyboard SMG$DELETE_VIRTUAL_KEYBOARD #ifdef __NEW_STARLET)unsigned int smg$delete_virtual_keyboard( unsigned int *keyboard_id);#else /* __OLD_STARLET */;unsigned int smg$delete_virtual_keyboard(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DEL_TERM_TABLE % */N/* */N/* Delete Terminal Table */N/* */N/* The Delete Terminal Table routine terminates access to a private */N/* TERMTABL */N/* and frees the associated virtual address space. */N/* % *//#define smg$del_term_table SMG$DEL_TERM_TABLE#ifdef __NEW_STARLET&unsigned int smg$del_term_table(void);#else /* __OLD_STARLET */&unsigned int smg$del_term_table(void);!#endif /* #ifdef __NEW_STARLET */G#define smg$disable_broadcast_trapping SMG$DISABLE_BROADCAST_TRAPPING #ifdef __NEW_STARLET,unsigned int smg$disable_broadcast_trapping( unsigned int *pasteboard_id);#else /* __OLD_STARLET */>unsigned int s%mg$disable_broadcast_trapping(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DISABLE_UNSOLICITED_INPUT */N/* */N/* Disable Unsolicited Input */N/* */N/* The Disable Unsolicited Input routine disables the trapping of */N/* unsolicited in %put. */N/* */E#define smg$disable_unsolicited_input SMG$DISABLE_UNSOLICITED_INPUT #ifdef __NEW_STARLET+unsigned int smg$disable_unsolicited_input( unsigned int *pasteboard_id);#else /* __OLD_STARLET */=unsigned int smg$disable_unsolicited_input(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DRAW_CHAR % */N/* */N/* Draw a Character in a Virtual Display */N/* */N/* The Draw a Character in a Virtual Display routine draws a character */N/* at */N/* the specified position in a virtual display. */N/* % */%#define smg$draw_char SMG$DRAW_CHAR #ifdef __NEW_STARLETunsigned int smg$draw_char( unsigned int *display_id, unsigned int *flags, __optional_params );#else /* __OLD_STARLET */-unsigned int smg$draw_char(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DRAW_LINE */N/* % */N/* Draw a Line */N/* */N/* The Draw a Line routine draws a horizontal or vertical line. */N/* */%#define smg$draw_line SMG$DRAW_LINE #ifdef __NEW_STARLETunsigned int smg$draw_line( unsigned int *display_id, int *start_row, int *start_column, int *end_ %row, int *end_column, __optional_params );#else /* __OLD_STARLET */-unsigned int smg$draw_line(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$DRAW_RECTANGLE */N/* */N/* Draw a Rectangle */N/* */N/* The Draw a Recta%ngle routine draws a rectangle. */N/* *//#define smg$draw_rectangle SMG$DRAW_RECTANGLE #ifdef __NEW_STARLET unsigned int smg$draw_rectangle( unsigned int *display_id, int *start_row, int *start_column, int *end_row, int *end_column, __optional_params );#else /* __OLD_STARLET */2unsigned int smg$draw_rectangle(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$EN%ABLE_UNSOLICITED_INPUT */N/* */N/* Enable Unsolicited Input */N/* */N/* The Enable Unsolicited Input routine detects unsolicited input and */N/* calls an AST routine in response. */N/* % */ C#define smg$enable_unsolicited_input SMG$ENABLE_UNSOLICITED_INPUT#ifdef __NEW_STARLET*unsigned int smg$enable_unsolicited_input( unsigned int *pasteboard_id,' void (*ast_routine)(__unknown_params), __optional_params);#else /* __OLD_STARLET */<unsigned int smg$enable_unsolicited_input(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* SMG$END_DISPLAY_UPDATE */N/* % */N/* End Display Update */N/* */N/* The End Display Update routine ends update batching for a virtual */N/* display. */N/* */7#define smg$end_display_update SMG$END_DIS %PLAY_UPDATE #ifdef __NEW_STARLET$unsigned int smg$end_display_update( unsigned int *display_id);#else /* __OLD_STARLET */6unsigned int smg$end_display_update(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$END_PASTEBOARD_UPDATE */N/* */N/* End Pasteboard Update */N/* % */N/* The End Pasteboard Update routine ends update batching for a */N/* pasteboard. */N/* */=#define smg$end_pasteboard_update SMG$END_PASTEBOARD_UPDATE #ifdef __NEW_STARLET'unsigned int smg$end_pasteboard_update( unsigned int *pasteboard_id);#else /* __OLD_STARLET */9unsigned int smg$end_pasteboard_%update(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$ERASE_CHARS */N/* */N/* Erase Characters */N/* */N/* The Erase Characters routine erases characters in a virtual display */N/* by % */N/* replacing them with blanks. */N/* */)#define smg$erase_chars SMG$ERASE_CHARS #ifdef __NEW_STARLETunsigned int smg$erase_chars( unsigned int *display_id, int *number_of_characters, int *start_row, int *start_column);#else /* __OLD_STARLET *//unsigned int smg$erase_chars(__unknown_params);!#endif /* #ifdef __NEW_STARLET% */N/* SMG$ERASE_COLUMN */N/* */N/* Erase Column from Display */N/* */N/* The Erase Column From Display routine erases the specified portion */N/* of the virtual display from the given position to the end of the */N/* column. % */N/* */+#define smg$erase_column SMG$ERASE_COLUMN #ifdef __NEW_STARLETunsigned int smg$erase_column( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */0unsigned int smg$erase_column(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$ERASE_DISPLAY */N/* % */N/* Erase Virtual Display */N/* */N/* The Erase Virtual Display routine erases all or part of a virtual */N/* display by replacing text characters with blanks. */N/* */-#define smg$erase_display SMG$ERASE_DI%SPLAY #ifdef __NEW_STARLETunsigned int smg$erase_display( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */1unsigned int smg$erase_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$ERASE_LINE */N/* */N/* Erase Line */N/* % */N/* The Erase Line routine erases all or part of a line in a virtual */N/* display. */N/* */'#define smg$erase_line SMG$ERASE_LINE #ifdef __NEW_STARLETunsigned int smg$erase_line( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */.unsigned int smg$erase_line(__unkn%own_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$ERASE_PASTEBOARD */N/* */N/* Erase Pasteboard */N/* */N/* The Erase Pasteboard routine erases the contents of a pasteboard. */N/* % */3#define smg$erase_pasteboard SMG$ERASE_PASTEBOARD #ifdef __NEW_STARLET"unsigned int smg$erase_pasteboard( unsigned int *pasteboard_id);#else /* __OLD_STARLET */4unsigned int smg$erase_pasteboard(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$EXECUTE_COMMAND */N/* */N/* Execute Command in a Subprocess % */N/* */N/* The Execute Command in a Subprocess routine executes the specified */N/* command in the subprocess created with the SMG$CREATE_SUBPROCESS */N/* routine. */N/* */1#define smg$execute_command SMG$EXECUTE_COMMAND #ifdef __NEW_STARLET!unsi %gned int smg$execute_command( unsigned int *display_id, void *command_desc, __optional_params );#else /* __OLD_STARLET */3unsigned int smg$execute_command(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$FIND_CURSOR_DISPLAY */N/* */N/* Find Display */N/* % */N/* The Find Display that Contains the Cursor routine returns the */N/* identifier of the most recently pasted virtual display that contains */N/* the physical cursor. */N/* */9#define smg$find_cursor_display SMG$FIND_CURSOR_DISPLAY #ifdef __NEW_STARLET%unsigned int smg$find_cursor_display( unsigned int *paste %board_id, unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */7unsigned int smg$find_cursor_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$FLUSH_BUFFER */N/* */N/* Flush Buffer */N/* */ %N/* The Flush Buffer routine flushes all buffered output to the */N/* terminal. */N/* */+#define smg$flush_buffer SMG$FLUSH_BUFFER #ifdef __NEW_STARLETunsigned int smg$flush_buffer( unsigned int *pasteboard_id);#else /* __OLD_STARLET */0unsigned int smg$flush_buffer(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$FLUS%H_DISPLAY_UPDATE */N/* */N/* Flush Display Update */N/* */N/* The Flush Display Update routine flushes any update batching to the */N/* screen and leaves the update batching in effect. */N/* % */;#define smg$flush_display_update SMG$FLUSH_DISPLAY_UPDATE #ifdef __NEW_STARLET&unsigned int smg$flush_display_update( unsigned int *display_id);#else /* __OLD_STARLET */8unsigned int smg$flush_display_update(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$GET_BROADCAST_MESSAGE */N/* */N/* Get Broadcast Messag %e */N/* */N/* The Get Broadcast Message routine determines whether a message has */N/* been broadcast to the pasteboard and returns the message. */N/* */=#define smg$get_broadcast_message SMG$GET_BROADCAST_MESSAGE #ifdef __NEW_STARLET'unsigned int smg$get_broadcast_message( % unsigned int *pasteboard_id, __optional_params );#else /* __OLD_STARLET */9unsigned int smg$get_broadcast_message(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$GET_CHAR_AT_PHYSICAL_CURSOR */N/* */N/* Return Character at Cursor */N/* */N/* % The Return Character at Cursor routine returns the character at the */N/* current physical cursor position. */N/* */I#define smg$get_char_at_physical_cursor SMG$GET_CHAR_AT_PHYSICAL_CURSOR #ifdef __NEW_STARLET-unsigned int smg$get_char_at_physical_cursor( unsigned int *pasteboard_id, unsigned char *character_code, __optional_params );#else /* __OLD_STARLET */?%unsigned int smg$get_char_at_physical_cursor(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$GET_DISPLAY_ATTR */N/* */N/* Get Display Attributes */N/* */N/* The Get Display Attributes routine returns the attributes associated */N/* % with a virtual display. */N/* */3#define smg$get_display_attr SMG$GET_DISPLAY_ATTR #ifdef __NEW_STARLET"unsigned int smg$get_display_attr( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */4unsigned int smg$get_display_attr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$GET_KEYBOARD_ATTRIBUTES % */N/* */N/* Get Keyboard Attributes */N/* */N/* The Get Keyboard Attributes routine gets information about a virtual */N/* keyboard and leaves it in a user-supplied area: the keyboard */N/* information table (KIT). */N/* % */A#define smg$get_keyboard_attributes SMG$GET_KEYBOARD_ATTRIBUTES #ifdef __NEW_STARLET)unsigned int smg$get_keyboard_attributes( unsigned int *keyboard_id,# unsigned int *keyboard_info_table,) unsigned int *keyboard_info_table_size);#else /* __OLD_STARLET */;unsigned int smg$get_keyboard_attributes(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$GET_KEY_DEF % */N/* */N/* Get Key Definition */N/* */N/* The Get Key Definition routine returns the key definition for a */N/* specified key. */N/* */)#def%ine smg$get_key_def SMG$GET_KEY_DEF #ifdef __NEW_STARLETunsigned int smg$get_key_def( unsigned int *key_table_id, void *key_name, __optional_params );#else /* __OLD_STARLET *//unsigned int smg$get_key_def(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$GET_NUMERIC_DATA */N/* */N/* Get Numeric Terminal Data % */N/* */N/* The Get Numeric Terminal Data routine accesses TERMTABLE.EXE and */N/* returns the value associated with a specified Boolean or numeric */N/* capability. */N/* */3#define smg$get_numeric_data SMG$GET_NUMERIC_DATA #ifdef __NEW_STARLET"unsign %ed int smg$get_numeric_data( void *termtable_address, unsigned int *request_code, void *buffer_address);#else /* __OLD_STARLET */4unsigned int smg$get_numeric_data(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$GET_PASTEBOARD_ATTRIBUTES */N/* */N/* Get Pasteboard Attributes */N/* % */N/* The Get Pasteboard Attributes routine gets pasteboard attributes and */N/* stores them in the pasteboard information table. */N/* */E#define smg$get_pasteboard_attributes SMG$GET_PASTEBOARD_ATTRIBUTES #ifdef __NEW_STARLET+unsigned int smg$get_pasteboard_attributes( unsigned int *pasteboard_id,% unsigned int *pasteboard_info_table,+ uns %igned int *pasteboard_info_table_size);#else /* __OLD_STARLET */=unsigned int smg$get_pasteboard_attributes(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$GET_PASTING_INFO */N/* */N/* Return Pasting Information */N/* */N/* Provided t %hat the specified virtual display is currently pasted, the */N/* Return Pasting Information routine returns the row and column of the */N/* pasting. */N/* */3#define smg$get_pasting_info SMG$GET_PASTING_INFO #ifdef __NEW_STARLET"unsigned int smg$get_pasting_info( unsigned int *display_id, unsigned int *pasteboard_id, unsigned int *flags, _ %_optional_params );#else /* __OLD_STARLET */4unsigned int smg$get_pasting_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$GET_TERM_DATA */N/* */N/* Get Terminal Data */N/* */N/* The Get Terminal Data routine accesses % TERMTABLE.EXE and returns the */N/* character sequence that causes a terminal to perform a specified */N/* operation. */N/* */-#define smg$get_term_data SMG$GET_TERM_DATA #ifdef __NEW_STARLETunsigned int smg$get_term_data( void *termtable_address, int *request_code, int *maximum_buffer_length, int *return_length, unsigned int *capab %ility_data, __optional_params);#else /* __OLD_STARLET */1unsigned int smg$get_term_data(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$GET_VIEWPORT_CHAR */N/* */N/* Get Characteristics of Display Viewport */N/* */N/* The Get Characteristics of D%isplay Viewport routine returns the */N/* characteristics of the specified viewport. */N/* */5#define smg$get_viewport_char SMG$GET_VIEWPORT_CHAR #ifdef __NEW_STARLET#unsigned int smg$get_viewport_char( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */5unsigned int smg$get_viewport_char(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* %SMG$HOME_CURSOR */N/* */N/* Home Cursor */N/* */N/* The Home Cursor routine moves the virtual cursor to the specified */N/* corner of a virtual display. */N/* % */)#define smg$home_cursor SMG$HOME_CURSOR #ifdef __NEW_STARLETunsigned int smg$home_cursor( unsigned int *display_id, __optional_params);#else /* __OLD_STARLET *//unsigned int smg$home_cursor(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$INIT_TERM_TABLE */N/* */N/* Initialize Terminal Table % */N/* */N/* The Initialize Terminal Table routine initializes the TERMTABLE */N/* database for the terminal named, so that subsequent calls to */N/* SMG$GET_TERM_DATA can extract information and command strings for */N/* that */N/* terminal. % */N/* */1#define smg$init_term_table SMG$INIT_TERM_TABLE #ifdef __NEW_STARLET!unsigned int smg$init_term_table( void *terminal_name, void *termtable_address);#else /* __OLD_STARLET */3unsigned int smg$init_term_table(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$INIT_TERM_TABLE_BY_TYPE */N/* % */N/* Initialize TERMTABLE by VMS Terminal Type */N/* */N/* The Initialize TERMTABLE by VMS Terminal Type routine initializes */N/* the TERMTABLE database for the terminal named, so that subsequent */N/* calls to SMG$GET_TERM_DATA can extract information and command */N/* strings for that terminal. % */N/* */A#define smg$init_term_table_by_type SMG$INIT_TERM_TABLE_BY_TYPE #ifdef __NEW_STARLET)unsigned int smg$init_term_table_by_type( char *terminal_type, void *termtable_address, __optional_params);#else /* __OLD_STARLET */;unsigned int smg$init_term_table_by_type(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$INSERT_CHARS % */N/* */N/* Insert Characters */N/* */N/* The Insert Characters routine inserts characters into a virtual */N/* display. */N/* */+#define smg$insert_%chars SMG$INSERT_CHARS #ifdef __NEW_STARLETunsigned int smg$insert_chars( unsigned int *display_id, void *character_string, int *start_row, int *start_column, __optional_params );#else /* __OLD_STARLET */0unsigned int smg$insert_chars(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$INSERT_LINE */N/* */N/* Insert Line % */N/* */N/* The Insert Line routine inserts a line into a virtual display and */N/* scrolls the display. */N/* */)#define smg$insert_line SMG$INSERT_LINE #ifdef __NEW_STARLETunsigned int smg$insert_line( unsigned int *display_id, int % *start_row, __optional_params );#else /* __OLD_STARLET *//unsigned int smg$insert_line(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$INVALIDATE_DISPLAY */N/* */N/* Mark a Display as Invalid */N/* */N/* The Mark a Display as Inva %lid routine marks a display as invalid and */N/* causes the entire display to be redrawn. */N/* */7#define smg$invalidate_display SMG$INVALIDATE_DISPLAY #ifdef __NEW_STARLET$unsigned int smg$invalidate_display( unsigned int *display_id);#else /* __OLD_STARLET */6unsigned int smg$invalidate_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$KEYCODE_TO_NAME % */N/* */N/* Translate a Key Code into a Key Name */N/* */N/* The Translate a Key Code into a Key Name routine translates the key */N/* code */N/* of a key on the keyboard into its associated k %ey name. */N/* */1#define smg$keycode_to_name SMG$KEYCODE_TO_NAME #ifdef __NEW_STARLET!unsigned int smg$keycode_to_name( unsigned short int *key_code, void *key_name);#else /* __OLD_STARLET */3unsigned int smg$keycode_to_name(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$LABEL_BORDER */N/* % */N/* Label a Virtual Display Border */N/* */N/* The Label a Virtual Display Border routine supplies a label for a */N/* virtual display's border. */N/* */+#define smg$label_border SMG$LABEL_BORDER #ifdef __N %EW_STARLETunsigned int smg$label_border( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */0unsigned int smg$label_border(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$LIST_KEY_DEFS */N/* */N/* List Key Definitions */N/* % */N/* The List Key Definitions routine returns, one at a time, the */N/* definitions (equivalence strings) associated with specified keys */N/* in a specified key table. */N/* */-#define smg$list_key_defs SMG$LIST_KEY_DEFS #ifdef __NEW_STARLETunsigned int smg$list_key_defs( unsigned int *key_table_id, unsigned int *context %, __optional_params );#else /* __OLD_STARLET */1unsigned int smg$list_key_defs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$LIST_PASTEBOARD_ORDER */N/* */N/* Return Pasting Information */N/* */N/* The Return Pasting Information rou %tine returns the pasteboard */N/* identifier of the pasteboard to which the specified virtual display */N/* is pasted. Optionally, the pasteboard row 1 and column 1 (origins) of */N/* the virtual displays are also returned. */N/* */=#define smg$list_pasteboard_order SMG$LIST_PASTEBOARD_ORDER #ifdef __NEW_STARLET'unsigned int smg$list_pasteboard_order( unsigned int %*display_id, unsigned int *context, unsigned int *pasteboard_id, __optional_params );#else /* __OLD_STARLET */9unsigned int smg$list_pasteboard_order(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$LIST_PASTING_ORDER */N/* */N/* Return Virtual Display Pasting Information */N/* % */N/* The Return Virtual Display Pasting Information routine returns the */N/* identifiers of the virtual displays pasted to a specified */N/* pasteboard. Optionally, the pasteboard row 1 and column */N/* 1 (origins) of the virtual displays are also returned. */N/* */7#define smg$list_pasting_order SMG$LIST_PASTING_ORDER #ifdef _ %_NEW_STARLET$unsigned int smg$list_pasting_order( unsigned int *pasteboard_id, unsigned int *context, unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */6unsigned int smg$list_pasting_order(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$LOAD_KEY_DEFS */N/* */N/* Load Key Definitions % */N/* */N/* The Load Key Definitions routine loads a file of key */N/* definitions */N/* (DEFINE/KEY commands) into a specified key table. */N/* */-#define smg$load_key_defs SMG$LOAD_KEY_DEFS #ifdef __NEW_STARLETunsigned int s %mg$load_key_defs( unsigned int *key_table_id, void *filespec, __optional_params );#else /* __OLD_STARLET */1unsigned int smg$load_key_defs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$LOAD_VIRTUAL_DISPLAY */N/* */N/* Load a Virtual Display */N/* % */N/* The Load a Virtual Display from a File routine creates a new virtual */N/* display and loads it with a virtual display saved with */N/* SMG$SAVE_VIRTUAL_DISPLAY. */N/* */;#define smg$load_virtual_display SMG$LOAD_VIRTUAL_DISPLAY #ifdef __NEW_STARLET&unsigned int smg$load_virtual_display( unsigned int *display_id, __opt %ional_params);#else /* __OLD_STARLET */8unsigned int smg$load_virtual_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$MOVE_TEXT */N/* */N/* Move Text from One Virtual Display to Another */N/* */N/* The Move Text from One Virtual Display to %Another routine moves a */O/* rectangle of text from one virtual display to another virtual display. */N/* Given two points in opposite corners of the rectangle, SMG$MOVE_TEXT */N/* determines the desired width and height of the new virtual display. */N/* */%#define smg$move_text SMG$MOVE_TEXT #ifdef __NEW_STARLETunsigned int smg$move_text( unsigned int *display_id, unsigned int *top_left_row, % unsigned int *top_left_column, unsigned int *bottom_right_row,# unsigned int *bottom_right_column, unsigned int *display_id2, __optional_params );#else /* __OLD_STARLET */-unsigned int smg$move_text(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$MOVE_VIRTUAL_DISPLAY */N/* */N/* Move Virtual Display % */N/* */N/* The Move Virtual Display routine relocates a virtual display on a */N/* pasteboard and preserves the pasting order. */N/* */;#define smg$move_virtual_display SMG$MOVE_VIRTUAL_DISPLAY #ifdef __NEW_STARLET&unsigned int smg$move_virtual_display( unsigned int *display_id, unsigned int *paste %board_id, int *pasteboard_row, int *pasteboard_column, __optional_params);#else /* __OLD_STARLET */8unsigned int smg$move_virtual_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$NAME_TO_KEYCODE */N/* */N/* Translate a Key Name into a Key Code */N/* % */N/* The Translate a Key Name into a Key Code routine translates the key */N/* name of a key on the keyboard into its associated key code. */N/* */1#define smg$name_to_keycode SMG$NAME_TO_KEYCODE #ifdef __NEW_STARLET!unsigned int smg$name_to_keycode( void *key_name, unsigned short int *key_code);#else /* __OLD_STARLET */3unsigned int smg$name_to_keycode(__unknown_params);%!#endif /* #ifdef __NEW_STARLET */N/* SMG$PASTE_VIRTUAL_DISPLAY */N/* */N/* Paste Virtual Display */N/* */N/* The Paste Virtual Display routine pastes a virtual display to a */N/* pasteboard. % */N/* */=#define smg$paste_virtual_display SMG$PASTE_VIRTUAL_DISPLAY #ifdef __NEW_STARLET'unsigned int smg$paste_virtual_display( unsigned int *display_id, unsigned int *pasteboard_id, __optional_params );#else /* __OLD_STARLET */9unsigned int smg$paste_virtual_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$POP_VIRTUAL_DISPLAY % */N/* */N/* Delete a Series of Virtual Displays */N/* */N/* The Delete a Series of Virtual Displays routine deletes a specified */N/* virtual display and all displays that were pasted on the specified */N/* pasteboard on top of the specified virtual display. */N/* % */9#define smg$pop_virtual_display SMG$POP_VIRTUAL_DISPLAY #ifdef __NEW_STARLET%unsigned int smg$pop_virtual_display( unsigned int *display_id, unsigned int *pasteboard_id);#else /* __OLD_STARLET */7unsigned int smg$pop_virtual_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PRINT_PASTEBOARD */N/* % */N/* Print Pasteboard Using a Print Queue */N/* */N/* The Print Pasteboard Using a Print Queue routine prints the contents */N/* of the specified pasteboard on a line printer. */N/* */3#define smg$print_pasteboard SMG$PRINT_PASTEBOARD #ifdef __NEW_STARLET"un %signed int smg$print_pasteboard( unsigned int *pasteboard_id, __optional_params );#else /* __OLD_STARLET */4unsigned int smg$print_pasteboard(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PRINT_PASTEBOARD */N/* */N/* Print Pasteboard Using a Print Queue */N/* % */N/* The Print Pasteboard Using a Print Queue routine prints the contents */N/* of the specified pasteboard on a line printer. */N/* */%#define smg$put_chars SMG$PUT_CHARS #ifdef __NEW_STARLETunsigned int smg$put_chars( unsigned int *display_id, void *text, __optional_params );#else /* __OLD_STARLET */-unsigned int smg$put_chars(__unknown_params);!#e%ndif /* #ifdef __NEW_STARLET */N/* SMG$PUT_CHARS_HIGHWIDE */N/* */N/* Write Double-Height Double-Width Characters */N/* */N/* The Write Double-Height Double-Width Characters routine writes */N/* double-height, double-width characters to a virtual display. & */N/* */7#define smg$put_chars_highwide SMG$PUT_CHARS_HIGHWIDE #ifdef __NEW_STARLET$unsigned int smg$put_chars_highwide( unsigned int *display_id, void *text, __optional_params );#else /* __OLD_STARLET */6unsigned int smg$put_chars_highwide(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PUT_CHARS_MULTI */N/* & */N/* Put Text with Multiple Renditions to Display */N/* */N/* The Put Text with Multiple Renditions to Display routine writes text */N/* with */N/* multiple renditions to the virtual display. */N/* & */1#define smg$put_chars_multi SMG$PUT_CHARS_MULTI #ifdef __NEW_STARLET!unsigned int smg$put_chars_multi( unsigned int *display_id, void *text, __optional_params );#else /* __OLD_STARLET */3unsigned int smg$put_chars_multi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PUT_CHARS_WIDE */N/* */N/* Write Double-W &idth Characters */N/* */N/* The Write Double-Width Characters routine writes double-width */N/* characters to a virtual display. */N/* *//#define smg$put_chars_wide SMG$PUT_CHARS_WIDE #ifdef __NEW_STARLET unsigned int smg$put_chars_wide( unsigned int *d &isplay_id, void *text, __optional_params );#else /* __OLD_STARLET */2unsigned int smg$put_chars_wide(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PUT_HELP_TEXT */N/* */N/* Output Help Text to the Display */N/* */N/* The Output H&elp Text to the Display routine retrieves and outputs */O/* the help text for the specified topic in the virtual display provided. */N/* */-#define smg$put_help_text SMG$PUT_HELP_TEXT #ifdef __NEW_STARLETunsigned int smg$put_help_text( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */1unsigned int smg$put_help_text(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* & SMG$PUT_LINE */N/* */N/* Write Line to Virtual Display */N/* */N/* The Write Line to Virtual Display routine writes a line of text to a */N/* virtual display, beginning at the current virtual cursor position. */N/* & */##define smg$put_line SMG$PUT_LINE #ifdef __NEW_STARLETunsigned int smg$put_line( unsigned int *display_id, void *text, __optional_params );#else /* __OLD_STARLET */,unsigned int smg$put_line(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PUT_LINE_HIGHWIDE */N/* */N/* Write Double-Height &and Double-Width Line */N/* */N/* The Write Double-Height and Double-Width Line routine writes a line */N/* of */N/* text with double-height and double-width characters. */N/* */5#define smg$put_line_highwide SMG$PUT_LINE_HIGHWID &E #ifdef __NEW_STARLET#unsigned int smg$put_line_highwide( unsigned int *display_id, void *text, __optional_params );#else /* __OLD_STARLET */5unsigned int smg$put_line_highwide(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PUT_LINE_MULTI */N/* */N/* Write Line with Multiple Renditions to Display */N/* & */N/* The Write Line with Multiple Renditions to Display routine */N/* writes lines with multiple renditions to the virtual display, */N/* optionally followed by cursor movement sequences. */N/* *//#define smg$put_line_multi SMG$PUT_LINE_MULTI #ifdef __NEW_STARLET unsigned int smg$put_line_multi( unsig &ned int *display_id, void *text, void *rendition_string, __optional_params );#else /* __OLD_STARLET */2unsigned int smg$put_line_multi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PUT_LINE_WIDE */N/* */N/* Write Double-Width Line */N/* & */N/* The Write Double-Width Line routine writes a line of double-width */N/* text */N/* to a virtual display. */N/* */-#define smg$put_line_wide SMG$PUT_LINE_WIDE #ifdef __NEW_STARLETunsigned int smg$put_line_wide( unsigned int *display_id, void *text, __optional_params & );#else /* __OLD_STARLET */1unsigned int smg$put_line_wide(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PUT_PASTEBOARD */N/* */N/* Output Pasteboard Using Routine */N/* */N/* The Output Pasteboard Using Routine routine accesses the& contents of */N/* a pasteboard. */N/* *//#define smg$put_pasteboard SMG$PUT_PASTEBOARD #ifdef __NEW_STARLET unsigned int smg$put_pasteboard( unsigned int *pasteboard_id, int (*action_routine)(void), __optional_params );#else /* __OLD_STARLET */2unsigned int smg$put_pasteboard(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PU&T_STATUS_LINE */N/* */N/* Output Line of Text to Hardware Status Line */N/* */N/* The Output Line of Text to Hardware Status Line routine outputs a */N/* line */N/* of text to the hardware status l &ine. */N/* */1#define smg$put_status_line SMG$PUT_STATUS_LINE #ifdef __NEW_STARLET!unsigned int smg$put_status_line( unsigned int *pasteboard_id, void *text);#else /* __OLD_STARLET */3unsigned int smg$put_status_line(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PUT_VIRTUAL_DISPLAY_ENCODED */N/* & */N/* Write Encoded String To Display */N/* */N/* SMG$PUT_VIRTUAL_DISPLAY_ENCODED lets you write a string that has */N/* multiple video renditions to a virtual display. */N/* */I#define smg$put_virtual_display_encoded SMG$PUT_&VIRTUAL_DISPLAY_ENCODED #ifdef __NEW_STARLET-unsigned int smg$put_virtual_display_encoded( unsigned int *display_id, int *encoded_length, unsigned int *encoded_text, __optional_params );#else /* __OLD_STARLET */?unsigned int smg$put_virtual_display_encoded(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$PUT_WITH_SCROLL */N/* */N/* Wr &ite Text and Scroll */N/* */N/* SMG$PUT_WITH_SCROLL writes a line of text to a virtual display and */N/* scrolls the display if necessary. */N/* */1#define smg$put_with_scroll SMG$PUT_WITH_SCROLL #ifdef __NEW_STARLET!unsigned int smg$put_with_scroll( & unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */3unsigned int smg$put_with_scroll(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$READ_COMPOSED_LINE */N/* */N/* Read Composed Line */N/* */N/* The Read& Composed Line routine reads a line of input composed of */N/* normal keystrokes and equivalence strings. */N/* */7#define smg$read_composed_line SMG$READ_COMPOSED_LINE #ifdef __NEW_STARLET$unsigned int smg$read_composed_line( unsigned int *keyboard_id, unsigned int *key_table_id, void *resultant_string, __optional_params );#else /* __OLD_STARLET */6unsigned int smg$r&ead_composed_line(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$READ_FROM_DISPLAY */N/* */N/* Read Text from Display */N/* */X/* The Read Text from Display routine reads a line of text from a virtual display. */N/* & */5#define smg$read_from_display SMG$READ_FROM_DISPLAY #ifdef __NEW_STARLET#unsigned int smg$read_from_display( unsigned int *display_id, void *resultant_string, __optional_params );#else /* __OLD_STARLET */5unsigned int smg$read_from_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$READ_KEYSTROKE */N/* & */N/* Read a Single Character */N/* */N/* The Read a Single Character routine reads a keystroke and returns */N/* that keystroke's terminator code. */N/* *//#define smg$read_keystroke SMG$READ_KEYSTROKE #ifdef __NEW_STARLET & unsigned int smg$read_keystroke( unsigned int *keyboard_id,* unsigned short int *word_terminator_code, __optional_params );#else /* __OLD_STARLET */2unsigned int smg$read_keystroke(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$READ_LOCATOR */N/* */N/* Read Locator Information */N/* & */N/* The Read Locator Information routine reads information from */P/* a DECwindows workstation terminal's locator device (such as a mouse or */N/* tablet). */N/* */+#define smg$read_locator SMG$READ_LOCATOR #ifdef __NEW_STARLETunsigned int smg$read_locator( unsigned int &*keyboard_id, unsigned short int *row_number,# unsigned short int *column_number,* unsigned short int *word_terminator_code, __optional_params );#else /* __OLD_STARLET */0unsigned int smg$read_locator(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$READ_STRING */N/* */N/* Read String & */N/* */N/* The Read String routine reads a string from a virtual keyboard. */N/* */)#define smg$read_string SMG$READ_STRING #ifdef __NEW_STARLETunsigned int smg$read_string( unsigned int *keyboard_id, void *resultant_string, __optional_params );#else /* __OLD_STARLET *//unsigned int smg$read_string(__unknown_params);&!#endif /* #ifdef __NEW_STARLET */N/* SMG$READ_VERIFY */N/* */N/* Read and Verify a String */N/* */N/* The Read and Verify a String routine reads a sequence of characters */N/* and verifies the sequence. & */N/* */)#define smg$read_verify SMG$READ_VERIFY #ifdef __NEW_STARLETunsigned int smg$read_verify( unsigned int *keyboard_id, void *resultant_string, void *initial_string, void *picture_string, void *fill_character, void *clear_character, __optional_params );#else /* __OLD_STARLET *//unsigned int smg$read_verify(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$REMOVE_L&INE */N/* */N/* Remove a Line from a Virtual Display */N/* */N/* The Remove a Line from a Virtual Display routine removes a line from */N/* a specified virtual display that was drawn with the SMG$DRAW_LINE or */N/* SMG$DRAW_RECTANGLE routines.  & */N/* */)#define smg$remove_line SMG$REMOVE_LINE #ifdef __NEW_STARLETunsigned int smg$remove_line( unsigned int *display_id, int *start_row, int *start_column, int *end_row, int *end_column);#else /* __OLD_STARLET *//unsigned int smg$remove_line(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$REPAINT_LINE !& */N/* */N/* Repaint One or More Lines on the Current Pasteboard */N/* */N/* The Repaint One or More Lines on the Current Pasteboard routine */N/* repaints a series of lines on the current pasteboard. */N/* */+#define smg$rep "&aint_line SMG$REPAINT_LINE #ifdef __NEW_STARLETunsigned int smg$repaint_line( unsigned int *pasteboard_id, int *start_row, __optional_params);#else /* __OLD_STARLET */0unsigned int smg$repaint_line(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$REPAINT_SCREEN */N/* */N/* Repaint Current Pasteboard #& */N/* */N/* The Repaint Current Pasteboard routine repaints the specified */N/* pasteboard after */N/* non-SMG$ I/O has occurred. */N/* *//#define smg$repaint_screen SMG$REPAINT_SCREEN #ifdef __NEW_STARLET unsigned int smg$repai $&nt_screen( unsigned int *pasteboard_id);#else /* __OLD_STARLET */2unsigned int smg$repaint_screen(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$REPASTE_VIRTUAL_DISPLAY */N/* */N/* Repaste Virtual Display */N/* */N/* The Repaste Virtual %&Display routine moves a virtual display to a new */N/* position on the pasteboard. The pasting order is not preserved. */N/* */A#define smg$repaste_virtual_display SMG$REPASTE_VIRTUAL_DISPLAY #ifdef __NEW_STARLET)unsigned int smg$repaste_virtual_display( unsigned int *display_id, unsigned int *pasteboard_id, int *pasteboard_row, int *pasteboard_column, __optional_params);#else /* __OLD_STARLET && */;unsigned int smg$repaste_virtual_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$REPLACE_INPUT_LINE */N/* */N/* Replace Input Line */N/* */N/* The Replace Input Line routine replaces the specified lines in the */N/* '& recall buffer with the specified string. */N/* */N/* */7#define smg$replace_input_line SMG$REPLACE_INPUT_LINE #ifdef __NEW_STARLET$unsigned int smg$replace_input_line( unsigned int *keyboard_id, __optional_params );#else /* __OLD_STARLET */6unsigned int smg$replace_input_line(__unknown_params);!#endif(& /* #ifdef __NEW_STARLET */N/* SMG$RESTORE_PHYSICAL_SCREEN */N/* */N/* Restore Physical Pasteboard */N/* */N/* The Restore Physical Pasteboard routine rewrites the pasteboard */N/* image as it was at the time the SMG$SAVE_PHYSICAL_SCREEN routine )&*/N/* was called. */N/* */A#define smg$restore_physical_screen SMG$RESTORE_PHYSICAL_SCREEN #ifdef __NEW_STARLET)unsigned int smg$restore_physical_screen( unsigned int *pasteboard_id, unsigned int *display_id);#else /* __OLD_STARLET */;unsigned int smg$restore_physical_screen(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$RETURN*&_CURSOR_POS */N/* */N/* Return Cursor Position */N/* */N/* The Return Cursor Position routine returns the current virtual */N/* cursor */N/* position in a specified virtual disp+&lay. */N/* */5#define smg$return_cursor_pos SMG$RETURN_CURSOR_POS #ifdef __NEW_STARLET#unsigned int smg$return_cursor_pos( unsigned int *display_id, int *start_row, int *start_column);#else /* __OLD_STARLET */5unsigned int smg$return_cursor_pos(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$RETURN_INPUT_LINE */N,&/* */N/* Return Input Line */N/* */N/* The Return Input Line routine returns to the caller the requested */N/* line from the recall buffer. This line is retrieved either by */N/* matching it with a specified string or by specifying the appropriate */N/* line number. -& */N/* */5#define smg$return_input_line SMG$RETURN_INPUT_LINE #ifdef __NEW_STARLET#unsigned int smg$return_input_line( unsigned int *keyboard_id, void *resultant_string, __optional_params );#else /* __OLD_STARLET */5unsigned int smg$return_input_line(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$RING_BELL .& */N/* */N/* Ring the Terminal Bell or Buzzer */N/* */N/* The Ring the Terminal Bell or Buzzer routine sounds the terminal */N/* bell or buzzer. */N/* /&*/%#define smg$ring_bell SMG$RING_BELL #ifdef __NEW_STARLETunsigned int smg$ring_bell( unsigned int *display_id, __optional_params);#else /* __OLD_STARLET */-unsigned int smg$ring_bell(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SAVE_PHYSICAL_SCREEN */N/* */N/* Save Physical Screen */N/* 0& */N/* The Save Physical Screen routine saves the contents of the */N/* pasteboard so */N/* that a later call to SMG$RESTORE_PHYSICAL_SCREEN can restore it. */N/* */;#define smg$save_physical_screen SMG$SAVE_PHYSICAL_SCREEN #ifdef __NEW_STARLET&unsigned int smg$save_ 1&physical_screen( unsigned int *pasteboard_id, unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */8unsigned int smg$save_physical_screen(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SAVE_VIRTUAL_DISPLAY */N/* */N/* Save the Virtual Display to a File */N/* 2& */N/* The Save the Virtual Display to a File routine saves the contents of */N/* a */N/* virtual display and stores it in a file. */N/* */;#define smg$save_virtual_display SMG$SAVE_VIRTUAL_DISPLAY #ifdef __NEW_STARLET&unsigned int smg$save_virtual_display( unsigned int *dis 3&play_id, __optional_params);#else /* __OLD_STARLET */8unsigned int smg$save_virtual_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SCROLL_DISPLAY_AREA */N/* */N/* Scroll Display Area */N/* */N/* The Scroll Display Area ro 4&utine scrolls a rectangular region of a */N/* virtual display. */N/* */9#define smg$scroll_display_area SMG$SCROLL_DISPLAY_AREA #ifdef __NEW_STARLET%unsigned int smg$scroll_display_area( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */7unsigned int smg$scroll_display_area(__unknown_params);!#endif /* #ifdef __NEW_STARLET *5&/N/* SMG$SCROLL_VIEWPORT */N/* */N/* Scroll a Display Under a Viewport */N/* */N/* The Scroll a Display Under a Viewport routine scrolls a virtual */N/* display under its associated viewport. */N/* 6& */1#define smg$scroll_viewport SMG$SCROLL_VIEWPORT #ifdef __NEW_STARLET!unsigned int smg$scroll_viewport( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */3unsigned int smg$scroll_viewport(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SELECT_FROM_MENU */N/* */N/*7& Make a Selection from the Menu */N/* */N/* The Make a Selection from the Menu routine lets you move between the */N/* menu choices using the arrow keys and lets you make a selection by */N/* pressing the return key. */N/* */3#define smg$select_from_men8&u SMG$SELECT_FROM_MENU #ifdef __NEW_STARLET"unsigned int smg$select_from_menu( unsigned int *keyboard_id, unsigned int *display_id,, unsigned short int *selected_choice_number, __optional_params );#else /* __OLD_STARLET */4unsigned int smg$select_from_menu(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SET_BROADCAST_TRAPPING */N/* */N/* Enab9&le Broadcast Trapping */N/* */N/* The Enable Broadcast Trapping routine enables the trapping of */N/* broadcast */N/* messages. */N/* */?#define smg$set_broadcast_trapping :& SMG$SET_BROADCAST_TRAPPING #ifdef __NEW_STARLET(unsigned int smg$set_broadcast_trapping( unsigned int *pasteboard_id, __optional_params );#else /* __OLD_STARLET */:unsigned int smg$set_broadcast_trapping(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SET_CURSOR_ABS */N/* */N/* Set Absolute Cursor Position ;& */N/* */N/* The Set Absolute Cursor Position routine moves the virtual cursor to */N/* the specified position in a virtual display. */N/* *//#define smg$set_cursor_abs SMG$SET_CURSOR_ABS #ifdef __NEW_STARLET unsigned int smg$set_cursor_abs( unsigned int *display_id, __optional_params );#else /*<& __OLD_STARLET */2unsigned int smg$set_cursor_abs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SET_CURSOR_MODE */N/* */N/* Set the Cursor Mode */N/* */N/* The Set the Cursor Mode */ =&N/* routine turns the physical cursor on or off and selects */N/* jump or smooth scrolling. */N/* */1#define smg$set_cursor_mode SMG$SET_CURSOR_MODE #ifdef __NEW_STARLET!unsigned int smg$set_cursor_mode( unsigned int *pasteboard_id, unsigned int *flags);#else /* __OLD_STARLET */3unsigned int smg$set_cursor_mode(__unknown_params);!#endif /* #i>&fdef __NEW_STARLET */N/* SMG$SET_CURSOR_REL */N/* */N/* Move Cursor Relative to Current Position */N/* */N/* The Move Cursor Relative to Current Position routine moves the */N/* virtual */N/* ?& cursor the specified number of rows and columns from the current */N/* virtual cursor position in a virtual display. */N/* *//#define smg$set_cursor_rel SMG$SET_CURSOR_REL #ifdef __NEW_STARLET unsigned int smg$set_cursor_rel( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */2unsigned int smg$set_cursor_rel(__unknown_params);!#endif /* #ifdef __NEW_S@&TARLET */N/* SMG$SET_DEFAULT_STATE */N/* */N/* Set Default State */N/* */N/* The Set Default State routine sets and/or returns the current */N/* default */N/* state fo A&r a key table. */N/* */5#define smg$set_default_state SMG$SET_DEFAULT_STATE #ifdef __NEW_STARLET#unsigned int smg$set_default_state( unsigned int *key_table_id, __optional_params );#else /* __OLD_STARLET */5unsigned int smg$set_default_state(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SET_DISPLAY_SCROLL_REGION B& */N/* */N/* Create Display Scrolling Region */N/* */N/* The Create Display Scrolling Region routine creates a virtual */N/* scrolling r */N/* in a virtual display. */N/* C& */E#define smg$set_display_scroll_region SMG$SET_DISPLAY_SCROLL_REGION #ifdef __NEW_STARLET+unsigned int smg$set_display_scroll_region( unsigned int *display_id, __optional_params );#else /* __OLD_STARLET */=unsigned int smg$set_display_scroll_region(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SET_KEYPAD_MODE */N/* D& */N/* Set Keypad Mode */N/* */N/* The Set Keypad Mode routine sets the terminal's numeric keypad to */N/* either numeric or applications mode. */N/* */1#define smg$set_keypad_mode SMG$SET_KEYPAD_MODE  E&#ifdef __NEW_STARLET!unsigned int smg$set_keypad_mode( unsigned int *keyboard_id, unsigned int *flags);#else /* __OLD_STARLET */3unsigned int smg$set_keypad_mode(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SET_OUT_OF_BAND_ASTS */N/* */N/* Set Out-of-Band ASTs */N/* F& */N/* The Set Out-of-Band ASTs routine either enables or disables the */N/* trapping of out-of-band control characters. */N/* */ ;#define smg$set_out_of_band_asts SMG$SET_OUT_OF_BAND_ASTS#ifdef __NEW_STARLET&unsigned int smg$set_out_of_band_asts( unsigned int *pasteboard_id,& unsigned int *control_character_mask,' void (*ast_routine)(_ G&_unknown_params), __optional_params);#else /* __OLD_STARLET */8unsigned int smg$set_out_of_band_asts(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* SMG$SET_PHYSICAL_CURSOR */N/* */N/* Set Cursor on Physical Screen */N/* */N/* The Set Curs H&or on Physical Screen routine moves the physical cursor */N/* to the specified position on the pasteboard. */N/* */9#define smg$set_physical_cursor SMG$SET_PHYSICAL_CURSOR #ifdef __NEW_STARLET%unsigned int smg$set_physical_cursor( unsigned int *pasteboard_id, int *pasteboard_row, int *pasteboard_column);#else /* __OLD_STARLET */7unsigned int smg$set_physical_cursor(__unknownI&_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SET_TERM_CHARACTERISTICS */N/* */N/* Change Terminal Characteristics */N/* */N/* The Change Terminal Characteristics routine changes or retrieves the */N/* terminal characteristics for a given pasteboard. J& */N/* */C#define smg$set_term_characteristics SMG$SET_TERM_CHARACTERISTICS #ifdef __NEW_STARLET*unsigned int smg$set_term_characteristics( unsigned int *pasteboard_id, __optional_params );#else /* __OLD_STARLET */<unsigned int smg$set_term_characteristics(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SNAPSHOT */NK&/* */N/* Write Snapshot */N/* */N/* The Write Snapshot routine writes the current pasteboard buffer to */N/* the file or hardcopy terminal specified by the pasteboard identifier. */N/* */##define smg$snapshot SMG L&$SNAPSHOT #ifdef __NEW_STARLETunsigned int smg$snapshot( unsigned int *pasteboard_id, __optional_params);#else /* __OLD_STARLET */,unsigned int smg$snapshot(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$SNAPSHOT_TO_PRINTER */N/* */N/* Write Snapshot to Printer */N/* M& */N/* The Write Snapshot to Printer routine writes the current pasteboard */N/* buffer to the printer attached to the terminal. */N/* */9#define smg$snapshot_to_printer SMG$SNAPSHOT_TO_PRINTER #ifdef __NEW_STARLET%unsigned int smg$snapshot_to_printer( unsigned int *pasteboard_id, void *device_type, __optional_params);#else /* __OLD_STARL N&ET */7unsigned int smg$snapshot_to_printer(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* SMG$UNPASTE_VIRTUAL_DISPLAY */N/* */N/* Remove Virtual Display */N/* */N/* The Remove Virtual Display routine removes a virtual display from a */N/* O& pasteboard. */N/* */A#define smg$unpaste_virtual_display SMG$UNPASTE_VIRTUAL_DISPLAY #ifdef __NEW_STARLET)unsigned int smg$unpaste_virtual_display( unsigned int *display_id, unsigned int *pasteboard_id);#else /* __OLD_STARLET */;unsigned int smg$unpaste_virtual_display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignQ&ment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __SMG_ROUTINES_LOADED */ ww/O/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMg$L SECSRVMSGDEF$SGPSDEF$LSHRDEF%XSJCDEFS%$ SMB$ROUTINESa% SMBMSGDEFm% SMG$ROUTINESO&>SMGDEF& SMGDEF_UPCASEK'SMGMSG' SMGTRMPTR'SMRDEF'@ SNAPEVTDEF'h SOR$ROUTINES( SORDEF$(LSRFDEF+( SRMDEF6(DSSDEF)SSIODEF)~STARLETBSTARLET_BIGPAGE.STENVDEF/ STR$ROUTINESJ/STRDEFZ/RSTSDEFv/PSYIDEF/ SYSEVTDEF& SYS_PAL_QINST/h TBK$ROUTINES0TBKDEF0vTEBDEFXAB R&S SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SMGDEF.SDI;1 *//********************************************************************************************************************************//*** MODULE $SMGDEF ***/#ifndef __SMGDEF_LOADED#define __SMGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined wheneverS& 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 variaT&nt_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* Definitions for RTL Screen Management Facility */N/* */N/* Input terminator codes */N/* */N#define SMG$K_TRM_NULL_CHAR 0 U& /* NUL */N#define SMG$K_TRM_CTRLA 1 /* SOH */N#define SMG$K_TRM_CTRLB 2 /* STX */N#define SMG$K_TRM_CTRLC 3 /* ETX */N#define SMG$K_TRM_CTRLD 4 /* EOT */N#define SMG$K_TRM_CTRLE 5 /* ENQ */N#define SMG$K_TRM_CTRLF 6 /* ACK V& */N#define SMG$K_TRM_CTRLG 7 /* BEL */N#define SMG$K_TRM_CTRLH 8 /* BS */N#define SMG$K_TRM_CTRLI 9 /* HT */N#define SMG$K_TRM_CTRLJ 10 /* LF */N#define SMG$K_TRM_CTRLK 11 /* VT */N#define SMG$K_TRM_CTRLL 12 /* FF */N#dW&efine SMG$K_TRM_CTRLM 13 /* CR */N#define SMG$K_TRM_CTRLN 14 /* SO */N#define SMG$K_TRM_CTRLO 15 /* SI */N#define SMG$K_TRM_CTRLP 16 /* DLE */N#define SMG$K_TRM_CTRLQ 17 /* DC1 */N#define SMG$K_TRM_CTRLR 18 /* DC2 */N#define SMG$K_TRM_CTRLS 19 X& /* DC3 */N#define SMG$K_TRM_CTRLT 20 /* DC4 */N#define SMG$K_TRM_CTRLU 21 /* NAK */N#define SMG$K_TRM_CTRLV 22 /* SYN */N#define SMG$K_TRM_CTRLW 23 /* ETB */N#define SMG$K_TRM_CTRLX 24 /* CAN */N#define SMG$K_TRM_CTRLY 25 /* EM Y& */N#define SMG$K_TRM_CTRLZ 26 /* SUB */N#define SMG$K_TRM_ESCAPE 27 /* ESC */N#define SMG$K_TRM_FS 28 /* FS */N#define SMG$K_TRM_GS 29 /* GS */N#define SMG$K_TRM_RS 30 /* RS */N#define SMG$K_TRM_US 31 /* US */NZ&#define SMG$K_TRM_SPACE 32 /* SP */N#define SMG$K_TRM_EXCLAMATION_POINT 33 /* ! */N#define SMG$K_TRM_DOUBLE_QUOTE 34 /* " */N#define SMG$K_TRM_NUMBER_SIGN 35 /* # */N#define SMG$K_TRM_DOLLAR_SIGN 36 /* $ */N#define SMG$K_TRM_PERCENT_SIGN 37 /* % */N#define SMG$K_TRM_AMPERSAN[&D 38 /* & */N#define SMG$K_TRM_QUOTE 39 /* ' */N#define SMG$K_TRM_LEFT_PAREN 40 /* ( */N#define SMG$K_TRM_RIGHT_PAREN 41 /* ) */N#define SMG$K_TRM_ASTERISK 42 /* * */N#define SMG$K_TRM_PLUS_SIGN 43 /* + */N#define SMG$K_TRM_COMMA_CHAR 44 /* , \& */N#define SMG$K_TRM_DASH 45 /* - */N#define SMG$K_TRM_DOT 46 /* . */N#define SMG$K_TRM_SLASH 47 /* / */N#define SMG$K_TRM_ZERO 48 /* 0 */N#define SMG$K_TRM_ONE 49 /* 1 */N#define SMG$K_TRM_TWO 50 /* 2 */]&N#define SMG$K_TRM_THREE 51 /* 3 */N#define SMG$K_TRM_FOUR 52 /* 4 */N#define SMG$K_TRM_FIVE 53 /* 5 */N#define SMG$K_TRM_SIX 54 /* 6 */N#define SMG$K_TRM_SEVEN 55 /* 7 */N#define SMG$K_TRM_EIGHT 56 /* 8 */N#define SMG$K_TRM_NINE 5^&7 /* 9 */N#define SMG$K_TRM_COLON 58 /* : */N#define SMG$K_TRM_SEMICOLON 59 /* ; */N#define SMG$K_TRM_LESS_THAN 60 /* < */N#define SMG$K_TRM_EQUAL 61 /* = */N#define SMG$K_TRM_GREATER_THAN 62 /* > */N#define SMG$K_TRM_QUESTION_MARK 63 /* ? _& */N#define SMG$K_TRM_AT_SIGN 64 /* @ */N#define SMG$K_TRM_UPPERCASE_A 65 /* A */N#define SMG$K_TRM_UPPERCASE_B 66 /* B */N#define SMG$K_TRM_UPPERCASE_C 67 /* C */N#define SMG$K_TRM_UPPERCASE_D 68 /* D */N#define SMG$K_TRM_UPPERCASE_E 69 /* E `&*/N#define SMG$K_TRM_UPPERCASE_F 70 /* F */N#define SMG$K_TRM_UPPERCASE_G 71 /* G */N#define SMG$K_TRM_UPPERCASE_H 72 /* H */N#define SMG$K_TRM_UPPERCASE_I 73 /* I */N#define SMG$K_TRM_UPPERCASE_J 74 /* J */N#define SMG$K_TRM_UPPERCASE_K 75 /* K */N#define SMG$K_TRM_UPPEa&RCASE_L 76 /* L */N#define SMG$K_TRM_UPPERCASE_M 77 /* M */N#define SMG$K_TRM_UPPERCASE_N 78 /* N */N#define SMG$K_TRM_UPPERCASE_O 79 /* O */N#define SMG$K_TRM_UPPERCASE_P 80 /* P */N#define SMG$K_TRM_UPPERCASE_Q 81 /* Q */N#define SMG$K_TRM_UPPERCASE_R 82 /* R b& */N#define SMG$K_TRM_UPPERCASE_S 83 /* S */N#define SMG$K_TRM_UPPERCASE_T 84 /* T */N#define SMG$K_TRM_UPPERCASE_U 85 /* U */N#define SMG$K_TRM_UPPERCASE_V 86 /* V */N#define SMG$K_TRM_UPPERCASE_W 87 /* W */N#define SMG$K_TRM_UPPERCASE_X 88 /* X c& */N#define SMG$K_TRM_UPPERCASE_Y 89 /* Y */N#define SMG$K_TRM_UPPERCASE_Z 90 /* Z */N#define SMG$K_TRM_LEFT_BRACKET 91 /* [ */N#define SMG$K_TRM_BACKSLASH 92 /* \ */N#define SMG$K_TRM_RIGHT_BRACKET 93 /* ] */N#define SMG$K_TRM_CARET 94 /* ^ */N#define SMG$K_TRM_UNd&DERLINE 95 /* _ */N#define SMG$K_TRM_GRAVE_ACCENT 96 /* ` */N#define SMG$K_TRM_LOWERCASE_A 97 /* a */N#define SMG$K_TRM_LOWERCASE_B 98 /* b */N#define SMG$K_TRM_LOWERCASE_C 99 /* c */N#define SMG$K_TRM_LOWERCASE_D 100 /* d */N#define SMG$K_TRM_LOWERCASE_E 101 /* e e& */N#define SMG$K_TRM_LOWERCASE_F 102 /* f */N#define SMG$K_TRM_LOWERCASE_G 103 /* g */N#define SMG$K_TRM_LOWERCASE_H 104 /* h */N#define SMG$K_TRM_LOWERCASE_I 105 /* i */N#define SMG$K_TRM_LOWERCASE_J 106 /* j */N#define SMG$K_TRM_LOWERCASE_K 107 /* k f& */N#define SMG$K_TRM_LOWERCASE_L 108 /* l */N#define SMG$K_TRM_LOWERCASE_M 109 /* m */N#define SMG$K_TRM_LOWERCASE_N 110 /* n */N#define SMG$K_TRM_LOWERCASE_O 111 /* o */N#define SMG$K_TRM_LOWERCASE_P 112 /* p */N#define SMG$K_TRM_LOWERCASE_Q 113 /* q */N#define SMG$K_TRM_g&LOWERCASE_R 114 /* r */N#define SMG$K_TRM_LOWERCASE_S 115 /* s */N#define SMG$K_TRM_LOWERCASE_T 116 /* t */N#define SMG$K_TRM_LOWERCASE_U 117 /* u */N#define SMG$K_TRM_LOWERCASE_V 118 /* v */N#define SMG$K_TRM_LOWERCASE_W 119 /* w */N#define SMG$K_TRM_LOWERCASE_X 120 /* xh& */N#define SMG$K_TRM_LOWERCASE_Y 121 /* y */N#define SMG$K_TRM_LOWERCASE_Z 122 /* z */N#define SMG$K_TRM_LEFT_BRACE 123 /* left curly brace */N#define SMG$K_TRM_VERTICAL_LINE 124 /* | */N#define SMG$K_TRM_RIGHT_BRACE 125 /* right curly brace */N#define SMG$K_TRM_TILDE 126 /* ~ i& */N#define SMG$K_TRM_DELETE 127 /* DEL */N/* */N/* Synonyms for control characters */N/* */#define SMG$K_TRM_BS 8#define SMG$K_TRM_HT 9#define SMG$K_TRM_LF 10#define SMG$K_TRM_VT 11#define SMG$K_TRM_FF 12#define SMG$K_TRM_CR 13N/* j& */N/* Keypad keys */N/* */#define SMG$K_TRM_PF1 256#define SMG$K_TRM_PF2 257#define SMG$K_TRM_PF3 258#define SMG$K_TRM_PF4 259#define SMG$K_TRM_KP0 260#define SMG$K_TRM_KP1 261#define SMG$K_TRM_KP2 262#define SMG$K_TRM_KP3 263#define SMG$K_TRM_KP4 264#define SMG$K_TRM_KP5 265#define SM k&G$K_TRM_KP6 266#define SMG$K_TRM_KP7 267#define SMG$K_TRM_KP8 268#define SMG$K_TRM_KP9 269#define SMG$K_TRM_ENTER 270#define SMG$K_TRM_MINUS 271#define SMG$K_TRM_COMMA 272#define SMG$K_TRM_PERIOD 273N/* */N/* Cursor positioning keys */N/* */#define SMG$K_TRM_UP 274#define SMG$K_TRM_l&DOWN 275#define SMG$K_TRM_LEFT 276#define SMG$K_TRM_RIGHT 277N/* */N/* Function keys */N/* */#define SMG$K_TRM_F1 281#define SMG$K_TRM_F2 282#define SMG$K_TRM_F3 283#define SMG$K_TRM_F4 284#define SMG$K_TRM_F5 285#define SMG$K_TRM_F6 286#define SMG$K_TRM_F7 287#define SMG$K_TRm&M_F8 288#define SMG$K_TRM_F9 289#define SMG$K_TRM_F10 290#define SMG$K_TRM_F11 291#define SMG$K_TRM_F12 292#define SMG$K_TRM_F13 293#define SMG$K_TRM_F14 294#define SMG$K_TRM_F15 295#define SMG$K_TRM_F16 296#define SMG$K_TRM_F17 297#define SMG$K_TRM_F18 298#define SMG$K_TRM_F19 299#define SMG$K_TRM_F20 300N/* */N/* Synonyms for function keys */N/*n& */#define SMG$K_TRM_HELP 295#define SMG$K_TRM_DO 296N/* */N/* Editing keys */N/* */N#define SMG$K_TRM_E1 311 /* FIND */N#define SMG$K_TRM_E2 312 /* INSERT_HEREo& */N#define SMG$K_TRM_E3 313 /* REMOVE */N#define SMG$K_TRM_E4 314 /* SELECT */N#define SMG$K_TRM_E5 315 /* PREV_SCREEN */N#define SMG$K_TRM_E6 316 /* NEXT_SCREEN */N/* */N/* Synonyms for editing keys */Np&/* */N#define SMG$K_TRM_FIND 311 /* E1 */N#define SMG$K_TRM_INSERT_HERE 312 /* E2 */N#define SMG$K_TRM_REMOVE 313 /* E3 */N#define SMG$K_TRM_SELECT 314 /* E4 */N#define SMG$K_TRM_PREV_SCREEN 315 /* E5 */N#define SMG$K_TRM_NEXT_SCRq&EEN 316 /* E6 */N/* */N/* Locator keys */N/* */N#define SMG$K_TRM_FIRST_DOWN 321 /* Left button down */N#define SMG$K_TRM_SECOND_DOWN 322 /* Middle button down */N#define SMG$K_TRM_THIRD_DOWN 323 /* Right butr&ton down */N#define SMG$K_TRM_FOURTH_DOWN 324 /* Fourth button down */N#define SMG$K_TRM_FIRST_UP 325 /* Left button up */N#define SMG$K_TRM_SECOND_UP 326 /* Middle button up */N#define SMG$K_TRM_THIRD_UP 327 /* Right button up */N#define SMG$K_TRM_FOURTH_UP 328 /* Fourth button up */N/* */s&N/* Conditions */N/* */O#define SMG$K_TRM_CANCELLED 508 /* I/O cancelled by SMG$CANCEL_INPUT */N#define SMG$K_TRM_TIMEOUT 509 /* Timeout period expired */N#define SMG$K_TRM_BUFFER_FULL 510 /* Buffer is full */N#define SMG$K_TRM_UNKNOWN 511 /* Unknown terminator */N/* t& */N/* Screen Management request types - These constants are used internally */N/* by SMG$ and should not be used by users. */N/* */!#define SMG$C_CHANGE_RENDITION 10#define SMG$C_DELETE_CHARS 11#define SMG$C_ERASE_DISPLAY 12#define SMG$C_ERASE_LINE 13#define SMG$C_HOME_CURSOR 14#define SMG$C_INSERT_CHARS 15#define SMG$C_INu&SERT_LINE 16#define SMG$C_PUT_CHARS 17#define SMG$C_PUT_LINE 18$#define SMG$C_PUT_DISPLAY_ENCODED 19"#define SMG$C_RETURN_CURSOR_POS 20 #define SMG$C_PUT_WITH_SCROLL 21#define SMG$C_SET_CURSOR_ABS 22#define SMG$C_SET_CURSOR_REL 23#define SMG$C_DELETE_LINE 24#define SMG$C_ERASE_CHARS 25$#define SMG$C_SCROLL_DISPLAY_AREA 26'#define SMG$C_CHANGE_VIRTUAL_DISPLAY 27#define SMG$C_LABEL_BORDER 28##define SMG$C_END_DISPLAY_UPDATE 29#define SMG$C_MOVE_TEXT 30N/* v& */J/* Character Set Codes */N/* */N#define SMG$C_UNITED_KINGDOM 0 /* Unused */N#define SMG$C_ASCII 1 /* ASCII char set */N#define SMG$C_SPEC_GRAPHICS 2 /* Line drawing set */N#define SMG$C_ALT_CHAR 3 /* Unused w& */N#define SMG$C_ALT_GRAPHICS 4 /* Unused */#define SMG$C_UNKNOWN 5#define SMG$C_SUPPLEMENTAL 6#define SMG$C_JIS_ROMAN 7#define SMG$C_JIS_KANA 8#define SMG$C_KANJI 9#define SMG$C_HANZI 10#define SMG$C_HANYU 11#define SMG$C_HANGUL 12#define SMG$C_KS_ROMAN 13N/* */I/* The following constants define corner cursor positions used in */I/* SMGx&$HOME_CURSOR. */N/* */N#define SMG$C_UPPER_LEFT 0 /* Home cursor to upper left corner */N#define SMG$C_LOWER_LEFT 1 /* Home cursor to lower left corner */O#define SMG$C_UPPER_RIGHT 2 /* Home cursor to upper right corner */O#define SMG$C_LOWER_RIGHT 3 /* Home cursor to lower right corner */N/* y& */I/* The following constants define label positions used in */I/* SMG$LABEL_BORDER. */N/* */N#define SMG$K_TOP 0 /* Place label on top border */N#define SMG$K_BOTTOM 1 /* Place label on bottom border */N#define SMG$K_LEFT 2 /* Place label on left borz&der */N#define SMG$K_RIGHT 3 /* Place label on right border */N/* */I/* The following constants define menu types used in */I/* SMG$CREATE_MENU. */N/* */N#define SMG$K_BLOCK 0 /* Matrix of menu items */N#define SMG$K_VERTIC{&AL 1 /* Vertical vector of menu items */N#define SMG$K_HORIZONTAL 2 /* Horizontal vector of menu items */N/* */I/* Master color wheel for screen background colors. */I/* Used with SMG$CHANGE_PBD_CHARACTERISTICS. */N/* */N#define SMG$C_COLOR_UNKNOWN 0 /* Unknown bac|&kground */N#define SMG$C_COLOR_WHITE 1 /* White background */N#define SMG$C_COLOR_BLACK 2 /* Black background */N#define SMG$C_COLOR_BLUE 3 /* Blue background */N#define SMG$C_COLOR_CYAN 4 /* Cyan background */N#define SMG$C_COLOR_GREEN 5 /* Green background */N#define SMG$C_COLOR_MAGENTA 6 /* Magenta background */N}&#define SMG$C_COLOR_RED 7 /* Red background */N#define SMG$C_COLOR_YELLOW 8 /* Yellow background */N#define SMG$C_COLOR_LIGHT 9 /* Light background */N#define SMG$C_COLOR_DARK 10 /* Dark background */N#define SMG$C_COLOR_USER1 11 /* User 1 background */N#define SMG$C_COLOR_USER2 12 /* User 2 background */N#define SMG$C_COLOR_USER3 ~&13 /* User 3 background */N#define SMG$C_COLOR_USER4 14 /* User 4 background */N#define SMG$C_COLOR_USER5 15 /* User 5 background */N#define SMG$C_COLOR_USER6 16 /* User 6 background */N#define SMG$C_COLOR_USER7 17 /* User 7 background */N#define SMG$C_COLOR_USER8 18 /* User 8 background */N/* & */N/* The following constants describe the type of terminal */N/* and are used with SMG$GET_PASTEBOARD_ATTRIBUTES. */N/* */N#define SMG$K_UNKNOWN 0 /* Unknown type */N#define SMG$K_VT05 1 /* Unused */N#define SMG$K_VT52 2 /* Unused */&N#define SMG$K_VT100 3 /* Unused */N#define SMG$K_VTFOREIGN 4 /* Foreign terminal (ft1-8) */N#define SMG$K_HARDCOPY 5 /* Hardcopy device */N#define SMG$K_VTTERMTABLE 6 /* Video terminal */N#define SMG$K_FIRST_PRIV_TYPE 191 /* Used internally by SMG$ */N/* */I/* Define bits, masks, a&nd fields for the control modes. */N/* */N#define SMG$K_BUF_ENABLED 0 /* Enable Buffering */N#define SMG$K_MINUPD 1 /* Enable minimal update */N#define SMG$K_CLEAR_SCREEN 2 /* Clear screen on exit */N#define SMG$K_NOTABS 3 /* Don't use physical tabs */N#define SMG$K_PROTECT 4 /* Protect aga&inst ASTs */N#define SMG$K_IGNORE 5 /* Don't output PBD if batched */N#define SMG$K_RELEASE_PBD 6 /* Don't touch users part of PBD */#define SMG$M_BUF_ENABLED 0x1#define SMG$M_MINUPD 0x2#define SMG$M_CLEAR_SCREEN 0x4#define SMG$M_NOTABS 0x8#define SMG$M_PROTECT 0x10#define SMG$M_IGNORE 0x20#define SMG$M_RELEASE_PBD 0x40 #define SMG$M_SPARE15 0xFFFFFF80 #ifdef __NEW_STARLETtypedef struct _smgmode_bits {N unsigned smg$v_buf_e&nabled : 1; /* Enable buffering */N unsigned smg$v_minupd : 1; /* Enable minimal update (default) */N unsigned smg$v_clear_screen : 1; /* Clear screen on exit */N unsigned smg$v_notabs : 1; /* Don't use physical tabs */N unsigned smg$v_protect : 1; /* Protect against ASTs */N unsigned smg$v_ignore : 1; /* Don't output PBD if batched */N unsigned smg$v_release_pbd : 1; /* Don't t &ouch users part of PBD */N unsigned smg$v_spare15 : 25; /* extra bits */ } SMGMODE_BITS;#else /* __OLD_STARLET */struct smgmode_bits {N unsigned smg$v_buf_enabled : 1; /* Enable buffering */N unsigned smg$v_minupd : 1; /* Enable minimal update (default) */N unsigned smg$v_clear_screen : 1; /* Clear screen on exit */N unsigned smg$v_notabs : 1; /* Don't use physical tabs */&N unsigned smg$v_protect : 1; /* Protect against ASTs */N unsigned smg$v_ignore : 1; /* Don't output PBD if batched */N unsigned smg$v_release_pbd : 1; /* Don't touch users part of PBD */N unsigned smg$v_spare15 : 25; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* Key definition attributes & */N/* */#define SMG$M_KEY_NOECHO 0x1#define SMG$M_KEY_TERMINATE 0x2#define SMG$M_KEY_LOCK 0x4#define SMG$M_KEY_PROTECTED 0x8#define SMG$M_KEY_SETSTATE 0x10 #define SMG$M_SPARE18 0xFFFFFFE0 #ifdef __NEW_STARLET$typedef struct _smg$r_key_def_attr {N unsigned smg$v_key_noecho : 1; /* Don't echo strings */N unsigned smg$v_key_terminate : 1; /* This key terminates rea &d */N unsigned smg$v_key_lock : 1; /* Lock new state */N unsigned smg$v_key_protected : 1; /* Definition is protected */S unsigned smg$v_key_setstate : 1; /* Definition sets a state (output only) */N unsigned smg$v_spare18 : 27; /* extra bits */ } SMG$R_KEY_DEF_ATTR;#else /* __OLD_STARLET */struct smg$r_key_def_attr {N unsigned smg$v_key_noecho : 1; /* Don't echo strings &*/N unsigned smg$v_key_terminate : 1; /* This key terminates read */N unsigned smg$v_key_lock : 1; /* Lock new state */N unsigned smg$v_key_protected : 1; /* Definition is protected */S unsigned smg$v_key_setstate : 1; /* Definition sets a state (output only) */N unsigned smg$v_spare18 : 27; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* & */N/* Define bit masks and values for display renditions. */N/* */#define SMG$M_BOLD 0x1#define SMG$M_REVERSE 0x2#define SMG$M_BLINK 0x4#define SMG$M_UNDERLINE 0x8#define SMG$M_INVISIBLE 0x10#define SMG$M_USER1 0x100#define SMG$M_USER2 0x200#define SMG$M_USER3 0x400#define SMG$M_USER4 0x800#define SMG$M_USER5 0x1000#define SMG$M_USER6 0x2000#defin &e SMG$M_USER7 0x4000#define SMG$M_USER8 0x8000 #define SMG$M_SPARE14 0xFFFF0000 #ifdef __NEW_STARLETtypedef struct _smgdef_bits {N unsigned smg$v_bold : 1; /* Bold rendition */N unsigned smg$v_reverse : 1; /* Reverse video rendition */N unsigned smg$v_blink : 1; /* Blink rendition */N unsigned smg$v_underline : 1; /* Underline rendition */N unsigned smg$v_invisible : 1; /* I&nvisible rendition */N unsigned smg$v_fill1 : 3; /* internally used by SMG$ */N unsigned smg$v_user1 : 1; /* User rendition 1 */N unsigned smg$v_user2 : 1; /* User rendition 2 */N unsigned smg$v_user3 : 1; /* User rendition 3 */N unsigned smg$v_user4 : 1; /* User rendition 4 */N unsigned smg$v_user5 : 1; /* User rendition 5 & */N unsigned smg$v_user6 : 1; /* User rendition 6 */N unsigned smg$v_user7 : 1; /* User rendition 7 */N unsigned smg$v_user8 : 1; /* User rendition 8 */N unsigned smg$v_spare14 : 16; /* extra bits */ } SMGDEF_BITS;#else /* __OLD_STARLET */struct smgdef_bits {N unsigned smg$v_bold : 1; /* Bold rendition */N unsigned smg$v_rev&erse : 1; /* Reverse video rendition */N unsigned smg$v_blink : 1; /* Blink rendition */N unsigned smg$v_underline : 1; /* Underline rendition */N unsigned smg$v_invisible : 1; /* Invisible rendition */N unsigned smg$v_fill1 : 3; /* internally used by SMG$ */N unsigned smg$v_user1 : 1; /* User rendition 1 */N unsigned smg$v_user2 : 1; /* User &rendition 2 */N unsigned smg$v_user3 : 1; /* User rendition 3 */N unsigned smg$v_user4 : 1; /* User rendition 4 */N unsigned smg$v_user5 : 1; /* User rendition 5 */N unsigned smg$v_user6 : 1; /* User rendition 6 */N unsigned smg$v_user7 : 1; /* User rendition 7 */N unsigned smg$v_user8 : 1; /* User rendition 8 & */N unsigned smg$v_spare14 : 16; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N#define SMG$M_NORMAL 0 /* no bits set */N/* */I/* The following masks define values to be used */I/* to specify a display attribute. These may be added */I/* together to specify multiple attributes. & */N/* */#define SMG$M_BORDER 0x1#define SMG$M_TRUNC_ICON 0x2"#define SMG$M_DISPLAY_CONTROLS 0x4#define SMG$M_USER_DISPLAY 0x8#define SMG$M_BLOCK_BORDER 0x10"#define SMG$M_PROTECT_DISPLAY 0x20 #define SMG$M_SPARE12 0xFFFFFFC0 #ifdef __NEW_STARLET$typedef struct _display_attributes {N unsigned smg$v_border : 1; /* Display is bordered */N unsigned smg$v_trunc_icon : 1; & /* Truncation icon enabled */N unsigned smg$v_display_controls : 1; /* Display carriage controls */N unsigned smg$v_user_display : 1; /* User display for DEBUG */N unsigned smg$v_block_border : 1; /* Display is block bordered */N unsigned smg$v_protect_display : 1; /* Protect display against ASTs */N unsigned smg$v_spare12 : 26; /* extra bits */ } DISPLAY_ATTRIBUTES;#else /* __OLD_STARLET */st&ruct display_attributes {N unsigned smg$v_border : 1; /* Display is bordered */N unsigned smg$v_trunc_icon : 1; /* Truncation icon enabled */N unsigned smg$v_display_controls : 1; /* Display carriage controls */N unsigned smg$v_user_display : 1; /* User display for DEBUG */N unsigned smg$v_block_border : 1; /* Display is block bordered */N unsigned smg$v_protect_display : 1; /* Protect display against ASTs */ &N unsigned smg$v_spare12 : 26; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$CREATE_SUBPROCESS. */N/* */#define SMG$M_TRUSTED 0x1#define SMG$M_AUTHPRIV 0x2#defin &e SMG$M_SUBSYSTEM 0x4 #define SMG$M_SPARE20 0xFFFFFFF8 #ifdef __NEW_STARLET/typedef struct _smg$r_create_subprocess_flags {N unsigned smg$v_trusted : 1; /* Set TRUSTED flag for LIB$SPAWN */N unsigned smg$v_authpriv : 1; /* Set AUTHPRIV flag for LIB$SPAWN */N unsigned smg$v_subsystem : 1; /* Set SUBSYSTEM flag for LIB$SPAWN */N unsigned smg$v_spare20 : 29; /* extra bits */$ } SMG$R_CREATE_SUBPROCESS_FLAGS;#else /* _ &_OLD_STARLET */&struct smg$r_create_subprocess_flags {N unsigned smg$v_trusted : 1; /* Set TRUSTED flag for LIB$SPAWN */N unsigned smg$v_authpriv : 1; /* Set AUTHPRIV flag for LIB$SPAWN */N unsigned smg$v_subsystem : 1; /* Set SUBSYSTEM flag for LIB$SPAWN */N unsigned smg$v_spare20 : 29; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */ &I/* The following defines bits used with subprocess manipulation. */N/* */#define SMG$M_DATA_FOLLOWS 0x1#define SMG$M_SEND_EOF 0x2#define SMG$M_NO_PRINT 0x4 #define SMG$M_SPARE11 0xFFFFFFF8 #ifdef __NEW_STARLET(typedef struct _smg$r_subprocess_flags {N unsigned smg$v_data_follows : 1; /* The next call specifies data. */S unsigned smg$v_send_eof : 1; /* Send an end-of-file to the subproce &ss */R unsigned smg$v_no_print : 1; /* Do not output command to the display */N unsigned smg$v_spare11 : 29; /* extra bits */ } SMG$R_SUBPROCESS_FLAGS;#else /* __OLD_STARLET */struct smg$r_subprocess_flags {N unsigned smg$v_data_follows : 1; /* The next call specifies data. */S unsigned smg$v_send_eof : 1; /* Send an end-of-file to the subprocess */R unsigned smg$v_no_print : 1; /* Do not output command to th &e display */N unsigned smg$v_spare11 : 29; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$DELETE_PASTEBOARD. */N/* */#define SMG$M_ERASE_PBD 0x1 #define SMG$M_IGNORE &_BATCHED 0x2 #define SMG$M_SPARE10 0xFFFFFFFC #ifdef __NEW_STARLET(typedef struct _smg$r_delete_pbd_flags {N unsigned smg$v_erase_pbd : 1; /* Erase the pasteboard */N unsigned smg$v_ignore_batched : 1; /* Delete even if pbd is batched */N unsigned smg$v_spare10 : 30; /* extra bits */ } SMG$R_DELETE_PBD_FLAGS;#else /* __OLD_STARLET */struct smg$r_delete_pbd_flags {N unsigned smg$v_erase_pbd : 1; /* Erase the & pasteboard */N unsigned smg$v_ignore_batched : 1; /* Delete even if pbd is batched */N unsigned smg$v_spare10 : 30; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$CREATE_PASTEBOARD. */N/* & */#define SMG$M_KEEP_CONTENTS 0x1#define SMG$M_WORKSTATION 0x2#define SMG$M_SPARE9 0xFFFFFFFC #ifdef __NEW_STARLET(typedef struct _smg$r_create_pbd_flags {N unsigned smg$v_keep_contents : 1; /* Don't erase the pasteboard */O unsigned smg$v_workstation : 1; /* Pasteboard is DECwindows terminal */N unsigned smg$v_spare9 : 30; /* extra bits */ } SMG$R_CREATE_PBD_FLAGS;#else /* __OLD_S &TARLET */struct smg$r_create_pbd_flags {N unsigned smg$v_keep_contents : 1; /* Don't erase the pasteboard */O unsigned smg$v_workstation : 1; /* Pasteboard is DECwindows terminal */N unsigned smg$v_spare9 : 30; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$READ_ &xxxx. */N/* */#define SMG$M_FUNC_KEYS 0x1#define SMG$M_NOKEEP 0x2#define SMG$M_NORECALL 0x4#define SMG$M_SPARE8 0xFFFFFFF8 #ifdef __NEW_STARLET"typedef struct _smg$r_read_flags {N unsigned smg$v_func_keys : 1; /* Disable line-editting. */O unsigned smg$v_nokeep : 1; /* Don't save input in recall buffer */P unsigned smg$v_n &orecall : 1; /* Disable input recall for this call */N unsigned smg$v_spare8 : 29; /* extra bits */ } SMG$R_READ_FLAGS;#else /* __OLD_STARLET */struct smg$r_read_flags {N unsigned smg$v_func_keys : 1; /* Disable line-editting. */O unsigned smg$v_nokeep : 1; /* Don't save input in recall buffer */P unsigned smg$v_norecall : 1; /* Disable input recall for this call */N unsigned smg$v_spare8 : 29; & /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$SET_CURSOR_MODE. */N/* */#define SMG$M_CURSOR_OFF 0x1#define SMG$M_CURSOR_ON 0x2#define SMG$M_SCROLL_JUMP 0x4#defin &e SMG$M_SCROLL_SMOOTH 0x8 #define SMG$M_SPARE16 0xFFFFFFF0 #ifdef __NEW_STARLET(typedef struct _smg$r_set_cursor_flags {N unsigned smg$v_cursor_off : 1; /* Turn the physical cursor off */N unsigned smg$v_cursor_on : 1; /* Turn the physical cursor on */N unsigned smg$v_scroll_jump : 1; /* Set jump scroll */N unsigned smg$v_scroll_smooth : 1; /* Set smooth scroll */N unsigned smg$v_spare16 : 28; /* extra bits & */ } SMG$R_SET_CURSOR_FLAGS;#else /* __OLD_STARLET */struct smg$r_set_cursor_flags {N unsigned smg$v_cursor_off : 1; /* Turn the physical cursor off */N unsigned smg$v_cursor_on : 1; /* Turn the physical cursor on */N unsigned smg$v_scroll_jump : 1; /* Set jump scroll */N unsigned smg$v_scroll_smooth : 1; /* Set smooth scroll */N unsigned smg$v_spare16 : 28; /* extra bits & */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$GET_DISPLAY_ATTR. */N/* */#define SMG$M_VIEWPORT 0x1#define SMG$M_SUBPROCESS 0x2#define SMG$M_MENU 0x4#define SMG$M_SPARE7 0xFFFFFFF8 #ifdef _ &_NEW_STARLET)typedef struct _smg$r_get_display_flags {N unsigned smg$v_viewport : 1; /* Display contains a viewport */N unsigned smg$v_subprocess : 1; /* Display contains a subprocess */N unsigned smg$v_menu : 1; /* Display contains a menu */N unsigned smg$v_spare7 : 29; /* extra bits */ } SMG$R_GET_DISPLAY_FLAGS;#else /* __OLD_STARLET */ struct smg$r_get_display_flags {N unsigned smg$v_viewport : &1; /* Display contains a viewport */N unsigned smg$v_subprocess : 1; /* Display contains a subprocess */N unsigned smg$v_menu : 1; /* Display contains a menu */N unsigned smg$v_spare7 : 29; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$PUT &_CHARS. */N/* */#define SMG$M_ERASE_LINE 0x1#define SMG$M_ERASE_TO_EOL 0x2#define SMG$M_SPARE6 0xFFFFFFFC #ifdef __NEW_STARLET'typedef struct _smg$r_put_chars_flags {N unsigned smg$v_erase_line : 1; /* Erase the entire line */N unsigned smg$v_erase_to_eol : 1; /* Erase from cursor to end of line */N unsigned smg$v_spare6 : 30; & /* extra bits */ } SMG$R_PUT_CHARS_FLAGS;#else /* __OLD_STARLET */struct smg$r_put_chars_flags {N unsigned smg$v_erase_line : 1; /* Erase the entire line */N unsigned smg$v_erase_to_eol : 1; /* Erase from cursor to end of line */N unsigned smg$v_spare6 : 30; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */ &I/* The following defines bits used with the FLAGS parameter for */I/* SMG$MOVE_TEXT. */N/* */#define SMG$M_TEXT_SAVE 0x1#define SMG$M_TEXT_ONLY 0x2 #define SMG$M_SPARE17 0xFFFFFFFC #ifdef __NEW_STARLET'typedef struct _smg$r_move_text_flags {N unsigned smg$v_text_save : 1; /* Don't erase text after moving it */N unsigned smg$v_text_only : & 1; /* Don't move attributes */N unsigned smg$v_spare17 : 30; /* extra bits */ } SMG$R_MOVE_TEXT_FLAGS;#else /* __OLD_STARLET */struct smg$r_move_text_flags {N unsigned smg$v_text_save : 1; /* Don't erase text after moving it */N unsigned smg$v_text_only : 1; /* Don't move attributes */N unsigned smg$v_spare17 : 30; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARL &ET */N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$PUT_PASTEBOARD and SMG$SNAPSHOT. */N/* */#define SMG$M_FORM_FEED 0x1#define SMG$M_SPARE5 0xFFFFFFFE #ifdef __NEW_STARLET&typedef struct _smg$r_snapshot_flags {O unsigned smg$v_form_feed : 1; /* Output form f &eed before first row */N unsigned smg$v_spare5 : 31; /* extra bits */ } SMG$R_SNAPSHOT_FLAGS;#else /* __OLD_STARLET */struct smg$r_snapshot_flags {O unsigned smg$v_form_feed : 1; /* Output form feed before first row */N unsigned smg$v_spare5 : 31; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* The followi &ng defines bits used with the FLAGS parameter for */I/* SMG$PUT_xxxx. */N/* */#define SMG$M_WRAP_CHAR 0x1#define SMG$M_WRAP_WORD 0x2#define SMG$M_SPARE4 0xFFFFFFFC #ifdef __NEW_STARLET&typedef struct _smg$r_put_line_flags {R unsigned smg$v_wrap_char : 1; /* Do character wrapping at end of line */N unsigned smg$v_wrap_word : 1; /* D &o word wrapping at end of line */N unsigned smg$v_spare4 : 30; /* extra bits */ } SMG$R_PUT_LINE_FLAGS;#else /* __OLD_STARLET */struct smg$r_put_line_flags {R unsigned smg$v_wrap_char : 1; /* Do character wrapping at end of line */N unsigned smg$v_wrap_word : 1; /* Do word wrapping at end of line */N unsigned smg$v_spare4 : 30; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* & */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$SET_KEYPAD_MODE. */N/* */$#define SMG$M_KEYPAD_APPLICATION 0x1 #define SMG$M_KEYPAD_NUMERIC 0x2#define SMG$M_SPARE3 0xFFFFFFFC #ifdef __NEW_STARLET$typedef struct _smg$r_keypad_modes {N unsigned smg$v_keypad_ &application : 1; /* Application keypad */N unsigned smg$v_keypad_numeric : 1; /* Numeric keypad */N unsigned smg$v_spare3 : 30; /* extra bits */ } SMG$R_KEYPAD_MODES;#else /* __OLD_STARLET */struct smg$r_keypad_modes {N unsigned smg$v_keypad_application : 1; /* Application keypad */N unsigned smg$v_keypad_numeric : 1; /* Numeric keypad */N unsigned smg$v_spare3 : 30; /* & extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$GET_PASTING_INFO. */N/* */ #define SMG$M_DISPLAY_PASTED 0x1 #define SMG$M_SPARE19 0xFFFFFFFE #ifdef __NEW_STARLET*typedef stru &ct _smg$r_pasting_info_flags {N unsigned smg$v_display_pasted : 1; /* Display is pasted */N unsigned smg$v_spare19 : 31; /* extra bits */ } SMG$R_PASTING_INFO_FLAGS;#else /* __OLD_STARLET */!struct smg$r_pasting_info_flags {N unsigned smg$v_display_pasted : 1; /* Display is pasted */N unsigned smg$v_spare19 : 31; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* & */I/* The following defines bits used with menu manipulation. */N/* */#define SMG$M_REMOVE_ITEM 0x1#define SMG$M_FIXED_FORMAT 0x2#define SMG$M_DOUBLE_SPACE 0x4#define SMG$M_RETURN_IMMED 0x8#define SMG$M_ERASE_MENU 0x10#define SMG$M_WIDE_MENU 0x20#define SMG$M_WRAP_MENU 0x40#define SMG$M_FULL_FIELD 0x80#define SMG$M_SPARE2 & 0xFFFFFF00 #ifdef __NEW_STARLET"typedef struct _smg$r_menu_flags {N unsigned smg$v_remove_item : 1; /* Only select item once */N unsigned smg$v_fixed_format : 1; /* Use fixed size cols */N unsigned smg$v_double_space : 1; /* Double space menu rows */N unsigned smg$v_return_immed : 1; /* Ret on non-arrow key */N unsigned smg$v_erase_menu : 1; /* Erase menu when deleting */N unsigned smg$v_wide_menu : & 1; /* Wide menu items */N unsigned smg$v_wrap_menu : 1; /* Wrap menu items top to bottom */N unsigned smg$v_full_field : 1; /* Highlight entire field */>/* SCROLL_BARS bitfield mask; /* Use scroll bar indicators */@/* MARK_ITEM bitfield mask; /* Use def rend for chosen items */N unsigned smg$v_spare2 : 24; /* extra bits */ } SMG$R_MENU_FLAGS;#else /* __OLD_STARLET */struct smg$r_menu_flags {N& unsigned smg$v_remove_item : 1; /* Only select item once */N unsigned smg$v_fixed_format : 1; /* Use fixed size cols */N unsigned smg$v_double_space : 1; /* Double space menu rows */N unsigned smg$v_return_immed : 1; /* Ret on non-arrow key */N unsigned smg$v_erase_menu : 1; /* Erase menu when deleting */N unsigned smg$v_wide_menu : 1; /* Wide menu items */N unsigned smg$v_wrap_me &nu : 1; /* Wrap menu items top to bottom */N unsigned smg$v_full_field : 1; /* Highlight entire field */>/* SCROLL_BARS bitfield mask; /* Use scroll bar indicators */@/* MARK_ITEM bitfield mask; /* Use def rend for chosen items */N unsigned smg$v_spare2 : 24; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */I/* The following are used with S &MG$PUT_LINE_xxxx, */I/* SMG$SCROLL_DISPLAY_AREA, and SMG$DRAW_CHAR. */N/* */#define SMG$M_UP 0x1#define SMG$M_DOWN 0x2#define SMG$M_RIGHT 0x4#define SMG$M_LEFT 0x8#define SMG$M_SPARE1 0xFFFFFFF0 #ifdef __NEW_STARLETtypedef struct _scroll_dirs {N unsigned smg$v_up : 1; /* Up */N unsigned smg$v_down : 1; & /* Down */N unsigned smg$v_right : 1; /* Right */N unsigned smg$v_left : 1; /* Left */N unsigned smg$v_spare1 : 28; /* extra bits */ } SCROLL_DIRS;#else /* __OLD_STARLET */struct scroll_dirs {N unsigned smg$v_up : 1; /* Up */N unsigned smg$v_down : 1; /* Down & */N unsigned smg$v_right : 1; /* Right */N unsigned smg$v_left : 1; /* Left */N unsigned smg$v_spare1 : 28; /* extra bits */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* Define data structures */N/* & */N#define SMG$C_BAND_INFORMATION_TABLE 12 /* Length of table in bytes */N/* */N#define SMG$C_PASTEBOARD_INFO_BLOCK 36 /* Length of table in bytes */N/* */N#define SMG$C_KEYBOARD_INFO_BLOCK 36 /* Length of table in bytes */ #ifdef __NEW_STARLETtypedef union _smgdef {N/* & */I/* When an out-of-band AST triggers, the user's AST routine */I/* will get called. The first argument passed to his */I/* routine is the address of a Band Information Table. */I/* The offsets into this table are described below. */I/* To make it easy to access from certain languages, */I/* the table is arranged so that it is convenient to & */I/* reference it as a longword vector as well as a byte block. */N/* */ __struct {N unsigned int smg$l_pasteboard_id; /* Pasteboard ID */N unsigned int smg$l_arg; /* User's AST argument */ __union {N unsigned char smg$b_character; /* The character typed */N unsigned int smg$l_character; /* The character and & 3 spaces */& } smg$r_character_overlay;' } smg$r_band_information_table;I/* When SMG$GET_PASTEBOARD_ATTRIBUTES is called, */I/* it returns data in a pasteboard information block. */I/* The following structure is used to reference fields */I/* in this block. */I/* Items marked with a plus (+) will be 0 unless the */I/* device is a terminal (D&EVCLASS=DC$_TERM). */N/* */ __struct {N unsigned int smg$l_devchar; /* Device characteristics */N unsigned int smg$l_devdepend; /* Specific characteristics (1) */N unsigned int smg$l_devdepend2; /* Specific characteristics (2) */N unsigned char smg$b_devclass; /* Device class (e.g. DC$_TERM) */N unsigned char smg$b_smg_devtyp&e; /* Internal SMG device type */T unsigned char smg$b_phy_devtype; /* Physical device type (e.g. DT$_VT100) */N unsigned char smg$b_rows; /* Number of rows on device */N unsigned short int smg$w_width; /* Terminal width */N unsigned char smg$b_color; /* PBD background color */N unsigned char smg$b_parity; /* Parity attributes (+) */N unsigned short int smg$w_speed; /* Terminal Speed &(+) */N unsigned short int smg$w_fill; /* Fill characteristics (+) */O unsigned short int smg$w_cursor_row; /* Row where physical cursor is */N/* (1-origin) */O unsigned short int smg$w_cursor_col; /* Col where physical cursor is */N/* (1-origin) */N unsigned int smg$l_cursor_did; /* Display id of topmost */N&/* display that cursor is in. */N/* 0 if cursor is not in a */N/* virtual display */N unsigned int smg$l_devdepend3; /* Specific characteristics (3) */& } smg$r_pasteboard_info_block;I/* When SMG$GET_KEYBOARD_ATTRIBUTES is called, */I/* it returns data in a keyboard information block. & */I/* The following structure is used to reference fields */I/* in this block. */I/* Items marked with a plus (+) will be 0 unless the */I/* device is a terminal (DEVCLASS=DC$_TERM). */N/* */ __struct {N unsigned int smg$l_fill1; /* Device characteristics */N unsigned i&nt smg$l_fill2; /* Specific characteristics (1) */N unsigned int smg$l_fill3; /* Specific characteristics (2) */N unsigned char smg$b_fill4; /* Device class (e.g. DC$_TERM) */N unsigned char smg$b_recall_size; /* Size of recall buffer (+) */S unsigned char smg$b_fill5; /* Physical device type (e.g. DT$_VT100) */T unsigned char smg$b_typeahead_char; /* First char in typeahead buffer (+) */N unsigned short int smg$w &_fill6; /* Terminal width */_ unsigned short int smg$w_typeahead_count; /* Number of chars in typeahead buffer (+) */! unsigned int smg$l_fill7;! unsigned int smg$l_fill8;! unsigned int smg$l_fill9;N unsigned int smg$l_fill10; /* Device characteristics 3 */$ } smg$r_keyboard_info_block; } SMGDEF; #if !defined(__VAXC)L#define smg$l_pasteboard_id smg$r_band_information_table.smg$l_pasteboard_id8#define smg$l_&arg smg$r_band_information_table.smg$l_argT#define smg$r_character_overlay smg$r_band_information_table.smg$r_character_overlay?#define smg$b_character smg$r_character_overlay.smg$b_character?#define smg$l_character smg$r_character_overlay.smg$l_character?#define smg$l_devchar smg$r_pasteboard_info_block.smg$l_devcharC#define smg$l_devdepend smg$r_pasteboard_info_block.smg$l_devdependE#define smg$l_devdepend2 smg$r_pasteboard_info_block.smg$l_devdepend2A#define smg$b_devclass smg$r_pastebo &ard_info_block.smg$b_devclassG#define smg$b_smg_devtype smg$r_pasteboard_info_block.smg$b_smg_devtypeG#define smg$b_phy_devtype smg$r_pasteboard_info_block.smg$b_phy_devtype9#define smg$b_rows smg$r_pasteboard_info_block.smg$b_rows;#define smg$w_width smg$r_pasteboard_info_block.smg$w_width;#define smg$b_color smg$r_pasteboard_info_block.smg$b_color=#define smg$b_parity smg$r_pasteboard_info_block.smg$b_parity;#define smg$w_speed smg$r_pasteboard_info_block.smg$w_speed9#define smg$w_fi&ll smg$r_pasteboard_info_block.smg$w_fillE#define smg$w_cursor_row smg$r_pasteboard_info_block.smg$w_cursor_rowE#define smg$w_cursor_col smg$r_pasteboard_info_block.smg$w_cursor_colE#define smg$l_cursor_did smg$r_pasteboard_info_block.smg$l_cursor_didE#define smg$l_devdepend3 smg$r_pasteboard_info_block.smg$l_devdepend3E#define smg$b_recall_size smg$r_keyboard_info_block.smg$b_recall_sizeK#define smg$b_typeahead_char smg$r_keyboard_info_block.smg$b_typeahead_charM#define smg$w_typeahead_ &count smg$r_keyboard_info_block.smg$w_typeahead_count"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union smgdef {N/* */I/* When an out-of-band AST triggers, the user's AST routine */I/* will get called. The first argument passed to his */I/* routine is the address of a Band Information Table. */I/* The offsets into this table are described below. & */I/* To make it easy to access from certain languages, */I/* the table is arranged so that it is convenient to */I/* reference it as a longword vector as well as a byte block. */N/* */ __struct {N unsigned int smg$l_pasteboard_id; /* Pasteboard ID */N unsigned int smg$l_arg; /* User's AST argument */ & __union {N unsigned char smg$b_character; /* The character typed */N unsigned int smg$l_character; /* The character and 3 spaces */& } smg$r_character_overlay;' } smg$r_band_information_table;I/* When SMG$GET_PASTEBOARD_ATTRIBUTES is called, */I/* it returns data in a pasteboard information block. */I/* The following structure is used to reference fields */I/* in this blo&ck. */I/* Items marked with a plus (+) will be 0 unless the */I/* device is a terminal (DEVCLASS=DC$_TERM). */N/* */ __struct {N unsigned int smg$l_devchar; /* Device characteristics */N unsigned int smg$l_devdepend; /* Specific characteristics (1) */N unsigned int smg$l_devdepe&nd2; /* Specific characteristics (2) */N unsigned char smg$b_devclass; /* Device class (e.g. DC$_TERM) */N unsigned char smg$b_smg_devtype; /* Internal SMG device type */T unsigned char smg$b_phy_devtype; /* Physical device type (e.g. DT$_VT100) */N unsigned char smg$b_rows; /* Number of rows on device */N unsigned short int smg$w_width; /* Terminal width */N unsigned char smg$b_color; /* PBD backgro&und color */N unsigned char smg$b_parity; /* Parity attributes (+) */N unsigned short int smg$w_speed; /* Terminal Speed (+) */N unsigned short int smg$w_fill; /* Fill characteristics (+) */O unsigned short int smg$w_cursor_row; /* Row where physical cursor is */N/* (1-origin) */O unsigned short int smg$w_cursor_col; /* Col where physical cursor is *&/N/* (1-origin) */N unsigned int smg$l_cursor_did; /* Display id of topmost */N/* display that cursor is in. */N/* 0 if cursor is not in a */N/* virtual display */N unsigned int smg$l_devdepend3; /* Specific characteristics (3) */& } smg$r_pasteb&oard_info_block;I/* When SMG$GET_KEYBOARD_ATTRIBUTES is called, */I/* it returns data in a keyboard information block. */I/* The following structure is used to reference fields */I/* in this block. */I/* Items marked with a plus (+) will be 0 unless the */I/* device is a terminal (DEVCLASS=DC$_TERM). */N/* & */ __struct {N unsigned int smg$l_fill1; /* Device characteristics */N unsigned int smg$l_fill2; /* Specific characteristics (1) */N unsigned int smg$l_fill3; /* Specific characteristics (2) */N unsigned char smg$b_fill4; /* Device class (e.g. DC$_TERM) */N unsigned char smg$b_recall_size; /* Size of recall buffer (+) */S unsigned char smg$b_fill5; &/* Physical device type (e.g. DT$_VT100) */T unsigned char smg$b_typeahead_char; /* First char in typeahead buffer (+) */N unsigned short int smg$w_fill6; /* Terminal width */_ unsigned short int smg$w_typeahead_count; /* Number of chars in typeahead buffer (+) */! unsigned int smg$l_fill7;! unsigned int smg$l_fill8;! unsigned int smg$l_fill9;N unsigned int smg$l_fill10; /* Device characteristics 3 */$ &} smg$r_keyboard_info_block; } ; #if !defined(__VAXC)L#define smg$l_pasteboard_id smg$r_band_information_table.smg$l_pasteboard_id8#define smg$l_arg smg$r_band_information_table.smg$l_arg\#define smg$b_character smg$r_band_information_table.smg$r_character_overlay.smg$b_character\#define smg$l_character smg$r_band_information_table.smg$r_character_overlay.smg$l_character?#define smg$l_devchar smg$r_pasteboard_info_block.smg$l_devcharC#define smg$l_devdepend smg$r_pasteboard_info_bloc &k.smg$l_devdependE#define smg$l_devdepend2 smg$r_pasteboard_info_block.smg$l_devdepend2A#define smg$b_devclass smg$r_pasteboard_info_block.smg$b_devclassG#define smg$b_smg_devtype smg$r_pasteboard_info_block.smg$b_smg_devtypeG#define smg$b_phy_devtype smg$r_pasteboard_info_block.smg$b_phy_devtype9#define smg$b_rows smg$r_pasteboard_info_block.smg$b_rows;#define smg$w_width smg$r_pasteboard_info_block.smg$w_width;#define smg$b_color smg$r_pasteboard_info_block.smg$b_color=#define smg$b_&parity smg$r_pasteboard_info_block.smg$b_parity;#define smg$w_speed smg$r_pasteboard_info_block.smg$w_speed9#define smg$w_fill smg$r_pasteboard_info_block.smg$w_fillE#define smg$w_cursor_row smg$r_pasteboard_info_block.smg$w_cursor_rowE#define smg$w_cursor_col smg$r_pasteboard_info_block.smg$w_cursor_colE#define smg$l_cursor_did smg$r_pasteboard_info_block.smg$l_cursor_didE#define smg$l_devdepend3 smg$r_pasteboard_info_block.smg$l_devdepend3E#define smg$b_recall_size smg$r_keyboard_info_ &block.smg$b_recall_sizeK#define smg$b_typeahead_char smg$r_keyboard_info_block.smg$b_typeahead_charM#define smg$w_typeahead_count smg$r_keyboard_info_block.smg$w_typeahead_count"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* */N/* Define the out-of-band information table used when an out-of-band */N/* AST routine is called as it's own record. */N/* & */ #ifdef __NEW_STARLET)typedef struct _smg$r_out_of_band_table {N unsigned int smg$l_pbd_id; /* Pasteboard ID */N unsigned int smg$l_user_arg; /* User's AST argument */ __union {N unsigned char smg$b_char; /* The character typed */N unsigned int smg$l_char; /* The character and 3 spaces */ } smg$r_char_o&verlay; } SMG$R_OUT_OF_BAND_TABLE; #if !defined(__VAXC)0#define smg$b_char smg$r_char_overlay.smg$b_char0#define smg$l_char smg$r_char_overlay.smg$l_char"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ struct smg$r_out_of_band_table {N unsigned int smg$l_pbd_id; /* Pasteboard ID */N unsigned int smg$l_user_arg; /* User's AST argument */ __union {N unsigned char smg$b_char; /* The character & typed */N unsigned int smg$l_char; /* The character and 3 spaces */ } smg$r_char_overlay; } ; #if !defined(__VAXC)0#define smg$b_char smg$r_char_overlay.smg$b_char0#define smg$l_char smg$r_char_overlay.smg$l_char"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define SMG$C_OUT_OF_BAND_TABLE 12 /* Length of table in bytes */N/* & */N/* Define the subprocess information table used when a subprocess */N/* AST routine is called as it's own record. */N/* */ #ifdef __NEW_STARLET-typedef struct _smg$r_subprocess_info_table {N unsigned int smg$l_disp_id; /* Display ID */N unsigned int smg$l_usr_arg; /* User's AST argument */N unsigned int smg$l_sta &tus; /* Status of executed command */" } SMG$R_SUBPROCESS_INFO_TABLE;#else /* __OLD_STARLET */$struct smg$r_subprocess_info_table {N unsigned int smg$l_disp_id; /* Display ID */N unsigned int smg$l_usr_arg; /* User's AST argument */N unsigned int smg$l_status; /* Status of executed command */ } ;%#endif /* #ifdef __NEW_STARLET */N#define SMG$C_SUBPROCESS_INFO_TABLE 12 /* Length of tab &le in bytes */N/* */N/* Define an information table that can be used by both */N/* SMG$GET_PASTEBOARD_ATTRIBUTES and SMG$GET_KEYBOARD_ATTRIBUTES */N/* as it's own record. */N/* */ #ifdef __NEW_STARLET,typedef struct _smg$r_attribute_info_block {N unsign&ed int smg$l_dev_char; /* Device characteristics */N unsigned int smg$l_dev_depend; /* Specific characteristics (1) */N unsigned int smg$l_dev_depend2; /* Specific characteristics (2) */N unsigned char smg$b_dev_class; /* Device class (e.g. DC$_TERM) */ __union {N unsigned char smg$b_pbd_type; /* Internal SMG device type */N unsigned char smg$b_recall_num; /* Size of recall buffer (+) */ } smg$r_dev_ &overlay;S unsigned char smg$b_dev_type; /* Physical device type (e.g. DT$_VT100) */ __union {N unsigned char smg$b_num_rows; /* Number of rows on device */R unsigned char smg$b_typeahd_char; /* First char in typeahead buffer (+) */ } smg$r_row_overlay;N unsigned short int smg$w_num_columns; /* Terminal width */ __union {[ unsigned short int smg$w_typeahd_cnt; /* Number of chars in typeahead buffer (+) */ __ &struct {N unsigned char smg$b_pbd_color; /* PBD background color */N unsigned char smg$b_dev_parity; /* Parity attributes (+) */! } smg$r_count_struct; } smg$r_count_overlay;N unsigned short int smg$w_dev_speed; /* Terminal Speed (+) */N unsigned short int smg$w_dev_fill; /* Fill characteristics (+) */P unsigned short int smg$w_phys_cursor_row; /* Row where physical cursor is */P unsigned short int s &mg$w_phys_cursor_col; /* Col where physical cursor is */N unsigned int smg$l_display_id; /* Display containing phy cursor */N unsigned int smg$l_dev_depend3; /* Specific characteristics (3) */! } SMG$R_ATTRIBUTE_INFO_BLOCK; #if !defined(__VAXC)7#define smg$b_pbd_type smg$r_dev_overlay.smg$b_pbd_type;#define smg$b_recall_num smg$r_dev_overlay.smg$b_recall_num7#define smg$b_num_rows smg$r_row_overlay.smg$b_num_rows?#define smg$b_typeahd_char smg$r_row_overlay.smg &$b_typeahd_char?#define smg$w_typeahd_cnt smg$r_count_overlay.smg$w_typeahd_cntA#define smg$r_count_struct smg$r_count_overlay.smg$r_count_struct:#define smg$b_pbd_color smg$r_count_struct.smg$b_pbd_color<#define smg$b_dev_parity smg$r_count_struct.smg$b_dev_parity"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */#struct smg$r_attribute_info_block {N unsigned int smg$l_dev_char; /* Device characteristics */N unsigned int smg$l_dev_depend; /* & Specific characteristics (1) */N unsigned int smg$l_dev_depend2; /* Specific characteristics (2) */N unsigned char smg$b_dev_class; /* Device class (e.g. DC$_TERM) */ __union {N unsigned char smg$b_pbd_type; /* Internal SMG device type */N unsigned char smg$b_recall_num; /* Size of recall buffer (+) */ } smg$r_dev_overlay;S unsigned char smg$b_dev_type; /* Physical device type (e.g. DT$_VT100) */ __union {N & unsigned char smg$b_num_rows; /* Number of rows on device */R unsigned char smg$b_typeahd_char; /* First char in typeahead buffer (+) */ } smg$r_row_overlay;N unsigned short int smg$w_num_columns; /* Terminal width */ __union {[ unsigned short int smg$w_typeahd_cnt; /* Number of chars in typeahead buffer (+) */ __struct {N unsigned char smg$b_pbd_color; /* PBD background color */N unsigned& char smg$b_dev_parity; /* Parity attributes (+) */! } smg$r_count_struct; } smg$r_count_overlay;N unsigned short int smg$w_dev_speed; /* Terminal Speed (+) */N unsigned short int smg$w_dev_fill; /* Fill characteristics (+) */P unsigned short int smg$w_phys_cursor_row; /* Row where physical cursor is */P unsigned short int smg$w_phys_cursor_col; /* Col where physical cursor is */N unsigned int smg$l_display_id; /* Display con &taining phy cursor */N unsigned int smg$l_dev_depend3; /* Specific characteristics (3) */ } ; #if !defined(__VAXC)7#define smg$b_pbd_type smg$r_dev_overlay.smg$b_pbd_type;#define smg$b_recall_num smg$r_dev_overlay.smg$b_recall_num7#define smg$b_num_rows smg$r_row_overlay.smg$b_num_rows?#define smg$b_typeahd_char smg$r_row_overlay.smg$b_typeahd_char?#define smg$w_typeahd_cnt smg$r_count_overlay.smg$w_typeahd_cntN#define smg$b_pbd_color smg$r_count_overlay.smg$r_coun&t_struct.smg$b_pbd_colorP#define smg$b_dev_parity smg$r_count_overlay.smg$r_count_struct.smg$b_dev_parity"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define SMG$C_ATTRIBUTE_INFO_BLOCK 36 /* Length of table in bytes */ #ifndef __SMGDEF_UPCASE_LOADED #define __SMGDEF_UPCASE_LOADED 1#ifndef __cplusplus"#pragma member_alignment __restore#pragma standard#include #pragma member_alignment __save#pragma nomember_alignment#p&ragma nostandard#endif /* __cplusplus */#include ##endif /* __SMGDEF_UPCASE_LOADED */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SMGDEF_LOADED */ ww[P/**/M/*******************************************&********************************/M/** **/M/** Copyright 2012, Hewlett-Packard Development Company, L.P. **/M/** **/M/** Confidential computer software. Valid license from HP and/or **/M/** its subsidiaries required for possession, use, or copying. **/M/** & **/M/** Consistent with FAR 12.211 and 12.212, Commercial Computer Software, **/M/** Computer Software Documentation, and Technical Data for Commercial **/M/** Items are licensed to the U.S. Government under vendor's standard **/M/** commercial license. **/M/** **/M/** Neither HP nor any of its subsidiaries shall be liable for technical **/M/** or editorial& errors or omissions contained herein. The information **/M/** in this document is provided "as is" without warranty of any kind and **/M/** is subject to change without notice. The warranties for HP products **/M/** are set forth in the express limited warranty statements accompanying **/M/** such products. Nothing herein should be construed as constituting an **/M/** additional warranty. **/M/** & **/M/***************************************************************************//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:54 by OpenVMS SDL EV3-3 */H/* Source: 30-DEC-1996 15:42:00 $1$DGA7304:[STARLET.LIS]SMGDEF.SDL;1 *//********************************************************************************************************************* &***********//*** MODULE $SMGDEF ***/!#pragma __member_alignment __save#pragma __nomember_alignmentN/* Definitions for RTL Screen Management Facility */N/* */N/* Input terminator codes */N/* */N#define SMG$K_TRM_NULL_CHAR 0 /* NUL */N&#define SMG$K_TRM_CTRLA 1 /* SOH */N#define SMG$K_TRM_CTRLB 2 /* STX */N#define SMG$K_TRM_CTRLC 3 /* ETX */N#define SMG$K_TRM_CTRLD 4 /* EOT */N#define SMG$K_TRM_CTRLE 5 /* ENQ */N#define SMG$K_TRM_CTRLF 6 /* ACK */N#define SMG$K_TRM_CTRLG 7 & /* BEL */N#define SMG$K_TRM_CTRLH 8 /* BS */N#define SMG$K_TRM_CTRLI 9 /* HT */N#define SMG$K_TRM_CTRLJ 10 /* LF */N#define SMG$K_TRM_CTRLK 11 /* VT */N#define SMG$K_TRM_CTRLL 12 /* FF */N#define SMG$K_TRM_CTRLM 13 /* CR & */N#define SMG$K_TRM_CTRLN 14 /* SO */N#define SMG$K_TRM_CTRLO 15 /* SI */N#define SMG$K_TRM_CTRLP 16 /* DLE */N#define SMG$K_TRM_CTRLQ 17 /* DC1 */N#define SMG$K_TRM_CTRLR 18 /* DC2 */N#define SMG$K_TRM_CTRLS 19 /* DC3 */&N#define SMG$K_TRM_CTRLT 20 /* DC4 */N#define SMG$K_TRM_CTRLU 21 /* NAK */N#define SMG$K_TRM_CTRLV 22 /* SYN */N#define SMG$K_TRM_CTRLW 23 /* ETB */N#define SMG$K_TRM_CTRLX 24 /* CAN */N#define SMG$K_TRM_CTRLY 25 /* EM */N#define SMG$K_TRM_CTRLZ &26 /* SUB */N#define SMG$K_TRM_ESCAPE 27 /* ESC */N#define SMG$K_TRM_FS 28 /* FS */N#define SMG$K_TRM_GS 29 /* GS */N#define SMG$K_TRM_RS 30 /* RS */N#define SMG$K_TRM_US 31 /* US */N#define SMG$K_TRM_SPACE 32 /* SP & */N#define SMG$K_TRM_EXCLAMATION_POINT 33 /* ! */N#define SMG$K_TRM_DOUBLE_QUOTE 34 /* " */N#define SMG$K_TRM_NUMBER_SIGN 35 /* # */N#define SMG$K_TRM_DOLLAR_SIGN 36 /* $ */N#define SMG$K_TRM_PERCENT_SIGN 37 /* % */N#define SMG$K_TRM_AMPERSAND 38 /* & &*/N#define SMG$K_TRM_QUOTE 39 /* ' */N#define SMG$K_TRM_LEFT_PAREN 40 /* ( */N#define SMG$K_TRM_RIGHT_PAREN 41 /* ) */N#define SMG$K_TRM_ASTERISK 42 /* * */N#define SMG$K_TRM_PLUS_SIGN 43 /* + */N#define SMG$K_TRM_COMMA_CHAR 44 /* , */N#define SMG$K_TRM_DASH& 45 /* - */N#define SMG$K_TRM_DOT 46 /* . */N#define SMG$K_TRM_SLASH 47 /* / */N#define SMG$K_TRM_ZERO 48 /* 0 */N#define SMG$K_TRM_ONE 49 /* 1 */N#define SMG$K_TRM_TWO 50 /* 2 */N#define SMG$K_TRM_THREE 51 /* 3 & */N#define SMG$K_TRM_FOUR 52 /* 4 */N#define SMG$K_TRM_FIVE 53 /* 5 */N#define SMG$K_TRM_SIX 54 /* 6 */N#define SMG$K_TRM_SEVEN 55 /* 7 */N#define SMG$K_TRM_EIGHT 56 /* 8 */N#define SMG$K_TRM_NINE 57 /* 9 & */N#define SMG$K_TRM_COLON 58 /* : */N#define SMG$K_TRM_SEMICOLON 59 /* ; */N#define SMG$K_TRM_LESS_THAN 60 /* < */N#define SMG$K_TRM_EQUAL 61 /* = */N#define SMG$K_TRM_GREATER_THAN 62 /* > */N#define SMG$K_TRM_QUESTION_MARK 63 /* ? */N#define SMG$K_TRM_AT&_SIGN 64 /* @ */N#define SMG$K_TRM_UPPERCASE_A 65 /* A */N#define SMG$K_TRM_UPPERCASE_B 66 /* B */N#define SMG$K_TRM_UPPERCASE_C 67 /* C */N#define SMG$K_TRM_UPPERCASE_D 68 /* D */N#define SMG$K_TRM_UPPERCASE_E 69 /* E */N#define SMG$K_TRM_UPPERCASE_F 70 /* F & */N#define SMG$K_TRM_UPPERCASE_G 71 /* G */N#define SMG$K_TRM_UPPERCASE_H 72 /* H */N#define SMG$K_TRM_UPPERCASE_I 73 /* I */N#define SMG$K_TRM_UPPERCASE_J 74 /* J */N#define SMG$K_TRM_UPPERCASE_K 75 /* K */N#define SMG$K_TRM_UPPERCASE_L 76 /* L & */N#define SMG$K_TRM_UPPERCASE_M 77 /* M */N#define SMG$K_TRM_UPPERCASE_N 78 /* N */N#define SMG$K_TRM_UPPERCASE_O 79 /* O */N#define SMG$K_TRM_UPPERCASE_P 80 /* P */N#define SMG$K_TRM_UPPERCASE_Q 81 /* Q */N#define SMG$K_TRM_UPPERCASE_R 82 /* R */N#define SMG$K_TRM_&UPPERCASE_S 83 /* S */N#define SMG$K_TRM_UPPERCASE_T 84 /* T */N#define SMG$K_TRM_UPPERCASE_U 85 /* U */N#define SMG$K_TRM_UPPERCASE_V 86 /* V */N#define SMG$K_TRM_UPPERCASE_W 87 /* W */N#define SMG$K_TRM_UPPERCASE_X 88 /* X */N#define SMG$K_TRM_UPPERCASE_Y 89 /* Y& */N#define SMG$K_TRM_UPPERCASE_Z 90 /* Z */N#define SMG$K_TRM_LEFT_BRACKET 91 /* [ */N#define SMG$K_TRM_BACKSLASH 92 /* \ */N#define SMG$K_TRM_RIGHT_BRACKET 93 /* ] */N#define SMG$K_TRM_CARET 94 /* ^ */N#define SMG$K_TRM_UNDERLINE 95 /* _ & */N#define SMG$K_TRM_GRAVE_ACCENT 96 /* ` */N#define SMG$K_TRM_LOWERCASE_A 97 /* a */N#define SMG$K_TRM_LOWERCASE_B 98 /* b */N#define SMG$K_TRM_LOWERCASE_C 99 /* c */N#define SMG$K_TRM_LOWERCASE_D 100 /* d */N#define SMG$K_TRM_LOWERCASE_E 101 /* e */N#define SMG$K_TR&M_LOWERCASE_F 102 /* f */N#define SMG$K_TRM_LOWERCASE_G 103 /* g */N#define SMG$K_TRM_LOWERCASE_H 104 /* h */N#define SMG$K_TRM_LOWERCASE_I 105 /* i */N#define SMG$K_TRM_LOWERCASE_J 106 /* j */N#define SMG$K_TRM_LOWERCASE_K 107 /* k */N#define SMG$K_TRM_LOWERCASE_L 108 /*& l */N#define SMG$K_TRM_LOWERCASE_M 109 /* m */N#define SMG$K_TRM_LOWERCASE_N 110 /* n */N#define SMG$K_TRM_LOWERCASE_O 111 /* o */N#define SMG$K_TRM_LOWERCASE_P 112 /* p */N#define SMG$K_TRM_LOWERCASE_Q 113 /* q */N#define SMG$K_TRM_LOWERCASE_R 114 /* r & */N#define SMG$K_TRM_LOWERCASE_S 115 /* s */N#define SMG$K_TRM_LOWERCASE_T 116 /* t */N#define SMG$K_TRM_LOWERCASE_U 117 /* u */N#define SMG$K_TRM_LOWERCASE_V 118 /* v */N#define SMG$K_TRM_LOWERCASE_W 119 /* w */N#define SMG$K_TRM_LOWERCASE_X 120 /* x */N#define SMG$K_&TRM_LOWERCASE_Y 121 /* y */N#define SMG$K_TRM_LOWERCASE_Z 122 /* z */N#define SMG$K_TRM_LEFT_BRACE 123 /* left curly brace */N#define SMG$K_TRM_VERTICAL_LINE 124 /* | */N#define SMG$K_TRM_RIGHT_BRACE 125 /* right curly brace */N#define SMG$K_TRM_TILDE 126 /* ~ */N#define SMG$K_TRM_DELETE 127 &/* DEL */N/* */N/* Synonyms for control characters */N/* */#define SMG$K_TRM_BS 8#define SMG$K_TRM_HT 9#define SMG$K_TRM_LF 10#define SMG$K_TRM_VT 11#define SMG$K_TRM_FF 12#define SMG$K_TRM_CR 13N/* ' */N/* Keypad keys */N/* */#define SMG$K_TRM_PF1 256#define SMG$K_TRM_PF2 257#define SMG$K_TRM_PF3 258#define SMG$K_TRM_PF4 259#define SMG$K_TRM_KP0 260#define SMG$K_TRM_KP1 261#define SMG$K_TRM_KP2 262#define SMG$K_TRM_KP3 263#define SMG$K_TRM_KP4 264#define SMG$K_TRM_KP5 265#define SMG$K_TRM_KP6 266#define SMG$K_TRM_KP7 267#def 'ine SMG$K_TRM_KP8 268#define SMG$K_TRM_KP9 269#define SMG$K_TRM_ENTER 270#define SMG$K_TRM_MINUS 271#define SMG$K_TRM_COMMA 272#define SMG$K_TRM_PERIOD 273N/* */N/* Cursor positioning keys */N/* */#define SMG$K_TRM_UP 274#define SMG$K_TRM_DOWN 275#define SMG$K_TRM_LEFT 276#define SMG$'K_TRM_RIGHT 277N/* */N/* Function keys */N/* */#define SMG$K_TRM_F1 281#define SMG$K_TRM_F2 282#define SMG$K_TRM_F3 283#define SMG$K_TRM_F4 284#define SMG$K_TRM_F5 285#define SMG$K_TRM_F6 286#define SMG$K_TRM_F7 287#define SMG$K_TRM_F8 288#define SMG$K_TRM_F9 289#define SMG$K_'TRM_F10 290#define SMG$K_TRM_F11 291#define SMG$K_TRM_F12 292#define SMG$K_TRM_F13 293#define SMG$K_TRM_F14 294#define SMG$K_TRM_F15 295#define SMG$K_TRM_F16 296#define SMG$K_TRM_F17 297#define SMG$K_TRM_F18 298#define SMG$K_TRM_F19 299#define SMG$K_TRM_F20 300N/* */N/* Synonyms for function keys */N/* ' */#define SMG$K_TRM_HELP 295#define SMG$K_TRM_DO 296N/* */N/* Editing keys */N/* */N#define SMG$K_TRM_E1 311 /* FIND */N#define SMG$K_TRM_E2 312 /* INSERT_HERE */N#define SMG$K_TRM_E3 313' /* REMOVE */N#define SMG$K_TRM_E4 314 /* SELECT */N#define SMG$K_TRM_E5 315 /* PREV_SCREEN */N#define SMG$K_TRM_E6 316 /* NEXT_SCREEN */N/* */N/* Synonyms for editing keys */N/* ' */N#define SMG$K_TRM_FIND 311 /* E1 */N#define SMG$K_TRM_INSERT_HERE 312 /* E2 */N#define SMG$K_TRM_REMOVE 313 /* E3 */N#define SMG$K_TRM_SELECT 314 /* E4 */N#define SMG$K_TRM_PREV_SCREEN 315 /* E5 */N#define SMG$K_TRM_NEXT_SCREEN 316 /* E6 '*/N/* */N/* Locator keys */N/* */N#define SMG$K_TRM_FIRST_DOWN 321 /* Left button down */N#define SMG$K_TRM_SECOND_DOWN 322 /* Middle button down */N#define SMG$K_TRM_THIRD_DOWN 323 /* Right button down */N#define SMG$K_TRM_FOUR'TH_DOWN 324 /* Fourth button down */N#define SMG$K_TRM_FIRST_UP 325 /* Left button up */N#define SMG$K_TRM_SECOND_UP 326 /* Middle button up */N#define SMG$K_TRM_THIRD_UP 327 /* Right button up */N#define SMG$K_TRM_FOURTH_UP 328 /* Fourth button up */N/* */N/* Conditions  ' */N/* */O#define SMG$K_TRM_CANCELLED 508 /* I/O cancelled by SMG$CANCEL_INPUT */N#define SMG$K_TRM_TIMEOUT 509 /* Timeout period expired */N#define SMG$K_TRM_BUFFER_FULL 510 /* Buffer is full */N#define SMG$K_TRM_UNKNOWN 511 /* Unknown terminator */N/* ' */N/* Screen Management request types - These constants are used internally */N/* by SMG$ and should not be used by users. */N/* */!#define SMG$C_CHANGE_RENDITION 10#define SMG$C_DELETE_CHARS 11#define SMG$C_ERASE_DISPLAY 12#define SMG$C_ERASE_LINE 13#define SMG$C_HOME_CURSOR 14#define SMG$C_INSERT_CHARS 15#define SMG$C_INSERT_LINE 16#define SMG$C_PUT_CHARS 17#define  'SMG$C_PUT_LINE 18$#define SMG$C_PUT_DISPLAY_ENCODED 19"#define SMG$C_RETURN_CURSOR_POS 20 #define SMG$C_PUT_WITH_SCROLL 21#define SMG$C_SET_CURSOR_ABS 22#define SMG$C_SET_CURSOR_REL 23#define SMG$C_DELETE_LINE 24#define SMG$C_ERASE_CHARS 25$#define SMG$C_SCROLL_DISPLAY_AREA 26'#define SMG$C_CHANGE_VIRTUAL_DISPLAY 27#define SMG$C_LABEL_BORDER 28##define SMG$C_END_DISPLAY_UPDATE 29#define SMG$C_MOVE_TEXT 30N/*  ' */J/* Character Set Codes */N/* */N#define SMG$C_UNITED_KINGDOM 0 /* Unused */N#define SMG$C_ASCII 1 /* ASCII char set */N#define SMG$C_SPEC_GRAPHICS 2 /* Line drawing set */N#define SMG$C_ALT_CHAR 3 /* Unused */N#define SMG$C_ALT_GRAP 'HICS 4 /* Unused */#define SMG$C_UNKNOWN 5#define SMG$C_SUPPLEMENTAL 6#define SMG$C_JIS_ROMAN 7#define SMG$C_JIS_KANA 8#define SMG$C_KANJI 9#define SMG$C_HANZI 10#define SMG$C_HANYU 11#define SMG$C_HANGUL 12#define SMG$C_KS_ROMAN 13N/* */I/* The following constants define corner cursor positions used in */I/* SMG$HOME_CURSOR. ' */N/* */N#define SMG$C_UPPER_LEFT 0 /* Home cursor to upper left corner */N#define SMG$C_LOWER_LEFT 1 /* Home cursor to lower left corner */O#define SMG$C_UPPER_RIGHT 2 /* Home cursor to upper right corner */O#define SMG$C_LOWER_RIGHT 3 /* Home cursor to lower right corner */N/* */I/*' The following constants define label positions used in */I/* SMG$LABEL_BORDER. */N/* */N#define SMG$K_TOP 0 /* Place label on top border */N#define SMG$K_BOTTOM 1 /* Place label on bottom border */N#define SMG$K_LEFT 2 /* Place label on left border */N#define SMG$K_RIGHT 3 ' /* Place label on right border */N/* */I/* The following constants define menu types used in */I/* SMG$CREATE_MENU. */N/* */N#define SMG$K_BLOCK 0 /* Matrix of menu items */N#define SMG$K_VERTICAL 1 /* Vertical vector of menu ite'ms */N#define SMG$K_HORIZONTAL 2 /* Horizontal vector of menu items */N/* */I/* Master color wheel for screen background colors. */I/* Used with SMG$CHANGE_PBD_CHARACTERISTICS. */N/* */N#define SMG$C_COLOR_UNKNOWN 0 /* Unknown background */N#define SMG$C_COLOR_WHIT'E 1 /* White background */N#define SMG$C_COLOR_BLACK 2 /* Black background */N#define SMG$C_COLOR_BLUE 3 /* Blue background */N#define SMG$C_COLOR_CYAN 4 /* Cyan background */N#define SMG$C_COLOR_GREEN 5 /* Green background */N#define SMG$C_COLOR_MAGENTA 6 /* Magenta background */N#define SMG$C_COLOR_RED 7 /* Red bac'kground */N#define SMG$C_COLOR_YELLOW 8 /* Yellow background */N#define SMG$C_COLOR_LIGHT 9 /* Light background */N#define SMG$C_COLOR_DARK 10 /* Dark background */N#define SMG$C_COLOR_USER1 11 /* User 1 background */N#define SMG$C_COLOR_USER2 12 /* User 2 background */N#define SMG$C_COLOR_USER3 13 /* User 3 background '*/N#define SMG$C_COLOR_USER4 14 /* User 4 background */N#define SMG$C_COLOR_USER5 15 /* User 5 background */N#define SMG$C_COLOR_USER6 16 /* User 6 background */N#define SMG$C_COLOR_USER7 17 /* User 7 background */N#define SMG$C_COLOR_USER8 18 /* User 8 background */N/* */N/* The following const'ants describe the type of terminal */N/* and are used with SMG$GET_PASTEBOARD_ATTRIBUTES. */N/* */N#define SMG$K_UNKNOWN 0 /* Unknown type */N#define SMG$K_VT05 1 /* Unused */N#define SMG$K_VT52 2 /* Unused */N#define SMG$K_VT100 3 /* Unuse'd */N#define SMG$K_VTFOREIGN 4 /* Foreign terminal (ft1-8) */N#define SMG$K_HARDCOPY 5 /* Hardcopy device */N#define SMG$K_VTTERMTABLE 6 /* Video terminal */N#define SMG$K_FIRST_PRIV_TYPE 191 /* Used internally by SMG$ */N/* */I/* Define bits, masks, and fields for the control modes. */'N/* */N#define SMG$K_BUF_ENABLED 0 /* Enable Buffering */N#define SMG$K_MINUPD 1 /* Enable minimal update */N#define SMG$K_CLEAR_SCREEN 2 /* Clear screen on exit */N#define SMG$K_NOTABS 3 /* Don't use physical tabs */N#define SMG$K_PROTECT 4 /* Protect against ASTs */N#define SMG$K_IGNORE 5 ' /* Don't output PBD if batched */N#define SMG$K_RELEASE_PBD 6 /* Don't touch users part of PBD */#define SMG$M_BUF_ENABLED 0x1#define SMG$M_MINUPD 0x2#define SMG$M_CLEAR_SCREEN 0x4#define SMG$M_NOTABS 0x8#define SMG$M_PROTECT 0x10#define SMG$M_IGNORE 0x20#define SMG$M_RELEASE_PBD 0x40 #define SMG$m_spare15 0xFFFFFF80struct SMGMODE_BITS {N unsigned SMG$V_BUF_ENABLED : 1; /* Enable buffering */N unsigned SMG$V_MINUPD : '1; /* Enable minimal update (default) */N unsigned SMG$V_CLEAR_SCREEN : 1; /* Clear screen on exit */N unsigned SMG$V_NOTABS : 1; /* Don't use physical tabs */N unsigned SMG$V_PROTECT : 1; /* Protect against ASTs */N unsigned SMG$V_IGNORE : 1; /* Don't output PBD if batched */N unsigned SMG$V_RELEASE_PBD : 1; /* Don't touch users part of PBD */N unsigned SMG$v_spare15 : 25; /* extra bits ' */ } ;N/* */I/* Key definition attributes */N/* */#define SMG$M_KEY_NOECHO 0x1#define SMG$M_KEY_TERMINATE 0x2#define SMG$M_KEY_LOCK 0x4#define SMG$M_KEY_PROTECTED 0x8#define SMG$M_KEY_SETSTATE 0x10 #define SMG$m_spare18 0xFFFFFFE0struct SMG$R_KEY_DEF_ATTR {N unsign'ed SMG$V_KEY_NOECHO : 1; /* Don't echo strings */N unsigned SMG$V_KEY_TERMINATE : 1; /* This key terminates read */N unsigned SMG$V_KEY_LOCK : 1; /* Lock new state */N unsigned SMG$V_KEY_PROTECTED : 1; /* Definition is protected */S unsigned SMG$V_KEY_SETSTATE : 1; /* Definition sets a state (output only) */N unsigned SMG$v_spare18 : 27; /* extra bits */ } ;N/* ' */N/* Define bit masks and values for display renditions. */N/* */#define SMG$M_BOLD 0x1#define SMG$M_REVERSE 0x2#define SMG$M_BLINK 0x4#define SMG$M_UNDERLINE 0x8#define SMG$M_INVISIBLE 0x10#define SMG$M_USER1 0x100#define SMG$M_USER2 0x200#define SMG$M_USER3 0x400#define SMG$M_USER4 0x800#define SMG$M_USER5 0x1000#define 'SMG$M_USER6 0x2000#define SMG$M_USER7 0x4000#define SMG$M_USER8 0x8000 #define SMG$m_spare14 0xFFFF0000struct SMGDEF_BITS {N unsigned SMG$V_BOLD : 1; /* Bold rendition */N unsigned SMG$V_REVERSE : 1; /* Reverse video rendition */N unsigned SMG$V_BLINK : 1; /* Blink rendition */N unsigned SMG$V_UNDERLINE : 1; /* Underline rendition */N unsigned SMG$V_INVISIBLE : 1; /* Invisible r'endition */N unsigned SMG$v_fill1 : 3; /* internally used by SMG$ */N unsigned SMG$V_USER1 : 1; /* User rendition 1 */N unsigned SMG$V_USER2 : 1; /* User rendition 2 */N unsigned SMG$V_USER3 : 1; /* User rendition 3 */N unsigned SMG$V_USER4 : 1; /* User rendition 4 */N unsigned SMG$V_USER5 : 1; /* User rendition 5 */N' unsigned SMG$V_USER6 : 1; /* User rendition 6 */N unsigned SMG$V_USER7 : 1; /* User rendition 7 */N unsigned SMG$V_USER8 : 1; /* User rendition 8 */N unsigned SMG$v_spare14 : 16; /* extra bits */ } ;N#define SMG$M_NORMAL 0 /* no bits set */N/* */I/* The following ' masks define values to be used */I/* to specify a display attribute. These may be added */I/* together to specify multiple attributes. */N/* */#define SMG$M_BORDER 0x1#define SMG$M_TRUNC_ICON 0x2"#define SMG$M_DISPLAY_CONTROLS 0x4#define SMG$M_USER_DISPLAY 0x8#define SMG$M_BLOCK_BORDER 0x10"#define SMG$M_PROTECT_DISPLAY 0x20 #define SMG$m_spare1!'2 0xFFFFFFC0struct DISPLAY_ATTRIBUTES {N unsigned SMG$V_BORDER : 1; /* Display is bordered */N unsigned SMG$V_TRUNC_ICON : 1; /* Truncation icon enabled */N unsigned SMG$V_DISPLAY_CONTROLS : 1; /* Display carriage controls */N unsigned SMG$V_USER_DISPLAY : 1; /* User display for DEBUG */N unsigned SMG$V_BLOCK_BORDER : 1; /* Display is block bordered */N unsigned SMG$V_PROTECT_DISPLAY : 1; /* Protect display aga "'inst ASTs */N unsigned SMG$v_spare12 : 26; /* extra bits */ } ;N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$CREATE_SUBPROCESS. */N/* */#define SMG$M_TRUSTED 0x1#define SMG$M_AUTHPRIV 0x2#define SMG$M_SUBSYSTEM 0x4 #'#define SMG$m_spare20 0xFFFFFFF8&struct SMG$R_CREATE_SUBPROCESS_FLAGS {N unsigned SMG$V_TRUSTED : 1; /* Set TRUSTED flag for LIB$SPAWN */N unsigned SMG$V_AUTHPRIV : 1; /* Set AUTHPRIV flag for LIB$SPAWN */N unsigned SMG$V_SUBSYSTEM : 1; /* Set SUBSYSTEM flag for LIB$SPAWN */N unsigned SMG$v_spare20 : 29; /* extra bits */ } ;N/* */I/* The following defin $'es bits used with subprocess manipulation. */N/* */#define SMG$M_DATA_FOLLOWS 0x1#define SMG$M_SEND_EOF 0x2#define SMG$M_NO_PRINT 0x4 #define SMG$m_spare11 0xFFFFFFF8struct SMG$R_SUBPROCESS_FLAGS {N unsigned SMG$V_DATA_FOLLOWS : 1; /* The next call specifies data. */S unsigned SMG$V_SEND_EOF : 1; /* Send an end-of-file to the subprocess */R unsigned SMG$V_NO_PRINT : 1; /* Do not %'output command to the display */N unsigned SMG$v_spare11 : 29; /* extra bits */ } ;N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$DELETE_PASTEBOARD. */N/* */#define SMG$M_ERASE_PBD 0x1 #define SMG$M_IGNORE_BATCHED 0x2 #defin &'e SMG$m_spare10 0xFFFFFFFCstruct SMG$R_DELETE_PBD_FLAGS {N unsigned SMG$V_ERASE_PBD : 1; /* Erase the pasteboard */N unsigned SMG$V_IGNORE_BATCHED : 1; /* Delete even if pbd is batched */N unsigned SMG$v_spare10 : 30; /* extra bits */ } ;N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$CREATE_PASTEBOARD. '' */N/* */#define SMG$M_KEEP_CONTENTS 0x1#define SMG$M_WORKSTATION 0x2#define SMG$m_spare9 0xFFFFFFFCstruct SMG$R_CREATE_PBD_FLAGS {N unsigned SMG$V_KEEP_CONTENTS : 1; /* Don't erase the pasteboard */O unsigned SMG$V_WORKSTATION : 1; /* Pasteboard is DECwindows terminal */N unsigned SMG$v_spare9 : 30; /* extra bits */ } ;N/* (' */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$READ_xxxx. */N/* */#define SMG$M_FUNC_KEYS 0x1#define SMG$M_NOKEEP 0x2#define SMG$M_NORECALL 0x4#define SMG$m_spare8 0xFFFFFFF8struct SMG$R_READ_FLAGS {N unsigned SMG$V_FUNC_KEYS : 1; /* Disable)' line-editting. */O unsigned SMG$V_NOKEEP : 1; /* Don't save input in recall buffer */P unsigned SMG$V_NORECALL : 1; /* Disable input recall for this call */N unsigned SMG$v_spare8 : 29; /* extra bits */ } ;N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$SET_CURSOR_MODE. *' */N/* */#define SMG$M_CURSOR_OFF 0x1#define SMG$M_CURSOR_ON 0x2#define SMG$M_SCROLL_JUMP 0x4#define SMG$M_SCROLL_SMOOTH 0x8 #define SMG$m_spare16 0xFFFFFFF0struct SMG$R_SET_CURSOR_FLAGS {N unsigned SMG$V_CURSOR_OFF : 1; /* Turn the physical cursor off */N unsigned SMG$V_CURSOR_ON : 1; /* Turn the physical cursor on */N unsigned SMG$V_SCROLL_JUMP : 1; /* Set jump scroll +' */N unsigned SMG$V_SCROLL_SMOOTH : 1; /* Set smooth scroll */N unsigned SMG$v_spare16 : 28; /* extra bits */ } ;N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$GET_DISPLAY_ATTR. */N/* */#defin ,'e SMG$M_VIEWPORT 0x1#define SMG$M_SUBPROCESS 0x2#define SMG$M_MENU 0x4#define SMG$m_spare7 0xFFFFFFF8 struct SMG$R_GET_DISPLAY_FLAGS {N unsigned SMG$V_VIEWPORT : 1; /* Display contains a viewport */N unsigned SMG$V_SUBPROCESS : 1; /* Display contains a subprocess */N unsigned SMG$V_MENU : 1; /* Display contains a menu */N unsigned SMG$v_spare7 : 29; /* extra bits */ } ;N/* -' */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$PUT_CHARS. */N/* */#define SMG$M_ERASE_LINE 0x1#define SMG$M_ERASE_TO_EOL 0x2#define SMG$m_spare6 0xFFFFFFFCstruct SMG$R_PUT_CHARS_FLAGS {N unsigned SMG$V_ERASE_LINE : 1; /* Erase the entire line */N unsigned SMG$V .'_ERASE_TO_EOL : 1; /* Erase from cursor to end of line */N unsigned SMG$v_spare6 : 30; /* extra bits */ } ;N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$MOVE_TEXT. */N/* */#define SMG$M_TEXT_SAVE 0x1#define SMG$ /'M_TEXT_ONLY 0x2 #define SMG$m_spare17 0xFFFFFFFCstruct SMG$R_MOVE_TEXT_FLAGS {N unsigned SMG$V_TEXT_SAVE : 1; /* Don't erase text after moving it */N unsigned SMG$V_TEXT_ONLY : 1; /* Don't move attributes */N unsigned SMG$v_spare17 : 30; /* extra bits */ } ;N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$PUT_PASTE 0'BOARD and SMG$SNAPSHOT. */N/* */#define SMG$M_FORM_FEED 0x1#define SMG$m_spare5 0xFFFFFFFEstruct SMG$R_SNAPSHOT_FLAGS {O unsigned SMG$V_FORM_FEED : 1; /* Output form feed before first row */N unsigned SMG$v_spare5 : 31; /* extra bits */ } ;N/* */I/* The following d 1'efines bits used with the FLAGS parameter for */I/* SMG$PUT_xxxx. */N/* */#define SMG$M_WRAP_CHAR 0x1#define SMG$M_WRAP_WORD 0x2#define SMG$m_spare4 0xFFFFFFFCstruct SMG$R_PUT_LINE_FLAGS {R unsigned SMG$V_WRAP_CHAR : 1; /* Do character wrapping at end of line */N unsigned SMG$V_WRAP_WORD : 1; /* Do word wrapping at end of line */N 2' unsigned SMG$v_spare4 : 30; /* extra bits */ } ;N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$SET_KEYPAD_MODE. */N/* */$#define SMG$M_KEYPAD_APPLICATION 0x1 #define SMG$M_KEYPAD_NUMERIC 0x2#define SMG$m_spare3 0xFFFFFFFC3'struct SMG$R_KEYPAD_MODES {N unsigned SMG$V_KEYPAD_APPLICATION : 1; /* Application keypad */N unsigned SMG$V_KEYPAD_NUMERIC : 1; /* Numeric keypad */N unsigned SMG$v_spare3 : 30; /* extra bits */ } ;N/* */I/* The following defines bits used with the FLAGS parameter for */I/* SMG$GET_PASTING_INFO. 4' */N/* */ #define SMG$M_DISPLAY_PASTED 0x1 #define SMG$m_spare19 0xFFFFFFFE!struct SMG$R_PASTING_INFO_FLAGS {N unsigned SMG$V_DISPLAY_PASTED : 1; /* Display is pasted */N unsigned SMG$v_spare19 : 31; /* extra bits */ } ;N/* */I/* The following defines bits used with menu manipulation. 5' */N/* */#define SMG$M_REMOVE_ITEM 0x1#define SMG$M_FIXED_FORMAT 0x2#define SMG$M_DOUBLE_SPACE 0x4#define SMG$M_RETURN_IMMED 0x8#define SMG$M_ERASE_MENU 0x10#define SMG$M_WIDE_MENU 0x20#define SMG$M_WRAP_MENU 0x40#define SMG$M_FULL_FIELD 0x80#define SMG$m_spare2 0xFFFFFF00struct SMG$R_MENU_FLAGS {N unsigned SMG$V_REMOVE_ITEM : 1; /* Only select item once */N unsigned SMG$V_FIX6'ED_FORMAT : 1; /* Use fixed size cols */N unsigned SMG$V_DOUBLE_SPACE : 1; /* Double space menu rows */N unsigned SMG$V_RETURN_IMMED : 1; /* Ret on non-arrow key */N unsigned SMG$V_ERASE_MENU : 1; /* Erase menu when deleting */N unsigned SMG$V_WIDE_MENU : 1; /* Wide menu items */N unsigned SMG$V_WRAP_MENU : 1; /* Wrap menu items top to bottom */N unsigned SMG$V_FULL_FIELD : 1; /* Highl 7'ight entire field */>/* SCROLL_BARS bitfield mask; /* Use scroll bar indicators */@/* MARK_ITEM bitfield mask; /* Use def rend for chosen items */N unsigned SMG$v_spare2 : 24; /* extra bits */ } ;N/* */I/* The following are used with SMG$PUT_LINE_xxxx, */I/* SMG$SCROLL_DISPLAY_AREA, and SMG$DRAW_CHAR. */N/* 8' */#define SMG$M_UP 0x1#define SMG$M_DOWN 0x2#define SMG$M_RIGHT 0x4#define SMG$M_LEFT 0x8#define SMG$m_spare1 0xFFFFFFF0struct SCROLL_DIRS {N unsigned SMG$V_UP : 1; /* Up */N unsigned SMG$V_DOWN : 1; /* Down */N unsigned SMG$V_RIGHT : 1; /* Right */N unsigned SMG$V_LEFT : 1; /* Left 9' */N unsigned SMG$v_spare1 : 28; /* extra bits */ } ;N/* */N/* Define data structures */N/* */N#define SMG$C_BAND_INFORMATION_TABLE 12 /* Length of table in bytes */N/* :' */N#define SMG$C_PASTEBOARD_INFO_BLOCK 36 /* Length of table in bytes */N/* */N#define SMG$C_KEYBOARD_INFO_BLOCK 36 /* Length of table in bytes */union SMGDEF {N/* */I/* When an out-of-band AST triggers, the user's AST routine */I/* will get called. The first argument passed to his */I/* routine;' is the address of a Band Information Table. */I/* The offsets into this table are described below. */I/* To make it easy to access from certain languages, */I/* the table is arranged so that it is convenient to */I/* reference it as a longword vector as well as a byte block. */N/* */ struct {N unsigned int SMG$L_PASTEBOARD_ID <'; /* Pasteboard ID */N unsigned int SMG$L_ARG; /* User's AST argument */ union {N unsigned char SMG$B_CHARACTER; /* The character typed */N unsigned int SMG$L_CHARACTER; /* The character and 3 spaces */& } SMG$R_CHARACTER_OVERLAY;' } SMG$R_BAND_INFORMATION_TABLE;I/* When SMG$GET_PASTEBOARD_ATTRIBUTES is called, */I/* it returns data in a pasteboard information blo ='ck. */I/* The following structure is used to reference fields */I/* in this block. */I/* Items marked with a plus (+) will be 0 unless the */I/* device is a terminal (DEVCLASS=DC$_TERM). */N/* */ struct {N unsigned int SMG$L_DEVCHAR; /* Device characteristics */N>' unsigned int SMG$L_DEVDEPEND; /* Specific characteristics (1) */N unsigned int SMG$L_DEVDEPEND2; /* Specific characteristics (2) */N unsigned char SMG$B_DEVCLASS; /* Device class (e.g. DC$_TERM) */N unsigned char SMG$B_SMG_DEVTYPE; /* Internal SMG device type */T unsigned char SMG$B_PHY_DEVTYPE; /* Physical device type (e.g. DT$_VT100) */N unsigned char SMG$B_ROWS; /* Number of rows on device */N unsigned sho?'rt int SMG$W_WIDTH; /* Terminal width */N unsigned char SMG$B_COLOR; /* PBD background color */N unsigned char SMG$B_PARITY; /* Parity attributes (+) */N unsigned short int SMG$W_SPEED; /* Terminal Speed (+) */N unsigned short int SMG$W_FILL; /* Fill characteristics (+) */O unsigned short int SMG$W_CURSOR_ROW; /* Row where physical cursor is */N/* (1-origin) @' */O unsigned short int SMG$W_CURSOR_COL; /* Col where physical cursor is */N/* (1-origin) */N unsigned int SMG$L_CURSOR_DID; /* Display id of topmost */N/* display that cursor is in. */N/* 0 if cursor is not in a */N/* virtual display A' */N unsigned int SMG$L_DEVDEPEND3; /* Specific characteristics (3) */& } SMG$R_PASTEBOARD_INFO_BLOCK;I/* When SMG$GET_KEYBOARD_ATTRIBUTES is called, */I/* it returns data in a keyboard information block. */I/* The following structure is used to reference fields */I/* in this block. */I/* Items marked with a plus (+) will be 0 unless the B' */I/* device is a terminal (DEVCLASS=DC$_TERM). */N/* */ struct {N unsigned int SMG$l_fill1; /* Device characteristics */N unsigned int SMG$l_fill2; /* Specific characteristics (1) */N unsigned int SMG$l_fill3; /* Specific characteristics (2) */N unsigned char SMG$b_fill4; /* Device class (e.g. DC$_TERM) */N C'unsigned char SMG$B_RECALL_SIZE; /* Size of recall buffer (+) */S unsigned char SMG$b_fill5; /* Physical device type (e.g. DT$_VT100) */T unsigned char SMG$B_TYPEAHEAD_CHAR; /* First char in typeahead buffer (+) */N unsigned short int SMG$w_fill6; /* Terminal width */_ unsigned short int SMG$W_TYPEAHEAD_COUNT; /* Number of chars in typeahead buffer (+) */! unsigned int SMG$l_fill7;! unsigned int SMG$l_fill8;! unsi D'gned int SMG$l_fill9;N unsigned int SMG$l_fill10; /* Device characteristics 3 */$ } SMG$R_KEYBOARD_INFO_BLOCK; } ;N/* */N/* Define the out-of-band information table used when an out-of-band */N/* AST routine is called as it's own record. */N/* */ struct SMG$R_OUT_OF_BAND_TABLE {N E' unsigned int SMG$L_PBD_ID; /* Pasteboard ID */N unsigned int SMG$L_USER_ARG; /* User's AST argument */ union {N unsigned char SMG$B_CHAR; /* The character typed */N unsigned int SMG$L_CHAR; /* The character and 3 spaces */ } SMG$R_CHAR_OVERLAY; } ;N#define SMG$C_OUT_OF_BAND_TABLE 12 /* Length of table in bytes */N/* F' */N/* Define the subprocess information table used when a subprocess */N/* AST routine is called as it's own record. */N/* */$struct SMG$R_SUBPROCESS_INFO_TABLE {N unsigned int SMG$L_DISP_ID; /* Display ID */N unsigned int SMG$L_USR_ARG; /* User's AST argument */N unsigned int SMG$L_STATUS; G' /* Status of executed command */ } ;N#define SMG$C_SUBPROCESS_INFO_TABLE 12 /* Length of table in bytes */N/* */N/* Define an information table that can be used by both */N/* SMG$GET_PASTEBOARD_ATTRIBUTES and SMG$GET_KEYBOARD_ATTRIBUTES */N/* as it's own record. */N/* H' */#struct SMG$R_ATTRIBUTE_INFO_BLOCK {N unsigned int SMG$L_DEV_CHAR; /* Device characteristics */N unsigned int SMG$L_DEV_DEPEND; /* Specific characteristics (1) */N unsigned int SMG$L_DEV_DEPEND2; /* Specific characteristics (2) */N unsigned char SMG$B_DEV_CLASS; /* Device class (e.g. DC$_TERM) */ union {N unsigned char SMG$B_PBD_TYPE; /* Internal SMG device type */N unsigned char SMG$B_ I'RECALL_NUM; /* Size of recall buffer (+) */ } SMG$R_DEV_OVERLAY;S unsigned char SMG$B_DEV_TYPE; /* Physical device type (e.g. DT$_VT100) */ union {N unsigned char SMG$B_NUM_ROWS; /* Number of rows on device */R unsigned char SMG$B_TYPEAHD_CHAR; /* First char in typeahead buffer (+) */ } SMG$R_ROW_OVERLAY;N unsigned short int SMG$W_NUM_COLUMNS; /* Terminal width */ union {[ unsigned short int SMG$W_TYP J'EAHD_CNT; /* Number of chars in typeahead buffer (+) */ struct {N unsigned char SMG$B_PBD_COLOR; /* PBD background color */N unsigned char SMG$B_DEV_PARITY; /* Parity attributes (+) */! } SMG$R_COUNT_STRUCT; } SMG$R_COUNT_OVERLAY;N unsigned short int SMG$W_DEV_SPEED; /* Terminal Speed (+) */N unsigned short int SMG$W_DEV_FILL; /* Fill characteristics (+) */P unsigned short int SMG$W_PHYS_CURSOR K'_ROW; /* Row where physical cursor is */P unsigned short int SMG$W_PHYS_CURSOR_COL; /* Col where physical cursor is */N unsigned int SMG$L_DISPLAY_ID; /* Display containing phy cursor */N unsigned int SMG$L_DEV_DEPEND3; /* Specific characteristics (3) */ } ;N#define SMG$C_ATTRIBUTE_INFO_BLOCK 36 /* Length of table in bytes */ #ifndef __SMGDEF_UPCASE_LOADED #define __SMGDEF_UPCASE_LOADED 1#ifndef __cplusplus"#pragma member_alignment __restore#praL'gma standard#include #pragma member_alignment __save#pragma nomember_alignment#pragma nostandard#endif /* __cplusplus */#include ##endif /* __SMGDEF_UPCASE_LOADED */ $#pragma __member_alignment __restorewwP/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $ M'1$DGA7304:[STARLET_H.SRC]SMGMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $SMGMSG ***/#ifndef __SMGMSG_LOADED#define __SMGMSG_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointN'er_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 !d O'efined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:57:54.69 */N/* */N/* FILE: SMGMSG.MSG EDIT: SL1035 */N/* */Q/* P'**************************************************************************** *//** * */M/** COPYRIGHT (C) 1978, 1980, 1982, 1984, 1985, 1986, 1987, 1994 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION O Q'F THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** R' * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/* */N/* */N/* 1-035 MODIFY THE TEXT FOR SEVERAL MESSAGES S'TO MATCH THE HELP TEXT, */I/* WHICH IS CORRECT. SL 28-SEP-1994 */N/* 1-034 ADD /MACRO=$SMGMSG FOR STARLETSD. TS 7-MAY-1986 */N/* 1-033 CHANGE WINTRUFIT TO WINTRUNCFIT JCW 18-MAR-1986 */N/* 1-032 ADD SUBPROCESS MESSAGES. TS 12-DEC-1985 */N/* 1-031 ADD VIEWPORT MESSAGES. JCW 21-NOV-1985 */N/* 1-030 ADD SMG$_GETDATSTR FOR USE IN HELP TEXT DISPLAY. TS 17-OCT-1985 T'*/N/* 1-029 ADD SMG$_NOTIMP - NOT IMPLEMENTED ERROR MESSAGE. JCW 2-JUL-1985 */L/* 1-028 ADD LINNOTFND AND EXPTOOCOM. TS 28-MAY-1985 */N/* 1-027 ADD DISREQ, LENNOTEQL, LENMUSONE FOR SMG$READ_VERIFY. */I/* ADD FILESPEC TO TERMTABLE COMPILER ERROR MESSAGES. TS 8-JAN-1985 */N/* 1-001 ORIGINAL. PLL 16-MAR-1983 */N/*- */N/*+ U' */N/* SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */N/* */I/* SMG$_ABCMNOXYZ */N/* */O/* IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */Q/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THV'REE WORDS OF THE ERROR */N/* MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS. */N/* */P/* THE NAMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD APPEAR */N/* IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION. */N/* */N/* MACRO-32 PROGRAMMING: W'*/N/* */N/* THE MACROS CALL: */N/* */I/* $SMGDEF */N/* */N/* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */N/* THE RUN-TIME LIBRARY DEX'CLARES THESE SYMBOLS AS EXTERNAL; */N/* THE MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER. */N/* */N/*- */N/* TEMPLATE FOR DOCUMENTING MESSAGES. */N/* EACH EXPLANATION FOLLOWS THE MESSAGE IT APPLIES TO AND */N/* IS FOLLOWED BY A BLANK LINE. Y' */N/* BE SURE NOT TO USE THE SEQUENCE "++" AFTER A "!" IN REGULAR COMMENTS */N/* AS THIS SEQUENCE BEGINS A DOCUMENTATION SEQUENCE AND CAN BE */N/* SEARCHED FOR IF AND WHEN THE PROCESS OF EXTRACTING THE */N/* DOCUMENTATION BECOMES AUTOMATED. */N/*++ */K/* FACILITY: SMG */NZ'/* EXPLANATION: X */N/* USER ACTION: Y */N/*-- */;/* ; SET LH TO 18 (DECIMAL). */#define SMG$_FACILITY 18#define SMG$_NORMAL 1212417N/*++ */K/* FACILITY: SMG [' */N/* EXPLANATION: NORMAL SUCCESSFUL COMPLETION. */N/* USER ACTION: NONE */N/*-- */#define SMG$_PREDEFREP 1212433N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A PREVIOUS KEY DEFINITION WAS REPLACED BY A NEW \' */B/* DEFINITION. */N/* USER ACTION: NONE */N/*-- */N/*+ */N/* THE NEXT THREE MESSAGES ARE USED BY THE "batching" */N/* PROCEDURES, SMG$BEGIN_DISPLAY_UPDATE AND SMG$END_DISPLAY_UPDATE. */N/* THE TEXT OF THE MESSA]'GES SHOULD CHANGE IF WE DECIDE NOT */N/* TO PUBLICLY USE THE TERM "batching". */N/*- */#define SMG$_BATSTIPRO 1212441N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A USER TRIED TO END BATCHING (UPDATING) WITH */B/* A CALL TO SMG$EN^'D_DISPLAY_UPDATE OR */B/* SMG$END_PASTEBOARD_UPDATE. THIS DID NOT */B/* TERMINATE BATCHING BECAUSE THERE WERE MORE CALLS */B/* MADE TO BEGIN BATCHING THAN TO END BATCHING. */N/* USER ACTION: NONE. SOME OUTER LEVEL ROUTINE PROBABLY STILL */B/* WANTS BATCHING TO BE IN EFFECT. */N/*-- */#define SMG$_BATWASOFF 121_'2449N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A PROGRAM TRIED TO TURN OFF BATCHING WHEN */B/* BATCHING WAS ALREADY OFF. */N/* USER ACTION: PROBABLY NONE. CHECK THAT THERE WAS ONE CALL */B/* TO TURN ON BATCHING FOR EACH CALL TO TURN IT OFF. */N/*-- `' */#define SMG$_BATWAS_ON 1212457N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A PROGRAM TRIED TO TURN ON BATCHING WHEN */B/* BATCHING WAS ALREADY ON. THIS IS NORMAL IN */B/* A MODULAR ENVIRONMENT. */N/* USER ACTION: NONE. CHECK THAT THERE WAS ONE CALL a' */B/* TO TURN ON BATCHING FOR EACH CALL TO TURN IT OFF. */N/*-- */#define SMG$_PASALREXI 1212465N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A USER TRIED TO CREATE A PASTEBOARD FOR A DEVICE, */B/* WHEN ONE WAS ALREADY CREATED. THIS IS NORMAL IN */B/* A b'MODULAR ENVIRONMENT. THE EXISTING PASTEBOARD ID */B/* IS RETURNED. */N/* USER ACTION: NONE. MAKE SURE YOU DON'T DELETE A PASTEBOARD */B/* THAT YOU ACTUALLY DIDN'T CREATE. */N/*-- */#define SMG$_NOT_A_TRM 1212473N/*++ */K/* FACILITY: SMG c' */N/* EXPLANATION: THIS IS AN INFORMATIONAL MESSAGE TELLING YOU THAT */B/* THE PASTEBOARD HAS BEEN CREATED, BUT THE OUTPUT */B/* DEVICE IS NOT A TERMINAL. */N/* USER ACTION: NONE. */N/*-- */#define SMG$_NO_MORMSG 1212481N/*++ d' */K/* FACILITY: SMG */N/* EXPLANATION: A CALL TO SMG$GET_BROADCAST_MESSAGE FOUND THAT */B/* THERE WERE NO MORE MESSAGES TO BE OBTAINED. */N/* USER ACTION: NONE. */N/*-- */#define SMG$_WILUSERMS 1212489N/*++ e' */K/* FACILITY: SMG */N/* EXPLANATION: NORMALLY THE SCREEN IS UPDATED AT THE END OF */B/* EVERY OUTPUT OPERATION. IF, HOWEVER, THE 'DEVICE' */B/* IS ACTUALLY A FILE OR AN UNKNOWN TERMINAL, THEN */B/* THIS MESSAGE IS GIVEN AT THE TIME OUTPUT WOULD */B/* HAVE BEEN SENT TO THE SCREEN. */N/* USER ACTION: NONE f' */N/*-- */#define SMG$_NOTRMSOUT 1212497N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: SMG$SNAPSHOT IS USED WITH FILES AND UNKNOWN DEVICES */B/* TO CAPTURE THE CONTENTS OF THE PASTEBOARD AT VARIOUS */B/* TIMES. IF SMG$SNAPSHOT IS CALLED FOR A PASTEBOARD */Bg'/* ASSOCIATED WITH A VIDEO TERMINAL, THEN IT TAKES NO */B/* ACTION AND RETURNS THIS INFORMATIONAL MESSAGE. */N/* USER ACTION: NONE */N/*-- */#define SMG$_NO_CHADIS 1212505N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE h'REQUESTED NUMBER OF COLUMNS TO CHANGE WAS ZERO, */B/* SO NOTHING IN THE VIRTUAL DISPLAY WAS CHANGED. */N/* USER ACTION: NONE */N/*-- */#define SMG$_PRISECMAP 1212513N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE REQUESTEi'D TERMINAL DEFINITION WAS FOUND IN */B/* THE CALLER'S PRIVATE COPY OF TERMTABLE. */N/* USER ACTION: NONE */N/*-- */#define SMG$_GBLSECMAP 1212521N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE REQUESTED TERMINj'AL DEFINITION WAS FOUND IN */B/* THE SYSTEM TERMTABLE. (REQUESTED TERMINAL DEFINITION */B/* DID NOT EXIST IN THE CALLER'S PRIVATE TERMTABLE.) */N/* USER ACTION: NONE */N/*-- */ #define SMG$_WINTRUNCFIT 1212529N/*++ */K/* FACILITY: SMG k' */N/* EXPLANATION: THE VIEWPORT SPECIFICATION WILL NOT FIT WHOLLY WITHIN */B/* THE VIRTUAL DISPLAY. THE VIEWPORT HAS BEEN TRUNCATED */B/* TO FIT WITHIN THE VIRTUAL DISPLAY. */N/* USER ACTION: NONE */N/*-- */#define SMG$_SUBALREXI 1212537N/*++ l' */K/* FACILITY: SMG */N/* EXPLANATION: A USER TRIED TO CREATE A SUBPROCESS FOR A VIRTUAL */B/* DISPLAY, WHEN ONE WAS ALREADY CREATED. THIS IS NORMAL */B/* IN A MODULAR ENVIRONMENT. */N/* USER ACTION: NONE. */N/*-- */#define SMG$_NONBRDMSG 1212545N/*++ m' */K/* FACILITY: SMG */N/* EXPLANATION: A CALL TO SMG$GET_BROADCAST_MESSAGE FOUND THAT */B/* THERE WAS A NON-BROADCAST MESSAGE TO BE OBTAINED. */N/* USER ACTION: NONE. */N/*-- */#define SMG$_FATERRLIB 1212932N/*++ n' */K/* FACILITY: SMG */N/* EXPLANATION: AN INTERNAL ERROR HAS OCCURRED WITHIN SMG. */N/* USER ACTION: CONTACT A DIGITAL SUPPORT REPRESENTATIVE. */N/*-- */#define SMG$_INVARG 1212940N/*++ */K/* FACILITY: SMG o' */N/* EXPLANATION: THE VALUE OF SOME ARGUMENT IS NOT IN THE CORRECT RANGE. */N/* USER ACTION: EXAMINE EACH ARGUMENT. DETERMINE WHICH ONE IS */B/* OUT OF RANGE AND CORRECT YOUR PROGRAM. */N/*-- */#define SMG$_INVCOL 1212948N/*++ */K/* FACILITY: SMG p' */N/* EXPLANATION: AN INVALID COLUMN NUMBER WAS SPECIFIED. IT WAS EITHER */B/* LESS THAN 0 OR LARGER THAN THE NUMBER OF COLUMNS */B/* IN THE VIRTUAL DISPLAY. */N/* USER ACTION: SPECIFY A VALID COLUMN NUMBER. COLUMNS ARE NUMBERED */B/* BEGINNING WITH 1. */N/*-- */#define SMG$q'_INVDIS_ID 1212956N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN INVALID DISPLAY-ID WAS SPECIFIED. */N/* USER ACTION: CHECK THAT YOU ARE PASSING THE DISPLAY ID BY REFERENCE */B/* NOT BY VALUE. ENSURE THAT THE DISPLAY ID WAS */B/* PREVIOUSLY SET UP BY A CALL TO SMG$CREATE_VIRTUAL_DISPLAY. */N/*-- r' */#define SMG$_INVPAS_ID 1212964N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN INVALID PASTEBOARD ID WAS SPECIFIED. */N/* USER ACTION: CHECK THAT YOU ARE PASSING THE PASTEBOARD ID BY REFERENCE */B/* NOT BY VALUE. (A REFERENCE TO A 0 IS VALID, SINCE 0 */B/* IS A LEGAL PASTEBOARD ID.) ENSURE TH s'AT THE PASTEBOARD */B/* WAS PREVIOUSLY SET UP BY A CALL TO */B/* SMG$CREATE_PASTEBOARD AND THAT THE PASTEBOARD HAS NOT */B/* BEEN DELETED. */N/*-- */#define SMG$_INVROW 1212972N/*++ */K/* FACILITY: SMG */N/* EXPt'LANATION: AN INVALID ROW NUMBER WAS SPECIFIED. IT WAS EITHER */B/* LESS THAN 0 OR LARGER THAN THE NUMBER OF ROWS */B/* IN THE VIRTUAL DISPLAY. */N/* USER ACTION: SPECIFY A VALID ROW NUMBER. ROWS ARE NUMBERED */B/* BEGINNING WITH 1. */N/*-- */#define SMG$_DSPIN_USE 1212980N/*++ u' */K/* FACILITY: SMG */N/* EXPLANATION: THE OPERATION YOU HAVE TRIED TO PERFORM IS NOT */B/* LEGAL WHILE OUTPUT TO THE VIRTUAL DISPLAY IS BEING ACTIVE. */B/* FOR EXAMPLE, YOU CAN'T OUTPUT TEXT TO A DISPLAY IN AN AST */B/* ROUTINE THAT INTERRUPTED A SMG$ CALL ON THE SAME DISPLAY. */N/* USER ACTION: SYNCRONIZE YOUR CALLS TO SMG$ TO PREVENT MULTIPLE UPDATES */B/* TO THE SAME VIRTv'UAL DISPLAY AT THE SAME TIME. */N/*-- */#define SMG$_TOOMANPAS 1212988N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN INTERNAL LIMIT ON THE NUMBER OF PASTEBOARDS */B/* THAT YOUR PROGRAM MAY HAVE HAS BEEN EXCEEDED. */B/* THE LIMIT IS CURRENTLY 31. w' */N/* USER ACTION: USE FEWER PASTEBOARDS. */N/*-- */#define SMG$_WRONUMARG 1212996N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN SMG ROUTINE WAS CALLED WITH TOO FEW ARGUMENTS */B/* (LESS THAN THE NUMBER OF REQUIRED ARGUMENTS) x' */B/* OR TOO MANY ARGUMENTS. */N/* USER ACTION: CORRECT THE CODE TO CALL THE ROUTINE WITH */B/* THE PROPER NUMBER OF ARGUMENTS. */N/*-- */#define SMG$_INVKBD_ID 1213004N/*++ */K/* FACILITY: SMG */Ny'/* EXPLANATION: AN INVALID KEYBOARD ID WAS PASSED. */N/* USER ACTION: CHECK THAT YOU ARE PASSING THE KEYBOARD ID BY REFERENCE */B/* NOT BY VALUE. ENSURE THAT THE KEYBOARD ID WAS */B/* PREVIOUSLY SET UP BY A CALL TO */B/* SMG$CREATE_VIRTUAL_KEYBOARD. */N/*-- */#define SMG$_INVKTB_ID 1213012N/*++ z' */K/* FACILITY: SMG */N/* EXPLANATION: AN INVALID KEY TABLE ID WAS PASSED. */N/* USER ACTION: CHECK THAT YOU ARE PASSING THE KEY TABLE ID BY REFERENCE */B/* NOT BY VALUE. ENSURE THAT THE KEY TABLE ID WAS */B/* PREVIOUSLY SET UP BY A CALL TO */B/* SMG$CREATE_KEY_TABLE. */N/*-- {' */#define SMG$_INVMAXLEN 1213020N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE MAXIMUM LENGTH SPECIFIED FOR AN INPUT STRING */B/* WAS TOO LONG. */N/* USER ACTION: CORRECT YOUR PROGRAM SO THAT IT REQUESTS AN INPUT */B/* STRING OF 512 CHAR|'ACTERS OR LESS. */N/*-- */#define SMG$_FILTOOLON 1213028N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE LENGTH OF THE SPECIFIED STRING */B/* WAS TOO LONG. */N/* USER ACTION: CORRECT YOUR PROGRAM SO TH}'AT IT REQUESTS A FILE */B/* NAME OF 255 CHARACTERS OR LESS. */N/*-- */#define SMG$_PROTOOLON 1213036N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE LENGTH OF A PROMPT STRING EXCEEDED 512 CHARACTERS. */N/* USER ACTION: SHORTEN THE PROMPT TO 512 CHARACTE~'RS OR LESS. */N/*-- */#define SMG$_NOTPASTED 1213044N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN ATTEMPT WAS MADE TO UNPASTE OR MOVE A DISPLAY */B/* THAT WAS NOT PASTED TO THE SPECIFIED PASTEBOARD. */N/* USER ACTION: CHECK THAT YOU ARE REFERENCING THE CORRECT' VIRTUAL */B/* DISPLAY. VERIFY THAT THE DISPLAY HAS NOT BEEN */B/* UNPASTED OR THAT YOU FORGOT TO PASTE IT. */N/*-- */#define SMG$_PBDIN_USE 1213052N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE OPERATION YOU HAVE TRIED TO PERFORM IS NOT */'B/* LEGAL WHILE OUTPUT TO THE PASTEBOARD IS BEING BATCHED. */B/* FOR EXAMPLE, YOU CAN'T CHANGE THE PASTEBOARD */B/* CHARACTERISTICS WHILE THE PASTEBOARD IS BATCHED. */N/* USER ACTION: TURN OFF PASTEBOARD BATCHING BEFORE ATTEMPTING THE */B/* OPERATION. YOU MAY TURN BATCHING ON AGAIN AFTER THE */B/* OPERATION. */N/*-- */#def'ine SMG$_INVWIDARG 1213060N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN ATTEMPT WAS MADE TO CHANGE THE CHARACTERISTICS */B/* OF THE TERMINAL, SETTING ITS WIDTH TO 0. */N/* USER ACTION: CORRECT THE CODE. A WIDTH OF 0 IS ILLEGAL. */N/*-- */#define SMG$'_INVPAGARG 1213068N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN ATTEMPT WAS MADE TO CHANGE THE CHARACTERISTICS */B/* OF THE TERMINAL, SETTING ITS HEIGHT (PAGE SIZE) TO 0. */N/* USER ACTION: CORRECT THE CODE. A HEIGHT OF 0 IS ILLEGAL. */N/*-- */#define SMG$_INVCOLA'RG 1213076N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN ATTEMPT WAS MADE TO CHANGE THE CHARACTERISTICS */B/* OF THE TERMINAL, CHANGING ITS BACKGROUND COLOR */B/* TO A VALUE THAT WAS NOT LEGAL. */N/* USER ACTION: CHECK THE SYMBOLIC NAME FOR THE BACKGROUND COLOR */B/* DESIRED. SPECIFY IT CORRECTLY. ' */N/*-- */#define SMG$_DIALINNOT 1213084N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE VERTICES SPECIFIED WILL RESULT IN A DIAGONAL LINE, */B/* RATHER THAN A VERTICAL OR HORIZONTAL LINE. */N/* USER ACTION: RE-SPECIFY THE VERTICES SO THAT THE LINE DRA 'WN WILL BE */B/* VERTICAL OR HORIZONTAL. */N/*-- */#define SMG$_TABID_MIS 1213092N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE TERMTABLE INTERNAL CONSISTENCY CHECK FAILED. THE */B/* ROUTINES WHICH FETCH INFORMATION FROM TERMTABLE HAVE */B'/* A DIFFERENT VERSION NUMBER THAN THE TERMTABLE DATA. */N/* USER ACTION: PROBABLY THE ROUTINES WHICH FETCH THE DATA ARE NEWER */B/* THAN YOUR TERMTABLE.EXE. RE-COMPILE TERMTABLE.TXT TO */B/* UPDATE YOUR TERMTABLE.EXE. */N/*-- */#define SMG$_UNDTERNAM 1213100N/*++ */K/* FACILITY: SMG ' */N/* EXPLANATION: THE REQUESTED TERMINAL DEFINITION WAS NOT FOUND IN */B/* THE CALLER'S PRIVATE COPY OF TERMTABLE OR THE SYSTEM */B/* COPY OF TERMTABLE. */N/* USER ACTION: IF YOU INTENDED TO USE A PRIVATE TERMINAL DEFINITION, */B/* MAKE SURE THAT TERMTABLE.EXE EXISTS IN YOUR PRIVATE */B/* DIRECTORY AND THAT THE LOGICAL NAME TERM$TABLOC POINTS */B/* TO IT. IF YOU EXPECTE'D YOUR TERMINAL TO BE DEFINED IN */B/* THE SYSTEM TERMTABLE, CHECK WITH YOUR SYSTEM MANAGER. */N/*-- */#define SMG$_INVTERTAB 1213108N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN INVALID TERMINAL TABLE ADDRESS WAS SPECIFIED. */N/* USER ACTION: CHECK THAT YOU ARE PASSING THE' TERMINAL TABLE ARGUMENT */B/* BY REFERENCE AND NOT BY VALUE. MAKE SURE THE TERMINAL */B/* TABLE ADDRESS WAS ACQUIRED BY CALLING */B/* SMG$INIT_TERM_TABLE. */N/*-- */#define SMG$_INVREQCOD 1213116N/*++ */K/* FACILITY: SMG */'N/* EXPLANATION: DATA IS REQUESTED FROM TERMTABLE VIA REQUEST CODES */A/* WHICH ARE AVAILABLE AS SYMBOLIC NAMES. THE CODE YOU */B/* HAVE SPECIFIED IS INVALID. */N/* USER ACTION: CHECK THE SPELLING OF THE SYMBOLIC NAME YOU ARE USING. */N/*-- */#define SMG$_NOTBOOCAP 1213124N/*++ */K/* FACILITY: SMG' (TERMTABLE COMPILER) */N/* EXPLANATION: THE TERMTABLE COMPILER EXPECTED A BOOLEAN CAPABILITY */B/* NAME BUT ENCOUNTERED SOMETHING ELSE. */N/* USER ACTION: CHECK YOUR TERMINAL DEFINITION. PERHAPS YOU HAVE */B/* MISSPELLED THE BOOLEAN CAPABILITY NAME OR OMITTED */B/* ANOTHER STATEMENT SUCH AS STRING OR NUMERIC WHICH */B/* WOULD HAVE TERMINATED BOOLEAN CAPABILITIES. */N/*-- ' */#define SMG$_SYNERR 1213132N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: THE TERMTABLE COMPILER ENCOUNTERED AN INVALID */B/* SYNTAX. FOR INSTANCE, THERE MAY BE A MISPLACED OR */B/* MISSING EQUALS SIGN. */N/* USER ACTION: CHECK YOUR TERMINA'L DEFINITION. */N/*-- */#define SMG$_UNDTERTYP 1213140N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE DEFINITION FOR THE REQUESTED TERMINAL TYPE WAS */B/* NOT FOUND IN THE CALLER'S PRIVATE COPY OF TERMTABLE */B/* OR THE SYSTEM TERMTABLE. ' */N/* USER ACTION: IF YOU INTENDED TO USE A PRIVATE DEFINITION, MAKE */B/* SURE THAT TERMTABLE.EXE EXISTS IN YOUR PRIVATE DIRECTORY */B/* AND THAT THE LOGICAL NAME TERM$TABLOC POINTS TO IT. */B/* IF YOU EXPECTED YOUR TERMINAL DEFINITION TO EXIST IN */B/* THE SYSTEM TERMTABLE, CONSULT YOUR SYSTEM MANAGER. */N/*-- */#define SMG$_MISTERNAM 1213148N/*++ ' */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: CAPABILITIES WERE NOT PRECEEDED BY THE NAME OF A */B/* TERMINAL. */N/* USER ACTION: CHECK YOUR TERMINAL DEFINITIONS. MAKE SURE THAT */B/* EACH DEFINITION STARTS WITH NAME = . */N/*-- ' */#define SMG$_EXPTOOCOM 1213156N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: THE SPECIFIED EXPRESSION WAS */B/* TOO COMPLEX FOR THE TERMTABLE COMPILER TO PARSE. */N/* USER ACTION: CORRECT YOUR CAPABILITY SO THAT IT IS LESS COMPLEX. */N/*-- '*/#define SMG$_ILLVAL 1213164N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: A BOOLEAN CAPABILITY WAS GIVEN A VALUE OTHER THAN */B/* 0 OR 1. */N/* USER ACTION: CHECK YOUR TERMINAL DEFINITIONS. BOOLEAN CAPABILITIES */B/* MUST BE 0 OR 1 (OFF OR ON, RESPECTIVELY). */N/*-- ' */#define SMG$_INVEXP 1213172N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: THE TERMTABLE COMPILER ENCOUNTERED AN INVALID */B/* ARITHMETIC EXPRESSION. */N/* USER ACTION: CHECK YOUR DEFINITION. MAKE SURE THAT YOU HAVE */B/* USED ONLY VALID OPERATOR'S AND OPERANDS IN YOUR */B/* EXPRESSIONS. */N/*-- */#define SMG$_ERRAT_LIN 1213180N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: GENERAL INFORMATION MESSAGE INCLUDED WITH MANY */B/* TERMTABLE COMPILER MESSAGES. ATTEMPTS TO ID'ENTIFY */B/* SPECIFICALLY WHERE AN ERROR OCCURRED. */N/* USER ACTION: CHECK THE SPECIFIED LINE IN YOUR DEFINITION. */N/*-- */#define SMG$_ERRLIN 1213188N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: GENERAL INFORMATION MESSAGE INCLUDED WITH MANY ' */B/* TERMTABLE COMPILER MESSAGES. ATTEMPTS TO IDENTIFY */B/* SPECIFICALLY WHICH LINE CONTAINED AN ERROR. */N/* USER ACTION: CHECK THE SPECIFIED LINE IN YOUR DEFINITION. */N/*-- */#define SMG$_UNDTERNOP 1213196N/*++ */K/* FACILITY: SMG */N/* EXPLANA'TION: THE REQUESTED TERMINAL DEFINITION WAS NOT FOUND IN THE */B/* CALLER'S PRIVATE COPY OF TERMTABLE OR THE SYSTEM */B/* TERMTABLE. THE CALLER'S PRIVATE TERMTABLE COULDN'T BE */B/* BE ACCESSED, EITHER BECAUSE IT DIDN'T EXIST OR BECAUSE */B/* RMS COULD NOT OPEN THE FILE. */N/* USER ACTION: IF YOU INTENDED TO USE A DEFINITION FROM YOUR PRIVATE */B/* TERMTABLE, MAKE SURE THAT TERMTABLE.EXE EXISTS IN YOUR */B/* PRIVATE DIRE'CTORY AND THAT THE LOGICAL NAME TERM$TABLOC */B/* POINTS TO IT. MAKE SURE THAT YOU HAVE READ ACCESS TO */B/* THE FILE. */N/*-- */#define SMG$_UNDTERNOS 1213204N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE REQUESTED TERMINAL DEFINITIO 'N WAS NOT FOUND IN */B/* THE CALLER'S PRIVATE TERMTABLE OR THE SYSTEM TERMTABLE. */B/* THE SYSTEM TERMTABLE WAS UNAVAILABLE. */N/* USER ACTION: THE SYSTEM TERMTABLE SHOULD BE MAPPED AS A GLOBAL */B/* SECTION AND THEREFORE SHOULD ALWAYS BE AVAILABLE. */B/* CONSULT YOUR SYSTEM MANAGER REGARDING THIS. */N/*-- */#define SMG$_MISFILSPE 1213212N/*++ ' */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: THE REQUIRE STATEMENT NEEDS A FILE NAME IN ORDER TO */B/* LOCATE EXTERNAL DEFINITIONS WHICH SHOULD BECOME PART */B/* OF YOUR TERMTABLE. */N/* USER ACTION: CHECK YOUR TERMTABLE.TXT. ADD A FILE NAME TO THE */B/* REQUIRE STATEMENT. ' */N/*-- */#define SMG$_UNRECSTA 1213220N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: THE TERMTABLE COMPILER ENCOUNTERED A STATEMENT THAT */B/* IT DOES NOT RECOGNIZE. */N/* USER ACTION: CHECK YOUR DEFINITION. MAKE SURE YOU HAVE SPELLED */B/*' KEYWORDS CORRECTLY AND THAT STATEMENTS APPEAR ONLY */B/* IN VALID SEQUENCES. */N/*-- */#define SMG$_FAIOPEFIL 1213228N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: THE TERMTABLE COMPILER COULD NOT OPEN THE FILE */B/* SPECIFIED IN A REQ'UIRE. */N/* USER ACTION: MAKE SURE THAT THE SPECIFIED FILE EXISTS AND THAT */B/* YOU HAVE READ ACCESS TO IT. */N/*-- */#define SMG$_NO_ARGS 1213236N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: YOU REQUESTED A CAPABILITY T'HAT REQUIRES USER */B/* ARGUMENTS (SUCH AS A ROW AND COLUMN NUMBER) BUT */B/* DID NOT PROVIDE ANY. */N/* USER ACTION: CHECK THE NUMBER OF ARGUMENTS REQUIRED BY THIS */B/* CAPABILITY AND CORRECT YOUR CALL TO SMG$GET_TERM_DATA. */N/*-- */#define SMG$_NOTNUMCAP 1213244N/*++ ' */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: THE TERMTABLE COMPILER EXPECTED A NUMERIC CAPABILITY */B/* NAME BUT ENCOUNTERED SOMETHING ELSE. */N/* USER ACTION: CHECK YOUR TERMINAL DEFINITION. PERHAPS YOU HAVE */B/* MISSPELLED THE NUMERIC CAPABILITY NAME OR OMITTED */B/* ANOTHER STATEMENT SUCH AS STRING OR BOOLEAN WHICH */B/* WOULD HAVE TERMINATED NUMERIC CAPABILITIES. ' */N/*-- */#define SMG$_NOTSTRCAP 1213252N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: THE TERMTABLE COMPILER EXPECTED A STRING CAPABILITY */B/* NAME BUT ENCOUNTERED SOMETHING ELSE. */N/* USER ACTION: CHECK YOUR TERMINAL DEFINITION. PERHAPS YOU HAVE */'B/* MISSPELLED THE STRING CAPABILITY NAME OR OMITTED */B/* ANOTHER STATEMENT SUCH AS BOOLEAN OR NUMERIC WHICH */B/* WOULD HAVE TERMINATED STRING CAPABILITIES. */N/*-- */#define SMG$_MISENDSTA 1213260N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: THE TERMTABLE 'COMPILER EXPECTED AN END STATEMENT */B/* TO TERMINATE THE CURRENT TERMINAL DEFINITION AND */B/* THIS END STATEMENT WAS MISSING. */N/* USER ACTION: CHECK YOUR TERMINAL DEFINITIONS. */N/*-- */#define SMG$_MISNAMREQ 1213268N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) ' */N/* EXPLANATION: THE TERMTABLE COMPILER EXPECTED TERMTABLE.TXT TO */B/* BEGIN WITH A TERMINAL DEFINITION (NAME STATEMENT) */B/* OR A REQUIRE. SOMETHING ELSE WAS ENCOUNTERED. */N/* USER ACTION: CHECK YOUR TERMTABLE.TXT. */N/*-- */#define SMG$_ILLBATFNC 1213276N/*++ ' */K/* FACILITY: SMG */N/* EXPLANATION: AN ATTEMPT WAS MADE TO PERFORM AN OPERATION THAT */B/* IS NOT PERMITTED WHILE A VIRTUAL DISPLAY IS BEING */B/* BATCHED (FOR EXAMPLE, PERFORMING INPUT OR MOVING */B/* THE VIRTUAL DISPLAY). */N/* USER ACTION: TERMINATE BATCHING FIRST BY CALLING */B/* SMG$END_DISPLAY_UPDATE. ' */N/*-- */#define SMG$_INVDIR 1213284N/*++ */K/* FACILITY: SMG (TERMTABLE COMPILER) */N/* EXPLANATION: THE TERMTABLE COMPILER ACCEPTS ONLY A FEW FAO */B/* DIRECTIVES. IT ENCOUNTERED ONE THAT IT DOES NOT */B/* HANDLE. */N/* USE'R ACTION: CHECK YOUR TERMINAL DEFINITION. MAKE SURE THAT */C/* YOU USE ONLY VALID FAO DIRECTIVES. */N/*-- */#define SMG$_TRMNOTANS 1213292N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A CALL TO SMG$GET_PHYSICAL_CURSOR WAS MADE */B/* SPECIFYI'NG THAT THE TERMINAL IS TO BE QUERIED */B/* TO DETERMINE WHERE THE CURSOR IS. */B/* THIS COULD NOT BE DONE BECAUSE THE TERMINAL */B/* WAS NOT ANSI, AND THIS FEATURE IS AVAILABLE */B/* ONLY ON ANSI TERMINALS. */N/* USER ACTION: RERUN YOUR APPLICATION ON AN ANSI TERMINAL, */B/* SUCH AS A VT100. */N/*-- ' */#define SMG$_LENNOTEQL 1213300N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A CALL TO SMG$READ_VERIFY WAS MADE */B/* SPECIFYING A PICTURE STRING AND AN INITIAL */B/* STRING OF UNEQUAL LENGTH. SINCE THE INITIAL */B/* STRING IS USED AS THE DEFAULT VALUE FOR THE ' */B/* INPUT, IT MUST MATCH THE PICTURE STRING IN LENGTH. */N/* USER ACTION: MODIFY THE INITIAL STRING TO BE OF THE SAME LENGTH */B/* AS THE PICTURE STRING. */N/*-- */#define SMG$_LENMUSONE 1213308N/*++ */K/* FACILITY: SMG */N/*' EXPLANATION: A CALL TO SMG$READ_VERIFY WAS MADE */B/* SPECIFYING A FILL STRING OR A CLEAR */B/* STRING OF MORE THAN ONE CHARACTER. SINCE FILL CHARACTER */B/* MATCHING IS DONE ONE CHARACTER AT A TIME, ONLY ONE */B/* CHARACTER MAY BE SPECIFIED FOR THE FILL AND CLEAR STRING. */N/* USER ACTION: MODIFY THE FILL AND/OR CLEAR STRING TO BE ONE CHARACTER */B/* LONG. */N/*-- ' */#define SMG$_DISREQ 1213316N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A CALL TO SMG$READ_VERIFY WAS MADE */B/* SPECIFYING RIGHT-JUSTIFICATION, NO DISPLAY_ID WAS */B/* SPECIFIED AND THE SCROLL_REVERSE SEQUENCE WAS NOT */B/* FOUND FOR THIS TERMINAL IN' TERMTABLE.EXE. SINCE */B/* RIGHT-JUSTIFICATION REQUIRES A CURSOR POSITIONING */B/* SEQUENCE TO WORK PROPERLY, EITHER THE DISPLAY_ID */B/* PARAMETER MUST BE SPECIFIED OR THE SCROLL_REVERSE */B/* SEQUENCE MUST BE ADDED TO TERMTABLE.EXE. */N/* USER ACTION: ADD THE DISPLAY_ID PARAMETER TO THE SMG$READ_VERIFY */B/* CALL OR ADD THE SCROLL_REVERSE SEQUENCE TO */B/* TERMTABLE.EXE. ' */N/*-- */#define SMG$_NOTIMP 1213324N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: YOU TRIED TO USE A ROUTINE THAT IS NOT IMPLEMENTED */B/* IN THIS VERSION OF SMG$. */N/* USER ACTION: GET THE APPROPRIATE VERSION OF SMG$. ' */N/*-- */ #define SMG$_NO_WINASSOC 1213332N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A VIEWPORT HAS NOT BEEN ASSOCIATED WITH THE VIRTUAL */B/* DISPLAY. */N/* USER ACTION: CREATE A VIEWPORT ON THE VIRTUAL DISPLAY. '*/N/*-- */#define SMG$_WINEXISTS 1213340N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A VIEWPORT EXISTS. THAT IS, A VIEWPORT HAS ALREADY BEEN */B/* ASSOCIATED WITH THE VIRTUAL DISPLAY. */N/* USER ACTION: 1. USE THE VIEWPORT THAT ALREADY ASSOCIATED WITH THE */B/* 'VIRTUAL DISPLAY. 2. DELETE THE EXISTING VIEWPORT BEFORE */B/* YOU CREATE THE NEW VIEWPORT. OR, 3. USE OTHER VIEWPORT */B/* ROUTINES ON CHANGE/MOVE THE EXISTING VIEWPORT. */N/*-- */#define SMG$_NOSUBEXI 1213348N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: A SUBPROCESS DOES NO'T EXIST FOR THE SPECIFIED VIRTUAL */B/* DISPLAY. */N/* USER ACTION: CALL SMG$CREATE_SUBPROCESS TO CREATE A SUBPROCESS FOR */B/* THIS VIRTUAL DISPLAY. */N/*-- */#define SMG$_INSQUOCRE 1213356N/*++ */K/* FACILITY: SMG ' */N/* EXPLANATION: THE CURRENT BYTLM OR PRCLM QUOTA VALUE IS TOO SMALL */B/* TO CREATE A SUBPROCESS. */N/* USER ACTION: INCREASE THE ACCOUNTS BYTLM AND/OR PRCLM VALUE. */N/*-- */#define SMG$_INPTOOLON 1213364N/*++ */K/* FACILITY: SMG ' */N/* EXPLANATION: THE LENGTH OF AN INPUT STRING EXCEEDED 255 CHARACTERS. */N/* USER ACTION: SHORTEN THE STRING TO 255 CHARACTERS OR LESS. */N/*-- */#define SMG$_KBDIN_USE 1213372N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE OPERATION YOU HAVE TRIED TO PERFORM IS N 'OT */C/* LEGAL WHILE INPUT FROM THE VIRTUAL KEYBOARD IS BEING ACTIVE. */B/* FOR EXAMPLE, YOU CAN'T READ TEXT FROM A KEYBOARD IN AN AST */B/* ROUTINE THAT INTERRUPTED A SMG$ CALL ON THE SAME KEYBOARD. */N/* USER ACTION: SYNCRONIZE YOUR CALLS TO SMG$ TO PREVENT MULTIPLE INPUTS */B/* FROM THE SAME VIRTUAL KEYBOARD AT THE SAME TIME. */N/*-- */#define SMG$_EOF 1213442N/*++ ' */K/* FACILITY: SMG */N/* EXPLANATION: END OF FILE CONDITION WAS DETECTED ON INPUT. */N/* USER ACTION: IF NECESSARY, MODIFY YOUR PROGRAM TO RECOGNIZE THIS */B/* CONDITION AND RESPOND TO IT. */N/*-- */#define SMG$_KEYDEFPRO 1213450N/*++ ' */K/* FACILITY: SMG */N/* EXPLANATION: THE SPECIFIED KEY IS ALREADY DEFINED, AND SINCE ITS */B/* DEFINITION IS PROTECTED, IT CAN NOT BE CHANGED OR */B/* RE-DEFINED. */N/* USER ACTION: NONE */N/*-- */#defin'e SMG$_INVDEFATT 1213458N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: WHEN A KEY IS DEFINED, ATTRIBUTES SUCH AS NOECHO MAY BE */B/* SPECIFIED WITH THE DEFINITION. AN ATTEMPT WAS MADE TO */B/* SPECIFY AN UNKNOWN ATTRIBUTE. */N/* USER ACTION: CHECK THE LIST OF VALID ATTRIBUTES AND CORRECT YOUR */B/* PROGRAM. ' */N/*-- */#define SMG$_INVKEYNAM 1213466N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE SPECIFIED KEY NAME WAS LESS THAN 1 CHARACTER OR */B/* MORE THAN 31 CHARACTERS. */N/* USER ACTION: CHOOSE A KEY NAME WITH 1 TO 31' CHARACTERS. */N/*-- */#define SMG$_INVSTANAM 1213474N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE SPECIFIED STATE NAME WAS LESS THAN 1 CHARACTER OR */B/* MORE THAN 31 CHARACTERS. */N/* USER ACTION: CHOOSE A STATE NAME WITH 1 TO 31 CHARA'CTERS. */N/*-- */#define SMG$_LINNOTFND 1213482N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE INPUT LINE REQUESTED IN A CALL TO */B/* SMG$RETURN_INPUT_LINE WAS NOT FOUND. */N/* USER ACTION: IF NECESSARY, MODIFY YOUR PROGRAM TO RECOGNIZE ' THIS */B/* CONDITION AND RESPOND TO IT. */N/*-- */#define SMG$_KEYNOTDEF 1216512N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN ATTEMPT WAS MADE TO PERFORM AN OPERATION, SUCH AS */B/* SMG$GET_KEY_DEF, ON A KEY WHICH WAS NOT DEFINED. */N/*' USER ACTION: CHECK YOUR PROGRAM TO SEE IF THIS KEY SHOULD HAVE */B/* BEEN DEFINED. */N/*-- */#define SMG$_NOMOREKEYS 1216520N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: SMG$LIST_KEY_DEFS, WHEN CALLED REPEATEDLY, RETURNS ALL */B/* THE 'KEY DEFINITIONS IN A KEY TABLE. WHEN THERE ARE NO */B/* MORE DEFINITIONS, THIS ERROR IS RETURNED. */N/* USER ACTION: MODIFY YOUR PROGRAM TO EXPECT THIS CONDITION, IF NECESSARY. */N/*-- */#define SMG$_STRTERESC 1216528N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: AN SMG OUTP'UT ROUTINE WAS PASSED AN ESCAPE SEQUENCE */B/* EMBEDDED IN THE OUTPUT STRING. THE OUTPUT STRING WAS */B/* WRITTEN TO THE VIRTUAL DISPLAY BUT THE STRING WAS */B/* TERMINATED AT THE ESCAPE SEQUENCE. */N/* USER ACTION: CHECK YOUR OUTPUT STRING TO DETERMINE WHAT ESCAPE */B/* SEQUENCE WAS BEING PASSED. IF YOU NEED THE ACTION */B/* PROVIDED BY THIS ESCAPE SEQUENCE, THERE IS MOST */B/* LIKELY A SMG ROUTINE THAT PROV'IDES THAT FUNCTIONALITY. */N/*-- */#define SMG$_GBLNOTCRE 1216536N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE SYSTEM PROGRAM THAT MAPS TERMTABLE.EXE AS A GLOBAL */B/* SECTION WAS UNSUCCESSFUL. */N/* USER ACTION: THIS MESSAGE SHOULD BE HANDLED ONLY BY ' SYSTEM MANAGERS. */B/* IF THERE IS ALREADY AN EXISTING GLOBAL SECTION FOR */B/* TERMTABLE, THE SYSTEM MUST BE REBOOTED IN ORDER TO CREATE */B/* A NEW GLOBAL SECTION. */N/*-- */N/* THE FOLLOWING IS USED WITH GBLNOTCRE */#define SMG$_DELEXIGBL 1216544N/*++ */K/* F'ACILITY: SMG */N/* EXPLANATION: THE SYSTEM PROGRAM WHICH MAPS TERMTABLE AS A GLOBAL */B/* SECTION WAS UNSUCCESSFUL. BEFORE A NEW GLOBAL SECTION */B/* CAN BE CREATED, THE PREVIOUS ONE MUST BE DELETED. */N/* USER ACTION: THE SYSTEM MUST BE REBOOTED IN ORDER TO MAP A NEW */B/* TERMTABLE.EXE AS THE GLOBAL SECTION. */N/*-- ' */#define SMG$_GETDATSTR 1216552N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THIS MESSAGE IS SIGNALED INTERNALLY TO ALLOW THE HELP */B/* OUTPUT ROUTINE THAT WAS CALLED BY LBR$OUTPUT_HELP TO */B/* ACCESS THE DISPLAY_ID AND KEYBOARD_ID FOR THE SPECIFIED */B/* DISPLAY. THIS MESSAGE SHOULD NEVER BE RETURNED AS A */B/* STATUS FROM ANY 'SMG ROUTINE AND MUST NOT BE DOCUMENTED. */N/* USER ACTION: NONE. */N/*-- */#define SMG$_OPNOTSUP 1216560N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THE REQUESTED OPERATION CANNOT BE PERFORMED SINCE */B/* THE TERMINAL HARDWARE DO'ES NOT SUPPORT THIS FEATURE. */N/* USER ACTION: RUN THE APPLICATION ON A TERMINAL THAT SUPPORTS THIS */B/* FEATURE. */N/*-- */#define SMG$_HLPPMTSTR 1216568N/*++ */K/* FACILITY: SMG */N/* EXPLANATION: THIS MESSAGE IS THE PROMPT STRIN 'G OUTPUT BY THE ROUTINE */B/* SMG$PUT_HELP_TEXT. IT IS NOT A NORMAL ERROR MESSAGE */B/* BUT RESIDES HERE TO ALLOW TRANSLATION TO LANGUAGES */B/* OTHER THAN ENGLISH. */N/* USER ACTION: NONE. */N/*-- */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragma's supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SMGMSG_LOADED */ wwyQ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SMGTRMPTR '.SDI;1 *//********************************************************************************************************************************//*** MODULE $SMGTRMPTR ***/#ifndef __SMGTRMPTR_LOADED#define __SMGTRMPTR_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Sa've 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)#defin'e __union union#else#define __union variant_union#endif#endif N/* Terminal Capability Pointers for RTL SMG$ facility */N/* */N/* Boolean capabilities here - 1 - 220 */N/* */#define SMG$K_ADVANCED_VIDEO 1#define SMG$K_ANSI_CRT 2#define SMG$K_AUTO_MARGIN 3#define SMG$K_BACKSP'ACE 4#define SMG$K_BLOCK_MODE 5#define SMG$K_DEC_CRT 6#define SMG$K_EDIT 7#define SMG$K_EIGHT_BIT 8#define SMG$K_FULLDUP 9#define SMG$K_IGNORE_NEWLINE 10"#define SMG$K_INSERT_MODE_NULLS 11#define SMG$K_LOWERCASE 12#define SMG$K_NO_ERASE 13#define SMG$K_NO_SCROLL 14#define SMG$K_OVERSTRIKE 15#define SMG$K_PRINTER_PORT 16#define SMG$K_REGIS 17#define SMG$K_SCOPE 18#define SMG$K_SIXEL_GRAPHICS 19 #define SMG$K_SOFT_CHARACTERS 20#define SMG$K_PHYSICAL_TABS 21#def 'ine SMG$K_PHYSICAL_FF 22#define SMG$K_UNDERLINE 23##define SMG$K_CURSOR_REPORT_ANSI 24#define SMG$K_DEC_CRT_2 25#define SMG$K_DEC_CRT_3 26##define SMG$K_SET_CURSOR_COL_ROW 27#define SMG$K_TEXT16 28#define SMG$K_DEC_CRT_4 29#define SMG$K_DEC_CRT_5 30#define SMG$K_ANSI_COLOR 31N/* */N/* Private capabilities reserved for customer use. */N/* Put them at the end of the range. ' */N/* */#define SMG$K_PRIVATE_BOO_1 211#define SMG$K_PRIVATE_BOO_2 212#define SMG$K_PRIVATE_BOO_3 213#define SMG$K_PRIVATE_BOO_4 214#define SMG$K_PRIVATE_BOO_5 215#define SMG$K_PRIVATE_BOO_6 216#define SMG$K_PRIVATE_BOO_7 217#define SMG$K_PRIVATE_BOO_8 218#define SMG$K_PRIVATE_BOO_9 219 #define SMG$K_PRIVATE_BOO_10 220"#define SMG$K_MAX_BOOLEAN_CODE 220N/* ' */N/* Numeric capabilities here - 221 to 440 */N/* */#define SMG$K_COLUMNS 221#define SMG$K_CR_FILL 222#define SMG$K_FRAME 223#define SMG$K_LF_FILL 224 #define SMG$K_NUMBER_FN_KEYS 225#define SMG$K_ROWS 226%#define SMG$K_VMS_TERMINAL_NUMBER 227%#define SMG$K_WIDE_SCREEN_COLUMNS 228N/* ' */N/* Private capabilities for customer use. */N/* Put them at the end of the range. */N/* */#define SMG$K_PRIVATE_NUM_1 431#define SMG$K_PRIVATE_NUM_2 432#define SMG$K_PRIVATE_NUM_3 433#define SMG$K_PRIVATE_NUM_4 434#define SMG$K_PRIVATE_NUM_5 435#define SMG$K_PRIVATE_NUM_6 436#define SMG$K_PRIV 'ATE_NUM_7 437#define SMG$K_PRIVATE_NUM_8 438#define SMG$K_PRIVATE_NUM_9 439 #define SMG$K_PRIVATE_NUM_10 440"#define SMG$K_MAX_NUMERIC_CODE 440N/* */N/* String capabilities here - 441 - 660 */N/* */&#define SMG$K_BEGIN_ALTERNATE_CHAR 441#define SMG$K_BEGIN_BLINK 442#define SMG$K_BEGIN_BOLD 443##define SM'G$K_BEGIN_DELETE_MODE 444##define SMG$K_BEGIN_INSERT_MODE 445)#define SMG$K_BEGIN_LINE_DRAWING_CHAR 446#define SMG$K_BEGIN_REVERSE 447"#define SMG$K_BEGIN_UNDERSCORE 448#define SMG$K_BOTTOM_T_CHAR 449#define SMG$K_CLEAR_TAB 450#define SMG$K_CROSS_CHAR 451#define SMG$K_CURSOR_DOWN 452#define SMG$K_CURSOR_LEFT 453#define SMG$K_CURSOR_RIGHT 454#define SMG$K_CURSOR_UP 455#define SMG$K_DARK_SCREEN 456#define SMG$K_DELETE_CHAR 457#define SMG$K_DELETE_LINE 458##define SM'G$K_DEVICE_ATTRIBUTES 459$#define SMG$K_DOUBLE_HIGH_BOTTOM 460!#define SMG$K_DOUBLE_HIGH_TOP 461#define SMG$K_DOUBLE_WIDE 462#define SMG$K_DUPLICATE 463$#define SMG$K_END_ALTERNATE_CHAR 464#define SMG$K_END_BLINK 465#define SMG$K_END_BOLD 466!#define SMG$K_END_DELETE_MODE 467!#define SMG$K_END_INSERT_MODE 468'#define SMG$K_END_LINE_DRAWING_CHAR 469#define SMG$K_END_REVERSE 470 #define SMG$K_END_UNDERSCORE 471&#define SMG$K_ERASE_TO_END_DISPLAY 472##define SMG$K_ERASE_TO_END'_LINE 473%#define SMG$K_ERASE_WHOLE_DISPLAY 474"#define SMG$K_ERASE_WHOLE_LINE 475#define SMG$K_HOME 476 #define SMG$K_HORIZONTAL_BAR 477#define SMG$K_INIT_STRING 478#define SMG$K_INSERT_CHAR 479#define SMG$K_INSERT_LINE 480#define SMG$K_INSERT_PAD 481#define SMG$K_KEY_0 482#define SMG$K_KEY_1 483#define SMG$K_KEY_2 484#define SMG$K_KEY_3 485#define SMG$K_KEY_4 486#define SMG$K_KEY_5 487#define SMG$K_KEY_6 488#define SMG$K_KEY_7 489#define SMG$K_KEY_8 490'#define SMG$K_KEY_9 491#define SMG$K_KEY_BACKSPACE 492#define SMG$K_KEY_COMMA 493 #define SMG$K_KEY_DOWN_ARROW 494#define SMG$K_KEY_E1 495#define SMG$K_KEY_E2 496#define SMG$K_KEY_E3 497#define SMG$K_KEY_E4 498#define SMG$K_KEY_E5 499#define SMG$K_KEY_E6 500#define SMG$K_KEY_ENTER 501#define SMG$K_KEY_F1 502#define SMG$K_KEY_F2 503#define SMG$K_KEY_F3 504#define SMG$K_KEY_F4 505#define SMG$K_KEY_F5 506#define SMG$K_KEY_F6 507#define SMG$K_KEY_F7 508#define SMG$K_'KEY_F8 509#define SMG$K_KEY_F9 510#define SMG$K_KEY_F10 511#define SMG$K_KEY_F11 512#define SMG$K_KEY_F12 513#define SMG$K_KEY_F13 514#define SMG$K_KEY_F14 515#define SMG$K_KEY_F15 516#define SMG$K_KEY_F16 517#define SMG$K_KEY_F17 518#define SMG$K_KEY_F18 519#define SMG$K_KEY_F19 520#define SMG$K_KEY_F20 521 #define SMG$K_KEY_LEFT_ARROW 522#define SMG$K_KEY_MINUS 523#define SMG$K_KEY_PERIOD 524#define SMG$K_KEY_PF1 525#define SMG$K_KEY_PF2 526#define SM'G$K_KEY_PF3 527#define SMG$K_KEY_PF4 528!#define SMG$K_KEY_RIGHT_ARROW 529#define SMG$K_KEY_UP_ARROW 530#define SMG$K_LABEL_F1 531#define SMG$K_LABEL_F2 532#define SMG$K_LABEL_F3 533#define SMG$K_LABEL_F4 534#define SMG$K_LABEL_F5 535#define SMG$K_LABEL_F6 536#define SMG$K_LABEL_F7 537#define SMG$K_LABEL_F8 538#define SMG$K_LABEL_F9 539#define SMG$K_LABEL_F10 540#define SMG$K_LABEL_F11 541#define SMG$K_LABEL_F12 542#define SMG$K_LABEL_F13 543#define SMG$K_LABEL_'F14 544#define SMG$K_LABEL_F15 545#define SMG$K_LABEL_F16 546#define SMG$K_LABEL_F17 547#define SMG$K_LABEL_F18 548#define SMG$K_LABEL_F19 549#define SMG$K_LABEL_F20 550#define SMG$K_LEFT_T_CHAR 551#define SMG$K_LIGHT_SCREEN 552##define SMG$K_LOWER_LEFT_CORNER 553$#define SMG$K_LOWER_RIGHT_CORNER 554#define SMG$K_NAME 555#define SMG$K_NEWLINE_CHAR 556#define SMG$K_PAD_CHAR 557 #define SMG$K_RESTORE_CURSOR 558#define SMG$K_RIGHT_T_CHAR 559#define SMG$K_SAVE_CURSOR '560 #define SMG$K_SCROLL_FORWARD 561 #define SMG$K_SCROLL_REVERSE 562*#define SMG$K_SEL_ERASE_TO_END_DISPLAY 563'#define SMG$K_SEL_ERASE_TO_END_LINE 564)#define SMG$K_SEL_ERASE_WHOLE_DISPLAY 565&#define SMG$K_SEL_ERASE_WHOLE_LINE 566(#define SMG$K_SET_APPLICATION_KEYPAD 567(#define SMG$K_SET_CHAR_NOT_SEL_ERASE 568$#define SMG$K_SET_CHAR_SEL_ERASE 569 #define SMG$K_SET_CURSOR_ABS 570$#define SMG$K_SET_NUMERIC_KEYPAD 571##define SMG$K_SET_SCROLL_REGION 572#define SMG$K_SET_TAB 573#d'efine SMG$K_SINGLE_HIGH 574#define SMG$K_TAB_CHAR 575#define SMG$K_TOP_T_CHAR 576 #define SMG$K_UNDERLINE_CHAR 577##define SMG$K_UPPER_LEFT_CORNER 578$#define SMG$K_UPPER_RIGHT_CORNER 579#define SMG$K_VERTICAL_BAR 580#define SMG$K_WIDTH_NARROW 581#define SMG$K_WIDTH_WIDE 582(#define SMG$K_CURSOR_POSITION_REPORT 583)#define SMG$K_REQUEST_CURSOR_POSITION 584#define SMG$K_CR_GRAPHIC 585#define SMG$K_FF_GRAPHIC 586#define SMG$K_LF_GRAPHIC 587#define SMG$K_HT_GRAPHIC 588#define 'SMG$K_VT_GRAPHIC 589!#define SMG$K_TRUNCATION_ICON 590"#define SMG$K_CURSOR_NEXT_LINE 591'#define SMG$K_CURSOR_PRECEDING_LINE 592#define SMG$K_INDEX 593#define SMG$K_REVERSE_INDEX 594(#define SMG$K_BEGIN_NORMAL_RENDITION 595%#define SMG$K_BEGIN_AUTOWRAP_MODE 596##define SMG$K_END_AUTOWRAP_MODE 597'#define SMG$K_BEGIN_AUTOREPEAT_MODE 598%#define SMG$K_END_AUTOREPEAT_MODE 599%#define SMG$K_SET_ORIGIN_RELATIVE 600%#define SMG$K_SET_ORIGIN_ABSOLUTE 601&#define SMG$K_ERASE_LINE_TO_'CURSOR 602#define SMG$K_NEXT_LINE 603&#define SMG$K_BEGIN_AUTOPRINT_MODE 604$#define SMG$K_END_AUTOPRINT_MODE 605#define SMG$K_PRINT_SCREEN 606#define SMG$K_SET_CURSOR_ON 607 #define SMG$K_SET_CURSOR_OFF 608$#define SMG$K_SET_PRINTER_OUTPUT 609##define SMG$K_SET_SCREEN_OUTPUT 610)#define SMG$K_ERASE_DISPLAY_TO_CURSOR 611(#define SMG$K_REQUEST_PRINTER_STATUS 612#define SMG$K_PRINTER_READY 613##define SMG$K_PRINTER_NOT_READY 614#define SMG$K_NO_PRINTER 615!#define SMG$K_SET_JUMP '_SCROLL 616##define SMG$K_SET_SMOOTH_SCROLL 617#define SMG$K_ERROR_ICON 618#define SMG$K_PAGE_LENGTH 619N/* */N/* Private capabilities reserved for customer use. */N/* Put them at the end of the range. */N/* */#define SMG$K_PRIVATE_STR_1 651#define SMG$K_PRIVATE_STR_2 652#def 'ine SMG$K_PRIVATE_STR_3 653#define SMG$K_PRIVATE_STR_4 654#define SMG$K_PRIVATE_STR_5 655#define SMG$K_PRIVATE_STR_6 656#define SMG$K_PRIVATE_STR_7 657#define SMG$K_PRIVATE_STR_8 658#define SMG$K_PRIVATE_STR_9 659 #define SMG$K_PRIVATE_STR_10 660!#define SMG$K_MAX_STRING_CODE 660N/* */N/* Second string capabilities here - 661 - 880 */N/* ' */#define SMG$K_BEGIN_USER1 661#define SMG$K_BEGIN_USER2 662#define SMG$K_BEGIN_USER3 663#define SMG$K_BEGIN_USER4 664#define SMG$K_BEGIN_USER5 665#define SMG$K_BEGIN_USER6 666#define SMG$K_BEGIN_USER7 667#define SMG$K_BEGIN_USER8 668#define SMG$K_END_USER1 669#define SMG$K_END_USER2 670#define SMG$K_END_USER3 671#define SMG$K_END_USER4 672#define SMG$K_END_USER5 673#define SMG$K_END_USER6 674#define SMG$K_END_USER7 675#d'efine SMG$K_END_USER8 676#define SMG$K_BLACK_SCREEN 677#define SMG$K_BLUE_SCREEN 678#define SMG$K_CYAN_SCREEN 679 #define SMG$K_MAGENTA_SCREEN 680#define SMG$K_GREEN_SCREEN 681#define SMG$K_RED_SCREEN 682#define SMG$K_WHITE_SCREEN 683#define SMG$K_YELLOW_SCREEN 684#define SMG$K_USER1_SCREEN 685#define SMG$K_USER2_SCREEN 686##define SMG$K_BEGIN_STATUS_LINE 687!#define SMG$K_END_STATUS_LINE 688#define SMG$K_BEGIN_LOCATOR 689#define SMG$K_END_LOCATOR 690 #define SMG$K_KE'Y_FIRST_DOWN 691!#define SMG$K_KEY_SECOND_DOWN 692 #define SMG$K_KEY_THIRD_DOWN 693!#define SMG$K_KEY_FOURTH_DOWN 694#define SMG$K_KEY_FIRST_UP 695#define SMG$K_KEY_SECOND_UP 696#define SMG$K_KEY_THIRD_UP 697#define SMG$K_KEY_FOURTH_UP 698#define SMG$K_USER3_SCREEN 699#define SMG$K_USER4_SCREEN 700#define SMG$K_USER5_SCREEN 701#define SMG$K_USER6_SCREEN 702#define SMG$K_USER7_SCREEN 703#define SMG$K_USER8_SCREEN 704#define SMG$K_SET_ASCII 705##define SMG$K_SET_SPEC_GRAPH'ICS 706"#define SMG$K_SET_SUPPLEMENTAL 707#define SMG$K_SET_JIS_KANA 708#define SMG$K_SET_KANJI 709#define SMG$K_SET_JIS_ROMAN 710#define SMG$K_SET_HANZI 711#define SMG$K_SET_HANYU 712#define SMG$K_SET_HANGUL 713#define SMG$K_SET_KS_ROMAN 714"#define SMG$K_MAX_STRING2_CODE 880 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined re'quired ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SMGTRMPTR_LOADED */ wwQ/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//******************************************************************************* '*************************************************//*** MODULE $SMRDEF ***/#ifndef __SMRDEF_LOADED#define __SMRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/* ' */N/* DEFINE SYMBIONT MANAGER REQUEST CODES */N/* */N/* SYMBIONT MANAGER REQUEST CODES */N#define SMR$K_INITIAL 0 /* INITIALIZE A QUEUE */N#define SMR$K_DELETE 1 /* DELETE THE QUEUE */N#define SMR$K_START 2 /* ACTIV'ATE OR RESUME PRINTING */N#define SMR$K_PAUSE 3 /* SUSPEND PRINTING FOR A WHILE */U#define SMR$K_MERGE 4 /* MOVE FILES FORM ONE QUEUE INTO ANOTHER */Q#define SMR$K_REDIRECT 5 /* ASSIGNMENT OF ONE QUEUE TO ANOTHER */P#define SMR$K_JUSTIFY 6 /* JUSTIFY PRINT FORMS(IE: ISSUE FF) */N#define SMR$K_STOP 7 /* DISABLE FURTHER DE-QUEING */N#define SMR$K_ENTER 8 /* ADD A FILE TO A Q'UEUE */N#define SMR$K_CREJOB 9 /* CREATE A PRINT JOB */N#define SMR$K_ADDFIL 10 /* ADD A FILE TO EXISTING JOB */N#define SMR$K_CLSJOB 11 /* CLOSE OPEN JOB */N#define SMR$K_RMVJOB 12 /* REMOVE JOB FROM QUEUE */N#define SMR$K_ALTER 13 /* CHANGE A FILES CHARACTERISTICS */N#define SMR$K_ABORT 14 /* ABORT CURRENT JOB, START NEXT */N#defin'e SMR$K_RELEASE 15 /* RELEASE JOB FROM HOLD LIST */N#define SMR$K_DETINIT 16 /* DETACHED JOB HAS INITIATED */N#define SMR$K_SYNCJOB 17 /* SYNCRONIZE WITH A BATCH JOB */N#define SMR$K_ASKQNAM 18 /* GET NAME OF QUEUE FOR LOG FILE */N/* */N/* ASSIGN SYMBIONT MANAGER PRINT JOB/RECORD OPTION CODES */N/* ' */N/* */N/* JOB FILE OPTIONS */N#define SMO$K_DELETE 1 /* DELETE THE FILE AFTER PRINTING */N#define SMO$K_BRSTPAG 2 /* CREATE A BURST PAGE */N#define SMO$K_NOBRSTPAG 3 /* INHIBIT BURST PAGE */N#define SMO$K_FLAGPAG 4 /* PRINT A FLAG PA'GE */N#define SMO$K_NOFLAGPAG 5 /* INHIBIT A FLAG PAGE */N#define SMO$K_PAGHDR 6 /* PRINT FILENAME AS PAGE HEADER */N#define SMO$K_DOUBLE 7 /* DOUBLE SPACE THE LISTING */N#define SMO$K_NOFEED 8 /* INHIBIT FORM FEED GENERATION */N#define SMO$K_PAGCNT 9 /* SPECIFY PAGE COUNT TO PRINT */N#define SMO$K_COPIES 10 /* NUMBER OF COPIES TO PRINT */N#def'ine SMO$K_FILESIZ 11 /* FILE SIZE */N#define SMO$K_DESTQUE 12 /* DESTINATION QUEUE */N/* OPTIONS FOR CREATE JOB */N#define SMO$K_RLSTIM 32 /* TIME TO HOLD UNTIL QUEUEING */N#define SMO$K_HOLD 33 /* HOLD THE JOB */U#define SMO$K_JOBPRI 34 /* SPECIFY PRINT JOB/DETACHED JOB PRIOITY */N#define SMO$K_JOBCOPY '35 /* NUMBER OF COPIES OF ENTIRE JOB */N#define SMO$K_FORMTYPE 36 /* FORM TYPE TO USED WHEN PRINTED */N#define SMO$K_LOWER 37 /* UPPER/LOWER CASE PRINTER ONLY */N#define SMO$K_PARAMS 38 /* SUPPLY JOB PARAMETERS */N#define SMO$K_JOBNAME 39 /* SUPPLY A NAME TO THE JOB */N#define SMO$K_NOLOWER 40 /* CLEAR LOWER CASE REQUIRED */N#define SMO$K_CPULIM 41 /* CPU T'IME LIMIT */N#define SMO$K_NOCPULM 42 /* NO CPU TIME LIMIT */N#define SMO$K_WSQUOTA 43 /* WORKING SET QUOTA */N#define SMO$K_NOWSQUO 44 /* NO WORKING SET QUOTA */N#define SMO$K_WSDEFLT 45 /* WORKING SET DEFAULT */N#define SMO$K_NOWSDFT 46 /* NO WORKING SET DEFAULT */N#define SMO$K_DQCHAR 47 /* CHAR. TO BE USED WHEN PRINTED ' */N#define SMO$K_LOGFNAM 48 /* LOG FILE SPEC. */N#define SMO$K_LOGQNAM 49 /* QUEUE NAME FOR LOG FILE */N#define SMO$K_KEEPLOG 50 /* KEEP LOG FILE */N#define SMO$K_NOSPOOL 51 /* DON'T SPOOL LOG FILE */N#define SMO$K_NOKEEPLOG 52 /* DELETE LOG FILE */N#define SMO$K_NOLOG 53 /* CREATE LOG ON NULL DEVICE */N#define SMO$K_NOTIFY' 54 /* NOTIFY WHEN JOB COMPLETES */N#define SMO$K_NONOTFY 55 /* NO NOTIFY */N#define SMO$K_WSEXTNT 56 /* WS EXTENT */N#define SMO$K_NOWSEXTNT 57 /* NO WS EXTENT */N/* OPTIONS FOR INIT OR START A QUEUE */N#define SMO$K_CURFORM 64 /* CURRENT FORMS MOUNTED ON DEVICE */N#define SMO$K_GENPRT 65 /* ALL'OW GENERIC PRINTING */N#define SMO$K_NOGENPRT 66 /* DISALLOW GENERIC PRINTING */P#define SMO$K_DETJOB 67 /* QUEUE IS FOR DETACHED JOB QUEUING */N#define SMO$K_GENDEV 68 /* QUEUE IS GENERIC DEVICE QUEUE */N#define SMO$K_NOGENDEV 69 /* NOT A GENERIC DEVICE */N#define SMO$K_DEFBRST 70 /* QUEUE HAS BURST PAGE BY DEFAULT */N#define SMO$K_NODEFBRST 71 /* NO DEFAULT BURST PAGE ' */N#define SMO$K_DEFFLAG 72 /* QUEUE HAS FLAG PAGE BY DEFAULT */N#define SMO$K_NODEFFLAG 73 /* NO DEFAULT FLAG */N#define SMO$K_TRMDEV 74 /* DEVICE IS A TERMINAL */N#define SMO$K_NOTRMDEV 75 /* DEVICE IS NOT A TERMINAL */N#define SMO$K_JOBLIM 76 /* JOB LIMIT FOR BATCH JOBS */N#define SMO$K_INIPRI 77 /* JOB INITIAL PRIORITY */N#define SMO$K_DI'SWAP 78 /* DISABLE SWAPING */N#define SMO$K_MCPULM 79 /* MAX CPU TIME LIMIT */N#define SMO$K_NOMCPULM 80 /* NO MAX CPU TIME LIMIT */N#define SMO$K_DCPULM 81 /* DEFAULT CPU TIME LIMIT */N#define SMO$K_NODCPULM 82 /* NO DEFAULT CPU TIME LIMIT */N#define SMO$K_WSQUTA 83 /* WORKING SET QUOTA */N#define SMO$K_NOWSQUTA 84 /*' NO WORKING SET QUOTA */N#define SMO$K_WSDFLT 85 /* WORKING SET DEFAULT */N#define SMO$K_NOWSDFLT 86 /* NO WORKING SET DEFAULT */N#define SMO$K_CURDQCHAR 87 /* CURRENT CHAR. OF THE QUEUE */N#define SMO$K_SMBNAME 88 /* SYMBIONT NAME FOR QUEUE */N#define SMO$K_WSXTANT 89 /* WS EXTENT */N#define SMO$K_NOWSXTNT 90 /* NO WS EXTENT ' */N#define SMO$K_NODISWAP 91 /* ENABLE SWAPPING */N/* OPTIONS FOR RESTART */S#define SMO$K_NEXTJOB 96 /* RESTART AT END BEGINNING OF NEXT JOB */N#define SMO$K_TOPOFILE 97 /* RESTART JOB AT TOP-OF-FILE */N#define SMO$K_SPCCNT 98 /* SPECIFY PAGES TO SPACE OVER */N/* OPTIONS FOR ABORT */N#define 'SMO$K_REQUEUE 112 /* REQUEUE THE FILE */N#define SMO$K_REQDEST 113 /* SPECIFY NEW QUEUE DESTINATION */N#define SMO$K_REQPRIO 114 /* SPECIFY PRIORITY ON REQUEUE */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pra 'gma __standard #endif /* __SMRDEF_LOADED */ ww;=R/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE SNAPEVTD 'EF ***/#ifndef __SNAPEVTDEF_LOADED#define __SNAPEVTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*1 ORIGIN and INCREMENTS of 1 */j#d'efine SNAPEVT$_SNAPSHOT 1 /* a system snapshot is pending in a non-VAXcluster environment */f#define SNAPEVT$_CLUPEND 2 /* a system snapshot is pending in a VAXcluster environment */z#define SNAPEVT$_RESTART 3 /* the system has just booted from a snapshot into a non-VAXcluster environment */v#define SNAPEVT$_CLU_RESTART 4 /* the system has just booted from a snapshot into a VAXcluster environment */d#define SNAPEVT$_ABORT 5 /* a fatal e'rror occurred during the taking of a snapshot */}#define SNAPEVT$_CLUEXIT 6 /* the system is resynchronizing after a loss of communications with the remainder */N/* of the cluster */N#define SNAPEVT$_ROLLOUT 7 /* a system rollout is pending */P#define SNAPEVT$_ROLLIN 8 /* a system rollin has been completed */#define SNAPEVT$C_SNAPSHOT 1#define SNAPEVT$C_RESTART 3#define SNAPEVT$C_ABORT 5' #ifdef __NEW_STARLETtypedef struct _snapevtcode {' unsigned short int snapevt$w_event; } SNAPEVTCODE;#else /* __OLD_STARLET */struct snapevtcode {' unsigned short int snapevt$w_event; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifd 'ef __cplusplus }#endif#pragma __standard #endif /* __SNAPEVTDEF_LOADED */ ww[R/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SOR$ROUTINES.SDI;1 *//************************************************************************************************************* '*******************//*** MODULE sor$routines ***/#ifndef __SOR_ROUTINES_LOADED#define __SOR_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 de'fault 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 P/********************************* '******************************************* *//* * */4/* COPYRIGHT (c) 1988 BY * */D/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */&/* ALL RIGHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */P/* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */P/* 'COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */&/* TRANSFERRED. * *//* * */P/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. * *//* * */P/* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABI 'LITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * *//* * */P/**************************************************************************** */N/* */N/* SOR$BEGIN_MERGE */N/* */N/* Initialize a Merge Operation ( */N/* */N/* Initializes the merge operation by opening the input and output files */N/* and by providing the number of input files, the key specifications, */N/* and the merge options. */N/* */)#define sor$begin_merge SOR$BEGIN_MERGE #ifdef __NEW_STARLETunsi (gned int sor$begin_merge( __optional_params );#else /* __OLD_STARLET *//unsigned int sor$begin_merge(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SOR$BEGIN_SORT */N/* */N/* Begin a Sort Operation */N/* ( */N/* Initializes a sort operation by opening input and output files and by */N/* passing the key information and any sort options. */N/* */'#define sor$begin_sort SOR$BEGIN_SORT #ifdef __NEW_STARLETunsigned int sor$begin_sort( __optional_params );#else /* __OLD_STARLET */.unsigned int sor$begin_sort(__unknown_params);!#end (if /* #ifdef __NEW_STARLET */N/* */N/* SOR$DO_MERGE */N/* */N/* Obsolete (from VMS V3) */N/* */##define sor$do_merge SOR$DO_MERGE#ifdef __NEW_STARLETint sor$do_mer (ge(void);#else /* __OLD_STARLET */int sor$do_merge(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SOR$END_SORT */N/* */N/* End a Sort Operation */N/* */N/* (Does cleanup functions, such as closing files and releasing memory. */N/* */##define sor$end_sort SOR$END_SORT #ifdef __NEW_STARLETunsigned int sor$end_sort( __optional_params);#else /* __OLD_STARLET */,unsigned int sor$end_sort(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SOR$INIT_MERGE ( */N/* */N/* Obsolete (from VMS V3) */N/* */'#define sor$init_merge SOR$INIT_MERGE #ifdef __NEW_STARLETint sor$init_merge( __optional_params );#else /* __OLD_STARLET */%int sor$init_merge(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* ( */N/* SOR$INIT_SORT */N/* */N/* Obsolete (from VMS V3) */N/* */%#define sor$init_sort SOR$INIT_SORT #ifdef __NEW_STARLETint sor$init_sort( __optional_params );#else (/* __OLD_STARLET */$int sor$init_sort(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SOR$PASS_FILES */N/* */N/* Pass File Names */N/* */N/* Passes ( the names of input and output files and output file */N/* characteristics to SORT or MERGE. */N/* */'#define sor$pass_files SOR$PASS_FILES #ifdef __NEW_STARLETunsigned int sor$pass_files( __optional_params );#else /* __OLD_STARLET */.unsigned int sor$pass_files(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/*  ( */N/* SOR$RELEASE_REC */N/* */N/* Pass One Record to Sort */N/* */N/* Used with the record interface to pass one input record to SORT or */N/* MERGE.  ( */N/* */)#define sor$release_rec SOR$RELEASE_REC #ifdef __NEW_STARLETunsigned int sor$release_rec( void *desc, __optional_params);#else /* __OLD_STARLET *//unsigned int sor$release_rec(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SOR$RETURN_REC */N (/* */N/* Return One Sorted Record */N/* */N/* Used with the record interface to return one sorted or merged */N/* record to a program. */N/* */'#define sor$return_rec S (OR$RETURN_REC #ifdef __NEW_STARLETunsigned int sor$return_rec( void *desc, __optional_params );#else /* __OLD_STARLET */.unsigned int sor$return_rec(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SOR$SORT_MERGE */N/* */N/* Sort ( */N/* */N/* Sorts the input records. */N/* */'#define sor$sort_merge SOR$SORT_MERGE #ifdef __NEW_STARLETunsigned int sor$sort_merge( __optional_params);#else /* __OLD_STARLET */.unsigned int sor$sort_merge(__unknown_params);!#endif /* #ifdef __NEW_STARLET *(/N/* */N/* SOR$SPEC_FILE */N/* */N/* Pass a Specification File Name */N/* */N/* Used to pass a specification file or specification text. */N/* ( */%#define sor$spec_file SOR$SPEC_FILE #ifdef __NEW_STARLETunsigned int sor$spec_file( __optional_params );#else /* __OLD_STARLET */-unsigned int sor$spec_file(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* SOR$STAT */N/* ( */N/* Obtain Sorting Statistics */N/* */N/* Returns one statistic about the sort or merge operation to the user */N/* program. */N/* */#define sor$stat SOR$STAT #ifdef __NEW_STARLETunsigned int sor$stat(( unsigned int *code, unsigned int *result, __optional_params);#else /* __OLD_STARLET */(unsigned int sor$stat(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __SOR_ROUTINES_LOADED */ (ww{R/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SORMSG.SDI;1 *//********************************************************************************************************************************//*** MODULE $SORDEF ***/#ifndef __SORDEF_LOADED#define __SORDEF_LOADED (1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 ...#defin(e __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 N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12: (59:35.72 */N/* */N/* FILE: SORMSG.MSG */N/* */Q/***************************************************************************** *//** * */=/** COPYRIGHT (C) 1978, 1980, 1982, 1984, 1993 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL R(IGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * (*//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/*************************************************(**************************** */N/* */N/*++ */N/* */K/* FACILITY: VAX-11 SORT/MERGE */N/* */N/* ABSTRACT: ( */N/* */I/* THIS FILE CONTAINS THE DEFINITION FOR THE SORT FACILITY SPECIFIC */I/* ERROR MESSAGES. THE FACILITY CODE FOR SORT/MERGE IS 28. */N/* */N/* ENVIRONMENT: VAX/VMS USER MODE */N/* */N/* AUTHOR: P. GILBERT, CREAT(ION DATE: 15-FEB-1982 */N/* */N/* MODIFIED BY: */N/* */B/* T03-015 ORIGINAL */I/* T03-018 CHANGED THE SEVERITY OF WORK_DEV FROM FATAL TO SEVERE. */B/* PDG 16-DEC-1982 */I/*( T03-019 ADDED OPERFAIL, REQ_ALT AND USE_ALT. PDG 21-DEC-1982 */I/* T03-020 ADD NEW MESSAGES FOR ERRORS WITH COLLATING SEQUENCES. */B/* PDG 26-JAN-1983 */I/* T03-021 ADDED NEW MESSAGES FOR CDD ERRORS. PDG 11-FEB-1983 */I/* T03-022 ADDED ENDDIAGS. PDG 16-MAR-1983 */I/* T03-023 CHANGE TEXT OF COL_PAD. PDG 20-APR-1983 */I/* T03-024 ADDED OPREPLY. PDG 9-MAY-1983 ( */I/* T04-001 ADDED ODD_LEN. MH 15-JUL-1985 */I/* V05-001 CHANGED TEST FOR VAR_FIX TO "truncated or padded". */B/* BAB 4-FEB-1993 */N/* CORRECTED SPELLING AND PUNCTUATION ERRORS. */N/* DEE RYAN 29-SEP-1993 */N/* V08-014 ADDED HS_NYI. KRN 23-MAY-2008 */N/*-- ( */N/* */N/* SOME ERROR MESSAGES WERE ISSUED BY OLD VERSIONS OF VAX-11 SORT/MERGE, */N/* BUT ARE NO LONGER BE ISSUED. THESE MUST STILL BE DEFINED. */N/* */O/* SOME ERROR MESSAGES WILL BE USED BY THE NEW VERSION OF VAX-11 SORT/MERGE, */N/* BUT ARE NOT YET ISSUED BY THE CODE. THESE ARE PREF(IXED WITH A "?". */N/* */#define SORT$_FACILITY 28#define SOR$_MISS_KEY 1867780#define SOR$_WORK_DEV 1867786#define SOR$_NO_WRK 1867794#define SOR$_VM_FAIL 1867804#define SOR$_WS_FAIL 1867812#define SOR$_SORT_ON 1867820#define SOR$_BAD_KEY 1867828#define SOR$_NUM_KEY 1867836#define SOR$_BAD_LEN 1867844#define SOR$_ONE_IN 1867852#define SOR$_IND_OVR 1867860#define SOR$_INCONSIS 1867868#defin (e SOR$_VAR_FIX 1867872#define SOR$_BAD_TYPE 1867884#define SOR$_LRL_MISS 1867892#define SOR$_BAD_SPEC 1867900#define SOR$_BAD_LRL 1867906#define SOR$_BAD_FILE 1867916#define SOR$_BAD_ADR 1867924#define SOR$_MAP 1867932#define SOR$_EXTEND 1867940#define SOR$_KEY_LEN 1867946#define SOR$_CLEAN_UP 1867956#define SOR$_BAD_MERGE 1867962#define SOR$_BAD_ROUTIN 1867972#define SOR$_INP_FILES 1867980#define SOR$_BAD_ORDER 1867984N/* !( */N/* V3B MESSAGES ARE DEFINED BELOW */N/* */#define SOR$_DUP_OUTPUT 1867996#define SOR$_MISS_PARAM 1868004#define SOR$_END_SORT 1868009#define SOR$_KEYED 1868018#define SOR$_BAD_SRL 1868024#define SOR$_NODUPEXC 1868036#define SOR$_DELETE1 1868041#define SOR$_DELETE2 1868049#define SOR$_DELBOTH 1868057#define SOR$_NYI 1868066#defin"(e SOR$_RTNERROR 1868074#define SOR$_KEYAMBINC 1868084#define SOR$_OBS_0 1868092#define SOR$_ROPRAND 1868098#define SOR$_UNDOPTION 1868108#define SOR$_STABLEEXC 1868116#define SOR$_SRTIWA 1868124#define SOR$_SPCOVR 1868128#define SOR$_SPCMIS 1868136#define SOR$_SPCSIS 1868144#define SOR$_SPCIVP 1868156#define SOR$_SPCIVS 1868164#define SOR$_SPCIVC 1868172#define SOR$_SPCIVF 1868180#define SOR$_SPCIVD 1868188#define SOR$_SPCIVX 1868196#define SOR$_SPCIVK 186820#(4#define SOR$_SPCIVI 1868212#define SOR$_INCNOKEY 1868220#define SOR$_INCNODATA 1868228#define SOR$_INVFOLD 1868234#define SOR$_OPERFAIL 1868244#define SOR$_REQ_ALT 1868251#define SOR$_USE_ALT 1868259#define SOR$_COL_ADJ 1868268#define SOR$_COL_CMPLX 1868276#define SOR$_COL_CHAR 1868284#define SOR$_COL_PAD 1868292#define SOR$_COL_THREE 1868300#define SOR$_BADDTYPE 1868306#define SOR$_BADLENOFF 1868314#define SOR$_BADOCCURS 1868324#define SOR$_BADOVRLAY 1868330#d$(efine SOR$_BADPROTCL 1868340#define SOR$_CDDERROR 1868348#define SOR$_ILLBASE 1868354#define SOR$_ILLLITERL 1868364#define SOR$_ILLSCALE 1868370#define SOR$_INCDIGITS 1868378#define SOR$_MISLENOFF 1868384#define SOR$_MULTIDIM 1868394#define SOR$_NOTRECORD 1868404#define SOR$_SIGNCOMPQ 1868408#define SOR$_UNSUPLEVL 1868420#define SOR$_ENDDIAGS 1868427#define SOR$_OPREPLY 1868435#define SOR$_CHKPNT 1868441#define SOR$_ODD_LEN 1868452#define SOR$_HS_NYI 1868460 $#p%(ragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SORDEF_LOADED */ ww'S/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:0 &(0:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $SRFDEF ***/#ifndef __SRFDEF_LOADED#define __SRFDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* De'(fined 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 N/* */N/* Symbol reference (SYM$M_DEF in GSY$W_FLAGS is 0) */N/* */#define SRF$K_NAME 5#define SRF$C_NAME 5 #ifdef __NEW_STARLETtypedef struct _srfdef { )( __union {N unsigned char srf$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {! char srfdef$$_fill_1;" } srf$r_gsdtyp_fields; } srf$r_gsdtyp_overlay;N unsigned char srf$b_datyp; /*Maps over GSY$B_DATYP */N unsigned short int srf$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char srf$b_namlng; /*Length of symbol name */N char srf$t_name [31]; /**(Symbol name */ } SRFDEF; #if !defined(__VAXC)6#define srf$b_gsdtyp srf$r_gsdtyp_overlay.srf$b_gsdtyp"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct srfdef { __union {N unsigned char srf$b_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct {! char srfdef$$_fill_1;" } srf$r_gsdtyp_fields; } srf$r_gsdtyp_overlay;N unsigned char srf$b_datyp; /*Maps over GSY$+(B_DATYP */N unsigned short int srf$w_flags; /*Maps over GSY$W_FLAGS */N unsigned char srf$b_namlng; /*Length of symbol name */N char srf$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC)6#define srf$b_gsdtyp srf$r_gsdtyp_overlay.srf$b_gsdtyp"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZ,(E /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SRFDEF_LOADED */ ww˜S/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:0 -(0:42 $1$DGA7304:[STARLET_H.SRC]SRMDEF.SDI;1 *//********************************************************************************************************************************//*** MODULE $SRMDEF ***/#ifndef __SRMDEF_LOADED#define __SRMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 N/*+ */N/* Define SRM Hardware symbols */N/*- */N#define SRM$K_INT_OVF_T 1 /* Integer overflow trap code */O#define SRM$K_INT_DIV_T 2 /* Integer divide by zero trap code */0(N#define SRM$K_FLT_OVF_T 3 /* Floating overflow trap code */X#define SRM$K_FLT_DIV_T 4 /* Floating/decimal Divide by zero trap code */N#define SRM$K_FLT_UND_T 5 /* Floating Underflow trap code */P#define SRM$K_DEC_OVF_T 6 /* Decimal string overflow trap code */N#define SRM$K_SUB_RNG_T 7 /* Subscript range trap */N#define SRM$K_FLT_OVF_F 8 /* Floating Overflow fault code */Q#define SRM$1(K_FLT_DIV_F 9 /* Floating Divide by zero fault code */N#define SRM$K_FLT_UND_F 10 /* Floating Underflow fault code */#define SRM$M_EXC_SUM_SWC 0x1#define SRM$M_EXC_SUM_INV 0x2#define SRM$M_EXC_SUM_DZE 0x4#define SRM$M_EXC_SUM_OVF 0x8#define SRM$M_EXC_SUM_UNF 0x10#define SRM$M_EXC_SUM_INE 0x20#define SRM$M_EXC_SUM_IOV 0x40 #ifdef __NEW_STARLETtypedef struct _srm { __union {# unsigned int srm$l_exc_sum; __struct {+ 2( unsigned srm$v_exc_sum_swc : 1;+ unsigned srm$v_exc_sum_inv : 1;+ unsigned srm$v_exc_sum_dze : 1;+ unsigned srm$v_exc_sum_ovf : 1;+ unsigned srm$v_exc_sum_unf : 1;+ unsigned srm$v_exc_sum_ine : 1;+ unsigned srm$v_exc_sum_iov : 1;' unsigned srm$v_fill_1 : 25;! } srm$r_exc_sum_bits; } srm$r_exc_sum_overlay; } SRM; #if !defined(__VAXC)9#define srm$l_exc_sum srm$r_exc_sum_ov3(erlay.srm$l_exc_sumT#define srm$v_exc_sum_swc srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_swcT#define srm$v_exc_sum_inv srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_invT#define srm$v_exc_sum_dze srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_dzeT#define srm$v_exc_sum_ovf srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_ovfT#define srm$v_exc_sum_unf srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_unfT#define srm$v_exc_sum_ine srm$r_exc_sum_overlay.srm$r_4(exc_sum_bits.srm$v_exc_sum_ineT#define srm$v_exc_sum_iov srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_iov"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _srm { __union {# unsigned int srm$l_exc_sum; __struct {+ unsigned srm$v_exc_sum_swc : 1;+ unsigned srm$v_exc_sum_inv : 1;+ unsigned srm$v_exc_sum_dze : 1;+ unsigned srm$v_exc_sum_ovf : 1;+ unsigned srm$v_exc_s 5(um_unf : 1;+ unsigned srm$v_exc_sum_ine : 1;+ unsigned srm$v_exc_sum_iov : 1;' unsigned srm$v_fill_1 : 25;! } srm$r_exc_sum_bits; } srm$r_exc_sum_overlay; } srm; #if !defined(__VAXC)9#define srm$l_exc_sum srm$r_exc_sum_overlay.srm$l_exc_sumT#define srm$v_exc_sum_swc srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_swcT#define srm$v_exc_sum_inv srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_invT#define srm$v_exc_ 6(sum_dze srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_dzeT#define srm$v_exc_sum_ovf srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_ovfT#define srm$v_exc_sum_unf srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_unfT#define srm$v_exc_sum_ine srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_ineT#define srm$v_exc_sum_iov srm$r_exc_sum_overlay.srm$r_exc_sum_bits.srm$v_exc_sum_iov"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __7(member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SRMDEF_LOADED */ wwS/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler sou8(rce file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// -----------------------------------------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development 9(Company, L.P. * */P/* * * */P/* * Confidential computer software. Valid license from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Comm:(ercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. * */P/* * * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */;(P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty. * */P/* * * */P/* ************************************************************************* *//* ******** <(************************************************************************************************************************ */@/* Created: 5-Apr-2012 13:00:56 by OpenVMS SDL EV3-3 */L/* Source: 05-APR-2012 13:00:56 $1$DGA7304:[STARLET_H.SRC]SSMSG.SDL;1 *//* ******************************************************************************************************************************** */  /* .MACRO $SSDEF,$GBL */ /* $DEFINI SS,$GBL *//* */S/* This SDL File Generated by =(VAX-11 Message V04-00 on 5-APR-2012 13:00:56.86 *//* *//* */F/* SSMSG.MSG - SYSTEM DEFINITION FILE FOR SYSTEM SERVICE MESSAGES *//* *//* VERSION: 'X-137' *//* */S/* **************************************************************************** *//* * * */S/* * COPYRIGHT 1995-2005 HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P. * */S/* * * */S/* * RESTRICTED RIGHTS LEGEND >( * */S/* * * */S/* * USE, DUPLICATION OR DISCLOSURE BY THE U.S. GOVERNMENT IS SUBJECT TO * */S/* * RESTRICTIONS AS SET FORTH IN SUBPARAGRAPH (C)(1)(II) OF THE RIGHTS * */S/* * IN TECHNICAL DATA AND COMPUTER SOFTWARE CLAUSE IN DFARS 252.227-7013. * */S/* * * */S/* * HEWLETT-PACKARD ?(DEVELOPMENT COMPANY, L.P * */S/* * 3000 HANOVER STREET * */S/* * PALO ALTO, CA 94304 * */S/* * U.S.A. * */S/* * * */S/* * RIGHTS FOR NON-DOD U.S. GOVERNMENT DEPARTMENTS AND AGENCIES ARE AS * */S/* * SET FO@(RTH IN FAR 52.227-19(C)(1,2). * *//* * * */S/* **************************************************************************** */ /* ++ *//* */./* FACILITY: VMS SYSTEM;.MACRO LIBRARIES *//* *//* ABSTRACT: *//* */F/* THIS FILE CONTAINS THE SDL SOURCE FOR SYSTEM SERVICE MESSAGES. *//* *//* GUIDELINES: *//* */M/* WITH THE RELEASE OF HELP MESSAGE, MESSAGE DOCUMENTATION MUST EXACTLY */N/* MATCH THE MES A(SAGE TEXT IN THIS FILE IN ORDER FOR THE ONLINE SEARCH TO */I/* SUCCEED. TO AVOID DOCUMENTING EMBARRASSING TYPOS OR GRAMMATICAL */L/* ERRORS, PLEASE FORWARD YOUR NEW OR CHANGED MESSAGES TO THE MESSAGES */K/* WRITER FOR A QUICK EDIT. VMS SENIOR MANAGEMENT SUPPORTS ENFORCING */K/* STANDARD MESSAGE FORMATTING CONVENTIONS, WHICH ARE INCLUDED IN THE *//* FOLLOWING GUIDELINES. *//* */S/* O SS$ CODE NAMES SHOULD BE 15 OR FEWER CHARACTERS TO PREVENT TRUNCATION */8/* I B(N MESSAGE TEXT, WHICH CAUSES GENERAL CONFUSION. *//* */R/* O WORDS IN MESSAGES SHOULD NOT BEGIN WITH CAPS UNLESS THEY WOULD START */6/* WITH CAPS IN RUNNING TEXT. FOR EXAMPLE, *//* *///* WRONG: /* O DO NOT USE PUNCTUATION AT THE END OF A MESSAGE. *//* */N/* O AVOID USING CONTRACTIONS IN MESSAGES. FOR EXAMPLE, USE "cannot" */E/* INSTEAD OF "can't" AND "does not" INSTEAD OF "doesn't". *//* */L/* O "It's" IS A CONTRACTION FOR D( "it is". THE POSSESSIVE IS "its". *//* */M/* O USE THE WORDS "and" OR "or" INSTEAD OF A "/" WHENEVER POSSIBLE. *//* */9/* WRONG: /* ADD SEVERAL SHADOWING-RELATED MESSAGES TO REPLACE THE *//* TOO-GENERIC INCSHAMEM. *//* */(/* X-118 CLAIR GRANT 21-APR-2004 */>/* ELIMINATE "Digital" AND "DEC" FROM ERROR TEXT STRINGS *//* */,/* X-117 WBF BURNS FISHER 31-MAR-2004 */P(/* ADD SS$_CALLUNDEFSYM *//* */./* X-116 JRC JOHN R. COVERT 12-MAR-2004 */7/* ADD XVALNOTVALID FOR EXTENDED LOCK VALUE BLOCK *//* */2/* X-115 RAB086 ROBERT A. BROOKS 03-FEB-2004 */%/* ADD HBMMCREPOSTMRG FOR HBMM. *//* */./* X-114 DJM DENNIS MATTOON 27-JAN-2004 */%/* ADD SYMBOLS/MESSAGES FOR TIE *//* */2/* X-113 RAB085 ROBERT A. BROOKS 16-JAN-2004 */9/* ADD WLGCANTHBMM FOR HBMM, TO INDICATE THAT OLDER */>/* DEVICES CAPABLE OF MSCP-BASED Q(MINIMERGE (HSC/HSD/HSJ) *//* CANNOT USE HBMM. *//* */2/* X-112 RAB084 ROBERT A. BROOKS 14-JAN-2004 */>/* ADD SEVERAL MESSAGES FOR HOST-BASED MINIMERGE (HBMM). *//* */0/* X-111 KLN3346 KAREN L. NOEL 7-SEP-2003 */4/* O CHANGE TAKEN_BRANCH TO USE DISPLAY PC/PS. */F/* O CHANGE NEW REASON MASKS TO BYTES OR WORDS INSTEAD OF QUADS. *//* */1/* X-110 KLN3340 KAREN L. NOEL 28-AUG-2003 */A/* O ADD SS CODES FOR TAKEN BRANCH FAULT, IA32 TRAP, DEBUG */#/* R(FAULT AND SYSTEM BREAK. */./* O FIX SEVERITY OF APPLICATION BREAK. */>/* O FIX NATFAULT TO DISPLAY REASON MASK INSTEAD OF ISR. *//* */0/* X-109 KLN3299 KAREN L. NOEL 4-JUN-2003 *//* ADD SS$_INSF_SHM_REG. *//* */0/* X-108 LC0001 LARRY CAMILLI 12-MAR-2003 *//* ADD SS$_FILENOTCACHED. *//* *///* X-107 PJB0044 PAUL BENOIT 02-DEC-2002 *//* ADD SS$_BREAK_ARCH. *//* *///* X-106 PJB0029 PAUL BENOIT 08-NOV-2002 *//* ADD SS$_BREAK_APPL. */S(/* *///* X-105 PJB0021 PAUL BENOIT 18-OCT-2002 *//* ADD SS$_FLTDENORMAL. *//* *///* X-104 PJB0013 PAUL BENOIT 12-SEP-2002 *//* ADD SS$_NATFAULT. *//* */1/* X-103 SAD STUART A. DAVIDSON 18-JUL-2002 */>/* ADD TURSTCONF FOR USE WHEN AN OPERATION WOULD VIOLATE */@/* THE TRUSTED ENVIRONMENT FOR PRIVILEGED IMAGE EXECUTION. *//* */,/* X-102 RUTH GOLDENBERG 10-MAY-2002 */B/* MODIFY SS$_INCOMPAT TEXT FOR USE BY $GETJPI IN A FAILURE */</* TO T( GET AN UNDEFINED ITEM CODE FROM A TARGET SYSTEM. *//* */2/* X-101 DJS011203 DAVE SWEENEY 07-DEC-2001 */:/* ADD SS$_FORCEX FOR USE BY DCL COMMAND STOP/IMAGE. *//* */3/* X-100 EMW0253 ELINOR M. WOODS 15-OCT-2001 */4/* ADD SS$_EXITFORCED FOR USE BY SYS$DELPRC IN */+/* SUPPORT OF NEW EXIT FUNCTIONALITY. *//* */1/* X-99 MAS0677 MARK A. STILES 24-AUG-2001 */</* ADD SS$_PRESTO FOR USE BY INTERRUPT OR FORK SERVICE */?/* ROUTINES WHICH HAVE KNOWLEDGE THAT T U(HE SAVED INTERRUPT */;/* OR EXCEPTION FRAME NEED NOT BE MULTIPLY PRESERVED. *//* */1/* X-98 MAS0671 MARK A. STILES 16-MAR-2001 */?/* ADD SS$_FISH FOR MESSAGE TRANSLATION, OR LACK THEREOF. *//* */'/* X-97 ABP ANU PANT 18-SEP-2000 */9/* ADD SS$_PATHAMBIG, SS$_INVMVIP, SS$_NOPATHAVAIL, */8/* AND SS$_NOENACURINV FOR USE BY MULTIPATH SYSTEM *//* SERVICE. *//* *///* X-96 JMB224 JAMES M. BLUE 7-MAR-2000 */A/* ADD SS$_NOSUCHQPOOLID FOR USE BY QIOV(SERVER'S HANDLING OF */?/* POOL DEALLOCATION. CORRECT PREVIOUS QIOSERVER MESSAGE *///* ADDS TO CONFORM WITH GUIDELINES ABOVE. *//* */0/* X-95 KLN2158 KAREN L. NOEL 03-MAR-2000 *//* ADD BADRAD. *//* *///* X-94 JMB197 JAMES M. BLUE 6-JAN-2000 */9/* ADD SS$_QPOOL_DEL_INIT, SS$_QPOOL_DEL_INPRG, AND */>/* SS$_QPOOL_DEL_BUSY FOR USE BY QIOSERVER'S HANDLING OF *//* POOL DEALLOCATION. *//* *///* X-93 EMB ELLEN M. BATBOUTA 05-NOV-1999 */F/* W( ADD SS$_NOADD AND SS$_SYSTEMUIC MESSAGES FOR THE CLASS *//* SCHEDULER. *//* *///* X-92 JMB183 JAMES M. BLUE 23-SEP-1999 */</* ADD MESSAGES FOR QIOSERVER'S QIO$CONFIGURE AND QCP. *//* *///* X-91 EMB ELLEN M. BATBOUTA 12-AUG-1999 */@/* ADD SS$_INCLASS ERROR MESSAGE. THIS ERROR MESSAGE WILL */A/* BE RETURNED BY THE $SCHED SYSTEM SERVICE WHEN AN ATTEMPT */?/* IS MADE TO CLASS SCHEDULE A PROCESS/KERNEL THREAD WHEN */:/* IT ALREADY BELONGS TO A SCHEDULI X(NG CLASS FROM THE */'/* CLASS SCHEDULER DATABASE FILE. *//* *///* X-90 JMB076 JAMES M. BLUE 22-MAR-1999 */8/* ADD SS$_NOQIOSERVER - QIOSERVER'S QIO$CONFIGURE */9/* PROCESS IS NOT AVAILABLE TO HANDLE SYS$QIOSERVER */9/* REQUESTS. ADD SS$_INVQSRFNC - THE FUNCTION CODE */1/* IN THE SYS$QIOSERVER REQUEST IS INVALID. *//* */I/* X-89 GP GENADY PERCHENKO 18-FEB-1999 */"/* ADD WRONGDRV *//* */0/* X-88 JAH0323 JY(OHN A HARNEY 10-DEC-1998 */8/* ADD PERSONARESERVED FOR OPERATIONS ATTEMPTED ON */"/* A RESERVED PERSONA INDEX. *//* */./* X-87 JRK390 JIM KAUFFMAN 11-SEP-1998 */8/* ADD NOCPUMATCH AND TRIM CPUSELECTED TO FIT PAGE *//* */./* X-86 JRK390 JIM KAUFFMAN 9-JUL-1998 *//* ADD CPUSELECTED *//* */1/* X-85 KJP-SDOS KEVIN PLAYFORD 29-JUN-1998 */?/* UPDATE SNAPSHOT SERVICES MESSAGES BASED ON DEVICE NAME *//* CHANGE. *//* *///* X-84 EMB ELLEN M. BA Z(TBOUTA 04-JUN-1998 */D/* ADD 2 NEW ERROR MESSAGES, NOFASTPATH AND CPUNOTAVAIL. *//* */I/* X-83 GP GENADY PERCHENKO 26-MAY-1998 */H/* FIX A TYPO IN ERROR SYMBOL. IT SGOULD BE DEVNOTCON */-/* INSTEAD OF MPDEVNOTCON. *//* */I/* X-82 GP GENADY PERCHENKO 20-MAY-1998 */K/* ADD SOME MORE MULTIPATH STATUS CODES. AND RENAME SOME */$/* EXISTING ONES. *//* [( */I/* X-81 GP GENADY PERCHENKO 02-APR-1998 */9/* ADD NEW STATUS CODES FOR MULTIPATH. *//* */)/* X-80 DAVE BERNARDO 24-FEB-1998 */=/* ADD BADLCKTBL AND MAKE BROKEN A SUCCESS STATUS CODE. */-/* MAKE THE ERROR TEXT MORE MEANINGFUL. */ /* */,/* X-79 AHM039 DREW MASON 17-FEB-1998 */>/* ADD MORE STATUS CODES FOR GALAXY MEMBERSHIP SERVICES. *//* */5/* X-78 PKH-G006 PAUL K. HARTER, JR. 27-JAN-1998 */?/* AD\(DED TWO STATUS CODES FOR GALAXY MEMBERSHIP SERVICES. *//* */,/* X-77 AHM034 DREW MASON 26-JAN-1998 */:/* ADD STATUS CODES FOR GALAXY MEMBERSHIP CALLBACKS. *//* */,/* X-76 NELSON PAT NELSON 14-JAN-1998 */0/* CLEANED UP INSTRUCTIONS AT TOP OF FILE. *//* */,/* X-75 DMB DAVE BERNARDO 07-JAN-1998 */2/* ADD MORE STATUS CODES FOR GALAXY LOCKING. *//* */*/* X-74 HAR HAROLD READ 10-DEC-1997 */-/* ADD NEW STATUS CODE FOR MSCP ERRORS. *//* */I/* ]( X-73 JAH0250 JOHN A HARNEY 11-NOV-1997 */J/* ADD SS$_NOSUCHEXT FOR IMPERSONATION SERVICES TO TELL */9/* THE USER THERE'S NO SUCH EXTENSION. *//* */,/* X-72 DMB DAVE BERNARDO 27-OCT-1997 */-/* ADD STATUS CODES FOR GALAXY LOCKING. *//* */0/* X-71 KLN2008 KAREN L. NOEL 21-OCT-1997 */7/* ADD NEW STATUS CODES FOR GALAXY SHARED MEMORY. *//* */+/* X-70 HAR HAROLD READ 18-SEP-1997 */A/* ADD ^( TEN NEW ERROR MESSAGES FOR DU/TUDRIVER. *//* */(/* X-69 ANDY KUEHNEL 10-SEP-1997 */I/* ADD SS$_SECREFOVF ERROR TO BE RETURNED IF ADDING MORE REFERENCES */I/* TO A GLOBAL SECTION WOULD CAUSE THE REFERENCE COUNT TO OVERFLOW. *//* */3/* X-68 WDB:MTD20 WALTER BLASCHUK 13 AUG 1997 */C/* MULTIPLE TAPE DENSITY PROJECT: INSERT TWO INFORMATIONALS */E/* SS$_NOTATBOT AND SS$_PREVSDENS. ALPHA AND VAX. *//* */1/* X-67 KJP-SDOS KEVIN PLAYFORD 18-JU_(L-1997 */G/* UPDATE SNAP CAPABLE DISK ERROR MESSAGES AND RESERVE SOME EXTRA *//* MESSAGES. *//* */1/* X-66 KJP-SDOS KEVIN PLAYFORD 11-JUN-1997 */F/* ADD SS$_TOOMANYFRAGS AND SS$_TOOMANYFAMILIES FOR SNAP CAPABLE *//* DISK. *//* *///* X-65 IBB038 IAN BROCKBANK 4-JUN-1997 */9/* F11BXQP HFS LATENT SUPPORT - ADD SS$_NOTF11ODS5, */'/* SS$_NOCONVJNL AND SS$_NORAD50. *//* *///* X-64 BMAN BRIAN MAN 21-MAR-1997 */L/* NO CHANGE `(S: CLEAN UP SOME SO DIFFS WORK BETTER BETWEEN *//* THE VAX VERSION *//* */I/* X-63 DOUGLAS FYFE 14-FEB-1997 */O/* MAINLINE MERGE OF PER-THREAD SECURITY SUPPORT: (GEN 58A1) */J/* ADD SS$_PERSONADELPEND TO BE RETURNED WHEN A REQUEST */J/* TO DELETE A PERSONA IS PREVENTED ONLY BY OUTSTANDING */-/* REFERENCES IN REFCOUNT. *//* */4/* X-62 JMP-VDC JULIAN PALMER 29-JAN-1997 */ a(2/* ADD SS$_FLUSHFAIL FOR VDC LATENT SUPPORT. *//* */+/* CW-SD CHRIS WHITAKER 29-JAN-1997 */;/* ADD ADDITIONAL ERROR MESSAGES FOR SNAPSHOT-CAPABLE *//* DISK. *//* */3/* X-61 NYK656 NITIN Y. KARKHANSI 21-AUG-1996 */=/* ADDED SS$_NOSHPTS AS PART SHARED PAGE TABLE SUPPORT. *//* *///* X-60 KLN1572 KAREN L. NOEL 6-AUG-1996 */@/* O ADDED SS$_RES_MEM_INCON FOR RESERVED MEMORY REGISTRY. */?/* O ADDED SS$_PTE_NOT_EMPTY FOR SYSTEM PTE DEALLOCATION. */ b(/* */3/* X-59 NYK640 NITIN Y. KARKHANIS 17-JUL-1996 */E/* O ADDED SYSTEM SERVICE MESSAGE FOR SHARED PAGE TABLE SECTION */&/* CREATION, SS$_CREATED_SHPT. */9/* O REMOVED SS$_MRES_NOTREG, SS$_MRES_REGSMALL AND */*/* SS$_MRES_REGBIG FOR KAREN NOEL. *//* *///* X-58 KLN1546 KAREN L. NOEL 2-MAY-1996 */D/* ADDED SYSTEM SERVICE MESSAGES FOR MEMORY RESIDENT SECTIONS. */A/* MRES_REGSMALL, MRES_REGBIG, MRES_NOTREG, MRES_PFNSMALL, */?/* MRES_INCON, NORESERV c(EDMEM, RESERVEDMEMUSED, NOMEMRESID *//* */2/* X-57 JACH0010 JEREMY A. C. HITT 2-MAR-1996 */:/* ADDED THE FOLLOWING MESSAGES FOR ACME: NOEXTAUTH, */*/* ERRMAPAUTH, AUTHFAIL AND INVUSER. *//* */-/* X-56 WXD BILL DAVENPORT 13-DEC-1995 */-/* PER-THREAD SECURITY STAGE 1 CHECKIN: *//* */C/* ADD NODELPERMANENT ERROR CODE TO BE RETURNED WHEN DELETION */B/* OF A PERMANENT PERSONA IS ATTEMPTED. ALSO, RENAME DETACH */B/* PRIVILEGE TO IMPERSONATE. ADD LITERAL S d(O THAT OLD SYMBOL *//* STILL GETS CREATED. *//* */1/* X-55 PKW338 PAUL K. M. WEISS 8-NOV-1995 */H/* ADD SS$_THREAD_UPCALL, WHICH IS USED TO COMMUNICATE FROM KERNEL */F/* INTERNAL SERVICES TO THE CALLER'S MODE JACKET THAT IT SHOULD *//* MAKE AN UPCALL *//* */9/* X-54 JCH703B JOHN C. HALLYBURTON, JR. 10-OCT-1995 */E/* ADD SS$_NOBUFOBJID (ATTEMPTED USER MODE CREATE BUFFER OBJECT */&/* WITHOUT A RIGHTS IDENTIFIER). *//* */0/* X-53 KLN1520 KAREN L. e(NOEL 28-SEP-1995 */=/* 1. FIX SEVERAL NEW SS$ CODES TO BE ERRORS INSTEAD OF *//* WARNINGS. */?/* 2. SHORTEN SEVERAL NEW SS$ CODE NAMES SO THEY ARE LESS */F/* THEN 15 CHARACTERS. OTHERWISE, THEY GET TRUNCATED IN THE *//* MESSAGE TEXT. */$/* 3. FIX TEXT OF SS$_CHANVIO. *//* */0/* X-52 KLN1514 KAREN L. NOEL 12-SEP-1995 */</* 1. CHANGE MESSAGE TEXT FOR SS$_IVPROTECT TO INCLUDE */*/* INVALID GLOBAL SECTION PROTECTION */3/* 2. FIX TYPO IN SS$_Of(FFSET_NOTBLOCK MESSAGE *//* */+/* X-51 WBF BURNS FISHER 7-SEP-1995 */%/* ADD SS$_EMULATE INFO MESSAGE *//* */9/* X-50 JCH703A JOHN C. HALLYBURTON, JR. 8-MAR-1995 */#/* ADD EXBUFOBJLM ERROR CODE. *//* */3/* X-49 NYK292 NITIN Y. KARKHANIS 28-FEB-1995 */4/* O DISPLAY THE FULL 64-BITS OF PCS WITH !XH. */A/* O REPLACED INSTANCES OF !XQ WITH !XH (!XQ WAS INTRODUCED *//* IN EDIT X-47). *//* */*/* X-48 RLP050 RAY PFAU 23-FEB-1995 */1/* g(ADD SS$_NOMORETHREAD FOR KERNEL THREADS. *//* */3/* X-47 NYK280 NITIN Y. KARKHANIS 23-FEB-1995 */E/* 64-BIT PROJECT: PROMOTE ADDRESS ARGUMENTS IN SYSTEM MESSAGES */>/* FROM !XL TO !XQ. $FAO NOW HANDLES QUADWORD BY VALUE! *//* */0/* X-46 KLN1389 KAREN L. NOEL 16-FEB-1995 */:/* ADD EVEN MORE SS$ CODES FOR 64-BIT GLOBAL SECTION *//* SYSTEM SERVICES. *//* *///* X-45 KLN1377 KAREN L. NOEL 3-FEB-1995 */=/* ADD ANOTHER SS$ CODE FOR 64-BIT MMG SYSTEM SER h(VICES. *//* *///* X-43 KLN1342 KAREN L. NOEL 1-DEC-1994 */A/* ADD SOME FORGOTTEN CODES FOR 64-BIT MMG SYSTEM SERVICES. *//* */0/* X-42 KLN1333 KAREN L. NOEL 16-NOV-1994 */=/* ADD NEW CODES NEEDED FOR 64-BIT MMG SYSTEM SERVICES. *//* */)/* X-41 TRB TOM BENSON 02-NOV-1994 */F/* ADDED SS$_RESIGNAL_64 AND SS$_CONTINUE_64. THESE ARE VARIANTS */C/* OF THEIR 32-BIT COUNTERPARTS THAT TELL EXCEPTION THAT THE */,/* 64-BIT SIGNAL ARRAY SHOULD BE USED. */ i(/* */6/* X-40 LSS0312 LEONARD S. SZUBOWICZ 20-OCT-1994 */C/* ADD SS$_NOT64DEVFUNC. THIS IS RETURNED BY THE $QIO SYSTEM */A/* SERVICE IF THE P1 PARAMETER HAS MORE THAN 32 SIGNIFICANT */6/* BITS AND THE DRIVER DOES NOT SUPPORT 64-BITS. *//* */1/* X-39 KLN1326 KAREN L. NOEL 18-OCT-1994 *//* 64-BIT PROJECT: */!/* ADD SS$_ARG_GTR_32_BITS *//* */9/* X-38 JCH703 JOHN C. HALLYBURTON, JR. 5-OCT-1994 */</* ERROR CODES FOR FAST-IO: BADFANDLE THRU UNSUPVj(OLSET *//* */3/* X-37 JFD0633 JAMES F. DUNHAM 15-SEP-1994 */>/* FOLD FROM X-33U3 - ADD MESSAGES TO SUPPORT SCSI-2 TCQ *//* */1/* X-36 NANCY JEAN BURKHOLDER 19 SEP 1994 */$/* ADD SS$_ZEROALLOCLS MESSAGE *//* */+/* X-35 DBK001 DAN KYLER 7-SEP-1994 */F/* ADD MESSAGES FOR SMFS LAYERED PRODUCT IN MME RESERVED REGION. *//* FOLDED FROM X-33U1. *//* */3/* X-34 DMB002 DAVID M. BERNARDO 28-AUG-1994 */C/* ADD SS$_NOMULTITHREAD, SS$_MTHREADACTIVEk(, SS$_MAXKTHREADS, */=/* SS$_NOSUCHTHREAD, SS$_NOTHREADMAN, SS$_NOSUCHUPCALL, *//* SS$_TMACTIVE. */ /* */,/* X-33 JHH-BL5 JIM HOGG 6-JUL-1994 */@/* ADD SS$_INSFTHREADS & SS$_NOTSUPFS FOR F64 FILE SYSTEM. *//* */3/* X-32 RAB0191 RICHARD A. BISHOP 3-JUN-1994 */)/* ADD SS$_SIGNAL64 FOR MIKE HARVEY *//* */5/* X-31 SAD0308 STUART A. DAVIDSON 22-MAR-1994 */B/* ADD INSFP1POOL TO CLEARLY IDENTIFY INSUFFICIENT CTLPAGES. *//* */0/* X-30 RAB RIC l(HARD A. BISHOP 15-MAR-1994 */,/* PICK UP THE FOLLOWING CORAL CHANGE: *//* */3/* X-35 FAK004 FORREST A. KENNEY 11-JAN-1994 */E/* ADD NEW MESSAGE /* CORRECTED SPELLING, PUNCTUATION, AND LEGAL ERRORS IN *//* MESSAGE TEXT. *//* */0/* X-25 RAB RICHARD A. BISHOP 17-AUG-1993 */ /* PICK UP NEW VAX SYMBOL: *//* */./* X-32 WXD BILL DAVENPORT 11-AUG-1993 */8/* ADD SS$_IVNODNAM, INVALID NODE NAME FOR DECNETn(. *//* */,/* X-24 HH1202 HAI HUANG 12-AUG-1993 */-/* ADD NEW IEEE ARITHMETIC EXCEPTIONS. *//* */./* X-23 HH1110 GENE LEACHE 15-JUL-1993 */ /* ADD SS$_NOCALLTRANS_SUP *//* */,/* X-22 HH1110 HAI HUANG 14-JUN-1993 */7/* ADD SS$_TARGET_UNWIND, SS$_TARGET_GOTO_UNWIND. *//* */,/* X-21 HH1101 HAI HUANG 26-MAY-1993 */A/* REPLACE REASON MASK WITH I/O STATUS IN PAGE READ ERRORS. *//* */Q/* X-20 MW MARK WATTS o( 25-MAY-1993 */P/* ADD A NEW FILESYSTEM ERROR MESSAGE CALLED SHELFERROR, THIS */S/* WILL BE RETURNED THROUGH THE FILESYSTEM BY THE SHELF HANDLER. *//* */0/* X-19 RAB RICHARD A. BISHOP 14-MAY-1993 */$/* FOLD INITIAL CORAL CHANGES: *//* */5/* X-21A1A1 MME001 MICHAEL BEELER 12-OCT-1992 */6/* ADD MME (MEDIA MANAGEMENT EXTENSION) MESSAGES *//* */0/* X-18 RAB RICHARD A. BISHOP 14-APR-1993 */?/* FOLD OF BLADE/DELTA CLEA p(NUP (REQUIRED SS$_FDT_COMPL TO *//* CHANGE VALUE): *//* */1/* X-14U3 RAB RICHARD A. BISHOP 14-APR-1993 */4/* MERGE BLADE CHANGES AND RESOLVE CONTENTION: *//* */5/* X-25A1 AJM93032 ANDREW J. MOSKAL 11-MAR-1993 */?/* ADD NOTRANQUIL AND SMALLHEADER - MAC RELATED MESSAGES. *//* */./* X-17 EHL003 GENE LEACHE 1-APR-1993 *//* ADD SIG_ARGMISMATCH */F/* */./* X-16 EHL003 GENE LEACHE 22-M q(AR-1993 */:/* ADD SIG_INVARGTYPE, SIG_INVFLTARG, SIG_INVARGLIST */F/* */I/* X-15 WDB:HLL004 WALTER D. BLASCHUK, JR. 06-JAN-1993 */</* HLLDD PROJECT: FDT PROCESSING CHANGES. */>/* ADD THE SS$_FDT_COMPL CONSTANT. THIS WILL INDICATE */=/* THAT FDT PROCESSING IS COMPLETE. IT SAYS NOTHING */(/* ABOUT THE PRESENCE OF AN ERROR. *//* */*/* X-14 RLP017 RAY PFAU 18-DEC-1992 */= r(/* CLARIFY CPUSTOPPING TEXT. FIX TYPO IN NOTALLCANCELED *//* TEXT. *//* *///* X-13 RAB RICHARD A. BISHOP 20-NOV-1992 */F/* NEW SYMBOLS FOR PAUL HOULIHAN (SCS), PLUS MORE BLADE CHANGES: *//* */*/* PJH PAUL J. HOULIHAN 20-NOV-1992 */@/* ADD SCS INTERNAL STATUS. THESE ARE NEVER SEEN BY USERS. *//* */?/* X-24 MWD0038 MICHAEL DANIELE 20-OCT-1992 14:13 */B/* ADD NAMESERVCOMMERR - "Name service communications error" */!/* ON BEHALF OF DECNET/OS s(I. *//* */E/* X-23 DDP1354 DERRELL D. PIPER 30-SEP-1992 16:36 */E/* ADD MESSAGE FOR ATTEMPT TO ADD A PROTECTED SUBSYSTEM ID WITH */E/* ATTRIBUTES THAT EXCEED THOSE OF ITS HOLDER (SS$_SSANOTAUTH). */B/* ALSO ADD A MESSAGE FOR INVALID FILE OWNER (SS$_BADOWNER). *//* */E/* X-22 DDP1337 DERRELL D. PIPER 16-SEP-1992 17:55 */@/* UPDATE NOPRIV, EXQUOTA, AND OBJNOTLOCKED MESSAGE TEXTS. *//* */0/* X-12 RS00375 RICHARD SAYDE 1-SEP-1992 t(*/@/* CORRECT MESSAGE TEXT FOR ALIGNMENT FAULT TRAP. REGISTER */@/* INFORMATION IS NO LONGER PROVIDED, IT IS NOW A FUNCTION */,/* CODE - 0 MEANS LOAD, 1 MEANS STORE. *//* */+/* X-11 HH0974 HAI HUANG 16-AUG-1992 */-/* CORRECT MESSAGE TEXT FOR SS$_FLTINV. *//* *///* X-10 RAB RICHARD A. BISHOP 14-AUG-1992 */&/* PICK UP ANOTHER BLADE CHANGE: *//* */3/* X-21 JAD045 JOSEPH A. DZIEDZIC 29-JUN-1992 */:/* ADD "page read error across access modes" STATUS, u(*//* SS$_PAGRDERRXM. *//* */./* X-9 RAB RICHARD A. BISHOP 16-JUL-1992 */;/* PICK UP CHANGE FROM VAX, RESET IDENT & AUDIT TRAIL *//* */3/* X-19 RLA095B ROBERT L. ADAMS 12-JUN-1992 */:/* OBSOLETE CHARGE CODE ACCOUNTING AND REPLACE WITH */6/* MORE DESCRIPTIVE PROTECTED SUBSYSTEMS ERRORS. */,/* ADD COMMENT ON OBSOLETING MESSAGES. *//* */-/* X-22 EHL002 GENE LEACHE 8-JUL-1992 *//* ADD SS$_ILLPOLICY *//* */-/* X-21 EHL001 GENE LEACHE 18-v(JUN-1992 *//* ADD SS$_ILLPRIPOL *//* */3/* X-20 EMB0170 ELLEN M. BATBOUTA 12-JUN-1992 */8/* ADD 2 NEW FATAL ERROR MESSAGES, TRANSCALLER AND */</* NOCALLTRANS. THESE MESSAGES INDICATE THAT A NATIVE */;/* IMAGE WAS NOT BUILT CORRECTLY TO INTEROPERATE WITH *//* TRANSLATED CODE. *//* */+/* X-19 HH0931 HAI HUANG 27-MAY-1992 */,/* CHANGE PSL IN ERROR MESSAGES TO PS. *//* *///* X-18 RAB RICHARD A. BISHOP 19-MAY-1992 */&/* PICK UP RECENT BLADE Cw(HANGES: *//* */0/* X-17 ATP014.17 ALAN POTTER 2-APR-1992 */9/* CHANGE ERROR MESSAGE TEXT FOR SS$_TPDISABLED AND *//* SS$_NOLOG. *//* */I/* X-15/16 DDP1198 DERRELL D. PIPER 24-MAR-1992 18:15 */B/* FIX PUNCTUATION OF MESSAGES FOR HELP/MESSAGE AND ADD SOME */3/* POMPOUS GUIDELINES FOR FUTURE GENERATIONS. *//* */+/* X-17 HH0855 HAI HUANG 10-MAR-1992 */*/* -16 ADD STATUS FOR GENTRAP CODES. *//* */+/* X-15 HH0853 HAI HUANG 26-FE x(B-1992 */;/* ADD SS$_GENTRAP, SS$_GOTO_UNWIND, SS$_EXIT_UNWIND. *//* */3/* X-14 RAB0100 RICHARD A. BISHOP 30-JAN-1992 */;/* MERGE BLADE AND ALPHA VERSIONS OF THIS FILE. THIS */:/* IS BEING DONE SO AS TO LEAVE BLADE VALUES INTACT. */9/* WHERE CHANGES IN VALUES ARE NECESSARY, THEY ARE *//* HAPPENING TO ALPHA. *//* */=/* ALSO MOVE SS$_IMGDMP (PREVIOUS BLADE CHECKIN). THIS */=/* WAS WRONGLY PLACED, AND CAUSED SOME SYMBOLS TO MOVE. */3/* THEY NOW Gy(O BACK TO THEIR ORIGINAL VALUES. *//* */;/* AS LUCK WOULD HAVE IT, THIS CHECKIN IS GENERATION */$/* 14 ON BOTH MASTERPACKS..... *//* */0/* ======================================== *//* */;/* 30-JAN-1992: WHAT FOLLOWS IS THE BLADE AUDIT TRAIL */)/* FROM 30-NOV-1990 TO 20-DEC-1991 *//* */0/* ======================================== *//* */2/* X-13 SJVMAJ STEPHEN J. VIVIAN 20-DEC-1991 */1/* ADD SS$_IMGDMP SIGNAL FOR MAJIQ SUPPORT. *//* */ z(=/* X-12 CRB0711 COLIN R. BLAKE 18-DEC-1991 13:18:23.93 */=/* THIS IS THE C2 VERSION BEING INSERTED INTO MAINLINE. *//* */J/* X-8A3A1A2 THE GREAT MERGER NASSER ABBASI 11-DEC-1991 */!/* MERGE T4 WITH BLADE_BLD6 */)/* COPY OF HISTORY FROM BLD6 MODULE */)/* -------------------------------- */9/* X-11 JFD0031 JAMES F. DUNHAM 8-JAN-1991 */8/* ADD MESSAGES TO SUPPORT ISO 9660 VOLUME MOUNTS *//* */9/* X-8A3A1A1 DOR DENNIS O. ROGERS 2{(6-NOV-1991 12:19 *//* C2 BLADE MERGE (T4): *//* */2/* X-10 CBD0238 CHARLES B. DUNN 14-OCT-1991 */,/* ADD SS$_TIMENOTSET FOR DTSS SUPPORT *//* */A/* X-8A3A1 CRB0044 COLIN R. BLAKE 6-NOV-1991 08:58 *//* T3 MERGE: */ /* */0/* X-9 EJL0610 EDWARD J. LOS 02-OCT-1991 */@/* RESET VERSION TO MATCH GENERATION. ADD SYSTEM SNAPSHOT *//* VALIDATION ERRORS *//* */2/* X-8A3 CRB0030 COLIN R. BLAKE 23-OCT-1991 *//* MORE C2 MERGING: */ |(/* */6/* T-6T9 SAD0144 STUART A. DAVIDSON 18-OCT-1991 */:/* ADD NOOJBSRV ERROR -- OBJECT SERVER NOT RUNNING. *//* */4/* X-8A2 FAK0003 FORREST A. KENNEY 16-OCT-1991 */!/* MERGE LATEST C2 CHANGES. *//* */>/* T-9 DDP0887 DERRELL D. PIPER 4-OCT-1991 18:43 */'/* ADD ITEM CODE ERROR MESSAGES. *//* */4/* X-8A1 FAK0002 FORREST A. KENNEY 20-SEP-1991 */A/* MERGE C2 MESSAGES INTO MAINLINE, FIX IDENT TO AGREE WITH */'/* CMS DUE TO MASTERPACK CL}(EANUP. *//* */</* X-80T8 LMP0542 L. MARK PILANT, 29-JUL-1991 16:42 */@/* ADD A MESSAGE TO INDICATE THAT DELETION OF FILES WITH *///* ACTIVE RMS JOURNALING IS NOT ALLOWED. *//* */6/* LMP0544 L. MARK PILANT, 30-JUL-1991 14:45 */6/* ADD A MESSAGE TO INDICATE THE SUPPLIED FILE */?/* SPECIFICATION IS INVALID FOR THE ATTEMPTED OPERATION. *//* */./* T-7 RLA ROBERT L. ADAMS 26-JUN-1991 */./* FOLD MAGIC CHANGES INTO TRANQUILITY. *//* */8/*~( T-6 DDP0977 DERRELL D. PIPER 7-JUN-1991 10:01 *//* ADD OVRMAXAUD. *//* */./* T-5 AJM ANDREW J. MOSKAL 13-MAY-1991 */A/* ADD INVSECOPER, NOCLASSSUPPORT - MAC PROTECTION RELATED *//* MESSAGES. *//* */4/* T-4 SAD0116 STUART A. DAVIDSON 3-MAY-1991 */9/* ADD ILLRSDM (ILLEGAL RESOURCE DOMAIN OPERATION) *//* */7/* X-80T3 SAD0109 STUART A. DAVIDSON 19-APR-1991 */0/* ADD OBJECT CONTEXT NOT LOCKED MESSAGE. *//* */7/* X-80T2 SAD0109 ST(UART A. DAVIDSON 11-MAR-1991 */</* ADD MISSED MESSAGES FOR SECURITY OBJECT MANAGEMENT *//* */6/* X-81 RLA0147 ROBERT L. ADAMS 15-FEB-1991 */7/* ADD SECURITY MESSAGES ADDED FOR PHOENIX WORK. *//* */1/* X-87 PMV0169 PETER M. VATNE 20-JUN-1991 *//* ADD SS$_DEVNOTWS. *//* */,/* X-86 CW CHRIS WHITAKER 10-MAR-1991 */ /* ADD SS$_REMEMBER ALIAS. *//* */2/* X-85 FAK001 FORREST A. KENNEY 08-MAR-1991 *//* ADD SS$_QUEUED. *//* */,/* X-8 (4 JLBBP01 J.L. BERG 28-FEB-1991 */+/* ADD SS$_NOREADER AND SS$_NOWRITER. *//* */,/* X-83 CW CHRIS WHITAKER 26-FEB-1991 */1/* ADD ERROR CODES FOR DECDTM V1.2 SUPPORT. *//* */1/* X-82 RG40077 RAY GUZMAN 21-FEB-1991 */G/* ADD 4 NEW CODES. SS$_BADCHECKSUM, SS$_INVSECDOMAIN, */*/* SS$_ARBTOOBIG, AND SS$_ORBTOOBIG. *//* */6/* X-81 RKK0058 ROBERT K. KOSAKOWSKI 19-FEB-1991 */B/* RESERVE 20 MESSAGE CODES FOR MEDIA MANAGEMENT EXTENSIONS. */(/* (FOR DAN KYLER) *//* *///* X-46U12 LPL0001 LEE LEAHY 30 NOV 1990 *//* MERGED EDIT X-74 *//* */-/* X-74 LPL0001 LEE LEAHY 12 OCT 1990 */>/* ADDED SS$_INVBUSNAM, SS$_INVCOMPTYPE, SS$_INVCOMPID, */7/* SS$_INVCOMPLIST, SS$_RMTPATH, AND NOCOMPLSTS. *//* */0/* ======================================== *//* */;/* 30-JAN-1992: WHAT FOLLOWS IS THE ALPHA AUDIT TRAIL */)/* FROM 16-JUL-1990 TO 18-DEC-1991 *//* */0/* =====================(=================== *//* */0/* X-13 RS00233 RICHARD SAYDE 18-DEC-1991 */7/* ADD ERROR CODES FOR ALIGNMENT FAULT REPORTING. *//* *///* X-12 TNS001 TOM SCARPELLI 24-OCT-1991 */:/* ADD MESSAGES FROM VAX SIDE FOR NEW QUEUE MANAGER. *//* */2/* X-11 DMB001 DAVID M. BERNARDO 23-OCT-1991 *//* ADD SLICING_DISABLED. *//* *///* X-10 WMC010 WAYNE CARDOZA 24-SEP-1991 *//* ADD UNALIGNED SP LOAD. *//* */./* X-9 TNS001 TOM SCARPELLI 17-JUN-1991 */ (C/* ADD MESSAGES FROM VAX SIDE FOR $FORGE_WORD SYSTEM SERVICE. *//* */6/* X-8 RWC038 RICHARD W. CRITZ, JR. 12-JUN-1991 */C/* CHANGE SS$_DRVEXISTS AND SS$_DEVEXISTS FROM INFORMATIONALS *//* TO WARNINGS. *//* */*/* X-7 HH0624 HAI HUANG 09-APR-1991 */</* ADD SS$_ALTER, ALTER STACK FRAMES, FOR TIE SUPPORT. *//* */,/* X-K10 LPL001 LEE LEAHY 4 APR 1991 */2/* INCLUDED THE DEFINITIONS FROM IOWA/SIGMA. *//* */0/* X-46U12 LPL0001 LEE LEAHY 30 NOV ( 1990 *//* MERGED EDIT X-74 *//* */./* X-74 LPL0001 LEE LEAHY 12 OCT 1990 */?/* ADDED SS$_INVBUSNAM, SS$_INVCOMPTYPE, SS$_INVCOMPID, */8/* SS$_INVCOMPLIST, SS$_RMTPATH, AND NOCOMPLSTS. *//* */+/* X-K9 HH0610 HAI HUANG 25-FEB-1991 */>/* ADD ALPHA HARDWARE EXCEPTIONS SS$_HPARITH, SS$_ALIGN. *//* */2/* X-K8 RFH002 ROBERT F. HOFFMAN 23-JAN-1991 */:/* ADD SS$_QIO_CROCK FOR SPECIAL TREATMENT THAT $QIO */</* NEEDS IN ORDER TO FAULT IN A PAGE IN C(ALLER'S MODE. *//* */3/* X-K7 MSH1062 MICHAEL S. HARVEY 13-DEC-1990 */:/* ADD SS$_INVARG FOR $CRMPSC AND $MPGBLSC SERVICES. *//* */2/* X-K6 RFH001 ROBERT F. HOFFMAN 11-DEC-1990 */=/* ADD SS$_QUEUED FOR TTDRIVER PORT (REPLACES AN UNUSED *//* MESSAGE) *//* */6/* X-K5 RWC003 RICHARD W. CRITZ, JR. 1-NOV-1990 *//* ADD SS$_DRVNOTVALID. *//* */6/* X-K4 RWC003 RICHARD W. CRITZ, JR. 11-OCT-1990 */#/* ADD $LOAD_DRIVER STATUSES. *//* */0/* X(-K3 KLN1027 KAREN L. NOEL 25-JUL-1990 *//* ADD SS$_NOT_LOADED *//* *///* X-K2 WMC0K2 WAYNE CARDOZA 16-JUL-1990 */"/* ADD WAIT IN CALLERS MODE. *//* */0/* ======================================== *//* */</* 30-JAN-1992: WHAT FOLLOWS IS THE COMMON AUDIT TRAIL *//* UP TO 21-MAY-1990 *//* */0/* ======================================== *//* */3/* X-46U11 CW1024 CHRIS WHITAKER 21-MAY-1990 *//* ADD SS$_VOLATILE. *//* */B/* X (-46U10 DDP0643 DERRELL D. PIPER 28-MAR-1990 15:55 *//* ADD SS$_USEGENPWD. *//* */3/* X-46U9 MAS0254 MARK A. STILES 20-FEB-1990 */</* FIXUP OUT-OF-ORDER CODES. MOVE SOME NEW CODES INTO */?/* UNUSED SLOTS. FIX TEXT OF INSFSPT TO BE MORE GENERIC. *//* */7/* X-46U8 CAM0109 CHRISTOPHER A. MEGA 12-FEB-1990 */H/* ADD BOOTREJECT WARNING STATUS - USED BY START/CPU CODE IF A CPU */@/* FAILS TO BOOT BECAUSE IT IS IN THE BOOT_REJECTED STATE. *//* *///* X-46U(7 LBB0010 LEE BARTON 30-NOV-1989 */=/* ADD SS$_ARCHIVING, SS$_ARCHIVED (XQP SUPPORT OF ALM) *//* */;/* X-46U6 LMP0517 L. MARK PILANT, 17-OCT-1989 16:42 */)/* ADD PROTECTED SUBSYSTEM SUPPORT. *//* */0/* X-46U5 RLF RICHARD L. FRANK 16-OCT-1989 */=/* MODIFY INSFSPTS TO BE MORE GENERIC. ADD INSFRPGS AND *//* INSFLPGS. *//* */7/* X-46U4 CAM0072 CHRISTOPHER A. MEGA 06-OCT-1989 */)/* CHANGED CPUSTOPPD TO CPUSTOPPING *//* */@/* X-46U3 DD(P0546 DERRELL D. PIPER 4-OCT-1989 14:24 */./* ADD SS$_NOCALLPRIV FOR $CHECK_ACCESS. *//* */5/* X-46U2 PRD0503 PAUL R. DESTEFANO 25-SEP-1989 */>/* ADD SS$_NOSUCHFAC FOR EVENT FACILITY OBJECT SECURITY. *//* */5/* X-46U1 PRD0495 PAUL R. DESTEFANO 18-SEP-1989 */:/* ADD SS$_INVEVENT FATAL MESSAGE FOR $SETEVTAST AND *//* $CANEVTAST. *//* */2/* X-46 SAS0203 SCOTT A. SHURTS 15-SEP-1989 */9/* ADD SS$_INCONOLCK FATAL MESSAGE FOR $CHANGE_ACL. *//* */5/* ( X-45 CAM0063 CHRISTOPHER A. MEGA 13-SEP-1989 */B/* ADD WARNING AND INFORMATIONAL STATUS FOR ENHANCED PRIMARY */D/* CPU SWITCHING: CPUSTARTIP, CPUSTARTD, CPUSTOPPD, PRIMNOSTP. */%/* ALSO ADDED /FAO=1 TO NSTPPD. *//* */E/* X-44 DDP0429 DERRELL D. PIPER 11-SEP-1989 16:57 */=/* CHANGE THE SEVERITY OF THE NEW PASSWORD STATUS CODES *//* FROM FATAL TO ERROR. *//* */2/* X-43 CBD0198 CHARLES B. DUNN 14-AUG-1989 */7/* ADD SS$_EFNOTSET FOR IOC$PRE (_SIMREQCOM SUPPORT *//* */-/* X-42 RAP0491 ROD A. PAYNE 15-AUG-89 */@/* ADD SS$_HSTBUFACC, TO REPORT HOST BUFFER ACCESS ERRORS. *//* */2/* X-41 CJB0041 CHERYL J. BULMER 9-AUG-1989 */7/* ADD SS$_LOADER, TO REPORT LOADER CYCLE ERRORS. *//* */1/* X-40 MAS0238 MARK A. STILES 9-AUG-1989 */=/* ADD SS$_CPUCAP FOR USE WHEN A REQUESTED CPU DOES NOT */;/* HAVE THE CAPABILITIES REQUIRED TO RUN THE PROCESS. */+/* [FOLD FROM X-29U11 IN V5.3 STREAM] */ /* ( */>/* X-39 MVI0033 MICHAEL V. ILES, 28-JUL-1989 10:08:05.45 */?/* ADD MESSAGE CODE NOSUCHCPB AND CHANGE TEXT FOR ACLFULL *//* */E/* X-38 DDP0387 DERRELL D. PIPER 25-JUL-1989 12:47 */?/* ADD MESSAGE CODES FOR SITE-SPECIFIC PASSWORD POLICIES. *//* */E/* X-37 DDP0375 DERRELL D. PIPER 31-MAY-1989 15:12 */./* REPLACE SOME OBSOLETE MESSAGE CODES. *//* */+/* X-36 HH0340 HAI HUANG 03-OCT-1988 *//* ADD VECALIGN ERROR. *//* ( */-/* X-35 SSA0002 STAN AMWAY 30-SEP-1988 */&/* CORRECT TEXT FOR SS$_VECFULL. *//* */2/* X-34 JEJ0550 JAMES E JOHNSON 19-SEP-1988 */@/* ADD ALRCURTID, RMALRDCL, NOSUCHPART, INVLOG, BADLOGVER, */$/* LOGSTALL, LOGFULL, LOGNAME. *//* */-/* X-33 SSA0001 STAN AMWAY 14-SEP-1988 */7/* ADD NOSUSPEND ("process cannot be suspended"). *//* */9/* X-32 RJB0165 RICHARD J. BOUCHARD JR. 14-SEP-1988 */8/* ADD NOMOREDEV MESSAGE FOR $DEVICE_SCAN SERVICE. *//* ( */=/* X-31 ACG0559 ANDREW C. GOLDSTEIN, 31-AUG-1988 16:28 */:/* ADD HWM_STALL FOR ABORT OF STALLED INTERNAL IRP'S *//* */+/* X-30 HH0334 HAI HUANG 31-AUG-1988 */?/* REPLACE SYSVERDIF WITH A NEW VALUE (I.E. SEVERITY) AND *//* A NEW MESSAGE. *//* */E/* X-29 DDP0308 DERRELL D. PIPER 21-JUL-1988 14:02 */1/* ADD PWDSYNTAX, INVPWDLEN, AND PWDNOTDIF. *//* */2/* X-28 JEJ0527 JAMES E JOHNSON 27-JUN-1988 */>/* ADD NOSUCHTID, NOCURTID, ( WRONGSTATE, VETO, UNKRESULT, */>/* FORGET, PREPARED, NOSUCHRM, ITEMNOTFOUND, NOMOREITEMS *//* */+/* X-26 HH0315 HAI HUANG 18-APR-1988 */5/* -27 ADD NEW STATUS CODES FOR VECTOR SUPPORT. *//* */;/* X-25 PT00010 PANKAJ TANDON 30-DEC-1987 */;/* ADD ALLSTARTED,ALRDYSTRT,ALRDYSTPPD AND NSTPPD FOR */)/* $START/STOP CPU ERRONEOUS CASES. *//* */9/* X-24 LMP0465 L. MARK PILANT, 28-OCT-1987 15:58 */B/* ADD A NEW MESSAGE, SS$_NORIGHTSDB, TO INDI(CATE THAT THERE */?/* IS NOT A RIGHTS DATABASE IS NOT PRESENT ON THE SYSTEM. *//* */)/* X-23 SJF STU FARNHAM 5-OCT-1987 *//* ADD NOSUCHCPU *//* */,/* X-22 DLM006 DAN MURPHY 13-SEP-1987 */*/* INFORMATIONAL CODES FOR $GETSECI. *//* *///* X-21 WMC0021 WAYNE CARDOZA 4-SEP-1987 */(/* FIX A MISSPELLING IN VA_IN_USE. *//* */0/* X-20 WMC0020 WAYNE CARDOZA 27-JUL-1987 *//* ADD NODELETE. *//* */0/* X-19 WMC0019 WAYNE CARDOZA 10-MAR-1987 (*/2/* EXPRCLM SHOULD NOT MENTION SUBPROCESSES. *//* */0/* X-18 WMC0018 WAYNE CARDOZA 19-FEB-1987 *//* ADD VA_IN_USE. *//* */2/* X-17 DDP0029 DERRELL D. PIPER 21-JAN-1987 */8/* CONVERT SS$_BADXXXCTX TO SINGLE BADCONTEXT MSG. *//* */2/* X-16 DDP0027 DERRELL D. PIPER 12-JAN-1987 */./* ADD SS$_TOOMUCHCTX AND SS$_BADUAICTX. *//* */+/* X-15 HH0237 HAI HUANG 06-JAN-1987 *//* ADD SS$_UNSUPPORTED. *//* */2/* X-14 DDP0008 DERRELL D. PIPER (08-DEC-1986 */9/* ADD SS$_LASTID, SS$_NOMOREID, SS$_RLSEMPTY, AND */5/* SS$_BADJPICTX FOR JPI$_RIGHTSLIST ITEM CODE. */)/* (NB: S VARIANT IS NOW OBSOLETE.) */ /* */1/* X-9 NCD0001 NANCY C. DENARDO 21-OCT-1986 */@/* ADDED SS$_EXLICENSE, SS$_INVLICENSE, SS$_LICENSE_LEVEL, */+/* AND SS$_INV_HW_ID FOR LMF SERVICE. *//* */4/* X-8 SAS001 SCOTT A. SHURTS 02-OCT-1986 */</* ADDED SS$_SRVMMAT TO INDICATE CRYPTOGRAPHIC SERVICE *//* MISMATCH. *//* */ (//* X-7 KL 0001 KEITH LOEPERE 12-JUN-1986 */>/* ADDED SS$_REMOVED TO INDICATE DIR ENTRY ONLY REMOVED. *//* */*/* X-6 CWH5006 CW HOBBS 30-MAY-1986 */4/* ADD SS$_REMOTE_PROC ERROR MESSAGE FOR CWPS. *//* */+/* X-5H2 SJF STU FARNHAM 29-MAY-1986 */9/* ADD SS$_CPUNOTACT TO INDICATE THAT THE REQUESTED */,/* CPU IN AN SMP SYSTEM IS NOT ACTIVE. *//* */2/* X-5 PRD0184 PAUL R. DESTEFANO 07-NOV-1985 */9/* ADD SS$_DATALOST "data lost" TO INDICATE DLS END */ (?/* FLAG SET IN CACHING TAPE DRIVE OR DRIVER HAS OTHERWISE */*/* DETECTED THE LOSS OF CACHED DATA. *//* */8/* X-4 LMP0382 L. MARK PILANT, 6-NOV-1985 10:10 */E/* ADD SS$_OBJLOCKHELD TO INDICATE THAT A PROCESS ALREADY HOLDS *//* THE OBJECT'S ACL LOCK. *//* */3/* X-3 JMK0002 JOSEPH M. KRAETSCH 17-SEP-1985 */F/* ADD SS$_RUCONFLICT "file has active RUs by another facility". */./* REMOVE NOTMPJNL, NOPRMJNL (OBSOLETE). *//* */4/* V04-001 ROW0466 RALP(H O. WEBER 11-JUN-1985 */A/* REPLACE SS$_SHACPYINP (A NO LONGER USED SHADOWING ERROR */H/* STATUS) WITH SS$_DEVNOTSHR, "device not currently shareable". */F/* SS$_DEVNOTSHR IS AN ERROR STATUE FOR USE WITH DEVICES MARKED */D/* FOR EXCLUSIVE ACCESS BY SOMEONE ELSE BY AN MSCP CONTROLLER. *//* */ /* --- *//* + *//* SYSTEM STATUS CODES *//* */ /* LAYOUT OF MESSAGE SPACE: *//* */3/* MSG #S RANGE # MSGS DESCRIPTION *//* */*/* 0-127 ( 0-3FF 128 FATAL ERRORS */?/* 128-191 400-5FF 64 HARDWARE DEFINED FATAL ERRORS *///* 192-255 600-7FF 64 SUCCESS CODES *///* 256-383 800-BFF 128 WARNING CODES */5/* 384-447 C00-DFF 64 INFORMATIONAL CODES */6/* 448-511 E00-FFF 64 NONFATAL ERROR CODES */H/* 512-1023 1000-1FFF 512 SHARED MESSAGES (NOT HERE, SEE SHRMSG) */C/* 1024-1279 2000-27FF 256 FATAL ERRORS (CONTINUED FROM 3FF) */5/* 1280-1343 2800-29FF 64 NO PRIVILEGE ERRORS */ (7/* 1344-1375 2A00-2AFF 32 EXCEEDED QUOTA ERRORS */D/* 1376-1407 2B00-2BFF 32 RESERVED FOR MEDIA MGMT EXTENSIONS */K/* 1408-1663 2C00-33FF 256 NONFATAL ERROR CODES (CONTINUED FROM FFF) */P/* 1664-1695 3400-341F 32 FATAL ERRORS (CONTINUED FROM 27FF) */6/* 1696-4031 3420-7DFF 2334 (UNUSED) */9/* 4032-4095 7E00-7FFF 64 RESERVED FOR SCS SYSAPS */ /* *//* - *//* */'/* EXPLICITLY DEFINED SUCESS CODES *//* */A/* DO NOT MIX (THESE CODES WITH INCREMENTAL ASSIGNMENTS BELOW *//* */#define SYSTEM$_FACILITY 0#define SS$_NORMAL 1/* */N/* NOTE THAT CONTINUE,WASCLR,WASSET,REMEMBER DO NOT HAVE ANY MESSAGE TEXT */K/* SINCE THESE CODES USE THE SAME MESSAGE NUMBER AS NORMAL AND ACCVIO, */E/* THEY CAN NEVER BE MADE TO HAVE MESSAGES ASSOCIATED WITH THEM. *//* */#define SS$_CONTINUE 1#define SS$_WASCLR 1#define SS$_WASSET 9#define SS$_REMEMBER 1/* */3/* MSG #S RANGE # MSGS DESCR(IPTION *//* */*/* 0-127 0-3FF 128 FATAL ERRORS */C/* 1024-1279 2000-27FF 256 FATAL ERRORS (CONTINUED FROM 3FF) *//* */#define SS$_ACCVIO 12#define SS$_BADPARAM 20#define SS$_EXQUOTA 28#define SS$_NOPRIV 366/* MAKE THE ABOVE ERRORS FALL INTO SHORT LITERALS */#define SS$_ABORT 44#define SS$_BADATTRIB 52#define SS$_BADESCAPE 60#define SS$_BADIMGHDR 68#define SS$_CHANINTLK 76#define SS$_CTRLERR 84#define SS$_DATACHECK 92#define SS$_DEVFOREIGN 100#d(efine SS$_DEVMOUNT 108#define SS$_DEVNOTMBX 116#define SS$_DEVNOTMOUNT 124#define SS$_DEVOFFLINE 132#define SS$_DRVERR 140#define SS$_DUPLNAM 148#define SS$_FILACCERR 156#define SS$_FILALRACC 164#define SS$_FILNOTACC 172#define SS$_FILNOTEXP 180#define SS$_FORMAT 188#define SS$_GPTFULL 196#define SS$_GSDFULL 204#define SS$_LCKPAGFUL 212#define SS$_ILLBLKNUM 220#define SS$_ILLCNTRFUNC 228#define SS$_ILLEFC 236#define SS$_ILLIOFUNC 244#define SS$_ILLPAGCN(T 252#define SS$_ILLSER 260#define SS$_INCVOLLABEL 268#define SS$_INSFARG 276#define SS$_INSFWSL 284#define SS$_INSFMEM 292#define SS$_INSFRAME 300#define SS$_IVADDR 308#define SS$_IVCHAN 316#define SS$_IVDEVNAM 324#define SS$_IVGSDNAM 332#define SS$_IVLOGNAM 340#define SS$_IVLOGTAB 348#define SS$_IVQUOTAL 356#define SS$_IVSECFLG 364#define SS$_IVSSRQ 372#define SS$_IVSTSFLG 380#define SS$_IVTIME 388#define SS$_LENVIO 396#define SS$_LKWSETFUL 404#define SS($_MBTOOSML 412#define SS$_MEDOFL 420#define SS$_NODATA 428#define SS$_NOIOCHAN 436#define SS$_NOLOGNAM 444#define SS$_NONEXDRV 452#define SS$_NOTFILEDEV 460#define SS$_NOTINTBLSZ 468#define SS$_NOTLABELMT 476#define SS$_NOTSQDEV 484#define SS$_PAGOWNVIO 492#define SS$_PARITY 500#define SS$_PARTESCAPE 508#define SS$_PFMBSY 516#define SS$_PSTFULL 524#define SS$_RESULTOVF 532#define SS$_SECTBLFUL 540#define SS$_TAPEPOSLOST 548#define SS$_TIMEOUT 556#define SS$_(UNASEFC 564#define SS$_UNSAFE 572#define SS$_VASFULL 580#define SS$_VECINUSE 588#define SS$_VOLINV 596#define SS$_WRITLCK 604#define SS$_NOTAPEOP 612#define SS$_IVCHNLSEC 620#define SS$_NOMBX 628#define SS$_NOLINKS 636#define SS$_NOSOLICIT 644#define SS$_NOSUCHNODE 652#define SS$_REJECT 660#define SS$_TOOMUCHDATA 668#define SS$_BUGCHECK 676#define SS$_FILNOTCNTG 684#define SS$_BADSTACK 692#define SS$_MCHECK 700#define SS$_DEVACTIVE 708#define SS$_HANGUP 7(16#define SS$_OPINCOMPL 724#define SS$_ILLSEQOP 732#define SS$_IVSECIDCTL 740#define SS$_NOTNETDEV 748#define SS$_IVPROTECT 756#define SS$_ACPVAFUL 764#define SS$_MTLBLLONG 772#define SS$_BUFBYTALI 780#define SS$_NOAQB 788#define SS$_WRONGACP 796#define SS$_BUFNOTALIGN 804#define SS$_DEVCMDERR 812#define SS$_DEVREQERR 820#define SS$_INSFBUFDP 828#define SS$_INSFMAPREG 836#define SS$_IVBUFLEN 844#define SS$_IVMODE 852#define SS$_MCNOTVALID 860#define SS$_(POWERFAIL 868#define SS$_SHMGSNOTMAP 876#define SS$_TOOMANYLNAM 884#define SS$_SHMNOTCNCT 892#define SS$_NOTCREATOR 900#define SS$_INTERLOCK 908#define SS$_BADQUEUEHDR 916#define SS$_NOSLOT 924#define SS$_SUSPENDED 932#define SS$_EXPORTQUOTA 940#define SS$_NOSHMBLOCK 948#define SS$_BADQFILE 956#define SS$_NOQFILE 964#define SS$_QFACTIVE 972#define SS$_QFNOTACT 980#define SS$_DUPDSKQUOTA 988#define SS$_NODISKQUOTA 996#define SS$_EXDISKQUOTA 1004#define SS$_(IDMISMATCH 1012#define SS$_NOWRT 1020/* ************** */A/* NOTE: THE ABOVE SET OF SEVERE ERROR MESSAGES IS FULL!!!! */;/* ANY ADDITIONAL SEVERE ERROR MESSAGES MUST BE ADDED */+/* BELOW, IN THE RANGE HEX 2000-2800. *//* ************** */#define SS$_BADISD 8196#define SS$_RELINK 8204#define SS$_NOTINSTALL 8212#define SS$_SHARTOOBIG 8220#define SS$_NOP1VA 8228#define SS$_MULTRMS 8236#define SS$_VECFULL 8244#define SS$_IVLVEC 8252#define SS$_INSFSPTS 826(0#define SS$_DISCONNECT 8268#define SS$_PRIVINSTALL 8276#define SS$_PROTINSTALL 8284#define SS$_BADVEC 8292#define SS$_REMRSRC 8300#define SS$_PROTOCOL 8308#define SS$_THIRDPARTY 8316#define SS$_NOSUCHUSER 8324#define SS$_SHUT 8332#define SS$_UNREACHABLE 8340#define SS$_INVLOGIN 8348#define SS$_NOSUCHOBJ 8356#define SS$_EXCPUTIM 8364#define SS$_OPRABORT 8372#define SS$_SHRIDMISMAT 8380#define SS$_COMMHARD 8388#define SS$_IVCHAR 8396#define SS$_DEVINACT 8(404#define SS$_CONNECFAIL 8412#define SS$_LINKABORT 8420#define SS$_LINKDISCON 8428#define SS$_LINKEXIT 8436#define SS$_PATHLOST 8444#define SS$_CLEARED 8452#define SS$_RESET 8460#define SS$_UNSOLICIT 8468#define SS$_TOOMANYREDS 8476#define SS$_IVLOCKID 8484#define SS$_SUBLOCKS 8492#define SS$_PARNOTGRANT 8500#define SS$_CVTUNGRANT 8508#define SS$_FORCEDERROR 8516#define SS$_ILLSELF 8524#define SS$_ILLCDTST 8532#define SS$_NOLISTENER 8540#define SS$_EXGBLP(AGFIL 8548#define SS$_BADRCT 8556#define SS$_DIRNOTEMPTY 8564#define SS$_FORCEDEXIT 8572#define SS$_NOTPRINTED 8580#define SS$_JBCERROR 8588#define SS$_NOLICENSE 8596#define SS$_VCBROKEN 8604#define SS$_VCCLOSED 8612#define SS$_INSFCDT 8620#define SS$_DEVNOTDISM 8628#define SS$_NOSHRIMG 8636#define SS$_DUPUNIT 8644#define SS$_BADACLCTX 8652#define SS$_SERIOUSEXCP 8660#define SS$_TEMPLATEDEV 8668#define SS$_IVACL 8676#define SS$_NOSUCHID 8684#define SS$_NOLC(LMEDA 8692#define SS$_NOREGAVIL 8700#define SS$_NOREGSUIT 8708#define SS$_NOSUCHPGM 8716#define SS$_PGMLDFAIL 8724#define SS$_PGMSTDALN 8732#define SS$_IVIDENT 8740#define SS$_DUPIDENT 8748#define SS$_INCSEGTRA 8756#define SS$_NODELEAVE 8764#define SS$_KERNELINV 8772#define SS$_EXLNMQUOTA 8780#define SS$_PARENT_DEL 8788#define SS$_PARNOTSYS 8796#define SS$_INSSWAPSPACE 8804#define SS$_VOLOERR 8812#define SS$_DATALATE 8820#define SS$_OVRMAXARG 8828#define SS$_SH(ACHASTA 8836#define SS$_TERMNETDEV 8844#define SS$_NOLOGTAB 8852#define SS$_WRONGNAME 8860#define SS$_NOVOLACC 8868#define SS$_NOFILACC 8876#define SS$_INVEXHLIST 8884#define SS$_NOACLSUPPORT 8892#define SS$_INVSECLASS 8900#define SS$_INCSHAMEM 8908#define SS$_DEVNOTSHR 8916#define SS$_RUCONFLICT 8924#define SS$_DATALOST 8932#define SS$_REMOTE_PROC 8940#define SS$_CPUNOTACT 8948#define SS$_SRVMMAT 8956#define SS$_EXLICENSE 8964#define SS$_INVLICENSE 8972#d(efine SS$_LICENSE_LEVEL 8980#define SS$_INV_HW_ID 8988#define SS$_BADCONTEXT 8996#define SS$_TOOMUCHCTX 9004#define SS$_VA_IN_USE 9012#define SS$_NODELETE 9020#define SS$_NOSUCHCPU 9028#define SS$_IMGVEXC 9036#define SS$_NOSAVPEXC 9044#define SS$_NOSUCHTID 9052#define SS$_NOSUCHRM 9060#define SS$_NOCURTID 9068#define SS$_WRONGSTATE 9076#define SS$_VETO 9084#define SS$_PWDSYNTAX 9092#define SS$_PWDNOTDIF 9100#define SS$_INVPWDLEN 9108#define SS$_SYSVERDIF 9116(#define SS$_HWM_STALL 9124#define SS$_NOSUSPEND 9132#define SS$_NOSUCHPART 9140#define SS$_RMALRDCL 9148#define SS$_ALRCURTID 9156#define SS$_INVLOG 9164#define SS$_BADLOGVER 9172#define SS$_OPINPROG 9180#define SS$_WRONGACMODE 9188#define SS$_SUBTRACED 9196#define SS$_ARCHIVING 9204#define SS$_ARCHIVED 9212#define SS$_SITEPWDFAIL 9220#define SS$_NOSUCHCPB 9228#define SS$_CPUCAP 9236#define SS$_LOADER 9244#define SS$_HSTBUFACC 9252#define SS$_INCONOLCK 9260#d(efine SS$_INVEVENT 9268#define SS$_NOSUCHFAC 9276#define SS$_NOCALLPRIV 9284#define SS$_INSFLPGS 9292#define SS$_INSFRPGS 9300#define SS$_BADREASON 9308#define SS$_NOSUCHBID 9316#define SS$_NOTORIGIN 9324#define SS$_NOLOG 9332#define SS$_TPDISABLED 9340#define SS$_BRANCHENDED 9348#define SS$_BRANCHSTARTED 9356#define SS$_NOSUCHREPORT 9364#define SS$_BADTIME 9372#define SS$_PARTJOINED 9380#define SS$_NOPRESUME 9388#define SS$_RECOVERCANCEL 9396#define SS$_CURTID(CHANGE 9404#define SS$_NOREADER 9412#define SS$_NOWRITER 9420#define SS$_DEVNOTWS 9428#define SS$_NOCLASS 9436#define SS$_CONTEXTSKEW 9444#define SS$_BADFORGEDB 9452#define SS$_NODOMAIN 9460#define SS$_OVRMAXAUD 9468#define SS$_BADCHAIN 9476#define SS$_BADBUFLEN 9484#define SS$_BADITMCOD 9492#define SS$_BADBUFADR 9500#define SS$_BADRETLEN 9508#define SS$_SSINOTHELD 9516#define SS$_SSAMISSING 9524#define SS$_SSANOTAUTH 9532#define SS$_BADOWNER 9540 #define (SS$_NAMESERVCOMMERR 9548#define SS$_IVNODNAM 9556#define SS$_CONFIG_SYNTAX 9564#define SS$_SHELVED 9572#define SS$_DRVNOTVALID 9580!#define SS$_SLICING_DISABLED 9588#define SS$_NOCALLTRANS 9596#define SS$_TRANSCALLER 9604#define SS$_ILLPRIPOL 9612#define SS$_ILLPOLICY 9620#define SS$_INSFRSPID 9628#define SS$_INSFCREDITL 9636#define SS$_INSFCREDITH 9644#define SS$_INSFMAP 9652#define SS$_SIG_INVARGTYPE 9660#define SS$_SIG_INVFLTARG 9668#define SS$_SIG_INVARGLIST 9676( #define SS$_SIG_INVFUNCTYPE 9684 #define SS$_SIG_ARGMISMATCH 9692#define SS$_NOTRANQUIL 9700 #define SS$_NOCALLTRANS_SUP 9708#define SS$_DEVLISTFULL 9716#define SS$_INSFP1POOL 9724#define SS$_SIGNAL64 9732#define SS$_ZEROALLOCLS 9740#define SS$_QUEUE_FULL 9748#define SS$_DEVICE_RESET 9756#define SS$_ACA_ACTIVE 9764 #define SS$_BUS_PHASE_ERROR 9772#define SS$_NOMULTITHREAD 9780#define SS$_MTHREADACTIVE 9788#define SS$_MAXKTHREADS 9796#define SS$_NOSUCHTHREAD 9804#d(efine SS$_NOTHREADMAN 9812#define SS$_NOSUCHUPCALL 9820#define SS$_BADFANDLE 9828#define SS$_FANDLEBUSY 9836#define SS$_UNALIGNED 9844#define SS$_BADIOSADR 9852#define SS$_ILLBUFOBJ 9860#define SS$_ILLMODIFIER 9868#define SS$_NOCCBBUFFOBJ 9876#define SS$_NORDACC 9884#define SS$_NOWRTACC 9892#define SS$_NOTNOCNVRT 9900#define SS$_UNSUPVOLSET 9908 #define SS$_ARG_GTR_32_BITS 9916#define SS$_NOT64DEVFUNC 9924#define SS$_CHANVIO 9932 #define SS$_GBLSEC_MISMATCH 9940#d(efine SS$_ILLRELPAG 9948#define SS$_IVACMODE 9956#define SS$_IVREGFLG 9964#define SS$_IVREGID 9972#define SS$_IVREGPROT 9980#define SS$_IVVAFLG 9988#define SS$_LEN_NOTBLKMULT 9996 #define SS$_LEN_NOTPAGMULT 10004 #define SS$_NOT_PROCESS_VA 10012 #define SS$_OFF_NOTBLKALGN 10020 #define SS$_OFF_NOTPAGALGN 10028 #define SS$_OFFSET_TOO_BIG 10036#define SS$_REGOWNVIO 10044#define SS$_PROTVIO 10052#define SS$_TOO_MANY_ARGS 10060#define SS$_VA_NOTPAGALGN 10068#define SS$_NO(EXTAUTH 10076#define SS$_AUTHFAIL 10084#define SS$_INVUSER 10092#define SS$_ERRMAPAUTH 10100#define SS$_NORAD50 10108#define SS$_BADMEDIA 10116#define SS$_UNRECOVRDER 10124#define SS$_IVFORMAT 10132#define SS$_IVUNITFLAG 10140#define SS$_IVPARAM 10148#define SS$_NOSUCHENTRY 10156#define SS$_ALLOCFAILED 10164#define SS$_SHMEM_INCON 10172#define SS$_IVLOCKOP 10180#define SS$_IVLOCKTBL 10188#define SS$_LOCKINUSE 10196#define SS$_LOCK_TIMEOUT 10204#define SS$_BA(DLCKTBL 10212#define SS$_NOBREAK 10220#define SS$_IVPROTOCOL 10228*#define SS$_NOWAIT 10236 /* */C/* ***** NOTE: NO ROOM FOR MORE MESSAGES IN THIS SECTION ***** *//* *//* */3/* MSG #S RANGE # MSGS DESCRIPTION *//* */?/* 128-191 400-5FF 64 HARDWARE DEFINED FATAL ERRORS *//* */#define SS$_PLHLDR 1028#define SS$_ASTFLT 1036#define SS$_BREAK 1044#define SS$_CMODSUPR 1052#define SS$_CMODUSER 1060#define SS$_COMPAT 1068(#define SS$_OPCCUS 1076#define SS$_OPCDEC 1084#define SS$_PAGRDERR 1092#define SS$_RADRMOD 1100#define SS$_ROPRAND 1108#define SS$_SSFAIL 1116#define SS$_TBIT 1124#define SS$_DEBUG 1132F/* THE FOLLOWING CODES MUST BE IN ORDER SINCE THEY ARE CALCULATED */#define SS$_ARTRES 1140#define SS$_INTOVF 1148#define SS$_INTDIV 1156#define SS$_FLTOVF 1164#define SS$_FLTDIV 1172#define SS$_FLTUND 1180#define SS$_DECOVF 1188#define SS$_SUBRNG 1196#define SS$_FLTOVF_F( 1204#define SS$_FLTDIV_F 1212#define SS$_FLTUND_F 1220B/* THE ABOVE CODES MUST BE IN ORDER SINCE THEY ARE CALCULATED */#define SS$_INHCHMK 1228#define SS$_INHCHME 1236#define SS$_VECDIS 1244#define SS$_VARITH 1252#define SS$_ILLVECOP 1260#define SS$_VECALIGN 1268#define SS$_IMGDMP 1276#define SS$_HPARITH 1284#define SS$_ALIGN 1292 #define SS$_UNALIGN_SP_LOAD 1300#define SS$_GENTRAP 1308#define SS$_FLTINV 1316#define SS$_FLTINE 1324#define SS$_DECDIV 1332(#define SS$_DECINV 1340#define SS$_ASSERTERR 1348#define SS$_NULPTRERR 1356#define SS$_STKOVF 1364#define SS$_STRLENERR 1372#define SS$_SUBSTRERR 1380#define SS$_RANGEERR 1388#define SS$_SUBRNG1 1396#define SS$_SUBRNG2 1404#define SS$_SUBRNG3 1412#define SS$_SUBRNG4 1420#define SS$_SUBRNG5 1428#define SS$_SUBRNG6 1436#define SS$_SUBRNG7 1444#define SS$_PAGRDERRXM 1452#define SS$_ILLEGAL_SHADOW 1460#define SS$_FLTINV_F 1468#define SS$_FLTINE_F 1476#define SS$_(INTOVF_F 1484#define SS$_NATFAULT 1492#define SS$_FLTDENORMAL 1500#define SS$_BREAK_SYS 1508#define SS$_BREAK_ARCH 1516/* */C/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */B/* ***** NOTE: ROOM FOR 2 MORE MESSAGES IN THIS SECTION ***** *//* *//* */3/* MSG #S RANGE # MSGS DESCRIPTION *//* *///* 192-255 600-7FF 64 SUCCESS CODES *//* */#define SS$_BUFFEROVF 1537#define SS$_CONTROLO 1545#define SS$_CONTROLY 1553(#define SS$_CREATED 1561#define SS$_MSGNOTFND 1569#define SS$_NOTRAN 1577#define SS$_SUPERSEDE 1585#define SS$_WASECC 1593#define SS$_DEVALRALLOC 1601#define SS$_REMOTE 1609#define SS$_CONTROLC 1617#define SS$_NOTMODIFIED 1625#define SS$_RDDELDATA 1633#define SS$_OVRDSKQUOTA 1641#define SS$_OBSOLETE_1 1649#define SS$_FILEPURGED 1657#define SS$_NOTALLPRIV 1665#define SS$_SYNCH 1673#define SS$_CONCEALED 1681#define SS$_INCOMPAT 1689#define SS$_DBGOPCREQ 1697(#define SS$_ALRDYCLOSED 1705#define SS$_LNMCREATED 1713#define SS$_ACEIDMATCH 1721#define SS$_DBGEVENT 1729#define SS$_REMOVED 1737#define SS$_QUEUED 1745#define SS$_SUBDISABLED 1753#define SS$_FORGET 1761#define SS$_PREPARED 1769#define SS$_NOMOREITEMS 1777#define SS$_VOLATILE 1785#define SS$_CLASSUPER 1793#define SS$_CONTINUE_64 1801#define SS$_THREAD_UPCALL 1809#define SS$_CREATED_SHPT 1817#define SS$_PERSONADELPEND 1825#define SS$_DEVAVAIL 1833#define SS($_LONGGAP 1841#define SS$_BROKEN 1849#define SS$_QPOOL_DEL_INIT 1857#define SS$_UNUSED_1 1865#define SS$_LOWPREC 1873/* */C/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */C/* ***** NOTE: ROOM FOR 18 MORE MESSAGES IN THIS SECTION ***** *//* *//* */3/* MSG #S RANGE # MSGS DESCRIPTION *//* *///* 256-383 800-BFF 128 WARNING CODES *//* */#define SS$_ACCONFLICT 2048#define SS$_BADCHKSUM 2056#define SS$_BADFILEHDR 2(064#define SS$_BADFILENAME 2072#define SS$_BADFILEVER 2080#define SS$_BADIRECTORY 2088#define SS$_CANCEL 2096#define SS$_DATAOVERUN 2104#define SS$_DEVALLOC 2112#define SS$_DEVASSIGN 2120#define SS$_DEVICEFULL 2128#define SS$_DEVNOTALLOC 2136#define SS$_DIRFULL 2144#define SS$_DUPFILENAME 2152#define SS$_ENDOFFILE 2160#define SS$_ENDOFTAPE 2168#define SS$_TMACTIVE 2176#define SS$_FCPREADERR 2184#define SS$_FCPREWNDERR 2192#define SS$_FCPSPACERR 2200#define (SS$_FCPWRITERR 2208#define SS$_FILELOCKED 2216#define SS$_FILENUMCHK 2224#define SS$_FILESEQCHK 2232#define SS$_FILESTRUCT 2240#define SS$_HEADERFULL 2248#define SS$_IDXFILEFULL 2256#define SS$_MBFULL 2264#define SS$_NOHOMEBLK 2272#define SS$_NONEXPR 2280#define SS$_NONLOCAL 2288#define SS$_NOHANDLER 2296#define SS$_NOSIGNAL 2304#define SS$_NOSUCHDEV 2312#define SS$_NOSUCHFILE 2320#define SS$_RESIGNAL 2328#define SS$_UNWIND 2336#define SS$_UNWINDING 2344(#define SS$_NOMOREFILES 2352#define SS$_BEGOFFILE 2360#define SS$_BLOCKCNTERR 2368#define SS$_MUSTCLOSEFL 2376#define SS$_WAITUSRLBL 2384#define SS$_ILLUSRLBLRD 2392#define SS$_ILLUSRLBLWT 2400#define SS$_ILLLBLAST 2408#define SS$_ENDOFUSRLBL 2416#define SS$_NOSUCHSEC 2424#define SS$_CLIFRCEXT 2432#define SS$_FCPREPSTN 2440#define SS$_TOOMANYVER 2448#define SS$_NOTVOLSET 2456#define SS$_ENDOFVOLUME 2464#define SS$_NOMOREPROC 2472#define SS$_NODEVAVL 2480#define SS($_NOTQUEUED 2488#define SS$_DGQINCOMP 2496#define SS$_DIRALLOC 2504#define SS$_ACLEMPTY 2512#define SS$_NOENTRY 2520#define SS$_NOMOREACE 2528#define SS$_RIGHTSFULL 2536#define SS$_VALNOTVALID 2544#define SS$_ACLFULL 2552#define SS$_NOMORENODE 2560#define SS$_NOMORELOCK 2568#define SS$_BEGOFTAPE 2576#define SS$_OBJLOCKHELD 2584#define SS$_CPUSTARTIP 2592#define SS$_ALLSTARTED 2600#define SS$_ALRDYSTRT 2608#define SS$_ALRDYSTPPD 2616#define SS$_NSTPPD 2624#d(efine SS$_UNKRESULT 2632#define SS$_ITEMNOTFOUND 2640#define SS$_NOMOREDEV 2648#define SS$_EFNOTSET 2656#define SS$_PRIMNOSTP 2664#define SS$_BOOTREJECT 2672#define SS$_RMTPATH 2680#define SS$_OBJECT_EXISTS 2688#define SS$_NOSUCHOBJECT 2696#define SS$_NOVOLDESC 2704#define SS$_NOPTBLDIR 2712#define SS$_DRVEXISTS 2720#define SS$_DEVEXISTS 2728#define SS$_GOTO_UNWIND 2736#define SS$_EXIT_UNWIND 2744#define SS$_SMALLHEADER 2752#define SS$_FDT_COMPL 2760#define SS$_TA(RGET_UNWIND 2768##define SS$_TARGET_GOTO_UNWIND 2776#define SS$_RESIGNAL_64 2784#define SS$_NOMOREREG 2792#define SS$_PAGNOTINREG 2800#define SS$_REGISFULL 2808#define SS$_PAGTYPVIO 2816#define SS$_NOSUCHPAG 2824#define SS$_PAGNOTWRITE 2832#define SS$_NOMORETHREAD 2840#define SS$_NOTF11ODS5 2848#define SS$_NOCONVJNL 2856#define SS$_MPDEVBUSY 2864!#define SS$_MPDEVUSERDISABLE 2872#define SS$_NOCPUMATCH 2880#define SS$_NOMORECLIENTS 2888#define SS$_NOMOREDEVICES 2896(#define SS$_NOMOREFILTERS 2904#define SS$_NOMOREPATHS 2912#define SS$_NOMORESERVERS 2920#define SS$_FISH 2928#define SS$_FILENOTCACHED 2936#define SS$_INSF_SHM_REG 2944#define SS$_HBMMNOTENABLED 2952#define SS$_HBMMALREADYON 2960#define SS$_NODEVPOL 2968#define SS$_NONAMPOL 2976#define SS$_XVALNOTVALID 2984#define SS$_FILEFULL 2992,#define SS$_REMINDER 3000 /* */C/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */K/* ***** NOTE: ROOM FOR (8 MORE WARNING MESSAGES IN ABOVE SECTION ***** *//* *//* */3/* MSG #S RANGE # MSGS DESCRIPTION *//* */5/* 384-447 C00-DFF 64 INFORMATIONAL CODES *//* */#define SS$_EOTIN 3075#define SS$_CHAINW 3083#define SS$_NOTINSEC 3091#define SS$_NONXPAG 3099#define SS$_LOGNAME 3107#define SS$_CPUSTARTD 3115#define SS$_CPUSTOPPING 3123#define SS$_NOTALLCANCELED 3131#define SS$_NOTHINGDONE 3139#define SS$_EVTNOTENAB 3147#define SS$_NOPATHTBL (3155#define SS$_RESELECTION 3163#define SS$_EMULATED 3171#define SS$_REMDONE 3179#define SS$_REMINPROG 3187#define SS$_DEVCON 3195#define SS$_DEVNOTCON 3203#define SS$_CPUSELECTED 3211 #define SS$_QPOOL_DEL_INPRG 3219#define SS$_PRESTO 3227#define SS$_TAKEN_BRANCH 3235#define SS$_IA32_TRAP 3243#define SS$_DEBUG_FAULT 3251#define SS$_BREAK_APPL 3259#define SS$_TIE_GET_FRAMES 3267#define SS$_TIE_PRE_UNWIND 3275#define SS$_TIE_UNWIND 3283 #define SS$_TIE_GOTO_UNWIN(D 3291#define SS$_HBMMCREPOSTMRG 3299#define SS$_FPMODECTL 3307#define SS$_FPMODEPC 3315#define SS$_FPMODERC 3323#define SS$_ARGTYP1 3331#define SS$_ARGTYP2 3339#define SS$_ARGTYP3 3347#define SS$_ARGTYP4 3355#define SS$_ARGTYP5 3363#define SS$_ARGTYP6 3371#define SS$_ARGTYP7 3379#define SS$_ARGTYP8 3387#define SS$_DEFER_ASTS 3395/* */C/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */C/* ***** NOTE: ROOM FOR 23 MORE MESSAGES IN THIS SECTION ***(** *//* *//* */3/* MSG #S RANGE # MSGS DESCRIPTION *//* */6/* 448-511 E00-FFF 64 NONFATAL ERROR CODES *//* */#define SS$_LINEABRT 3586#define SS$_DEADLOCK 3594#define SS$_NOLOCKID 3602#define SS$_EXDEPTH 3610#define SS$_PARTMAPPED 3618#define SS$_CANCELGRANT 3626#define SS$_RETRY 3634#define SS$_BADACL 3642#define SS$_ACEEXISTS 3650#define SS$_UNSUPPORTED 3658#define SS$_NORIGHTSDB 3666#define SS$_LOGSTALL 3674#define SS$_(LOGFULL 3682#define SS$_PWDINDIC 3690#define SS$_PWDINHIS 3698#define SS$_PWDWEAK 3706#define SS$_USEGENPWD 3714#define SS$_INVBUSNAM 3722#define SS$_INVCOMPTYPE 3730#define SS$_INVCOMPID 3738#define SS$_INVCOMPLIST 3746#define SS$_NOCOMPLSTS 3754#define SS$_INVSECDOMAIN 3762#define SS$_BADCHECKSUM 3770#define SS$_ARBTOOBIG 3778#define SS$_ORBTOOBIG 3786#define SS$_INVAJLNAM 3794#define SS$_TOOMANYAJL 3802#define SS$_RSDMINUSE 3810#define SS$_RSDMNOTFOU 3818#d(efine SS$_INVUICGRP 3826#define SS$_RSDM_ACTIVE 3834#define SS$_OBJLOCKED 3842#define SS$_NOTMPNAM 3850#define SS$_INVCLSITM 3858#define SS$_NOTSHRTBL 3866#define SS$_MMATORB 3874#define SS$_NOSUCHVOL 3882#define SS$_OBJNOTLOCKED 3890#define SS$_ILLRSDM 3898#define SS$_NOCLASSSUPPORT 3906#define SS$_INVSECOPER 3914#define SS$_NODELJNLACT 3922#define SS$_INVFILFOROP 3930#define SS$_NOOBJSRV 3938#define SS$_NOFILEACCESS 3946#define SS$_BADFILESIZE 3954#define SS$_(NOTFULLYMAPPED 3962#define SS$_BADWINCNT 3970#define SS$_BADWINLBN 3978#define SS$_BADWINRVN 3986#define SS$_EXTRAWINDOW 3994#define SS$_REVISED 4002#define SS$_TIMENOTSET 4010"#define SS$_WAIT_CALLERS_MODE 4018#define SS$_NOT_LOADED 4026#define SS$_DRV_NOUNLOAD 4034#define SS$_INVARG 4042#define SS$_QIO_CROCK 4050#define SS$_ALTER 4058#define SS$_AFR_ENABLED 4066 #define SS$_AFR_NOT_ENABLED 4074#define SS$_SHELFERROR 4082:#define SS$_PERSONANONGRATA 4090 /* *** (*********** */C/* NOTE: THE ABOVE SET OF NONFATAL ERROR MESSAGES IS FULL!!!! */=/* ANY ADDITIONAL NONFATAL ERROR MESSAGES MUST BE ADDED */+/* BELOW, IN THE RANGE HEX 2C00-33FF. *//* ************** *//* */3/* MSG #S RANGE # MSGS DESCRIPTION *//* */5/* 1280-1343 2800-29FF 64 NO PRIVILEGE ERRORS *//* *//* */N/* NB: THESE MESSAGES MUST BE KEPT IN THE SAME ORDER AS THE PRIVILEGE BIT */T/* DEFINITIONS ($PRVDEF) AS THE PRIVILEGE BIT POSITION( IS USED AS AN INDEX INTO */C/* THESE MESSAGE CODES BY THE $CHECK_PRIVILEGE SYSTEM SERVICE. *//* */#define SS$_NOPRIVSTRT 10240#define SS$_NODETACH 10284#define SS$_NOCMKRNL 10244#define SS$_NOCMEXEC 10252#define SS$_NOSYSNAM 10260#define SS$_NOGRPNAM 10268#define SS$_NOALLSPOOL 10276#define SS$_NOIMPERSONATE 10284#define SS$_NODIAGNOSE 10292#define SS$_NOLOG_IO 10300#define SS$_NOGROUP 10308#define SS$_NOACNT 10316#define SS$_NOPRMCEB 10324#define SS$_NOPRMMBX 1(0332#define SS$_NOPSWAPM 10340#define SS$_NOALTPRI 10348#define SS$_NOSETPRV 10356#define SS$_NOTMPMBX 10364#define SS$_NOWORLD 10372#define SS$_NOMOUNT 10380#define SS$_NOOPER 10388#define SS$_NOEXQUOTA 10396#define SS$_NONETMBX 10404#define SS$_NOVOLPRO 10412#define SS$_NOPHY_IO 10420#define SS$_NOBUGCHK 10428#define SS$_NOPRMGBL 10436#define SS$_NOSYSGBL 10444#define SS$_NOPFNMAP 10452#define SS$_NOSHMEM 10460#define SS$_NOSYSPRV 10468#define SS$_NOBYPASS 104(76#define SS$_NOSYSLCK 10484#define SS$_NOSHARE 10492#define SS$_NOUPGRADE 10500#define SS$_NODOWNGRADE 10508#define SS$_NOGRPPRV 10516#define SS$_NOREADALL 10524#define SS$_NOIMPORT 10532#define SS$_NOAUDIT 10540#define SS$_NOSECURITY 10548#define SS$_NOPRIVEND 10751/* */3/* MSG #S RANGE # MSGS DESCRIPTION *//* */7/* 1344-1375 2A00-2AFF 32 EXCEEDED QUOTA ERRORS *//* */#define SS$_EXQUOTASTRT 10752#define SS$_EXASTLM 10756#define (SS$_EXBIOLM 10764#define SS$_EXBYTLM 10772#define SS$_EXDIOLM 10780#define SS$_EXFILLM 10788#define SS$_EXPGFLQUOTA 10796#define SS$_EXPRCLM 10804#define SS$_EXTQELM 10812#define SS$_EXENQLM 108203/* SYSTEMWIDE QUOTA -- WORK FROM END OF REGION */#define SS$_EXBUFOBJLM 11004#define SS$_EXQUOTAEND 11007/* */3/* MSG #S RANGE # MSGS DESCRIPTION *//* */D/* 1376-1407 2B00-2BFF 32 RESERVED FOR MEDIA MGMT EXTENSIONS *//* */#define SS$_MMSFAI (LED 11012 #define SS$_QPOOL_DEL_BUSY 11020C/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */A/* ***** NOTE: ROOM FOR 1 MORE MESSAGE IN THIS SECTION ***** */#define SS$_TOOFEWDEV 11032#define SS$_AVRWAIT 11040C/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */B/* ***** NOTE: ROOM FOR 3 MORE MESSAGES IN THIS SECTION ***** */#define SS$_NO_MMS 11075#define SS$_MMSREADY 11083#define SS$_MMSNOTREADY 11091#define SS$_SKIP_CHECKS 11099#define (SS$_NO_NOTIFY 11107!#define SS$_SKIP_EXPIRATION 11115#define SS$_NOTATBOT 11123#define SS$_PREVDENS 111317/* A NEW BASE SHOULD BE CREATED FOR INFORMATIONALS */C/* ***** NOTE: ROOM FOR 0 MORE MESSAGES IN ABOVE SECTION ***** */#define SS$_RDBERR 11140#define SS$_MDMSERR 11148#define SS$_IVMEDTYP 11156#define SS$_IVDENS 11164#define SS$_IVPOOL 11172#define SS$_IVEXPDAT 11180#define SS$_NOCONFMEDIA 11188#define SS$_PTE_NOT_EMPTY 11196#define SS$_CPUNOTAVAIL 11204#def(ine SS$_NOFASTPATH 11212#define SS$_EXITFORCED 11220#define SS$_FORCEX 11228/* */3/* MSG #S RANGE # MSGS DESCRIPTION *//* */K/* 1408-1663 2C00-33FF 256 NONFATAL ERROR CODES (CONTINUED FROM FFF) *//* */#define SS$_NOTASSUMING 11266!#define SS$_ALREADYASSUMING 11274#define SS$_INUSE 11282#define SS$_USERDISABLED 11290#define SS$_NOCHJIB 11298#define SS$_NOTSUPFS 11306#define SS$_INSFTHREADS 11314#define SS$_NOBUFOBJID 11322 #define SS$_NODELP(ERMANENT 11330#define SS$_NOMEMRESID 11338#define SS$_MRES_PFNSMALL 11346#define SS$_MRES_INCON 11354#define SS$_NORESERVEDMEM 11362!#define SS$_RESERVEDMEMUSED 11370#define SS$_RES_MEM_INCON 11378#define SS$_NOSHPTS 11386#define SS$_FLUSHFAIL 11394#define SS$_NOTINSTALLED 11402#define SS$_POOLDEVEXISTS 11410#define SS$_NOUNITS 11418#define SS$_NOTAPOOL 11426#define SS$_MISSINGUNITS 11434#define SS$_DISKDEVEXISTS 11442#define SS$_TOOMANYUNITS 11450#define SS$_NO(TINPOOL 11458#define SS$_WRONGPOOL 11466#define SS$_ALRBOUND 11474 #define SS$_NOTPOOLMOUNTED 11482#define SS$_POOLINUSE 11490#define SS$_DISKINUSE 11498#define SS$_SDDISABLED 11506#define SS$_UNITINPOOL 11514#define SS$_FAMILYTOOBIG 11522#define SS$_NODISKNAME 11530 #define SS$_DISKNAMEEXISTS 11538#define SS$_INSUFFREESEGS 11546#define SS$_NOTBOUND 11554#define SS$_TOOMANYFRAGS 11562!#define SS$_TOOMANYFAMILIES 11570#define SS$_DISKISBOUND 11578#define SS$_SNAPINFA(M 11586#define SS$_CHKSNAPVER 11594#define SS$_BADSNAPVER 11602#define SS$_SD_RESERVED4 11610#define SS$_SD_RESERVED5 11618#define SS$_SECREFOVF 11626#define SS$_DATAERR 11634#define SS$_INVPFN 11642#define SS$_INV_SHMEM 11650#define SS$_INV_SHM_CPP 11658#define SS$_INV_SHM_REG 11666#define SS$_ONEMAPPER 11674#define SS$_NOSUCHEXT 11682#define SS$_CBKEXISTS 11690#define SS$_NOSUCHCBK 11698#define SS$_NOTAMEMBER 11706#define SS$_GLXSPIUNAVAIL 11714!#define SS($_MPDEVILLCURPATH 11722#define SS$_MPDEVINCOMPAT 11730#define SS$_MPDEVNOT 11738#define SS$_MPDEVNOTCONF 11746!#define SS$_PERSONARESERVED 11754#define SS$_WRONGDRV 11762#define SS$_BADRAD 11770#define SS$_INVQSRFNC 11778#define SS$_NOQIOSERVER 11786#define SS$_INCLASS 11794#define SS$_INVBOOTDEV 11802$#define SS$_CLIENT_UNAVAILABLE 11810"#define SS$_CONFIGFILE_ERROR 11818#define SS$_INVDEVALLOC 11826$#define SS$_DEVICE_UNAVAILABLE 11834#define SS$_INVDEVMOUNT 11842"(#define SS$_LOGGING_DISABLED 11850#define SS$_NOSUCHCLIENT 11858#define SS$_NOSUCHDEVICE 11866#define SS$_NOSUCHFILTER 11874#define SS$_NOSUCHPATH 11882#define SS$_NOSUCHSERVER 11890#define SS$_RQSTIMOUT 11898$#define SS$_SERVER_UNAVAILABLE 11906#define SS$_QSRVINTERR 11914#define SS$_NOADD 11922#define SS$_SYSTEMUIC 11930#define SS$_NOSUCHQPOOLID 11938#define SS$_PATHAMBIG 11946#define SS$_INVMVIP 11954#define SS$_NOPATHAVAIL 11962#define SS$_NOENACURINV 11970#d (efine SS$_TRUSTCONF 11978#define SS$_QIO_FAULT 11986#define SS$_HBVS_REDO_IO 11994 #define SS$_TOOMANYPERSONA 12002,#define SS$_INVKTLIM 12010 /* */C/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */N/* ***** NOTE: ROOM FOR 162 MORE NONFATAL MESSAGES IN ABOVE SECTION ***** *//* */=/* MSG #S RANGE # MSGS DESCRIPTION *//* */U/* 1664-1695 3400-341F 32 FATAL ERROR CODES (CONTINUED FROM 27FF) */#define SS$_MA(XNAMPOL 13316#define SS$_HBMMENABLED 13324#define SS$_NOMODNONEPOL 13332#define SS$_SHADFEATNOMNT 13340 #define SS$_NOTSUPALLNODES 13348#define SS$_WLGCANTHBMM 13356#define SS$_CALLUNDEFSYM 13364#define SS$_NOADDMCPYMBR 13372#define SS$_CANTDODDS 13380#define SS$_TOOMANYMBRS 13388#define SS$_SCBREADFAIL 13396#define SS$_SCBWRITEFAIL 13404#define SS$_NOMEMFORWBM 13412#define SS$_MUSTDMTVU 13420!#define SS$_ONLYSRCMUSTSTAY 13428!#define SS$_NOWBMDURINGCOPY 13436#d (efine SS$_WBMERR 13444#define SS$_BADPOLCHAR 13452 #define SS$_HBMMVERSIONBAD 13460#define SS$_ANADSKSHDBBLK 13468 #define SS$_HBMMBADPOLSPEC 13476 #define SS$_NOSHADOWSERVER 13484#define SS$_GAMEOVER 13492P/* N.B. DO NOT CORRECT THE GRAMMAR IN GAMEOVER, THE MESSAGE IS AS INTENDED */C/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */I/* ***** NOTE: ROOM FOR 9 MORE FATAL MESSAGES IN ABOVE SECTION ***** *//* */3/* MSG #S RANGE # MSGS DESCRIPTION * (//* */9/* 4032-4095 7E00-7FFF 64 RESERVED FOR SCS SYSAPS *//* */9/* MESSAGE CODES IN THIS BLOCK ARE GUARANTEED NOT TO */=/* BE TRANSLATED BY VMS WHEN THEY ARE SEND OUT BY VMSSCS */</* OR WHEN THEY ARE RECEIVED BY VMSSCS. SCA SYSAPS ARE */=/* FREE TO USE THESE CODES IN ANY SYSAP-DEPENDENT MANNER *//* IN WHICH THEY CHOOSE. *//* */B/* THIS ADDRESS OF THIS BLOCK OF CODES MUST BE IN CONFORMANCE */;/* WITH THE SCA ARCHITECTURE, I.E., MUST NOT BE MOVED. */(/* */#define SS$_SYSAPMIN 32256#define SS$_SYSAPMAX 32767 /* $DEFEND SS,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */I/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]SSMSG.SDI;1 *//******************* (*************************************************************************************************************//*** MODULE $SSDEF ***/#ifndef __SSDEF_LOADED#define __SSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 va (riant_union#endif#endif N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 12:56:57.42 */N/* */I/* */N/* SSMSG.MSG - SYSTEM DEFINITION FILE FOR SYSTEM SERVICE MESSAGES */N/* ( */J/* VERSION: 'X-137' */N/* */Q/***************************************************************************** *//** * */Q/** COPYRIGHT 1995-2005 HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P. * */Q/** * */Q/** RESTRICTED RIGHTS LEGEND ( * */Q/** * */Q/** USE, DUPLICATION OR DISCLOSURE BY THE U.S. GOVERNMENT IS SUBJECT TO * */Q/** RESTRICTIONS AS SET FORTH IN SUBPARAGRAPH (C)(1)(II) OF THE RIGHTS * */Q/** IN TECHNICAL DATA AND COMPUTER SOFTWARE CLAUSE IN DFARS 252.227-7013. * */Q/** * */Q/** HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P ( * */Q/** 3000 HANOVER STREET * */Q/** PALO ALTO, CA 94304 * */Q/** U.S.A. * */Q/** * */Q/** RIGHTS FOR NON-DOD U.S. GOVERNMENT DEPARTMENTS AND AGENCIES ARE AS * */Q/** SET FORTH IN FAR 52.227-19(C)(1,2). ( * *//** * */Q/***************************************************************************** */N/*++ */N/* */N/* FACILITY: VMS SYSTEM MACRO LIBRARIES */N/* */N/* ABSTRACT: ( */N/* */I/* THIS FILE CONTAINS THE SDL SOURCE FOR SYSTEM SERVICE MESSAGES. */N/* */N/* GUIDELINES: */N/* */K/* WITH THE RELEASE OF HELP MESSAGE, MESSAGE DOCUMENTATION MUST EXACTLY */L/* MATCH THE MESSAGE( TEXT IN THIS FILE IN ORDER FOR THE ONLINE SEARCH TO */I/* SUCCEED. TO AVOID DOCUMENTING EMBARRASSING TYPOS OR GRAMMATICAL */J/* ERRORS, PLEASE FORWARD YOUR NEW OR CHANGED MESSAGES TO THE MESSAGES */I/* WRITER FOR A QUICK EDIT. VMS SENIOR MANAGEMENT SUPPORTS ENFORCING */I/* STANDARD MESSAGE FORMATTING CONVENTIONS, WHICH ARE INCLUDED IN THE */I/* FOLLOWING GUIDELINES. */N/* ( */Q/* O SS$ CODE NAMES SHOULD BE 15 OR FEWER CHARACTERS TO PREVENT TRUNCATION */I/* IN MESSAGE TEXT, WHICH CAUSES GENERAL CONFUSION. */N/* */P/* O WORDS IN MESSAGES SHOULD NOT BEGIN WITH CAPS UNLESS THEY WOULD START */N/* WITH CAPS IN RUNNING TEXT. FOR EXAMPLE, */N/* */I/* WRONG(: */I/* RIGHT: */N/* */J/* THIS IS NOT WELL KNOWN, BUT THE $GETMSG SYSTEM SERVICE AUTOMATICALLY */K/* CONVERTS TO UPPERCASE THE INITIAL LETTER OF A MESSAGE WHEN RETRIEVING */I/* A MESSAGE IN AN ENVIRONMENT WHERE THE FACILITY, SEVERITY, AND */I/* IDENTIFICATION FIELDS HAVE BEEN SUPPRESSED. ( */N/* */G/* O ACRONYMS SHOULD BE UPPERCASE ONLY: */N/* */I/* */N/* */G/* O DO NOT USE PUNCTUATION AT THE END OF A MESSAGE. */N/* ( */N/* O AVOID USING CONTRACTIONS IN MESSAGES. FOR EXAMPLE, USE "cannot" */N/* INSTEAD OF "can't" AND "does not" INSTEAD OF "doesn't". */N/* */J/* O "It's" IS A CONTRACTION FOR "it is". THE POSSESSIVE IS "its". */N/* */K/* O USE THE WORDS "and" OR "or" INSTEAD OF A "/(" WHENEVER POSSIBLE. */N/* */I/* WRONG: */I/* RIGHT: */N/* */P/* O AVOID USING HYPHENS TO SEPARATE CLAUSES. USE A SEMICOLON INSTEAD. */N/* */I/* ( WRONG: */I/* RIGHT: */N/* */L/* O SEMICOLONS SHOULD BE USED TO SEPARATE MAIN CLAUSES THAT ARE NOT */J/* JOINED BY "and" OR "but". IN THE ABOVE EXAMPLE, IT IS GRAMMATICALLY */M/* INCORRECT TO USE A COMMA IN PLACE OF THE SEMICOLON. A COMMA IS CORRECT */M/* WHEN EITHER CLAUSE DOES NOT FORM A COMPLETE( SENTENCE OR WHEN THE COMMA */I/* IS USED TO SEPARATE ITEMS IN A LIST. FOR EXAMPLE, */N/* */I/* */N/* */G/* O ABOVE ALL, KEEP THE JARGON TO A MINIMUM AND CONCENTRATE ON */I/* COMMUNICATING A MESSAGE THAT IS AS INFORMATIVE AND HELPFUL AS YOU */I/* CAN MAK(E IT. */N/* */N/* */N/* NOTE BENE: WHEN OBSOLETING OR ADDING MESSAGES: */N/* */O/* O REUSE OBSOLETE MESSAGE ENTRIES WHEN POSSIBLE. THESE ARE MARKED BY */I/* A MESSAGE NAME OF OBSOLETE_(. */N/* */N/* O IF YOU MUST REMOVE A MESSAGE, DON'T SIMPLY DELETE IT. IF MESSAGES */K/* COME AFTER IT, OBSOLETE IT BY CHANGING THE NAME TO OBSOLETE_. */J/* LOOK FOR THE OTHER OBSOLETE MESSAGES TO FIND OUT WHAT THE NEXT FREE */L/* NUMBER IS. THIS WILL LET OTHERS KNOW THAT WHEN THEY WANT A SLOT, THEY */I/* CAN REUSE SOME OBSOLETE MESSAGE INSTEAD OF ADDING A NEW ONE. */N(/* */Q/* O THE 64-BIT PROJECT HAS ENABLED THE ENTIRE ALPHA VIRTUAL ADDRESS RANGE */K/* (WITH THE EXCEPTION OF THE GAP) TO BE AVAILABLE. THEREFORE, MESSAGES */J/* THAT DISPLAY ADDRESSES, INCLUDING PCS, MUST DISPLAY THE FULL 64-BITS */K/* OF THOSE ADDRESSES. USE THE !XH FAO DIRECTIVE FOR THIS PURPOSE. FAO */I/* (SYS$FAO & SYS$FAOL_64 ONLY) FOR ALPHA HANDLES QUADWORD ARGUMENTS */J/* BY VALUE SO YOU DO NOT HAVE TO (SPECIFY THE INDIRECTION OPERATOR (@). */N/*-- */N/* */H/* AUTHOR: THE VMS GROUP CREATION DATE: 1-AUG-1976 */N/* */N/* MODIFIED BY: */N/* ( */@/* X-137 ACG0722 ANDY GOLDSTEIN, 15-OCT-2008 12:00 */B/* REMOVE UNUSED SS$_SYMLINKENTRY STATUS */B/* ALSO GENERALIZE TEXT OF TOOMANYVER MESSAGE */N/* */4/* X-136 AJ ANDERS JOHANSSON 10-OCT-2008 */C/* ADD INVKTLIM MESSAGE, AND ADJUST THE "room left" ACCORDINGLY */E/* FOR THAT SECTION. I ACTUALLY COUNTED THE MESSAGES, AND APPLIED */B/* A GREATER ADJU(STMENT TO MATCH THE DEFINED NUMBER OF MSGS IN */B/* THE COMMENT. */N/* */5/* X-135 SAN SANDEEP RAMAVANA 12-JUN-2008 */B/* ADD A NEW SUCCESS STATUS RETURN, LOWPREC */N/* */N/* X-134 LSH LON HILDE 31-OCT-2004 */S/* TWEAK A(STFLT MESSAGE CHANGING "target PC" TO "target PC or FV". */N/* */8/* X-133 MAS0823 MARK A. STILES 20-OCT-2006 */B/* IT'S BEEN A LONG AND FUN RIDE, VMS. THIS IS MY LAST */B/* CHECKIN ON MY LAST DAY. AN APPROPRIATE REMINDER STATUS */E/* FOR FUTURE NOTIFICATION. FIXUP REVISION NUMBERS TO MATCH VDE. */N/* */N/* X-132 ( DOUGLAS FYFE 29-NOV-2005 */B/* ADD SS$_TOOMANYPERSONA PERSONA ARRAY FULL STATUS. */N/* */N/* X-131 KGB KENNETH G. BLAYLOCK 23-SEP-2005 */N/* ADD IN THE SUCCESS STATUS OF SS$_SYMLINKENTRY TO */N/* INDICATE THAT THE DIRECTORY ENTRY HAS A SYMLINK */N/* HINT VALUE. ( */N/* */./* X-129/130 WBF BURNS FISHER 12-MAY-2005 */B/* ADD "reason mask" FIELD TO SS$_DEBUG_FAULT. IT SHOULD BE */B/* JUST LIKE ACCVIO */N/* */N/* X-128 KGB KENNETH G. BLAYLOCK 29-NOV-2004 */N/* ADD IN A NEW FILE WARNING. FILEFULL WHICH( INDICATES */N/* THAT THE SUPPORTED ALLOCATION FOR THE FILE IS FULL. */N/* */9/* X-127 RAB0122 ROBERT A. BROOKS -SEP-2004 */B/* CHANGE TEXT FOR NOMODNONEPOL TO CORRELATE WITH */B/* NAME CHANGE OF HBMM NONE POLICY TO NODEFAULT (NO DEFAULT). */B/* ERROR NAME STAYS THE SAME, OF COURSE. */N/* ( */B/* REMOVE THE WORD QIOSERVER FROM NOMOREPATHS. QIOSERVER IS */C/* DEAD, BUT THE ERROR MESSAGE IS STILL BEING USED BY MULTIPATH */B/* AND MULTIPATH-AWARE COMPONENTS ($GETDVI, FOR EXAMPLE). */N/* */2/* X-126 RUTH GOLDENBERG 10-AUG-2004 */I/* ADD INFORMATIONALS FOR GEM: ARGTYPN, FPMODECTL, FPMODEPC, FPMODERC */N/* ( */2/* X-125 RUTH GOLDENBERG 4-AUG-2004 */B/* TWEAK TEXT FOR SS$_TOOMANYLNAM. */N/* */8/* X-124 MAS0800 MARK A. STILES 7-JUL-2004 */B/* ADD GAMEOVER MESSAGE FOR INTERSTELLAR CONQUEST. */N/* */9/* X-123 RAB0106 ROBERT A. BROOKS 26-MAY-2004 */B/* MORE SHADOWING MESSAGES. ( */N/* */9/* X-122 RAB0103 ROBERT A. BROOKS 17-MAY-2004 */B/* MORE SHADOWING MESSAGES FOR HBMM. */N/* */9/* X-121 RAB0102 ROBERT A. BROOKS 11-MAY-2004 */B/* MORE SHADOWING MESSAGES FOR HBMM. */N/* ( */7/* X-120 SAD STUART A. DAVIDSON 7-MAY-2004 */B/* ADD SS$_QIO_FAULT FOR SPECIAL TREATMENT THAT $QIO */B/* NEEDS IN ORDER TO FAULT IN A PAGE IN CALLER'S MODE. */B/* SS$_QIO_FAULT IS HANDLED BY A CALLER'S MODE JACT, */B/* WHERAS QIO_CROCK IS HANDLED IN THE SYSTEM SERVICE */B/* DISPATCHER (WHICH IS PROBLEMATIC WITH THE IA64 CALLING */B/* STANDARD). */N/* ( */8/* X-119 RAB098 ROBERT A. BROOKS 05-MAY-2004 */B/* ADD SEVERAL SHADOWING-RELATED MESSAGES TO REPLACE THE */B/* TOO-GENERIC INCSHAMEM. */N/* */./* X-118 CLAIR GRANT 21-APR-2004 */B/* ELIMINATE "Digital" AND "DEC" FROM ERROR TEXT STRINGS */N/* ( */2/* X-117 WBF BURNS FISHER 31-MAR-2004 */B/* ADD SS$_CALLUNDEFSYM */N/* */4/* X-116 JRC JOHN R. COVERT 12-MAR-2004 */B/* ADD XVALNOTVALID FOR EXTENDED LOCK VALUE BLOCK */N/* */8/* X-115 RAB086 ROBERT A. BROOKS 03-FEB-2004 */B/* ADD HBMMCREP(OSTMRG FOR HBMM. */N/* */4/* X-114 DJM DENNIS MATTOON 27-JAN-2004 */B/* ADD SYMBOLS/MESSAGES FOR TIE */N/* */8/* X-113 RAB085 ROBERT A. BROOKS 16-JAN-2004 */B/* ADD WLGCANTHBMM FOR HBMM, TO INDICATE THAT OLDER */B/* DEVICES CAPABLE OF MSCP-BASED MINIMERGE (H (SC/HSD/HSJ) */B/* CANNOT USE HBMM. */N/* */8/* X-112 RAB084 ROBERT A. BROOKS 14-JAN-2004 */B/* ADD SEVERAL MESSAGES FOR HOST-BASED MINIMERGE (HBMM). */N/* */7/* X-111 KLN3346 KAREN L. NOEL 7-SEP-2003 */B/* O CHANGE TAKEN_BRANCH TO USE DISPLAY PC/PS. */D/* (O CHANGE NEW REASON MASKS TO BYTES OR WORDS INSTEAD OF QUADS. */N/* */7/* X-110 KLN3340 KAREN L. NOEL 28-AUG-2003 */B/* O ADD SS CODES FOR TAKEN BRANCH FAULT, IA32 TRAP, DEBUG */B/* FAULT AND SYSTEM BREAK. */B/* O FIX SEVERITY OF APPLICATION BREAK. */B/* O FIX NATFAULT TO DISPLAY REASON MASK INSTEAD OF ISR. */N/* ( */7/* X-109 KLN3299 KAREN L. NOEL 4-JUN-2003 */B/* ADD SS$_INSF_SHM_REG. */N/* */6/* X-108 LC0001 LARRY CAMILLI 12-MAR-2003 */B/* ADD SS$_FILENOTCACHED. */N/* */5/* X-107 PJB0044 PAUL BENOIT 02-DEC-2002 ( */B/* ADD SS$_BREAK_ARCH. */N/* */5/* X-106 PJB0029 PAUL BENOIT 08-NOV-2002 */B/* ADD SS$_BREAK_APPL. */N/* */5/* X-105 PJB0021 PAUL BENOIT 18-OCT-2002 */B/* ADD SS$_FLTDENORMAL. */N/* ( */5/* X-104 PJB0013 PAUL BENOIT 12-SEP-2002 */B/* ADD SS$_NATFAULT. */N/* */7/* X-103 SAD STUART A. DAVIDSON 18-JUL-2002 */B/* ADD TURSTCONF FOR USE WHEN AN OPERATION WOULD VIOLATE */B/* THE TRUSTED ENVIRONMENT FOR PRIVILEGED IMAGE EXECUTION. */N/* ( */2/* X-102 RUTH GOLDENBERG 10-MAY-2002 */B/* MODIFY SS$_INCOMPAT TEXT FOR USE BY $GETJPI IN A FAILURE */B/* TO GET AN UNDEFINED ITEM CODE FROM A TARGET SYSTEM. */N/* */8/* X-101 DJS011203 DAVE SWEENEY 07-DEC-2001 */B/* ADD SS$_FORCEX FOR USE BY DCL COMMAND STOP/IMAGE. */N/* */9(/* X-100 EMW0253 ELINOR M. WOODS 15-OCT-2001 */B/* ADD SS$_EXITFORCED FOR USE BY SYS$DELPRC IN */B/* SUPPORT OF NEW EXIT FUNCTIONALITY. */N/* */7/* X-99 MAS0677 MARK A. STILES 24-AUG-2001 */B/* ADD SS$_PRESTO FOR USE BY INTERRUPT OR FORK SERVICE */B/* ROUTINES WHICH HAVE KNOWLEDGE THAT THE SAVED INTERRUPT */B/* OR EXCEPTION FRAME NEED NOT BE M (ULTIPLY PRESERVED. */N/* */7/* X-98 MAS0671 MARK A. STILES 16-MAR-2001 */B/* ADD SS$_FISH FOR MESSAGE TRANSLATION, OR LACK THEREOF. */N/* */-/* X-97 ABP ANU PANT 18-SEP-2000 */B/* ADD SS$_PATHAMBIG, SS$_INVMVIP, SS$_NOPATHAVAIL, */B/* AND SS$_NOENACURINV FOR USE BY MULTIPATH SYSTEM */B/* )SERVICE. */I/* */5/* X-96 JMB224 JAMES M. BLUE 7-MAR-2000 */B/* ADD SS$_NOSUCHQPOOLID FOR USE BY QIOSERVER'S HANDLING OF */B/* POOL DEALLOCATION. CORRECT PREVIOUS QIOSERVER MESSAGE */B/* ADDS TO CONFORM WITH GUIDELINES ABOVE. */N/* */6/* X-95 KLN2158 KAREN L. )NOEL 03-MAR-2000 */B/* ADD BADRAD. */N/* */5/* X-94 JMB197 JAMES M. BLUE 6-JAN-2000 */B/* ADD SS$_QPOOL_DEL_INIT, SS$_QPOOL_DEL_INPRG, AND */B/* SS$_QPOOL_DEL_BUSY FOR USE BY QIOSERVER'S HANDLING OF */B/* POOL DEALLOCATION. */N/* ) */5/* X-93 EMB ELLEN M. BATBOUTA 05-NOV-1999 */H/* ADD SS$_NOADD AND SS$_SYSTEMUIC MESSAGES FOR THE CLASS */B/* SCHEDULER. */I/* */5/* X-92 JMB183 JAMES M. BLUE 23-SEP-1999 */B/* ADD MESSAGES FOR QIOSERVER'S QIO$CONFIGURE AND QCP. */N/* */5/* X-91 EMB ELL)EN M. BATBOUTA 12-AUG-1999 */B/* ADD SS$_INCLASS ERROR MESSAGE. THIS ERROR MESSAGE WILL */B/* BE RETURNED BY THE $SCHED SYSTEM SERVICE WHEN AN ATTEMPT */B/* IS MADE TO CLASS SCHEDULE A PROCESS/KERNEL THREAD WHEN */B/* IT ALREADY BELONGS TO A SCHEDULING CLASS FROM THE */B/* CLASS SCHEDULER DATABASE FILE. */N/* */5/* X-90 JMB076 JAMES M. BLUE 22-MAR-1999 ) */B/* ADD SS$_NOQIOSERVER - QIOSERVER'S QIO$CONFIGURE */B/* PROCESS IS NOT AVAILABLE TO HANDLE SYS$QIOSERVER */B/* REQUESTS. ADD SS$_INVQSRFNC - THE FUNCTION CODE */B/* IN THE SYS$QIOSERVER REQUEST IS INVALID. */N/* */N/* X-89 GP GENADY PERCHENKO 18-FEB-1999 */N/* ADD WRONGDRV ) */N/* */6/* X-88 JAH0323 JOHN A HARNEY 10-DEC-1998 */B/* ADD PERSONARESERVED FOR OPERATIONS ATTEMPTED ON */B/* A RESERVED PERSONA INDEX. */N/* */4/* X-87 JRK390 JIM KAUFFMAN 11-SEP-1998 */B/* ADD NOCPUMATCH AND TRIM CPUSELECTED TO FIT PAGE */N/* ) */4/* X-86 JRK390 JIM KAUFFMAN 9-JUL-1998 */B/* ADD CPUSELECTED */N/* */7/* X-85 KJP-SDOS KEVIN PLAYFORD 29-JUN-1998 */B/* UPDATE SNAPSHOT SERVICES MESSAGES BASED ON DEVICE NAME */B/* CHANGE. */N/* ) */5/* X-84 EMB ELLEN M. BATBOUTA 04-JUN-1998 */H/* ADD 2 NEW ERROR MESSAGES, NOFASTPATH AND CPUNOTAVAIL. */N/* */N/* X-83 GP GENADY PERCHENKO 26-MAY-1998 */N/* FIX A TYPO IN ERROR SYMBOL. IT SGOULD BE DEVNOTCON */N/* INSTEAD OF MPDEVNOTCON. */N/* ) */N/* X-82 GP GENADY PERCHENKO 20-MAY-1998 */N/* ADD SOME MORE MULTIPATH STATUS CODES. AND RENAME SOME */N/* EXISTING ONES. */N/* */N/* X-81 GP GENADY PERCHENKO 02-APR-1998 */N/* ADD NEW STATUS CODES FOR MULTIP )ATH. */N/* *///* X-80 DAVE BERNARDO 24-FEB-1998 */B/* ADD BADLCKTBL AND MAKE BROKEN A SUCCESS STATUS CODE. */B/* MAKE THE ERROR TEXT MORE MEANINGFUL. */B/* */2/* X-79 AHM039 DREW MASON 17-FEB-1998 */B/* ADD MORE STATUS CODES FOR GALAXY MEMBERSHIP SERVICES. */N/*  ) */;/* X-78 PKH-G006 PAUL K. HARTER, JR. 27-JAN-1998 */B/* ADDED TWO STATUS CODES FOR GALAXY MEMBERSHIP SERVICES. */N/* */2/* X-77 AHM034 DREW MASON 26-JAN-1998 */B/* ADD STATUS CODES FOR GALAXY MEMBERSHIP CALLBACKS. */N/* */2/* X-76 NELSON PAT NELSON 14-JAN-1 )998 */B/* CLEANED UP INSTRUCTIONS AT TOP OF FILE. */N/* */2/* X-75 DMB DAVE BERNARDO 07-JAN-1998 */B/* ADD MORE STATUS CODES FOR GALAXY LOCKING. */N/* */0/* X-74 HAR HAROLD READ 10-DEC-1997 */B/* ADD NEW STATUS CODE FOR MSCP ERRORS. */N/*  ) */N/* X-73 JAH0250 JOHN A HARNEY 11-NOV-1997 */N/* ADD SS$_NOSUCHEXT FOR IMPERSONATION SERVICES TO TELL */N/* THE USER THERE'S NO SUCH EXTENSION. */N/* */2/* X-72 DMB DAVE BERNARDO 27-OCT-1997 */B/* ADD STATUS CODES FOR GALAXY LOCKING. */N/*  ) */6/* X-71 KLN2008 KAREN L. NOEL 21-OCT-1997 */B/* ADD NEW STATUS CODES FOR GALAXY SHARED MEMORY. */N/* */)/* X-70 HAR HAROLD READ 18-SEP-1997 */N/* ADD TEN NEW ERROR MESSAGES FOR DU/TUDRIVER. */N/* */./* X-69 ANDY KUEHNEL 10-S)EP-1997 */G/* ADD SS$_SECREFOVF ERROR TO BE RETURNED IF ADDING MORE REFERENCES */G/* TO A GLOBAL SECTION WOULD CAUSE THE REFERENCE COUNT TO OVERFLOW. */N/* */9/* X-68 WDB:MTD20 WALTER BLASCHUK 13 AUG 1997 */B/* MULTIPLE TAPE DENSITY PROJECT: INSERT TWO INFORMATIONALS */N/* SS$_NOTATBOT AND SS$_PREVSDENS. ALPHA AND VAX. */N/* ) */7/* X-67 KJP-SDOS KEVIN PLAYFORD 18-JUL-1997 */E/* UPDATE SNAP CAPABLE DISK ERROR MESSAGES AND RESERVE SOME EXTRA */B/* MESSAGES. */N/* */7/* X-66 KJP-SDOS KEVIN PLAYFORD 11-JUN-1997 */D/* ADD SS$_TOOMANYFRAGS AND SS$_TOOMANYFAMILIES FOR SNAP CAPABLE */B/* DISK. */N/*) */5/* X-65 IBB038 IAN BROCKBANK 4-JUN-1997 */B/* F11BXQP HFS LATENT SUPPORT - ADD SS$_NOTF11ODS5, */B/* SS$_NOCONVJNL AND SS$_NORAD50. */N/* */5/* X-64 BMAN BRIAN MAN 21-MAR-1997 */N/* NO CHANGES: CLEAN UP SOME SO DIFFS WORK BETTER BETWEEN */B/* THE VAX VERSION ) */N/* */N/* X-63 DOUGLAS FYFE 14-FEB-1997 */N/* MAINLINE MERGE OF PER-THREAD SECURITY SUPPORT: (GEN 58A1) */N/* ADD SS$_PERSONADELPEND TO BE RETURNED WHEN A REQUEST */N/* TO DELETE A PERSONA IS PREVENTED ONLY BY OUTSTANDING */N/* REFERENCES IN REFCOUNT. ) */N/* */:/* X-62 JMP-VDC JULIAN PALMER 29-JAN-1997 */B/* ADD SS$_FLUSHFAIL FOR VDC LATENT SUPPORT. */N/* */1/* CW-SD CHRIS WHITAKER 29-JAN-1997 */B/* ADD ADDITIONAL ERROR MESSAGES FOR SNAPSHOT-CAPABLE */B/* DISK. */N/* ) */9/* X-61 NYK656 NITIN Y. KARKHANSI 21-AUG-1996 */B/* ADDED SS$_NOSHPTS AS PART SHARED PAGE TABLE SUPPORT. */N/* */6/* X-60 KLN1572 KAREN L. NOEL 6-AUG-1996 */B/* O ADDED SS$_RES_MEM_INCON FOR RESERVED MEMORY REGISTRY. */B/* O ADDED SS$_PTE_NOT_EMPTY FOR SYSTEM PTE DEALLOCATION. */N/* ) */9/* X-59 NYK640 NITIN Y. KARKHANIS 17-JUL-1996 */C/* O ADDED SYSTEM SERVICE MESSAGE FOR SHARED PAGE TABLE SECTION */B/* CREATION, SS$_CREATED_SHPT. */B/* O REMOVED SS$_MRES_NOTREG, SS$_MRES_REGSMALL AND */B/* SS$_MRES_REGBIG FOR KAREN NOEL. */N/* */6/* X-58 KLN1546 KAREN L. NOEL 2-MAY-1996 ) */B/* ADDED SYSTEM SERVICE MESSAGES FOR MEMORY RESIDENT SECTIONS. */B/* MRES_REGSMALL, MRES_REGBIG, MRES_NOTREG, MRES_PFNSMALL, */B/* MRES_INCON, NORESERVEDMEM, RESERVEDMEMUSED, NOMEMRESID */N/* */9/* X-57 JACH0010 JEREMY A. C. HITT 2-MAR-1996 */B/* ADDED THE FOLLOWING MESSAGES FOR ACME: NOEXTAUTH, */B/* ERRMAPAUTH, AUTHFAIL AND INVUSER. */N/* ) */3/* X-56 WXD BILL DAVENPORT 13-DEC-1995 */B/* PER-THREAD SECURITY STAGE 1 CHECKIN: */N/* */B/* ADD NODELPERMANENT ERROR CODE TO BE RETURNED WHEN DELETION */B/* OF A PERMANENT PERSONA IS ATTEMPTED. ALSO, RENAME DETACH */B/* PRIVILEGE TO IMPERSONATE. ADD LITERAL SO THAT OLD SYMBOL */B/* STILL GETS CREATED. ) */N/* */7/* X-55 PKW338 PAUL K. M. WEISS 8-NOV-1995 */F/* ADD SS$_THREAD_UPCALL, WHICH IS USED TO COMMUNICATE FROM KERNEL */D/* INTERNAL SERVICES TO THE CALLER'S MODE JACKET THAT IT SHOULD */B/* MAKE AN UPCALL */N/* */?/* X-54 JCH703B JOHN C. HALLYBURTON, JR. 10-OC )T-1995 */C/* ADD SS$_NOBUFOBJID (ATTEMPTED USER MODE CREATE BUFFER OBJECT */B/* WITHOUT A RIGHTS IDENTIFIER). */N/* */6/* X-53 KLN1520 KAREN L. NOEL 28-SEP-1995 */B/* 1. FIX SEVERAL NEW SS$ CODES TO BE ERRORS INSTEAD OF */B/* WARNINGS. */B/* 2. SHORTEN SEVERAL NEW SS$ CODE NAMES SO THEY ARE LESS */D/* T)HEN 15 CHARACTERS. OTHERWISE, THEY GET TRUNCATED IN THE */;/* MESSAGE TEXT. */B/* 3. FIX TEXT OF SS$_CHANVIO. */N/* */6/* X-52 KLN1514 KAREN L. NOEL 12-SEP-1995 */B/* 1. CHANGE MESSAGE TEXT FOR SS$_IVPROTECT TO INCLUDE */B/* INVALID GLOBAL SECTION PROTECTION */B/* 2. FIX TYPO IN SS$_OFFSET_NOTBLOCK MES)SAGE */N/* */1/* X-51 WBF BURNS FISHER 7-SEP-1995 */B/* ADD SS$_EMULATE INFO MESSAGE */N/* */?/* X-50 JCH703A JOHN C. HALLYBURTON, JR. 8-MAR-1995 */B/* ADD EXBUFOBJLM ERROR CODE. */N/* ) */9/* X-49 NYK292 NITIN Y. KARKHANIS 28-FEB-1995 */B/* O DISPLAY THE FULL 64-BITS OF PCS WITH !XH. */B/* O REPLACED INSTANCES OF !XQ WITH !XH (!XQ WAS INTRODUCED */B/* IN EDIT X-47). */N/* */0/* X-48 RLP050 RAY PFAU 23-FEB-1995 */B/* ADD SS$_NOMORETHREAD FOR KERNEL THREADS. */N/* ) */9/* X-47 NYK280 NITIN Y. KARKHANIS 23-FEB-1995 */C/* 64-BIT PROJECT: PROMOTE ADDRESS ARGUMENTS IN SYSTEM MESSAGES */B/* FROM !XL TO !XQ. $FAO NOW HANDLES QUADWORD BY VALUE! */N/* */6/* X-46 KLN1389 KAREN L. NOEL 16-FEB-1995 */B/* ADD EVEN MORE SS$ CODES FOR 64-BIT GLOBAL SECTION */B/* SYSTEM SERVICES. ) */N/* */6/* X-45 KLN1377 KAREN L. NOEL 3-FEB-1995 */B/* ADD ANOTHER SS$ CODE FOR 64-BIT MMG SYSTEM SERVICES. */N/* */6/* X-43 KLN1342 KAREN L. NOEL 1-DEC-1994 */B/* ADD SOME FORGOTTEN CODES FOR 64-BIT MMG SYSTEM SERVICES. */N/* */6/* X)-42 KLN1333 KAREN L. NOEL 16-NOV-1994 */B/* ADD NEW CODES NEEDED FOR 64-BIT MMG SYSTEM SERVICES. */N/* *///* X-41 TRB TOM BENSON 02-NOV-1994 */D/* ADDED SS$_RESIGNAL_64 AND SS$_CONTINUE_64. THESE ARE VARIANTS */B/* OF THEIR 32-BIT COUNTERPARTS THAT TELL EXCEPTION THAT THE */B/* 64-BIT SIGNAL ARRAY SHOULD BE USED. */N/* ) */</* X-40 LSS0312 LEONARD S. SZUBOWICZ 20-OCT-1994 */B/* ADD SS$_NOT64DEVFUNC. THIS IS RETURNED BY THE $QIO SYSTEM */B/* SERVICE IF THE P1 PARAMETER HAS MORE THAN 32 SIGNIFICANT */B/* BITS AND THE DRIVER DOES NOT SUPPORT 64-BITS. */N/* *///* X-39 KLN1326 KAREN L. NOEL 18-OCT-1994 */B/* 64-BIT PROJECT: */B/* ADD SS$_ )ARG_GTR_32_BITS */N/* */7/* X-38 JCH703 JOHN C. HALLYBURTON, JR. 5-OCT-1994 */B/* ERROR CODES FOR FAST-IO: BADFANDLE THRU UNSUPVOLSET */N/* */1/* X-37 JFD0633 JAMES F. DUNHAM 15-SEP-1994 */B/* FOLD FROM X-33U3 - ADD MESSAGES TO SUPPORT SCSI-2 TCQ */N/* !) *///* X-36 NANCY JEAN BURKHOLDER 19 SEP 1994 */B/* ADD SS$_ZEROALLOCLS MESSAGE */N/* */*/* X-35 DBK001 DAN KYLER 7-SEP-1994 */D/* ADD MESSAGES FOR SMFS LAYERED PRODUCT IN MME RESERVED REGION. */B/* FOLDED FROM X-33U1. */N/* */1/* X-34 DM ")B002 DAVID M. BERNARDO 28-AUG-1994 */B/* ADD SS$_NOMULTITHREAD, SS$_MTHREADACTIVE, SS$_MAXKTHREADS, */B/* SS$_NOSUCHTHREAD, SS$_NOTHREADMAN, SS$_NOSUCHUPCALL, */B/* SS$_TMACTIVE. */B/* */*/* X-33 JHH-BL5 JIM HOGG 6-JUL-1994 */B/* ADD SS$_INSFTHREADS & SS$_NOTSUPFS FOR F64 FILE SYSTEM. */N/* */2#)/* X-32 RAB0191 RICHARD A. BISHOP 3-JUN-1994 */B/* ADD SS$_SIGNAL64 FOR MIKE HARVEY */N/* */3/* X-31 SAD0308 STUART A. DAVIDSON 22-MAR-1994 */B/* ADD INSFP1POOL TO CLEARLY IDENTIFY INSUFFICIENT CTLPAGES. */N/* */./* X-30 RAB RICHARD A. BISHOP 15-MAR-1994 */B/* PICK UP THE FOLLOWING CORAL CHANGE: $) */N/* */1/* X-35 FAK004 FORREST A. KENNEY 11-JAN-1994 */D/* ADD NEW MESSAGE , IOC$CLONE_UCB RETURNS THIS */B/* WHEN WE HAVE USED UP ALL THE AVAILABLE UNITS FOR A DEVICE. */N/* */5/* X-29 RWC136 RICHARD W. CRITZ, JR. 23-DEC-1993 */B/* ADD SS$_CONFIG_SYNTAX FOR 3PB SUPPORT. IT REPLACES */B/* SS$_OBSOLETE_6. %) */N/* */./* X-28 RAB RICHARD A. BISHOP 9-DEC-1993 */B/* ADD IMPERSONATION MESSAGE CODES FOR STU DAVIDSON */N/* */*/* X-27 HH1241 HAI HUANG 06-OCT-1993 */B/* CORRECT PARAMETERS FOR SS$_ILLEGAL_SHADOW. */N/* &) */#/* X-26 DEE RYAN 30-SEP-1993 */B/* CORRECTED SPELLING, PUNCTUATION, AND LEGAL ERRORS IN */B/* MESSAGE TEXT. */N/* */./* X-25 RAB RICHARD A. BISHOP 17-AUG-1993 */B/* PICK UP NEW VAX SYMBOL: */N/* */,/* X-32 WXD BILL DAVENPORT 11-AUG-1993 */B')/* ADD SS$_IVNODNAM, INVALID NODE NAME FOR DECNET. */N/* */*/* X-24 HH1202 HAI HUANG 12-AUG-1993 */B/* ADD NEW IEEE ARITHMETIC EXCEPTIONS. */N/* */,/* X-23 HH1110 GENE LEACHE 15-JUL-1993 */B/* ADD SS$_NOCALLTRANS_SUP */N/* () */*/* X-22 HH1110 HAI HUANG 14-JUN-1993 */B/* ADD SS$_TARGET_UNWIND, SS$_TARGET_GOTO_UNWIND. */N/* */*/* X-21 HH1101 HAI HUANG 26-MAY-1993 */B/* REPLACE REASON MASK WITH I/O STATUS IN PAGE READ ERRORS. */N/* */O/* X-20 MW MARK WATTS 25-MAY-1993 */N/* )) ADD A NEW FILESYSTEM ERROR MESSAGE CALLED SHELFERROR, THIS */Q/* WILL BE RETURNED THROUGH THE FILESYSTEM BY THE SHELF HANDLER. */N/* */./* X-19 RAB RICHARD A. BISHOP 14-MAY-1993 */B/* FOLD INITIAL CORAL CHANGES: */N/* */3/* X-21A1A1 MME001 MICHAEL BEELER 12-OCT-1992 */B/* ADD MME (MEDIA MANAG*)EMENT EXTENSION) MESSAGES */N/* */./* X-18 RAB RICHARD A. BISHOP 14-APR-1993 */B/* FOLD OF BLADE/DELTA CLEANUP (REQUIRED SS$_FDT_COMPL TO */B/* CHANGE VALUE): */N/* */7/* X-14U3 RAB RICHARD A. BISHOP 14-APR-1993 */B/* MERGE BLADE CHANGES AND RESOLVE CONTENTION: +) */N/* */;/* X-25A1 AJM93032 ANDREW J. MOSKAL 11-MAR-1993 */B/* ADD NOTRANQUIL AND SMALLHEADER - MAC RELATED MESSAGES. */N/* */3/* X-17 EHL003 GENE LEACHE 1-APR-1993 */B/* ADD SIG_ARGMISMATCH */N/* */3/* X-1,)6 EHL003 GENE LEACHE 22-MAR-1993 */B/* ADD SIG_INVARGTYPE, SIG_INVFLTARG, SIG_INVARGLIST */N/* */N/* X-15 WDB:HLL004 WALTER D. BLASCHUK, JR. 06-JAN-1993 */N/* HLLDD PROJECT: FDT PROCESSING CHANGES. */B/* ADD THE SS$_FDT_COMPL CONSTANT. THIS WILL INDICATE */B/* THAT FDT PROCESSING IS COMPLETE. IT SAYS NOTHING */B/* ABOUT THE -)PRESENCE OF AN ERROR. */N/* */0/* X-14 RLP017 RAY PFAU 18-DEC-1992 */B/* CLARIFY CPUSTOPPING TEXT. FIX TYPO IN NOTALLCANCELED */B/* TEXT. */N/* */5/* X-13 RAB RICHARD A. BISHOP 20-NOV-1992 */D/* NEW SYMBOLS FOR PAUL HOULIHAN (SCS), PLUS MORE .) BLADE CHANGES: */N/* */0/* PJH PAUL J. HOULIHAN 20-NOV-1992 */B/* ADD SCS INTERNAL STATUS. THESE ARE NEVER SEEN BY USERS. */N/* */>/* X-24 MWD0038 MICHAEL DANIELE 20-OCT-1992 14:13 */B/* ADD NAMESERVCOMMERR - "Name service communications error" */B/* ON BEHALF OF DECNET/OSI. */N/* /) */E/* X-23 DDP1354 DERRELL D. PIPER 30-SEP-1992 16:36 */C/* ADD MESSAGE FOR ATTEMPT TO ADD A PROTECTED SUBSYSTEM ID WITH */C/* ATTRIBUTES THAT EXCEED THOSE OF ITS HOLDER (SS$_SSANOTAUTH). */B/* ALSO ADD A MESSAGE FOR INVALID FILE OWNER (SS$_BADOWNER). */N/* */E/* X-22 DDP1337 DERRELL D. PIPER 16-SEP-1992 17:55 */B/*0) UPDATE NOPRIV, EXQUOTA, AND OBJNOTLOCKED MESSAGE TEXTS. */N/* */6/* X-12 RS00375 RICHARD SAYDE 1-SEP-1992 */B/* CORRECT MESSAGE TEXT FOR ALIGNMENT FAULT TRAP. REGISTER */B/* INFORMATION IS NO LONGER PROVIDED, IT IS NOW A FUNCTION */B/* CODE - 0 MEANS LOAD, 1 MEANS STORE. */N/* */1/* X-11 HH0974 HAI 1)HUANG 16-AUG-1992 */B/* CORRECT MESSAGE TEXT FOR SS$_FLTINV. */N/* */5/* X-10 RAB RICHARD A. BISHOP 14-AUG-1992 */B/* PICK UP ANOTHER BLADE CHANGE: */N/* */9/* X-21 JAD045 JOSEPH A. DZIEDZIC 29-JUN-1992 */B/* ADD "page read error across access modes" STATUS, 2) */B/* SS$_PAGRDERRXM. */N/* */4/* X-9 RAB RICHARD A. BISHOP 16-JUL-1992 */B/* PICK UP CHANGE FROM VAX, RESET IDENT & AUDIT TRAIL */N/* */1/* X-19 RLA095B ROBERT L. ADAMS 12-JUN-1992 */B/* OBSOLETE CHARGE CODE ACCOUNTING AND REPLACE WITH */B/* MORE DESCRIPTIVE PROTECTED3) SUBSYSTEMS ERRORS. */B/* ADD COMMENT ON OBSOLETING MESSAGES. */N/* */3/* X-22 EHL002 GENE LEACHE 8-JUL-1992 */B/* ADD SS$_ILLPOLICY */N/* */3/* X-21 EHL001 GENE LEACHE 18-JUN-1992 */B/* ADD SS$_ILLPRIPOL 4)*/N/* */9/* X-20 EMB0170 ELLEN M. BATBOUTA 12-JUN-1992 */B/* ADD 2 NEW FATAL ERROR MESSAGES, TRANSCALLER AND */B/* NOCALLTRANS. THESE MESSAGES INDICATE THAT A NATIVE */B/* IMAGE WAS NOT BUILT CORRECTLY TO INTEROPERATE WITH */B/* TRANSLATED CODE. */N/* */1/* X-19 HH5)0931 HAI HUANG 27-MAY-1992 */B/* CHANGE PSL IN ERROR MESSAGES TO PS. */N/* */5/* X-18 RAB RICHARD A. BISHOP 19-MAY-1992 */B/* PICK UP RECENT BLADE CHANGES: */N/* */./* X-17 ATP014.17 ALAN POTTER 2-APR-1992 */B/* CHANGE ERROR MESSAGE TEXT FOR SS$_TPDISABLED AND 6)*/B/* SS$_NOLOG. */N/* */G/* X-15/16 DDP1198 DERRELL D. PIPER 24-MAR-1992 18:15 */B/* FIX PUNCTUATION OF MESSAGES FOR HELP/MESSAGE AND ADD SOME */B/* POMPOUS GUIDELINES FOR FUTURE GENERATIONS. */N/* */1/* X-17 HH0855 HAI HUANG 10-MAR-1992 */F/* -16 ADD 7)STATUS FOR GENTRAP CODES. */N/* */1/* X-15 HH0853 HAI HUANG 26-FEB-1992 */B/* ADD SS$_GENTRAP, SS$_GOTO_UNWIND, SS$_EXIT_UNWIND. */N/* */9/* X-14 RAB0100 RICHARD A. BISHOP 30-JAN-1992 */B/* MERGE BLADE AND ALPHA VERSIONS OF THIS FILE. THIS */B/* IS BEING DONE SO AS TO LEAVE BLADE8) VALUES INTACT. */B/* WHERE CHANGES IN VALUES ARE NECESSARY, THEY ARE */B/* HAPPENING TO ALPHA. */N/* */B/* ALSO MOVE SS$_IMGDMP (PREVIOUS BLADE CHECKIN). THIS */B/* WAS WRONGLY PLACED, AND CAUSED SOME SYMBOLS TO MOVE. */B/* THEY NOW GO BACK TO THEIR ORIGINAL VALUES. */N/* 9) */B/* AS LUCK WOULD HAVE IT, THIS CHECKIN IS GENERATION */B/* 14 ON BOTH MASTERPACKS..... */N/* */I/* ======================================== */N/* */F/* 30-JAN-1992: WHAT FOLLOWS IS THE BLADE AUDIT TRAIL */;/* FROM 30-NOV-1990 TO 20-DEC-1991 :) */N/* */I/* ======================================== */N/* */8/* X-13 SJVMAJ STEPHEN J. VIVIAN 20-DEC-1991 */B/* ADD SS$_IMGDMP SIGNAL FOR MAJIQ SUPPORT. */N/* */;/* X-12 CRB0711 COLIN R. BLAKE 18-DEC-;)1991 13:18:23.93 */B/* THIS IS THE C2 VERSION BEING INSERTED INTO MAINLINE. */N/* */N/* X-8A3A1A2 THE GREAT MERGER NASSER ABBASI 11-DEC-1991 */B/* MERGE T4 WITH BLADE_BLD6 */B/* COPY OF HISTORY FROM BLD6 MODULE */B/* -------------------------------- */7/* X-11 JFD0031 JAMES F. DUNHAM 8-JAN-1991 <) */;/* ADD MESSAGES TO SUPPORT ISO 9660 VOLUME MOUNTS */N/* */9/* X-8A3A1A1 DOR DENNIS O. ROGERS 26-NOV-1991 12:19 */B/* C2 BLADE MERGE (T4): */N/* */8/* X-10 CBD0238 CHARLES B. DUNN 14-OCT-1991 */B/* ADD SS$_TIMENOTSET FOR DTSS SUPPORT */N/* =) */?/* X-8A3A1 CRB0044 COLIN R. BLAKE 6-NOV-1991 08:58 */B/* T3 MERGE: */B/* */./* X-9 EJL0610 EDWARD J. LOS 02-OCT-1991 */>/* RESET VERSION TO MATCH GENERATION. ADD SYSTEM SNAPSHOT */;/* VALIDATION ERRORS */N/* >) */8/* X-8A3 CRB0030 COLIN R. BLAKE 23-OCT-1991 */B/* MORE C2 MERGING: */N/* */4/* T-6T9 SAD0144 STUART A. DAVIDSON 18-OCT-1991 */;/* ADD NOOJBSRV ERROR -- OBJECT SERVER NOT RUNNING. */N/* */:/* X-8A2 FAK0003 FORREST A. KENNEY 16-OCT-1991 */B/* MERGE LATEST C2 CHANGES. ?) */N/* */</* T-9 DDP0887 DERRELL D. PIPER 4-OCT-1991 18:43 */;/* ADD ITEM CODE ERROR MESSAGES. */N/* */:/* X-8A1 FAK0002 FORREST A. KENNEY 20-SEP-1991 */B/* MERGE C2 MESSAGES INTO MAINLINE, FIX IDENT TO AGREE WITH */B/* CMS DUE TO MASTERPACK CLEANUP. @)*/N/* */:/* X-80T8 LMP0542 L. MARK PILANT, 29-JUL-1991 16:42 */>/* ADD A MESSAGE TO INDICATE THAT DELETION OF FILES WITH */;/* ACTIVE RMS JOURNALING IS NOT ALLOWED. */N/* */4/* LMP0544 L. MARK PILANT, 30-JUL-1991 14:45 */;/* ADD A MESSAGE TO INDICATE THE SUPPLIED FILE */=/* SPECIFICATION IS INVALID FOR THE AT A)TEMPTED OPERATION. */N/* */,/* T-7 RLA ROBERT L. ADAMS 26-JUN-1991 */;/* FOLD MAGIC CHANGES INTO TRANQUILITY. */N/* */6/* T-6 DDP0977 DERRELL D. PIPER 7-JUN-1991 10:01 */;/* ADD OVRMAXAUD. */N/* */,/* T-5 AJM AND B)REW J. MOSKAL 13-MAY-1991 */?/* ADD INVSECOPER, NOCLASSSUPPORT - MAC PROTECTION RELATED */;/* MESSAGES. */N/* */2/* T-4 SAD0116 STUART A. DAVIDSON 3-MAY-1991 */;/* ADD ILLRSDM (ILLEGAL RESOURCE DOMAIN OPERATION) */N/* */5/* X-80T3 SAD0109 STUART A. DAVIDSON 19-APR-1991 */;/* ADD OBJECT COC)NTEXT NOT LOCKED MESSAGE. */N/* */5/* X-80T2 SAD0109 STUART A. DAVIDSON 11-MAR-1991 */;/* ADD MISSED MESSAGES FOR SECURITY OBJECT MANAGEMENT */N/* */4/* X-81 RLA0147 ROBERT L. ADAMS 15-FEB-1991 */;/* ADD SECURITY MESSAGES ADDED FOR PHOENIX WORK. */N/* D) */7/* X-87 PMV0169 PETER M. VATNE 20-JUN-1991 */B/* ADD SS$_DEVNOTWS. */N/* */2/* X-86 CW CHRIS WHITAKER 10-MAR-1991 */B/* ADD SS$_REMEMBER ALIAS. */N/* */8/* X-85 FAK001 FORREST A. KENNEY 08-MAR-1991 */B/* ADD SS$_QUEUED. E) */N/* */2/* X-84 JLBBP01 J.L. BERG 28-FEB-1991 */B/* ADD SS$_NOREADER AND SS$_NOWRITER. */N/* */2/* X-83 CW CHRIS WHITAKER 26-FEB-1991 */B/* ADD ERROR CODES FOR DECDTM V1.2 SUPPORT. */N/* F) */7/* X-82 RG40077 RAY GUZMAN 21-FEB-1991 */E/* ADD 4 NEW CODES. SS$_BADCHECKSUM, SS$_INVSECDOMAIN, */B/* SS$_ARBTOOBIG, AND SS$_ORBTOOBIG. */N/* */</* X-81 RKK0058 ROBERT K. KOSAKOWSKI 19-FEB-1991 */B/* RESERVE 20 MESSAGE CODES FOR MEDIA MANAGEMENT EXTENSIONS. */B/* (FOR DAN KYLER) */N/* G) */5/* X-46U12 LPL0001 LEE LEAHY 30 NOV 1990 */B/* MERGED EDIT X-74 */N/* */+/* X-74 LPL0001 LEE LEAHY 12 OCT 1990 */</* ADDED SS$_INVBUSNAM, SS$_INVCOMPTYPE, SS$_INVCOMPID, */;/* SS$_INVCOMPLIST, SS$_RMTPATH, AND NOCOMPLSTS. */N/* H) */I/* ======================================== */N/* */F/* 30-JAN-1992: WHAT FOLLOWS IS THE ALPHA AUDIT TRAIL */;/* FROM 16-JUL-1990 TO 18-DEC-1991 */N/* */I/* ======================================== */N/* I) */6/* X-13 RS00233 RICHARD SAYDE 18-DEC-1991 */B/* ADD ERROR CODES FOR ALIGNMENT FAULT REPORTING. */N/* */5/* X-12 TNS001 TOM SCARPELLI 24-OCT-1991 */B/* ADD MESSAGES FROM VAX SIDE FOR NEW QUEUE MANAGER. */N/* */8/* X-11 DMB001 DAVID M. BERNARDO 23-OCT-1991 */B/* ADD SLJ)ICING_DISABLED. */N/* */5/* X-10 WMC010 WAYNE CARDOZA 24-SEP-1991 */B/* ADD UNALIGNED SP LOAD. */N/* */4/* X-9 TNS001 TOM SCARPELLI 17-JUN-1991 */B/* ADD MESSAGES FROM VAX SIDE FOR $FORGE_WORD SYSTEM SERVICE. */N/* K) */4/* X-8 RWC038 RICHARD W. CRITZ, JR. 12-JUN-1991 */B/* CHANGE SS$_DRVEXISTS AND SS$_DEVEXISTS FROM INFORMATIONALS */B/* TO WARNINGS. */N/* */0/* X-7 HH0624 HAI HUANG 09-APR-1991 */B/* ADD SS$_ALTER, ALTER STACK FRAMES, FOR TIE SUPPORT. */I/* */2/* X L)-K10 LPL001 LEE LEAHY 4 APR 1991 */B/* INCLUDED THE DEFINITIONS FROM IOWA/SIGMA. */N/* */./* X-46U12 LPL0001 LEE LEAHY 30 NOV 1990 */;/* MERGED EDIT X-74 */N/* */,/* X-74 LPL0001 LEE LEAHY 12 OCT 1990 */=/* ADDED SS$_INVBUSNAM, SS$_INVCOMPTYPE, SS$_INVCOMPID, */6/* SS$_M)INVCOMPLIST, SS$_RMTPATH, AND NOCOMPLSTS. */N/* */1/* X-K9 HH0610 HAI HUANG 25-FEB-1991 */B/* ADD ALPHA HARDWARE EXCEPTIONS SS$_HPARITH, SS$_ALIGN. */I/* */8/* X-K8 RFH002 ROBERT F. HOFFMAN 23-JAN-1991 */B/* ADD SS$_QIO_CROCK FOR SPECIAL TREATMENT THAT $QIO */B/* NEEDS IN ORDER TO FAULT IN A PAGE IN CALLER'S MODE. N) */N/* */9/* X-K7 MSH1062 MICHAEL S. HARVEY 13-DEC-1990 */B/* ADD SS$_INVARG FOR $CRMPSC AND $MPGBLSC SERVICES. */N/* */8/* X-K6 RFH001 ROBERT F. HOFFMAN 11-DEC-1990 */B/* ADD SS$_QUEUED FOR TTDRIVER PORT (REPLACES AN UNUSED */B/* MESSAGE) */N/* O) */</* X-K5 RWC003 RICHARD W. CRITZ, JR. 1-NOV-1990 */B/* ADD SS$_DRVNOTVALID. */N/* */</* X-K4 RWC003 RICHARD W. CRITZ, JR. 11-OCT-1990 */B/* ADD $LOAD_DRIVER STATUSES. */N/* */6/* X-K3 KLN1027 KARP)EN L. NOEL 25-JUL-1990 */B/* ADD SS$_NOT_LOADED */N/* */5/* X-K2 WMC0K2 WAYNE CARDOZA 16-JUL-1990 */B/* ADD WAIT IN CALLERS MODE. */N/* */I/* ======================================== */N/* Q) */F/* 30-JAN-1992: WHAT FOLLOWS IS THE COMMON AUDIT TRAIL */;/* UP TO 21-MAY-1990 */N/* */I/* ======================================== */N/* */9/* X-46U11 CW1024 CHRIS WHITAKER 21-MAY-1990 */B/* ADD SS$_VOLATILE. R) */N/* */@/* X-46U10 DDP0643 DERRELL D. PIPER 28-MAR-1990 15:55 */B/* ADD SS$_USEGENPWD. */N/* */9/* X-46U9 MAS0254 MARK A. STILES 20-FEB-1990 */B/* FIXUP OUT-OF-ORDER CODES. MOVE SOME NEW CODES INTO */B/* UNUSED SLOTS. FIX TEXT OF INSFSPT TO BE MORE GENE S)RIC. */N/* */=/* X-46U8 CAM0109 CHRISTOPHER A. MEGA 12-FEB-1990 */F/* ADD BOOTREJECT WARNING STATUS - USED BY START/CPU CODE IF A CPU */B/* FAILS TO BOOT BECAUSE IT IS IN THE BOOT_REJECTED STATE. */N/* */5/* X-46U7 LBB0010 LEE BARTON 30-NOV-1989 */B/* ADD SS$_ARCHIVING, SS$_ARCHIVED (XQP SUPPORT OF ALM) */N/* T) */:/* X-46U6 LMP0517 L. MARK PILANT, 17-OCT-1989 16:42 */B/* ADD PROTECTED SUBSYSTEM SUPPORT. */N/* */6/* X-46U5 RLF RICHARD L. FRANK 16-OCT-1989 */B/* MODIFY INSFSPTS TO BE MORE GENERIC. ADD INSFRPGS AND */B/* INSFLPGS. */N/* U) */=/* X-46U4 CAM0072 CHRISTOPHER A. MEGA 06-OCT-1989 */B/* CHANGED CPUSTOPPD TO CPUSTOPPING */N/* */@/* X-46U3 DDP0546 DERRELL D. PIPER 4-OCT-1989 14:24 */B/* ADD SS$_NOCALLPRIV FOR $CHECK_ACCESS. */N/* */;/* X-46U2 PRD0503 PAUL R. DESV)TEFANO 25-SEP-1989 */B/* ADD SS$_NOSUCHFAC FOR EVENT FACILITY OBJECT SECURITY. */N/* */;/* X-46U1 PRD0495 PAUL R. DESTEFANO 18-SEP-1989 */B/* ADD SS$_INVEVENT FATAL MESSAGE FOR $SETEVTAST AND */B/* $CANEVTAST. */N/* */8/* X-46 SAS0203 SCOTT A. SHURTS 15-SEP-1989 W) */B/* ADD SS$_INCONOLCK FATAL MESSAGE FOR $CHANGE_ACL. */N/* */;/* X-45 CAM0063 CHRISTOPHER A. MEGA 13-SEP-1989 */B/* ADD WARNING AND INFORMATIONAL STATUS FOR ENHANCED PRIMARY */B/* CPU SWITCHING: CPUSTARTIP, CPUSTARTD, CPUSTOPPD, PRIMNOSTP. */B/* ALSO ADDED /FAO=1 TO NSTPPD. */N/* */E/*X) X-44 DDP0429 DERRELL D. PIPER 11-SEP-1989 16:57 */B/* CHANGE THE SEVERITY OF THE NEW PASSWORD STATUS CODES */B/* FROM FATAL TO ERROR. */N/* */8/* X-43 CBD0198 CHARLES B. DUNN 14-AUG-1989 */B/* ADD SS$_EFNOTSET FOR IOC$PRE_SIMREQCOM SUPPORT */N/* */5/* X-42 RAP049Y)1 ROD A. PAYNE 15-AUG-89 */B/* ADD SS$_HSTBUFACC, TO REPORT HOST BUFFER ACCESS ERRORS. */N/* */8/* X-41 CJB0041 CHERYL J. BULMER 9-AUG-1989 */B/* ADD SS$_LOADER, TO REPORT LOADER CYCLE ERRORS. */N/* */7/* X-40 MAS0238 MARK A. STILES 9-AUG-1989 */B/* ADD SS$_CPUCAP FOR USE WHEN A REQUESTED CPU DOES Z) NOT */B/* HAVE THE CAPABILITIES REQUIRED TO RUN THE PROCESS. */B/* [FOLD FROM X-29U11 IN V5.3 STREAM] */B/* */</* X-39 MVI0033 MICHAEL V. ILES, 28-JUL-1989 10:08:05.45 */B/* ADD MESSAGE CODE NOSUCHCPB AND CHANGE TEXT FOR ACLFULL */N/* */E/* X-38 DDP0387 DERRELL D. PIPER 25-JUL-1989 12:47 */B/* [)ADD MESSAGE CODES FOR SITE-SPECIFIC PASSWORD POLICIES. */N/* */E/* X-37 DDP0375 DERRELL D. PIPER 31-MAY-1989 15:12 */?/* REPLACE SOME OBSOLETE MESSAGE CODES. */N/* */1/* X-36 HH0340 HAI HUANG 03-OCT-1988 */B/* ADD VECALIGN ERROR. */N/* \) */3/* X-35 SSA0002 STAN AMWAY 30-SEP-1988 */B/* CORRECT TEXT FOR SS$_VECFULL. */N/* */8/* X-34 JEJ0550 JAMES E JOHNSON 19-SEP-1988 */B/* ADD ALRCURTID, RMALRDCL, NOSUCHPART, INVLOG, BADLOGVER, */B/* LOGSTALL, LOGFULL, LOGNAME. */N/* ]) */3/* X-33 SSA0001 STAN AMWAY 14-SEP-1988 */B/* ADD NOSUSPEND ("process cannot be suspended"). */N/* */?/* X-32 RJB0165 RICHARD J. BOUCHARD JR. 14-SEP-1988 */B/* ADD NOMOREDEV MESSAGE FOR $DEVICE_SCAN SERVICE. */N/* */</* X-31 ACG0559 ANDREW C. GOLDSTEIN, 31-AUG-1988 16:28 */B/*^) ADD HWM_STALL FOR ABORT OF STALLED INTERNAL IRP'S */N/* */1/* X-30 HH0334 HAI HUANG 31-AUG-1988 */B/* REPLACE SYSVERDIF WITH A NEW VALUE (I.E. SEVERITY) AND */B/* A NEW MESSAGE. */N/* */E/* X-29 DDP0308 DERRELL D. PIPER 21-JUL-1988 14:02 */B/* ADD PWDSYNTAX, I_)NVPWDLEN, AND PWDNOTDIF. */N/* */8/* X-28 JEJ0527 JAMES E JOHNSON 27-JUN-1988 */B/* ADD NOSUCHTID, NOCURTID, WRONGSTATE, VETO, UNKRESULT, */B/* FORGET, PREPARED, NOSUCHRM, ITEMNOTFOUND, NOMOREITEMS */N/* */1/* X-26 HH0315 HAI HUANG 18-APR-1988 */F/* -27 ADD NEW STATUS CODES FOR VECTOR SUPPORT. `) */N/* */9/* X-25 PT00010 PANKAJ TANDON 30-DEC-1987 */B/* ADD ALLSTARTED,ALRDYSTRT,ALRDYSTPPD AND NSTPPD FOR */B/* $START/STOP CPU ERRONEOUS CASES. */N/* */8/* X-24 LMP0465 L. MARK PILANT, 28-OCT-1987 15:58 */B/* ADD A NEW MESSAGE, SS$_NORIGHTSDB, TO INDICATE THAT THERE */B/* a)IS NOT A RIGHTS DATABASE IS NOT PRESENT ON THE SYSTEM. */N/* */0/* X-23 SJF STU FARNHAM 5-OCT-1987 */B/* ADD NOSUCHCPU */N/* */2/* X-22 DLM006 DAN MURPHY 13-SEP-1987 */B/* INFORMATIONAL CODES FOR $GETSECI. */N/* b) */6/* X-21 WMC0021 WAYNE CARDOZA 4-SEP-1987 */B/* FIX A MISSPELLING IN VA_IN_USE. */N/* */6/* X-20 WMC0020 WAYNE CARDOZA 27-JUL-1987 */B/* ADD NODELETE. */N/* */6/* X-19 WMC0019 WAYNE CARDOZA 10-MAR-1987 */B/* EXc)PRCLM SHOULD NOT MENTION SUBPROCESSES. */N/* */6/* X-18 WMC0018 WAYNE CARDOZA 19-FEB-1987 */B/* ADD VA_IN_USE. */N/* */8/* X-17 DDP0029 DERRELL D. PIPER 21-JAN-1987 */B/* CONVERT SS$_BADXXXCTX TO SINGLE BADCONTEXT MSG. */N/* d) */8/* X-16 DDP0027 DERRELL D. PIPER 12-JAN-1987 */B/* ADD SS$_TOOMUCHCTX AND SS$_BADUAICTX. */N/* */1/* X-15 HH0237 HAI HUANG 06-JAN-1987 */B/* ADD SS$_UNSUPPORTED. */N/* */8/* X-14 DDP0008 DERRELL D. PIPER 08-DEC-1986 e)*/B/* ADD SS$_LASTID, SS$_NOMOREID, SS$_RLSEMPTY, AND */B/* SS$_BADJPICTX FOR JPI$_RIGHTSLIST ITEM CODE. */B/* (NB: S VARIANT IS NOW OBSOLETE.) */N/* */7/* X-9 NCD0001 NANCY C. DENARDO 21-OCT-1986 */B/* ADDED SS$_EXLICENSE, SS$_INVLICENSE, SS$_LICENSE_LEVEL, */B/* AND SS$_INV_HW_ID FOR LMF SERVICE. */N/* f) */:/* X-8 SAS001 SCOTT A. SHURTS 02-OCT-1986 */B/* ADDED SS$_SRVMMAT TO INDICATE CRYPTOGRAPHIC SERVICE */B/* MISMATCH. */N/* */5/* X-7 KL 0001 KEITH LOEPERE 12-JUN-1986 */B/* ADDED SS$_REMOVED TO INDICATE DIR ENTRY ONLY REMOVED. */N/* g) */0/* X-6 CWH5006 CW HOBBS 30-MAY-1986 */B/* ADD SS$_REMOTE_PROC ERROR MESSAGE FOR CWPS. */N/* */1/* X-5H2 SJF STU FARNHAM 29-MAY-1986 */>/* ADD SS$_CPUNOTACT TO INDICATE THAT THE REQUESTED */B/* CPU IN AN SMP SYSTEM IS NOT ACTIVE. */N/* */8/* X-5 PRD0184h) PAUL R. DESTEFANO 07-NOV-1985 */B/* ADD SS$_DATALOST "data lost" TO INDICATE DLS END */B/* FLAG SET IN CACHING TAPE DRIVE OR DRIVER HAS OTHERWISE */B/* DETECTED THE LOSS OF CACHED DATA. */N/* */7/* X-4 LMP0382 L. MARK PILANT, 6-NOV-1985 10:10 */C/* ADD SS$_OBJLOCKHELD TO INDICATE THAT A PROCESS ALREADY HOLDS */B/* THE OBJECT'S ACL LOCK. i) */N/* */9/* X-3 JMK0002 JOSEPH M. KRAETSCH 17-SEP-1985 */D/* ADD SS$_RUCONFLICT "file has active RUs by another facility". */B/* REMOVE NOTMPJNL, NOPRMJNL (OBSOLETE). */N/* */:/* V04-001 ROW0466 RALPH O. WEBER 11-JUN-1985 */B/* REPLACE SS$_SHACPYINP (A NO LONGER USED SHADOWING ERROR */F/*j) STATUS) WITH SS$_DEVNOTSHR, "device not currently shareable". */D/* SS$_DEVNOTSHR IS AN ERROR STATUE FOR USE WITH DEVICES MARKED */B/* FOR EXCLUSIVE ACCESS BY SOMEONE ELSE BY AN MSCP CONTROLLER. */N/* */N/*--- */N/*+ */N/* SYSTEM STATUS CODES k) */N/* */I/* LAYOUT OF MESSAGE SPACE: */N/* */E/* MSG #S RANGE # MSGS DESCRIPTION */N/* */?/* 0-127 0-3FF 128 FATAL ERRORS */C/* 128-191 400-5FF 64 Hl)ARDWARE DEFINED FATAL ERRORS */C/* 192-255 600-7FF 64 SUCCESS CODES */C/* 256-383 800-BFF 128 WARNING CODES */C/* 384-447 C00-DFF 64 INFORMATIONAL CODES */C/* 448-511 E00-FFF 64 NONFATAL ERROR CODES */F/* 512-1023 1000-1FFF 512 SHARED MESSAGES (NOT HERE, SEE SHRMSG) */C/* 1024-1279 2000-27FF 256 FATAL ERRORS (CONTINUED FROM 3FF) */C/* 1280-1343 2800-29FF 64 NO PRIVILEGE ERm)RORS */C/* 1344-1375 2A00-2AFF 32 EXCEEDED QUOTA ERRORS */C/* 1376-1407 2B00-2BFF 32 RESERVED FOR MEDIA MGMT EXTENSIONS */I/* 1408-1663 2C00-33FF 256 NONFATAL ERROR CODES (CONTINUED FROM FFF) */N/* 1664-1695 3400-341F 32 FATAL ERRORS (CONTINUED FROM 27FF) */N/* 1696-4031 3420-7DFF 2334 (UNUSED) */C/* 4032-4095 7E00-7FFF 64 RESERVED FOR SCS SYSAPS */N/* n) */N/*- */N/* */N/* EXPLICITLY DEFINED SUCESS CODES */N/* */N/* DO NOT MIX THESE CODES WITH INCREMENTAL ASSIGNMENTS BELOW */N/* o) */#define SYSTEM$_FACILITY 0#define SS$_NORMAL 1N/* */N/* NOTE THAT CONTINUE,WASCLR,WASSET,REMEMBER DO NOT HAVE ANY MESSAGE TEXT */N/* SINCE THESE CODES USE THE SAME MESSAGE NUMBER AS NORMAL AND ACCVIO, */N/* THEY CAN NEVER BE MADE TO HAVE MESSAGES ASSOCIATED WITH THEM. */N/* */#define SS$_CONTINUE 1#define SS$_ p)WASCLR 1#define SS$_WASSET 9#define SS$_REMEMBER 1N/* */E/* MSG #S RANGE # MSGS DESCRIPTION */N/* */?/* 0-127 0-3FF 128 FATAL ERRORS */C/* 1024-1279 2000-27FF 256 FATAL ERRORS (CONTINUED FROM 3FF) */N/* */#dq)efine SS$_ACCVIO 12#define SS$_BADPARAM 20#define SS$_EXQUOTA 28#define SS$_NOPRIV 36N/* MAKE THE ABOVE ERRORS FALL INTO SHORT LITERALS */#define SS$_ABORT 44#define SS$_BADATTRIB 52#define SS$_BADESCAPE 60#define SS$_BADIMGHDR 68#define SS$_CHANINTLK 76#define SS$_CTRLERR 84#define SS$_DATACHECK 92#define SS$_DEVFOREIGN 100#define SS$_DEVMOUNT 108#define SS$_DEVNOTMBX 116#define SS$_DEVNOTMOUNT 124#define SS$_DEVOFFLINE 132#define SS$_DRr)VERR 140#define SS$_DUPLNAM 148#define SS$_FILACCERR 156#define SS$_FILALRACC 164#define SS$_FILNOTACC 172#define SS$_FILNOTEXP 180#define SS$_FORMAT 188#define SS$_GPTFULL 196#define SS$_GSDFULL 204#define SS$_LCKPAGFUL 212#define SS$_ILLBLKNUM 220#define SS$_ILLCNTRFUNC 228#define SS$_ILLEFC 236#define SS$_ILLIOFUNC 244#define SS$_ILLPAGCNT 252#define SS$_ILLSER 260#define SS$_INCVOLLABEL 268#define SS$_INSFARG 276#define SS$_INSFWSL 284#define SSs)$_INSFMEM 292#define SS$_INSFRAME 300#define SS$_IVADDR 308#define SS$_IVCHAN 316#define SS$_IVDEVNAM 324#define SS$_IVGSDNAM 332#define SS$_IVLOGNAM 340#define SS$_IVLOGTAB 348#define SS$_IVQUOTAL 356#define SS$_IVSECFLG 364#define SS$_IVSSRQ 372#define SS$_IVSTSFLG 380#define SS$_IVTIME 388#define SS$_LENVIO 396#define SS$_LKWSETFUL 404#define SS$_MBTOOSML 412#define SS$_MEDOFL 420#define SS$_NODATA 428#define SS$_NOIOCHAN 436#define SS$_NOLOGNAM 444#define t)SS$_NONEXDRV 452#define SS$_NOTFILEDEV 460#define SS$_NOTINTBLSZ 468#define SS$_NOTLABELMT 476#define SS$_NOTSQDEV 484#define SS$_PAGOWNVIO 492#define SS$_PARITY 500#define SS$_PARTESCAPE 508#define SS$_PFMBSY 516#define SS$_PSTFULL 524#define SS$_RESULTOVF 532#define SS$_SECTBLFUL 540#define SS$_TAPEPOSLOST 548#define SS$_TIMEOUT 556#define SS$_UNASEFC 564#define SS$_UNSAFE 572#define SS$_VASFULL 580#define SS$_VECINUSE 588#define SS$_VOLINV 596#define SSu)$_WRITLCK 604#define SS$_NOTAPEOP 612#define SS$_IVCHNLSEC 620#define SS$_NOMBX 628#define SS$_NOLINKS 636#define SS$_NOSOLICIT 644#define SS$_NOSUCHNODE 652#define SS$_REJECT 660#define SS$_TOOMUCHDATA 668#define SS$_BUGCHECK 676#define SS$_FILNOTCNTG 684#define SS$_BADSTACK 692#define SS$_MCHECK 700#define SS$_DEVACTIVE 708#define SS$_HANGUP 716#define SS$_OPINCOMPL 724#define SS$_ILLSEQOP 732#define SS$_IVSECIDCTL 740#define SS$_NOTNETDEV 748#define SSv)$_IVPROTECT 756#define SS$_ACPVAFUL 764#define SS$_MTLBLLONG 772#define SS$_BUFBYTALI 780#define SS$_NOAQB 788#define SS$_WRONGACP 796#define SS$_BUFNOTALIGN 804#define SS$_DEVCMDERR 812#define SS$_DEVREQERR 820#define SS$_INSFBUFDP 828#define SS$_INSFMAPREG 836#define SS$_IVBUFLEN 844#define SS$_IVMODE 852#define SS$_MCNOTVALID 860#define SS$_POWERFAIL 868#define SS$_SHMGSNOTMAP 876#define SS$_TOOMANYLNAM 884#define SS$_SHMNOTCNCT 892#define SS$_NOTCREATw)OR 900#define SS$_INTERLOCK 908#define SS$_BADQUEUEHDR 916#define SS$_NOSLOT 924#define SS$_SUSPENDED 932#define SS$_EXPORTQUOTA 940#define SS$_NOSHMBLOCK 948#define SS$_BADQFILE 956#define SS$_NOQFILE 964#define SS$_QFACTIVE 972#define SS$_QFNOTACT 980#define SS$_DUPDSKQUOTA 988#define SS$_NODISKQUOTA 996#define SS$_EXDISKQUOTA 1004#define SS$_IDMISMATCH 1012#define SS$_NOWRT 1020N/* ************** */N/* x) NOTE: THE ABOVE SET OF SEVERE ERROR MESSAGES IS FULL!!!! */I/* ANY ADDITIONAL SEVERE ERROR MESSAGES MUST BE ADDED */I/* BELOW, IN THE RANGE HEX 2000-2800. */N/* ************** */#define SS$_BADISD 8196#define SS$_RELINK 8204#define SS$_NOTINSTALL 8212#define SS$_SHARTOOBIG 8220#define SS$_NOP1VA 8228#define SS$_MULTRMS 8236#define SS$_VECFULL 8244#definy)e SS$_IVLVEC 8252#define SS$_INSFSPTS 8260#define SS$_DISCONNECT 8268#define SS$_PRIVINSTALL 8276#define SS$_PROTINSTALL 8284#define SS$_BADVEC 8292#define SS$_REMRSRC 8300#define SS$_PROTOCOL 8308#define SS$_THIRDPARTY 8316#define SS$_NOSUCHUSER 8324#define SS$_SHUT 8332#define SS$_UNREACHABLE 8340#define SS$_INVLOGIN 8348#define SS$_NOSUCHOBJ 8356#define SS$_EXCPUTIM 8364#define SS$_OPRABORT 8372#define SS$_SHRIDMISMAT 8380#define SS$_COMMHARD 8388#defz)ine SS$_IVCHAR 8396#define SS$_DEVINACT 8404#define SS$_CONNECFAIL 8412#define SS$_LINKABORT 8420#define SS$_LINKDISCON 8428#define SS$_LINKEXIT 8436#define SS$_PATHLOST 8444#define SS$_CLEARED 8452#define SS$_RESET 8460#define SS$_UNSOLICIT 8468#define SS$_TOOMANYREDS 8476#define SS$_IVLOCKID 8484#define SS$_SUBLOCKS 8492#define SS$_PARNOTGRANT 8500#define SS$_CVTUNGRANT 8508#define SS$_FORCEDERROR 8516#define SS$_ILLSELF 8524#define SS$_ILLCDTST 8532#def{)ine SS$_NOLISTENER 8540#define SS$_EXGBLPAGFIL 8548#define SS$_BADRCT 8556#define SS$_DIRNOTEMPTY 8564#define SS$_FORCEDEXIT 8572#define SS$_NOTPRINTED 8580#define SS$_JBCERROR 8588#define SS$_NOLICENSE 8596#define SS$_VCBROKEN 8604#define SS$_VCCLOSED 8612#define SS$_INSFCDT 8620#define SS$_DEVNOTDISM 8628#define SS$_NOSHRIMG 8636#define SS$_DUPUNIT 8644#define SS$_BADACLCTX 8652#define SS$_SERIOUSEXCP 8660#define SS$_TEMPLATEDEV 8668#define SS$_IVACL 8676|)#define SS$_NOSUCHID 8684#define SS$_NOLCLMEDA 8692#define SS$_NOREGAVIL 8700#define SS$_NOREGSUIT 8708#define SS$_NOSUCHPGM 8716#define SS$_PGMLDFAIL 8724#define SS$_PGMSTDALN 8732#define SS$_IVIDENT 8740#define SS$_DUPIDENT 8748#define SS$_INCSEGTRA 8756#define SS$_NODELEAVE 8764#define SS$_KERNELINV 8772#define SS$_EXLNMQUOTA 8780#define SS$_PARENT_DEL 8788#define SS$_PARNOTSYS 8796#define SS$_INSSWAPSPACE 8804#define SS$_VOLOERR 8812#define SS$_DATALATE 8820})#define SS$_OVRMAXARG 8828#define SS$_SHACHASTA 8836#define SS$_TERMNETDEV 8844#define SS$_NOLOGTAB 8852#define SS$_WRONGNAME 8860#define SS$_NOVOLACC 8868#define SS$_NOFILACC 8876#define SS$_INVEXHLIST 8884#define SS$_NOACLSUPPORT 8892#define SS$_INVSECLASS 8900#define SS$_INCSHAMEM 8908#define SS$_DEVNOTSHR 8916#define SS$_RUCONFLICT 8924#define SS$_DATALOST 8932#define SS$_REMOTE_PROC 8940#define SS$_CPUNOTACT 8948#define SS$_SRVMMAT 8956#define SS$_EXLI~)CENSE 8964#define SS$_INVLICENSE 8972#define SS$_LICENSE_LEVEL 8980#define SS$_INV_HW_ID 8988#define SS$_BADCONTEXT 8996#define SS$_TOOMUCHCTX 9004#define SS$_VA_IN_USE 9012#define SS$_NODELETE 9020#define SS$_NOSUCHCPU 9028#define SS$_IMGVEXC 9036#define SS$_NOSAVPEXC 9044#define SS$_NOSUCHTID 9052#define SS$_NOSUCHRM 9060#define SS$_NOCURTID 9068#define SS$_WRONGSTATE 9076#define SS$_VETO 9084#define SS$_PWDSYNTAX 9092#define SS$_PWDNOTDIF 9100#define SS$_)INVPWDLEN 9108#define SS$_SYSVERDIF 9116#define SS$_HWM_STALL 9124#define SS$_NOSUSPEND 9132#define SS$_NOSUCHPART 9140#define SS$_RMALRDCL 9148#define SS$_ALRCURTID 9156#define SS$_INVLOG 9164#define SS$_BADLOGVER 9172#define SS$_OPINPROG 9180#define SS$_WRONGACMODE 9188#define SS$_SUBTRACED 9196#define SS$_ARCHIVING 9204#define SS$_ARCHIVED 9212#define SS$_SITEPWDFAIL 9220#define SS$_NOSUCHCPB 9228#define SS$_CPUCAP 9236#define SS$_LOADER 9244#define SS$_HS)TBUFACC 9252#define SS$_INCONOLCK 9260#define SS$_INVEVENT 9268#define SS$_NOSUCHFAC 9276#define SS$_NOCALLPRIV 9284#define SS$_INSFLPGS 9292#define SS$_INSFRPGS 9300#define SS$_BADREASON 9308#define SS$_NOSUCHBID 9316#define SS$_NOTORIGIN 9324#define SS$_NOLOG 9332#define SS$_TPDISABLED 9340#define SS$_BRANCHENDED 9348#define SS$_BRANCHSTARTED 9356#define SS$_NOSUCHREPORT 9364#define SS$_BADTIME 9372#define SS$_PARTJOINED 9380#define SS$_NOPRESUME 9388#defin)e SS$_RECOVERCANCEL 9396#define SS$_CURTIDCHANGE 9404#define SS$_NOREADER 9412#define SS$_NOWRITER 9420#define SS$_DEVNOTWS 9428#define SS$_NOCLASS 9436#define SS$_CONTEXTSKEW 9444#define SS$_BADFORGEDB 9452#define SS$_NODOMAIN 9460#define SS$_OVRMAXAUD 9468#define SS$_BADCHAIN 9476#define SS$_BADBUFLEN 9484#define SS$_BADITMCOD 9492#define SS$_BADBUFADR 9500#define SS$_BADRETLEN 9508#define SS$_SSINOTHELD 9516#define SS$_SSAMISSING 9524#define SS$_SSANOTAUTH) 9532#define SS$_BADOWNER 9540 #define SS$_NAMESERVCOMMERR 9548#define SS$_IVNODNAM 9556#define SS$_CONFIG_SYNTAX 9564#define SS$_SHELVED 9572#define SS$_DRVNOTVALID 9580!#define SS$_SLICING_DISABLED 9588#define SS$_NOCALLTRANS 9596#define SS$_TRANSCALLER 9604#define SS$_ILLPRIPOL 9612#define SS$_ILLPOLICY 9620#define SS$_INSFRSPID 9628#define SS$_INSFCREDITL 9636#define SS$_INSFCREDITH 9644#define SS$_INSFMAP 9652#define SS$_SIG_INVARGTYPE 9660#define SS$_SIG_INVF)LTARG 9668#define SS$_SIG_INVARGLIST 9676 #define SS$_SIG_INVFUNCTYPE 9684 #define SS$_SIG_ARGMISMATCH 9692#define SS$_NOTRANQUIL 9700 #define SS$_NOCALLTRANS_SUP 9708#define SS$_DEVLISTFULL 9716#define SS$_INSFP1POOL 9724#define SS$_SIGNAL64 9732#define SS$_ZEROALLOCLS 9740#define SS$_QUEUE_FULL 9748#define SS$_DEVICE_RESET 9756#define SS$_ACA_ACTIVE 9764 #define SS$_BUS_PHASE_ERROR 9772#define SS$_NOMULTITHREAD 9780#define SS$_MTHREADACTIVE 9788#define SS$_MAXKTHRE)ADS 9796#define SS$_NOSUCHTHREAD 9804#define SS$_NOTHREADMAN 9812#define SS$_NOSUCHUPCALL 9820#define SS$_BADFANDLE 9828#define SS$_FANDLEBUSY 9836#define SS$_UNALIGNED 9844#define SS$_BADIOSADR 9852#define SS$_ILLBUFOBJ 9860#define SS$_ILLMODIFIER 9868#define SS$_NOCCBBUFFOBJ 9876#define SS$_NORDACC 9884#define SS$_NOWRTACC 9892#define SS$_NOTNOCNVRT 9900#define SS$_UNSUPVOLSET 9908 #define SS$_ARG_GTR_32_BITS 9916#define SS$_NOT64DEVFUNC 9924#define SS$_CHANVI)O 9932 #define SS$_GBLSEC_MISMATCH 9940#define SS$_ILLRELPAG 9948#define SS$_IVACMODE 9956#define SS$_IVREGFLG 9964#define SS$_IVREGID 9972#define SS$_IVREGPROT 9980#define SS$_IVVAFLG 9988#define SS$_LEN_NOTBLKMULT 9996 #define SS$_LEN_NOTPAGMULT 10004 #define SS$_NOT_PROCESS_VA 10012 #define SS$_OFF_NOTBLKALGN 10020 #define SS$_OFF_NOTPAGALGN 10028 #define SS$_OFFSET_TOO_BIG 10036#define SS$_REGOWNVIO 10044#define SS$_PROTVIO 10052#define SS$_TOO_MANY_ARGS 10060#def)ine SS$_VA_NOTPAGALGN 10068#define SS$_NOEXTAUTH 10076#define SS$_AUTHFAIL 10084#define SS$_INVUSER 10092#define SS$_ERRMAPAUTH 10100#define SS$_NORAD50 10108#define SS$_BADMEDIA 10116#define SS$_UNRECOVRDER 10124#define SS$_IVFORMAT 10132#define SS$_IVUNITFLAG 10140#define SS$_IVPARAM 10148#define SS$_NOSUCHENTRY 10156#define SS$_ALLOCFAILED 10164#define SS$_SHMEM_INCON 10172#define SS$_IVLOCKOP 10180#define SS$_IVLOCKTBL 10188#define SS$_LOCKINUSE 10196#d )efine SS$_LOCK_TIMEOUT 10204#define SS$_BADLCKTBL 10212#define SS$_NOBREAK 10220#define SS$_IVPROTOCOL 10228N#define SS$_NOWAIT 10236 /* */N/* ***** NOTE: NO ROOM FOR MORE MESSAGES IN THIS SECTION ***** */N/* */N/* */E/* MSG #S RANGE # MSGS DESCRIPTION *)/N/* */C/* 128-191 400-5FF 64 HARDWARE DEFINED FATAL ERRORS */N/* */#define SS$_PLHLDR 1028#define SS$_ASTFLT 1036#define SS$_BREAK 1044#define SS$_CMODSUPR 1052#define SS$_CMODUSER 1060#define SS$_COMPAT 1068#define SS$_OPCCUS 1076#define SS$_OPCDEC 1084#define SS$_PAGRDERR 1092#define SS$_RADRMOD 1100#define )SS$_ROPRAND 1108#define SS$_SSFAIL 1116#define SS$_TBIT 1124#define SS$_DEBUG 1132N/* THE FOLLOWING CODES MUST BE IN ORDER SINCE THEY ARE CALCULATED */#define SS$_ARTRES 1140#define SS$_INTOVF 1148#define SS$_INTDIV 1156#define SS$_FLTOVF 1164#define SS$_FLTDIV 1172#define SS$_FLTUND 1180#define SS$_DECOVF 1188#define SS$_SUBRNG 1196#define SS$_FLTOVF_F 1204#define SS$_FLTDIV_F 1212#define SS$_FLTUND_F 1220N/* THE ABOVE CODES MUST BE IN ORDER SINCE )THEY ARE CALCULATED */#define SS$_INHCHMK 1228#define SS$_INHCHME 1236#define SS$_VECDIS 1244#define SS$_VARITH 1252#define SS$_ILLVECOP 1260#define SS$_VECALIGN 1268#define SS$_IMGDMP 1276#define SS$_HPARITH 1284#define SS$_ALIGN 1292 #define SS$_UNALIGN_SP_LOAD 1300#define SS$_GENTRAP 1308#define SS$_FLTINV 1316#define SS$_FLTINE 1324#define SS$_DECDIV 1332#define SS$_DECINV 1340#define SS$_ASSERTERR 1348#define SS$_NULPTRERR 1356#define SS$_)STKOVF 1364#define SS$_STRLENERR 1372#define SS$_SUBSTRERR 1380#define SS$_RANGEERR 1388#define SS$_SUBRNG1 1396#define SS$_SUBRNG2 1404#define SS$_SUBRNG3 1412#define SS$_SUBRNG4 1420#define SS$_SUBRNG5 1428#define SS$_SUBRNG6 1436#define SS$_SUBRNG7 1444#define SS$_PAGRDERRXM 1452#define SS$_ILLEGAL_SHADOW 1460#define SS$_FLTINV_F 1468#define SS$_FLTINE_F 1476#define SS$_INTOVF_F 1484#define SS$_NATFAULT 1492#define SS$_FLTDENORMAL 1500#define SS$_BREAK_SY)S 1508#define SS$_BREAK_ARCH 1516N/* */N/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */N/* ***** NOTE: ROOM FOR 2 MORE MESSAGES IN THIS SECTION ***** */N/* */N/* */E/* MSG #S RANGE # MSGS DESCRIPTION *)/N/* */C/* 192-255 600-7FF 64 SUCCESS CODES */N/* */#define SS$_BUFFEROVF 1537#define SS$_CONTROLO 1545#define SS$_CONTROLY 1553#define SS$_CREATED 1561#define SS$_MSGNOTFND 1569#define SS$_NOTRAN 1577#define SS$_SUPERSEDE 1585#define SS$_WASECC 1593#define SS$_DEVALRALLOC 1601#define SS$_REMOTE 1609)#define SS$_CONTROLC 1617#define SS$_NOTMODIFIED 1625#define SS$_RDDELDATA 1633#define SS$_OVRDSKQUOTA 1641#define SS$_OBSOLETE_1 1649#define SS$_FILEPURGED 1657#define SS$_NOTALLPRIV 1665#define SS$_SYNCH 1673#define SS$_CONCEALED 1681#define SS$_INCOMPAT 1689#define SS$_DBGOPCREQ 1697#define SS$_ALRDYCLOSED 1705#define SS$_LNMCREATED 1713#define SS$_ACEIDMATCH 1721#define SS$_DBGEVENT 1729#define SS$_REMOVED 1737#define SS$_QUEUED 1745#define SS$_SUBDISAB)LED 1753#define SS$_FORGET 1761#define SS$_PREPARED 1769#define SS$_NOMOREITEMS 1777#define SS$_VOLATILE 1785#define SS$_CLASSUPER 1793#define SS$_CONTINUE_64 1801#define SS$_THREAD_UPCALL 1809#define SS$_CREATED_SHPT 1817#define SS$_PERSONADELPEND 1825#define SS$_DEVAVAIL 1833#define SS$_LONGGAP 1841#define SS$_BROKEN 1849#define SS$_QPOOL_DEL_INIT 1857#define SS$_UNUSED_1 1865#define SS$_LOWPREC 1873N/* ) */N/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */N/* ***** NOTE: ROOM FOR 18 MORE MESSAGES IN THIS SECTION ***** */N/* */N/* */E/* MSG #S RANGE # MSGS DESCRIPTION */N/* */C/* 256-383) 800-BFF 128 WARNING CODES */N/* */#define SS$_ACCONFLICT 2048#define SS$_BADCHKSUM 2056#define SS$_BADFILEHDR 2064#define SS$_BADFILENAME 2072#define SS$_BADFILEVER 2080#define SS$_BADIRECTORY 2088#define SS$_CANCEL 2096#define SS$_DATAOVERUN 2104#define SS$_DEVALLOC 2112#define SS$_DEVASSIGN 2120#define SS$_DEVICEFULL 2128#define SS$_DEVNOTALLOC 2136#define SS$_DIRFULL )2144#define SS$_DUPFILENAME 2152#define SS$_ENDOFFILE 2160#define SS$_ENDOFTAPE 2168#define SS$_TMACTIVE 2176#define SS$_FCPREADERR 2184#define SS$_FCPREWNDERR 2192#define SS$_FCPSPACERR 2200#define SS$_FCPWRITERR 2208#define SS$_FILELOCKED 2216#define SS$_FILENUMCHK 2224#define SS$_FILESEQCHK 2232#define SS$_FILESTRUCT 2240#define SS$_HEADERFULL 2248#define SS$_IDXFILEFULL 2256#define SS$_MBFULL 2264#define SS$_NOHOMEBLK 2272#define SS$_NONEXPR 2280#defin)e SS$_NONLOCAL 2288#define SS$_NOHANDLER 2296#define SS$_NOSIGNAL 2304#define SS$_NOSUCHDEV 2312#define SS$_NOSUCHFILE 2320#define SS$_RESIGNAL 2328#define SS$_UNWIND 2336#define SS$_UNWINDING 2344#define SS$_NOMOREFILES 2352#define SS$_BEGOFFILE 2360#define SS$_BLOCKCNTERR 2368#define SS$_MUSTCLOSEFL 2376#define SS$_WAITUSRLBL 2384#define SS$_ILLUSRLBLRD 2392#define SS$_ILLUSRLBLWT 2400#define SS$_ILLLBLAST 2408#define SS$_ENDOFUSRLBL 2416#define SS$_NOSUCHSEC )2424#define SS$_CLIFRCEXT 2432#define SS$_FCPREPSTN 2440#define SS$_TOOMANYVER 2448#define SS$_NOTVOLSET 2456#define SS$_ENDOFVOLUME 2464#define SS$_NOMOREPROC 2472#define SS$_NODEVAVL 2480#define SS$_NOTQUEUED 2488#define SS$_DGQINCOMP 2496#define SS$_DIRALLOC 2504#define SS$_ACLEMPTY 2512#define SS$_NOENTRY 2520#define SS$_NOMOREACE 2528#define SS$_RIGHTSFULL 2536#define SS$_VALNOTVALID 2544#define SS$_ACLFULL 2552#define SS$_NOMORENODE 2560#define SS$_NOMO)RELOCK 2568#define SS$_BEGOFTAPE 2576#define SS$_OBJLOCKHELD 2584#define SS$_CPUSTARTIP 2592#define SS$_ALLSTARTED 2600#define SS$_ALRDYSTRT 2608#define SS$_ALRDYSTPPD 2616#define SS$_NSTPPD 2624#define SS$_UNKRESULT 2632#define SS$_ITEMNOTFOUND 2640#define SS$_NOMOREDEV 2648#define SS$_EFNOTSET 2656#define SS$_PRIMNOSTP 2664#define SS$_BOOTREJECT 2672#define SS$_RMTPATH 2680#define SS$_OBJECT_EXISTS 2688#define SS$_NOSUCHOBJECT 2696#define SS$_NOVOLDESC 2704)#define SS$_NOPTBLDIR 2712#define SS$_DRVEXISTS 2720#define SS$_DEVEXISTS 2728#define SS$_GOTO_UNWIND 2736#define SS$_EXIT_UNWIND 2744#define SS$_SMALLHEADER 2752#define SS$_FDT_COMPL 2760#define SS$_TARGET_UNWIND 2768##define SS$_TARGET_GOTO_UNWIND 2776#define SS$_RESIGNAL_64 2784#define SS$_NOMOREREG 2792#define SS$_PAGNOTINREG 2800#define SS$_REGISFULL 2808#define SS$_PAGTYPVIO 2816#define SS$_NOSUCHPAG 2824#define SS$_PAGNOTWRITE 2832#define SS$_NOMORETHREAD 2840)#define SS$_NOTF11ODS5 2848#define SS$_NOCONVJNL 2856#define SS$_MPDEVBUSY 2864!#define SS$_MPDEVUSERDISABLE 2872#define SS$_NOCPUMATCH 2880#define SS$_NOMORECLIENTS 2888#define SS$_NOMOREDEVICES 2896#define SS$_NOMOREFILTERS 2904#define SS$_NOMOREPATHS 2912#define SS$_NOMORESERVERS 2920#define SS$_FISH 2928#define SS$_FILENOTCACHED 2936#define SS$_INSF_SHM_REG 2944#define SS$_HBMMNOTENABLED 2952#define SS$_HBMMALREADYON 2960#define SS$_NODEVPOL 2968#define SS$_ )NONAMPOL 2976#define SS$_XVALNOTVALID 2984#define SS$_FILEFULL 2992N#define SS$_REMINDER 3000 /* */N/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */N/* ***** NOTE: ROOM FOR 8 MORE WARNING MESSAGES IN ABOVE SECTION ***** */N/* */N/* */E/* MSG #S RANGE # MSGS ) DESCRIPTION */N/* */C/* 384-447 C00-DFF 64 INFORMATIONAL CODES */N/* */#define SS$_EOTIN 3075#define SS$_CHAINW 3083#define SS$_NOTINSEC 3091#define SS$_NONXPAG 3099#define SS$_LOGNAME 3107#define SS$_CPUSTARTD 3115#define SS$_CPUSTOPPING 3123#define SS$_NOTALLCANCELED 3131#define SS$_)NOTHINGDONE 3139#define SS$_EVTNOTENAB 3147#define SS$_NOPATHTBL 3155#define SS$_RESELECTION 3163#define SS$_EMULATED 3171#define SS$_REMDONE 3179#define SS$_REMINPROG 3187#define SS$_DEVCON 3195#define SS$_DEVNOTCON 3203#define SS$_CPUSELECTED 3211 #define SS$_QPOOL_DEL_INPRG 3219#define SS$_PRESTO 3227#define SS$_TAKEN_BRANCH 3235#define SS$_IA32_TRAP 3243#define SS$_DEBUG_FAULT 3251#define SS$_BREAK_APPL 3259#define SS$_TIE_GET_FRAMES 3267#define SS$_TIE_PRE_)UNWIND 3275#define SS$_TIE_UNWIND 3283 #define SS$_TIE_GOTO_UNWIND 3291#define SS$_HBMMCREPOSTMRG 3299#define SS$_FPMODECTL 3307#define SS$_FPMODEPC 3315#define SS$_FPMODERC 3323#define SS$_ARGTYP1 3331#define SS$_ARGTYP2 3339#define SS$_ARGTYP3 3347#define SS$_ARGTYP4 3355#define SS$_ARGTYP5 3363#define SS$_ARGTYP6 3371#define SS$_ARGTYP7 3379#define SS$_ARGTYP8 3387#define SS$_DEFER_ASTS 3395N/* ) */N/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */N/* ***** NOTE: ROOM FOR 23 MORE MESSAGES IN THIS SECTION ***** */N/* */N/* */E/* MSG #S RANGE # MSGS DESCRIPTION */N/* */C/* 448-511 E00-FFF )64 NONFATAL ERROR CODES */N/* */#define SS$_LINEABRT 3586#define SS$_DEADLOCK 3594#define SS$_NOLOCKID 3602#define SS$_EXDEPTH 3610#define SS$_PARTMAPPED 3618#define SS$_CANCELGRANT 3626#define SS$_RETRY 3634#define SS$_BADACL 3642#define SS$_ACEEXISTS 3650#define SS$_UNSUPPORTED 3658#define SS$_NORIGHTSDB 3666#define SS$_LOGSTALL 3674#define SS$_LOGFULL 3682#define SS$_PWDINDIC) 3690#define SS$_PWDINHIS 3698#define SS$_PWDWEAK 3706#define SS$_USEGENPWD 3714#define SS$_INVBUSNAM 3722#define SS$_INVCOMPTYPE 3730#define SS$_INVCOMPID 3738#define SS$_INVCOMPLIST 3746#define SS$_NOCOMPLSTS 3754#define SS$_INVSECDOMAIN 3762#define SS$_BADCHECKSUM 3770#define SS$_ARBTOOBIG 3778#define SS$_ORBTOOBIG 3786#define SS$_INVAJLNAM 3794#define SS$_TOOMANYAJL 3802#define SS$_RSDMINUSE 3810#define SS$_RSDMNOTFOU 3818#define SS$_INVUICGRP 3826#define )SS$_RSDM_ACTIVE 3834#define SS$_OBJLOCKED 3842#define SS$_NOTMPNAM 3850#define SS$_INVCLSITM 3858#define SS$_NOTSHRTBL 3866#define SS$_MMATORB 3874#define SS$_NOSUCHVOL 3882#define SS$_OBJNOTLOCKED 3890#define SS$_ILLRSDM 3898#define SS$_NOCLASSSUPPORT 3906#define SS$_INVSECOPER 3914#define SS$_NODELJNLACT 3922#define SS$_INVFILFOROP 3930#define SS$_NOOBJSRV 3938#define SS$_NOFILEACCESS 3946#define SS$_BADFILESIZE 3954#define SS$_NOTFULLYMAPPED 3962#define SS$_)BADWINCNT 3970#define SS$_BADWINLBN 3978#define SS$_BADWINRVN 3986#define SS$_EXTRAWINDOW 3994#define SS$_REVISED 4002#define SS$_TIMENOTSET 4010"#define SS$_WAIT_CALLERS_MODE 4018#define SS$_NOT_LOADED 4026#define SS$_DRV_NOUNLOAD 4034#define SS$_INVARG 4042#define SS$_QIO_CROCK 4050#define SS$_ALTER 4058#define SS$_AFR_ENABLED 4066 #define SS$_AFR_NOT_ENABLED 4074#define SS$_SHELFERROR 4082N#define SS$_PERSONANONGRATA 4090 /* ************** */)N/* NOTE: THE ABOVE SET OF NONFATAL ERROR MESSAGES IS FULL!!!! */I/* ANY ADDITIONAL NONFATAL ERROR MESSAGES MUST BE ADDED */I/* BELOW, IN THE RANGE HEX 2C00-33FF. */N/* ************** */N/* */E/* MSG #S RANGE # MSGS DESCRIPTION */N/* ) */C/* 1280-1343 2800-29FF 64 NO PRIVILEGE ERRORS */N/* */N/* */N/* NB: THESE MESSAGES MUST BE KEPT IN THE SAME ORDER AS THE PRIVILEGE BIT */R/* DEFINITIONS ($PRVDEF) AS THE PRIVILEGE BIT POSITION IS USED AS AN INDEX INTO */N/* THESE MESSAGE CODES BY THE $CHECK_PRIVILEGE SYSTEM SERVICE. ) */N/* */#define SS$_NOPRIVSTRT 10240#define SS$_NODETACH 10284#define SS$_NOCMKRNL 10244#define SS$_NOCMEXEC 10252#define SS$_NOSYSNAM 10260#define SS$_NOGRPNAM 10268#define SS$_NOALLSPOOL 10276#define SS$_NOIMPERSONATE 10284#define SS$_NODIAGNOSE 10292#define SS$_NOLOG_IO 10300#define SS$_NOGROUP 10308#define SS$_NOACNT 10316#define SS$_NOPRMCEB 10324#define SS$_NOPRMMBX 10332#define SS$_NOPS)WAPM 10340#define SS$_NOALTPRI 10348#define SS$_NOSETPRV 10356#define SS$_NOTMPMBX 10364#define SS$_NOWORLD 10372#define SS$_NOMOUNT 10380#define SS$_NOOPER 10388#define SS$_NOEXQUOTA 10396#define SS$_NONETMBX 10404#define SS$_NOVOLPRO 10412#define SS$_NOPHY_IO 10420#define SS$_NOBUGCHK 10428#define SS$_NOPRMGBL 10436#define SS$_NOSYSGBL 10444#define SS$_NOPFNMAP 10452#define SS$_NOSHMEM 10460#define SS$_NOSYSPRV 10468#define SS$_NOBYPASS 10476#define SS$_NOSYSL)CK 10484#define SS$_NOSHARE 10492#define SS$_NOUPGRADE 10500#define SS$_NODOWNGRADE 10508#define SS$_NOGRPPRV 10516#define SS$_NOREADALL 10524#define SS$_NOIMPORT 10532#define SS$_NOAUDIT 10540#define SS$_NOSECURITY 10548#define SS$_NOPRIVEND 10751N/* */E/* MSG #S RANGE # MSGS DESCRIPTION */N/* */C )/* 1344-1375 2A00-2AFF 32 EXCEEDED QUOTA ERRORS */N/* */#define SS$_EXQUOTASTRT 10752#define SS$_EXASTLM 10756#define SS$_EXBIOLM 10764#define SS$_EXBYTLM 10772#define SS$_EXDIOLM 10780#define SS$_EXFILLM 10788#define SS$_EXPGFLQUOTA 10796#define SS$_EXPRCLM 10804#define SS$_EXTQELM 10812#define SS$_EXENQLM 10820N/* SYSTEMWIDE QUOTA -- WORK FROM END OF REGION ) */#define SS$_EXBUFOBJLM 11004#define SS$_EXQUOTAEND 11007N/* */E/* MSG #S RANGE # MSGS DESCRIPTION */N/* */C/* 1376-1407 2B00-2BFF 32 RESERVED FOR MEDIA MGMT EXTENSIONS */N/* */#define SS$_MMSFAILED 11012 #define SS$_QPOOL_DEL_ )BUSY 11020N/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */N/* ***** NOTE: ROOM FOR 1 MORE MESSAGE IN THIS SECTION ***** */#define SS$_TOOFEWDEV 11032#define SS$_AVRWAIT 11040N/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */N/* ***** NOTE: ROOM FOR 3 MORE MESSAGES IN THIS SECTION ***** */#define SS$_NO_MMS 11075#define SS$_MMSREADY 11083#define SS$_MMSNOTREADY 11091#define SS$_SKIP_CHECKS 11099)#define SS$_NO_NOTIFY 11107!#define SS$_SKIP_EXPIRATION 11115#define SS$_NOTATBOT 11123#define SS$_PREVDENS 11131N/* A NEW BASE SHOULD BE CREATED FOR INFORMATIONALS */N/* ***** NOTE: ROOM FOR 0 MORE MESSAGES IN ABOVE SECTION ***** */#define SS$_RDBERR 11140#define SS$_MDMSERR 11148#define SS$_IVMEDTYP 11156#define SS$_IVDENS 11164#define SS$_IVPOOL 11172#define SS$_IVEXPDAT 11180#define SS$_NOCONFMEDIA 11188#define SS$_PTE_NOT_EMPTY 11 )196#define SS$_CPUNOTAVAIL 11204#define SS$_NOFASTPATH 11212#define SS$_EXITFORCED 11220#define SS$_FORCEX 11228N/* */E/* MSG #S RANGE # MSGS DESCRIPTION */N/* */I/* 1408-1663 2C00-33FF 256 NONFATAL ERROR CODES (CONTINUED FROM FFF) */N/* ) */#define SS$_NOTASSUMING 11266!#define SS$_ALREADYASSUMING 11274#define SS$_INUSE 11282#define SS$_USERDISABLED 11290#define SS$_NOCHJIB 11298#define SS$_NOTSUPFS 11306#define SS$_INSFTHREADS 11314#define SS$_NOBUFOBJID 11322 #define SS$_NODELPERMANENT 11330#define SS$_NOMEMRESID 11338#define SS$_MRES_PFNSMALL 11346#define SS$_MRES_INCON 11354#define SS$_NORESERVEDMEM 11362!#define SS$_RESERVEDMEMUSED 11370#define SS$_RES_MEM_INCON 11378#define SS$_NOSHPTS 1138)6#define SS$_FLUSHFAIL 11394#define SS$_NOTINSTALLED 11402#define SS$_POOLDEVEXISTS 11410#define SS$_NOUNITS 11418#define SS$_NOTAPOOL 11426#define SS$_MISSINGUNITS 11434#define SS$_DISKDEVEXISTS 11442#define SS$_TOOMANYUNITS 11450#define SS$_NOTINPOOL 11458#define SS$_WRONGPOOL 11466#define SS$_ALRBOUND 11474 #define SS$_NOTPOOLMOUNTED 11482#define SS$_POOLINUSE 11490#define SS$_DISKINUSE 11498#define SS$_SDDISABLED 11506#define SS$_UNITINPOOL 11514#define SS)$_FAMILYTOOBIG 11522#define SS$_NODISKNAME 11530 #define SS$_DISKNAMEEXISTS 11538#define SS$_INSUFFREESEGS 11546#define SS$_NOTBOUND 11554#define SS$_TOOMANYFRAGS 11562!#define SS$_TOOMANYFAMILIES 11570#define SS$_DISKISBOUND 11578#define SS$_SNAPINFAM 11586#define SS$_CHKSNAPVER 11594#define SS$_BADSNAPVER 11602#define SS$_SD_RESERVED4 11610#define SS$_SD_RESERVED5 11618#define SS$_SECREFOVF 11626#define SS$_DATAERR 11634#define SS$_INVPFN 11642#define SS$_INV_SHME)M 11650#define SS$_INV_SHM_CPP 11658#define SS$_INV_SHM_REG 11666#define SS$_ONEMAPPER 11674#define SS$_NOSUCHEXT 11682#define SS$_CBKEXISTS 11690#define SS$_NOSUCHCBK 11698#define SS$_NOTAMEMBER 11706#define SS$_GLXSPIUNAVAIL 11714!#define SS$_MPDEVILLCURPATH 11722#define SS$_MPDEVINCOMPAT 11730#define SS$_MPDEVNOT 11738#define SS$_MPDEVNOTCONF 11746!#define SS$_PERSONARESERVED 11754#define SS$_WRONGDRV 11762#define SS$_BADRAD 11770#define SS$_INVQSRFNC 11778)#define SS$_NOQIOSERVER 11786#define SS$_INCLASS 11794#define SS$_INVBOOTDEV 11802$#define SS$_CLIENT_UNAVAILABLE 11810"#define SS$_CONFIGFILE_ERROR 11818#define SS$_INVDEVALLOC 11826$#define SS$_DEVICE_UNAVAILABLE 11834#define SS$_INVDEVMOUNT 11842"#define SS$_LOGGING_DISABLED 11850#define SS$_NOSUCHCLIENT 11858#define SS$_NOSUCHDEVICE 11866#define SS$_NOSUCHFILTER 11874#define SS$_NOSUCHPATH 11882#define SS$_NOSUCHSERVER 11890#define SS$_RQSTIMOUT 11898$#define SS$_SE)RVER_UNAVAILABLE 11906#define SS$_QSRVINTERR 11914#define SS$_NOADD 11922#define SS$_SYSTEMUIC 11930#define SS$_NOSUCHQPOOLID 11938#define SS$_PATHAMBIG 11946#define SS$_INVMVIP 11954#define SS$_NOPATHAVAIL 11962#define SS$_NOENACURINV 11970#define SS$_TRUSTCONF 11978#define SS$_QIO_FAULT 11986#define SS$_HBVS_REDO_IO 11994 #define SS$_TOOMANYPERSONA 12002N#define SS$_INVKTLIM 12010 /* */N/* NEW SYMBOLS SHOULD BE ADDED IMM)EDIATELY BEFORE THIS COMMENT */N/* ***** NOTE: ROOM FOR 162 MORE NONFATAL MESSAGES IN ABOVE SECTION ***** */N/* */N/* MSG #S RANGE # MSGS DESCRIPTION */N/* */S/* 1664-1695 3400-341F 32 FATAL ERROR CODES (CONTINUED FROM 27FF) */#define SS$_MAXNAMPOL 13316#define SS$_HBMMENABLED )13324#define SS$_NOMODNONEPOL 13332#define SS$_SHADFEATNOMNT 13340 #define SS$_NOTSUPALLNODES 13348#define SS$_WLGCANTHBMM 13356#define SS$_CALLUNDEFSYM 13364#define SS$_NOADDMCPYMBR 13372#define SS$_CANTDODDS 13380#define SS$_TOOMANYMBRS 13388#define SS$_SCBREADFAIL 13396#define SS$_SCBWRITEFAIL 13404#define SS$_NOMEMFORWBM 13412#define SS$_MUSTDMTVU 13420!#define SS$_ONLYSRCMUSTSTAY 13428!#define SS$_NOWBMDURINGCOPY 13436#define SS$_WBMERR 13444#define SS$_BADP )OLCHAR 13452 #define SS$_HBMMVERSIONBAD 13460#define SS$_ANADSKSHDBBLK 13468 #define SS$_HBMMBADPOLSPEC 13476 #define SS$_NOSHADOWSERVER 13484#define SS$_GAMEOVER 13492N/* N.B. DO NOT CORRECT THE GRAMMAR IN GAMEOVER, THE MESSAGE IS AS INTENDED */N/* NEW SYMBOLS SHOULD BE ADDED IMMEDIATELY BEFORE THIS COMMENT */N/* ***** NOTE: ROOM FOR 9 MORE FATAL MESSAGES IN ABOVE SECTION ***** */N/* */E/* MSG #)S RANGE # MSGS DESCRIPTION */N/* */C/* 4032-4095 7E00-7FFF 64 RESERVED FOR SCS SYSAPS */N/* */I/* MESSAGE CODES IN THIS BLOCK ARE GUARANTEED NOT TO */I/* BE TRANSLATED BY VMS WHEN THEY ARE SEND OUT BY VMSSCS */I/* OR WHEN THEY ARE RECEIVED BY VMSSCS. SCA SYSAPS ARE ) */I/* FREE TO USE THESE CODES IN ANY SYSAP-DEPENDENT MANNER */I/* IN WHICH THEY CHOOSE. */N/* */I/* THIS ADDRESS OF THIS BLOCK OF CODES MUST BE IN CONFORMANCE */I/* WITH THE SCA ARCHITECTURE, I.E., MUST NOT BE MOVED. */N/* */#define SS$_SYSAPMIN 32256)#define SS$_SYSAPMAX 32767 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SSDEF_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */ww4V/*************************************************************** )*****************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $SSIODEF ***/#ifndef __SSIODEF_LOADED#define __SSIODEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#p)ragma __member_alignment __save#pragma __nomember_alignmentR#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_param)s ...#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 N/*+ */N/* File access modes for open and create */N/*- ) */N#define SSIO$M_O_RDONLY 0 /* Read-only */N#define SSIO$M_O_WRONLY 1 /* Write-only */N#define SSIO$M_O_RDWR 2 /* Read and write */N#define SSIO$M_O_ACCMODE 3 /* Mask for access mode field */N/*+ */N/* File status flags for open, create, and setfl (fcntl) */N/*- ) */N#define SSIO$M_O_APPEND 8 /* All writes append to EOF */N/*+ */N/* File open and create options */N/*- */N#define SSIO$M_O_CREAT 512 /* Create file if it does not exist */N#define SSIO$M_O_TRUNC 1024 /* Tru)ncate file */g#define SSIO$M_O_EXCL 2048 /* If O_CREAT and O_EXCL both set, open fails if file exists */_#define SSIO$M_O_NOCTTY 4096 /* If TTY dev, not to be controlling TTY for process */N/*+ */N/* Positioning (lseek) options */N/*- */N#define SSIO$C_SEEK_SET 0 ) /* Set offset to value provided */Q#define SSIO$C_SEEK_CUR 1 /* Offset relative to current position */N#define SSIO$C_SEEK_END 2 /* Offset relative to current EOF */N/*+ */N/* Other miscellaneous values */N/*- */Z#define SSIO$C_SSIZE_MAX 2147483647 /* Largest) read/write size (in bytes) permitted */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SSIODEF_LOADED */ ww[V/************************************************************************************************************* )*******************/=/* Created: 5-Apr-2012 13:00:51 by OpenVMS SDL EV3-3 */I/* Source: 18-SEP-2009 02:17:15 $1$DGA7304:[STARLET.SRC]STARLET.SDL;1 *//********************************************************************************************************************************//*** MODULE STARLET ***/#ifndef __STARLET_LOADED#define __STARLET_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember)_alignmentR#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 #ifdef __NEW_STARLET struct _va_range; struct _cluevthndl; struct _fabdef; struct _generic_64; struct _ieee; struct _iosb; struct _iosa; struct _lksb; struct _rabdef; struct _secid; struct _ios_icc; struct _acmesb;#endifN/* ) */N/* SYSTEM SERVICE ENTRY POINT DESCRIPTIONS */N/* */N/* */N/* $ACM[W] */N/* */N/* Authentication and Credentials Management ) */N/* */I/* $ACM[W] [efn], func, [contxt], itmlst, acmsb, */B/* [astadr], [astprm] */N/* */I/* efn = number of event flag to set at service completion */B/* (read only, passed by value) */I/* func = function code and modifiers )specifying action */B/* to be performed */B/* (read only, passed by value) */I/* contxt = context longword, used to maintain service state */B/* across iterative calls */B/* (modify, passed by reference) */I/* itmlst = list of item descriptors */B/* (read only, passed by reference) ) */I/* acmsb = ACM status block */B/* (write only, passed by reference) */I/* astadr = procedure value for AST routine to be called at */B/* service completion */B/* (execute only, passed by reference) */I/* astprm = value to be passed as an argument to the AST routine */B/* (passed by value) ) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$acm SYS$ACM  9#ifdef __cplusplus /* Define structure prototypes */struct _acmesb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$acm( unsigned int efn, unsigned int func, int *contxt, void *itmlst, struct _acmesb *acmsb," void (*astadr)(__unknown_params), u)nsigned __int64 astprm);#else /* __OLD_STARLET */int sys$acm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#define sys$acmw SYS$ACMW  9#ifdef __cplusplus /* Define structure prototypes */struct _acmesb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$acmw( unsigned int efn, unsigned int func, int *contxt, void *itmlst, struct _acmesb *acmsb," void (*astadr)(__unknown_params), unsigned __int64 astprm);#else /* __OLD_STARLET */ )int sys$acmw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif  N/* */N/* $ADD_HOLDER */N/* */N/* Add Holder Record To The Rights Database */N/* ) */I/* $ADD_HOLDER id, holder, [attrib] */N/* */D/* id = identifier longword to associate the */B/* holder record with */H/* holder = address of the holder identifier quadword */H/* attrib = attributes longword to grant to the holder */ '#defin)e sys$add_holder SYS$ADD_HOLDER 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$add_holder( unsigned int id, struct _generic_64 *holder, unsigned int attrib);#else /* __OLD_STARLET */%int sys$add_holder(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $ADD_IDENT ) */N/* */N/* Add Identifier To The Rights Database */N/* */I/* $ADD_IDENT name, [id], [attrib], [resid] */N/* */F/* name = address of the identifier name character */)B/* string descriptor */D/* id = identifier longword to associate with 'name' */H/* attrib = attributes longword to grant to the */B/* identifier */G/* resid = address of a longword to return the assigned */B/* identifier */N/* */%#d)efine sys$add_ident SYS$ADD_IDENT #ifdef __NEW_STARLETint sys$add_ident( void *name, unsigned int id, unsigned int attrib, unsigned int *resid);#else /* __OLD_STARLET */$int sys$add_ident(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $ADD_MAPPING */N/* */)N/* Add Mapping record to Mapping database */N/* */N/* $ADD_MAPPING initmlst */N/* */N/* initmlst = address of a list of item descriptors for the operation */N/* */ )#define sys$add_map )ping SYS$ADD_MAPPING#ifdef __NEW_STARLETint sys$add_mapping( void *initmlst);#else /* __OLD_STARLET */&int sys$add_mapping(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $ADD_PROXY */N/* */N/* Add proxy record ) */N/* */N/* $ADD_PROXY rem_node, rem_user, local_user, [flags] */N/* */H/* rem_node in address of remote node descriptor */H/* rem_user in address of remote user descriptor */H/* local_user in address of local user descriptor */F/* flags in proxy service )flags */N/* */%#define sys$add_proxy SYS$ADD_PROXY #ifdef __NEW_STARLETint sys$add_proxy( void *rem_node, void *rem_user, void *local_user, unsigned int flags);#else /* __OLD_STARLET */$int sys$add_proxy(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $ADJSTK ) */N/* */N/* Adjust Outer Mode Stack Pointer */N/* */N/* $ADJSTK [acmode] ,[adjust] ,newadr */N/* */N/* acmode = access mode for which to adjust stack pointer ) */N/* adjust = 16-bit signed adjustment value */N/* newadr = address of longword to store updated value */N/* */ #define sys$adjstk SYS$ADJSTK#ifdef __NEW_STARLETint sys$adjstk( unsigned int acmode, short int adjust, void *(*(newadr)));#else /* __OLD_STARLET */!int sys$adjstk(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* ) */N/* $ADJWSL */N/* */N/* Adjust Working Set Limit */N/* */N/* $ADJWSL [pagcnt] ,[wsetlm] */N/* ) */N/* pagcnt = number of pages to add to working set (if positive). */N/* Number of pages to subtract from working set (if */N/* negative). */N/* wsetlm = address of longword to receive new working set limit, */N/* or current working set limit if pagcnt not specified. */N/* ) */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$adjwsl SYS$ADJWSL #ifdef __NEW_STARLETint sys$adjwsl( int pagcnt, unsigned int *wsetlm);#else /* __OLD_STARLET */!int sys$adjwsl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $ALLOC ) */N/* */N/* Allocate Device */N/* */N/* $ALLOC devnam ,[phylen] ,[phybuf] ,[acmode] ,[flags] */N/* */N/* devnam = address of device na)me or logical name string */N/* descriptor */N/* phylen = address of word to receive length of physical name */N/* phybuf = address of physical name buffer descriptor */N/* acmode = access mode associated with allocated device */I/* flags = options flags longword */N/* ) */#define sys$alloc SYS$ALLOC #ifdef __NEW_STARLETint sys$alloc( void *devnam, unsigned short int *phylen, void *phybuf, unsigned int acmode, unsigned int flags);#else /* __OLD_STARLET */ int sys$alloc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $ASCEFC */N/* ) */N/* Associate Common Event Flag Cluster */N/* */N/* $ASCEFC efn ,name ,[prot] ,[perm] */N/* */N/* efn = number of any event flag in the cluster with which to */N/* associate */N)/* name = address of the text name string descriptor */N/* prot = protection indicator for the cluster */N/* 0 -> default, any process in group */N/* 1 -> only owner's UIC */N/* perm = permanent indicator */N/* 0 -> temporary cluster */N/* 1 -> perm)anent cluster */N/* */#define sys$ascefc SYS$ASCEFC #ifdef __NEW_STARLETint sys$ascefc( unsigned int efn, void *name, char prot, char perm);#else /* __OLD_STARLET */!int sys$ascefc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $ASCTIM ) */N/* */N/* Convert Binary Time to ASCII String */N/* */N/* $ASCTIM [timlen] ,timbuf ,[timadr] ,[cvtflg] */N/* */N/* timlen = address of a word to receive the number of characters */)N/* inserted into the output buffer. */N/* timbuf = address of a character string descriptor describing */N/* the buffer to receive the converted time. */N/* timadr = address of the quadword containing the 64-bit time to */N/* be converted to ASCII. If 0, use current time. */N/* cvtflg = conversion indicator */N/* 0 -> re)turn full date and time */N/* 1 -> return converted time only */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$asctim SYS$ASCTIM  9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$asctim( uns)igned short int *timlen, void *timbuf, struct _generic_64 *timadr, char cvtflg);#else /* __OLD_STARLET */!int sys$asctim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* */N/* $ASCTOID */N/* ) */N/* Ascii To Identifier Conversion */N/* */I/* $ASCTOID name, [id], [attrib] */N/* */F/* name = address of the identifier name character */B/* string descriptor to be converted */D/* id = address to return the identifier l)ongword */H/* attrib = address to return the attributes longword */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif!#define sys$asctoid SYS$ASCTOID #ifdef __NEW_STARLETint sys$asctoid( void *name, unsigned int *id, unsigned int *attrib);#else /* __OLD_STARLET */"int sys$asctoid(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ ) #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $ASCUTC */N/* */N/* Convert Binary UTC time into ASCII time string */N/* */I/* $ASCUTC [timlen],) timbuf, [utcadr], [cvtflg] */N/* */I/* timlen = Length (in bytes) of the ASCII string */B/* returned by $ASCUTC. The timelen argument */B/* is the address of a word containing this length. */I/* timbuf = Buffer into which $ASCUTC writes the ASCII string. */B/* The timbuf argument is the address of a character */B/* string de)scriptor pointing to the bufer. The */B/* buffer length specified in the timbuf argument, */B/* together rwith the cvtflg argument, controls what */B/* information is returned. */I/* utcadr = Time value that $ASCUTC is to convert. The utcadr */B/* argument is the address of this 128-bit time value. */B/* Relative times are not permitted. If utcadr is */B/* not specified ( ie 0 ), $ASCUTC) returns the current */B/* date and time. */I/* cvtflg = Conversion indicator specifying which date and time */B/* fields $ASCUTC should return. The cvtflg argument is */B/* a longword value, which is interpreted as Boolean. */B/* The value 1 specifies that ASCUTC should return only */B/* the hour,minute,second, and hundreths of a second fields. */B/* The default value 0 specifies that $ASCUTC should ret)urn */C/* the full date and time. */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$ascutc SYS$ASCUTC #ifdef __NEW_STARLETint sys$ascutc( unsigned short int *timlen, void *timbuf, unsigned int utcadr [4], char cvtflg);#else /* __OLD_STARLET */!int sys$ascutc(__unknown_params);!#endif /* #ifdef __NEW_STARLET ) */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $ASSIGN */N/* */N/* Assign I/O Channel */N/* */N/* $ASSIG)N devnam ,chan ,[acmode] ,[mbxnam], [flags] */N/* */N/* devnam = address of device name or logical name string */N/* descriptor */N/* chan = address of word to receive channel number assigned */N/* acmode = access mode associated with channel */N/* mbxnam = address of mailbox logi)cal name string descriptor, if */N/* mailbox associated with device */I/* flags = optional channel flags longword for specifying options */B/* for the $ASSIGN operation */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$assign SYS$ASSIGN #ifdef __NEW_STARLETint sys$assign() void *devnam, unsigned short int *chan, unsigned int acmode, void *mbxnam, __optional_params);#else /* __OLD_STARLET */!int sys$assign(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $AUDIT_EVENT */N/* ) */N/* Audit Security Relevant Event */N/* */O/* $AUDIT_EVENT(W) [efn], [flags], itmlst, [audsts], [astadr], [astprm] */N/* */E/* efn = number of event flag to set on completion */N/* */G/* fla)gs = input flags longword */N/* */H/* itmlst = address of list of item descriptors */N/* */H/* audsts = address of longword to receive final completion status */N/* */H/* astadr = address of AST completion routine ) */N/* */H/* astprm = unsigned longword to be passed to AST routine */N/* */ )#define sys$audit_event SYS$AUDIT_EVENT#ifdef __NEW_STARLETint sys$audit_event( unsigned int efn, unsigned int flags, void *itmlst, unsigned int *audsts," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET) */&int sys$audit_event(__unknown_params);!#endif /* #ifdef __NEW_STARLET */+#define sys$audit_eventw SYS$AUDIT_EVENTW #ifdef __NEW_STARLETint sys$audit_eventw( unsigned int efn, unsigned int flags, void *itmlst, unsigned int *audsts," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */'int sys$audit_eventw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* )$BINTIM */N/* */N/* Convert ASCII String to Binary Time */N/* */N/* $BINTIM timbuf ,timadr */N/* */N/* timbuf = address of st)ring descriptor for ASCII time string */N/* timadr = address of quadword to receive 64-bit binary time */N/* value */N/* */N/* Absolute time strings are specified in the format: */N/* dd-mmm-yyyy hh:mm:ss.cc */N/* Delta time strings are specified in the form)at: */N/* dddd hh:mm:ss.cc */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$bintim SYS$BINTIM  9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$bintim( void *timbuf, struct _generic_64 )*timadr);#else /* __OLD_STARLET */!int sys$bintim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* */N/* $BINUTC */N/* */N/* Convert ASCII UTC time to a binary format ) */N/* */N/* $BINUTC timbuf, utcadr */N/* */I/* timbuf = Buffer that holds the ASCII time to be converted. */B/* The timbuf argument specifies the address of a */B/* character string descriptor pointing to the VMS */B/* time string. The VMS time string spec )ifies the */C/* absolute time to be converted by $BINUTC. */I/* utcadr = Time value that $BINUTC has converted. The */B/* utcadr argument is the address of the utc_date_time */C/* which receives the converted time. */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$binutc SYS$BINUTC) #ifdef __NEW_STARLETint sys$binutc( void *timbuf, unsigned int utcadr [4]);#else /* __OLD_STARLET */!int sys$binutc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $BRDCST */N/* ) */N/* Broadcast */N/* */N/* $BRDCST msgbuf ,[devnam] */N/* */N/* msgbuf = address of message buffer string descriptor */N/* devnam = terminal device name string descriptor. If 0, send */N/* ) message to all terminals. If first word in */N/* descriptor is 0, send message to all allocated */N/* terminals. */N/* */#define sys$brdcst SYS$BRDCST #ifdef __NEW_STARLETint sys$brdcst( void *msgbuf, void *devnam, unsigned int flags, unsigned int carcon);#else /* __OLD_STARLET */!int sys$brdcst(__u)nknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $BRKTHRU */N/* */N/* Write to terminal breakthru */N/* */N/* $BRKTHRU [efn] ,msgbuf, [sendto], [sndtyp], [iosb], */I/* ($BRKTHRUW) [carcon], [flags], [reqid], [timout],) */B/* [astadr], [astprm] */N/* */N/* efn = event flag to be set at completion */N/* */N/* msgbuf = address of message buffer descriptor */N/* */N/* sendto )= address of send address descriptor */N/* */N/* sndtyp = value to describe sendto */N/* */N/* iosb = address of a quadword I/O status block */N/* */N/* carcon = carriage control ) */N/* */N/* flags = flags to modify broadcast */N/* */N/* reqid = broadcast class requestor id */N/* */N/* timout = address of timeout value ) */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine as an argument */N/* */N/* */ !#define ) sys$brkthru SYS$BRKTHRU 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$brkthru( unsigned int efn, void *msgbuf, void *sendto, unsigned int sndtyp, struct _iosb *iosb, unsigned int carcon, unsigned int flags, unsigned int reqid, unsigned int timout," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */"int sys$brkthru(__unknown_params);!#endif /* #ifd)ef __NEW_STARLET */##define sys$brkthruw SYS$BRKTHRUW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$brkthruw( unsigned int efn, void *msgbuf, void *sendto, unsigned int sndtyp, struct _iosb *iosb, unsigned int carcon, unsigned int flags, unsigned int reqid, unsigned int timout," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */#int sys$brkt *hruw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $CANCEL */N/* */N/* Cancel I/O on Channel */N/* */N/* $CANCEL chan * */N/* */N/* chan = number of the channel on which I/O is to be canceled */N/* */#define sys$cancel SYS$CANCEL #ifdef __NEW_STARLETint sys$cancel( unsigned short int chan);#else /* __OLD_STARLET */!int sys$cancel(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* * */N/* $CANCEL_SELECTIVE */N/* */N/* Selective Cancel I/O on Channel */N/* */N/* $CANCEL_SELECTIVE chan, [iosblst], [lenlst] */N/* * */N/* chan = number of the channel on which I/O is to be canceled */N/* iosblst = address of a vector of IOSB pointers */N/* lenlst = number of entries in the vector pointed by iosblst */N/* */ 3#define sys$cancel_selective SYS$CANCEL_SELECTIVE 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #if*def __cplusplus */ #ifdef __NEW_STARLETint sys$cancel_selective( unsigned short int chan, struct _iosb *(*(iosblst)), unsigned int lenlst);#else /* __OLD_STARLET */+int sys$cancel_selective(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CANEVTAST */N/* */N/* Cancel an Event AST Routine **/N/* */O/* $CANEVTAST [evtnam], [evtadr], [evtfac], [acmode], [flags], [reqid] */B/* ,[evtid] */N/* */N/* evtnam = address of descriptor of event name */N/* */N/* evtadr = address of entry* mask of event AST routine */N/* */N/* evtfac = address of event facility code */N/* */N/* acmode = access mode of event declaration */N/* */N/* flags = address of optional flags * */N/* */N/* reqid = user provided identification of this request */N/* */N/* evtid = unique identification of this request */N/* */%#define sys$canevtast SYS$CANEVTAST #ifdef __NEW_STARLETint sys$canevtast(* void *evtnam, int (*evtadr)(void), unsigned int *evtfac, unsigned int acmode, unsigned int *flags, unsigned int reqid, unsigned int evtid);#else /* __OLD_STARLET */$int sys$canevtast(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $CANEXH */N/* */N/*  * Cancel Exit Handler */N/* */N/* $CANEXH [desblk] */N/* */N/* desblk = address of exit control block describing exit handler */N/* to be deleted. If 0, delete all. */N/*  * */ #define sys$canexh SYS$CANEXH#ifdef __NEW_STARLETint sys$canexh( void *desblk);#else /* __OLD_STARLET */!int sys$canexh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $CANTIM */N/* */N/* Cancel Tim *er Request */N/* */N/* $CANTIM [reqidt] ,[acmode] */N/* */N/* reqidt = request identification for request to be canceled. */N/* If 0, all requests canceled. */N/* acmode = access mode of requests t *o be canceled */N/* */ #define sys$cantim SYS$CANTIM#ifdef __NEW_STARLETint sys$cantim( unsigned __int64 reqidt, unsigned int acmode);#else /* __OLD_STARLET */!int sys$cantim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  N/* */N/* $CANWAK  * */N/* */N/* Cancel Wakeup */N/* */N/* $CANWAK [pidadr] ,[prcnam] */N/* */N/* pidadr = address of process identification of process for */N/* * which wakeups are to be canceled */N/* prcnam = address of process name string descriptor */N/* */#define sys$canwak SYS$CANWAK #ifdef __NEW_STARLETint sys$canwak( unsigned int *pidadr, void *prcnam);#else /* __OLD_STARLET */!int sys$canwak(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $CHANGE_ACL * */N/* */N/* Set or modify an object's ACL */N/* */E/* $CHANGE_ACL [chan], objtyp, [objnam], */;/* itmlst, [acmode], [iosb], */;/* [contxt] , [routin], [orbadr] */N/* * */I/* chan = number of a channel assigned to the object or */C/* 0 if object is specified by the objnam parameter */N/* */I/* objtyp = address of an object type code */N/* */I/* objnam = address of object name */N/* * */I/* itmlst = address of a list of item descriptors */N/* */I/* acmode = address of a byte containing the access mode in */B/* which the arguments will be validated */N/* */I/* iosb = address of a quadword I/O status block * */N/* */I/* contxt = address of a context long word (used for iterative */B/* calls or a multi-entry item list) */N/* */I/* routin = address of routine to be executed in kernel mode */B/* (obsolete) */N/* * */I/* orbadr = address of a user supplied ORB */N/* */ '#define sys$change_acl SYS$CHANGE_ACL 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$change_acl( unsigned short int chan, unsigned int *objtyp, void *objnam, void *itmlst, unsigned int *acmode, s *truct _iosb *iosb, unsigned int *contxt, int (*routin)(void), void *orbadr);#else /* __OLD_STARLET */%int sys$change_acl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ H/* $CHANGE_CLASS objtyp, [objnam], itmlst */;/* [acmode], [orbadr] */N/* */N/* Modify an objects access class */N/* * */N/* objtyp = address of an object type code */N/* */N/* objnam = address of an object name descriptor */N/* */N/* itmlst = address of a list of item descriptors */N/* * */N/* acmode = address of a byte containing the access mode in */B/* which the arguments will be validated */N/* */N/* orbadr = address of routine to be executed in kernel mode */N/* */N/* */* +#define sys$change_class SYS$CHANGE_CLASS#ifdef __NEW_STARLETint sys$change_class( unsigned int *objtyp, void *objnam, void *itmlst, unsigned int acmode, void *orbadr);#else /* __OLD_STARLET */'int sys$change_class(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CHECK_ACCESS */N/* */N/* $CHECK_ACCESS [objtyp], [objnam], [us*rnam], itmlst, [contxt], */B/* [clsnam], [objpro], [usrpro] */N/* */N/* Check User Access to an Object */N/* */N/* objtyp = address of an object type code */N/* */N*/* objnam = address of an object name descriptor */N/* */N/* usrnam = address of a user name descriptor */N/* */N/* itmlst = address of a list of item descriptors */N/* */N/* contxt = address of* longword for UAI context */N/* */N/* clsnam = address of object class name descriptor */N/* */N/* objpro = address of object profile descriptor(ORB TLV or channel) */N/* */N/* usrpro = address of user profile descriptor (*ARB TLV) */N/* */ +#define sys$check_access SYS$CHECK_ACCESS#ifdef __NEW_STARLETint sys$check_access( unsigned int *objtyp, void *objnam, void *usrnam, void *itmlst, unsigned int *contxt, void *clsnam, void *objpro, void *usrpro);#else /* __OLD_STARLET */'int sys$check_access(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CHECK_FEN * */N/* */N/* Check if floating point enabled for current image */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif%#define sys$check_fen SYS$CHECK_FEN #ifdef __NEW_STARLETint sys$check_fen( __optional_params);#else /* __OLD_STARLET */$int sys$chec *k_fen(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $CHECK_PRIVILEGE[W] */N/* */N/* Check for process privilege and perform security audit. */N/* */f/* $CHECK_PRIVILEGE[W] [efn] ,prva*dr ,[altprv] ,[flags] ,[itmlst] ,[audsts] ,[astadr] ,[astprm] */N/* */N/* efn = event flag to set on asynchronous service completion */N/* prvadr = address of quadword privilege mask or longword identifier */H/* altprv = address of quadword privilege mask to check against */N/* flags = control flags */N/* itmlst = address of a list of item de *scriptors */N/* audsts = longword to receive final completion status */N/* astadr = address of AST routine to call on service completion */N/* astprm = longword to pass to AST routine */N/* */ 1#define sys$check_privilege SYS$CHECK_PRIVILEGE 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* * #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$check_privilege( unsigned int efn, struct _generic_64 *prvadr, struct _generic_64 *altprv, unsigned int flags, void *itmlst, unsigned int *audsts," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */*int sys$check_privilege(__unknown_params);!#endif /* #ifdef __NEW_STARLET */3#define sys$check_privilegew SYS$CHECK_PRIVILEGEW  9#ifdef __cplusplus /* Define structure prototypes */struct!* _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$check_privilegew( unsigned int efn, struct _generic_64 *prvadr, struct _generic_64 *altprv, unsigned int flags, void *itmlst, unsigned int *audsts," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */+int sys$check_privilegew(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $CHKPRO "* */N/* */I/* Check Access Protection */N/* */N/* $CHKPRO itmlst, [objpro], [usrpro] */N/* */I/* itmlst = address of a list of item descri#*ptors */N/* objpro = address of object handle descriptor (ORB TLV) */N/* usrpro = address of user handle descriptor (ARB TLV) */N/* */ #define sys$chkpro SYS$CHKPRO#ifdef __NEW_STARLETint sys$chkpro( void *itmlst, void *objpro, void *usrpro);#else /* __OLD_STARLET */!int sys$chkpro(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/*$* $CLEAR_SYSTEM_EVENT */N/* */N/* Clear System Event Notification */N/* */N/* $CLEAR_SYSTEM_EVENT [handle], [acmode], [event] */N/* */N/* handle = address of h%*andle */N/* */N/* acmode = access mode of AST */N/* */N/* event = code indicating type of event */N/* */ 7#define sys$clear_system_event SYS$CLEAR_SYSTEM_&*EVENT#ifdef __NEW_STARLETint sys$clear_system_event( unsigned __int64 *handle, unsigned int acmode, unsigned int event);#else /* __OLD_STARLET */-int sys$clear_system_event(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CLEAR_UNWIND_TABLE */N/* */N/* Clears unwind table (UT) information. */N/* '* */I/* $CLEAR_UNWIND_TABLE code_base_va */N/* */U/* code_base_va = process virtual address of the start of a registered code region */I/* */ 7#define sys$clear_unwind_table SYS$CLEAR_UNWIND_TABLE#ifdef __NEW_STARLETint sys$clear_unwind_table( unsig (*ned __int64 code_base_va);#else /* __OLD_STARLET */-int sys$clear_unwind_table(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $CLRCLUEVT */N/* */N/* Clear Cluster Event Notification */N/* */N/* $CLRCLUEVT [handle], [acmode], [event] )* */N/* */N/* handle = address of handle */N/* */N/* acmode = access mode of AST */N/* */N/* event = code indicating type of event ** */N/* */ %#define sys$clrcluevt SYS$CLRCLUEVT#ifdef __NEW_STARLETint sys$clrcluevt(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *handle,#else unsigned __int64 handle,#endif unsigned int acmode, unsigned int event);#else /* __OLD_STARLET */$int sys$clrcluevt(__ +*unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $CLREF */N/* */N/* Clear Event Flag */N/* */N/* $CLREF efn ,* */N/* */N/* efn = number of event flag to be cleared */N/* */#define sys$clref SYS$CLREF #ifdef __NEW_STARLETint sys$clref( unsigned int efn);#else /* __OLD_STARLET */ int sys$clref(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* -* */N/* $CLOSE */N/* */N/* Close File */N/* */N/* $CLOSE fab, [err], [suc] */N/* .* */J/* fab = address of fab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$close SYS$CLOS/*E 9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$close(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */ int sys$close(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* 0* */N/* $CMEXEC */N/* */N/* Change to Executive Mode */N/* */N/* $CMEXEC routin ,[arglst] */N/* 1* */N/* routin = address of the routine to be executed in executive */N/* mode */N/* arglst = address of argument list to be supplied to the */N/* routine */N/* */ #define sys$cmexec SYS$CMEXEC#ifdef __NEW_STARLET 2*int sys$cmexec(! int (*routin)(__unknown_params), unsigned int *arglst);#else /* __OLD_STARLET */!int sys$cmexec(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $CMEXEC_64 */N/* */N/* Change to Executive Mode with Quadword Argument List */N3*/* */N/* $CMEXEC_64 routin_64 ,[arglst_64] */N/* */N/* routin_64 = address of the routine to be executed in executive */N/* mode */U/* arglst_64 = address of quadword argument list to be supplied to the */N/* r4*outine */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif   %#define sys$cmexec_64 SYS$CMEXEC_64#ifdef __NEW_STARLETint sys$cmexec_64($ int (*routin_64)(__unknown_params), unsigned __int64 *arglst_64);#else /* __OLD_STARLET */$int sys$cmexec_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __I 5*NITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $CMKRNL */N/* */N/* Change to Kernel Mode */N/* */N/* $CMKRNL routin ,[arglst] */N/* 6* */N/* routin = address of routine to be executed in kernel mode */N/* */N/* arglst = address of argument list to be supplied to routine */N/* */ #define sys$cmkrnl SYS$CMKRNL#ifdef __NEW_STARLETint sys$cmkrnl(! int (*routin)(__unknown_params), unsigned int *arglst); 7*#else /* __OLD_STARLET */!int sys$cmkrnl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CMKRNL_64 */N/* */N/* Change to Kernel Mode with Quadword Argument List */N/* */N/* $CMKRNL_64 routin_64 ,[arglst_64] */N/* 8* */N/* routin_64 = address of routine to be executed in kernel mode */N/* */Q/* arglst_64 = address of quadword argument list to be supplied to routine */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif   %#define 9* sys$cmkrnl_64 SYS$CMKRNL_64#ifdef __NEW_STARLETint sys$cmkrnl_64($ int (*routin_64)(__unknown_params), unsigned __int64 *arglst_64);#else /* __OLD_STARLET */$int sys$cmkrnl_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $CONNECT */N/* :* */N/* Connect File */N/* */N/* $CONNECT rab, [err], [suc] */N/* */J/* rab = address of rab */N/* ;* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ !#define sys$connect SYS$CONNECT 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef <* __NEW_STARLETint sys$connect( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */"int sys$connect(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CNTREG */N/* */N/* Contract Program/Control Region */N/* */=*N/* $CNTREG pagcnt ,[retadr] ,[acmode] ,[region] */N/* */N/* pagcnt = number of pages to be deleted from end of region */N/* */N/* retadr = address of 2-longword array to receive virtual */I/* addresses of starting and ending page of deleted area */N/* >* */N/* acmode = access mode for which service is performed */N/* */N/* region = region indicator */N/* 0 -> program (P0) region 1 -> control (P1) region */N/* */ #define sys$cntreg SYS$CNTREG 9#ifdef __cpl?*usplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$cntreg( unsigned int pagcnt, struct _va_range *retadr, unsigned int acmode, char region);#else /* __OLD_STARLET */!int sys$cntreg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* */N@*/* $CPU_CAPABILITIES */N/* */N/* Modify CPU user capabilities */N/* */T/* $CPU_CAPABILITIES cpu_id,[select_mask],[modify_mask],[prev_mask],[flags] */N/* */I/* cpu_id = CPUID nuA*mber of processor to be affected by changes */I/* select_mask = address of bitmask indicating which capabilities */B/* are to be involved in the specified operation */I/* modify_mask = address of bitmask indicating final state */B/* of those capabilities specified in select_mask */I/* prev_mask = address of user quadword that will hold the */B/* previous states of the individual capabilities */I/* flags = addressB* of behavioral flags for this operation */N/* */ 3#define sys$cpu_capabilities SYS$CPU_CAPABILITIES 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$cpu_capabilities( int cpu_id,! struct _generic_64 *select_mask,! struct _generic_64 *modify_mask, struct _generic_64 *prev_mask, struct _generic C*_64 *flags);#else /* __OLD_STARLET */+int sys$cpu_capabilities(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* */N/* $CPU_TRANSITION */N/* $CPU_TRANSITIONW */N/* D* */N/* CPU State Transitions */N/* */S/* $CPU_TRANSITION tran_code,cpu_id,[node_id],flags,efn,iosb,astadr,astprm */T/* $CPU_TRANSITIONW tran_code,cpu_id,[node_id],flags,efn,iosb,astadr,astprm */R/* Inputs: tran_code - Transition code of operation to be initiated */N/* cpu_id - CPU ID of processor to affectE*ed */?/* nodename - ASCII descriptor name equivalent to node ID */N/* node_id - Galactic node ID */S/* flags - Quadword pointer to longword behavioral flags */S/* efn - Event flag number for completion notification */T/* iosb - IOSB block address for completion notification */O/* astadr - Address of AST routine name on completion */S/* F* astprm - AST parameter to be passed back on completion */N/* timout - Timeout count in seconds */N/* */ /#define sys$cpu_transition SYS$CPU_TRANSITION 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$cpu_transition( int tran_code, int cpu_id, void *nodenG*ame, int node_id, unsigned int flags, unsigned int efn, struct _iosb *iosb," void (*astadr)(__unknown_params), unsigned __int64 astprm, unsigned int timout);#else /* __OLD_STARLET */)int sys$cpu_transition(__unknown_params);!#endif /* #ifdef __NEW_STARLET */1#define sys$cpu_transitionw SYS$CPU_TRANSITIONW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$cpu_transitionw( iH*nt tran_code, int cpu_id, void *nodename, int node_id, unsigned int flags, unsigned int efn, struct _iosb *iosb," void (*astadr)(__unknown_params), unsigned __int64 astprm, unsigned int timout);#else /* __OLD_STARLET */*int sys$cpu_transitionw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $CREATE I* */N/* */N/* Create File */N/* */N/* $CREATE fab, [err], [suc] */N/* */J/* fab = address of fab J* */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$create SYS$CREATE 9#ifdef __cplusplus /* Define structurK*e prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create( struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */!int sys$create(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $CREATE_MAPPING */N/* */ L*N/* Create Mapping record database */N/* */N/* $CREATE_MAPPING */N/* *//#define sys$create_mapping SYS$CREATE_MAPPING#ifdef __NEW_STARLETint sys$create_mapping(void);#else /* __OLD_STARLET */int sys$create_mapping(void);!#endif /* #ifdef __NM*EW_STARLET */N/* */N/* $CREATE_PROXY */N/* */N/* Create proxy database */N/* */N/* $CREATE_PROXY */N/* N* */N/* */+#define sys$create_proxy SYS$CREATE_PROXY#ifdef __NEW_STARLETint sys$create_proxy(void);#else /* __OLD_STARLET */int sys$create_proxy(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $CREATE_UID */N/* O* */N/* Create a Universal Identifier */N/* */I/* $CREATE_UID UID */N/* */E/* UID = address of the 16 byte buffer to receive the UID. */N/* P* */'#define sys$create_uid SYS$CREATE_UID #ifdef __NEW_STARLETint sys$create_uid( unsigned int uid [4]);#else /* __OLD_STARLET */%int sys$create_uid(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $CREATE_BUFOBJ */N/* */N/* Create I/O Buffer Object */N/* Q* */N/* $CREATE_BUFOBJ inadr ,[retadr] ,[acmode] ,[flags] ,buffer_handle */N/* */O/* inadr = address of 2-longword array containing starting and ending */O/* virtual addresses of existing VA to include in buffer object */N/* */N/* retadr = address of 2-R*longword array to receive addresses */N/* actually included in the buffer object */N/* */N/* acmode = access mode of owner of buffer object */N/* */N/* flags = request option flags */N/* S* */D/* Bit Meaning (if set) */N/* */G/* 0 Return system virtual address of buffer object in RETADR */;/* (Caller must be in kernel mode) */N/* */I/* buffer_handle = address of a quadword to receive the buffer handle */B/* that identifies the created buffer oT*bject */N/* */ -#define sys$create_bufobj SYS$CREATE_BUFOBJ 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range;struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create_bufobj( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode, unsigned int flags,$ struct _generic_64 *buffer_handle);#else /* __OLD_S U*TARLET */(int sys$create_bufobj(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CREATE_BUFOBJ_64 */N/* */N/* Create I/O Buffer Object */N/* */c/* $CREATE_BUFOBJ_64 start_va_64, length_64, acmode, flags, return_va_64, return_lengthV*_64, */I/* buffer_handle_64 */N/* */T/* start_va_64 = Starting address of existing address to include in buffer object */N/* */J/* length_64 = Byte length of addresses to include in buffer object */N/* */N/* acmode = acW*cess mode of owner of buffer object */N/* */N/* flags = request option flags */N/* */F/* Flag Meaning (if specified) */N/* */Y/* CBO_M_RETSVA Return system virtual addresX*s of buffer object in return_va_64 */;/* (Caller must be in kernel mode) */N/* CBO_M_SVA_32 Create buffer object window in 32-bit (S0/S1) system space */N/* */J/* return_va_64 = Address of buffer object created */N/* */J/* return_length_64 = Length of buffer object created */N/* Y* */K/* buffer_handle_64 = address of a quadword to receive the buffer handle */B/* that identifies the created buffer object */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif 3#define sys$create_bufobj_64 SYS$CREATE_BUFOBJ_64 9#ifdef __cplusplus /* Define structure prototypes */structZ* _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create_bufobj_64( void *start_va_64, unsigned __int64 length_64, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *return_length_64,' struct _generic_64 *buffer_handle_64);#else /* __OLD_STARLET */+int sys$create_bufobj_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short[*#endifN/* $CREATE_GFILE */N/* */N/* Create Permanent Global Disk File Section */N/* */\/* $CREATE_GFILE gsdnam_64, ident_64, file_offset_64, length_64, chan, acmode, flags, */I/* return_length_64[, fault_cluster] */N/* \* */D/* gsdnam_64 = Address of global section name string descriptor */</* (32-bit or 64-bit descriptor) */N/* */T/* ident_64 = Address of quadword containing version id and match control */N/* */H/* file_offset_64 = Byte offset into file to start secti]*on */N/* */G/* length_64 = Byte length of section to create */N/* */G/* chan = Number of channel on which file is accessed */N/* */G/* acmode = Access mode for section */N/* ^* */G/* flags = Section characteristics */N/* */F/* Flag Meaning */N/* */F/* SEC$M_CRF Copy-on-reference section */F/* SEC$M_SYSGBL System global section */F/* _* SEC$M_WRT Read/write section */N/* */J/* return_length_64 = Length of section created */N/* */N/* fault_cluster = Page fault cluster size in bytes */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pra`*gma __required_pointer_size __long#endif +#define sys$create_gfile SYS$CREATE_GFILE 9#ifdef __cplusplus /* Define structure prototypes */struct _secid; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create_gfile( void *gsdnam_64, struct _secid *ident_64,! unsigned __int64 file_offset_64, unsigned __int64 length_64, unsigned short int chan, unsigned int acmode, unsigned int flags,$ unsigned __int64 *return_length_64, __optional_params); a*#else /* __OLD_STARLET */'int sys$create_gfile(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $CREATE_GDZRO */N/* */N/* Create Permanent Global Demand Zero Section */N/* b* */j/* $CREATE_GDZRO gsdnam_64, ident_64, prot, length_64, acmode, flags[[, reserved_length], rad_mask] */N/* */D/* gsdnam_64 = Address of global section name string descriptor */</* (32-bit or 64-bit descriptor) */N/* */Q/* ident_64 = Address of quadword containing version id and match control */N/* c* */G/* prot = Protection mask */N/* */G/* length_64 = Byte length of section to create */N/* */G/* acmode = Access mode for section */N/* d* */G/* flags = Section characteristics */N/* */F/* Flag Meaning */N/* */F/* SEC$M_SYSGBL System global section */N/* */\/* SEC$M_RAD_HINT e*Use rad_mask argument as a hint of which RADs to allocate memory from */N/* */M/* reserved_length_64 = Length of memory reserved for this global section */I/* */Z/* rad_mask = If SEC$M_RAD_HINT is set, bitmask of RADs from which to allocate memory */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif +#define sys$cref*ate_gdzro SYS$CREATE_GDZRO 9#ifdef __cplusplus /* Define structure prototypes */struct _secid; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create_gdzro( void *gsdnam_64, struct _secid *ident_64, unsigned int prot, unsigned __int64 length_64, unsigned int acmode, unsigned int flags, __optional_params );#else /* __OLD_STARLET */'int sys$create_gdzro(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINT g*ER_SIZE'#pragma __required_pointer_size __short#endifN/* $CREATE_GPFILE */N/* */N/* Create Permanent Global Page File Section */N/* */N/* $CREATE_GPFILE gsdnam_64, ident_64, prot, length_64, acmode, flags */N/* h* */D/* gsdnam_64 = Address of global section name string descriptor */</* (32-bit or 64-bit descriptor) */N/* */Q/* ident_64 = Address of quadword containing version id and match control */N/* */G/* prot = Protection mask */N/* i* */G/* length_64 = Byte length of section to create */N/* */G/* acmode = Access mode for section */N/* */G/* flags = Section characteristics */N/* j* */F/* Flag Meaning */N/* */F/* SEC$M_SYSGBL System global section */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif -#define sys$create_gpfile SYS$CREATE_GPFILE 9#ifdef __cplusplus /* Define structure protk*otypes */struct _secid; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create_gpfile( void *gsdnam_64, struct _secid *ident_64, unsigned int prot, unsigned __int64 length_64, unsigned int acmode, unsigned int flags);#else /* __OLD_STARLET */(int sys$create_gpfile(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $CREATE_GPFN l* */N/* */N/* Create Permanent Global Page Frame Section */N/* */V/* $CREATE_GPFN gsdnam_64, ident_64, prot, start_pfn, page_count, acmode, flags */N/* */D/* gsdnam_64 = Address of global section name string descriptorm* */</* (32-bit or 64-bit descriptor) */N/* */T/* ident_64 = Address of quadword containing version id and match control */N/* */G/* prot = Protection mask */N/* */C/* start_pfn = Page frame number of fin*rst page in section */N/* */D/* page_count = Number of page frames in section */N/* */G/* acmode = Access mode for section */N/* */G/* flags = Section characteristics */N/* o* */F/* Flag Meaning */N/* */E/* SEC$M_ARGS64 All arguments are passed as 64-bits */F/* SEC$M_SYSGBL System global section */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_sizp*e __long#endif )#define sys$create_gpfn SYS$CREATE_GPFN 9#ifdef __cplusplus /* Define structure prototypes */struct _secid; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create_gpfn( void *gsdnam_64, struct _secid *ident_64, unsigned int prot, unsigned __int64 start_pfn, unsigned __int64 page_count, unsigned int acmode, unsigned int flags);#else /* __OLD_STARLET */&int sys$create_gpfn(__unknown_params);!#endif /* #ifdef __NEW_STARLET q* */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $CREATE_RDB */N/* */N/* Create The Rights Database */N/* */I/* $CR r*EATE_RDB [sysid] */N/* */G/* sysid = address of the quadword system identifier */B/* to store in the maintenance record */N/* */ '#define sys$create_rdb SYS$CREATE_RDB 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #e s*ndif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create_rdb( struct _generic_64 *sysid);#else /* __OLD_STARLET */%int sys$create_rdb(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CREATE_REGION_64 */N/* */N/* Create Virtual Address Region */N/* t* */]/* $CREATE_REGION_64 length_64, region_prot, flags, return_region_id_64, return_va_64, */I/* return_length_64[, start_va_64] */N/* */G/* length_64 = Byte length of region to create */N/* */J/* region_prot = Protection on region u* */N/* */G/* flags = Region characteristics */N/* */J/* return_region_id_64 = Region id associated with newly created region */N/* */F/* return_va_64 = Starting address of region created */N/* v* */J/* return_length_64 = Length of region created */N/* */F/* start_va_64 = Starting address to create region */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif 3#define sys$create_region_64 SYS$CREATE_REGION_64 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endifw* /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create_region_64( unsigned __int64 length_64, unsigned int region_prot, unsigned int flags,& struct _generic_64 *return_region_id, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params);#else /* __OLD_STARLET */+int sys$create_region_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* x* */N/* $CREATE_USER_PROFILE */N/* */N/* Create a user security profile. */N/* */T/* $CREATE_USER_PROFILE [usrnam], [itmlst], [flags], usrpro, usrprolen, [context] */N/* y* */N/* usrnam = address of username descriptor (optional with CHP$M_NOACCESS) */B/* itmlst = address of item list */B/* flags = flags longword */O/* usrpro = address of buffer to receive user profile (opaque byte string) */F/* usrprolen = address of longword to receive user profile length */B/* contxt = address of longword to receive UAI context */N/* z* */ 9#define sys$create_user_profile SYS$CREATE_USER_PROFILE#ifdef __NEW_STARLETint sys$create_user_profile( void *usrnam, void *itmlst, unsigned int flags, void *usrpro, unsigned int *usrprolen, unsigned int *contxt);#else /* __OLD_STARLET */.int sys$create_user_profile(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CRELNM */N/* {* */N/* Create Logical Name */N/* */N/* $CRELNM [attr], tabnam, lognam, [acmode], [itemlist] */N/* */N/* attr = address of logical name attributes */N/* |* */C/* Attribute Meaning */I/* LNM$M_CONFINE Logical name not to be copied into sub-process */I/* LNM$M_NO_ALIAS Logical name can not be aliased */F/* LNM$M_CRELOG Logical name created using $CRELOG */N/* */N/* tabnam = address of logical name table string descriptor */N/* }* */N/* lognam = address of logical name string descriptor */N/* */N/* acmode = address of access mode for logical name */N/* */N/* itmlst = address of a list of item descriptors */N/* ~* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$crelnm SYS$CRELNM #ifdef __NEW_STARLETint sys$crelnm( unsigned int *attr, void *tabnam, void *lognam, unsigned char *acmode, void *itmlst);#else /* __OLD_STARLET */!int sys$crelnm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $CRELNT * */N/* */N/* Create Logical Name Table */N/* */N/* $CRELNT [attr], [resnam], [reslen], [quota], */I/* [promsk], [tabnam], [acmode], [partab], [uic] */N/* * */N/* attr = address of logical name table attributes */N/* */N/* resnam = address of descriptor of a buffer to receive the */B/* created table's name */N/* */N/* reslen = address of word to recieve length of created table's */B/** name */N/* */N/* quota = address of quota associated with logical name table */N/* */N/* promsk = address of protection mask */N/* */Q/* tabnam = address of descriptor of* logical name table name to be created */N/* */N/* partab = address of name of table parent string descriptor */N/* */N/* acmode = address of access mode for logical name */N/* */N/* uic = owner of table created in response to remote requ*est */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$crelnt SYS$CRELNT #ifdef __NEW_STARLETint sys$crelnt( unsigned int *attr, void *resnam, unsigned short int *reslen, unsigned int *quota, unsigned short int *promsk, void *tabnam, void *partab, unsigned char *acmode, __optional_params);#else /* __OLD_STARLET */!int sys$crelnt(_ *_unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $CRELOG */N/* */N/* Create Logical Name */N/* */N/* $CRELOG [tblflg] ,lognam ,eqlnam ,[a*cmode] */N/* */N/* tblflg = logical name table number */N/* 0 -> system (default) 1 -> group 2 -> process */N/* */N/* lognam = address of logical name string descriptor */N/* * */N/* eqlnam = address of equivalence name string descriptor */N/* */N/* acmode = access mode for logical name (process table only) */N/* */#define sys$crelog SYS$CRELOG #ifdef __NEW_STARLETint sys$crelog( unsigned int tblflg, void *lognam, void *eqlnam, unsigned int acmode);#else /* __OLD_STA *RLET */!int sys$crelog(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $CREMBX */N/* */N/* Create Mailbox and Assign Channel */N/* */\/* $CREMBX [prmflg] ,chan ,[maxmsg] ,[bufquo] ,[promsk] ,[acmode] ,[lognam], [flags] */N/* * */N/* prmflg = permanent flag */N/* 0 -> temporary (default) 1 -> permanent */N/* */N/* chan = address of word to receive channel */N/* */N/* maxmsg = maximum message size* that may be received */N/* */N/* bufquo = number of bytes that can be used to buffer messages */N/* */N/* promsk = protection mask */N/* */N/* acmode = access mode of created mailbox * */N/* */N/* lognam = address of logical name string descriptor for mailbox */N/* */N/* flags = optional flags for mailbox creation and channel assignment */N/* */#define sys$crembx SYS$CREMBX #ifdef __NEW_STARLETint sys$crembx( char prmf*lg, unsigned short int *chan, unsigned int maxmsg, unsigned int bufquo, unsigned int promsk, unsigned int acmode, void *lognam, __optional_params);#else /* __OLD_STARLET */!int sys$crembx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $CREPRC */N/* */N/* Create Process */*N/* */N/* $CREPRC [pidadr] ,[image] ,[input] ,[output] ,[error] ,[prvadr] */N/* ,[quota] ,[prcnam] ,[baspri] ,[uic] ,[mbxunt] ,[stsflg] ,[itmlst] */N/* ,[node], [home_rad]. [lt_limit] */N/* */N/* pidadr = address of longword to return id of created process */N/* * */N/* image = address of string descriptor for image name */N/* */N/* input = address of string descriptor for SYS$INPUT */N/* */N/* output = address of string descriptor for SYS$OUTPUT */N/* * */N/* error = address of string descriptor for SYS$ERROR */N/* */N/* prvadr = address of quadword privilege list */N/* */N/* quota = address of quota list */N/* **/N/* prcnam = address of string descriptor for process name */N/* */N/* baspri = base priority (0-31) */N/* */N/* uic = user identification code. If 0, create a subprocess */N/* */N/* mbxunt = mailbo*x unit for termination message */N/* */N/* stsflg = status and mode flag bits */N/* */N/* Bit Meaning */N/* */N/* 0 disable resource wait mode * */I/* 1 enable system service failure exception mode */I/* 2 inhibit process swapping */N/* 3 disable accounting messages */N/* 4 batch process */N/* 5 cause created process to hibernate */N/* 6 allow login without authorization file check */N/** 7 process is a network connect object */J/* 22 start process on specified home rad */I/* 26 set kernel thread limit for the process */N/* */N/* itmlst = address of a list of item descriptors */N/* */N/* node = address of string desc *riptor for SCS node name */N/* */N/* home_rad = RAD to start process on, if bit 22 in stsflg is set */N/* */S/* kt_limit = kernel thread limit of the process, if bit 26 in stsflg is set */ #define sys$creprc SYS$CREPRC 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #*ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$creprc( unsigned int *pidadr, void *image, void *input, void *output, void *error, struct _generic_64 *prvadr, unsigned int *quota, void *prcnam, unsigned int baspri, unsigned int uic, unsigned short int mbxunt, unsigned int stsflg, __optional_params );#else /* __OLD_STARLET */!int sys$creprc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CRETVA * */N/* */N/* Create Virtual Address Space */N/* */N/* $CRETVA inadr ,[retadr] ,[acmode] */N/* */N/* inadr = address of 2-longword array containing starting and */N*/* ending virtual address of pages to be created */N/* */N/* retadr = address of a 2-longword array to receive starting and */N/* ending virtual address of pages actually created */N/* */N/* acmode = access mode for the new pages (protection is */N/* read/write* for acmode and more privileged modes) */N/* */ #define sys$cretva SYS$CRETVA 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$cretva( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode);#else /* __OLD_STARLET */!int sys$cretva(__unknown_params);!#endif /* #ifdef __NEW_STARL*ET */ N/* $CRETVA_64 */N/* */N/* Create Virtual Address Space */N/* */i/* $CRETVA_64 region_id_64, start_va_64, length_64, acmode, flags, return_va_64, return_length_64 */B/* [, page_prot] */*N/* */G/* region_id_64 = Address of quadword region id */N/* */E/* start_va_64 = Starting address of address space to create */N/* */G/* length_64 = Byte length of addresses to create */N/* * */K/* acmode = access mode for the new pages (protection is */G/* read/write for acmode and more privileged modes) */N/* */A/* flags = Address space creation flags */N/* */J/* return_va_64 = Address of address space created */N/* * */J/* return_length_64 = Length of address space created */N/* */C/* page_prot = desired page protection (optional) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$cretva_64 SYS$CRETVA_64 9#i*fdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$cretva_64(" struct _generic_64 *region_id_64, void *start_va_64, unsigned __int64 length_64, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params);#else /* __OLD_STARLET */$int sys$cretva_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __I *NITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $CRMPSC */N/* */N/* Create and Map Section */N/* */N/* $CRMPSC [inadr] ,[retadr] ,[acmode] ,[flags] ,[gsdnam] ,[ident] */N/* ,[relpag] ,[chan] *,[pagcnt] ,[vbn] ,[prot] ,[pfc] */N/* */N/* inadr = address of 2-longword array containing starting and */N/* ending virtual addresses of space to map section */N/* */N/* retadr = address of 2-longword array to receive addresses */N/* actually mapped * */N/* */N/* acmode = access mode of owner of pages */N/* */N/* flags = section characteristics */N/* */N/* Flag Meaning */N/* * */N/* SEC$M_GBL Global section */N/* SEC$M_CRF Copy-on-reference section */N/* SEC$M_DZRO Demand zero pages */N/* SEC$M_EXPREG Find first available space */N/* SEC$M_PERM Permanent section */N/* SEC$M_PFNMAP Physical p*age frame section */N/* SEC$M_SYSGBL System global section */N/* SEC$M_WRT Read/write section */N/* */N/* gsdnam = address of global section name string descriptor */N/* */N/* ident = address of quadword containing version id *and match control */N/* */N/* relpag = relative page number within section */N/* */N/* chan = number of channel on which file is accessed */N/* */N/* pagcnt = number of pages in section */N/* * */N/* vbn = virtual block number of beginning of section or */N/* physical page frame number of beginning of section */N/* */N/* prot = protection mask */N/* */N/* pfc = page fault clu*ster size */N/* */ #define sys$crmpsc SYS$CRMPSC 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range;struct _secid; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$crmpsc( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode, unsigned int flags, void *gsdnam, struct _secid *ident, unsigned int relp*ag, unsigned short int chan, unsigned int pagcnt, unsigned int vbn, unsigned int prot, unsigned int pfc);#else /* __OLD_STARLET */!int sys$crmpsc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CRMPSC_FILE_64 */N/* */N/* Create and Map Private Disk File Section */N/* * */X/* $CRMPSC_FILE_64 region_id_64, file_offset_64, length_64, chan, acmode, flags, */;/* return_va_64, return_length_64 */;/* [, fault_cluster[, start_va_64[, page_prot]]] */N/* */G/* region_id_64 = Address of quadword region id */N/* */H/* file_offset_64 *= Byte offset into file to start section */N/* */G/* length_64 = Byte length of addresses to create */N/* */G/* chan = number of channel on which file is accessed */N/* */G/* acmode = access mode for the new pages * */N/* */G/* flags = section characteristics */N/* */F/* Flag Meaning */N/* */F/* SEC$M_CRF Copy-on-reference section */F/* SEC$M_DZRO Demand zero *pages */F/* SEC$M_EXPREG Find first available space */D/* SEC$M_NO_OVERMAP Do not overmap existing address space */F/* SEC$M_WRT Read/write section */N/* */J/* return_va_64 = Address of address space created */N/* */J/* return_length_64* = Length of address space created */N/* */N/* fault_cluster = Page fault cluster size in bytes */N/* */E/* start_va_64 = Starting address of address space to create */N/* */C/* page_prot = Desired page protection (optional) * */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif /#define sys$crmpsc_file_64 SYS$CRMPSC_FILE_64 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$crmpsc_file_64(" struct _generic_64 *region_id_64,! unsigned __int64 file_offset_64, unsigned __int64 length_64, u*nsigned short int chan, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params );#else /* __OLD_STARLET */)int sys$crmpsc_file_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $CRMPSC_GFILE_64 */N/* * */N/* Create and Map Global Disk File Section */N/* */`/* $CRMPSC_GFILE_64 gsdnam_64, ident_64, file_offset_64, length_64, chan, region_id_64, */I/* section_offset_64, acmode, flags, return_va_64, return_length_64 */G/* [, fault_cluster[, start_va_64[, map_length_64[, page_prot]]]] */N/* */*D/* gsdnam_64 = Address of global section name string descriptor */</* (32-bit or 64-bit descriptor) */N/* */Q/* ident_64 = Address of quadword containing version id and match control */N/* */H/* file_offset_64 = Byte offset into file to start section */N/* * */G/* length_64 = Byte length of section to create */N/* */G/* chan = number of channel on which file is accessed */N/* */G/* region_id_64 = Address of quadword region id */N/* */N/* section_offset_*64 = Relative byte within global section to start mapping */N/* */G/* acmode = access mode for the new pages */N/* */G/* flags = section characteristics */N/* */F/* Flag Meaning * */N/* */F/* SEC$M_CRF Copy-on-reference section */F/* SEC$M_EXPREG Find first available space */D/* SEC$M_NO_OVERMAP Do not overmap existing address space */F/* SEC$M_PERM Permanent section */F/* SEC$M_SYSGBL System global section */F/* SEC$M_WRT Read/write section * */N/* */J/* return_va_64 = Address of address space created */N/* */J/* return_length_64 = Length of address space created */N/* */N/* fault_cluster = Page fault cluster size in bytes */N/* * */E/* start_va_64 = Starting address of address space to create */N/* */J/* map_length_64 = Byte length of address space to map */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif 1#define sys$crmpsc_gfile_64 SYS$CRMPSC_GFI*LE_64 9#ifdef __cplusplus /* Define structure prototypes */struct _secid;struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$crmpsc_gfile_64( void *gsdnam_64, struct _secid *ident_64,! unsigned __int64 file_offset_64, unsigned __int64 length_64, unsigned short int chan," struct _generic_64 *region_id_64,$ unsigned __int64 section_offset_64, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *r*eturn_length_64, __optional_params );#else /* __OLD_STARLET */*int sys$crmpsc_gfile_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $CRMPSC_GDZRO_64 */N/* */N/* Create and Map Global Demand Zero Section */N/* * */b/* $CRMPSC_GDZRO_64 gsdnam_64, ident_64, prot, length_64, region_id_64, section_offset_64, */;/* acmode, flags, return_va_64, return_length_64 */X/* [, start_va_64[, map_length_64[, reserved_length_64[, rad_mask[, page_prot]]]]] */N/* */D/* gsdnam_64 = Address of global section name string descriptor */</* (32-bit or 64-bit descriptor) * */N/* */Q/* ident_64 = Address of quadword containing version id and match control */N/* */G/* prot = Protection mask */N/* */G/* length_64 = Byte length of section to create */N/* * */G/* region_id_64 = Address of quadword region id */N/* */N/* section_offset_64 = Relative byte within global section to start mapping */N/* */G/* acmode = access mode for the new pages */N/* * */G/* flags = section characteristics */N/* */F/* Flag Meaning */N/* */F/* SEC$M_EXPREG Find first available space */D/* SEC$M_NO_OVERMAP Do not overmap existing address space */F/* SEC$M_PERM Permanen*t section */F/* SEC$M_SYSGBL System global section */\/* SEC$M_RAD_HINT Use rad_mask argument as a hint of which RADs to allocate memory from */N/* */J/* return_va_64 = Address of address space created */N/* */J/* return_length_64 = Length of address space created * */N/* */E/* start_va_64 = Starting address of address space to create */N/* */J/* map_length_64 = Byte length of address space to map */N/* */M/* reserved_length_64 = Length of memory reserved for this global section */N/* * */Z/* rad_mask = If SEC$M_RAD_HINT is set, bitmask of RADs from which to allocate memory */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif 1#define sys$crmpsc_gdzro_64 SYS$CRMPSC_GDZRO_64 9#ifdef __cplusplus /* Define structure prototypes */struct _secid;struct _generic_64; #endif /* #ifdef __cplusplus */ *#ifdef __NEW_STARLETint sys$crmpsc_gdzro_64( void *gsdnam_64, struct _secid *ident_64, unsigned int prot, unsigned __int64 length_64," struct _generic_64 *region_id_64,$ unsigned __int64 section_offset_64, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params );#else /* __OLD_STARLET */*int sys$crmpsc_gdzro_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_S *IZE'#pragma __required_pointer_size __short#endifN/* $CRMPSC_GPFILE_64 */N/* */N/* Create and Map Global Page File Section */N/* */c/* $CRMPSC_GPFILE_64 gsdnam_64, ident_64, prot, length_64, region_id_64, section_offset_64, */;/* acmode, flags, return*_va_64, return_length_64 */;/* [, start_va_64[, map_length_64[, page_prot]]] */N/* */D/* gsdnam_64 = Address of global section name string descriptor */</* (32-bit or 64-bit descriptor) */N/* */Q/* ident_64 = Address of quadword containing version id and match control */N/* * */G/* prot = Protection mask */N/* */G/* length_64 = Byte length of section to create */N/* */G/* region_id_64 = Address of quadword region id */N/* */*N/* section_offset_64 = Relative byte within global section to start mapping */N/* */G/* acmode = access mode for the new pages */N/* */G/* flags = section characteristics */N/* */F/* Flag Meaning * */N/* */F/* SEC$M_EXPREG Find first available space */D/* SEC$M_NO_OVERMAP Do not overmap existing address space */F/* SEC$M_PERM Permanent section */F/* SEC$M_SYSGBL System global section */N/* */J/* return_va_64 = Ad*dress of address space created */N/* */J/* return_length_64 = Length of address space created */N/* */E/* start_va_64 = Starting address of address space to create */N/* */J/* map_length_64 = Byte length of address space to map * */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif 3#define sys$crmpsc_gpfile_64 SYS$CRMPSC_GPFILE_64 9#ifdef __cplusplus /* Define structure prototypes */struct _secid;struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$crmpsc_gpfile_64( void *gsdnam_64, struct _secid *ident_64, unsigned int prot, unsigned __in*t64 length_64," struct _generic_64 *region_id_64,$ unsigned __int64 section_offset_64, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params );#else /* __OLD_STARLET */+int sys$crmpsc_gpfile_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $CRMPSC_GPFN_64 * */N/* */N/* Create and Map Global Page Frame Section */N/* */i/* $CRMPSC_GPFN_64 gsdnam_64, ident_64, prot, start_pfn, page_count, region_id_64, relative_page, */;/* acmode, flags, return_va_64, return_length_64 */;/* [, start_va_64[, map_page_count[, page_prot]]] */N/* * */D/* gsdnam_64 = Address of global section name string descriptor */</* (32-bit or 64-bit descriptor) */N/* */S/* ident_64 = Address of quadword containing version id and match control */N/* */G/* prot = Protection mask */N/** */C/* start_pfn = Page frame number of first page in section */N/* */D/* page_count = Number of page frames in section */N/* */G/* region_id_64 = Address of quadword region id */N/* * */K/* relative_page = Relative page within global section to start mapping */N/* */G/* acmode = Access mode of owner of mapped pages */N/* */G/* flags = Flags overriding default section characteristics */N/* */G/* Fla*g Meaning */N/* */E/* SEC$M_ARGS64 All arguments are passed as 64-bits */G/* SEC$M_EXPREG Find first available space */D/* SEC$M_NO_OVERMAP Do not overmap existing address space */G/* SEC$M_SYSGBL System global section */H/* SEC$M_WRT Read/write mapping of section */N/** */J/* return_va_64 = Address of address space created */N/* */J/* return_length_64 = Length of address space created */N/* */E/* start_va_64 = Starting address of address space to create */N/* * */J/* map_page_count = Number of page frames to map */N/* */C/* page_prot = Desired page protection (optional) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif /#define sys$crmpsc_gpfn_64 SYS$CRMPSC_GPFN_64 9#ifdef __cplusplus * /* Define structure prototypes */struct _secid;struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$crmpsc_gpfn_64( void *gsdnam_64, struct _secid *ident_64, unsigned int prot, unsigned __int64 start_pfn, unsigned __int64 page_count," struct _generic_64 *region_id_64, unsigned __int64 relative_page, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params );#els *e /* __OLD_STARLET */)int sys$crmpsc_gpfn_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $CRMPSC_PFN_64 */N/* */N/* Create and Map Private Page Frame Section */N/* * */N/* $CRMPSC_PFN_64 region_id_64, start_pfn, page_count, acmode, flags, */B/* return_va_64, return_length_64 */B/* [, start_va_64[, page_prot]] */N/* */G/* region_id_64 = Address of quadword region id */N/* */C/* start_pfn = Page frame number of first pa*ge in section */N/* */D/* page_count = Number of page frames in section */N/* */G/* acmode = access mode for the new pages */N/* */G/* flags = section characteristics */N/* * */F/* Flag Meaning */N/* */@/* SEC$M_ARGS64 All arguments are passed as 64-bits */F/* SEC$M_EXPREG Find first available space */C/* SEC$M_GRANHINT Set granularity hints on pages */D/* SEC$M_NO_OVERMAP Do not overmap existing address space */F/* SEC$M_WRT* Read/write section */N/* */J/* return_va_64 = Address of address space created */N/* */J/* return_length_64 = Length of address space created */N/* */E/* start_va_64 = Starting address of address space to create* */N/* */C/* page_prot = Desired page protection (optional) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif -#define sys$crmpsc_pfn_64 SYS$CRMPSC_PFN_64 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifd*ef __NEW_STARLETint sys$crmpsc_pfn_64(" struct _generic_64 *region_id_64, unsigned __int64 start_pfn, unsigned __int64 page_count, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params );#else /* __OLD_STARLET */(int sys$crmpsc_pfn_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $DACEFC * */N/* */N/* Disassociate Common Event Flag Cluster */N/* */N/* $DACEFC efn */N/* */N/* efn = number of any event flag in the cluste *r */N/* */#define sys$dacefc SYS$DACEFC #ifdef __NEW_STARLETint sys$dacefc( unsigned int efn);#else /* __OLD_STARLET */!int sys$dacefc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $DALLOC */N/* */N/* Deallocate Device * */N/* */N/* $DALLOC [devnam] ,[acmode] */N/* */N/* devnam = address of device name descriptor. If 0, deallocate all */N/* */N/* acmode = access mode associated with device * */N/* */#define sys$dalloc SYS$DALLOC #ifdef __NEW_STARLETint sys$dalloc( void *devnam, unsigned int acmode);#else /* __OLD_STARLET */!int sys$dalloc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $DASSGN */N/* */N/* Deassign I/O Channel * */N/* */N/* $DASSGN chan */N/* */N/* chan = number of channel to be deassigned */N/* */#define sys$dassgn SYS$DASSGN #ifdef __NEW_STARLET *int sys$dassgn( unsigned short int chan);#else /* __OLD_STARLET */!int sys$dassgn(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $DCLAST */N/* */N/* Declare AST */N/* */N/* $DCLAST astadr ,[astprm] ,[acmod*e] */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine */N/* */N/* acmode = access mode for which the AST is to be declared * */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$dclast SYS$DCLAST#ifdef __NEW_STARLETint sys$dclast(" void (*astadr)(__unknown_params), unsigned __int64 astprm, unsigned int acmode);#else /* __OLD_STARLET */!int sys$dclast(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer *_size __short#endif N/* $DCLCMH */N/* */N/* Declare Change Mode or Compatibility Mode Handler */N/* */N/* $DCLCMH addres ,[prvhnd] ,[type] */N/* */*N/* addres = address of handler */N/* */N/* prvhnd = address of longword to receive previous handler address */N/* */N/* type = handler type indicator */N/* 0 -> change mode (current mode) 1 -> compatibility mode */N/* * */ #define sys$dclcmh SYS$DCLCMH#ifdef __NEW_STARLETint sys$dclcmh(! int (*addres)(__unknown_params), void *(*(prvhnd)), char type);#else /* __OLD_STARLET */!int sys$dclcmh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $DCLEVT */N/* */N/* Declare an Event * */N/* */M/* $DCLEVT evtnam, [rcvacl], [evtfac], [acmode], [flags] */B/* ,[evtdata], [nullarg], [nullarg], [nullarg], [nullarg] */N/* */N/* evtnam = address of descriptor of event name */N/* * */N/* rcvacl = address of descriptor of ACL */N/* */N/* evtfac = address of event facility code */N/* */N/* acmode = access mode of event declaration */N/* */N/* flags = opt*ional flags */N/* */N/* evtdata = address of descriptor of optional event data */N/* */#define sys$dclevt SYS$DCLEVT #ifdef __NEW_STARLETint sys$dclevt( void *evtnam, void *rcvacl, unsigned int *evtfac, unsigned int acmode, unsigned int flags, void *evtdata, unsigne *d int nullarg1, unsigned int nullarg2, unsigned int nullarg3, unsigned int nullarg4);#else /* __OLD_STARLET */!int sys$dclevt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $DCLEXH */N/* */N/* Declare Exit Handler */N/* * */N/* $DCLEXH desblk */N/* */N/* desblk = address of exit control block containing: */N/* */N/* +-------------------------------+ */N/* | forward link | */N/* +-------*------------------------+ */N/* | exit handler address | */N/* +-------------------------------+ */N/* | argument count | */N/* +-------------------------------+ */N/* | address to store reason | */N/* +-------------------------------+ * */N/* | additional arguments | */N/* +-- for exit handler, --+ */N/* | if any | */N/* +-------------------------------+ */N/* */ #define sys$dclexh SYS$DCLEXH#ifdef __NEW_STARLETint sys$ *dclexh( void *desblk);#else /* __OLD_STARLET */!int sys$dclexh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $DEFINE_MAPPING */N/* */N/* Define Mapping record types in the Mapping database */N/* * */N/* $DEFINE_MAPPING initmlst [,outitmlst] */N/* */N/* initmlst = address of a list of item descriptors for the operation */N/* outitmlst = address of a list of item descriptors for information */N/* from the operation */N/* */* /#define sys$define_mapping SYS$DEFINE_MAPPING#ifdef __NEW_STARLETint sys$define_mapping( void *initmlst, void *outitmlst);#else /* __OLD_STARLET */)int sys$define_mapping(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $DELETE */N/* */N/* Delete R*ecord */N/* */N/* $DELETE rab, [err], [suc] */N/* */J/* rab = address of rab */N/* */E/* err = address of user error completion ro*utine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$delete SYS$DELETE 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$delete( struct _rabdef *rab, __optional_params ); *#else /* __OLD_STARLET */!int sys$delete(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $DELETE_BITMAP */N/* */N/* Delete a Write Bitmap */N/* */N */* $DELETE_BITMAP handle */N/* */ -#define sys$delete_bitmap SYS$DELETE_BITMAP#ifdef __NEW_STARLETint sys$delete_bitmap( unsigned int handle);#else /* __OLD_STARLET */(int sys$delete_bitmap(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $DELETE_INTRUSION * */N/* */N/* Delete intrusion record */N/* */N/* $DELETE_INTRUSION user_criteria, [flags] */N/* */G/* user_criteria in address of user criteria descriptor * */@/* flags in intrusion service flags */N/* */3#define sys$delete_intrusion SYS$DELETE_INTRUSION #ifdef __NEW_STARLETint sys$delete_intrusion( void *user_criteria, unsigned int flags);#else /* __OLD_STARLET */+int sys$delete_intrusion(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N*/* $DELETE_MAPPING */N/* */N/* Delete Mapping record from Mapping database */N/* */N/* $DELETE_MAPPING initmlst */N/* */N/* initmlst = address * of a list of item descriptors for the operation */N/* */ /#define sys$delete_mapping SYS$DELETE_MAPPING#ifdef __NEW_STARLETint sys$delete_mapping( void *initmlst);#else /* __OLD_STARLET */)int sys$delete_mapping(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $DELETE_PROXY * */N/* */N/* Delete proxy record */N/* */N/* $DELETE_PROXY rem_node, rem_user, local_user, [flags] */N/* */H/* rem_node in address of remote node descriptor */H/* rem_use*r in address of remote user descriptor */H/* local_user in address of local user descriptor */F/* flags in proxy service flags */N/* */+#define sys$delete_proxy SYS$DELETE_PROXY #ifdef __NEW_STARLETint sys$delete_proxy( void *rem_node, void *rem_user, void *local_user, unsigned int flags);#else /* __OLD_STARLET */'int sys$dele*te_proxy(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $DELLNM */N/* */N/* Delete Logical Name and/or Table */N/* */N/* $DELLNM [tabnam], [lognam], [acmode] */N/* * */N/* tabnam = address of descriptor of logical name table name string */N/* */N/* lognam = address of descriptor of logical name string */N/* */N/* acmode = address of access mode for logical name */N/* * */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$dellnm SYS$DELLNM #ifdef __NEW_STARLETint sys$dellnm( void *tabnam, void *lognam, unsigned char *acmode);#else /* __OLD_STARLET */!int sys$dellnm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $DELLOG */N/* * */N/* Delete Logical Name */N/* */N/* $DELLOG [tblflg] ,[lognam] ,[acmode] */N/* */N/* tblflg = logical name table number */N/* 0 -> system *1 -> group 2 -> process */N/* */N/* lognam = address of logical name string descriptor. If 0, */N/* delete all names */N/* */N/* acmode = access mode of logical name (process table only) */N/* * */#define sys$dellog SYS$DELLOG #ifdef __NEW_STARLETint sys$dellog( unsigned int tblflg, void *lognam, unsigned int acmode);#else /* __OLD_STARLET */!int sys$dellog(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $DELMBX */N/* */N/* Delete Mailbox */N/* * */N/* $DELMBX chan */N/* */N/* chan = channel number assigned to the mailbox */N/* */#define sys$delmbx SYS$DELMBX #ifdef __NEW_STARLETint sys$delmbx( unsigned short int chan);#e *lse /* __OLD_STARLET */!int sys$delmbx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $DELPRC */N/* */N/* Delete Process */N/* */N/* $DELPRC [pidadr] ,[prcnam] ,[flags] */N/* * */N/* pidadr = address of longword containing id of process to be deleted */N/* */N/* prcnam = address of string descriptor for process name to be deleted */N/* */N/* flags = optional flags longword for specifying options */N/* * */#define sys$delprc SYS$DELPRC #ifdef __NEW_STARLETint sys$delprc( unsigned int *pidadr, void *prcnam, __optional_params);#else /* __OLD_STARLET */!int sys$delprc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $DELTVA */N/* */N/* Delete Virtual Address Space * */N/* */N/* $DELTVA inadr ,[retadr] ,[acmode] */N/* */N/* inadr = address of 2-longword array containing starting and */N/* ending virtual addresses of pages to delete */N/* */N/* * retadr = address of 2-longword array to receive starting and */N/* ending addresses of pages actually deleted */N/* */N/* acmode = access mode for which service is performed */N/* */ #define sys$deltva SYS$DELTVA 9#ifdef __cplusplus /* Define structure prototypes */struct _va+_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$deltva( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode);#else /* __OLD_STARLET */!int sys$deltva(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $DELTVA_64 */N/* */N/* Delete Virtual Address Space + */N/* */b/* $DELTVA_64 region_id_64, start_va_64, length_64, acmode, return_va_64, return_length_64 */N/* */G/* region_id_64 = Address of quadword region id */N/* */E/* start_va_64 = Starting address of address space to delete */N/* + */G/* length_64 = Byte length of addresses to delete */N/* */G/* acmode = access mode for which service is performed */N/* */J/* return_va_64 = Address of address space deleted */N/* + */J/* return_length_64 = Length of address space deleted */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$deltva_64 SYS$DELTVA_64 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$deltva_64(" struct _generic_64 *region_id_6+4, void *start_va_64, unsigned __int64 length_64, unsigned int acmode, void *(*(return_va_64)),% unsigned __int64 *return_length_64);#else /* __OLD_STARLET */$int sys$deltva_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $DELETE_BUFOBJ */N/* */N/*+ Delete I/O Buffer Object */N/* */N/* $DELETE_BUFOBJ buffer_handle */N/* */K/* buffer_handle = address of a quadword that contains the buffer handle */B/* identifying the buffer object to be deleted */N/* + */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif -#define sys$delete_bufobj SYS$DELETE_BUFOBJ 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$delete_bufobj($ struct _generic_64 *buffer_handle);#else /* __OLD_STARLET */(int sys$delete_bufobj(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __I +NITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $DELETE_REGION_64 */N/* */N/* Delete Virtual Address Region */N/* */Q/* $DELETE_REGION_64 region_id_64, acmode, return_va_64, return_length_64 */N/* + */G/* region_id_64 = Address of quadword region id */N/* */G/* acmode = Access mode for which service is performed */N/* */J/* return_va_64 = Address of address space deleted */N/*  + */J/* return_length_64 = Length of address space deleted */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif 3#define sys$delete_region_64 SYS$DELETE_REGION_64 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$delete_region_64(" struct _generic_64 *regio +n_id_64, unsigned int acmode, void *(*(return_va_64)),% unsigned __int64 *return_length_64);#else /* __OLD_STARLET */+int sys$delete_region_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $DEQ */N/* */N/* Dequeue Lock  + */N/* */N/* $DEQ [lkid] ,[valblk] ,[acmode] ,[flags] */N/* */N/* lkid = lock ID of the lock to be dequeued */N/* */N/* valblk = address of the lock value block  + */N/* */N/* acmode = access mode of the locks to be dequeued */N/* */N/* flags = optional flags. */N/* */N/* LCK$M_DEQALL */N/*  + */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$deq SYS$DEQ#ifdef __NEW_STARLET int sys$deq( unsigned int lkid, void *valblk, unsigned int acmode, unsigned int flags);#else /* __OLD_STARLET */int sys$deq(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $DEVICE_SC+AN */N/* */N/* Wildcard device scan */N/* */R/* $DEVICE_SCAN return_devnam, retlen, [search_devnam], [itmlst], [contxt] */N/* */N/* return_devnam = address of de+scriptor of returned device name buffer */N/* */N/* retlen = address to store length of device name returned */N/* */N/* search_devnam = address of descriptor of search device name */N/* */N/* itmlst = address of a list of item descriptors + */N/* */N/* contxt = address of quadword context structures */N/* */N/* */ )#define sys$device_scan SYS$DEVICE_SCAN 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */+ #ifdef __NEW_STARLETint sys$device_scan( void *return_devnam, unsigned short int *retlen, void *search_devnam, void *itmlst, struct _generic_64 *contxt);#else /* __OLD_STARLET */&int sys$device_scan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $DGBLSC */N/* */N/* Delete Global Section + */N/* */N/* $DGBLSC [flags] ,gsdnam ,[ident] */N/* */N/* flags = type of section */N/* 0 -> group section SEC$M_SYSGBL -> system section */N/* */N/* gsd +nam = address of global section name string descriptor */C/* (32-bit or 64-bit descriptor) */N/* */N/* ident = address of quadword containing version id and match control */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$dgblsc SYS$DGBLSC 9+#ifdef __cplusplus /* Define structure prototypes */struct _secid; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$dgblsc( unsigned int flags, void *gsdnam, struct _secid *ident);#else /* __OLD_STARLET */!int sys$dgblsc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $DIAGNOSE */N/* System Se+rvice for Diagnostics Programmers */N/* */I/* $DIAGNOSE function, P2, [cpu_id, [flags]] */N/* */I/* function = DIAG$SETAFF or DIAG$_ACTVCPUS */N/* */I/* P2 = enable flag if function is DIAG$SETAFF, +or */I/* address to return actvcpus in if function */I/* is DIAG$_ACTVCPUS */N/* */I/* cpu_id = CPU number to set affinity to */N/* */I/* flags = masks governing the checking to do, whether */I/* aff+inity is set for image or process duration, */B/* whether to set affinity to primary cpu. */N/* */##define sys$diagnose SYS$DIAGNOSE #ifdef __NEW_STARLETint sys$diagnose( unsigned int function, unsigned int p2, unsigned int cpu_id, unsigned int flags);#else /* __OLD_STARLET */#int sys$diagnose(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* + */N/* $DISABLE_VP_USE */N/* */N/* Disable Use of the Vector Processor */N/* */I/* $DISABLE_VP_USE flags ,[curflg] ,[prvflg] */N/* + */N/* flags = mask of facility(ies) that disabled vector use */N/* */N/* curflg = address of longword to receive current flags */N/* */N/* prvflg = address of longword to receive previous flags */N/* + *//#define sys$disable_vp_use SYS$DISABLE_VP_USE #ifdef __NEW_STARLETint sys$disable_vp_use( unsigned int flags, unsigned int *curflg, unsigned int *prvflg);#else /* __OLD_STARLET */)int sys$disable_vp_use(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $DISABLE_VP_USE_INT */N/* + */N/* Disable Use of the Vector Processor, internal form */N/* */I/* $DISABLE_VP_USE_INT flags ,[curflg] ,[prvflg] */N/* */N/* flags = mask of facility(ies) that disabled vector use */N/* */N/* + curflg = address of longword to receive current flags */N/* */N/* prvflg = address of longword to receive previous flags */N/* */7#define sys$disable_vp_use_int SYS$DISABLE_VP_USE_INT #ifdef __NEW_STARLETint sys$disable_vp_use_int( unsigned int flags, unsigned int *curflg, unsigned int *prvflg);#else +/* __OLD_STARLET */-int sys$disable_vp_use_int(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $DISCONNECT */N/* */N/* Disconnect Record Stream */N/* */N+/* $DISCONNECT rab, [err], [suc] */N/* */J/* rab = address of rab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success compl+etion routine */N/* */ '#define sys$disconnect SYS$DISCONNECT 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$disconnect( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */%int sys$disconnect(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $DISMOU  + */N/* */N/* Dismount Volume */N/* */N/* $DISMOU [devnam], [flags], [itmlst] */N/* */N/* devnam = optional address of device name st!+ring descriptor */N/* */N/* flags = 32-bit status mask selecting options for the dismount */N/* The symbols for the flags are defined by the $DMTDEF */N/* macro. */N/* */N/* Flag Meaning "+*/N/* */N/* DMT$M_NOUNLOAD Do not unload the volume. */N/* */N/* DMT$M_UNIT Dismount the specified device, rather */N/* than the entire volume set. */N/* */M/* itmlst = option#+al address of a list of item identifiers */N/* */#define sys$dismou SYS$DISMOU #ifdef __NEW_STARLETint sys$dismou( void *devnam, unsigned int flags, __optional_params);#else /* __OLD_STARLET */!int sys$dismou(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $DISPLAY $+ */N/* */N/* Display File */N/* */N/* $DISPLAY fab, [err], [suc] */N/* */J/* fab = address of fab */N %+/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ !#define sys$display SYS$DISPLAY 9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; &+#endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$display( struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */"int sys$display(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $DISPLAY_PROXY */N/* */N/* Display proxy record '+ */N/* */T/* $DISPLAY_PROXY rem_node, rem_user, buffer_sizes, proxy_node, proxy_user, */B/* default_user, local_users, [flags], [context] */N/* */=/* rem_node in address of remote node descriptor */=/* rem_user in address of remote user descriptor */X/* buffer_sizes (+ out address of array of words to receive output string lengths */M/* proxy_node out address of descriptor to receive matching proxy node */M/* proxy_user out address of descriptor to receive matching proxy user */K/* default_user out address of descriptor to receive default user */K/* local_users out address of array of blocks to receive local users */;/* flags in proxy service flags */B/* context in out address of optional longword context)+ */N/* */-#define sys$display_proxy SYS$DISPLAY_PROXY #ifdef __NEW_STARLETint sys$display_proxy( void *rem_node, void *rem_user,% unsigned short int buffer_sizes [4], void *proxy_node, void *proxy_user, void *default_user, unsigned int *local_users, unsigned int flags, unsigned int *context);#else /* __OLD_STARLET */(int sys$display_proxy(__unknown_params);!#endif /* #ifdef __NEW_STARLET*+ */N/* $DLCEFC */N/* */N/* Delete Common Event Flag Cluster */N/* */N/* $DLCEFC name */N/* */N/* name = addr ++ess of cluster name string descriptor */N/* */#define sys$dlcefc SYS$DLCEFC #ifdef __NEW_STARLETint sys$dlcefc( void *name);#else /* __OLD_STARLET */!int sys$dlcefc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $DNS */N/* */N/* DNS Cl,+erk system service */N/* */N/* $DNS [efn], func , itmlst, [dnsb] ,[astadr] ,[astprm] */N/* ($DNSW) */N/* */N/* efn = number of event flag to set on completion */N/* -+ */N/* func = function code specifying action to be performed */N/* */N/* itmlst = address of a list of item descriptors */N/* */N/* dnsb = address of quadword I/O status block to receive final */N/* completion status .+ */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine as argument */N/* */ #define sys$dns SYS$DNS 9#ifdef __cplusplus /* Define structure prototypes/+ */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$dns( unsigned int efn, unsigned int func, void *itmlst, struct _iosb *dnsb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */int sys$dns(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#define sys$dnsw SYS$DNSW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$0+dnsw( unsigned int efn, unsigned int func, void *itmlst, struct _iosb *dnsb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */int sys$dnsw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $EMAA */N/* */N/* Call Entity Manage 1+ment Assist Agent */N/* */I/* $EMAA */N/* */#define sys$emaa SYS$EMAA #ifdef __NEW_STARLET int sys$emaa( void *arglist, unsigned int *invokeid);#else /* __OLD_STARLET */int sys$emaa(__unknown_params);!#endif /* #ifdef __NEW_STARLET */2+N/* */N/* $ENABLE_VP_USE */N/* */N/* Enable Use of the Vector Processor */N/* */I/* $ENABLE_VP_USE flags ,[curflg] ,[prvflg] */N/* 3+ */N/* flags = mask of facility(ies) that disabled vector use */N/* */N/* curflg = address of longword to receive current flags */N/* */N/* prvflg = address of longword to receive previous flags */N/* 4+ */-#define sys$enable_vp_use SYS$ENABLE_VP_USE #ifdef __NEW_STARLETint sys$enable_vp_use( unsigned int flags, unsigned int *curflg, unsigned int *prvflg);#else /* __OLD_STARLET */(int sys$enable_vp_use(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $ENABLE_VP_USE_INT */N/* 5+ */N/* Enable Use of the Vector Processor, internal form */N/* */I/* $ENABLE_VP_USE_INT flags ,[curflg] ,[prvflg] */N/* */N/* flags = mask of facility(ies) that disabled vector use */N/* 6+ */N/* curflg = address of longword to receive current flags */N/* */N/* prvflg = address of longword to receive previous flags */N/* */5#define sys$enable_vp_use_int SYS$ENABLE_VP_USE_INT #ifdef __NEW_STARLETint sys$enable_vp_use_int( unsigned int flags, unsigned int *curflg, unsigned int *prvflg);7+#else /* __OLD_STARLET */,int sys$enable_vp_use_int(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $ENQ */N/* */N/* Enqueue Lock Request */N/* */N/* $ENQ [efn] ,lkmode ,lksb ,[flags] ,[resnam] ,[parid] 8+ */N/* ($ENQW) ,[astadr] ,[astprm] ,[blkast] ,[acmode], [rsdm_id] */B/* ,[range] ,[priority] */N/* */N/* efn = event flag to be set at completion */N/* */N/* lkmode = type of lock mode requested. Modes are: */N/* 9+ */N/* LCK$K_NLMODE null lock */N/* LCK$K_CRMODE concurrent read */N/* LCK$K_CWMODE concurrent write */N/* LCK$K_PRMODE protected read */N/* LCK$K_PWMODE protected write */N/* LCK$K_EXMODE exclusive lock :+ */N/* */P/* lksb = address of the lock status block or extended lock status block */N/* */N/* flags = flags defining the characteristics of the lock. These are: */N/* */N/* LCK$M_NOQUEUE */N/*;+ LCK$M_SYNCSTS */N/* LCK$M_SYSTEM */N/* LCK$M_VALBLK */N/* LCK$M_CONVERT */N/* */N/* resnam = address of string descriptor of the resource name */B/* (32-bit or 64-bit des<+criptor) */N/* */N/* parid = lock ID of the parent lock */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine =+ */N/* */N/* blkast = address of entry mask of blocking AST routine */N/* */N/* acmode = Access mode to be associated with the lock */N/* */N/* rsdm_id = address of resource domain id */N/* >+ */N/* range = optional range to be locked within resource */N/* */N/* priority = optional priority of request */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$enq SYS$ENQ#i?+fdef __NEW_STARLET int sys$enq( unsigned int efn, unsigned int lkmode, void *lksb, unsigned int flags, void *resnam, unsigned int parid," void (*astadr)(__unknown_params), unsigned __int64 astprm," void (*blkast)(__unknown_params), unsigned int acmode, unsigned int rsdm_id, __optional_params );#else /* __OLD_STARLET */int sys$enq(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#define sys$enqw SYS$ENQW #ifdef __NEW_STARLET int sys$enqw( unsigned in@+t efn, unsigned int lkmode, void *lksb, unsigned int flags, void *resnam, unsigned int parid," void (*astadr)(__unknown_params), unsigned __int64 astprm," void (*blkast)(__unknown_params), unsigned int acmode, unsigned int rsdm_id, __optional_params );#else /* __OLD_STARLET */int sys$enqw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* A+ */N/* $ENTER */N/* */N/* Enter File */N/* */N/* $ENTER fab, [err], [suc] */N/* B+ */J/* fab = address of fab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$enter SYC+S$ENTER 9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$enter( struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */ int sys$enter(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $ERAPAT */N/* */N/* Generate a security D+erase pattern. */N/* */I/* $ERAPAT type, [count], patadr */N/* */F/* type = type of security erase */N/* */G/* count = iteration count (seed for erase pattern) E+ */N/* */H/* patadr = address of longword to receive erase pattern */N/* */#define sys$erapat SYS$ERAPAT #ifdef __NEW_STARLETint sys$erapat( int type, unsigned int count, unsigned int *patadr);#else /* __OLD_STARLET */!int sys$erapat(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $ERASE F+ */N/* */N/* Erase File */N/* */N/* $ERASE fab, [err], [suc] */N/* */J/* fab = address of fab G+ */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$erase SYS$ERASE 9#ifdef __cplusplus /* Define structure prototypes *H+/struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$erase( struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */ int sys$erase(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $EVDPOSTEVENT */N/* */N/* Post Event I+ to EVD */N/* */I/* $EVDPOSTEVENT EVENT */N/* */+#define sys$evdpostevent SYS$EVDPOSTEVENT #ifdef __NEW_STARLETint sys$evdpostevent( void *event);#else /* __OLD_STARLET */'int sys$evdpostevent(__unknown_params);!#endif /* #ifdef __NEW_SJ+TARLET */N/* $EXIT */N/* */N/* Exit image */N/* */N/* $EXIT [code] */N/* */N/* code K+= longword completion status */N/* */#define sys$exit SYS$EXIT #ifdef __NEW_STARLET int sys$exit( unsigned int code);#else /* __OLD_STARLET */int sys$exit(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $EXPREG */N/* */N/* ExL+pand Program/Control Region */N/* */N/* $EXPREG pagcnt ,[retadr] ,[acmode] ,[region] */N/* */N/* pagcnt = number of pages to add to end of specified region */N/* */N/* retadr = address of 2-lonM+gword array to receive virtual */N/* addresses of starting and ending pages */N/* */N/* acmode = access mode of the new pages */N/* */N/* region = region indicator */N/* 0 -> program (P0) region 1 -> control (P1N+) region */N/* */ #define sys$expreg SYS$EXPREG 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$expreg( unsigned int pagcnt, struct _va_range *retadr, unsigned int acmode, char region);#else /* __OLD_STARLET */!int sys$expreg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $EXPREO+G_64 */N/* */N/* Expand Addresses Within a Region */N/* */Z/* EXPREG_64 region_id_64, length_64, acmode, flags, return_va_64, return_length_64 */B/* [, page_prot] */N/* P+ */G/* region_id_64 = Address of quadword region id */N/* */G/* length_64 = Byte length of addresses */N/* */K/* acmode = access mode for the new pages (protection is */G/* read/write for acmode and more privileged modes) */N/*Q+ */A/* flags = Address space creation flags */N/* */J/* return_va_64 = Address of address space created */N/* */J/* return_length_64 = Length of address space created */N/* R+ */C/* page_prot = Desired page protection (optional) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$expreg_64 SYS$EXPREG_64 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$expreg_64(" struct _generic_64 *region_idS+_64, unsigned __int64 length_64, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params);#else /* __OLD_STARLET */$int sys$expreg_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $EXTEND T+ */N/* */N/* Extend File */N/* */N/* $EXTEND fab, [err], [suc] */N/* */J/* fab = address of fab */N/* U+ */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$extend SYS$EXTEND 9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #V+ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$extend( struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */!int sys$extend(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $FAO */N/* */N/* Formatted ASCII Output */N/* W+ */N/* $FAO ctrstr ,[outlen] ,outbuf ,[p1] ,[p2]...[pn] */N/* */N/* ctrstr = address of string descriptor for control string */C/* (32-bit or 64-bit descriptor) */N/* */N/* outlen = address of word in which to store output length */N/* X+ */N/* outbuf = address of output buffer string descriptor */C/* (32-bit or 64-bit descriptor) */N/* */N/* p1... = variable number of arguments to FAO */N/* */  #ifdef __INITIAL_POINTER_SIZEY+&#pragma __required_pointer_size __long#endif#define sys$fao SYS$FAO #ifdef __NEW_STARLET int sys$fao( void *ctrstr, unsigned short int *outlen, void *outbuf, __optional_params);#else /* __OLD_STARLET */int sys$fao(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif   N/* $FAOL */N/* Z+ */N/* Formatted ASCII Output With List Parameter */N/* */N/* $FAOL ctrstr ,[outlen] ,outbuf ,prmlst */N/* */N/* ctrstr = address of string descriptor for control string */C/* (32-bit or 64-bit descriptor) [+ */N/* */N/* outlen = address of word to receive output string length */N/* */N/* outbuf = address of output buffer string descriptor */C/* (32-bit or 64-bit descriptor) */N/* */N/* prmlst = address of\+ a list of longword parameters */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$faol SYS$FAOL#ifdef __NEW_STARLET int sys$faol( void *ctrstr, unsigned short int *outlen, void *outbuf, void *prmlst);#else /* __OLD_STARLET */int sys$faol(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE ]+'#pragma __required_pointer_size __short#endif N/* $FAOL_64 */N/* */N/* Formatted ASCII Output With Quadword List Parameter */N/* */N/* $FAOL_64 ctrstr_64 ,[outlen_64] ,outbuf_64 ,prmlst_64 */N/* ^+ */N/* ctrstr_64 = address of string descriptor for control string */C/* (32-bit or 64-bit descriptor) */N/* */N/* outlen_64 = address of word to receive output string length */N/* */N/* outbuf_64 = address of output buffer string descriptor */C/* _+ (32-bit or 64-bit descriptor) */N/* */N/* prmlst_64 = address of a list of quadword parameters */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif  !#define sys$faol_64 SYS$FAOL_64#ifdef __NEW_STARLETint sys$faol_64( void *ctrstr_64, unsigned shor`+t int *outlen_64, void *outbuf_64, void *prmlst_64);#else /* __OLD_STARLET */"int sys$faol_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $FILES_64 */N/* */N/* Call the Files-64 file system */N/* a+ */N/* $FILES_64 [efn] ,func ,fsb ,[astadr] ,[astprm] */N/* */N/* efn = number of event flag to set on completion */N/* */N/* func = function code specifying action to be performed */N/* b+ */N/* fsb = address of File System Block */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine as argument */N/* c+ */ ##define sys$files_64 SYS$FILES_64#ifdef __NEW_STARLETint sys$files_64( unsigned int efn, unsigned short int func, void *fsb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */#int sys$files_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $FILESCAN */N/* */N/* Scan a string and identify ad+ file specification */N/* */N/* $FILESCAN srcstr, [valuelst], [fldflags] [,auxout] [,retlen] */N/* */I/* srcstr = address of string descriptor for source string */I/* valuelst = address of a list of item descriptors */I/* fldflags = address of a longword to receive flags e+ */I/* auxout = address of string descriptor for output string */I/* retlen = address to store length of returned output string */N/* */ ##define sys$filescan SYS$FILESCAN#ifdef __NEW_STARLETint sys$filescan( void *srcstr, void *valuelst, unsigned int *fldflags, void *auxout, unsigned short int *retlen);#else /* __OLD_STARLET */#int sys$filescan(__unknown_params);!#endif /f+* #ifdef __NEW_STARLET */ N/* */N/* $FIND */N/* */N/* Find Record in File */N/* */N/* $FIND rab, [err], [suc] g+ */N/* */J/* rab = address of rab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* h+ */ #define sys$find SYS$FIND 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$find( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */int sys$find(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $FIND_HELD i+ */N/* */N/* Find Identifiers Held By Holder */N/* */I/* $FIND_HELD holder, [id], [attrib], [contxt] */N/* */H/* holder = address of a quadword which specifies the holder */j+B/* id of the records to find */D/* id = address to return the identifier longword */H/* attrib = address to return the holder attributes longword */H/* contxt = address of a longword containing the record stream */B/* context. initially should be zero, value output */B/* on first call, value input on subsequent calls. */N/* */ k+%#define sys$find_held SYS$FIND_HELD 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$find_held( struct _generic_64 *holder, unsigned int *id, unsigned int *attrib, unsigned int *contxt);#else /* __OLD_STARLET */$int sys$find_held(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $FIND_HOl+LDER */N/* */N/* Find Holder Of Identifier */N/* */I/* $FIND_HOLDER id, [holder], [attrib], [contxt] */N/* */D/* id = identifier longword whose holder rm+ecords */B/* are to be found */H/* holder = address to return the holder id quadword */H/* attrib = address to return the attributes longword */H/* contxt = address of a longword containing the record stream */B/* context. initially should be zero, value output */B/* on first call, value input on subsequent calls. */N/* n+ */ )#define sys$find_holder SYS$FIND_HOLDER 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$find_holder( unsigned int id, struct _generic_64 *holder, unsigned int *attrib, unsigned int *contxt);#else /* __OLD_STARLET */&int sys$find_holder(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* o+ */N/* $FINISH_RDB */N/* */N/* Clean up RMS Stream */N/* */I/* $FINISH_RDB contxt */N/* */H/* cp+ontxt = address of a longword containing the record stream */B/* context. */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif'#define sys$finish_rdb SYS$FINISH_RDB #ifdef __NEW_STARLETint sys$finish_rdb( unsigned int *contxt);#else /* __OLD_STARLET */%int sys$finish_rdb(__unknown_params);!#endif /* #ifdef __N q+EW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $FORCEX */N/* */N/* Force Exit */N/* */N/* $FORCEX [pidadr] ,[prcnam] ,[code] */N/* r+ */N/* pidadr = address of process id of process to be forced to exit */N/* */N/* prcnam = address of process name descriptor for forced process */N/* */N/* code = longword completion status for exit service */N/* s+ */#define sys$forcex SYS$FORCEX #ifdef __NEW_STARLETint sys$forcex( unsigned int *pidadr, void *prcnam, unsigned int code);#else /* __OLD_STARLET */!int sys$forcex(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $FORGE_WORD */N/* t+ */N/* Forge random word. */N/* */S/* $FORGE_WORD [minlen], [maxlen], [mindata], [flags], [retdata], outlen, outstr */N/* */J/* minlen minimum word length to return */J/* maxlen maximum word length to return */K/* u+ mindata minimum amount of data to return (in decibits) */I/* flags miscellaneous flags */K/* retdata longword to receive actual amount of information in word */J/* outlen word to receive length of returned word */J/* outstr address of buffer to receive word */N/* */'#define sys$forge_word SYS$FORGE_WORD v+#ifdef __NEW_STARLETint sys$forge_word( unsigned int minlen, unsigned int maxlen, unsigned int mindata, unsigned int flags, unsigned int *retdata, unsigned short int *outlen, void *outstr);#else /* __OLD_STARLET */%int sys$forge_word(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $FORMAT_ACL */N/* w+ */N/* Format an Access Control list Entry */N/* */I/* $FORMAT_ACL acl-entry, [acl-length], acl-string, */B/* [line-width], [term-desc], [line-indent], */B/* [bit-names], [routin] */N/* */C/* ax+cl-entry = address of a descriptor of a buffer which */;/* contains the ACE */N/* */D/* acl-length = address of a word to receive the length of */;/* the output string */N/* */D/* acl-string = address of a descriptor of a buffer into */;/* which they+ output string is to be stored */N/* */D/* line-width = address of the maximum line width */;/* (0 = infinite) */N/* */C/* term_desc = address of a character descriptor containing */;/* a character string to be inserted whenever */;/* the line segment length exceez+ds the line-width */N/* */E/* line-indent = address of the number of columns to indent */;/* the output line segment */N/* */C/* bit-names = address of a access bit name table (32 entries) */N/* */A/* routin = address of routine to b{+e executed in kernel mode */N/* */ '#define sys$format_acl SYS$FORMAT_ACL#ifdef __NEW_STARLETint sys$format_acl( void *aclent, unsigned short int *acllen, void *aclstr, unsigned short int *width, void *trmdsc, unsigned short int *indent, unsigned int *accnam," int (*routin)(__unknown_params));#else /* __OLD_STARLET */%int sys$format_acl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ |+N/* */H/* $FORMAT_AUDIT fmttyp, audmsg, [outlen], outbuf, */;/* [width], [trmdsc], [routin], [fmtflg] */N/* */N/* Format security auditing event message */N/* */A/* fmttyp = format type }+ */N/* */A/* audmsg = address of the message to format */N/* */D/* outlen = address of a word to receive length of output string */N/* */A/* outbuf = Address of a descriptor of a buffer to receive */;/* the formatted event message ~+ */N/* */@/* width = address of a word containing the display width */N/* */A/* trmdsc = address of a descriptor containing the line */;/* terminator character(s) */N/* */A/* routin = address of an output routine + */N/* */A/* fmtflg = format control flags */ +#define sys$format_audit SYS$FORMAT_AUDIT#ifdef __NEW_STARLETint sys$format_audit( unsigned int fmttyp, unsigned int *audmsg, unsigned short int *outlen, void *outbuf, unsigned short int *width, void *trmdsc,! int (*routin)(__unknown_params), unsigned int fmtflg);#else /* __OLD_STARLET */'int sys$format +_audit(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ H/* $FORMAT_CLASS itmlst, [routin] */N/* */N/* Format access class strings */N/* */N/* itmlst = address of a list of item descriptors */N/* + */N/* routin = address of routine to be executed in kernel mode */N/* */N/* */ +#define sys$format_class SYS$FORMAT_CLASS#ifdef __NEW_STARLETint sys$format_class( void *itmlst," int (*routin)(__unknown_params));#else /* __OLD_STARLET */'int sys$format_class(__unknown_params);!#endif /* #i+fdef __NEW_STARLET */ N/* */N/* $FREE */N/* */N/* Free Record */N/* */N/* $FREE rab, [err], [suc] */+N/* */J/* rab = address of fab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* + */ #define sys$free SYS$FREE 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$free( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */int sys$free(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* + */N/* $FREE_USER_CAPABILITY */N/* */N/* Release a global user capability bit */N/* */N/* $FREE_USER_CAPABILITY [cap_num],[prev_mask],[flags] */N/* + */I/* cap_num = address of cell with requested cap number to release */I/* prev_mask = address of user quadword that will hold the */B/* previous state of the reserved capabilities cell */I/* flags = address of behavioral flags for this operation */N/* */ ;#define sys$free_user_capability SYS$FREE_USER_CAPABILITY 9#ifdef __cplusplus /* Define structure prot+otypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$free_user_capability( int *cap_num, struct _generic_64 *prev_mask, struct _generic_64 *flags);#else /* __OLD_STARLET *//int sys$free_user_capability(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $FLUSH + */N/* */N/* Flush Record */N/* */N/* $FLUSH rab, [err], [suc] */N/* */J/* rab = address of rab + */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$flush SYS$FLUSH 9#ifdef __cplusplus /* Define structure prot+otypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$flush( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */ int sys$flush(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $GET_BITMAP_INFO */N/* */N/* GE +T Information about a Write Bitmap */N/* */N/* $GET_BITMAP_INFO handle, chan, devnam, name, index, itmlst */N/* */ 1#define sys$get_bitmap_info SYS$GET_BITMAP_INFO#ifdef __NEW_STARLETint sys$get_bitmap_info( unsigned int handle, unsigned short int chan, void *devnam, void *name, unsigne +d int index, void *itmlst);#else /* __OLD_STARLET */*int sys$get_bitmap_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $GET_BITMAP_INFOW */N/* */N/* GET Information about a Write Bitmap and Wait */N/* + */N/* $GET_BITMAP_INFOW devnam, name, index, handle, itmlst, status */N/* */3#define sys$get_bitmap_infow SYS$GET_BITMAP_INFOW #ifdef __NEW_STARLETint sys$get_bitmap_infow( void *devnam, void *name, unsigned int index, unsigned int handle, void *itmlst, void *status);#else /* __OLD_STARLET */+int sys$get_bitmap_infow(__unknown_params);!#endif /* #ifdef+ __NEW_STARLET */N/* */N/* $GET_CPU_INFO */N/* */N/* GET Information about a CPU */N/* */N/* $GET_CPU_INFO func, flags, cpu_id, buffer, length, ret_length */N/* + */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif+#define sys$get_cpu_info SYS$GET_CPU_INFO #ifdef __NEW_STARLETint sys$get_cpu_info( unsigned int func, unsigned int flags, unsigned int *cpu_id, unsigned int buffer_length, void *buffer_address_64,! unsigned int *return_length_64);#else /* __OLD_STARLET */'int sys$get_cpu_info(__unknown_params);!#endif /* #ifdef __N +EW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $GET_REGION_INFO */N/* */N/* Get Information About Virtual Address Region */N/* */P/* $GET_REGION_INFO function, region_id_64, start_va_64, ,buffer_length, */I/*+ buffer_address_64, return_length_64 */N/* */C/* function = Function code */N/* */;/* Code Meaning */I/* VA$_REGSUM_BY_ID Region summary, by ID */I/* VA$_REGSUM_BY_VA Region summary, by VA + */J/* VA$_NEXT_REGSUM_BY_VA Next region summary, by VA */N/* */G/* region_id_64 = Address of quadword region id to use with */;/* VA$_REGSUM_BY_ID */N/* */E/* start_va_64 = Virtual address to use with VA$_REGSUM_BY_VA */N/* + */H/* buffer_length = Length of user buffer */N/* */J/* buffer_address_64 = Address of user REGSUM buffer */N/* */J/* return_length_64 = Length of data written to user buffer */N/* */ #ifdef+ __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif 1#define sys$get_region_info SYS$GET_REGION_INFO 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$get_region_info( unsigned int function," struct _generic_64 *region_id_64, void *start_va_64, void *reserved, unsigned int buffer_length, void *buffer_address_64,! unsigned int *return_length_64);#else /* + __OLD_STARLET */*int sys$get_region_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $GET_SECURITY */N/* */N/* Get Object Securty Profile */N/* + */\/* $GET_SECURITY [clsnam], [objnam], [objhan], [flags], [itmlst], [context], [acmode] */N/* */ +#define sys$get_security SYS$GET_SECURITY#ifdef __NEW_STARLETint sys$get_security( void *clsnam, void *objnam, unsigned int *objhan, unsigned int flags, void *itmlst, unsigned int *contxt, unsigned int *acmode);#else /* __OLD_STARLET */'int sys$get_security(__unknown_params);!#endif /* #ifd +ef __NEW_STARLET */ N/* */N/* $GET */N/* */N/* Get Record from File */N/* */N/* $GET rab, [err], [suc] */N+/* */J/* rab = address of rab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* + */ #define sys$get SYS$GET 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$get( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */int sys$get(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $GET_ARITH_EXCEPTION + */N/* */N/* Get AXP arithmetic exception context information */N/* */N/* $GET_ARITH_EXCEPTION sigarg, mcharg, buffer */N/* */M/* sigarg = address of signal array of the exception */N +/* */H/* mcharg = address of mechanism array of the exception */N/* */H/* buffer = address of buffer to return information */N/* */ 9#define sys$get_arith_exception SYS$GET_ARITH_EXCEPTION#ifdef __NEW_STARLETint sys$get_arith_exception( v +oid *sigarg, void *mcharg, void *buffer);#else /* __OLD_STARLET */.int sys$get_arith_exception(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $GETCHN */N/* */N/* Get I/O Channel Information */N/* */N/* $GETCHN chan ,+[prilen] ,[pribuf] ,[scdlen] ,[scdbuf] */N/* */N/* chan = number of a channel assigned to the device */N/* */N/* prilen = address of word to receive length of primary buffer */N/* */N/* pribuf = address of primary buffer descri +ptor */N/* */N/* scdlen = address of word to receive length of secondary buffer */N/* */N/* scdbuf = address of secondary buffer descriptor */N/* */#define sys$getchn SYS$GETCHN #ifdef __NEW_STARLETint sys$getchn +( unsigned short int chan, unsigned short int *prilen, void *pribuf, unsigned short int *scdlen, void *scdbuf);#else /* __OLD_STARLET */!int sys$getchn(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $GETDEV */N/* */N/* Get I/O Device Information */N/* + */N/* $GETDEV devnam ,[prilen] ,[pribuf] ,[scdlen] ,[scdbuf] */N/* */N/* devnam = address of device name or logical name descriptor */N/* */N/* prilen = address of word to receive length of primary buffer */N/* + */N/* pribuf = address of primary buffer descriptor */N/* */N/* scdlen = address of word to receive length of secondary buffer */N/* */N/* scdbuf = address of secondary buffer descriptor */N/* */#define sys+$getdev SYS$GETDEV #ifdef __NEW_STARLETint sys$getdev( void *devnam, unsigned short int *prilen, void *pribuf, unsigned short int *scdlen, void *scdbuf);#else /* __OLD_STARLET */!int sys$getdev(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $GETDTI */N/* + */N/* Get Distributed Transaction Information */N/* */J/* $GETDTI [efn], [flags], iosb, [astadr], [astprm], [log_id], context, */?/* ($GETDTIW) search, itmlst */N/* */E/* efn = event flag to set at completion */G/* flags = operation flags + */F/* iosb = address of a quadword I/O status block */H/* astadr = address of the entry mask of an AST routine */H/* astprm = value to be passed to AST routine */H/* log_id = address of log id for TM log */I/* context = address of longword search context */H/* search = address of a list of search criteria items */H/* itmlst = address of a list +of item descriptors */N/* */ #define sys$getdti SYS$GETDTI 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getdti( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int log_id [4], unsigned int *contxt, void *search, voi+d *itmlst);#else /* __OLD_STARLET */!int sys$getdti(__unknown_params);!#endif /* #ifdef __NEW_STARLET */!#define sys$getdtiw SYS$GETDTIW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getdtiw( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int log_id [4], unsigned int *contxt, void *search, void *itmls +t);#else /* __OLD_STARLET */"int sys$getdtiw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $GETDVI */N/* */N/* Get Device/Volume Information */N/* */N/* $GETDVI [efn] ,[chan] ,[devnam] ,itmlst ,[iosb] ,[astadr] +*/N/* ($GETDVIW) ,[astprm] ,[nullarg], [pathname] */N/* */N/* efn = event flag to be set at completion */N/* */N/* chan = number of a channel assigned to the device or */N/* 0 if device is specified by the devnam parameter */N/* + */N/* devnam = address of device name or logical name descriptor */N/* */N/* itmlst = address of a list of item descriptors */N/* */N/* iosb = address of a quadword I/O status block */N/* + */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine */N/* */N/* nullarg = zilch */N/* + */N/* pathname = optional address of a path name descriptor */N/* */N/* */ #define sys$getdvi SYS$GETDVI 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb;struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getdvi( unsigned int efn, unsigned short int ch+an, void *devnam, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, struct _generic_64 *nullarg, __optional_params);#else /* __OLD_STARLET */!int sys$getdvi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */!#define sys$getdviw SYS$GETDVIW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getdviw( unsigned int efn, unsigned short int chan+, void *devnam, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned __int64 *nullarg, __optional_params);#else /* __OLD_STARLET */"int sys$getdviw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $GETEVI */N/* */N/* Get Event Information */N/* + */N/* $GETEVI itmlst ,[nullarg] */N/* */N/* itmlst = address of a list of item descriptors */N/* */ #define sys$getevi SYS$GETEVI#ifdef __NEW_STARLETint sys$getevi( void *itmlst, unsigned int +nullarg);#else /* __OLD_STARLET */!int sys$getevi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $GETJPI */N/* */N/* Get Job/Process Information */N/* */N/* $GETJPI [efn] ,[pidadr] ,[prcnam] ,itmlst ,[iosb], [astadr], + */N/* ($GETJPIW) [astprm] */N/* */N/* efn = event flag to be set at completion */N/* */N/* pidadr = address of process identification */N/* */N/* prcnam = +address of process name string descriptor */N/* */N/* itmlst = address of a list of item descriptors */N/* */N/* iosb = address of a quadword I/O status block */N/* */N/* astadr = address of entry mask of A +ST routine */N/* */N/* astprm = value to be passed to AST routine as an argument */N/* */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$getjpi SYS$GETJPI  9#ifdef __cplusplus + /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getjpi( unsigned int efn, unsigned int *pidadr, void *prcnam, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */!int sys$getjpi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */!#define sys$getjpiw SYS$GETJPIW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #end+if /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getjpiw( unsigned int efn, unsigned int *pidadr, void *prcnam, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */"int sys$getjpiw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $GETJPI_FAST */N/* + */N/* Get Job/Process Information For The Current Process */N/* */N/* $GETJPI_FAST */N/* */N/* item_mask = Mask of current process info requested */N/* + */N/* flags = MBZ for now */N/* */N/* return_buffer */B/* = Address of buffer to return array of longword info */N/* */N/* return_buffer_length */B+/* = Length of return buffer array in bytes */N/* */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif)#define sys$getjpi_fast SYS$GETJPI_FAST #ifdef __NEW_STARLETint sys$getjpi_fast( unsigned __int64 item_mask, unsigned int flags, int *return_buffer, int return_buffer_length); +#else /* __OLD_STARLET */&int sys$getjpi_fast(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $GETLKI */N/* */N/* Get Lock Information */N/* + */N/* $GETLKI [efn] ,lkidadr ,itmlst ,[iosb], [astadr], [astprm], */N/* ($GETLKIW) [reserved] */N/* */N/* efn = event flag to be set at completion */N/* */N/* lkidadr = address of lock identification */N/* + */N/* itmlst = address of a list of item descriptors */N/* */N/* iosb = address of a quadword I/O status block */N/* */N/* astadr = address of entry mask of AST routine */N/* + */N/* astprm = value to be passed to AST routine as an argument */N/* */N/* reserved = reserved parameter */N/* */N/* */ #define sys$getlki SYS$GETLKI 9#ifdef __cplusplus /* Def+ine structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getlki( unsigned int efn, unsigned int *lkidadr, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int reserved);#else /* __OLD_STARLET */!int sys$getlki(__unknown_params);!#endif /* #ifdef __NEW_STARLET */!#define sys$getlkiw SYS$GETLKIW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #e+ndif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getlkiw( unsigned int efn, unsigned int *lkidadr, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int reserved);#else /* __OLD_STARLET */"int sys$getlkiw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $GETMSG */N/* */N/* +Get Message */N/* */N/* $GETMSG msgid ,msglen ,bufadr ,[flags] ,[outadr] */N/* */N/* msgid = identification of message to be retrieved */N/* */N/* msglen = address of a +word to receive length of string */N/* returned */N/* */N/* bufadr = address of buffer descriptor of buffer to receive */N/* string */N/* */N/* flags = flag bits for message content (macro defau+lt = 15) */N/* */N/* Bit Value/Meaning */N/* */N/* 0 1 Include text */N/* 0 Do not include text */N/* 1 1 Include identifier */N/* + 0 Do not include identifier */N/* 2 1 Include severity */N/* 0 Do not include severity */N/* 3 1 Include component */N/* 0 Do not include component */N/* */N/* outadr = address of 4-b+yte array to receive the following values: */N/* */N/* Byte Contents */N/* */N/* 0 Reserved */N/* 1 Count of FAO arguments */N/* 2 User value + */N/* 3 Reserved */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$getmsg SYS$GETMSG#ifdef __NEW_STARLETint sys$getmsg( unsigned int msgid, unsigned short int *msglen, void *bufadr, unsigned int flags, unsigned char outadr [4]);#else /* __OLD_STARLET */!int sys$getm +sg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $GETPTI */N/* */N/* Get Page Table Information */N/* */N/* $GETPTI [inadr],[retadr]+,[acmode],[mask],[pagcnt] */N/* */K/* inadr = address of two longwords containing starting */I/* and ending virtual address to operate on */N/* */L/* retadr = address of two longwords into which starting */I/* and ending address of pages operated on is returned + */N/* */N/* acmode = access mode against which ownership is checked */N/* */J/* mask = mask of page table information control bits */N/* */L/* pagcnt = minimum page count */N/* + */N/* */ #define sys$getpti SYS$GETPTI 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getpti( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode, unsigned int mask, unsigned int pagcnt);#else /* __OLD_STARLET */!int sys$getpti +(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $GETQUI */N/* */N/* Get Queue Information */N/* */N/* $GETQUI [efn], func, [context], [itmlst], */N/* ($GETQUIW) [iosb], [astadr], [astprm] + */N/* */N/* efn = event flag to be set when request completes */N/* func = code specifying function to be performed */N/* context = address of a longword containing a context number */N/* itmlst = address of a list of item descriptors for the operation */R/* iosb = address of a quadword status block to receive the fin+al status */Q/* astadr = address of an ast routine to be called when request completes */N/* astprm = 32-bit ast parameter */N/* */ #define sys$getqui SYS$GETQUI 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getqui( unsigned int efn, unsigned short int func, uns+igned int *context, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */!int sys$getqui(__unknown_params);!#endif /* #ifdef __NEW_STARLET */!#define sys$getquiw SYS$GETQUIW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getquiw( unsigned int efn, unsigned short int func, unsigned int *context, void *itmlst, struc +t _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */"int sys$getquiw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $GETRMI */N/* */N/* Get Resource Monitor Information */N/* */R/* $GETRMI+ [efn] ,[nullarg] ,[nullarg] ,itmlst ,[iosb] ,[astadr] ,[astprm] */N/* */N/* efn = event flag to be set at completion */N/* */N/* itmlst = address of a list of item descriptors */N/* */N/* iosb = address of a quadwor+d I/O status block */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine */N/* */N/* nullarg = reserved argument + */N/* */N/* */ #define sys$getrmi SYS$GETRMI 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getrmi( unsigned int efn, unsigned int nullarg1, unsigned int nullarg2, void *itmlst, struct _iosb *iosb," void (*astadr)(__unkn +own_params), int astprm);#else /* __OLD_STARLET */!int sys$getrmi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $GETSYI */N/* */N/* Get System-Wide Information */N/* */N/* $GETSYI [efn] ,[csidadr],[nodename],itmlst ,+[iosb] ,[astadr], */N/* ($GETSYIW) [astprm] */N/* */N/* efn = event flag to be set at completion */N/* */N/* csidadr = address of cluster system identification */N/* */+N/* nodename = address of node name string descriptor */N/* */N/* itmlst = address of a list of item descriptors */N/* */N/* iosb = address of a quadword I/O status block */N/* */N/* astadr = address +of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine */N/* */N/* */N/* The second and third arguments in the $GETSYI argument list are */N/* not used; they are reserved for future use.+ */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$getsyi SYS$GETSYI  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getsyi( unsigned int efn, unsigned int *csidadr, void *nodename, void *itmlst, struct _iosb *iosb," void (*astadr+)(__unknown_params), int astprm);#else /* __OLD_STARLET */!int sys$getsyi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */!#define sys$getsyiw SYS$GETSYIW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getsyiw( unsigned int efn, unsigned int *csidadr, void *nodename, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_S +TARLET */"int sys$getsyiw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $GETTIM */N/* */N/* Get Time */N/* */N/* $GETTIM +timadr, [flags] */N/* */N/* timadr = address of a quadword to receive 64-bit current time value */u/* flags = optional flags to modify the type of time returned (initially Smithsonian time or time-since-boot) */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$gettim SYS$GETTIM 9#ifdef __cplusplus /* Define st+ructure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$gettim( struct _generic_64 *timadr, __optional_params);#else /* __OLD_STARLET */!int sys$gettim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* + */N/* Get Time (High Precision) */N/* */N/* $GETTIM_PREC timadr */N/* */N/* timadr = address of a quadword to receive 64-bit current time value */N/* */ +#ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif )#define sys$gettim_prec SYS$GETTIM_PREC#ifdef __NEW_STARLETint sys$gettim_prec( unsigned __int64 *timadr);#else /* __OLD_STARLET */&int sys$gettim_prec(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* + */N/* $GET_USER_CAPABILITY */N/* */N/* Reserve a global user capability bit */N/* */Y/* $GET_USER_CAPABILITY [cap_num],[select_num],[select_mask],[prev_mask],[flags] */N/* + */I/* cap_num = address of cell with requested cap number */I/* select_num = address of cell with selected cap number */I/* select_mask = address of bitmask indicating which capability */B/* bit selected by operation */I/* prev_mask = address of user quadword that will hold the */B/* previous state of the reserved capabilities cell */I/* flags = address of be+havioral flags for this operation */N/* */ 9#define sys$get_user_capability SYS$GET_USER_CAPABILITY 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$get_user_capability( int *cap_num, int *select_num,! struct _generic_64 *select_mask, struct _generic_64 *prev_mask, struct _generic_64 *flags); +#else /* __OLD_STARLET */.int sys$get_user_capability(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $GETUTC */N/* */N/* Get UTC Time */N/* + */N/* $GETUTC utcadr */N/* */Q/* utcadr = address of a utc_date_time to receive 128-bit current UTC time */B/* value */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys+$getutc SYS$GETUTC #ifdef __NEW_STARLETint sys$getutc( unsigned int utcadr [4]);#else /* __OLD_STARLET */!int sys$getutc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $GETUAI */N/* */N/* Get User Authorization Information + */N/* */N/* $GETUAI [efn] ,[contxt] ,usrnam ,itmlst ,[iosb] ,[astadr] */F/* ,[astprm] */N/* */N/* efn = event flag to be set at completion */N/* */N/* contxt = addr+ess of a context longword (UAF IFI & ISI) */N/* */N/* usrnam = address of user name descriptor */N/* */N/* itmlst = address of a list of item descriptors */N/* */N/* iosb = address of a quadword I/O stat+us block */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine */N/* */N/* + */ #define sys$getuai SYS$GETUAI 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getuai( unsigned int efn, unsigned int *contxt, void *usrnam, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */!int sys$getuai(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* + */N/* $GET_WBEM_INFO */N/* */N/* Get system information needed by WBEM providers */N/* */M/* $GET_WBEM_INFO itm_code, itm_param1, itm_param_buf, */;/* buf_addr, buf_len, ret_len_addr */N/* + */B/* itm_code = Item code value, defined by $WBEMIDEF, wbemidef.h */N/* */D/* itm_param1 = Item code dependent input parameter value. */;/* If zero item code dependent parameters required, */;/* must be zero. */;/* If exactly one longword parameter required, */;/* parameter value. + */;/* If more than one parameter required, size in */;/* bytes of the item parameter buffer. */N/* */G/* itm_param_buf = Address of item parameter buffer. Size of the */;/* buffer, in bytes, is given by the value of */;/* itm_param1. */;/* If the specified item code does not require */;/* more th+an a single parameter, this address */;/* must be zero. */N/* */B/* buf_addr = Address of buffer into which data is returned. */</* Size of the buffer, in bytes, is given by buf_len. */N/* */B/* buf_len = Size of the output buffer in bytes. */N/* + */F/* ret_len_addr = Address of a 32-bit longword into which the */;/* value of the number of bytes that have been */;/* written into the output buffer is returned. */;/* The caller should not assume that the remaining */;/* bytes in the output buffer have been zeroed. */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_s+ize __long#endif-#define sys$get_wbem_info SYS$GET_WBEM_INFO #ifdef __NEW_STARLETint sys$get_wbem_info( unsigned int itm_code, unsigned int itm_param1, void *itm_param_buf, void *buf_addr, unsigned int buf_len, unsigned int *ret_len_addr);#else /* __OLD_STARLET */(int sys$get_wbem_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* Alpha + */N/* $GOTO_UNWIND_64 */N/* */N/* General Unwind Call Stack */N/* */N/* $GOTO_UNWIND_64 [target_invo_64], [target_pc_64], */;/* [newretval], [newretval2] */N/* + */N/* target_invo_64 = address of longword (Alpha) or quadword (IPF) */B/* containing the invocation handle (frame pointer on */N/* Alpha) to unwind call stack */N/* */N/* target_pc_64 = address of quadword that contains the PC to be */B/* given control when the unwind is complete + */N/* */N/* newretval = address of a location that contains the value to be */B/* placed in the saved R0 field of the mechanism array */N/* */N/* newretval2 = address of a location that contains the value to be */B/* placed in the saved R1 field of the mechanism array */N/* + */N/* */ /#define sys$goto_unwind_64 SYS$GOTO_UNWIND_64#ifdef __NEW_STARLETint sys$goto_unwind_64( void *target_invo_64, void *(*(target_pc_64)), unsigned __int64 *newretval, unsigned __int64 *newretval2);#else /* __OLD_STARLET */)int sys$goto_unwind_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* + */N/* $GRANTID */N/* */N/* Grant Identifier to Process */N/* */I/* $GRANTID [pidadr], [prcnam], [id], [name], [prvatr] [,segment] */N/* + */I/* pidadr = address of PID of affected process */I/* prcnam = address of string descriptor of process name */I/* id = address of quadword identifier and attributes */I/* name = address of string descriptor of identifier name */I/* prvatr = address to store attributes of superseded id */I/* segment = optional segment index, by value */N/* + */ !#define sys$grantid SYS$GRANTID 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$grantid( unsigned int *pidadr, void *prcnam, struct _generic_64 *id, void *name, unsigned int *prvatr, unsigned int segment);#else /* __OLD_STARLET */"int sys$grantid(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* + */N/* $GRANT_LICENSE */N/* */N/* Grant authorization to execute licensed software product. */N/* */I/* $GRANT_LICENSE prdnam ,prducer [,contxt] [,itmlst] */N/* + */H/* prdnam = address of descriptor for software product name */I/* prducer = address of descriptor for software producer name */I/* contxt = address of context buffer (4 longwords) */H/* itmlst = address of a list of item descriptors */N/* */ -#define sys$grant_license SYS$GRANT_LICENSE#ifdef __NEW_STARLETint sys$grant_license( void *p +rdnam, void *prducer, unsigned int contxt [4], void *itmlst);#else /* __OLD_STARLET */(int sys$grant_license(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $HASH_PASSWORD */N/* */N/* Encrypt a user password to produce a quadword hash value. */N/* */I/* $+HASH_PASSWORD pwd, alg, [salt], usrnam, hash */N/* */E/* pwd = address of descriptor for plaintext password */E/* alg = algorithm to use for hash */F/* salt = salt value for use by hash algorithm */H/* usrnam = address of descriptor of username */F/* hash = address of output quadword hash buffer + */N/* */ -#define sys$hash_password SYS$HASH_PASSWORD 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$hash_password( void *pwd, unsigned char alg, unsigned short int salt, void *usrnam, struct _generic_64 *hash);#else /* __OLD_STARLET */(int sys$hash_password(__unknown_params);!#endif /* #ifdef + __NEW_STARLET */ N/* $HIBER */N/* */N/* Hibernate */N/* */N/* $HIBER_S */N/* */#d +efine sys$hiber SYS$HIBER#ifdef __NEW_STARLETint sys$hiber(void);#else /* __OLD_STARLET */int sys$hiber(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $IDTOASC */N/* */N/* Identifier To Ascii Conversion */N/* + */I/* $IDTOASC id, [namlen], [nambuf], [resid], [attrib], [contxt] */N/* */D/* id = identifier longword to convert, or zero to */B/* find all identifiers (wildcarding) */H/* namlen = address of a word to store the length of the */B/* identifier name */H/* nambuf = addr+ess of a character string descriptor that */B/* describes the buffer to return the identifier name */G/* resid = address of a longword to return the id found */B/* while wildcarding */H/* attrib = address to return the attributes longword */H/* contxt = address of a longword containing the record stream */B/* context. initially should be zero, value output */B/* on first call, v+alue input on subsequent calls. */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif!#define sys$idtoasc SYS$IDTOASC #ifdef __NEW_STARLETint sys$idtoasc( unsigned int id, unsigned short int *namlen, void *nambuf, unsigned int *resid, unsigned int *attrib, unsigned int *contxt);#else /* __OLD_STARLET */"int sys$idtoasc(__unknown_params);!#endif /* #i +fdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $IEEE_SET_FP_CONTROL */N/* */N/* Set IEEE floating point control register */N/* +*/I/* $IEEE_SET_FP_CONTROL [clrmsk], [setmsk], [prvmsk] */N/* */H/* clrmsk = address of a quadword mask to clear */H/* setmsk = address of a quadword mask to set */H/* prvmsk = address of a quadword to return previous value */N/* */ 9#define sys$ieee_set_fp_control SYS$IE+EE_SET_FP_CONTROL 9#ifdef __cplusplus /* Define structure prototypes */ struct _ieee; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ieee_set_fp_control( struct _ieee *clrmsk, struct _ieee *setmsk, struct _ieee *prvmsk);#else /* __OLD_STARLET */.int sys$ieee_set_fp_control(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $IMGACT */N/* + */N/* Image Activation */N/* */M/* $IMGACT name,[dflnam],hdrbuf,[imgctl],[inadr], */B/* [retadr], [ident], [acmode] */N/* */N/* */J/* , name = address of descriptor for file name string */N/* */L/* dflnam = descriptor for file name string */N/* */L/* hdrbuf = address of 512 byte buffer to write in */N/* */L/* imgctl = image activation contr,ol flags */N/* */K/* inadr = address of quadword specifying virtual address */B/* range to be mapped */N/* */L/* retadr = address of quadword specifying virtual address */B/* range actually mapped */N/* , */K/* ident = address of quadword holding image section match */B/* control and identifier */N/* */L/* acmode = access mode to be the owner of the created pages */N/* */ #define sys$imgact SYS$IMGACT 9#ifdef __cplus,plus /* Define structure prototypes */struct _va_range;struct _secid; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$imgact( void *name, void *dflnam, void *hdrbuf, unsigned int imgctl, struct _va_range *inadr, struct _va_range *retadr, struct _secid *ident, unsigned int acmode);#else /* __OLD_STARLET */!int sys$imgact(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $IMGFIX , */N/* */N/* Image Address Fixup Service */N/* */N/* $IMGFIX */N/* */#define sys$imgfix SYS$IMGFIX#ifdef __NEW_STARLETint sys$imgfix(void);#else /* __OLD ,_STARLET */int sys$imgfix(void);!#endif /* #ifdef __NEW_STARLET */N/* $INIT_VOL */N/* */N/* Initialize Volume */N/* */N/* $INIT_VOL devnam, volnam, [itmlst] */N/* , */N/* devnam = device name containing volume to initialize */N/* */N/* volnam = name to initialize the volume with */N/* */N/* itmlst = address of item code list for initialization options */N/* , */ ##define sys$init_vol SYS$INIT_VOL#ifdef __NEW_STARLETint sys$init_vol( void *devnam, void *volnam, void *itmlst);#else /* __OLD_STARLET */#int sys$init_vol(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $IO_CLEANUP */N/* */N/* Cleanup a previously set-up I/O */N/* , */I/* $IO_CLEANUP fandle */N/* */I/* fandle = fandle to clean up */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif  '#define sys$io_cleanup S ,YS$IO_CLEANUP#ifdef __NEW_STARLETint sys$io_cleanup( unsigned __int64 fandl);#else /* __OLD_STARLET */%int sys$io_cleanup(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $IO_FASTPATH */N/* */N/* I/O Fastpath system service  , */N/* */I/* $IO_FASTPATH efn, cpu_mask, func, iosb, astadr, astprm */N/* */>/* efn = event flag number */N/* */B/* cpu_mask = either -1 wildcard or pointer to longword */;/* containing CPU mask  , */=/* FP$K_BALANCE_PORTS = balance fastpath ports */N/* */?/* func = fastpath function code */N/* */?/* iosb = address of I/O status block */N/* */A/* astadr = address of AST completion routine  , */N/* */A/* astprm = AST routine parameter */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif )#define sys$io_fastpath SYS$IO_FASTPATH 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_S ,TARLETint sys$io_fastpath( unsigned int efn, unsigned int cpu_mask, unsigned int func, struct _iosb *iosb," void (*astadr)(__unknown_params), unsigned __int64 astprm, __optional_params);#else /* __OLD_STARLET */&int sys$io_fastpath(__unknown_params);!#endif /* #ifdef __NEW_STARLET */+#define sys$io_fastpathw SYS$IO_FASTPATHW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sy,s$io_fastpathw( unsigned int efn, unsigned int cpu_mask, unsigned int func, struct _iosb *iosb," void (*astadr)(__unknown_params), unsigned __int64 astprm, __optional_params);#else /* __OLD_STARLET */'int sys$io_fastpathw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $IO_PERFORM */N/* , */N/* Transfer data between device and buffer */N/* */I/* $IO_PERFORM fandle, chan, iosadr, bufadr, buflen, devdata */I/* ($IO_PERFORMW) */N/* */I/* fandle = fandle from previous $IO_SETUP , */N/* */I/* chan = standard I/O channel */N/* */I/* iosadr = IOSA address */N/* */I/* bufadr = address of data buffer (64 bits) */N/* , */I/* buflen = length of data buffer (64 bits) */N/* */I/* devdata= data passed to driver, e.g., media address */N/* */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer,_size __long#endif '#define sys$io_perform SYS$IO_PERFORM 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$io_perform( unsigned __int64 fandl, unsigned short int chan, struct _iosa *iosadr, void *bufadr, unsigned __int64 buflen, unsigned __int64 devdata);#else /* __OLD_STARLET */%int sys$io_perform(__unknown_params);!#endif /* #ifdef __NEW_STARLET */)#define sys$io_perf,ormw SYS$IO_PERFORMW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$io_performw( unsigned __int64 fandl, unsigned short int chan, struct _iosa *iosadr, void *bufadr, unsigned __int64 buflen, unsigned __int64 devdata);#else /* __OLD_STARLET */&int sys$io_performw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __requir,ed_pointer_size __short#endifN/* $IO_SETUP */N/* */N/* Set up a fast I/O */N/* */I/* $IO_SETUP func, bufobj, iosobj, astadr, flags, return_fandle */N/* ,*/I/* func = function code */N/* */I/* bufobj = data buffer object (address of (vector of 2 ints)) */N/* */I/* iosobj = IOSA buffer object (address of (vector of 2 ints)) */N/* */I/* astadr = completion AST address , (address of entry) */N/* */I/* flags = flags */N/* */I/* return_fandle = address of returned fandle */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __lo,ng#endif   ##define sys$io_setup SYS$IO_SETUP 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$io_setup( unsigned int func, struct _generic_64 *bufobj, struct _generic_64 *iosobj, void (*astadr)( struct _iosa *), unsigned int flags," unsigned __int64 *return_fandle);#else /* __OLD_STARLET */#int sys$io_setup(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ ,  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $IPC */N/* */N/* Interprocess Communication Request */N/* */N/* $IPC [efn] ,func ,ipcb ,[astadr] ,[astprm] */N/* ($IPCW), */N/* */N/* efn = number of event flag to set on completion */N/* */N/* func = function code specifying action to be performed */N/* */N/* ipcb = address of Interprocess ,Communication Block */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine as argument */N/* */N/* , */ #define sys$ipc SYS$IPC#ifdef __NEW_STARLET int sys$ipc( unsigned int efn, unsigned short int func, void *ipcb," void (*astadr)(__unknown_params), int astprm, __optional_params);#else /* __OLD_STARLET */int sys$ipc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#define sys$ipcw SYS$IPCW #ifdef __NEW_STARLET int sys$ipcw( unsigned int efn, unsigned short int func, void *ipcb," void (*astadr)(__unknown_params), int astprm, __optiona ,l_params);#else /* __OLD_STARLET */int sys$ipcw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $LCKPAG */N/* */N/* Lock Pages in Memory */N/* */N/* $LCKPAG inadr ,[retadr] ,[acmode] , */N/* */N/* inadr = address of 2-longword array containing starting and */N/* ending addresses of pages to be locked */N/* */N/* retadr = address of 2-longword array to receive addresses of */N/* pages actually locked */N/* , */N/* acmode = access mode to check against the owner of the pages */N/* */ #define sys$lckpag SYS$LCKPAG 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$lckpag( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode);#els ,e /* __OLD_STARLET */!int sys$lckpag(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $LCKPAG_64 */N/* */N/* Lock Pages in Memory */N/* */T/* $LCKPAG_64 start_va_64, length_64, acmode, return_va_64, return_length_64 */N ,/* */E/* start_va_64 = Starting address of address space to lock */N/* */G/* length_64 = Byte length of addresses to lock */N/* */G/* acmode = Access mode to be checked against the page owner */N/* !, */J/* return_va_64 = Address of address space locked */N/* */J/* return_length_64 = Length of address space locked */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$lckpag_64 SYS$LCKPAG_64#ifdef __NEW_STARLETint sys$lc",kpag_64( void *start_va_64, unsigned __int64 length_64, unsigned int acmode, void *(*(return_va_64)),% unsigned __int64 *return_length_64);#else /* __OLD_STARLET */$int sys$lckpag_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $LFS */N/* #,*/N/* Call the LFS file system */N/* */N/* $LFS [efn] ,func ,fsb ,[astadr] ,[astprm] */N/* */N/* efn = number of event flag to set on completion */N/* */N/* func = functi$,on code specifying action to be performed */N/* */N/* fsb = address of File System Block */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routin%,e as argument */N/* */ #define sys$lfs SYS$LFS#ifdef __NEW_STARLET int sys$lfs( unsigned int efn, unsigned short int func, void *fsb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */int sys$lfs(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $LKWSET */N/* &, */N/* Lock Pages in Working Set */N/* */N/* $LKWSET inadr ,[retadr] ,[acmode] */N/* */N/* inadr = address of 2-longword array containing starting and */N/* ending virtual addresses of pages to be lo ',cked */N/* */N/* retadr = address of a 2-longword array to receive starting and */N/* ending virtual addresses of pages actually locked */N/* */N/* acmode = access mode to be checked against the page owner */N/* */ (,#define sys$lkwset SYS$LKWSET 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$lkwset( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode);#else /* __OLD_STARLET */!int sys$lkwset(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $LKWSET_64 */N/* ), */N/* Lock Pages in Working Set */N/* */T/* $LKWSET_64 start_va_64, length_64, acmode, return_va_64, return_length_64 */N/* */E/* start_va_64 = Starting address of address space to lock */N/* *, */G/* length_64 = Byte length of addresses to lock */N/* */G/* acmode = Access mode to be checked against the page owner */N/* */J/* return_va_64 = Address of address space locked */N/* */J/* return_length_64 = Length of add+,ress space locked */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$lkwset_64 SYS$LKWSET_64#ifdef __NEW_STARLETint sys$lkwset_64( void *start_va_64, unsigned __int64 length_64, unsigned int acmode, void *(*(return_va_64)),% unsigned __int64 *return_length_64);#else /* __OLD_STARLET */$int sys$lkwset_64(__unknown_params);!#endif ,, /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $LOOKUP_MAPPING */N/* */N/* Find single Mapping record in Mapping database */N/* -, */N/* $LOOKUP_MAPPING initmlst ,[outitmlst] */N/* */N/* initmlst = address of a list of item descriptors for the operation */N/* outitmlst = address of a list of item descriptors for the operation */N/* */ /#define sys$lookup_mapping SYS$LOOKUP_MAPPING#ifdef __NEW_STARLETint sys$look .,up_mapping( void *initmlst, void *outitmlst);#else /* __OLD_STARLET */)int sys$lookup_mapping(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $MGBLSC */N/* */N/* Map Global Section */N/* */P/* $MGBLSC inadr /,,[retadr] ,[acmode] ,[flags] ,gsdnam ,[ident] ,[relpag] */N/* */N/* inadr = address of 2-longword array containing starting and */N/* ending addresses of pages to be mapped */N/* */N/* retadr = address of 2-longword array to receive virtual */N/* addresses of pages mapped 0, */N/* */N/* acmode = access mode of owner of mapped pages */N/* */N/* flags = flags overriding default section characteristics */N/* */N/* Flag Meaning 1, */N/* */N/* SEC$M_WRT Read/write section */N/* SEC$M_SYSGBL System global section */N/* SEC$M_EXPREG Find first available space */N/* */N/* gsdnam = address of global section name descriptor */N/* 2, */N/* ident = address of quadword containing version id and match control */N/* */N/* relpag = relative page number within global section */N/* */ #define sys$mgblsc SYS$MGBLSC 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range;st3,ruct _secid; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$mgblsc( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode, unsigned int flags, void *gsdnam, struct _secid *ident, unsigned int relpag);#else /* __OLD_STARLET */!int sys$mgblsc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $MGBLSC_64 */N/* 4, */N/* Map Global Page or Disk File Section */N/* */N/* $MGBLSC_64 gsdnam_64, ident_64, region_id_64, section_offset_64, */B/* length_64, acmode, flags, return_va_64, return_length_64 */B/* [, start_va_64[, page_prot]] */N/* */D/* gsdnam_64 = Address of global 5,section name string descriptor */</* (32-bit or 64-bit descriptor) */N/* */S/* ident_64 = Address of quadword containing version id and match control */N/* */G/* region_id_64 = Address of quadword region id */N/* */N/* secti6,on_offset_64 = Relative byte within global section to start mapping */N/* */G/* length_64 = Byte length of section to map */N/* */G/* acmode = Access mode of owner of mapped pages */N/* */G/* flags = Flags overriding default se7,ction characteristics */N/* */G/* Flag Meaning */N/* */G/* SEC$M_EXPREG Find first available space */D/* SEC$M_NO_OVERMAP Do not overmap existing address space */G/* SEC$M_SYSGBL System global section */H/* SEC$M_WRT 8,Read/write mapping of section */N/* */J/* return_va_64 = Address of address space created */N/* */J/* return_length_64 = Length of address space created */N/* */E/* start_va_64 = Starting address of address space to create 9, */N/* */C/* page_prot = Desired page protection (optional) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$mgblsc_64 SYS$MGBLSC_64 9#ifdef __cplusplus /* Define structure prototypes */struct _secid;struct _generic_64; #endif /* #ifdef __cplusplus */ #i:,fdef __NEW_STARLETint sys$mgblsc_64( void *gsdnam_64, struct _secid *ident_64," struct _generic_64 *region_id_64,$ unsigned __int64 section_offset_64, unsigned __int64 length_64, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params );#else /* __OLD_STARLET */$int sys$mgblsc_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_siz ;,e __short#endifN/* $MGBLSC_GPFN_64 */N/* */N/* Map Global Page Frame Section */N/* */X/* $MGBLSC_GPFN_64 gsdnam_64, ident_64, region_id_64, relative_page, page_count, */;/* acmode, flags, return_va_64, return_length_64 */;/* [, start_<,va_64[, page_prot]] */N/* */D/* gsdnam_64 = Address of global section name string descriptor */</* (32-bit or 64-bit descriptor) */N/* */S/* ident_64 = Address of quadword containing version id and match control */N/* */G=,/* region_id_64 = Address of quadword region id */N/* */K/* relative_page = Relative page within global section to start mapping */N/* */D/* page_count = Number of page frames to map */N/* */G/* acmode = Access mode of owner of m>,apped pages */N/* */G/* flags = Flags overriding default section characteristics */N/* */G/* Flag Meaning */N/* */G/* SEC$M_EXPREG Find first available space */D/* SEC$M_NO_O?,VERMAP Do not overmap existing address space */G/* SEC$M_SYSGBL System global section */H/* SEC$M_WRT Read/write mapping of section */N/* */J/* return_va_64 = Address of address space created */N/* */J/* return_length_64 = Length of address space created @, */N/* */E/* start_va_64 = Starting address of address space to create */N/* */C/* page_prot = Desired page protection (optional) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif /#define sys$mgblsc_gpfn_6A,4 SYS$MGBLSC_GPFN_64 9#ifdef __cplusplus /* Define structure prototypes */struct _secid;struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$mgblsc_gpfn_64( void *gsdnam_64, struct _secid *ident_64," struct _generic_64 *region_id_64, unsigned __int64 relative_page, unsigned __int64 page_count, unsigned int acmode, unsigned int flags, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params );#else B,/* __OLD_STARLET */)int sys$mgblsc_gpfn_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $MODIFY */N/* */N/* Modify File C, */N/* */N/* $MODIFY fab, [err], [suc] */N/* */J/* fab = address of fab */N/* */E/* err = address of user error completion routine */N/* D, */E/* suc = address of user success completion routine */N/* */ #define sys$modify SYS$MODIFY 9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$modify( struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */!int sys$modify(__unknown_p E,arams);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $MODIFY_MAPPING */N/* */N/* Modify Mapping record in Mapping database */N/* */N/* $MODIFY_MAPPING initmlst, moditmlst F, */N/* */N/* initmlst = address of a list of item descriptors for the operation */N/* moditmlst = address of a list of item descriptors for the operation */N/* */ /#define sys$modify_mapping SYS$MODIFY_MAPPING#ifdef __NEW_STARLETint sys$modify_mapping( void *initmlst, void *moditmlst);#else /* __OLD_STARLET G, */)int sys$modify_mapping(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $MOD_HOLDER */N/* */N/* Modify Holder Record In Rights Database */N/* */I/* $MOD_HOLDER iH,d, holder, [set_attrib], [clr_attrib] */N/* */D/* id = identifier longword */H/* holder = address of the holder identifier quadword */I/* set_attrib = longword containing the attributes to set */B/* into the holder record */I/* clr_attrib = longword containing the attributes to clear */B/*I, in the holder record */N/* */ '#define sys$mod_holder SYS$MOD_HOLDER 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$mod_holder( unsigned int id, struct _generic_64 *holder, unsigned int set_attrib, unsigned int clr_attrib);#else /* __OLD_STARLET */%int sys$mod_ J,holder(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $MOD_IDENT */N/* */N/* Modify Identifier Record In Rights Database */N/* */I/* $MOD_IDENT id, [set_attrib], [clr_aK,ttrib], [new_name], [new_value] */N/* */D/* id = identifier longword */I/* set_attrib = longword containing the attributes */B/* to set into the identifier record */I/* clr_attrib = longword containing the attributes */B/* to clear in the identifier record */I/* new_name = address of theL, new identifier name character */N/* string descriptor */I/* new_value = new identifier value longword */N/* */%#define sys$mod_ident SYS$MOD_IDENT #ifdef __NEW_STARLETint sys$mod_ident( unsigned int id, unsigned int set_attrib, unsigned int clr_attrib, void *new_name, unsigned int new_value);#else /* __OLD_S M,TARLET */$int sys$mod_ident(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $MOUNT */N/* */N/* Mount Volume */N/* */N/* $MOUNT itmlst */N/* N, */N/* itmlst = Address of a list of item identifiers */N/* */ #define sys$mount SYS$MOUNT#ifdef __NEW_STARLETint sys$mount( void *itmlst);#else /* __OLD_STARLET */ int sys$mount(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $MTACCESS */N/* O, */N/* Installation specific accessibility routine */N/* */N/* $MTACCESS lblnam, [uic], [std_version], [access_char], */I/* [access_spec],type */N/* */N/* lblnam = On input this field is tP,he address of the */B/* VOL1 or HDR1 label read off the magnetic tape. On */B/* output of labels this field is zero. The type */B/* of label is determined by the TYPE field. */M/* uic = This field contains the longword volme UIC passed */B/* by value. */N/* std_version = This field contains a byte value of the */B/* decimal equivalent of the vQ,ersion number */B/* gotten from the VOL1 label, passed by value. */N/* access_char = This field contins the byte value of the */B/* accessibility character specified by the user, */B/* passed by value. For output of labels only. */N/* access_spec = This field determines if the character passed */B/* in ACCESS_CHAR was specified by user, passed */B/* by value. It must contain one ofR, the following */B/* values: */;/* MTA$K_CHARVALID = YES */;/* MTA$K_NOCHAR = NO */C/* For output of labels only. */N/* type = This field contains the type of accessibility to process, */I/* passed by value. It must contain one of the following */I/* values: S, */;/* MTA$K_INVOL1 = Input a VOL1 label */;/* MTA$K_INHDR1 = Input a HDR1 label */;/* MTA$K_OUTVOL1 = Output a VOL1 label */;/* MTA$K_OUTHDR1 = Output a HDR1 label */N/* */ ##define sys$mtaccess SYS$MTACCESS#ifdef __NEW_STARLETint sys$mtaccess( unsigned int *lblnam, unsigned int uic, unsigned int std_version, unsigne T,d int access_char, unsigned int access_spec, unsigned int type);#else /* __OLD_STARLET */#int sys$mtaccess(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $NUMTIM */N/* */N/* Convert Binary Time to Numeric Time */N/* */N/* $NUU,MTIM timbuf ,[timadr] */N/* */N/* timbuf = address of a 7-word buffer to receive numeric time */N/* information */N/* */N/* timadr = address of a quadword containing the 64-bit time. If */N/* 0, use current time V, */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$numtim SYS$NUMTIM  9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$numtim( unsigned short int timbuf [7], struct _generic_64 *timadr);#else /* __OLD_STARLET */!in W,t sys$numtim(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* */N/* $NUMUTC */N/* */N/* Convert UTC Binary Time to Numeric Time */N/* X, */N/* $NUMUTC timbuf ,[utcadr] */N/* */N/* timbuf = address of a 11-word buffer to receive numeric time */N/* information */N/* */5/* 31 0 */LY,/* +---------------+---------------+ */I/* | month of year | year since 0 | 7 word Date (ala NUMTIM) */I/* +---------------+---------------+ */I/* | hour of day | day of month | */I/* +---------------+---------------+ */I/* | sec. of min. | min. of hour | */I/* +---------------+---------------+ Z, */E/* | iDays | hund of Sec | */N/* +---------------+---------------+ */N/* | imins | ihours | 6 word Inaccuracy */N/* +---------------+---------------+ */N/* | ihund of sec | isecs | */N/* +---------------+---------------+ */;/* [,| TDF in Min | */;/* +---------------+ */N/* */N/* utcadr = address of a utc_date_time to convert. */N/* 0, use current time */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size \,__long#endif#define sys$numutc SYS$NUMUTC #ifdef __NEW_STARLETint sys$numutc( unsigned short int timbuf [13], unsigned int utcadr [4]);#else /* __OLD_STARLET */!int sys$numutc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* */N/* $NXTVOL */N/* ], */N/* Go to Next Volume */N/* */N/* $NXTVOL rab, [err], [suc] */N/* */J/* rab = address of rab */N/* ^, */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$nxtvol SYS$NXTVOL 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ _,#ifdef __NEW_STARLETint sys$nxtvol( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */!int sys$nxtvol(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $OPEN */N/* */N/* Open File `, */N/* */N/* $OPEN fab, [err], [suc] */N/* */J/* fab = address of fab */N/* */E/* err = address of user error completion routine */N/* a, */E/* suc = address of user success completion routine */ #define sys$open SYS$OPEN 9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$open( struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */int sys$open(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* b, */N/* $PARSE */N/* */N/* Parse File Name */N/* */N/* $PARSE fab, [err], [suc] */N/* c, */J/* fab = address of fab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$parse SYS$PAd,RSE 9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$parse( struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */ int sys$parse(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $PARSE_ACL */N/* e, */N/* Parse an Access Control list Entry */N/* */I/* $PARSE_ACL acl-string ,acl-entry ,[error-position], */B/* [bit-names], [routin] */N/* */D/* acl-string = address of a descriptor of a buffer which */;/*f, contains the text to be parsed */N/* */C/* acl-entry = address of a descriptor of a buffer into */;/* which the converted ACE is to be written */N/* */H/* error-position = address of a word to receive the number of */;/* characters actually processed by the service. */;/* If the serv g,ice fails, this count points to */;/* the failing point in the input string. */N/* */C/* bit-names = address of a access bit name table (32 entries) */N/* */A/* routin = address of routine to be executed in kernel mode */N/* */ %#define sys$parseh,_acl SYS$PARSE_ACL#ifdef __NEW_STARLETint sys$parse_acl( void *aclstr, void *aclent, unsigned short int *errpos, void *accnam, int (*routin)(void));#else /* __OLD_STARLET */$int sys$parse_acl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ G/* $PARSE_CLASS itmlst, [routin] */N/* */N/* Parse access class strings */Ni,/* */N/* itmlst = address of a list of item descriptors */N/* */N/* routin = address of routine to be executed in kernel mode */N/* */N/* */ )#define sys$parse_cla j,ss SYS$PARSE_CLASS#ifdef __NEW_STARLETint sys$parse_class( void *itmlst, int (*routin)(void));#else /* __OLD_STARLET */&int sys$parse_class(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $PERSONA_CREATE */N/* */N/* Create Persona */N/* k, */N/* $PERSONA_CREATE persona, [usrnam], [flags], [usrpro], [itmlst] */N/* */G/* persona = address of longword holding persona identifier */N/* */G/* usrnam = address of user name descriptor */N/* */G/* fll,ags = bitvector value */N/* */e/* usrpro = address of a descriptor pointing to a user profile block (TLV structure) */N/* */N/* itmlst = address of item list for modifications to persona */N/* *//#define sys$persom,na_create SYS$PERSONA_CREATE #ifdef __NEW_STARLETint sys$persona_create( unsigned int *persona, void *usrnam, unsigned int flags, __optional_params );#else /* __OLD_STARLET */)int sys$persona_create(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $PERSONA_CREATE_INT */N/* */N/* Create Persona Internal Service n, */N/* */N/* $PERSONA_CREATE_INT persona, itmlst */N/* */N/* persona = address of longword holding persona identifier */N/* */N/* itmlst = address of item list containing persona data */N/* o, */7#define sys$persona_create_int SYS$PERSONA_CREATE_INT #ifdef __NEW_STARLETint sys$persona_create_int( unsigned int *persona, unsigned int *itmlst);#else /* __OLD_STARLET */-int sys$persona_create_int(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $PERSONA_ASSUME */N/* */p,N/* Assume Persona */N/* */N/* $PERSONA_ASSUME persona, [flags], [previous], [acmode] */N/* */N/* persona = address of longword holding persona identifier */N/* */N/* flags q,= longword value */N/* */W/* previous = address of longword to receive previous persona identifier */N/* */N/* acmode = access mode of code assuming persona */N/* */N/* r, *//#define sys$persona_assume SYS$PERSONA_ASSUME #ifdef __NEW_STARLETint sys$persona_assume( unsigned int *persona, unsigned int flags, __optional_params );#else /* __OLD_STARLET */)int sys$persona_assume(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $PERSONA_DELETE */N/* */N/* Delete Persona s, */N/* */N/* $PERSONA_DELETE persona */N/* */N/* persona = address of longword holding persona identifier */N/* *//#define sys$persona_delete SYS$PERSONA_DELETE t, #ifdef __NEW_STARLETint sys$persona_delete( unsigned int *persona);#else /* __OLD_STARLET */)int sys$persona_delete(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $PERSONA_EXPORT_ARB */N/* */N/* Move Persona data to ARB structures */N/* */ u,N/* $PERSONA_EXPORT_ARB [level] */N/* */N/* level = level of ARB_SUPPORT to be provided */N/* */7#define sys$persona_export_arb SYS$PERSONA_EXPORT_ARB #ifdef __NEW_STARLETint sys$persona_export_arb( int level);#else /* __OLD_STARLET */-int sys$persona_export_arb(_v,_unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $PERSONA_IMPORT_ARB */N/* */N/* Load Persona Block with ARB structures data */N/* */N/* $PERSONA_IMPORT_ARB [level] */N/* w, */N/* level = level of ARB_SUPPORT to be provided */N/* */7#define sys$persona_import_arb SYS$PERSONA_IMPORT_ARB #ifdef __NEW_STARLETint sys$persona_import_arb( int level);#else /* __OLD_STARLET */-int sys$persona_import_arb(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $PERSONA_CLONE x,*/N/* */N/* Create duplicate Persona block */N/* */N/* $PERSONA_CLONE persona */N/* */Q/* persona = address of location in which to store the persona id */N/* y, of the clone. */N/* */S/* input_id = address of location containing the persona ID to clone */N/* OPTIONAL! */N/* */-#define sys$persona_clone SYS$PERSONA_CLONE #ifdef __NEW_STARLETint sys$persona_clone( unsigned int *perso z,na, __optional_params);#else /* __OLD_STARLET */(int sys$persona_clone(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* */N/* $PROCESS_AFFINITY */N/* */N/* Modify process affinity {, */N/* */m/* $PROCESS_AFFINITY [pidadr],[prcnam],[select_mask],[modify_mask],[prev_mask],[flags],[mask_length] */N/* */N/* pidadr = address of process identification of process for */N/* which affinity is to be changed */N/* prcnam = address of process name s|,tring descriptor */I/* select_mask = address of bitmask indicating which capabilities */B/* are to be involved in the specified operation */I/* modify_mask = address of bitmask indicating final state */B/* of those capabilities specified in select_mask */I/* prev_mask = address of user quadword that will hold the */B/* previous states of the individual capabilities */I/* flags = address of behavioral fla},gs for this operation */I/* mask_length = address of user longword that will hold the */B/* common length of all bitmaps - select,modify,prev */N/* */ 3#define sys$process_affinity SYS$PROCESS_AFFINITY 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$process_affinity( unsigned ~,int *pidadr, void *prcnam,! struct _generic_64 *select_mask,! struct _generic_64 *modify_mask, struct _generic_64 *prev_mask, struct _generic_64 *flags, __optional_params);#else /* __OLD_STARLET */+int sys$process_affinity(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* , */N/* $PROCESS_CAPABILITIES */N/* */N/* Modify process user capabilities */N/* */c/* $PROCESS_CAPABILITIES [pidadr],[prcnam],[select_mask],[modify_mask],[prev_mask],[flags] */N/* , */N/* pidadr = address of process identification of process for */N/* which capabilities are to be modified */N/* prcnam = address of process name string descriptor */I/* select_mask = address of bitmask indicating which capabilities */B/* are to be involved in the specified operation */I/* modify_mask = address of bitmask indicating final state */B/* ,of those capabilities specified in select_mask */I/* prev_mask = address of user quadword that will hold the */B/* previous states of the individual capabilities */I/* flags = address of behavioral flags for this operation */N/* */ ;#define sys$process_capabilities SYS$PROCESS_CAPABILITIES 9#ifdef __cplusplus /* Define structure prototypes */struct _gene,ric_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$process_capabilities( unsigned int *pidadr, void *prcnam,! struct _generic_64 *select_mask,! struct _generic_64 *modify_mask, struct _generic_64 *prev_mask, struct _generic_64 *flags);#else /* __OLD_STARLET *//int sys$process_capabilities(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $PROCESS_SCAN , */N/* */N/* Initialize Process_scan context */N/* */N/* $Process_scan pidctx , [itmlst ] */N/* */N/* pidctx = address of process ctx id , */N/* */N/* itmlst = address of a list of item descriptors */N/* */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif+#define sys$process_scan SYS$PROCESS_SCAN #ifdef __NEW_STARLET,int sys$process_scan( unsigned int *pidctx, void *itmlst);#else /* __OLD_STARLET */'int sys$process_scan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $PSHARED_REGISTER */N/* */N/* Register a process and global section */N/* , */N/* $PSHARED_REGISTER addr */N/* */N/* addr = base address of the global section to be registered */ 3#define sys$pshared_register SYS$PSHARED_REGISTER#ifdef __NEW_STARLETint sys$pshared_register( unsigned __int64 addr);#else /* __OLD_STARLET */+int sys$pshared_register(__unkno,wn_params);!#endif /* #ifdef __NEW_STARLET */N/* $PURGE_WS */N/* */N/* Purge Working Set */N/* */N/* $PURGE_WS start_va_64, length_64 */N/* , */E/* start_va_64 = Starting address of address space to purge */N/* */G/* length_64 = Byte length of addresses to purge */N/* */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif  ##def,ine sys$purge_ws SYS$PURGE_WS#ifdef __NEW_STARLETint sys$purge_ws( void *start_va_64, unsigned __int64 length_64);#else /* __OLD_STARLET */#int sys$purge_ws(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $PURGWS */N/* */N/* Purge Working Set , */N/* */N/* $PURGWS inadr */N/* */N/* inadr = address of 2-longword array containing starting and */N/* ending addresses of pages to be removed */N/* , */ #define sys$purgws SYS$PURGWS 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$purgws( struct _va_range *inadr);#else /* __OLD_STARLET */!int sys$purgws(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $PUT , */N/* */N/* Put Record to File */N/* */N/* $PUT rab, [err], [suc] */N/* */J/* rab = address of rab */N/* , */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$put SYS$PUT 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusp,lus */ #ifdef __NEW_STARLET int sys$put( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */int sys$put(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $PUTMSG */N/* */N/* Put Message */N/* , */N/* $PUTMSG msgvec ,[actrtn] ,[facnam], [actprm] */N/* */N/* msgvec = address of message argument vector */N/* */N/* actrtn = address of entry mask of action routine */N/* */N/* facnam ,= address of facility name string descriptor */N/* */N/* actprm = parameter to pass to action routine */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$putmsg SYS$PUTMSG#ifdef __NEW_STARLETint sys$putmsg( void *msgvec," void (*actrtn)(__unkn,own_params), void *facnam, unsigned __int64 actprm);#else /* __OLD_STARLET */!int sys$putmsg(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $QIO */N/* */N/* Queue I/O Request */N/* , */N/* $QIO [efn] ,chan ,func ,[iosb] ,[astadr] ,[astprm] */N/* ($QIOW) ,[p1] ,[p2] ,[p3] ,[p4] ,[p5] ,[p6] */N/* */N/* efn = number of event flag to set on completion */N/* */N/* chan = number of channel on whi,ch I/O is directed */N/* */N/* func = function code specifying action to be performed */N/* */N/* iosb = address of quadword I/O status block to receive final */N/* completion status */N/* , */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine as argument */N/* */N/* p1... = optional device- and function-specific parameters */N/* */ #ifdef _,_INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$qio SYS$QIO 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$qio( unsigned int efn, unsigned short int chan, unsigned int func, struct _iosb *iosb," void (*astadr)(__unknown_params), __int64 astprm, void *p1, __int64 p2, __int64 p3, __int64 p4, __int64 p5, __int64 p6);#else /* __OLD_STA,RLET */int sys$qio(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#define sys$qiow SYS$QIOW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$qiow( unsigned int efn, unsigned short int chan, unsigned int func, struct _iosb *iosb," void (*astadr)(__unknown_params), __int64 astprm, void *p1, __int64 p2, __int64 p3, __int64 p4, __int64 p5, __int64 p6);#else /*, __OLD_STARLET */int sys$qiow(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $READ */N/* */N/* Read Block from File */N/*, */N/* $READ rab, [err], [suc] */N/* */J/* rab = address of rab */N/* */E/* err = address of user error completion routine */N/* , */E/* suc = address of user success completion routine */N/* */ #define sys$read SYS$READ 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET int sys$read( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */int sys$read(__unknown_params);!#endif /* ,#ifdef __NEW_STARLET */ N/* $READEF */N/* */N/* Read Event Flag */N/* */N/* $READEF efn ,state */N/* ,*/N/* efn = event flag number of any flag in the cluster */N/* */N/* state = address of a longword to receive current state of all */N/* flags in the cluster */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$reade,f SYS$READEF #ifdef __NEW_STARLETint sys$readef( unsigned int efn, unsigned int *state);#else /* __OLD_STARLET */!int sys$readef(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* */N/* $READ_THREAD_UNQ */N/* , */N/* Read thread unique value */N/* */N/* $READ_THREAD_UNQ contxt */N/* */M/* contxt = address of quadword in which to return the */B/* thread unique value */N/* , */ 1#define sys$read_thread_unq SYS$READ_THREAD_UNQ 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$read_thread_unq( struct _generic_64 *contxt);#else /* __OLD_STARLET */*int sys$read_thread_unq(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* , */N/* $REGISTRY */N/* */N/* Interface to the Registry Database */N/* */C/* $REGISTRY [efn], func, [ntcredentials], itmlst, [iosb] */;/* [,astadr] [,astprm] [,timeout] */I/* ($REGISTRYW) , */N/* */>/* efn = event flag to be set at completion */N/* */?/* func = function code specifying action to be performed */N/* */N/* ntcredentials = address of an NT user credentials buffer */N/* , */A/* itmlst = address of a list of item descriptors */N/* */?/* iosb = address of a quadword I/O status block */N/* */A/* astadr = address of entry mask of AST routine */N/* */A/* ast,prm = value to be passed to AST routine */N/* */B/* timeout = request timeout value */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif##define sys$registry SYS$REGISTRY  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /*, #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$registry( unsigned int efn, unsigned int func, void *ntcredentials, void *itmlst, struct _iosb *iosb, __optional_params );#else /* __OLD_STARLET */#int sys$registry(__unknown_params);!#endif /* #ifdef __NEW_STARLET */%#define sys$registryw SYS$REGISTRYW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$registryw(, unsigned int efn, unsigned int func, void *ntcredentials, void *itmlst, struct _iosb *iosb, __optional_params );#else /* __OLD_STARLET */$int sys$registryw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* */N/* $RELEASE */N/* , */N/* Release Record */N/* */N/* $RELEASE rab, [err], [suc] */N/* */J/* rab = address of rab */N/* , */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ !#define sys$release SYS$RELEASE 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET ,int sys$release( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */"int sys$release(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $RELEASE_LICENSE */N/* */N/* Release authorization to execute licensed software product. */N/* , */I/* $RELEASE_LICENSE context */N/* */J/* contxt = address of context buffer returned by */B/* $grant_license (4 longwords) */N/* */ 1#define sys$release_license SYS$RELEASE_LICENSE#i ,fdef __NEW_STARLETint sys$release_license( unsigned int *contxt);#else /* __OLD_STARLET */*int sys$release_license(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $RELEASE_VP */N/* */N/* Release the Vector Processor */N/* , */I/* $RELEASE_VP */N/* */'#define sys$release_vp SYS$RELEASE_VP#ifdef __NEW_STARLETint sys$release_vp(void);#else /* __OLD_STARLET */int sys$release_vp(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $REL,EASE_VP_INT */N/* */N/* Release the Vector Processor, internal form */N/* */I/* $RELEASE_VP_INT */N/* *//#define sys$release_vp_int SYS$RELEA ,SE_VP_INT#ifdef __NEW_STARLETint sys$release_vp_int(void);#else /* __OLD_STARLET */int sys$release_vp_int(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $REMOVE */N/* */N/* Remove File */N/* , */N/* $REMOVE fab, [err], [suc] */N/* */J/* fab = address of fab */N/* */E/* err = address of user error completion routine */N/* , */E/* suc = address of user success completion routine */N/* */ #define sys$remove SYS$REMOVE 9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$remove( struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */!int sys$remove(__unknown_params);!#endif /* #ifdef __NEW_S ,TARLET */ N/* */N/* $REM_HOLDER */N/* */N/* Remove Holder Record From Rights Database */N/* */I/* $REM_HOLDER id, holder */N/* , */D/* id = identifier longword */H/* holder = address of the holder identifier quadword */N/* */ '#define sys$rem_holder SYS$REM_HOLDER 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$rem_holder( u ,nsigned int id, struct _generic_64 *holder);#else /* __OLD_STARLET */%int sys$rem_holder(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $REM_IDENT */N/* */N/* Remove Identifier From Rights Database */N/* , */I/* $REM_IDENT id */N/* */D/* id = identifier longword */N/* */ %#define sys$rem_ident SYS$REM_IDENT#ifdef __NEW_STARLETint sys$rem_ident( unsigned int id);#else /* __OLD_STARLET */$int sys$rem_id ,ent(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $RENAME */N/* */N/* Rename File */N/* */N/* $RENAME oldfab, [err], [suc], newf,ab */N/* */M/* oldfab = address of oldfab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* , */H/* newfab = address of new fab */ #define sys$rename SYS$RENAME 9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$rename( struct _fabdef *oldfab, void (*err)(__unknown_params), void (*suc)(__unknown_params), struct _fabdef *newfab);#else /* __OLD_STARLET */!int sys$ ,rename(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $RESTORE_VP_EXCEPTION */N/* */N/* Restore Vector Processor Exception State */N/* */G/* $RESTORE_VP_EXCEPTION excid , */N/* */J/* excid = address of a context longword */N/* */;#define sys$restore_vp_exception SYS$RESTORE_VP_EXCEPTION #ifdef __NEW_STARLETint sys$restore_vp_exception( unsigned int *excid);#else /* __OLD_STARLET *//int sys$restore_vp_exception(__unknown_params);!#endif /* #i,fdef __NEW_STARLET */N/* */N/* $RESTORE_VP_EXC_INT */N/* */N/* Restore Vector Processor Exception State */N/* */E/* $RESTORE_VP_EXC_INT excid */N/* , */J/* excid = address of a context longword */N/* */7#define sys$restore_vp_exc_int SYS$RESTORE_VP_EXC_INT #ifdef __NEW_STARLETint sys$restore_vp_exc_int( unsigned int *excid);#else /* __OLD_STARLET */-int sys$restore_vp_exc_int(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* , */N/* $RESTORE_VP_STATE */N/* */N/* Restore Mainline Vector State */N/* */I/* $RESTORE_VP_STATE */N/* , */3#define sys$restore_vp_state SYS$RESTORE_VP_STATE#ifdef __NEW_STARLETint sys$restore_vp_state(void);#else /* __OLD_STARLET */int sys$restore_vp_state(void);!#endif /* #ifdef __NEW_STARLET */N/* $RESUME */N/* */N/* Resume Suspended Process */N/* , */N/* $RESUME [pidadr] ,[prcnam] */N/* */N/* pidadr = address of process id of process to be resumed */N/* */N/* prcnam = address of process name string descriptor */N/* , */#define sys$resume SYS$RESUME #ifdef __NEW_STARLETint sys$resume( unsigned int *pidadr, void *prcnam);#else /* __OLD_STARLET */!int sys$resume(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $REVOKID */N/* */N/* Revoke Identifier from P,rocess */N/* */I/* $REVOKID [pidadr], [prcnam], [id], [name], [prvatr] [,segment] */N/* */I/* pidadr = address of PID of affected process */I/* prcnam = address of string descriptor of process name */I/* id = address of quadword identifier and attributes , */I/* name = address of string descriptor of identifier name */I/* prvatr = address to store attributes of superseded id */I/* segment = optional segment index, by value */N/* */ !#define sys$revokid SYS$REVOKID 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint ,sys$revokid( unsigned int *pidadr, void *prcnam, struct _generic_64 *id, void *name, unsigned int *prvatr, unsigned int segment);#else /* __OLD_STARLET */"int sys$revokid(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $REWIND */N/* */N/* Rewind File , */N/* */N/* $REWIND rab, [err], [suc] */N/* */J/* rab = address of rab */N/* */E/* err = address of user error completion routin,e */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$rewind SYS$REWIND 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$rewind( struct _rabdef *rab, __optional_params );#e ,lse /* __OLD_STARLET */!int sys$rewind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $RMSRUNDWN */N/* */N/* RMS rundown (close all files opened by OpenVMS RMS for */N/* the image or process and halts I/O activity. */N/* */N/* , $RMSRUNDWN buf-addr, type-value */N/* */N/* buf-addr = a descriptor pointing to a 22-byte buffer */N/* that is to receive the device identification */N/* (16 bytes) and the file identification (6 bytes) */N/* bytes) of an improperly closed output file. */N/* type-value = a single b ,yte code that specifies the type of */N/* I/O rundown to be performed. */%#define sys$rmsrundwn SYS$RMSRUNDWN #ifdef __NEW_STARLETint sys$rmsrundwn( void *bufaddr, unsigned char typevalue);#else /* __OLD_STARLET */$int sys$rmsrundwn(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $RUNDWN */N/* , */N/* Rundown Process */N/* */N/* $RUNDWN [acmode] */N/* */N/* acmode = access mode to rundown; this and all less */B/* privileged access modes are rundown */N/* , */#define sys$rundwn SYS$RUNDWN #ifdef __NEW_STARLETint sys$rundwn( unsigned int acmode);#else /* __OLD_STARLET */!int sys$rundwn(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $SAVE_VP_EXCEPTION */N/* */N/* , Save Vector Processor Exception State */N/* */D/* $SAVE_VP_EXCEPTION excid ,[flags] */N/* */J/* excid = address of a context longword */N/* */J/* flags = noallocation flag , */B/* 0 -> allocate 1 -> don't allocate */N/* */5#define sys$save_vp_exception SYS$SAVE_VP_EXCEPTION #ifdef __NEW_STARLETint sys$save_vp_exception( unsigned int *excid, unsigned int flags);#else /* __OLD_STARLET */,int sys$save_vp_exception(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* , */N/* $SAVE_VP_EXC_INT */N/* */N/* Save Vector Processor Exception State, internal form */N/* */I/* $SAVE_VP_EXC_INT excid ,[flags] */N/* */J/* exci ,d = address of a context longword */N/* */J/* flags = noallocation flag */B/* 0 -> allocate 1 -> don't allocate */N/* */1#define sys$save_vp_exc_int SYS$SAVE_VP_EXC_INT #ifdef __NEW_STARLETint sys$save_vp_exc_int( unsigned int *excid, unsig ,ned int flags);#else /* __OLD_STARLET */*int sys$save_vp_exc_int(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $SCAN_INTRUSION */N/* */N/* Scan intrusion database */N/* , */N/* $SCAN_INTRUSION logfail_status, failed_user, job_type, */K/* [source_terminal], [source_node], [source_user], [source_addr], */B/* [failed_password], [parent_user], [parent_id], [flags] */N/* */H/* logfail_status in login failure status */E/* failed_user in address of failed username descriptor */B/* job_type in job type index, */I/* source_terminal in address of source terminal descriptor */E/* source_node in address of source nodename descriptor */E/* source_user in address of source username descriptor */H/* source_address in address of source DECnet address */P/* failed_password in address of failed password (breakin attempts only) */E/* parent_user in address of parent username */C/* parent_id in par,ent PID */@/* flags in intrusion service flags */N/* *//#define sys$scan_intrusion SYS$SCAN_INTRUSION #ifdef __NEW_STARLETint sys$scan_intrusion( unsigned int logfail_status, void *failed_user, unsigned int job_type, void *source_terminal, void *source_node, void *source_user, void *source_address, void *failed_password, void *paren ,t_user, unsigned int parent_id, unsigned int flags);#else /* __OLD_STARLET */)int sys$scan_intrusion(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $SCAN_MAPPING */N/* */N/* Locate Mapping records in Mapping database */N/* , */N/* $SCAN_MAPPING initmlst. outitmlst [,contxt] */N/* */N/* initmlst = address of a list of item descriptors for the operation */N/* outitmlst = address of a list of item descriptors for the operation */N/* contxt = address of a context long word */N/* , */ +#define sys$scan_mapping SYS$SCAN_MAPPING#ifdef __NEW_STARLETint sys$scan_mapping( void *initmlst, void *outitmlst, unsigned int *contxt);#else /* __OLD_STARLET */'int sys$scan_mapping(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SCHDWK */N/* */N/* Schedule Wakeup , */N/* */N/* $SCHDWK [pidadr] ,[prcnam] ,daytim ,[reptim] */N/* */N/* pidadr = address of process id of process to be awakened */N/* */N/* prcnam = address of process name string descriptor , */N/* */N/* daytim = address of quadword containing time to wake */N/* */N/* reptim = address of quadword containing repeat time interval */N/* */ #define sys$schdwk SYS$SCHDWK 9#ifdef __cplusplus /* Define structure protot,ypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$schdwk( unsigned int *pidadr, void *prcnam, struct _generic_64 *daytim, struct _generic_64 *reptim);#else /* __OLD_STARLET */!int sys$schdwk(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $SEARCH */N/* , */N/* Search for File Name */N/* */N/* $SEARCH fab, [err], [suc] */N/* */J/* fab = address of fab */N/* , */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$search SYS$SEARCH 9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETin ,t sys$search( struct _fabdef *fab, __optional_params );#else /* __OLD_STARLET */!int sys$search(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETCLUEVT */N/* */N/* Set Cluster Event Notification */N/* */N/* $SETCLUEV,T event, astadr, [astprm], [acmode], [handle] */N/* */N/* event = code indicating type of event */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST ,routine as an argument */N/* */N/* acmode = access mode of AST */N/* */N/* handle = address of handle */N/* */ %#define sys$setcluevt SYS$SETCLUEVT#ifdef __NEW_STARLETin,t sys$setcluevt( unsigned int event," void (*astadr)(__unknown_params), int astprm, unsigned int acmode,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *handle#else unsigned __int64 handle#endif);#else /* __OLD_STARLET */$int sys$setcluevt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETDDIR , */N/* */N/* Read and set the default directory string for the process. */N/* */N/* $SETDDIR [new-dir-addr] ,[length-addr] ,[cur-dir-addr] */N/* */N/* new-dir-addr = a descriptor of the new default directory. , */N/* */N/* length-addr = a word that is to receive the length of the */N/* current default directory. */N/* */N/* cur-dir-addr = descriptor of a buffer that is to receive */N/* the current default directory. */!#define sys$setddir, SYS$SETDDIR #ifdef __NEW_STARLETint sys$setddir(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif void *newdiraddr, unsigned short int *lengthaddr, void *curdiraddr);#else /* __OLD_STARLET */"int sys$setddir(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SETDFPROT */N/* , */N/* Read and write the default file protection for the process. */N/* */N/* $SETDFPROT [new-def-prot-addr] ,[cur-def-prot-addr] */N/* */N/* new-def-prot-addr = a word that specifies the new default file */N/* pro ,tection specification. */N/* */P/* cur-def-prot-addr = a word that is to receive the current default file */N/* protection specification. */%#define sys$setdfprot SYS$SETDFPROT #ifdef __NEW_STARLETint sys$setdfprot($ unsigned short int *newdefprotaddr,% unsigned short int *curdefprotaddr);#else /* __OLD_STARLET */$int sys$setdfprot(__un,known_params);!#endif /* #ifdef __NEW_STARLET */N/* $SET_RETURN_VALUE */N/* */N/* Set return value/status in the Mechanism array */N/* */N/* $SET_RETURN_VALUE [mechanism_arg], [return_type], return_value */N/* , */N/* mechanism_arg = Address of mechanism vector */N/* */N/* return_type = Address of a longword containing one of the values */B/* specified in the Function Return Signature Encoding tables */B/* of the OpenVMS calling standard. */N/* */N/* return_value = A ,ddress of a value of the type specified by the */B/* return_type argument. The referenced value will be read */B/* as a longword, quadword, or octaword, depending on the */B/* return_type value. */N/* */N/* */ 3#define sys$set_return_value SYS$SET_RETURN_VALUE#ifdef __NEW_STARLETint sy,s$set_return_value( void *mechanism_arg, unsigned int *return_type, void *return_value);#else /* __OLD_STARLET */+int sys$set_return_value(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* $SET_SYSTEM_EVENT */N/* */N/* Set System Event Notification , */N/* */N/* $SET_SYSTEM_EVENT event, astadr, [astprm], [acmode], handle */N/* */N/* event = code indicating type of event */N/* */N/* astadr = address of entry mask of AST routine */,N/* */N/* astprm = value to be passed to AST routine as an argument */N/* */N/* acmode = access mode of AST */N/* */V/* flags = flags longword (one example is to indicate whether the notification */D/* of the even ,t should be done only once or should be repeated) */N/* */N/* event_handle = address of handle */N/* */ 3#define sys$set_system_event SYS$SET_SYSTEM_EVENT#ifdef __NEW_STARLETint sys$set_system_event( unsigned int event," void (*astadr)(__unknown_params), unsigned __int64 astprm, unsigned int acmo ,de, unsigned int flags, unsigned __int64 *handle);#else /* __OLD_STARLET */+int sys$set_system_event(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $SET_IMPLICIT_AFFINITY */N/* */N/* Modify process implicit affinity */N/* , */P/* $SET_IMPLICIT_AFFINITY [pidadr],[prcnam],[state],[cpu_id],[prev_mask] */N/* */N/* pidadr = address of process identification of process for */N/* which affinity is to be changed */N/* prcnam = address of process name string descriptor */I/* cpu_id = CPUID number process is to , be assigned to initially */I/* prev_mask = address of user quadword that will hold the */B/* previous states of the individual capabilities */N/* */ =#define sys$set_implicit_affinity SYS$SET_IMPLICIT_AFFINITY 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$set_implicit_affinity(, unsigned int *pidadr, void *prcnam, struct _generic_64 *state, int cpu_id, struct _generic_64 *prev_mask);#else /* __OLD_STARLET */0int sys$set_implicit_affinity(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $SET_RESOURCE_DOMAIN */N/* */N/* Set Resource Dom,ain */N/* */V/* $SET_RESOURCE_DOMAIN func ,rsdm_id ,uic_group ,[nullarg] ,[access] ,[acmode] */N/* */I/* func = join or leave function to be performed */B/* 1 - Join the System Resource Domain */B/* 2 - Join the Process Default Domain , */B/* 3 - Join a new Resource Domain (not System or Process) */N/* */I/* rsdm_id = address of the Resource Domain Id */N/* */I/* domain_number = number identifying target Resource Domain */N/* */I/* nullarg = Placeholder reserved ,to Digital */N/* */I/* access = Access desired (defined by RSDM$M macro */N/* */I/* acmode = requested access mode */N/* */N/* , */9#define sys$set_resource_domain SYS$SET_RESOURCE_DOMAIN #ifdef __NEW_STARLETint sys$set_resource_domain( unsigned int func, unsigned int *rsdm_id, unsigned int domain_number, unsigned int nullarg, unsigned int access, unsigned int acmode);#else /* __OLD_STARLET */.int sys$set_resource_domain(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SET_SECURITY */N/* , */N/* Set Object Security Profile */N/* */\/* $SET_SECURITY [clsnam], [objnam], [objhan], [flags], [itmlst], [context], [acmode] */N/* */ +#define sys$set_security SYS$SET_SECURITY#ifdef __NEW_STARLETint sys$set_security( void *clsnam, void *objnam, uns ,igned int *objhan, unsigned int flags, void *itmlst, unsigned int *contxt, unsigned int *acmode);#else /* __OLD_STARLET */'int sys$set_security(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SET_UNWIND_TABLE */N/* */N/* Register or extend and unwind table (UT) information */N/* , */E/* $SET_UNWIND_TABLE code_base_va, code_size, ut_base_va, ut_size, */4/* handler_base_va, unwind_info_base, name */N/* */R/* code_base_va = The process virtual address of the start of the code region */N/* */C/* code_size = Size of code region in bytes */N/* , */F/* ut_base_va = Quadword aligned process virtual address of the UT */N/* */B/* ut_size = The size of the UT in bytes */N/* */Z/* handler_base_va = The handler_base_va plus the unwind information block's condition */M/* handler procedure value must add up to the process virtual a,ddress */;/* of the condition handler's function value. */N/* */X/* unwind_info_base = The unwind_info_base plus a particular unwind table entry (UTE) */L/* unwind info block (UIB) offset must add up to the process virtual */;/* address of that UIB. */N/* */?/* name = Fixed length string, passed by , descriptor. */N/* */@/* flags = MUTE flags, mask word, optional */I/* */ 3#define sys$set_unwind_table SYS$SET_UNWIND_TABLE#ifdef __NEW_STARLETint sys$set_unwind_table( unsigned __int64 code_base_va, unsigned __int64 code_size, unsigned __int64 ut_base_va, unsigned __int64 ut_size," unsigned __int64 handler_ba ,se_va,# unsigned __int64 unwind_info_base, void *name, __optional_params);#else /* __OLD_STARLET */+int sys$set_unwind_table(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SETAST */N/* */N/* Set AST Enable */N/* , */N/* $SETAST enbflg */N/* */N/* enbflg = AST enable indicator for current access mode */N/* 0 -> disable 1 -> enable */N/* */#define sys$setast SYS$SETAST #ifdef __NEW_STARLETint sys$setast( char enbflg);#else ,/* __OLD_STARLET */!int sys$setast(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SETEF */N/* */N/* Set Event Flag */N/* */N/* $SETEF efn */N/* , */N/* efn = event flag number of flag to set */N/* */#define sys$setef SYS$SETEF #ifdef __NEW_STARLETint sys$setef( unsigned int efn);#else /* __OLD_STARLET */ int sys$setef(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $GETENV */N/* , */N/* Get an environment variable */N/* */N/* $GETENV ItemList */N/* */N/* ItemList = address of a zero terminated item list. */N/* , */N/* */ #define sys$getenv SYS$GETENV#ifdef __NEW_STARLETint sys$getenv( void *itemlist);#else /* __OLD_STARLET */!int sys$getenv(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETENV */N/* */N/* Set an e,nvironment variable */N/* */N/* $SETENV ItemList */N/* */N/* ItemList = address of a zero terminated item list. */N/* */N/* , */ #define sys$setenv SYS$SETENV#ifdef __NEW_STARLETint sys$setenv( void *itemlist);#else /* __OLD_STARLET */!int sys$setenv(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETEVTAST */N/* */N/* Establish an Event AST Routine */N/* , */N/* $SETEVTAST evtnam, evtadr, [evtfac], [acmode], [flags], [reqid] */N/* (SETEVTASTW) ,[evtid], [evtcrd], [efn], [iosb], [astadr] */B/* ,[astprm], [nullarg] */N/* */N/* evtnam = address of descriptor of event name */N/* , */N/* evtadr = address of entry mask of event AST routine */N/* */N/* evtfac = address of event facility code */N/* */N/* acmode = access mode of event declaration */N/* */N/* f-lags = optional flags */N/* */N/* reqid = user provided identification of this request */N/* */N/* evtid = address to receive unique identification of this request */N/* */N/* evtcrd = amount of AST cred-it to reserve for request */N/* */N/* efn = event flag to set when $SETEVTAST completes */N/* */N/* iosb = address of a quadword I/O status block */N/* */N/* astadr = address of entry mask of completion AST rout-ine */N/* */N/* astprm = value to be passed to completion AST routine */N/* */ %#define sys$setevtast SYS$SETEVTAST 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setevtast( void *evtnam,! int (*evtadr)(__unknown_p-arams), unsigned int *evtfac, unsigned int acmode, unsigned int flags, unsigned int reqid, unsigned int *evtid, unsigned int evtcrd, unsigned int efn, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int nullarg);#else /* __OLD_STARLET */$int sys$setevtast(__unknown_params);!#endif /* #ifdef __NEW_STARLET */'#define sys$setevtastw SYS$SETEVTASTW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /*- #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setevtastw( void *evtnam,! int (*evtadr)(__unknown_params), unsigned int *evtfac, unsigned int acmode, unsigned int flags, unsigned int reqid, unsigned int *evtid, unsigned int evtcrd, unsigned int efn, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int nullarg);#else /* __OLD_STARLET */%int sys$setevtastw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETEXV - */N/* */N/* Set Exception Vector */N/* */N/* $SETEXV [vector] ,[addres] ,[acmode] ,[prvhnd] */N/* */N/* vector = vector number - */N/* 0 -> primary vector 1 -> secondary 2 -> last chance */N/* */N/* addres = exception handler address (0 indicates deassign vector) */N/* */N/* acmode = access mode for which vector is set */N/* - */N/* prvhnd = address of longword to receive previous handler address */N/* */ #define sys$setexv SYS$SETEXV#ifdef __NEW_STARLETint sys$setexv( unsigned int vector,! int (*addres)(__unknown_params), unsigned int acmode, void *(*(prvhnd)));#else /* __OLD_STARLET */!int sys$setexv(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETFLT - */N/* */N/* Set Fault Characteristics on Pages */N/* */N/* $SETFLT inadr ,[retadr] ,[acmode] ,fault_flag */N/* */N/* inadr = address of 2-longword array containing starting and  - */N/* ending virtual addresses of pages to change */N/* */N/* retadr = address of 2-longword array containing starting and */N/* ending addresses of pages which were changed */N/* */N/* acmode = access mode of request */N/*  - */V/* fault_flag = New fault characteristic (FLT$M_EXECUTABLE or FLT$M_NO_EXECUTE) */N/* */ #define sys$setflt SYS$SETFLT 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setflt( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode -, unsigned int fault_flag);#else /* __OLD_STARLET */!int sys$setflt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETFLT_64 */N/* */N/* Set Fault Characteristics on Pages */N/* */`/* $SETLFT_64 start_va_64, length_64, acmode, - fault_flag, return_va_64, return_length_64 */N/* */G/* start_va_64 = Starting address of address space to set protection */N/* */G/* length_64 = Byte length of addresses to set protection */N/* */G/* acmode = Access mode of request * -/N/* */R/* fault_flag = New fault characteristic (FLT$M_EXECUTABLE or FLT$M_NO_EXECUTE) */N/* */J/* return_va_64 = Address of address space whose protection was set */N/* */J/* return_length_64 = Length of address space whose protection was set */N/* - */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$setflt_64 SYS$SETFLT_64#ifdef __NEW_STARLETint sys$setflt_64( void *start_va_64, unsigned __int64 length_64, unsigned int acmode, unsigned int fault_flag, void *(*(return_va_64)),% unsigned __int64 *return_length_64);#else /* __OLD_STARLET */$int sys$setflt_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   - #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $SETIME */N/* */N/* Set System Time */N/* */N/* $SETIME [timadr] */N/* - */N/* timadr = address of quadword containing new system time in */N/* 64-bit format. If 0, recalibrate system time using */N/* hardware time-of-year clock. */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$setime SYS$SETIME  9-#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setime( struct _generic_64 *timadr);#else /* __OLD_STARLET */!int sys$setime(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $SETIMR */N/* - */N/* Set Timer */N/* */N/* $SETIMR [efn] ,daytim ,[astadr] ,[reqidt] ,[flags] */N/* */N/* efn = event flag to set when timer expires */N/* - */N/* daytim = address of quadword containing 64-bit time value */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* reqidt = request identification of this timer request */N/* */I/* flags = only bit -0 used right now. If bit 0 is set, */B/* then this timer request is in terms of CPU time. */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$setimr SYS$SETIMR 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setimr( unsigned int ef-n, struct _generic_64 *daytim," void (*astadr)(__unknown_params), unsigned __int64 reqidt, unsigned int flags);#else /* __OLD_STARLET */!int sys$setimr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $SETPFM */N/* */N/* Set Page Fault Monitorin-g */N/* */N/* $SETPFM [pfmflg] ,[astadr] ,[astprm] ,[acmode] */N/* */H/* pfmflg = function/subfunction bits */N/* */H/* astadr = address of entry mask of AST routine - */N/* */H/* astprm = value to be passed to AST routine */N/* */H/* acmode = access mode for which the AST is to be declared */N/* */I/* bufcntadr = address of longword for which the number of */I/* page fault moni-toring buffers allocated is stored. */N/* */ #define sys$setpfm SYS$SETPFM#ifdef __NEW_STARLETint sys$setpfm( unsigned int pfmflg,! int (*astadr)(__unknown_params), int astprm, unsigned int acmode, int *bufcntadr);#else /* __OLD_STARLET */!int sys$setpfm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETPRA */N-/* */N/* Set Power Recovery AST */N/* */N/* $SETPRA astadr ,[acmode] */N/* */N/* astadr = address of power recovery AST routine */N/* - */N/* acmode = access mode of AST */N/* */ #define sys$setpra SYS$SETPRA#ifdef __NEW_STARLETint sys$setpra(! int (*astadr)(__unknown_params), unsigned int acmode);#else /* __OLD_STARLET */!int sys$setpra(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETPRI - */N/* */N/* Set Priority */N/* */N/* $SETPRI [pidadr] ,[prcnam] ,pri ,[prvpri],[pol],[prvpol] */N/* */N/* pidadr = address of process id of process to be set -*/N/* */N/* prcnam = address of process name string descriptor */N/* */N/* pri = new base priority for the process */N/* */N/* prvpri = address of longword to receive previous base priority */N/* - */N/* pol = address of new scheduling policy for the process */N/* */N/* prvpol = address of longword to receive previous sched policy */N/* */#define sys$setpri SYS$SETPRI #ifdef __NEW_STARLETint sys$setpri( unsigned int *pidadr, void *prcnam, unsigned -int pri, unsigned int *prvpri, unsigned int *pol, unsigned int *prvpol);#else /* __OLD_STARLET */!int sys$setpri(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SETPRN */N/* */N/* Set Process Name */N/* */N/* - $SETPRN [prcnam] */N/* */N/* prcnam = address of the process name string descriptor */N/* */#define sys$setprn SYS$SETPRN #ifdef __NEW_STARLETint sys$setprn( void *prcnam);#else /* __OLD_STARLET */!int sys$setprn(__unknown_params);!#endif /* #ifdef __NEW_STARLET - */N/* $SETPRT */N/* */N/* Set Protection on Pages */N/* */N/* $SETPRT inadr ,[retadr] ,[acmode] ,prot ,[prvprt] */N/* */N/* inadr = addr!-ess of 2-longword array containing starting and */N/* ending virtual addresses of pages to change */N/* */N/* retadr = address of 2-longword array containing starting and */N/* ending addresses of pages which were changed */N/* */N/* acmode = access mode of request "- */N/* */N/* prot = new protection */N/* */N/* prvprt = address of byte to receive previous protection of */N/* last page changed */N/* #- */ #define sys$setprt SYS$SETPRT 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setprt( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode, unsigned int prot, unsigned char *prvprt);#else /* __OLD_STARLET */!int sys$setprt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETPRT_64 $- */N/* */N/* Set Protection on Pages */N/* */[/* $SETPRT_64 start_va_64, length_64, acmode, prot, return_va_64, return_length_64, */I/* return_prot_64 */N/* */G/*%- start_va_64 = Starting address of address space to set protection */N/* */G/* length_64 = Byte length of addresses to set protection */N/* */G/* acmode = Access mode of request */N/* */G/* prot = New protection &- */N/* */J/* return_va_64 = Address of address space whose protection was set */N/* */J/* return_length_64 = Length of address space whose protection was set */N/* */R/* return_prot_64 = Address of longword to receive previous protection of */N/*'- last page changed */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$setprt_64 SYS$SETPRT_64#ifdef __NEW_STARLETint sys$setprt_64( void *start_va_64, unsigned __int64 length_64, unsigned int acmode, unsigned int prot, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, unsigned int (-*return_prot_64);#else /* __OLD_STARLET */$int sys$setprt_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $SETPRV */N/* */N/* Set privileges. */N/* $SETPRV [enbflg] ,[prvadr] ,[prmflg] ,[prvp)-rv] */N/* */N/* enbflg = enable indicator */N/* 0 -> disable 1 -> enable */N/* */N/* prvadr = 64-bit mask defining the privileges to be enabled or */N/* disabled *-*/N/* */N/* prmflg = permanent indicator */N/* 0 -> temporary (for this image) 1 -> permanent */N/* */N/* prvprv = address of quadword buffer to receive previous privileges */N/* */ #define sys$setpr+-v SYS$SETPRV 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setprv( char enbflg, struct _generic_64 *prvadr, char prmflg, struct _generic_64 *prvprv);#else /* __OLD_STARLET */!int sys$setprv(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETRWM */N/* ,- */N/* Set Resource Wait Mode */N/* */N/* $SETRWM [watflg] */N/* */N/* watflg = wait indicator */N/* 0 -> wait for resources 1 -> return failure immediately -- */I/* (type is NUMBER rather than BOOLEAN since WATFLG=TRUE */I/* means don't wait, which is the opposite of what is seems) */N/* */ #define sys$setrwm SYS$SETRWM#ifdef __NEW_STARLETint sys$setrwm( char watflg);#else /* __OLD_STARLET */!int sys$setrwm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETSFM .- */N/* */N/* Set System Service Failure Mode */N/* */N/* $SETSFM [enbflg] */N/* */N/* enbflg = enable indicator */N/* /- 0 -> disable generation of exceptions on service failures */N/* 1 -> generate exceptions for system service failures */N/* */ #define sys$setsfm SYS$SETSFM#ifdef __NEW_STARLETint sys$setsfm( char enbflg);#else /* __OLD_STARLET */!int sys$setsfm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETSSF */N/* 0- */N/* Set System Service Filter */N/* */N/* $SETSSF [mask] */N/* */N/* mask = flags for services to inhibit */N/* 1- */#define sys$setssf SYS$SETSSF #ifdef __NEW_STARLETint sys$setssf( unsigned int mask);#else /* __OLD_STARLET */!int sys$setssf(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SETSHLV */N/* */N/* Modify process default unshelving action */N/* 2- */N/* $SETSHLV [pidadr] ,[prcnam], [shlvflg] */N/* */N/* pidadr = address of process id of process */N/* */N/* prcnam = address of name string descriptor of process */N/* 3- */N/* shlvflg = longword containing the desired shelving mode */N/* in the bottom bit. If the bottom bit is set, */N/* then the default is not to automatically unshelve */N/* shelved files. If the bottom bit is clear, then */N/* the default is to automatically unshelve shelved */N/* files. 4- */N/* */!#define sys$setshlv SYS$SETSHLV #ifdef __NEW_STARLETint sys$setshlv( unsigned int *pidadr, void *prcnam, unsigned int shlvflg);#else /* __OLD_STARLET */"int sys$setshlv(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SETSTK */N/* */N/* SE5-T VIRTUAL STACK LIMITS */N/* */N/* $SETSTK inadr ,[retadr] ,[acmode] */N/* */N/* inadr = address of 2-longword array containing starting and */N/* ending virtual address of stack limits to set */N/* 6- */N/* retadr = address of a 2-longword array to receive starting and */N/* ending virtual address of stack limits to set */N/* */N/* acmode = access mode for the stack to change */N/* */ #define sys$setstk SYS$SETSTK 9#ifdef __cplusplus7- /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setstk( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode);#else /* __OLD_STARLET */!int sys$setstk(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETSTK_64 */N/* */N/* SET VIRTUAL STAC8-K LIMITS */N/* */V/* $SETSTK_64 start_va, length, acmode, flags, prev_start_va_64, prev_length_64 */N/* */N/* start_va_64 = lowest address for new stack limits */N/* */N/* length_64 = length of address r9-ange for new stack limits */N/* */N/* acmode = access mode for the stack to change */N/* */T/* flags = VA$M_SETSTK_REGISTER - set register stack limits (IA64 only) */N/* */P/* prev_start_va_64 = pointer to lowest address for prev:-ious stack limits */N/* */N/* prev_length_64 = pointer to length of previous stack limits */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$setstk_64 SYS$SETSTK_64#ifdef __NEW_STARLETint sys$setstk_64( void *start_va_64, unsigned __int64 length_64, unsigned int acmode,;- unsigned int flags, void *(*(prev_start_va_64)),# unsigned __int64 *prev_length_64);#else /* __OLD_STARLET */$int sys$setstk_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $SETSWM */N/* */N/* Set Process Swap Mode <- */N/* */N/* $SETSWM [swpflg] */N/* */N/* swpflg = swap indicator */N/* 0 -> enable swapping 1 -> disable swapping */N/* */#d =-efine sys$setswm SYS$SETSWM #ifdef __NEW_STARLETint sys$setswm( char swpflg);#else /* __OLD_STARLET */!int sys$setswm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $SETDTI */N/* */N/* Set Distributed Transaction Information >- */N/* */I/* $SETDTI [efn], [flags], iosb, [astadr], [astprm], context, */?/* ($SETDTIW) func, itmlst */N/* */E/* efn = event flag to set at completion */G/* flags = operation flags */F/* iosb = address of a quadword I/O status block ?- */H/* astadr = address of the entry mask of an AST routine */H/* astprm = value to be passed to AST routine */I/* context = address of longword search context */F/* func = function code to be performed */H/* itmlst = address of a list of item descriptors */N/* */ #define sys$setdti SYS$SETDTI@- 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setdti( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int *contxt, unsigned short int func, void *itmlst);#else /* __OLD_STARLET */!int sys$setdti(__unknown_params);!#endif /* #ifdef __NEW_STARLET */!#define sys$setdtiw SYS$SETDTIW  9#ifdef __cplusplusA- /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setdtiw( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int *contxt, unsigned short int func, void *itmlst);#else /* __OLD_STARLET */"int sys$setdtiw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SETUAI */N/*B- */N/* Modify User Authorization Information */N/* */N/* $SETUAI [efn] ,[contxt] ,usrnam ,itmlst ,[iosb] ,[astadr] */F/* ,[astprm] */N/* */N/* efn = event flag to be setC- at completion */N/* */N/* contxt = address of a context longword (UAF IFI & ISI) */N/* */N/* usrnam = address of user name descriptor */N/* */N/* itmlst = address of a list of item descriptors D- */N/* */N/* iosb = address of a quadword I/O status block */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine */N/* E- */N/* */ #define sys$setuai SYS$SETUAI 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setuai( unsigned int efn, unsigned int *contxt, void *usrnam, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* F- __OLD_STARLET */!int sys$setuai(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $SHOW_INTRUSION */N/* */N/* Show intrusion record */N/* */g/* $SG-HOW_INTRUSION user_criteria, intruder, intruder_len, breakin_block, [flags], [context] */N/* */G/* user_criteria in address of user criteria descriptor */B/* intruder in out address of intruder descriptor */L/* intruder_len out address of word to receive intruder string length */I/* breakin_block out address of intrusion block */@/* flags in intrusion servicH-e flags */B/* context in out address of optional longword context */N/* */ /#define sys$show_intrusion SYS$SHOW_INTRUSION#ifdef __NEW_STARLETint sys$show_intrusion( void *user_criteria, void *intruder," unsigned short int *intruder_len, void *breakin_block, unsigned int flags, unsigned int *context);#else /* __OLD_STARLET */)int sys$show_intrusion(__unknown_params);!#eI-ndif /* #ifdef __NEW_STARLET */ N/* $SNDACC */N/* */N/* Send Message to Accounting Manager */N/* */N/* $SNDACC msgbuf ,[chan] */N/* J- */N/* msgbuf = address of message buffer string descriptor */N/* */N/* chan = number of channel assigned to mailbox to receive reply */N/* */#define sys$sndacc SYS$SNDACC #ifdef __NEW_STARLETint sys$sndacc( void *msgbuf, unsigned short int chan);#else /* __OLD_STARLET */!int sys$sndacc(__unknownK-_params);!#endif /* #ifdef __NEW_STARLET */N/* $SNDERR */N/* */N/* Send Message to Error Logger */N/* */N/* $SNDERR msgbuf */N/* L- */N/* msgbuf = address of message buffer string descriptor */N/* */#define sys$snderr SYS$SNDERR #ifdef __NEW_STARLETint sys$snderr( void *msgbuf);#else /* __OLD_STARLET */!int sys$snderr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SNDOPR */N/* M- */N/* Send Message to Operator */N/* */N/* $SNDOPR msgbuf ,[chan] */N/* */N/* msgbuf = address of message buffer string descriptor */N/* N- */N/* chan = number of channel assigned to mailbox to receive reply */N/* */#define sys$sndopr SYS$SNDOPR #ifdef __NEW_STARLETint sys$sndopr( void *msgbuf, unsigned short int chan);#else /* __OLD_STARLET */!int sys$sndopr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SNDSMB */N/* O- */N/* Send Message to Symbiont Manager */N/* */N/* $SNDSMB msgbuf ,[chan] */N/* */N/* msgbuf = address of message buffer string descriptor */N/* P- */N/* chan = number of channel assigned to mailbox to receive reply */N/* */#define sys$sndsmb SYS$SNDSMB #ifdef __NEW_STARLETint sys$sndsmb( void *msgbuf, unsigned short int chan);#else /* __OLD_STARLET */!int sys$sndsmb(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SNDJBC */N/* Q- */N/* Send Message to Job Controller */N/* */N/* $SNDJBC [efn], func, [nullarg], [itmlst], */N/* ($SNDJBCW) [iosb], [astadr], [astprm] */N/* */N/* efn = event flag to be set when request comR-pletes */N/* func = code specifying function to be performed */N/* nullarg = reserved argument for similarity with $getxxx services */N/* itmlst = address of a list of item descriptors for the operation */R/* iosb = address of a quadword status block to receive the final status */Q/* astadr = address of an ast routine to be called when request completes */N/* astprm = 32-bit ast parameter S- */N/* */ #define sys$sndjbc SYS$SNDJBC 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$sndjbc( unsigned int efn, unsigned short int func, unsigned int nullarg, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */!int sys$sndjbc(__unknown_params)T-;!#endif /* #ifdef __NEW_STARLET */!#define sys$sndjbcw SYS$SNDJBCW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$sndjbcw( unsigned int efn, unsigned short int func, unsigned int nullarg, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */"int sys$sndjbcw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/*U- */N/* $SPACE */N/* */N/* Space to Record in File */N/* */N/* $SPACE rab, [err], [suc] */N/* V- */J/* rab = address of rab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* W- */ #define sys$space SYS$SPACE 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$space( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */ int sys$space(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $SSIO_FSYNC */N/* X- */N/* Synchronize file changes with the storage device for a file that */N/* has been opened for Shared Stream I/O (SSIO) access. */N/* */N/* $SSIO_FSYNC chan, iosa ,[ast] ,[astprm] */N/* ($SSIO_FSYNCW) */N/* */N/* chan = chanY-nel number for SSIO accessed file */N/* */N/* iosa = address of I/O status area (4 quadwords) to receive final */N/* completion status (64-bit address) */N/* */N/* ast = address of AST routine (64-bit address) */N/* Z- */O/* astprm = value to be passed to AST routine as argument (64-bit value) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif '#define sys$ssio_fsync SYS$SSIO_FSYNC 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_fsync( unsigned int chan[-, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */%int sys$ssio_fsync(__unknown_params);!#endif /* #ifdef __NEW_STARLET */)#define sys$ssio_fsyncw SYS$SSIO_FSYNCW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_fsyncw( unsigned int chan, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */&in \-t sys$ssio_fsyncw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $SSIO_GETFL */N/* */N/* Get the current file status flags for a file that has been opened */N/* for Shared Stream I/O (SSIO) access. Similar to UNIX fcntl with */N/* F_SETFL command ]-parameter. */N/* */N/* $SSIO_GETFL chan ,iosa ,[ast] ,[astprm] */N/* ($SSIO_GETFLW) */N/* */N/* chan = channel number for SSIO accessed file */N/* ^- */N/* iosa = address of I/O status area (4 quadwords) to receive final */N/* completion status and file status flags (64-bit address) */N/* */N/* ast = address of AST routine (64-bit address) */N/* */O/* astprm = value to be passed to AST routine as argument (64-bit valu_-e) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif '#define sys$ssio_getfl SYS$SSIO_GETFL 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_getfl( unsigned int chan, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */%int sys$`-ssio_getfl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */)#define sys$ssio_getflw SYS$SSIO_GETFLW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_getflw( unsigned int chan, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */&int sys$ssio_getflw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_S a-IZE'#pragma __required_pointer_size __short#endifN/* $SSIO_LSEEK */N/* */N/* Set the current file offset to a file that has been opened for */N/* Shared Stream I/O (SSIO) access. */N/* */N/* $SSIO_LSEEK chan ,offset_in ,whence ,iob-sa ,[ast] ,[astprm] */N/* ($SSIO_LSEEKW) */N/* */N/* chan = channel number for SSIO accessed file */N/* */N/* offset_in = signed offset value used in conjunction with the */B/* whence parameter to determine a new resultant file */B/* oc-ffset (64-bit value) */N/* */N/* whence = value that controls interpretation of offset_in */B/* Must be one of: */B/* SSIO$C_SEEK_SET: Resultant offset is offset_in */B/* SSIO$C_SEEK_CUR: Resultant offset is current value */4/* plus offset_in */B/* SSIO$C_SEEK_END: Resuld-tant offset is current end-of- */4/* file position plus offset_in */N/* */N/* iosa = address of I/O status area (4 quadwords) to receive final */N/* completion status (64-bit address) */N/* */N/* ast = address of AST routine (64-bit address) */N/* e- */O/* astprm = value to be passed to AST routine as argument (64-bit value) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif '#define sys$ssio_lseek SYS$SSIO_LSEEK 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint syf-s$ssio_lseek( unsigned int chan, __int64 offset_in, int whence, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */%int sys$ssio_lseek(__unknown_params);!#endif /* #ifdef __NEW_STARLET */)#define sys$ssio_lseekw SYS$SSIO_LSEEKW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_lseekw( unsigned int chan, __int64 offset_in, int wg-hence, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */&int sys$ssio_lseekw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $SSIO_READ */N/* */N/* Read a byte stream from the current file offset from a file that h-*/N/* has been opened for Shared Stream I/O (SSIO) access */N/* */N/* $SSIO_READ chan ,buffer ,bufsiz ,iosa ,[ast] ,[astprm] */N/* ($SSIO_READW) */N/* */N/* chan = channel number for SSIO accessed file */N/* i- */N/* buffer = address of data buffer to receive data (64-bit address) */N/* */N/* bufsiz = size of data buffer in bytes (64-bit value) */N/* */N/* iosa = address of I/O status area (4 quadwords) to receive final */N/* completion status (64-bit addres j-s) */N/* */N/* ast = address of AST routine (64-bit address) */N/* */O/* astprm = value to be passed to AST routine as argument (64-bit value) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __lok-ng#endif %#define sys$ssio_read SYS$SSIO_READ 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_read( unsigned int chan, void *buffer, unsigned __int64 bufsiz, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */$int sys$ssio_read(__unknown_params);!#endif /* #ifdef __NEW_STARLET */'#define sys$ssio_readw SYS$SSIO_READW  9#ifdl-ef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_readw( unsigned int chan, void *buffer, unsigned __int64 bufsiz, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */%int sys$ssio_readw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $SSIO_SETFL m- */N/* */N/* Set the current file status flags for a file that has been opened */N/* for Shared Stream I/O (SSIO) access. Similar to UNIX fcntl with */N/* F_SETFL command parameter. */N/* */N/* $SSIO_SETFL chan ,file_sts_flgs ,iosa ,n-[ast] ,[astprm] */N/* ($SSIO_SETFLW) */N/* */N/* chan = channel number for SSIO accessed file */N/* */N/* file_sts_flgs = desired file status flag value */E/* Only mask value that can be changed is SSIO$M_O_APPEND. */I/* o- */N/* iosa = address of I/O status area (4 quadwords) to receive final */N/* completion status (64-bit address) */N/* */N/* ast = address of AST routine (64-bit address) */N/* */O/* astprm = value to be passedp- to AST routine as argument (64-bit value) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif '#define sys$ssio_setfl SYS$SSIO_SETFL 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_setfl( unsigned int chan, unsigned int file_sts_flgs, struct _iosa *iosa, void (*ast)q-( void *), void *astprm);#else /* __OLD_STARLET */%int sys$ssio_setfl(__unknown_params);!#endif /* #ifdef __NEW_STARLET */)#define sys$ssio_setflw SYS$SSIO_SETFLW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_setflw( unsigned int chan, unsigned int file_sts_flgs, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */&int sys$ss r-io_setflw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $SSIO_SYNC */N/* */N/* Synchronize file changes that have been made via prior calls to */N/* the $SSIO_WRITE and $SSIO_TRUNCATE services to all files on this */N/* system that have been ops-ened for Shared Stream I/O (SSIO) access. */N/* The file changes are synchronized with the corresponding storage */N/* device. */N/* */N/* $SSIO_SYNC */N/* */%#define sys$ssio_sync SYS$SSIO_SYNC#ifdef __NEW_STA t-RLETint sys$ssio_sync(void);#else /* __OLD_STARLET */int sys$ssio_sync(void);!#endif /* #ifdef __NEW_STARLET */N/* $SSIO_TRUNCATE */N/* */N/* Truncate (or extend) a file that has been opened for Shared */N/* Stream I/O (SSIO) access. */N/* u- */N/* $SSIO_TRUNCATE chan ,file_length ,iosa ,[ast] ,[astprm] */N/* ($SSIO_TRUNCATEW) */N/* */N/* chan = channel number for SSIO accessed file */N/* */N/* file_length = new end-of-file length (64-bit value) */N/* v- */N/* iosa = address of I/O status area (4 quadwords) to receive final */N/* completion status (64-bit address) */N/* */N/* ast = address of AST routine (64-bit address) */N/* */O/* astprm = value to be passed tw-o AST routine as argument (64-bit value) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif -#define sys$ssio_truncate SYS$SSIO_TRUNCATE 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_truncate( unsigned int chan, unsigned __int64 file_length, struct _iosa *iosa, voix-d (*ast)( void *), void *astprm);#else /* __OLD_STARLET */(int sys$ssio_truncate(__unknown_params);!#endif /* #ifdef __NEW_STARLET *//#define sys$ssio_truncatew SYS$SSIO_TRUNCATEW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_truncatew( unsigned int chan, __int64 file_length, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET * y-/)int sys$ssio_truncatew(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $SSIO_WRITE */N/* */N/* Write a byte stream to the current file offset to a file that */N/* has been opened for Shared Stream I/O (SSIO) access */N/* z- */N/* $SSIO_WRITE chan ,buffer ,bufsiz ,iosa ,[ast] ,[astprm] */N/* ($SSIO_WRITEW) */N/* */N/* chan = channel number for SSIO accessed file */N/* */N/* buffer = address of data buffer{- to receive data (64-bit address) */N/* */N/* bufsiz = size of data buffer in bytes (64-bit value) */N/* */N/* iosa = address of I/O status area (4 quadwords) to receive final */N/* completion status (64-bit address) */N/* |- */N/* ast = address of AST routine (64-bit address) */N/* */O/* astprm = value to be passed to AST routine as argument (64-bit value) */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif '#define sys$ssio_write SYS$SSIO_WRITE 9#ifdef __cplusplus /* Define }-structure prototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_write( unsigned int chan, void *buffer, unsigned __int64 bufsiz, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */%int sys$ssio_write(__unknown_params);!#endif /* #ifdef __NEW_STARLET */)#define sys$ssio_writew SYS$SSIO_WRITEW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /* #ifde~-f __cplusplus */ #ifdef __NEW_STARLETint sys$ssio_writew( unsigned int chan, void *buffer, unsigned __int64 bufsiz, struct _iosa *iosa, void (*ast)( void *), void *astprm);#else /* __OLD_STARLET */&int sys$ssio_writew(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $SUSPND */N/* - */N/* Suspend Process */N/* */N/* $SUSPND [pidadr] ,[prcnam], [flags] */N/* */N/* pidadr = address of process id of process to be suspended */N/* - */N/* prcnam = address of name string descriptor of process */N/* */N/* flags = longword of bit flags, of which only bit 0 is */B/* currently used. If bit 0 is set, then this */B/* is a hard suspend request; if clear this is */B/* a soft suspend request. */N/* - */#define sys$suspnd SYS$SUSPND #ifdef __NEW_STARLETint sys$suspnd( unsigned int *pidadr, void *prcnam, unsigned int flags);#else /* __OLD_STARLET */!int sys$suspnd(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SYNCH */N/* */N/* Synchronize Event Completion - */N/* */N/* $SYNCH [iosb] ,[efn] */N/* */N/* efn = event flag to be set at completion */N/* */N/* iosb = address of a quadword I/O status block */N/* - */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif #define sys$synch SYS$SYNCH 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$synch( unsigned int efn, struct _iosb *iosb);#else /* __OLD_STARLET */ int sys$synch(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __I -NITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $SUBSYSTEM */N/* */N/* Modify Protected Subsystem Attributes */N/* */N/* $SUBSYSTEM enbflg */N/* - */N/* enbflg = enable indicator */N/* 0 => disable image identifiers */B/* 1 => restore image identifiers */N/* */%#define sys$subsystem SYS$SUBSYSTEM #ifdef __NEW_STARLETint sys$subsystem( unsigned int enbflg);#else /* __OLD_STARLET */$int sys$su-bsystem(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $TIMCON */N/* */N/* Convert between binary UTC and Smithsonian times */N/* */N/* $TIMCON smntim, utctim, cvtflg - */N/* */I/* For cvtflg = 0 (Convert UTC to Smithsonian) */I/* smnadr = Address of the output quadword to be written */B/* with the UTC time converted to date_time */I/* utcadr = Address of the input 128 bit utc_date_time time to */B/* be converted */I/* cvtflg = 0 - */N/* */I/* For cvtflg = 1 (Convert Smithsonian to UTC) */I/* smnadr = Address of input Smithsonian binary time to be */B/* converted (VMS Binabs time). */I/* utcadr = Address of the output 128 bit binary time to */B/* be written with the converted time */I/* cvtflg -= 1 */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$timcon SYS$TIMCON  9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$timcon( struct _generic_64 *smnadr, unsigned int utcadr [4], char cvtflg); -#else /* __OLD_STARLET */!int sys$timcon(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $TRNLNM */N/* */N/* Translate Logical Name */N/* */N-/* $TRNLNM [attr], tabnam, [lognam], [acmode], [itemlist] */N/* */N/* attr = address of logical name translation attributes */N/* */C/* Attribute Meaning */I/* LNM$M_CASE_BLIND Search of string is case insensitive */N/* - */N/* tabnam = address of logical name table name string descriptor */N/* */N/* lognam = address of logical name string descriptor */N/* */N/* acmode = address of access mode for logical name */N/* - */N/* itmlst = address of a list of item descriptors */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$trnlnm SYS$TRNLNM #ifdef __NEW_STARLETint sys$trnlnm( unsigned int *attr, void *tabnam, void *lognam, unsigned char *acmode, void *itmlst);#else /* __OLD_STARLET */!int sys$trnlnm(__unknown_params);!#endif / -* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $TRNLOG */N/* */N/* Translate Logical Name */N/* */N/* $TRNLOG lognam ,[rsllen] ,rslbuf ,[table] ,[acmode] ,[dsbmsk] - */N/* */N/* lognam = address of logical name string descriptor */N/* */N/* rsllen = address of word to receive length of resultant name */N/* */N/* rslbuf = address of descriptor for buffer to receive resultant */N/* st-ring */N/* */N/* table = address of byte to receive logical name table number */N/* */N/* acmode = address of byte to receive access mode of entry */N/* (process table only) */N/* - */N/* dsbmsk = table search disable mask */N/* */N/* Bit Set Meaning */N/* */N/* 0 Do not search system table */N/* 1 Do not search group table - */N/* 2 Do not search process table */N/* */ #define sys$trnlog SYS$TRNLOG#ifdef __NEW_STARLETint sys$trnlog( void *lognam, unsigned short int *rsllen, void *rslbuf, unsigned char *table, unsigned char *acmode, unsigned int dsbmsk);#else /* __OLD_STARLET */!int sys$trnlog(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* - */N/* $TRUNCATE */N/* */N/* Truncate Record */N/* */N/* $TRUNCATE rab, [err], [suc] */N/* - */J/* rab = address of rab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ ##defin-e sys$truncate SYS$TRUNCATE 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$truncate( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */#int sys$truncate(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $ULKPAG */N/* -*/N/* Unlock Pages From Memory */N/* */N/* $ULKPAG inadr ,[retadr] ,[acmode] */N/* */N/* inadr = address of 2-longword array containing starting and */N/* ending virtual addresses of pages to be unlocked */N/* - */N/* retadr = address of a 2-longword array to receive starting and */N/* ending virtual addresses of pages actually unlocked */N/* */N/* acmode = access mode to check against the owner of the pages */N/* */ #define sys$ulkpag SYS$ULKPAG 9#ifdef- __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ulkpag( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode);#else /* __OLD_STARLET */!int sys$ulkpag(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $ULKPAG_64 */N/* */N/* Unlo-ck Pages in Memory */N/* */T/* $ULKPAG_64 start_va_64, length_64, acmode, return_va_64, return_length_64 */N/* */E/* start_va_64 = Starting address of address space to unlock */N/* */G/* length_64 = Byte length of addr-esses to lock */N/* */G/* acmode = Access mode to be checked against the page owner */N/* */J/* return_va_64 = Address of address space unlocked */N/* */J/* return_length_64 = Length of address space unlocked */N/* - */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$ulkpag_64 SYS$ULKPAG_64#ifdef __NEW_STARLETint sys$ulkpag_64( void *start_va_64, unsigned __int64 length_64, unsigned int acmode, void *(*(return_va_64)),% unsigned __int64 *return_length_64);#else /* __OLD_STARLET */$int sys$ulkpag_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #i -fdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $ULWSET */N/* */N/* Unlock Pages From Working Set */N/* */N/* $ULWSET inadr ,[retadr] ,[acmode] */N/* - */N/* inadr = address of 2-longword array containing starting and */N/* ending virtual addresses of pages to be unlocked */N/* */N/* retadr = address of a 2-longword array to receive starting and */N/* ending virtual addresses of pages actually unlocked */N/* - */N/* acmode = access mode to check against the owner of the pages */N/* */ #define sys$ulwset SYS$ULWSET 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$ulwset( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmode);#else /* __OLD_STARLET */!int sys$ul -wset(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $ULWSET_64 */N/* */N/* Unlock Pages from Working Set */N/* */T/* $ULWSET_64 start_va_64, length_64, acmode, return_va_64, return_length_64 */N/* - */E/* start_va_64 = Starting address of address space to unlock */N/* */G/* length_64 = Byte length of addresses to lock */N/* */G/* acmode = Access mode to be checked against the page owner */N/* */J-/* return_va_64 = Address of address space unlocked */N/* */J/* return_length_64 = Length of address space unlocked */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$ulwset_64 SYS$ULWSET_64#ifdef __NEW_STARLETint sys$ulwset_64( void *start_va_64, u-nsigned __int64 length_64, unsigned int acmode, void *(*(return_va_64)),% unsigned __int64 *return_length_64);#else /* __OLD_STARLET */$int sys$ulwset_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $UNWIND */N/* */N/* Unwind Call Stack - */N/* */N/* $UNWIND [depadr] ,[newpc] */N/* */N/* depadr = address of longword containing number of logical frames */N/* (depth) to unwind call stack */N/* - */N/* newpc = address to be given control when the unwind is complete */N/* */ #define sys$unwind SYS$UNWIND#ifdef __NEW_STARLETint sys$unwind( unsigned int *depadr, void *newpc);#else /* __OLD_STARLET */!int sys$unwind(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $UPDATE - */N/* */N/* Update Record */N/* */N/* $UPDATE fab, [err], [suc] */N/* */J/* rab = address of rab - */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* */ #define sys$update SYS$UPDATE 9#ifdef __cplusplus /* Define structure protot-ypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$update( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */!int sys$update(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $UPDSEC */N/* */N/* Update Section File on Disk */N/* - */N/* $UPDSEC inadr ,[retadr] ,[acmode] ,[updflg] ,[efn] ,[iosb] */N/* ($UPDSECW) ,[astadr] ,[astprm] */N/* */N/* inadr = address of 2-longword array containing starting and */N/* ending addresses of the pages to be potentially */N/* written - */N/* */N/* retadr = address of 2-longword array to receive addresses of */N/* the first and last page queued in the first I/O */N/* request */N/* */N/* acmode = access mode on behalf of which the -service is */N/* performed */N/* */N/* updflg = update indicator for read/write global sections */N/* 0 -> write all read/write pages in the section */T/* UPDFLG$M_WRT_MODIFIED -> write all pages modified by the caller */N/* */-N/* efn = number of event flag to set when the section file is */N/* updated */N/* */N/* iosb = address of quadword I/O status block */N/* */N/* astadr = address of entry mask of an AST service routine */N/* - */N/* astprm = AST parameter to be passed to the AST service routine */N/* */ #define sys$updsec SYS$UPDSEC 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$updsec( struct _va_range *inadr, struct _va_range *retadr, unsigned int acmo-de, char updflg, unsigned int efn, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */!int sys$updsec(__unknown_params);!#endif /* #ifdef __NEW_STARLET */!#define sys$updsecw SYS$UPDSECW  9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$updsecw( struct _va_range *inadr, struct _va_range *retadr, unsigned int ac-mode, char updflg, unsigned int efn, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */"int sys$updsecw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $UPDSEC_64 */N/* */N/* Update Section File on Disk */N/* - */N/* $UPDSEC_64 start_va_64, length_64, acmode, updflg, efn, iosa_64 */I/* return_va_64, return_length_64[,astadr_64[, astprm_64]] */N/* */E/* start_va_64 = Starting address of address space to update */N/* */G/* length_64 = Byte length of addresses to update */N/* - */N/* acmode = access mode on behalf of which the service is */N/* performed */N/* */N/* updflg = update indicator for read/write global sections */N/* 0 -> write all read/write pages in the section */T/* UPDFLG$M_WRT_MOD-IFIED -> write all pages modified by the caller */N/* */N/* efn = number of event flag to set when the section file is */N/* updated */N/* */N/* iosa_64 = address of 4 quadword I/O status area */N/* - */J/* return_va_64 = Address of address space queued in the first */B/* I/O request */N/* */J/* return_length_64 = Length of address space queued in the first */B/* I/O request */N/* */N/* astadr_64 = address of en-try mask of an AST service routine */N/* */N/* astprm_64 = AST parameter to be passed to the AST service routine */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif %#define sys$updsec_64 SYS$UPDSEC_64 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosa; #endif /*- #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$updsec_64( void *start_va_64, unsigned __int64 length_64, unsigned int acmode, unsigned int updflg, unsigned int efn, struct _iosa *iosa_64, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params );#else /* __OLD_STARLET */$int sys$updsec_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */'#define sys$updsec_64w SYS$UPDSEC_64W  9#ifdef __cplusplus /* Define structure pr-ototypes */ struct _iosa; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$updsec_64w( void *start_va_64, unsigned __int64 length_64, unsigned int acmode, unsigned int updflg, unsigned int efn, struct _iosa *iosa_64, void *(*(return_va_64)),$ unsigned __int64 *return_length_64, __optional_params );#else /* __OLD_STARLET */%int sys$updsec_64w(__unknown_params);!#endif /* #ifdef __NEW_STARLET */   #ifdef __INITIAL_POINTER_SIZE'#pragma -__required_pointer_size __short#endifN/* */N/* $VERIFY_PROXY */N/* */N/* Verify proxy record */N/* */_/* $VERIFY_PROXY rem_node, rem_user, [proposed_user], local-_user, local_user_len, flags */N/* */=/* rem_node in address of remote node descriptor */=/* rem_user in address of remote user descriptor */E/* proposed_user in address of optional proposed user descriptor */D/* local_user out address of descriptor to receive local user */J/* local_user_len out address of word to receive local user length */B/* flags in proxy service flags - */N/* */ +#define sys$verify_proxy SYS$VERIFY_PROXY#ifdef __NEW_STARLETint sys$verify_proxy( void *rem_node, void *rem_user, void *proposed_user, void *local_user,$ unsigned short int *local_user_len, unsigned int flags);#else /* __OLD_STARLET */'int sys$verify_proxy(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* - */N/* $WAIT */N/* */N/* Wait on File */N/* */N/* $WAIT rab */N/* */J/*- rab = address of rab */N/* */N/* */ #define sys$wait SYS$WAIT#ifdef __NEW_STARLET int sys$wait( void *fabrab);#else /* __OLD_STARLET */int sys$wait(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $WAITFR */N-/* */N/* Wait for Single Event Flag */N/* */N/* $WAITFR efn */N/* */N/* efn = event flag number to wait for */N/* - */#define sys$waitfr SYS$WAITFR #ifdef __NEW_STARLETint sys$waitfr( unsigned int efn);#else /* __OLD_STARLET */!int sys$waitfr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $WAKE */N/* */N/* Wake */N/* - */N/* $WAKE [pidadr] ,[prcnam] */N/* */N/* pidadr = address of process id of process to be awakened */N/* */N/* prcnam = address of name string descriptor of process to be */N/* awakened - */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif#define sys$wake SYS$WAKE #ifdef __NEW_STARLET int sys$wake( unsigned int *pidadr, void *prcnam);#else /* __OLD_STARLET */int sys$wake(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/*- $WFLAND */N/* */N/* Wait for Logical AND of Event Flags */N/* */N/* $WFLAND efn ,mask */N/* */N/* efn = event flag n -umber of any flag within the cluster */N/* */N/* mask = 32-bit mask of flags that must be set */N/* */#define sys$wfland SYS$WFLAND #ifdef __NEW_STARLETint sys$wfland( unsigned int efn, unsigned int mask);#else /* __OLD_STARLET */!int sys$wfland(__unknown_params);!#endif /* #ifdef __NEW_STARLET- */N/* $WFLOR */N/* */N/* Wait for Logical OR of Event Flags */N/* */N/* $WFLOR efn ,mask */N/* */N/* efn = even -t flag number of any flag within the cluster */N/* */N/* mask = 32-bit mask of flags, any of which must be set */N/* */#define sys$wflor SYS$WFLOR #ifdef __NEW_STARLETint sys$wflor( unsigned int efn, unsigned int mask);#else /* __OLD_STARLET */ int sys$wflor(__unknown_params);!#endif /* #ifdef __NEW_STARL-ET */N/* */N/* $WRITE */N/* */N/* Write Block to File */N/* */N/* $WRITE rab, [err], [suc] */N/* - */J/* rab = address of rab */N/* */E/* err = address of user error completion routine */N/* */E/* suc = address of user success completion routine */N/* - */ #define sys$write SYS$WRITE 9#ifdef __cplusplus /* Define structure prototypes */struct _rabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$write( struct _rabdef *rab, __optional_params );#else /* __OLD_STARLET */ int sys$write(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $WRITE_THREAD_UNQ - */N/* */N/* Write thread unique value */N/* */N/* $WRITE_THREAD_UNQ contxt */N/* */M/* contxt = address of quadword that contains the */B/* thre -ad unique value to be written */N/* */3#define sys$write_thread_unq SYS$WRITE_THREAD_UNQ #ifdef __NEW_STARLETint sys$write_thread_unq( unsigned int *contxt);#else /* __OLD_STARLET */+int sys$write_thread_unq(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $XFS_CLIENT */N/* - */N/* Call the XFS client */N/* */N/* $XFS_CLIENT [efn] ,func ,fsb ,[astadr] ,[astprm] */N/* */N/* efn = number of event flag to set on completion */N/* - */N/* func = function code specifying action to be performed */N/* */N/* fsb = address of File System Block */N/* */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = -value to be passed to AST routine as argument */N/* */ '#define sys$xfs_client SYS$XFS_CLIENT#ifdef __NEW_STARLETint sys$xfs_client( unsigned int efn, unsigned short int func, void *fsb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */%int sys$xfs_client(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $XFS_SERVER - */N/* */N/* Call the XFS server */N/* */N/* $XFS_SERVER [efn] ,func ,fsb ,[astadr] ,[astprm] */N/* */N/* efn = number of event flag to set on completion -*/N/* */N/* func = function code specifying action to be performed */N/* */N/* fsb = address of File System Block */N/* */N/* astadr = address of entry mask of AST routine */N/* - */N/* astprm = value to be passed to AST routine as argument */N/* */ '#define sys$xfs_server SYS$XFS_SERVER#ifdef __NEW_STARLETint sys$xfs_server( unsigned int efn, unsigned short int func, void *fsb," void (*astadr)(__unknown_params), int astprm);#else /* __OLD_STARLET */%int sys$xfs_server(__unknown_params);!#endif /* #ifdef - __NEW_STARLET */ N/* $DCLRNH */N/* */N/* Declare Restart Handler */N/* */N/* $DCLRNH desblk */N/* */N/*- desblk = address of handler control block containing: */N/* */N/* +-------------------------------+ */N/* | forward link | */N/* +-------------------------------+ */N/* | restart handler address | */N/* +--------------------------------+ */N/* | argument count | */N/* +-------------------------------+ */N/* | reserved, must be zero | */N/* +-------------------------------+ */N/* | address to store event code | */N/* +-------------------------------+ - */N/* | additional arguments | */N/* +-- for restart handler, --+ */N/* | if any | */N/* +-------------------------------+ */N/* */ #define sys$dclrnh SYS$DCLRNH#ifdef __NEW_STARLETint sys$dclrnh( v -oid *desblk);#else /* __OLD_STARLET */!int sys$dclrnh(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CANRNH */N/* */N/* Cancel Restart Handler */N/* */N/* $CANRNH [desblk] - */N/* */N/* desblk = address of handler control block describing */B/* handler to be deleted. If 0, delete all */N/* */ #define sys$canrnh SYS$CANRNH#ifdef __NEW_STARLETint sys$canrnh( void *desblk);#else /* __OLD_STARLET */!int sys$canrnh(__unknown_params);!#endif /* #ifdef __NEW_S -TARLET */ N/* */N/* $ABORT_TRANS */N/* */N/* Abort a transaction */N/* */F/* $ABORT_TRANS [efn], [flags], iosb [, [astadr], [astprm], */I/* ($ABORT_TRANSW)- [tid], [reason], [bid]] */N/* */E/* efn = event flag to be set at completion */G/* flags = operation flags */F/* iosb = address of a quadword I/O status block */H/* astadr = address of an entry mask of AST routine */H/* astprm = value to be passed to AST routine as an argument */E/* - tid = identifier of transaction to be aborted */I/* reason = optional extended abort reason code */E/* bid = identifier of transaction branch to be aborted */N/* */ )#define sys$abort_trans SYS$ABORT_TRANS 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$abort_trans(- unsigned int efn, unsigned int flags, struct _iosb *iosb, __optional_params );#else /* __OLD_STARLET */&int sys$abort_trans(__unknown_params);!#endif /* #ifdef __NEW_STARLET */+#define sys$abort_transw SYS$ABORT_TRANSW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$abort_transw( unsigned int efn, unsigned int flags, struct _iosb *iosb, __optional_params );#else -/* __OLD_STARLET */'int sys$abort_transw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $ACK_EVENT */N/* */N/* Acknowledge a resource manager transaction event */N/* */E/*- $ACK_REPORT [flags], report_id, report_reply, [, [reason], */</* [beftime], [afttime], [part_name], [rm_context], */;/* [timout]] */N/* */@/* flags = operation flags */C/* report_id = participant id value */F/* report_reply = value of completion status */A/* reason = extended ab-ort reason code (for veto vote) */A/* beftim = lower bound of commit timestamp */F/* afttim = upper bound of commit timestamp */C/* part_name = address of participant name descriptor */D/* rm_context = RM private value to be passed to evt_rtn */A/* timout = transaction execution time-out value */N/* */%#define sys$ack_event SYS$ACK_EV-ENT #ifdef __NEW_STARLETint sys$ack_event( unsigned int flags, unsigned int report_id, int report_reply, __optional_params );#else /* __OLD_STARLET */$int sys$ack_event(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $ADD_BRANCH */N/* */N/* Add a transa-ction branch */N/* */E/* $ADD_BRANCH [efn], [flags], iosb, [astadr], [astprm], */I/* ($ADD_BRANCHW) tid, tm_name, bid */N/* */E/* efn = event flag to be set at completion */G/* flags = operation flags - */F/* iosb = address of a quadword I/O status block */H/* astadr = address of an entry mask of AST routine */H/* astprm = value to be passed to AST routine as an argument */E/* tid = transaction id for this branch */I/* tm_name = address of commit domain name descriptor */E/* bid = address to receive new branch identifier */N/* - */ '#define sys$add_branch SYS$ADD_BRANCH 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$add_branch( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int tid [4], void *tm_name, unsigned int bid [4]);#else /* __OLD_STARLET */%int sys$add_branch(__unknown_params);!#endif /* #ifdef __NEW_S-TARLET */)#define sys$add_branchw SYS$ADD_BRANCHW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$add_branchw( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int tid [4], void *tm_name, unsigned int bid [4]);#else /* __OLD_STARLET */&int sys$add_branchw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */- N/* */]/* *************** NOTE: $CREATE_BRANCH(W) service definitions are obsolete ************** */N/* */N/* $CREATE_BRANCH */N/* */N/* Create a transaction branch */N/* - */I/* $CREATE_BRANCH = [efn], [flags], iosb, [astadr], [astprm], */I/* ($CREATE_BRANCHW) tid, bid [,[timout], [acmode], [tx_class]] */N/* */E/* efn = event flag to be set at completion */G/* flags = operation flags */F/* iosb = address of a quadword I/O status block - */H/* astadr = address of an entry mask of AST routine */H/* astprm = value to be passed to AST routine as an argument */E/* tid = transaction id for this branch */I/* bid = address to receive new branch identifier */H/* timout = transaction execution time-out value */H/* acmode = access mode for $CREATE_BRANCH call */I/* tx_class= user transaction class name - */N/* */ -#define sys$create_branch SYS$CREATE_BRANCH 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create_branch( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int tid [4], unsigned int bid [4], __optional_pa-rams );#else /* __OLD_STARLET */(int sys$create_branch(__unknown_params);!#endif /* #ifdef __NEW_STARLET *//#define sys$create_branchw SYS$CREATE_BRANCHW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$create_branchw( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int tid [4], unsigned int bid [4], __opt -ional_params );#else /* __OLD_STARLET */)int sys$create_branchw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $CVT_FILENAME */N/* */N/* Convert a string between RMS format and file-system format. */N/* */N/* $CVT_FILENAME cvttyp, srcstr, inflags, outbuf-, outlen, outflags */N/* */N/* cvttyp = value indicating conversion type (RMS-to-filesys or */N/* filesys-to-RMS) */N/* srcstr = address of string descriptor for source string */N/* inflags = mask indicating source string characteristics */N/* outbuf = address of string descriptor for output string */N -/* outlen = address to store length of returned output string */N/* outflags = address of a longword to receive flags describing */N/* output string */N/* */ +#define sys$cvt_filename SYS$CVT_FILENAME#ifdef __NEW_STARLETint sys$cvt_filename( unsigned int cvttyp, void *srcstr, unsigned int inflags, void *outbuf, unsigned -short int *outlen, unsigned int *outflags);#else /* __OLD_STARLET */'int sys$cvt_filename(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */G/* $DECLARE_RM [efn], [flags], iosb, [astadr], [astprm], */K/* ($DECLARE_RMW) rm_id, event_handler [, [part_name], */;/* [rm_context], [acmode], [tm_log_id], [event_mask]] */N/* - */N/* Declare Resource Manager to DDTM */N/* */E/* efn = event flag to set upon completion */G/* flags = operation flags */F/* iosb = address of I/O status block */H/* astadr = address of entry mask of AST routine */H/* astprm = value to be pass-ed to AST routine */G/* rm_id = address of longword to receive resource manager id */I/* event_rtn = address of entry mask of transaction event routine */I/* part_name = address of resource manager name descriptor */I/* rm_context = RM private value to be passed to evt_rtn */H/* acmode = value of access mode in which to invoke evt_rtn */I/* tm_log_id = transaction manager log id for validation checks */I/* event_mas-k = mask of events required by this resource manager */N/* */ '#define sys$declare_rm SYS$DECLARE_RM 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$declare_rm( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int *rm_id,( int (*event_han-dler)(__unknown_params), __optional_params );#else /* __OLD_STARLET */%int sys$declare_rm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */)#define sys$declare_rmw SYS$DECLARE_RMW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$declare_rmw( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int *rm_id,( i -nt (*event_handler)(__unknown_params), __optional_params );#else /* __OLD_STARLET */&int sys$declare_rmw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $END_BRANCH */N/* */N/* End an active branch of a transaction */N/* - */E/* $END_BRANCH [efn], [flags], iosb, [astadr], [astprm], */H/* ($END_BRANCHW) tid, bid */N/* */E/* efn = event flag to be set at completion */G/* flags = operation flags */F/* iosb = address of a quadword I/O status block - */H/* astadr = address of a completion AST routine entry mask */H/* astprm = value to be passed to completion AST routine */E/* tid = address of transaction identifier */E/* bid = address of transaction branch identifier */N/* */ '#define sys$end_branch SYS$END_BRANCH 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #e-ndif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$end_branch( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int tid [4], unsigned int bid [4]);#else /* __OLD_STARLET */%int sys$end_branch(__unknown_params);!#endif /* #ifdef __NEW_STARLET */)#define sys$end_branchw SYS$END_BRANCHW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus -*/ #ifdef __NEW_STARLETint sys$end_branchw( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int tid [4], unsigned int bid [4]);#else /* __OLD_STARLET */&int sys$end_branchw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $END_TRANS */N/* - */N/* Commit a transaction */N/* */D/* $END_TRANS [efn], [flags], iosb [, [astadr], [astprm], [tid] ] */I/* ($END_TRANSW) */N/* */E/* efn = event flag to be set at completion - */G/* flags = operation flags */F/* iosb = address of a quadword I/O status block */H/* astadr = address of an entry mask of AST routine */H/* astprm = value to be passed to AST routine as an argument */E/* tid = identifier of transaction to be committed */N/* */ %#define sys$end_trans SYS$END_TRANS 9#i-fdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$end_trans( unsigned int efn, unsigned int flags, struct _iosb *iosb, __optional_params );#else /* __OLD_STARLET */$int sys$end_trans(__unknown_params);!#endif /* #ifdef __NEW_STARLET */'#define sys$end_transw SYS$END_TRANSW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */- #ifdef __NEW_STARLETint sys$end_transw( unsigned int efn, unsigned int flags, struct _iosb *iosb, __optional_params );#else /* __OLD_STARLET */%int sys$end_transw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $FINISH_RMOP */N/* */N/* Finish resourc-e manager transaction event operation */N/* */F/* $FINISH_RMOP [efn], [flags], iosb, [astadr], [astprm], */N/* ($FINISH_RMOPW) part_id, retsts [, [reason], */4/* [beftime], [afttime] */N/* */E/* efn = event flag to set upon completion */G/* flags- = operation flags */F/* iosb = address of I/O status block */H/* astadr = address of entry mask of AST routine */H/* astprm = value to be passed to AST routine */I/* part_id = participant id value */H/* retsts = value of completion status */I/* reason = extended abort reason code (for veto vote) - */I/* beftim = lower bound of commit timestamp */N/* afttim = upper bound of commit timestamp */N/* */ )#define sys$finish_rmop SYS$FINISH_RMOP 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$finish_rmop( unsigned int efn, unsigned int flags, struct _ios-b *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int part_id, int retsts, __optional_params );#else /* __OLD_STARLET */&int sys$finish_rmop(__unknown_params);!#endif /* #ifdef __NEW_STARLET */+#define sys$finish_rmopw SYS$FINISH_RMOPW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$finish_rmopw( unsigned int efn, unsigned int flags, struct _iosb *iosb,"- void (*astadr)(__unknown_params), int astprm, unsigned int part_id, int retsts, __optional_params );#else /* __OLD_STARLET */'int sys$finish_rmopw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $FORGET_RM */N/* */N/* Forget a resource manager previously- declared to DECdtm */N/* */D/* $FORGET_RM [efn], [flags], iosb, [astadr], [astprm], rm_id */I/* ($FORGET_RMW) */N/* */E/* efn = event flag to set upon completion */G/* flags = operation flags */F/* iosb = addres -s of I/O status block */H/* astadr = address of entry mask of AST routine */H/* astprm = value to be passed to AST routine */G/* rm_id = resource manager id value */N/* */ %#define sys$forget_rm SYS$FORGET_RM 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplu-splus */ #ifdef __NEW_STARLETint sys$forget_rm( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int rm_id);#else /* __OLD_STARLET */$int sys$forget_rm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */'#define sys$forget_rmw SYS$FORGET_RMW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$forget_rmw( u-nsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int rm_id);#else /* __OLD_STARLET */%int sys$forget_rmw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $GET_DEFAULT_TRANS */N/* */N/* Get the current -process default transaction */N/* */D/* $GET_DEFAULT_TRANS tid */N/* */E/* tid = identifier of the process default transaction */N/* */ 5#define sys$get_default_trans SYS$GET_DEFAULT_TRANS#ifdef . __NEW_STARLETint sys$get_default_trans( unsigned int tid [4]);#else /* __OLD_STARLET */,int sys$get_default_trans(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $GET_UNWIND_ENTRY_INFO */N/* */N/* Get fixed-up unwind entry information */N/* */H/*. $GET_UNWIND_ENTRY_INFO pc, get_ue_block, name */N/* */I/* pc = target PC */N/* */I/* get_ue_block = address of a 4-quadword block to be filled in */N/* */I/* name = Fixed length string, pas.sed by descriptor. */I/* */I/* ... */G/* flags = address of MUTE flags, mask word, optional. */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif =#define sys$get_unwind_entry_info SYS$GET_UNWIND_ENTRY_INFO#ifdef __NEW_STARLETint sys$get_unwind_entry_info( unsigned __int64 pc, void *get_ue_bl.ock, void *name, __optional_params );#else /* __OLD_STARLET */0int sys$get_unwind_entry_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* */N/* $JOIN_RM */N/* */N/* Join a res.ource manager previously started transaction */N/* */B/* $JOIN_RM [efn], [flags], iosb, [astadr], [astprm], */J/* ($JOIN_RMW) rm_id [, [tid], [part_name], [rm_context], [timout]] */N/* */E/* efn = event flag to set upon completion */G/* flags = operation flags . */F/* iosb = address of I/O status block */H/* astadr = address of entry mask of AST routine */H/* astprm = value to be passed to AST routine */G/* rm_id = resource manager id value */E/* tid = address of transaction id */I/* part_name = participant name string */I/* rm_context = RM private value to pass to event routi.ne */H/* timout = transaction execution time-out value */N/* */ !#define sys$join_rm SYS$JOIN_RM 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$join_rm( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int rm_id,. __optional_params );#else /* __OLD_STARLET */"int sys$join_rm(__unknown_params);!#endif /* #ifdef __NEW_STARLET */##define sys$join_rmw SYS$JOIN_RMW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$join_rmw( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int rm_id, __optional_params );#else /* __OLD ._STARLET */#int sys$join_rmw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $RECOVER */N/* */N/* Recover transaction state. */N/* */B/* $RECOVER [e .fn], [flags], iosb, [astadr], [astprm], */N/* ($RECOVERW) recovery_prefix, event_handler, tm_log_id [, */</* [tid], [node], [rm_context], [acmode], [max_events]] */N/* */E/* efn = event flag to set upon completion */G/* flags = operation flags */F/* iosb = address of I/O status block */H/* astadr  . = address of entry mask of AST routine */H/* astprm = value to be passed to AST routine */N/* recovery_prefix = address of search name descriptor */N/* event_handler = address of entry mask of recovery event routine */N/* tm_log_id = address TM log identifier */N/* tid = address of transaction identifier */N/* node = address of node name des .criptor */P/* rm_context = value to be passed via event block to event_handler */Y/* acmode = value of access mode in which event ASTs should be delivered */X/* max_events = value of maximum number of events to be queued concurrently */N/* */ !#define sys$recover SYS$RECOVER 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* # .ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$recover( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, void *recovery_prefix,( int (*event_handler)(__unknown_params), unsigned int tm_log_id [4], __optional_params );#else /* __OLD_STARLET */"int sys$recover(__unknown_params);!#endif /* #ifdef __NEW_STARLET */##define sys$recoverw SYS$RECOVERW  9#ifdef __cplusplus /* Define structure prototypes * ./ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$recoverw( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, void *recovery_prefix,( int (*event_handler)(__unknown_params), unsigned int tm_log_id [4], __optional_params );#else /* __OLD_STARLET */#int sys$recoverw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* . */N/* $SET_DEFAULT_TRANS */N/* */N/* Set up the process default transaction */N/* */D/* $SET_DEFAULT_TRANS [efn], [flags], iosb [, [astadr], [astprm], */G/* ($SET_DEFAULT_TRANSW) [new_tid], [old_tid]] */N/* . */E/* efn = event flag to be set at completion */G/* flags = operation flags */F/* iosb = address of a quadword I/O status block */H/* astadr = address of an entry mask of AST routine */H/* astprm = value to be passed to AST routine as an argument */I/* new_tid = identifier of new process default transaction */I/* old_t.id = identifier of superceded process default transaction */N/* */ 5#define sys$set_default_trans SYS$SET_DEFAULT_TRANS 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$set_default_trans( unsigned int efn, unsigned int flags, struct _iosb *iosb, __optional_params );#else /* __OLD_STARLET */,int sys$set_.default_trans(__unknown_params);!#endif /* #ifdef __NEW_STARLET */7#define sys$set_default_transw SYS$SET_DEFAULT_TRANSW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$set_default_transw( unsigned int efn, unsigned int flags, struct _iosb *iosb, __optional_params );#else /* __OLD_STARLET */-int sys$set_default_transw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ .N/* */N/* $START_BITMAP */N/* */N/* Create and start a write bitmap */N/* */T/* $START_BITMAP handle_in, chan, devnam, name, cluster, flags, handle_out */N/* . */ +#define sys$start_bitmap SYS$START_BITMAP#ifdef __NEW_STARLETint sys$start_bitmap( unsigned int handle_in, unsigned short int chan, void *devnam, void *name, unsigned int cluster, unsigned int flags, void *handle_out, unsigned int policy, unsigned int refcnt);#else /* __OLD_STARLET */'int sys$start_bitmap(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* . */N/* $START_BRANCH */N/* */N/* Start a transaction branch */N/* */G/* $START_BRANCH [efn], [flags], iosb, [astadr], [astprm], */O/* ($START_BRANCHW) tid, tm_name, bid, [, [timout], [acmode], [tx_cla.ss]] */N/* */E/* efn = event flag to be set at completion */G/* flags = operation flags */F/* iosb = address of a quadword I/O status block */H/* astadr = address of an entry mask of AST routine */H/* astprm = value to be passed to AST routine as an argument */E/* tid = transaction id for this branch . */I/* tm_name = address of parent commit domain name descriptor */H/* bid = address of branch identifier */H/* timout = transaction execution time-out value */H/* acmode = access mode for $READY_TO_COMMIT call */I/* tx_class= user transaction class name */N/* */ +#define sys$start_branch . SYS$START_BRANCH 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$start_branch( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int tid [4], void *tm_name, unsigned int bid [4], __optional_params );#else /* __OLD_STARLET */'int sys$start_branch(__unknown_params);!#endif /* #ifdef __NEW_STARLET */-#define s.ys$start_branchw SYS$START_BRANCHW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$start_branchw( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int tid [4], void *tm_name, unsigned int bid [4], __optional_params );#else /* __OLD_STARLET */(int sys$start_branchw(__unknown_params);!#endif /* #ifdef __NEW_S .TARLET */ N/* */N/* $START_TRANS */N/* */N/* Start a new transaction */N/* */F/* $START_TRANS [efn], [flags], iosb [, [astadr], [astprm], */I/* ($START_TRANSW). [tid], [timout], [acmode], [tx_class]] */N/* */E/* efn = event flag to be set at completion */G/* flags = operation flags */F/* iosb = address of a quadword I/O status block */H/* astadr = address of an entry mask of AST routine */H/* astprm = value to be passed to AST routine as an argument */E/* . tid = identifier of transaction just started */H/* timout = transaction execution time-out value */H/* acmode = outermost access mode allowed to end the transaction */I/* tx_class= user transaction class name */N/* */ )#define sys$start_trans SYS$START_TRANS 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #end.if /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$start_trans( unsigned int efn, unsigned int flags, struct _iosb *iosb, __optional_params );#else /* __OLD_STARLET */&int sys$start_trans(__unknown_params);!#endif /* #ifdef __NEW_STARLET */+#define sys$start_transw SYS$START_TRANSW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$start_transw( unsigned int efn, . unsigned int flags, struct _iosb *iosb, __optional_params );#else /* __OLD_STARLET */'int sys$start_transw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $TRANS_EVENT */N/* */N/* Start a new transaction */N/* . */F/* $TRANS_EVENT [efn], [flags], iosb, [astadr], [astprm], */N/* ($TRANS_EVENTW) tid, rm_id, tx_event */N/* */N/* efn = event flag to be set at completion */N/* flags = operation flags */N/* iosb = address of a quadw.ord I/O status block */N/* astadr = address of an entry mask of AST routine */N/* astprm = value to be passed to AST routine as an argument */N/* tid = identifier of transaction just started */U/* rm_id = value of resource manager identifier returned by $DECLARE_RM */N/* tx_event = transaction transition event */N/*  . */ )#define sys$trans_event SYS$TRANS_EVENT 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$trans_event( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int tid [4], unsigned int rm_id, unsigned int tx_event);#else /* __OLD_STARLET */&int sys$trans_event(__unknown_params);!#endif /* #ifdef __N!.EW_STARLET */+#define sys$trans_eventw SYS$TRANS_EVENTW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$trans_eventw( unsigned int efn, unsigned int flags, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, unsigned int tid [4], unsigned int rm_id, unsigned int tx_event);#else /* __OLD_STARLET */'int sys$trans_eventw(__unknown_params);!#endif /* #ifdef __N ".EW_STARLET */ N/* $TSTCLUEVT */N/* */N/* Test Cluster Event Notification */N/* */N/* $TSTCLUEVT [handle], [acmode], [event] */N/* */N/* #. handle = address of handle */N/* */N/* acmode = access mode of AST */N/* */N/* event = code indicating type of event */N/* */ %#define sys$tstcluevt SYS$$.TSTCLUEVT#ifdef __NEW_STARLETint sys$tstcluevt(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *handle,#else unsigned __int64 handle,#endif unsigned int acmode, unsigned int event);#else /* __OLD_STARLET */$int sys$tstcluevt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  I/* PTD$CREATE %. */N/* */I/* Create a pseudo terminal */N/* */D/* PTD$CREATE CHAN, [ACMODE], [CHARBUFF], [BUFLEN], [HANGUP_AST], */;/* [HANGUP_ASTPRM], [AST_ACMODE], INADR */N/* */F/* CHAN = Address of word to recei&.ve channel number assigned */H/* ACMODE = Access mode associated with channel */I/* CHARBUFF = Address ofa 3 - 5 longword array containing device */;/* characteristics. */H/* BUFLEN = Length of characteristics buffer in bytes either */;/* 12, 16, or 20 */H/* ASTADR = Address of entry mask of AST routine */H/* ASTPRM = Value to be passed to AST routine '. */M/* AST_ACMODE = Access mode for whjich the AST is to be delivered */G/* INADR = Address of 2-longword array containing starting and */;/* ending virtual address of pages to be used as */;/* I/O buffers */ #define ptd$create PTD$CREATE 9#ifdef __cplusplus /* Define structure prototypes */struct _va_range; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint ptd$create(R#ifdef(. __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif unsigned short int *chan, unsigned int acmode, void *charbuff, unsigned short int buflen," void (*astadr)(__unknown_params), int astprm, unsigned int ast_acmode, struct _va_range *inadr);#else /* __OLD_STARLET */!int ptd$create(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  I/* PTD$READ ). */N/* */I/* Read data from the pseudo terminal */N/* */G/* PTD$READ(W) [EFN], CHAN, [ASTADR], [ASTPRM], READBUF, READBUF_LEN */E/* EFN = Number of event flag to set on completion */T/* CHAN = Word containing number of channel on which I*./O is to be performed */H/* ASTADR = Address of entry mask of AST routine */H/* ASTPRM = Value to be passed to AST routine */I/* READBUF = Address character string to hold characters read */I/* READBUF_LEN = Number of character to be read from pseudo terminal */ #define ptd$read PTD$READ#ifdef __NEW_STARLET int ptd$read( unsigned int efn, unsigned short int chan," void (*astadr)(__unknown_params), int astprm, void *rea+.dbuf, unsigned int readbuf_len);#else /* __OLD_STARLET */int ptd$read(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#define ptd$readw PTD$READW #ifdef __NEW_STARLETint ptd$readw( unsigned int efn, unsigned short int chan," void (*astadr)(__unknown_params), int astprm, void *readbuf, unsigned int readbuf_len);#else /* __OLD_STARLET */ int ptd$readw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  I/* PTD$WRITE ,. */N/* */I/* Write data to the pseudo terminal */N/* */C/* PTD$WRITE CHAN, [ASTADR], [ASTPRM], WRTBUF, WRTBUF_LEN, */;/* [ECHOBUF], ECHOBUF_LEN] */T/* CHAN = Word containing number of channel on which I/O is to be performed */H/* ASTADR = Ad -.dress of entry mask of AST routine */H/* ASTPRM = Value to be passed to AST routine */Q/* WRTBUF = Address of character string containing character to write to */;/* pseudo terminal */I/* WRTBUF_LEN = Number of characters to write to pseudo terminal */I/* ECHOBUF = Address character string to hold characters read */I/* ECHOBUF_LEN = Number of character to be read from pseudo terminal */ ..#define ptd$write PTD$WRITE#ifdef __NEW_STARLETint ptd$write( unsigned short int chan," void (*astadr)(__unknown_params), int astprm, void *wrtbuf, unsigned int wrtbuf_len, void *echobuf, unsigned int echobuf_len);#else /* __OLD_STARLET */ int ptd$write(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  I/* PTD$SET_EVENT_NOTIFICATION */N/* */I/* E/.nable or disable terminal event notification ASTs */N/* */D/* PTD$SET_EVENT_NOTIFICATION CHAN, ASTADR, [ASTPRM], [ACMODE], */-/* TYPE */T/* CHAN = Word containing number of channel on which I/O is to be performed */H/* ASTADR = Address of entry mask of AST routine */H/* ASTPRM = Value to be passed to AST routine */L/*0. ACMODE = Access mode for whjich the AST is to be delivered */F/* TYPE = Longword containing */ ?#define ptd$set_event_notification PTD$SET_EVENT_NOTIFICATION#ifdef __NEW_STARLETint ptd$set_event_notification( unsigned short int chan," void (*astadr)(__unknown_params), int astprm, unsigned int acmode, unsigned int type);#else /* __OLD_STARLET */1int ptd$set_event_notification(__unknown_params);!#endif /* #ifdef __NEW_STARL 1.ET */  I/* PTD$CANCEL */N/* */I/* Cancel queued control connection read request(s) */N/* */D/* PTD$CANCEL CHAN */N/* */T/* CHAN = Word contain2.ing number of channel on which I/O is to be performed */  #define ptd$cancel PTD$CANCEL#ifdef __NEW_STARLETint ptd$cancel( unsigned short int chan);#else /* __OLD_STARLET */!int ptd$cancel(__unknown_params);!#endif /* #ifdef __NEW_STARLET */I/* PTD$DELETE */N/* */I/* Delete a pseudo terminal */N/* 3. */D/* PTD$DELETE CHAN */N/* */T/* CHAN = Word containing number of channel on which I/O is to be performed */  #define ptd$delete PTD$DELETE#ifdef __NEW_STARLETint ptd$delete( unsigned short int chan);#else /* __OLD_STARLET */!int ptd$delete(__unknown_params);!#endif /* #ifdef __NEW4._STARLET */I/* PTD$DECTERM_SET_PAGE_SIZE */N/* */I/* Change terminal page length and width */N/* */C/* PTD$DECTERM_SET_PAGE_SIZE CHAN, PAGE_LEN, PAGE_WIDTH */N/* */T/* CHAN = Word containin5.g number of channel on which I/O is to be performed */I/* PAGE_LEN = Longword containing new page length of terminal */I/* PAGE_WIDTH = Longword containing new page width of terminal */  =#define ptd$decterm_set_page_size PTD$DECTERM_SET_PAGE_SIZE#ifdef __NEW_STARLETint ptd$decterm_set_page_size( unsigned short int chan, unsigned int page_len, unsigned int page_width);#else /* __OLD_STARLET */0int ptd$decterm_set_page_size(__unknown_params);!#endif /* #i6.fdef __NEW_STARLET */N/* $POSIX_FORK_CONTROL */N/* */N/* Control POSIX fork() operations */N/* */N/* $POSIX_FORK_CONTROL cntrl , [when] , [handler] , [arg] , [ac */N/* */N/*7. cntrl = constant defining what control routine is to do */N/* */N/* when = bit array of when handler is to be called */N/* */N/* handler= handler address */N/* */N/* arg = arg value th8.at is passed back to the handler */N/* */N/* acmode = access mode at which to make the specified callback */ 7#define sys$posix_fork_control SYS$POSIX_FORK_CONTROL#ifdef __NEW_STARLETint sys$posix_fork_control( unsigned int cntrl, unsigned int when," int (*handler)(__unknown_params), int arg, unsigned int acmode);#else /* __OLD_STARLET */-int sys$posix_fork_control(__unknown 9._params);!#endif /* #ifdef __NEW_STARLET */ N/* $START_ALIGN_FAULT_REPORT */N/* */N/* Start user-image alignment fault reporting */N/* */M/* $START_ALIGN_FAULT_REPORT report_method, [report_buffer, buffer_length] */N/* :. */G/* report_method = either AFR$C_EXCEPTION or AFR$C_BUFFERED */N/* */I/* report_buffer = buffer to use to save alignment fault */;/* data if the BUFFERED method is specified. */N/* */@/* buffer_length = the size in bytes of the user buffer */ #ifdef __INITIAL_POINTER_SIZEE/* Kee;.p as __short until service interface is promoted to 64-bits. */'#pragma __required_pointer_size __short#endif C#define sys$start_align_fault_report SYS$START_ALIGN_FAULT_REPORT#ifdef __NEW_STARLET!int sys$start_align_fault_report( int report_method, void *report_buffer, int buffer_length);#else /* __OLD_STARLET */3int sys$start_align_fault_report(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size <.__short#endif N/* $GET_ALIGN_FAULT_DATA */N/* */N/* Get alignment fault data from the collector. */N/* */I/* $GET_ALIGN_FAULT_DATA buffer, buffer_size, return_size */N/* */A/* buffe =.r = Buffer in which to save the alignment fault */;/* data. */N/* */E/* buffer_size = The size in bytes of the user buffer */N/* */E/* return_size = Address of a longword in which to return the */;/* size of the alignment fault data found. */ #ifdef __INITI>.AL_POINTER_SIZE&#pragma __required_pointer_size __long#endif ;#define sys$get_align_fault_data SYS$GET_ALIGN_FAULT_DATA#ifdef __NEW_STARLETint sys$get_align_fault_data( void *buffer, int buffer_size, int *return_size);#else /* __OLD_STARLET *//int sys$get_align_fault_data(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $STOP_ALIGN_FAULT_REPORT ?. */N/* */N/* Stop user-image alignment fault reporting */N/* */I/* $STOP_ALIGN_FAULT_REPORT */N/* */A#define sys$stop_align_fault_report SYS$STOP_ALIGN_FAULT_REPORT#ifdef __NEW_STA @.RLET&int sys$stop_align_fault_report(void);#else /* __OLD_STARLET */&int sys$stop_align_fault_report(void);!#endif /* #ifdef __NEW_STARLET */N/* $PERM_REPORT_ALIGN_FAULT */N/* */N/* Start process permanent alignment fault reporting. */N/* */I/* $PERM_REPORT_ALIGN_FAULT A. */N/* */A#define sys$perm_report_align_fault SYS$PERM_REPORT_ALIGN_FAULT#ifdef __NEW_STARLET&int sys$perm_report_align_fault(void);#else /* __OLD_STARLET */&int sys$perm_report_align_fault(void);!#endif /* #ifdef __NEW_STARLET */N/* $PERM_DIS_ALIGN_FAULT_REPORT */N/* B. */N/* Start process permanent alignment fault reporting. */N/* */I/* $PERM_DIS_ALIGN_FAULT_REPORT */N/* */I#define sys$perm_dis_align_fault_report SYS$PERM_DIS_ALIGN_FAULT_REPORT#ifdef __NEW_STARLET*int sys$perm_dis_align_fault_report(void);#else /* __OLD_STARLET */*int sys$permC._dis_align_fault_report(void);!#endif /* #ifdef __NEW_STARLET */N/* $INIT_SYS_ALIGN_FAULT_REPORT */N/* */N/* Start system wide alignment fault reporting. */N/* */I/* $INIT_SYS_ALIGN_FAULT_REPORT match_table, buffer_size, flags */N/* D. */E/* match_table = Array of longwords used to restrict */;/* the alignment faults reported */N/* */E/* buffer_size = The number of bytes to use to save alignment */;/* fault data. */@/* flags = can be either 0 or AFR$M_USER_INFO */N/* E. */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif I#define sys$init_sys_align_fault_report SYS$INIT_SYS_ALIGN_FAULT_REPORT#ifdef __NEW_STARLET$int sys$init_sys_align_fault_report( void *match_table, int buffer_size, unsigned int flags);#else /* __OLD_STARLET */6int sys$init_sys_align_fault_report(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_siz F.e __short#endif N/* $GET_SYS_ALIGN_FAULT_DATA */N/* */N/* Get alignment fault data from the system wide collector. */N/* */I/* $GET_SYS_ALIGN_FAULT_DATA buffer, buffer_size, return_size */N/* */H/* buf G.fer = Buffer in which to save the alignment fault */;/* data. */N/* */E/* buffer_size = The size in bytes of the user buffer */N/* */E/* return_size = Address of a longword in which to return the */;/* size of the alignment fault data found. */ #ifdefH. __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif C#define sys$get_sys_align_fault_data SYS$GET_SYS_ALIGN_FAULT_DATA#ifdef __NEW_STARLET!int sys$get_sys_align_fault_data( void *buffer, int buffer_size, int *return_size);#else /* __OLD_STARLET */3int sys$get_sys_align_fault_data(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $STOP_SYS_ALIGN_FAULT_REPOI.RT */N/* */N/* Stop system-wide alignment fault reporting */N/* */I/* $STOP_SYS_ALIGN_FAULT_REPORT */N/* */I#define sys$stop_sys_align_fault_report SYS$STOP_SYS_ALIGN J._FAULT_REPORT#ifdef __NEW_STARLET*int sys$stop_sys_align_fault_report(void);#else /* __OLD_STARLET */*int sys$stop_sys_align_fault_report(void);!#endif /* #ifdef __NEW_STARLET */N/* $RESCHED */N/* */N/* Request voluntary preemption of current process */N/* K.*/I/* $RESCHED */N/* */!#define sys$resched SYS$RESCHED#ifdef __NEW_STARLETint sys$resched(void);#else /* __OLD_STARLET */int sys$resched(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $SCHED */N/* L. */N/* Control class scheduler */N/* */N/* $SCHED func, P1, P2, P3 */N/* */N/* func = function code (see CSHDEFS in STARLET) */N/* M. */N/* P1 = buffer address, AST entry point address, or 0 */N/* */N/* P2 = buffer length address or AST acmode or PID or 0 */N/* */N/* P3 = entry size of a single buffer element or 0 */ #define sys$sched SYS$SCHED#ifdef __NEW_STARLETint sys$sc N.hed( unsigned int func, unsigned int *p1, unsigned int *p2, unsigned int *p3);#else /* __OLD_STARLET */ int sys$sched(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $SIGNAL_ARRAY_64 */N/* */N/* Return address of 64-bit signal array. O. */N/* */N/* $SIGNAL_ARRAY_64 mcharg, sigarg_64 */N/* */G/* mcharg = address of the mechanism array */N/* */J/* sigarg_64 = 64-bit pointer to which the address of */;/* 64-bit signal array is wrP.itten. */  1#define sys$signal_array_64 SYS$SIGNAL_ARRAY_64#ifdef __NEW_STARLETint sys$signal_array_64(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *mcharg,#else unsigned __int64 mcharg,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* An Q.d set ptr size default to 64-bit pointers */ void *sigarg_64#else unsigned __int64 sigarg_64#endif);#else /* __OLD_STARLET */*int sys$signal_array_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $AVOID_PREEMPT */N/* */N/* Enable/disable preemption avoidance */N/* R. */N/* $AVOID_PREEMPT enbflg */N/* */N/* enbflg = Avoid preempt enable indicator */N/* 0 -> disable 1 -> enable */N/* */-#define sys$avoid_preempt SYS$AVOID_PREEMPT #ifdef __NEW_STARL S.ETint sys$avoid_preempt( char enbflg);#else /* __OLD_STARLET */(int sys$avoid_preempt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* $SETUP_AVOID_PREEMPT */N/* */N/* Enable/disable preemption avoidance underpinnings */N/* */N/* $SETUP_AVOID_PREEMPT enbflg T. */N/* */N/* enbflg = Avoid preempt enable indicator */N/* 0 -> disable 1 -> enable */N/* */9#define sys$setup_avoid_preempt SYS$SETUP_AVOID_PREEMPT #ifdef __NEW_STARLETint sys$setup_avoid_preempt( char enbflg);#else /* _ U._OLD_STARLET */.int sys$setup_avoid_preempt(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $ICC_ACCEPT */N/* */N/* Accept an ICC connection */N/* */I/* V. $ICC_ACCEPT Conn_Handle ,[Accept_Buf] ,[Accept_Len] */;/* ,[User_Context] ,[Flags] */N/* */I/* Conn_Handle = Handle value associated with the Connection */H/* Accept_Buf = Address of user Accept data */H/* Accept_Len = Length of the accept data */K/* User_Context = User context value W. */D/* Flags = Flags argument */N/* */ '#define sys$icc_accept SYS$ICC_ACCEPT#ifdef __NEW_STARLETint sys$icc_accept( unsigned int conn_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *accept_buf,#else unsigned __int64 accept X._buf,#endif unsigned int accept_len, unsigned int user_context, unsigned int flags);#else /* __OLD_STARLET */%int sys$icc_accept(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $ICC_CLOSE_ASSOC */N/* */N/* Close an ICC association Y. */N/* */N/* $ICC_CLOSE_ASSOC Assoc_Handle */N/* */J/* Assoc_Handle = Handle representing the Association to close */N/* */1#define sys$icc_close_assoc SYS$ICC_CLOSE_ASSOC #ifdef __NEW_STARLETint sys$icc_ Z.close_assoc( unsigned int assoc_handle);#else /* __OLD_STARLET */*int sys$icc_close_assoc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $ICC_CONNECT[W] */N/* */N/* Initiate an ICC Connection attempt */N/* [. */M/* $ICC_CONNECT[W] IOS_ICC ,[astadr] ,[astprm] ,assoc_handle */;/* ,conn_hndl_A ,remote_assoc ,[remote_node] */;/* ,[user_context] ,[conn_buf] ,[conn_buf_len] */;/* ,[return_buf] ,[return_buf_len] ,[retlen_addr] */;/* ,[flags] */N/* */N/* ios_icc = address of a IOS_ICC (Connec\.t version) */M/* astadr = address of entry mask of users' completion AST */B/* routine */M/* astprm = value to be passed to the AST routine as an */;/* argument */N/* Assoc_Handle = Handle representing the Association to close */N/* Conn_Hndl_A = Address to return the handle value of the */;/* opened Connection ]. */N/* Remote_Assoc = Pointer to a descriptor describing the remote */;/* association name string */N/* Remote_Node = Pointer to a descriptor describing the remote */;/* node name string */N/* User_Context = User context value */N/* Conn_Buf = Address of a buffer containing Connect data */N/* Conn_Buf_Len = Leng^.th of the connect data in Conn_Buf */N/* Return_Buf = Address of a buffer for return data */N/* Return_Buf_Len = Length of the buffer available for return data */N/* Retlen_Addr = Address to receive the actual length of any */;/* return data */K/* Flags = Flags argument */N/* _. */ )#define sys$icc_connect SYS$ICC_CONNECT 9#ifdef __cplusplus /* Define structure prototypes */struct _ios_icc; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_connect(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _ios_icc *ios_icc,#else unsigned __int64 ios_icc,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defi `.ned whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigned __int64 astprm, unsigned int assoc_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ unsigned int *conn_hndl_a,#else unsigned __int64 conn_hndl_a,#endifR#ifdef __INI a.TIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif void *remote_assoc, void *remote_node, unsigned int user_context,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *conn_buf,#else unsigned __int64 conn_buf,#endif unsigned int conn b._buf_len,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *return_buf,#else unsigned __int64 return_buf,#endif unsigned int return_buf_len,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif unsigned int *retlen_addr, uc.nsigned int flags);#else /* __OLD_STARLET */&int sys$icc_connect(__unknown_params);!#endif /* #ifdef __NEW_STARLET */+#define sys$icc_connectw SYS$ICC_CONNECTW  9#ifdef __cplusplus /* Define structure prototypes */struct _ios_icc; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_connectw(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pd.ointers */ struct _ios_icc *ios_icc,#else unsigned __int64 ios_icc,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigned __int64 astprm, unsigned int assoc_handle, unsigned int *conn_hndl_a, void *remote_assoc, void *remote_node, unsigned int user_context,R#ifdef __INITIAL_POINTER_SIZE /* Dee.fined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *conn_buf,#else unsigned __int64 conn_buf,#endif unsigned int conn_buf_len,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *return_buf,#else unsigned __int64 return_buf,#endif unsigned int return_buf_len, f.R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif unsigned int *retlen_addr, unsigned int flags);#else /* __OLD_STARLET */'int sys$icc_connectw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $ICC_DISCONNECT[W] g. */N/* */N/* Initiate an ICC Disconnection */N/* */H/* $ICC_DISCONNECT[W] conn_handle ,IOSB ,[astadr] ,[astprm] */4/* ,[disc_buf] ,[disc_buf_len] */N/* */N/* Conn_Handle = Handle representing the Connh.ection to terminate */M/* iosb = Address of a quadword I/O status block */M/* astadr = Address of entry mask of users' completion AST */B/* routine */M/* astprm = Value to be passed to the AST routine as an */;/* argument */N/* Disc_Buf = Address of an optional buffer containing */;/* Disconnect data i. */N/* Disc_Buf_Len = Length of the disconnect data in Disc_Buf */N/* */ /#define sys$icc_disconnect SYS$ICC_DISCONNECT 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_disconnect( unsigned int conn_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pr j.agmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _iosb *iosb,#else unsigned __int64 iosb,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigned int astprm,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Zk.#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *disc_buf,#else unsigned __int64 disc_buf,#endif unsigned int disc_buf_len);#else /* __OLD_STARLET */)int sys$icc_disconnect(__unknown_params);!#endif /* #ifdef __NEW_STARLET */1#define sys$icc_disconnectw SYS$ICC_DISCONNECTW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_disc l.onnectw( unsigned int conn_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _iosb *iosb,#else unsigned __int64 iosb,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigm.ned int astprm,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *disc_buf,#else unsigned __int64 disc_buf,#endif unsigned int disc_buf_len);#else /* __OLD_STARLET */*int sys$icc_disconnectw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $ICC_REJECT n. */N/* */N/* Reject an ICC connection */N/* */I/* $ICC_REJECT Conn_Handle ,[Reject_Buf] ,[Reject_Buf_Len] */;/* ,[Reason] */N/* o. */I/* Conn_Handle = Handle value associated with the Connection */H/* Reject_Buf = Address of optional user Reject data */L/* Reject_Buf_Len = Length of the reject data */E/* Reason = Reason for the rejection */N/* */'#define sys$icc_reject SYS$ICC_REJECT #ifdef __NEW_STARLETint sys$icc_reject( unsigned int conn_handle,R#i p.fdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *reject_buf,#else unsigned __int64 reject_buf,#endif unsigned int reject_buf_len, unsigned int reason);#else /* __OLD_STARLET */%int sys$icc_reject(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* $ICC_OPEN_ASSOC q. */N/* */N/* Open an ICC association */N/* */M/* $ICC_OPEN_ASSOC assoc_handle ,[assoc_name] ,[logical_name] */;/* ,[logical_table] ,[conn_rtn] ,[disc_rtn] */;/* ,[recv_rtn] ,[maxflowbufcnt] ,[prot] */N/* r. */J/* Assoc_Handle = Address to return the handlevalue of the */;/* opened Association */M/* Assoc_Name = Pointer to a descriptor describing the */;/* association name string */M/* Logical_Name = Pointer to a descriptor describing a logical */;/* name for use by the ICC simple registry */N/* Logs.ical_Table = Pointer to a descriptor describing a logical */;/* name table for use by the ICC simple registry */G/* Conn_Rtn = Address of the User's Connect AST routine */G/* Disc_Rtn = Address of the User's Disconnect AST routine */G/* Recv_Rtn = Address of the User's receive AST routine */M/* Maxflowbufcnt = Maximum number of pending inbound message */;/* buffers */C/* Pro t.t = Default protection for association */N/* */ /#define sys$icc_open_assoc SYS$ICC_OPEN_ASSOC#ifdef __NEW_STARLETint sys$icc_open_assoc(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ unsigned int *assoc_handle,#else unsigned __int64 assoc_handle,#endifR#ifdef _ u._INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *assoc_name,#else unsigned __int64 assoc_name,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *logical_name,#else unsigned __int64 logical_name,#endifR#ifdef __INITIAL_POINT v.ER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *logical_table,#else unsigned __int64 logical_table,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif$ void (*conn_rtn)(__unknown_params),$ void (*disc_rtn)(__unknown_params),$ void (*recv_rtn w.)(__unknown_params), unsigned int maxflowbufcnt, unsigned int prot);#else /* __OLD_STARLET */)int sys$icc_open_assoc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $ICC_RECEIVE[W] */N/* */N/* Receive data over an ICC connection */Nx./* */M/* $ICC_RECEIVE[W] conn_handle ,ios_icc ,[astadr] ,[astprm] */;/* ,recv_buf ,recv_buf_len */N/* */N/* conn_handle = Handle representing the Connection the data */;/* is being transferred over */M/* ios_icc = Address of an I/O status block (16-bytey. ICC */E/* RECEIVE layout) */M/* astadr = Address of entry mask of users' completion AST */B/* routine */M/* astprm = Value to be passed to the AST routine as an */;/* argument */N/* recv_buf = Address of a buffer to receive the data */N/* recv_buf_len = Length of the buffer rz.eceiving the data */N/* */ )#define sys$icc_receive SYS$ICC_RECEIVE 9#ifdef __cplusplus /* Define structure prototypes */struct _ios_icc; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_receive( unsigned int conn_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default {. to 64-bit pointers */ struct _ios_icc *ios_icc,#else unsigned __int64 ios_icc,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigned __int64 astprm,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-b|.it pointers */ void *recv_buf,#else unsigned __int64 recv_buf,#endif unsigned int recv_buf_len);#else /* __OLD_STARLET */&int sys$icc_receive(__unknown_params);!#endif /* #ifdef __NEW_STARLET */+#define sys$icc_receivew SYS$ICC_RECEIVEW  9#ifdef __cplusplus /* Define structure prototypes */struct _ios_icc; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_receivew( unsigned int conn_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined when }.ever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _ios_icc *ios_icc,#else unsigned __int64 ios_icc,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigned __int64 astprm,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr~. size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *recv_buf,#else unsigned __int64 recv_buf,#endif unsigned int recv_buf_len);#else /* __OLD_STARLET */'int sys$icc_receivew(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $ICC_REPLY[W] */N/* . */N/* Send a reply over an ICC connection */N/* */K/* $ICC_REPLY[W] conn_handle ,ios_icc ,[astadr] ,[astprm] */;/* ,reply_buf ,reply_len */N/* */N/* conn_handle = Handle representing the Connection the data is . */B/* being transferred over */N/* ios_icc = Address of an I/O status block (8-byte ICC */G/* REPLY layout) */M/* astadr = Address of entry mask of users' completion AST */B/* routine */M/* astprm = Value to be passed to the AST routine as an */B/* argument . */N/* reply_buf = Address of a buffer containing the data */N/* reply_len = Length of the data in reply_buf */N/* */ %#define sys$icc_reply SYS$ICC_REPLY 9#ifdef __cplusplus /* Define structure prototypes */struct _ios_icc; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_reply( unsigned int conn_handle,R#ifdef _ ._INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _ios_icc *ios_icc,#else unsigned __int64 ios_icc,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigned int astprm,R#ifdef __INITIAL_POI.NTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *reply_buf,#else unsigned __int64 reply_buf,#endif unsigned int reply_len);#else /* __OLD_STARLET */$int sys$icc_reply(__unknown_params);!#endif /* #ifdef __NEW_STARLET */'#define sys$icc_replyw SYS$ICC_REPLYW  9#ifdef __cplusplus /* Define structure prototypes */struct _ios_icc; #endif /* #ifdef __cplusp .lus */ #ifdef __NEW_STARLETint sys$icc_replyw( unsigned int conn_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _ios_icc *ios_icc,#else unsigned __int64 ios_icc,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers *./#endif" void (*astadr)(__unknown_params), unsigned int astprm,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *reply_buf,#else unsigned __int64 reply_buf,#endif unsigned int reply_len);#else /* __OLD_STARLET */%int sys$icc_replyw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* . */N/* $ICC_TRANSCEIVE[W] */N/* */N/* ICC transceive operation */N/* */N/* $ICC_TRANSCEIVE[W] conn_handle ,ios_icc ,[astadr] ,[astprm] */;/* ,send_buf ,send_len */N/* . */N/* conn_handle = Handle representing the Connection the data is */B/* being transferred over */H/* ios_icc = Address of an I/O status block (20-byte ICC */F/* TRANSCEIVE layout ) */M/* astadr = Address of entry mask of users' completion AST */B/* routine */J/* . astprm = Value to be passed to the AST routine as an */B/* argument */H/* send_buf = Address of a buffer conta in ing the data */I/* send_len = Length of the data in send_buf */N/* */ /#define sys$icc_transceive SYS$ICC_TRANSCEIVE 9#ifdef __cplusplus /* Define structure prototypes */struct _ios_icc; .#endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_transceive( unsigned int conn_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _ios_icc *ios_icc,#else unsigned __int64 ios_icc,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr siz.e default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigned __int64 astprm,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *send_buf,#else unsigned __int64 send_buf,#endif unsigned int send_len);#else /* __OLD_STARLET */)int sys$icc_transceive(__unknown_params);!#endif /* #ifdef __NEW_STARLET */1#define sys$icc_transceiv.ew SYS$ICC_TRANSCEIVEW  9#ifdef __cplusplus /* Define structure prototypes */struct _ios_icc; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_transceivew( unsigned int conn_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _ios_icc *ios_icc,#else unsigned __int64 ios_icc,#endifR#ifdef __INITIAL_POINTER_SIZE . /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigned __int64 astprm,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *send_buf,#else unsigned __int64 send_buf,#endif unsigned int send_len);#else /* __OLD_STARLET . */*int sys$icc_transceivew(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $ICC_TRANSMIT[W] */N/* */N/* Transmit data over an ICC connection */N/* */N/* $ICC_TRAN.SMIT[W] conn_handle ,ios_icc ,[astadr] ,[astprm] */;/* ,send_buf ,send_len */N/* */N/* conn_handle = Handle representing the Connection the data is */B/* being transferred over */M/* ios_icc = Address of a quadword I/O status block */M/* astadr = Address of entry mask of users' completion AST . */B/* routine */M/* astprm = Value to be passed to the AST routine as an */B/* argument */H/* send_buf = Address of a buffer conta in ing the data */I/* send_len = Length of the data in send_buf */N/* */ +#define sys$icc_transmit SYS$ICC_TRANSMIT .9#ifdef __cplusplus /* Define structure prototypes */struct _ios_icc; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_transmit( unsigned int conn_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _ios_icc *ios_icc,#else unsigned __int64 ios_icc,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size prag.mas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigned __int64 astprm,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *send_buf,#else unsigned __int64 send_buf,#endif unsigned int send_len);#else /* __OLD_STARLET */'int sys$icc_transmit(__unkno.wn_params);!#endif /* #ifdef __NEW_STARLET */-#define sys$icc_transmitw SYS$ICC_TRANSMITW  9#ifdef __cplusplus /* Define structure prototypes */struct _ios_icc; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$icc_transmitw( unsigned int conn_handle,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _ios_icc *ios_icc,#else . unsigned __int64 ios_icc,#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif" void (*astadr)(__unknown_params), unsigned __int64 astprm,R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *send_buf,#else unsigned __int6 .4 send_buf,#endif unsigned int send_len);#else /* __OLD_STARLET */(int sys$icc_transmitw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $PERSONA_QUERY */N/* */N/* Query Persona Information */N/* */N/* $PERSONA_QUERY pers.ona, itmlst */N/* */N/* persona = address of longword holding persona identifier */N/* */H/* itmlst = address of list of item descriptors */N/* */N/* . */ -#define sys$persona_query SYS$PERSONA_QUERY#ifdef __NEW_STARLETint sys$persona_query(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endif unsigned int *persona, void *itmlst);#else /* __OLD_STARLET */(int sys$persona_query(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $PERSONA_FIND . */N/* */N/* Locate Persona With Characteristic */N/* */N/* $PERSONA_FIND persona, itmlst */N/* */N/* persona = address of longword holding persona identifier . */N/* */H/* itmlst = address of list of item descriptors */N/* */I/* contxt = address of a context long word (used for iterative */B/* calls or a multi-entry item list) */N/* */N/* . */N/* */ +#define sys$persona_find SYS$PERSONA_FIND#ifdef __NEW_STARLETint sys$persona_find( unsigned int *persona, void *itmlst, unsigned int *contxt);#else /* __OLD_STARLET */'int sys$persona_find(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $PERSONA_RESERVE */N/* . */N/* Reserve Persona Slot For Delegation */N/* */N/* $PERSONA_RESERVE clientPID, persona */N/* */N/* clientPID = address of longword holding client's PID */N/* . */N/* persona = address of longword holding persona identifier */N/* */N/* */ 1#define sys$persona_reserve SYS$PERSONA_RESERVE#ifdef __NEW_STARLETint sys$persona_reserve( unsigned int *clientpid, unsigned int *persona);#else /* __OLD_STARLET */*int sys$persona_reserve(__unknown_params);!#endif /* #ifdef . __NEW_STARLET */ N/* $PERSONA_DELEGATE */N/* */N/* Delegate Persona To Another Process */N/* */N/* $PERSONA_DELEGATE serverPID, persona, input_id */N/* */N/*. serverPID = address of longword holding server's PID */N/* */^/* persona = address of longword holding persona identifier reserved by server */N/* */W/* input_id = address of longword holding persona identifier to delegate */N/* */ .3#define sys$persona_delegate SYS$PERSONA_DELEGATE#ifdef __NEW_STARLETint sys$persona_delegate( unsigned int *serverpid, unsigned int *persona, unsigned int *input_id);#else /* __OLD_STARLET */+int sys$persona_delegate(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $PERSONA_EXTENSION_LOOKUP */N/* */N/* Find Extension on the system . */N/* */N/* $PERSONA_EXTENSION_LOOKUP extensionName, extensionID */N/* */N/* extensionName = address of string descriptor of name */N/* */N/* extensionID = address of longword the ID is written to . */N/* */N/* */ C#define sys$persona_extension_lookup SYS$PERSONA_EXTENSION_LOOKUP#ifdef __NEW_STARLET!int sys$persona_extension_lookup( void *extensionname, unsigned int *extensionid);#else /* __OLD_STARLET */3int sys$persona_extension_lookup(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $PERSONA_CREATE_EXTENSI.ON */N/* */N/* Create Persona Extension */N/* */Q/* $PERSONA_CREATE_EXTENSION persona, extensionID, buffer, length, flags */N/* */N/* persona = address of longword hold.ing persona identifier */N/* */N/* extensionID = address of longword holding extension to create */N/* */N/* buffer = address of TLV buffer */N/* */N/* length = address of longword containing TLV size in bytes .*/N/* */N/* flags = address of a flags longword */N/* */N/* */ C#define sys$persona_create_extension SYS$PERSONA_CREATE_EXTENSION#ifdef __NEW_STARLET!int sys$persona_create_extension( unsigned int *persona, unsigned int *extension .id, void *buffer, unsigned int *length, unsigned int *flags);#else /* __OLD_STARLET */3int sys$persona_create_extension(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $PERSONA_DELETE_EXTENSION */N/* */N/* Delete An Extension From A Persona */N/* . */N/* $PERSONA_DELETE_EXTENSION persona, extensionID */N/* */N/* persona = address of longword holding persona identifier */N/* */N/* extensionID = address of longword holding extension to delete */N/* */N/* . */ C#define sys$persona_delete_extension SYS$PERSONA_DELETE_EXTENSION#ifdef __NEW_STARLET!int sys$persona_delete_extension( unsigned int *persona, unsigned int *extensionid);#else /* __OLD_STARLET */3int sys$persona_delete_extension(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* $PERSONA_MODIFY */N/* . */N/* Modify Persona */N/* */N/* $PERSONA_MODIFY persona, itmlst */N/* */N/* persona = address of longword holding persona identifier */N/* */H/*. itmlst = address of list of item descriptors */N/* */N/* */ /#define sys$persona_modify SYS$PERSONA_MODIFY#ifdef __NEW_STARLETint sys$persona_modify( unsigned int *persona, void *itmlst);#else /* __OLD_STARLET */)int sys$persona_modify(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* . */N/* $SET_PROCESS_PROPERTIES[W] */N/* */N/* Set a simple value associated with a process */N/* */N/* $SET_PROCESS_PROPERTIES[W] mbz1 ,pidadr ,prcnam ,property */;/* ,value, prev_value [,bufsiz] [,bufcnt.] */N/* */J/* mbz1 = Reserved for future use by Digital. Must */;/* be specified as 0. */N/* pidadr = For system service logging, the address of */;/* the PID of the target process. Otherwise, 0. */N/* prcnam = For system service logging, the address of */;/* the process name descriptor of the target. */;/* process. Otherwise, must be 0. */N/* property = A constant that selects which property to set */K/* value = A quadword value to set the property to */N/* prev_value = The address of a quadword which will receive the */;/* previous value of the property */Q/* bufsiz = For PPROP$C_SS_ENABLE, the size in bytes of a log buffer */M/* bufcnt = For PPROP$C_SS_ENABLE., the number of log buffers */N/* flags = for PPROP$C_SS_ENABLE, the associated flags */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif?#define sys$set_process_properties SYS$SET_PROCESS_PROPERTIES #ifdef __NEW_STARLETint sys$set_process_properties( unsigned int mbz1, unsigned int *pidadr, void *prcnam, unsigned int property, unsigned __.int64 value, unsigned __int64 *prev_value, __optional_params );#else /* __OLD_STARLET */1int sys$set_process_properties(__unknown_params);!#endif /* #ifdef __NEW_STARLET */A#define sys$set_process_propertiesw SYS$SET_PROCESS_PROPERTIESW #ifdef __NEW_STARLET int sys$set_process_propertiesw( unsigned int mbz1, unsigned int *pidadr, void *prcnam, unsigned int property, unsigned __int64 value, unsigned __int64 *prev_value, __optional_params );#else /* __OLD_STA.RLET */2int sys$set_process_propertiesw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifJ/* SYS$ACQUIRE_GALAXY_LOCK */N/* */I/* $ACQUIRE_GALAXY_LOCK lock_handle,timeout,flags */N/* . */I/* lock_handle - GLOCK handle */I/* timeout - timeout value in 10 microsecond units */H/* flags - flags */ 9#define sys$acquire_galaxy_lock SYS$ACQUIRE_GALAXY_LOCK#ifdef __NEW_STARLETint sys$acquire_galaxy_lock( unsigned __int64 lock_handle, unsigned int timeout, unsigned int flags);#else ./* __OLD_STARLET */.int sys$acquire_galaxy_lock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ J/* SYS$CREATE_GALAXY_LOCK */N/* */N/* $CREATE_GALAXY_LOCK lcktbl_handle,name,size,timeout,ipl,rank,lock_handle */N/* */I/* lcktbl_handle - handle of lock table in which to create the lock */I/* n.ame - pointer to name of lock; 16 bytes. ASCIZ or Descriptor */F/* size - size of lock */I/* timeout - wait timeout value in 10 micro second units */J/* ipl - IPL to raise to when lock is acquired (kernel mode only) */F/* rank - rank of lock */I/* lock_handle - lock handle */N/* . */N/* */ 7#define sys$create_galaxy_lock SYS$CREATE_GALAXY_LOCK#ifdef __NEW_STARLETint sys$create_galaxy_lock( unsigned int lcktbl_handle, void *name, unsigned int size, unsigned int timeout, unsigned int ipl, unsigned int rank, unsigned __int64 *lock_handle);#else /* __OLD_STARLET */-int sys$create_galaxy_lock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ J/* SYS$CREA.TE_GALAXY_LOCK_TABLE */N/* */c/* $CREATE_GALAXY_LOCK_TABLE name,accmode,section_size,section_type,prot,lock_size,lcktbl_handle */N/* */N/* name - pointer to name of section; 16 bytes. ASCIZ or Descriptor */B/* accmode - access mode */F/* section_size - virtual size o .f the section (bytes) */I/* section_type - glcktbl$c_process | glcktbl$c_system */@/* prot - page protection */D/* lock_size - size of locks in the section */G/* lcktbl_handle - handle of lock table */N/* */ C#define sys$create_galaxy_lock_table SYS$CREATE_GALAXY_LOCK_TABLE#ifdef __NEW_STARLET!int .sys$create_galaxy_lock_table( void *name, unsigned int accmode, unsigned __int64 section_size, unsigned int section_type, unsigned int prot, unsigned int lock_size, unsigned int *lcktbl_handle);#else /* __OLD_STARLET */3int sys$create_galaxy_lock_table(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ J/* SYS$DELETE_GALAXY_LOCK */N/* */I/* $DELETE_GAL .AXY_LOCK lock_handle */N/* */I/* lock_handle - lock handle */N/* */ 7#define sys$delete_galaxy_lock SYS$DELETE_GALAXY_LOCK#ifdef __NEW_STARLETint sys$delete_galaxy_lock( unsigned __int64 lock_handle);#else /* __OLD_STARLET */-int sys$delete_galaxy_lock(__unk .nown_params);!#endif /* #ifdef __NEW_STARLET */ J/* SYS$DELETE_GALAXY_LOCK_TABLE */N/* */I/* $DELETE_GALAXY_LOCK_TABLE lcktbl_handle */N/* */G/* lcktbl_handle - handle of lock table */N/* . */ C#define sys$delete_galaxy_lock_table SYS$DELETE_GALAXY_LOCK_TABLE#ifdef __NEW_STARLET!int sys$delete_galaxy_lock_table( unsigned int lcktbl_handle);#else /* __OLD_STARLET */3int sys$delete_galaxy_lock_table(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ J/* SYS$GET_GALAXY_LOCK_INFO */N/* */]/* $GET_GALAXY_LOCK_INFO lcktbl_handle,name,time.out,size,ipl,rank,lock_handle, name_length */N/* */I/* lock_handle - lock handle */F/* name - pointer to name of lock; 16 bytes, zero terminated */I/* timeout - wait timeout value in 10 micro second units */F/* size - size of lock */J/* ipl - IPL to raise to when lock is acquired (kernel mode only) */F/* ran .k - rank of lock */G/* flags - flags from lock */U/* name_length - pointer to a word where the length of the name will be returned */N/* */ ;#define sys$get_galaxy_lock_info SYS$GET_GALAXY_LOCK_INFO#ifdef __NEW_STARLETint sys$get_galaxy_lock_info( unsigned __int64 lock_handle, char *name, unsigned int *timeout, unsig .ned int *size, unsigned int *ipl, unsigned int *rank, unsigned short int *flags, __optional_params);#else /* __OLD_STARLET *//int sys$get_galaxy_lock_info(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ J/* SYS$GET_GALAXY_LOCK_SIZE */N/* */I/* $GET_GALAXY_LOCK_SIZE min_size, max_size */N/* . */I/* min_size - minimum size of a galaxy lock */I/* max_size - maximum size of a galaxy lock */N/* */ ;#define sys$get_galaxy_lock_size SYS$GET_GALAXY_LOCK_SIZE#ifdef __NEW_STARLETint sys$get_galaxy_lock_size( unsigned int *min_size, unsigned int *max_size);#else /* __OLD_STARLET *//int sys$get_galaxy_lock_size(__unkno .wn_params);!#endif /* #ifdef __NEW_STARLET */ J/* SYS$INIT_GALAXY_LOCK */N/* */I/* $INIT_GALAXY_LOCK va,name,size,timeout,ipl,rank,lock_handle */N/* */D/* va - local va of memory to be initialized */F/* name - pointer to name of lock; 16 bytes, zero terminated */.F/* size - size of lock */I/* timeout - wait timeout value in 10 micro second units */J/* ipl - IPL to raise to when lock is acquired (kernel mode only) */F/* rank - rank of lock */I/* lock_handle - lock handle */N/* */N/* . */ 3#define sys$init_galaxy_lock SYS$INIT_GALAXY_LOCK 9#ifdef __cplusplus /* Define structure prototypes */struct _glock; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$init_galaxy_lock( struct _glock *va, char *name, unsigned int size, unsigned int timeout, unsigned int ipl, unsigned int rank, unsigned __int64 *lock_handle);#else /* __OLD_STARLET */+int sys$init_galaxy_lock(__unknown_params);!#endif /* #ifdef __N.EW_STARLET */ J/* SYS$INIT_GALAXY_LOCK_TABLE */N/* */h/* $INIT_GALAXY_LOCK_TABLE region_va,reg_phys_size,reg_virt_size,section_type,lock_size,lcktbl_handle */N/* */I/* region_va - local va of shared memory region where the locks reside */G/* reg_phys_size - physical size of the region (bytes) . */G/* reg_virt_size - virtual size of the region (bytes) */I/* section_type - glcktbl$c_process | glcktbl$c_system */D/* lock_size - size of locks in the section */G/* lcktbl_handle - handle of lock table */N/* */ ?#define sys$init_galaxy_lock_table SYS$INIT_GALAXY_LOCK_TABLE#ifdef __NEW_STARLETint sys$init_galaxy_lock_table( . void *region_va, unsigned __int64 reg_phys_size, unsigned __int64 reg_virt_size, unsigned int section_type, unsigned int lock_size, unsigned int *lcktbl_handle);#else /* __OLD_STARLET */1int sys$init_galaxy_lock_table(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ J/* SYS$RELEASE_GALAXY_LOCK */N/* */I/* $RELEASE_GALAXY_LOCK lock_handle . */N/* */I/* lock_handle - lock handle */N/* */ 9#define sys$release_galaxy_lock SYS$RELEASE_GALAXY_LOCK#ifdef __NEW_STARLETint sys$release_galaxy_lock( unsigned __int64 lock_handle);#else /* __OLD_STARLET */.int sys$release_galaxy_lock(__unknown_params);!#endif /* #ifdef __NEW ._STARLET */ J/* SYS$RESET_GALAXY_LOCK */N/* */I/* $RESET_GALAXY_LOCK lock_handle */N/* */I/* lock_handle - lock handle */I/* lock_va - local address of lock */N/* . */ 5#define sys$reset_galaxy_lock SYS$RESET_GALAXY_LOCK 9#ifdef __cplusplus /* Define structure prototypes */struct _glock; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$reset_galaxy_lock( unsigned __int64 lock_handle, struct _glock *(*(lock_va)));#else /* __OLD_STARLET */,int sys$reset_galaxy_lock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ J/* SYS$WAIT_ON_GLOCK . */N/* */I/* $WAIT_ON_GLOCK lock_handle,timeout */N/* */I/* lock_handle - lock handle */I/* timeout - timeout value; overrides the value in the lock */N/* */ -#d .efine sys$wait_on_glock SYS$WAIT_ON_GLOCK#ifdef __NEW_STARLETint sys$wait_on_glock( unsigned __int64 lock_handle, unsigned int timeout);#else /* __OLD_STARLET */(int sys$wait_on_glock(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ J/* SYS$NOTIFY_GLOCK_WAITERS */N/* */I/* $NOTIFY_GLOCK_WAITERS lock_handle,waiters */N/* . */I/* lock_handle - lock handle */I/* waiters - bitmask of galaxy nodes with waiters for this lock */N/* */ ;#define sys$notify_glock_waiters SYS$NOTIFY_GLOCK_WAITERS#ifdef __NEW_STARLETint sys$notify_glock_waiters( unsigned __int64 lock_handle, unsigned __int64 waiters);#else /* __OLD_STARLET */ ./int sys$notify_glock_waiters(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $QIOSERVER */N/* */N/* QIOserver Control and Information */N/* */N/* $.QIOSERVER [efn], func, [context], [itmlst], */N/* ($QIOSERVERW) [iosb], [astadr], [astprm] */N/* */N/* efn = event flag to be set when request completes */N/* func = code specifying function to be performed */N/* context = address of a longword containing a context number */N/* itmlst = address of a list . of item descriptors for the operation */R/* iosb = address of a quadword status block to receive the final status */Q/* astadr = address of an ast routine to be called when request completes */N/* astprm = 32-bit (VAX) or 64-bit (ALPHA) ast parameter */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif%#define sys$qioserver SYS$QIOSERVER  9.#ifdef __cplusplus /* Define structure prototypes */struct _qsrv_iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$qioserver( unsigned int efn, unsigned int func, unsigned int *context, void *itmlst, struct _qsrv_iosb *iosb," void (*astadr)(__unknown_params), __int64 astprm);#else /* __OLD_STARLET */$int sys$qioserver(__unknown_params);!#endif /* #ifdef __NEW_STARLET */'#define sys$qioserverw SYS$QIOSERVERW  9#ifdef __cplusplus /*. Define structure prototypes */struct _qsrv_iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$qioserverw( unsigned int efn, unsigned int func, unsigned int *context, void *itmlst, struct _qsrv_iosb *iosb," void (*astadr)(__unknown_params), __int64 astprm);#else /* __OLD_STARLET */%int sys$qioserverw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif N/* $DEVICE_.PATH_SCAN */N/* */N/* SCAN Device Path Information */N/* */N/* $DEVICE_PATH_SCAN [chan] ,[devnam] ,itmlst ,[contxt] ,[nullarg] */N/* */N/* chan = number of a channel as.signed to the device or */N/* 0 if device is specified by the devnam parameter */N/* */N/* devnam = address of device name or logical name descriptor */N/* */N/* itmlst = address of a list of item descriptors */N/* . */^/* contxt = address of long word used to indicate current position of $DEVICE_PATH_SCAN */N/* */N/* nullarg = reserved argument */N/* */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long.#endif3#define sys$device_path_scan SYS$DEVICE_PATH_SCAN  9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$device_path_scan( unsigned short int chan, void *devnam, void *itmlst, unsigned int *contxt, struct _generic_64 *nullarg);#else /* __OLD_STARLET */+int sys$device_path_scan(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragm .a __required_pointer_size __short#endif N/* $SET_DEVICE */N/* $SET_DEVICEW */N/* */N/* SET Device Information */N/* */N/* $SET_DEVICE [efn] ,[chan] ,[devnam] ,itmlst ,.[iosb] ,[astadr], */N/* $SET_DEVICEW [astprm] ,[nullarg] */N/* */N/* efn = event flag to be set at completion */N/* */N/* chan = number of a channel assigned to the device or */N/* 0 if device is specified by the devnam parameter */N/* . */N/* devnam = address of device name or logical name descriptor */N/* */N/* itmlst = address of a list of item descriptors */N/* */N/* iosb = address of a quadword I/O status block */N/* . */N/* astadr = address of entry mask of AST routine */N/* */N/* astprm = value to be passed to AST routine */N/* */N/* nullarg = reserved argument */N/* . */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif'#define sys$set_device SYS$SET_DEVICE  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb;struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$set_device( unsigned int efn, unsigned short int chan, void *devnam, void *itmlst, struct ._iosb *iosb," void (*astadr)(__unknown_params), int astprm, struct _generic_64 *nullarg);#else /* __OLD_STARLET */%int sys$set_device(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif  #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif)#define sys$set_devicew SYS$SET_DEVICEW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb;struct _.generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$set_devicew( unsigned int efn, unsigned short int chan, void *devnam, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), int astprm, struct _generic_64 *nullarg);#else /* __OLD_STARLET */&int sys$set_devicew(__unknown_params);!#endif /* #ifdef __NEW_STARLET */#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif  #ifdef __INITIAL_POINTER_SIZE&.#pragma __required_pointer_size __long#endifN/* */N/* $IO_TRANSITION */N/* $IO_TRANSITIONW */N/* */N/* IO State Transitions */N/* . */^/* $IO_TRANSITION tran_code,devnam,[nodename],[node_id],flags,efn,iosb,astadr,astprm */^/* $IO_TRANSITIONW tran_code,devnam,[nodename],[node_id],flags,efn,iosb,astadr,astprm */N/* */N/* Parameters: */J/* tran_code - Transition code of operation to be initiated */N/* devnam - CPU ID of processor to affecte.d */B/* nodename - ASCII descriptor name equivalent to node ID */N/* node_id - Galactic node ID */N/* flags - Quadword pointer to longword behavioral flags */N/* efn - Event flag number for completion notification */N/* iosb - IOSB block address for completion notification */N/* astadr - Address of AST routine name on completion */N/* astprm. - AST parameter to be passed back on completion */F/* contxt - Context longword */N/* */ -#define sys$io_transition SYS$IO_TRANSITION 9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$io_transition( int tran_code, void *devnam, void *nodename, int node_id, uns.igned int flags, unsigned int efn, struct _iosb *iosb," void (*astadr)(__unknown_params), unsigned __int64 astprm, unsigned int *contxt);#else /* __OLD_STARLET */(int sys$io_transition(__unknown_params);!#endif /* #ifdef __NEW_STARLET *//#define sys$io_transitionw SYS$IO_TRANSITIONW  9#ifdef __cplusplus /* Define structure prototypes */ struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$io_transitionw( int tran_code, void *devna.m, void *nodename, int node_id, unsigned int flags, unsigned int efn, struct _iosb *iosb," void (*astadr)(__unknown_params), unsigned __int64 astprm, unsigned int *contxt);#else /* __OLD_STARLET */)int sys$io_transitionw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* SYS$MAP_UIC */N/* */N/* $MAP_UIC uic, uid, gid . */N/* */N/* uic - address of the UIC to look up mapping for */N/* uid - address of cell to write matching UID into */N/* gid - address of cell to write matching GID into */N/* */ !#define sys$map_uic SYS$MAP_UIC#ifdef __NEW_STARLETint sy .s$map_uic( unsigned int *uic, unsigned int *uid, unsigned int *gid);#else /* __OLD_STARLET */"int sys$map_uic(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* SYS$MAP_UID */N/* */N/* $MAP_UIC uid, uic, username, retlen */N/* */N/* . uid - address of the UID to look up mapping for */N/* uid - address of cell to write matching UIC into */S/* username - address of a string descriptor to write matching username into */N/* retlen - address of a word to write the length of the username into */N/* */ !#define sys$map_uid SYS$MAP_UID#ifdef __NEW_STARLETint sys$map_uid( unsigned int *uid, u .nsigned int *uic, void *username, unsigned short int *retlen);#else /* __OLD_STARLET */"int sys$map_uid(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* SYS$SET_SESSION_ID - Create new POSIX session */N/* */N/* $SET_SESSION_ID sid */N/* */O/* sid - .address of a longword written with the newly created Session ID. */N/* */ /#define sys$set_session_id SYS$SET_SESSION_ID#ifdef __NEW_STARLETint sys$set_session_id( unsigned int *sid);#else /* __OLD_STARLET */)int sys$set_session_id(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* SYS$SET_PROCESS_GROUP - Create or change POSIX process group */N/* . */N/* $SET_PROCESS_GROUP pid, pgid, retpgid */N/* */N/* pid - address of a PID that is the target of this call */W/* pgid - address of a longword Process Group ID (also a PID) to have target join */V/* retpgid - address of a longword written with PGID of a new group (also a PID) */N/* . */ 5#define sys$set_process_group SYS$SET_PROCESS_GROUP#ifdef __NEW_STARLETint sys$set_process_group( unsigned int *pid, unsigned int *pgid, unsigned int *retpgid);#else /* __OLD_STARLET */,int sys$set_process_group(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* SYS$SET_POSIX_IDS - Set POSIX UID and GID values */N/* */N/* $SET_POSIX_IDS . itmlst, flags */N/* */N/* itlmst - address of an item list 3 of POSIX ID values to set */N/* flags - flags signed longword, by value */N/* */ -#define sys$set_posix_ids SYS$SET_POSIX_IDS#ifdef __NEW_STARLETint sys$set_posix_ids( void *itmlst, int flags); .#else /* __OLD_STARLET */(int sys$set_posix_ids(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* SYS$LOG_SYSTEM_SERVICE - Log system service request */N/* */_/* $LOG_SYSTEM_SERVICE logtype, [bufseqnum], [logentry], [service_status], [service_ra], */4/* [arglist_add],[vector_index], [prev_mode] */N/* */N/*. logtype - type of log entry, e.g., SSLOG$C_SS_ENTRY */N/* bufseqnum - address to store/fetch longword sequence number assoc. */I/* with log's buffer */N/* logentry - address to fetch/store 64-bit log buffer entry address */N/* service_status - completion status of service being logged */N/* service_ra - address corresponding to return address from call to */I/* service being logged . */Q/* arglist_add - address of VAX-style argument list to service being logged */S/* vector_index - position of system service vector in SYS$PUBLIC_VECTORS of */I/* service being logged */N/* prev_mode - mode from which service being logged was called */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif 7#define sys$log_system_service SYS$LOG_SYSTEM_.SERVICE 9#ifdef __cplusplus /* Define structure prototypes */struct _longword_unsigned;struct _generic_64; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$log_system_service( unsigned int logtyp, __optional_params );#else /* __OLD_STARLET */-int sys$log_system_service(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* . */N/* $GETLMI */N/* $GETLMIW */N/* */N/* Get License Management Information */N/* */N/* $GETLMI efn, contxt, 0, itmlst, iosb, astadr, astprm . */N/* $GETLMIW efn, contxt, 0, itmlst, iosb, astadr, astprm */N/* Inputs: */N/* efn - Event flag number. (optional, by value) */k/* contxt - Context block used for subsequent calls for wildcard license type. (optional by reference) */o/* reserved - String passed by descriptor. May be used for nodename in the future. (optional, by descriptor) */t/* itmlst - Item list contai .ning information to fully describe the requested function. (required, by reference) */I/* iosb - I/O status block. (optional, by reference) */h/* astadr - AST routine to be delivered and executed in the caller's mode. (optional, by reference) */I/* astprm - AST parameter for the AST routine. (optional, by value) */N/* */ #define sys$getlmi SYS$GETLMI 9#ifdef __cplusplus /* Define stru.cture prototypes */struct _generic_64; struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getlmi( unsigned int efn, struct _generic_64 *contxt, void *reserved, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), unsigned __int64 astprm);#else /* __OLD_STARLET */!int sys$getlmi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */!#define sys$getlmiw SYS$GETLMIW  9#ifdef __cplusplus /* Define structure prototypes. */struct _generic_64; struct _iosb; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$getlmiw( unsigned int efn, struct _generic_64 *contxt, void *reserved, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), unsigned __int64 astprm);#else /* __OLD_STARLET */"int sys$getlmiw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $SETLMI . */N/* $SETLMIW */N/* */N/* Set License Management Information */N/* */N/* $SETLMI efn, contxt, 0, itmlst, iosb, astadr, astprm */N/* $SETLMIW efn, contxt, 0, itmlst, iosb, astadr, .astprm */N/* Inputs: */N/* efn - Event flag number. (optional, by value) */k/* contxt - Context block used for subsequent calls for wildcard license type. (optional by reference) */o/* reserved - String passed by descriptor. May be used for nodename in the future. (optional, by descriptor) */t/* itmlst - Item list containing information to fully describe the requested function. (required ., by reference) */I/* iosb - I/O status block. (optional, by reference) */h/* astadr - AST routine to be delivered and executed in the caller's mode. (optional, by reference) */I/* astprm - AST parameter for the AST routine. (optional, by value) */N/* */ #define sys$setlmi SYS$SETLMI 9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; struct _iosb; #endif ./* #ifdef __cplusplus */ #ifdef __NEW_STARLETint sys$setlmi( unsigned int efn, struct _generic_64 *contxt, void *reserved, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), unsigned __int64 astprm);#else /* __OLD_STARLET */!int sys$setlmi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */!#define sys$setlmiw SYS$SETLMIW  9#ifdef __cplusplus /* Define structure prototypes */struct _generic_64; struct _iosb; #endif /* #ifdef __cplu.splus */ #ifdef __NEW_STARLETint sys$setlmiw( unsigned int efn, struct _generic_64 *contxt, void *reserved, void *itmlst, struct _iosb *iosb," void (*astadr)(__unknown_params), unsigned __int64 astprm);#else /* __OLD_STARLET */"int sys$setlmiw(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* */N/* $IEEE_SET_ROUNDING_MODE */N/* $IEEE_SET_PREC.ISION_MODE */N/* */X/* Set and retrieve the IEEE rounding/precision mode for the current kernel thread */N/* */N/* $IEEE_SET_ROUNDING_MODE( value, prev_value ) */N/* */W/* value = A longword co.nstant specifying the rounding mode for the thread */N/* prev_value = The address of a longword which will receive the */;/* previous rounding mode */N/* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif?#define sys$ieee_set_rounding_mode SYS$IEEE_SET_ROUNDING_MODE #ifdef __NEW_STARLETint sys$ieee_set_rounding_mode( int value, int. *prev_value);#else /* __OLD_STARLET */1int sys$ieee_set_rounding_mode(__unknown_params);!#endif /* #ifdef __NEW_STARLET */A#define sys$ieee_set_precision_mode SYS$IEEE_SET_PRECISION_MODE #ifdef __NEW_STARLET int sys$ieee_set_precision_mode( int value, int *prev_value);#else /* __OLD_STARLET */2int sys$ieee_set_precision_mode(__unknown_params);!#endif /* #ifdef __NEW_STARLET */  #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $D.EBUG_BREAK */N/* */N/* Manipulate hardware debug resources */N/* */N/* $DEBUG_BREAK func, handle, addr, addr_mask, mode_mask, access_mask */N/* */N/* func = what function to p.erform */N/* */N/* handle = address of handle */N/* */N/* addr = address to be debugged */N/* */N/* addr_mask = which bits in the address are significa .nt */N/* */N/* mode_mask = which mode(s) are to generate an exception */N/* */N/* access_mask = are we monitoring reads or writes? */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif)#define sys$debug_break SYS$DEBUG_BREAK #ifdef __NEW_STARLETint sys$de.bug_break( unsigned __int64 func, unsigned __int64 *handle, void *addr, unsigned __int64 addr_mask, unsigned __int64 mode_mask, unsigned int access_mask);#else /* __OLD_STARLET */&int sys$debug_break(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endifN/* $POWER_CONTROL */N/* . */N/* Manipulate the platform's power and performance settings */N/* */N/* $DEBUG_BREAK power_setting, current_value */N/* */W/* power_setting = a quadword value to specify the new power/performance setting */N/* */Z/*. current_value = the address of a quadword for the service to return the current */B/* setting (optional) */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endif-#define sys$power_control SYS$POWER_CONTROL #ifdef __NEW_STARLETint sys$power_control( unsigned __int64 power_setting, __optional_params);#else /* __OLD_STARLET */(int sys$power_control(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ .#ifdef __INITIAL_POINTER_SIZE'#pragma __required_pointer_size __short#endif $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __STARLET_LOADED */ ww$^/********************************************************************* .***********************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $STENVDEF ***/#ifndef __STENVDEF_LOADED#define __STENVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pra/gma __member_alignment __save#pragma __nomember_alignmentR#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 #define STENV$K_AUTO_ACTION 1#define STENV$K_BOOT_DEV 2#define STENV$K_BOOTDEF_DEV 3#define STENV$K_BOOTED_DEV 4#define STENV$K_BOOT_FILE 5#define STENV$K_BOOTED_FILE 6#define STENV$K_BOOT_OSFLAGS 7 #define STENV$K_BOOT/ED_OSFLAGS 8#define STENV$K_BOOT_RESET 9#define STENV$K_DUMP_DEV 10#define STENV$K_ENABLE_AUDIT 11#define STENV$K_LICENSE 12#define STENV$K_CHAR_SET 13#define STENV$K_LANGUAGE 14#define STENV$K_TTY_DEV 15#define STENV$K_SYSROOT 16#define STENV$K_BTFLAGS 17#define STENV$K_FRU_EEROM 18 #ifdef __NEW_STARLETtypedef struct _itemtype {& unsigned int stenvdef$l_item_code;$ unsigned int stenvdef$l_buf_len; __int64 stenvdef$q_buf_addr; __int64 stenvdef$q_ret_add /r; } ITEMTYPE;#else /* __OLD_STARLET */struct itemtype {& unsigned int stenvdef$l_item_code;$ unsigned int stenvdef$l_buf_len; int stenvdef$q_buf_addr [2]; int stenvdef$q_ret_addr [2]; } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* The following are operation codes for the FRU_EEROM item code. */N/* /*/#define STENVDEF$_K_FREE_FORM 0#define STENVDEF$_K_SDD_LOG 25 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __STENVDEF_LOADED */ ww+K^/********************************************************************************* /***********************************************/=/* Created: 5-Apr-2012 13:00:52 by OpenVMS SDL EV3-3 */N/* Source: 24-AUG-2005 09:35:46 $1$DGA7304:[STARLET.SRC]STR$ROUTINES.SDL;1 *//********************************************************************************************************************************//*** MODULE str$routines ***/#ifndef __STR_ROUTINES_LOADED#define __STR_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pra/gma __member_alignment __save#pragma __nomember_alignmentR#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 P/**************************************************************************** *//* * */2/* COPYRIGHT (c) 1988, 1994, 1995 BY * */D/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */&/* ALL RI /GHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */P/* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */P/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */&/* TRANSFERRED. * *//* / * */P/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. * *//* * */P/* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* * *//* * */P/******************************************************************* /********* */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_pointer_size __long#endifN/* STR$ADD */N/* */N/* Add Two Decimal Strings */N/* */N/* The Add Two Decimal Strings routine */N/* ad /ds two decimal strings of digits. */N/* */#define str$add STR$ADD #ifdef __NEW_STARLETunsigned int str$add( unsigned int *asign, int *aexp, void *adigits, unsigned int *bsign, int *bexp, void *bdigits, unsigned int *csign, int *cexp, void *cdigits);#else /* __OLD_STARLET */'unsigned int str$add(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* / STR$ANALYZE_SDESC */N/* */N/* Analyze String Descriptor */N/* */N/* The Analyze String Descriptor routine extracts the */N/* length and starting address of the data */N/* for a variety of strin /g descriptor classes. */N/* */-#define str$analyze_sdesc STR$ANALYZE_SDESC #ifdef __NEW_STARLET%unsigned short int str$analyze_sdesc( void *input_descriptor,) unsigned short int *word_integer_length, void *data_address);#else /* __OLD_STARLET */7unsigned short int str$analyze_sdesc(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$ANALYZE_SDESC_64 / */N/* */N/* Analyze String Descriptor (quadword output parameters) */N/* */N/* The Analyze String Descriptor routine extracts the */N/* length and starting address of the data */N/* for a variety of string descriptor classes. / */N/* */3#define str$analyze_sdesc_64 STR$ANALYZE_SDESC_64 #ifdef __NEW_STARLET"unsigned int str$analyze_sdesc_64( void *input_descriptor,' unsigned __int64 *quad_integer_length, void *(*(data_address)), __optional_params);#else /* __OLD_STARLET */4unsigned int str$analyze_sdesc_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$APPEND / */N/* */N/* Append String */N/* */N/* The Append String routine appends a source string to the end of a */N/* destination string. The destination string must be a dynamic or */N/* varying-length string. */N/* / */#define str$append STR$APPEND #ifdef __NEW_STARLETunsigned int str$append( void *destination_string, void *source_string);#else /* __OLD_STARLET */*unsigned int str$append(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$CASE_BLIND_COMPARE */N/* */N/* Compare Strings Without /Regard to Case */N/* */O/* The Compare Strings Without Regard to Case routine compares two input */O/* strings of any supported class and data type without regard to whether */N/* the alphabetic characters are uppercase or lowercase. */N/* */7#define str$case_blind_compare STR$CASE_BLIND_COMP /ARE #ifdef __NEW_STARLETint str$case_blind_compare( void *first_source_string, void *second_source_string);#else /* __OLD_STARLET */-int str$case_blind_compare(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$COMPARE */N/* */N/* Compare Two Strings */N/* / */N/* The Compare Two Strings routine compares the */N/* contents of two strings. */N/* */!#define str$compare STR$COMPARE #ifdef __NEW_STARLETint str$compare( void *first_source_string, void *second_source_string);#else /* __OLD_STARLET */"int str$compare(__unknown_params);!#endif /* /#ifdef __NEW_STARLET */N/* STR$COMPARE_EQL */N/* */N/* Compare Two Strings for Equality */N/* */N/* The Compare Two Strings for Equality routine, compares two */N/* strings to see if they have the same length and contents. */N //* Uppercase and lowercase characters are not considered equal. */N/* */)#define str$compare_eql STR$COMPARE_EQL #ifdef __NEW_STARLETunsigned int str$compare_eql( void *first_source_string, void *second_source_string);#else /* __OLD_STARLET *//unsigned int str$compare_eql(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$COMPARE_MULTI / */N/* */N/* Compare Two Strings for Equality Using Multinational Character Set */N/* */N/* The Compare Two Strings for Equality Using Multinational Character */N/* Set routine compares two character strings for equality using the */N/* DEC Multinational character set. */N/* / */-#define str$compare_multi STR$COMPARE_MULTI #ifdef __NEW_STARLETint str$compare_multi( void *first_source_string, void *second_source_string, __optional_params );#else /* __OLD_STARLET */(int str$compare_multi(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$CONCAT */N/* / */N/* Concatenate Two or More Strings */N/* */O/* The Concatenate Two or More Strings routine concatenates all specified */N/* source strings into a single destination string. */N/* */ #define str$concat STR$CONCAT#ifdef __NEW_STARLETunsigned int str$concat( void *d /estination_string, void *source_string_1, __optional_params);#else /* __OLD_STARLET */*unsigned int str$concat(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ N/* STR$COPY_DX */N/* */N/* Copy a Source String Passed by Descriptor to a Destination String */N/* */N/* /The Copy a Source String Passed by Descriptor to */N/* a Destination String routine copies a source string to */N/* a destination string. Both strings are */N/* passed by descriptor. */N/* */!#define str$copy_dx STR$COPY_DX #ifdef __NEW_STARLETunsigned int str$copy_dx( void *destination_str /ing, void *source_string);#else /* __OLD_STARLET */+unsigned int str$copy_dx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$COPY_R */N/* */N/* Copy a Source String Passed by Reference to a Destination String */N/* */N/* The Copy a Source String Passed by Refer /ence to a Destination String */N/* routine copies a source string passed by reference to a destination */N/* string. */N/* */#define str$copy_r STR$COPY_R #ifdef __NEW_STARLETunsigned int str$copy_r( void *destination_string,0 unsigned short int *word_integer_source_length, char *source_string_address);#else /* __OLD_STARLET */*unsigned/ int str$copy_r(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$COPY_R_64 */N/* */N/* Copy a Source String Passed by Reference to a Destination String */N/* */N/* The Copy a Source String Passed by Reference to a Destination String */N/* routine copies a source stri /ng passed by reference to a destination */N/* string. */N/* */%#define str$copy_r_64 STR$COPY_R_64 #ifdef __NEW_STARLETunsigned int str$copy_r_64( void *destination_string,. unsigned __int64 *quad_integer_source_length, char *source_string_address);#else /* __OLD_STARLET */-unsigned int str$copy_r_64(__unknown_params);!#endif /* #ifdef __N /EW_STARLET */N/* STR$DIVIDE */N/* */N/* Divide Two Decimal Strings */N/* */N/* The Divide Two Decimal Strings routine divides two decimal strings. */N/* */#define s!/tr$divide STR$DIVIDE #ifdef __NEW_STARLETunsigned int str$divide( unsigned int *asign, int *aexp, void *adigits, unsigned int *bsign, int *bexp, void *bdigits, int *total_digits,( unsigned int *round_truncate_indicator, unsigned int *csign, int *cexp, void *cdigits);#else /* __OLD_STARLET */*unsigned int str$divide(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$DUPL_CHAR */N/* "/ */N/* Duplicate Character Times */N/* */N/* The Duplicate Character empty Times routine generates a string */N/* containing n duplicates of the input character. If the destination */N/* string is an empty dynamic string descriptor, STR$DUPL_CHAR will */N/* allocate and initialize the st#/ring. */N/* */%#define str$dupl_char STR$DUPL_CHAR #ifdef __NEW_STARLETunsigned int str$dupl_char( void *destination_string, __optional_params );#else /* __OLD_STARLET */-unsigned int str$dupl_char(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$ELEMENT */N/* $/ */N/* Extract Delimited Element Substring */N/* */N/* The Extract Delimited Element Substring routine extracts an */N/* element from a string in which the elements are separated */N/* by a specified delimiter. */N/* %/ */!#define str$element STR$ELEMENT #ifdef __NEW_STARLETunsigned int str$element( void *destination_string, int *element_number, void *delimiter_string, void *source_string);#else /* __OLD_STARLET */+unsigned int str$element(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$FIND_FIRST_IN_SET */N/* */N/* Find First Character in &/a Set of Characters */N/* */N/* The Find First Character in a Set of Characters routine searches a */N/* string one character at a time, from left to right, comparing each */N/* character in the string to every character in a specified set of */N/* characters for which it is searching. */N/* '/ */5#define str$find_first_in_set STR$FIND_FIRST_IN_SET #ifdef __NEW_STARLETint str$find_first_in_set( void *source_string, void *set_of_characters);#else /* __OLD_STARLET */,int str$find_first_in_set(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$FIND_FIRST_NOT_IN_SET */N/* */N/* Find First Character that Does Not Occur in (/Set */N/* */N/* The Find First Character that Does Not Occur in Set routine searches */N/* a string, comparing each character to the characters in a specified */N/* set of characters. The string is searched character by character, */O/* from left to right. STR$FIND_FIRST_NOT_IN_SET returns the position of */N/* the first character in the string that does not match any of the )/ */N/* characters in the selected set of characters. */N/* */=#define str$find_first_not_in_set STR$FIND_FIRST_NOT_IN_SET #ifdef __NEW_STARLETint str$find_first_not_in_set( void *source_string, void *set_of_characters);#else /* __OLD_STARLET */0int str$find_first_not_in_set(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$FIND_FIRST_SUBSTRING */ */N/* */N/* Find First Substring in Input String */N/* */N/* The Find First Substring in Input String routine */N/* finds the first substring (in a provided list of */N/* substrings) occurring in a given string. */+/N/* */;#define str$find_first_substring STR$FIND_FIRST_SUBSTRING #ifdef __NEW_STARLET&unsigned int str$find_first_substring( void *source_string, int *index, int *substring_index, __optional_params);#else /* __OLD_STARLET */8unsigned int str$find_first_substring(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$FREE1_DX */N/* ,/ */N/* Free One Dynamic String */N/* */N/* The Free One Dynamic String routine deallocates one dynamic string. */N/* */##define str$free1_dx STR$FREE1_DX #ifdef __NEW_STARLETunsigned int str$free1_dx( void *string_descriptor -/);#else /* __OLD_STARLET */,unsigned int str$free1_dx(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$GET1_DX */N/* */N/* Allocate One Dynamic String */N/* */N/* The Allocate One Dynamic String routine allocates a specified numb ./er */N/* of bytes of dynamic virtual memory to a specified dynamic string */N/* descriptor. */N/* */!#define str$get1_dx STR$GET1_DX #ifdef __NEW_STARLETunsigned int str$get1_dx() unsigned short int *word_integer_length, void *character_string);#else /* __OLD_STARLET */+unsigned int str$get1_dx(__unknown_params);!#endif /* #ifdef __NEW//_STARLET */N/* STR$GET1_DX_64 */N/* */N/* Allocate One Dynamic String (quadword parameter) */N/* */N/* The Allocate One Dynamic String routine allocates a specified number */N/* of bytes of dynamic virtual memory to a specified dynamic string */N/* descri 0/ptor. */N/* */'#define str$get1_dx_64 STR$GET1_DX_64 #ifdef __NEW_STARLETunsigned int str$get1_dx_64(' unsigned __int64 *quad_integer_length, void *character_string);#else /* __OLD_STARLET */.unsigned int str$get1_dx_64(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$LEFT */1/N/* */N/* Extract a Substring of a String */N/* */N/* The Extract a Substring of a String routine copies a substring of a */N/* source string into a destination string. The relative starting */N/* position in the source string is 1. */N/* 2/ */#define str$left STR$LEFT #ifdef __NEW_STARLETunsigned int str$left( void *destination_string, void *source_string, int *end_position);#else /* __OLD_STARLET */(unsigned int str$left(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$LEN_EXTR */N/* */N/* Extract a Substring of a 3/ String */N/* */N/* The Extract a Substring of a String routine copies a substring of */N/* a source string into a destination string. */N/* */##define str$len_extr STR$LEN_EXTR #ifdef __NEW_STARLETunsigned int str$len_extr( void *destination_string, void *source_st 4/ring, int *start_position, int *longword_integer_length);#else /* __OLD_STARLET */,unsigned int str$len_extr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$MATCH_WILD */N/* */N/* Match Wildcard Specification */N/* */N/* The 5/Match Wildcard Specification routine is used to compare a pattern */N/* string that includes wildcard characters with a candidate string. It */N/* returns a condition value of STR$_MATCH if the strings match and */N/* line_break STR$_NOMATCH if they do not match. */N/* */'#define str$match_wild STR$MATCH_WILD #ifdef __NEW_STARLETunsigned int str$match_wild( void *candidate_s 6/tring, void *pattern_string);#else /* __OLD_STARLET */.unsigned int str$match_wild(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$MUL */N/* */N/* Multiply Two Decimal Strings */N/* */Q/* The Multiply Two Decimal Strings r7/outine multiplies two decimal strings. */N/* */#define str$mul STR$MUL #ifdef __NEW_STARLETunsigned int str$mul( unsigned int *asign, int *aexp, void *adigits, unsigned int *bsign, int *bexp, void *bdigits, unsigned int *csign, int *cexp, void *cdigits);#else /* __OLD_STARLET */'unsigned int str$mul(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$POSITION 8/ */N/* */N/* Return Relative Position of Substring */N/* */N/* The Return Relative Position of Substring routine searches for the */N/* first occurrence of a single substring within a source string. If */N/* STR$POSITION finds the substring, it returns the r9/elative position */N/* of that substring. If the substring is not found, STR$POSITION */N/* returns a zero. */N/* */##define str$position STR$POSITION #ifdef __NEW_STARLETunsigned int str$position( void *source_string, void *substring, __optional_params);#else /* __OLD_STARLET */,unsigned int str$position(__unknown_params);!#endif /* :/#ifdef __NEW_STARLET */N/* STR$POS_EXTR */N/* */N/* Extract a Substring of a String */N/* */N/* The Extract a Substring of a String routine copies a substring of a */N/* source string into a destination string. */N;//* */##define str$pos_extr STR$POS_EXTR #ifdef __NEW_STARLETunsigned int str$pos_extr( void *destination_string, void *source_string, int *start_position, int *end_position);#else /* __OLD_STARLET */,unsigned int str$pos_extr(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$PREFIX */N/* / */O/* The Reciprocal of a Decimal String routine takes the reciprocal of the */N/* first decimal string to the precision limit specified by the second */N/* decimal string and returns the result as a decimal string. */N/* */#define str$recip STR$RECIP #ifdef __NEW_STARLETunsigned int str$recip( unsigned int *asign, int *ae?/xp, void *adigits, unsigned int *bsign, int *bexp, void *bdigits, unsigned int *csign, int *cexp, void *cdigits);#else /* __OLD_STARLET */)unsigned int str$recip(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$REPLACE */N/* */N/* Replace a Substring */N/* @/ */N/* The Replace a Substring routine copies a source string to a */N/* destination string, replacing part of the string with another */N/* string. The substring to be replaced is specified by its starting */N/* and ending positions. */N/* */!#define str$replace STR$REPLACE #ifdef _ A/_NEW_STARLETunsigned int str$replace( void *destination_string, void *source_string, int *start_position, int *end_position, void *replacement_string);#else /* __OLD_STARLET */+unsigned int str$replace(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$RIGHT */N/* */N/* Extract a Substring of a String B/ */N/* */N/* The Extract a Substring of a String routine copies a substring */N/* of a source string into a destination string. */N/* */#define str$right STR$RIGHT #ifdef __NEW_STARLETunsigned int str$right( void *destination_string, void *source_string, int *start_position);#else /* __O C/LD_STARLET */)unsigned int str$right(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$ROUND */N/* */N/* Round or Truncate a Decimal String */N/* */N/* The Round or Truncate a Decimal String routine rounds or truncates a */N/* deciD/mal string to a specified number of significant digits and places */N/* the result in another decimal string. */N/* */#define str$round STR$ROUND #ifdef __NEW_STARLETunsigned int str$round( int *places, unsigned int *flags, unsigned int *asign, int *aexp, void *adigits, unsigned int *csign, int *cexp, void *cdigits);#else /* __OLD_STARLET */)unsigned intE/ str$round(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$TRANSLATE */N/* */N/* Translate Matched Characters */N/* */N/* The Translate Matched Characters routine successively compares each */N/* character in a source string to F/all characters in a match string. */N/* If a source character has a match, the destination character is taken */N/* from the translate string. Otherwise, STR$TRANSLATE moves the source */N/* character to the destination string. */N/* */%#define str$translate STR$TRANSLATE #ifdef __NEW_STARLETunsigned int str$translate( void *destination_string, void *source_string G/, void *translation_string, void *match_string);#else /* __OLD_STARLET */-unsigned int str$translate(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$TRIM */N/* */N/* Trim Trailing Blanks and Tabs */N/* */N/* The Trim Tra H/iling Blanks and Tabs routine copies a source string */N/* to a destination string and deletes the trailing blank and tab */N/* characters. */N/* */#define str$trim STR$TRIM #ifdef __NEW_STARLETunsigned int str$trim( void *destination_string, void *source_string, __optional_params);#else /* __OLD_STARLET */(unsigned int str$trim(I/__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* STR$UPCASE */N/* */N/* Convert String to All Uppercase Characters */N/* */N/* The Convert String to All Uppercase Characters routine */N/* converts a source string to uppercase. J/ */N/* */#define str$upcase STR$UPCASE #ifdef __NEW_STARLETunsigned int str$upcase( void *destination_string, void *source_string);#else /* __OLD_STARLET */*unsigned int str$upcase(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointK/er_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __STR_ROUTINES_LOADED */ ww{_/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STRMSG.SDI;1 *//************************* L/*******************************************************************************************************//*** MODULE $STRDEF ***/#ifndef __STRDEF_LOADED#define __STRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined required ptr size */M/[#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 vari N/ant_union#endif#endif N/* */Q/* This SDL File Generated by VAX-11 Message V04-00 on 5-APR-2012 13:00:39.78 */N/* */N/* FILE: STRMSG.MSG EDIT: JWN2008 */N/* */Q/********************************************************************* O/******** *//** * */8/** COPYRIGHT (C) 1978, 1980, 1982, 1984 BY * */E/** DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */'/** ALL RIGHTS RESERVED. * *//** * */Q/** THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */Q/** ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */Q/** INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */Q/** COPIES THEREOF MA P/Y NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/** OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */ /** TRANSFERRED. * *//** * */Q/** THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */Q/** AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */ /** CORPORATION. * *//** * */Q/** DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS Q/ * */F/** SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//** * *//** * */Q/***************************************************************************** */N/* */N/* */P/* 2-001 - CONVERT TO MESSAGE UTILITY SOURCE FORMAT. ADAPTED FROM STRMSG.MSG */I/* VERSION 1-004. SBL 22-APR-1981 R/ */N/* 2-005 - ADD .TITLE AND .IDENT. SBL 28-AUG-1982 */U/* 2-002 - DON'T DEFINE STR$_NORMAL HERE, DO IT IN STRMSGDEF.MAR. SBL 27-APR-1981 */N/* 2-003 - ADD STR$_MATCH AND STR$_NOMATCH. RKR 2-JUL-1982 */N/* 2-004 - NOW DEFINE STR$_NORMAL HERE. SBL 24-AUG-1982 */N/* 2-006 - ADD DEFINITIONS FOR STR$_INVDELIM (INVALID DELIMITER) AND */I/* STR$_NOELEM (NO ELEMENT FOUND), TWO NEW STATUS VALUES TO BE */GS//* USED BY STR$ELEMENT. ROW 03-NOV-1986 */N/* 2-007 - ADD STR$_ERRFREDYN, USED WHEN LIB$FREE_VM BARFS ON A STRING */I/* WE ARE TRYING TO FREE. IE. THE USER HAS A CLASS_D DESCR POINTING */I/* AT SOME ARBITRARY MEMORY. */N/* 2-008 - REMOVE FIRST LETTER CAPITALIZATION FROM ERROR MESSAGES. *//* JWN 26-APR-1987 */N/*+ */N/* SYMT/BOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: */N/* */I/* STR$_ABCMNOXYZ */N/* */O/* IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", */Q/* AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR */N/* MESSAGE, NOT COUNTING ARTICU/LES AND PREPOSITIONS. */N/* */N/* */N/* MACRO-32 PROGRAMMING: */N/* */N/* THE MACRO CALL: */N/* V/ */I/* $STRDEF */N/* */N/* WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. */N/* THE RUN-TIME LIBRARY DECLARES THESE SYMBOLS AS EXTERNAL; */N/* THE MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER. */N/*- */N/* W/ */N/* THE FOLLOWING SEVERE ERRORS ARE ALWAYS SIGNALLED. */N/* */</* ; NOTE: ERROR CODES MUST NOT OVERLAP SUCESS CODES!!! */#define STR$_FACILITY 36#define STR$_FATINTERR 2392132#define STR$_DIVBY_ZER 2392140#define STR$_ILLSTRCLA 2392148#define STR$_STRIS_INT 2392156#define STR$_WRONUMARG 2392164#define STR$_INSVIRMEM 2 X/392172#define STR$_STRTOOLON 2392180#define STR$_ERRFREDYN 2392188N/* */N/* THE FOLLOWING ARE WARNING ERRORS. */N/* */;/* ; GO IN STEPS OF 8. */#define STR$_TRU 2392576#define STR$_NOMATCH 2392584#define STR$_INVDELIM 2392592#define STR$_NOELEM 2392600N/* Y/ */N/* THE FOLLOWING ARE QUALIFIED SUCCESS MESSAGES */N/* */;/* ; GO IN STEPS OF 8. */#define STR$_NEGSTRLEN 2393089#define STR$_ILLSTRPOS 2393097#define STR$_ILLSTRSPE 2393105#define STR$_MATCH 2393113N/* */N/* DEFINE STR$ Z/_NORMAL TO BE THE SAME AS SS$_NORMAL. */N/* */#define STR$_NORMAL 1N/* */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus [/ }#endif#pragma __standard #endif /* __STRDEF_LOADED */ ww\_/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// -----------------------------------------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA \/64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * * */P/* * Confidential computer software. Valid license from HP and/or * */P/* * its subsidiaries required for possession, ]/use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. * */P/* * ^/ * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein should be construed as constituting an _/* */P/* * additional warranty. * */P/* * * */P/* ************************************************************************* *//* ******************************************************************************************************************************** */@/* Created: 5-Apr-2012 13:00:57 by OpenVMS SDL EV3-3 */M/* Source: 31-AUG-1992 15:07:09 $1$DGA7304:[STA`/RLET_H.SRC]STSDEF.SDL;1 *//* ******************************************************************************************************************************** */  /* .MACRO $STSDEF,$GBL */ /* $DEFINI STS,$GBL *//* */B/* ;.MACROS TO DEFINE SYSTEM SERVICE FAILURE AND STATUS CODES. *//* *//* */ /* $STRUCT SS *//* */6/* THIS STRUCTURE IS NOW CONTAINED IN 'SSMSG.MDL' *//* + */7/* Define 32-bit VAX-11 error code longword fields */J/* Changed ta/o agree with Handbook - TNH 26-OCT-77 - CHANGE M 1 to P 1 */G/* Changed to agree with new status value W. H. Brown 18-NOV-1977 *//* - */#define STS$M_SEVERITY 0x7#define STS$M_COND_ID 0xFFFFFF8 #define STS$M_CONTROL 0xF0000000#define STS$M_SUCCESS 0x1#define STS$M_MSG_NO 0xFFF8#define STS$M_CODE 0x7FF8#define STS$M_FAC_SP 0x8000 #define STS$M_CUST_DEF 0x8000000"#define STS$M_INHIB_MSG 0x10000000#define STS$M_FAC_NO 0xFFF00006#define STS$K_WARNING 0 /* WAR b/NING */D#define STS$K_SUCCESS 1 /* SUCCESSFUL COMPLETION */2#define STS$K_ERROR 2 /* ERROR */7#define STS$K_INFO 3 /* INFORMATION */:#define STS$K_SEVERE 4 /* SEVERE ERROR */#define STS$S_STSDEF 4#define STS$S_SEVERITY 3=#define STS$V_SEVERITY 0 /* severity code */#define STS$S_COND_ID 25;#define STS$V_COND_ID 3 /* condition id */#define STS$S_CONTROL 4;#define STS$V_CONTROL 28 c/ /* control bits */6#define STS$V_SUCCESS 0 /* Success */#define STS$S_MSG_NO 13<#define STS$V_MSG_NO 3 /* Message number */#define STS$S_CODE 120#define STS$V_CODE 3 /* code */D#define STS$V_FAC_SP 15 /* 1 if facility specific */\#define STS$V_CUST_DEF 27 /* 1 if sub-system is customer (or CSS) defined */S#define STS$V_INHIB_MSG 28 /* 1 if message should not be printed */#defd/ine STS$S_FAC_NO 12A#define STS$V_FAC_NO 16 /* Facility is 12 bits *//* + *//* Define severity codes *//* - */ /* $DEFEND STS,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR e/-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $STSDEF ***/#ifndef __STSDEF_LOADED#define __STSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#praf/gma __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 #ifn g/def __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* MACROS TO DEFINE SYSTEM SERVICE FAILURE AND STATUS CODES. */N/* */N/* */N/* $STRUCT SS h/ */N/* */N/* THIS STRUCTURE IS NOW CONTAINED IN 'SSMSG.MDL' */N/*+ */N/* Define 32-bit VAX-11 error code longword fields */N/* Changed to agree with Handbook - TNH 26-OCT-77 - CHANGE M 1 to P 1 */N/* Changed to agree with new status value W. H. Brown 18-NOV-1977 */N/*- i/ */#define STS$M_SEVERITY 0x7#define STS$M_COND_ID 0xFFFFFF8 #define STS$M_CONTROL 0xF0000000#define STS$M_SUCCESS 0x1#define STS$M_MSG_NO 0xFFF8#define STS$M_CODE 0x7FF8#define STS$M_FAC_SP 0x8000 #define STS$M_CUST_DEF 0x8000000"#define STS$M_INHIB_MSG 0x10000000#define STS$M_FAC_NO 0xFFF0000N#define STS$K_WARNING 0 /* WARNING */N#define STS$K_SUCCESS 1 /* S j/UCCESSFUL COMPLETION */N#define STS$K_ERROR 2 /* ERROR */N#define STS$K_INFO 3 /* INFORMATION */N#define STS$K_SEVERE 4 /* SEVERE ERROR */ #ifdef __NEW_STARLETtypedef union _stsdef { __struct {N unsigned sts$v_severity : 3; /* severity code */N unsigned sts$v_cond_id : 25; /* condition id */N k/ unsigned sts$v_control : 4; /* control bits */ } sts$r_stsdef_bits0; __struct {N unsigned sts$v_success : 1; /* Success */N unsigned stsdef$$_fill_1 : 2; /* skip severity field */N unsigned sts$v_msg_no : 13; /* Message number */ } sts$r_stsdef_bits1; __struct {N unsigned stsdef$$_fill_2 : 3; /* Skip severity field */N l/ unsigned sts$v_code : 12; /* code */N unsigned sts$v_fac_sp : 1; /* 1 if facility specific */& unsigned stsdef$$_fill_3 : 11;[ unsigned sts$v_cust_def : 1; /* 1 if sub-system is customer (or CSS) defined */Q unsigned sts$v_inhib_msg : 1; /* 1 if message should not be printed */N unsigned stsdef$$_fill_4 : 3; /* reserved control bits */ } sts$r_stsdef_bits2; __struct {N m/ unsigned stsdef$$_fill_5 : 16; /* Skip message nubmer field */N unsigned sts$v_fac_no : 12; /* Facility is 12 bits */N unsigned stsdef$$_fill_6 : 4; /* Control bits */ } sts$r_stsdef_bits3;N/*+ */N/* Define severity codes */N/*- */ n/ } STSDEF; #if !defined(__VAXC)8#define sts$v_severity sts$r_stsdef_bits0.sts$v_severity6#define sts$v_cond_id sts$r_stsdef_bits0.sts$v_cond_id6#define sts$v_control sts$r_stsdef_bits0.sts$v_control6#define sts$v_success sts$r_stsdef_bits1.sts$v_success4#define sts$v_msg_no sts$r_stsdef_bits1.sts$v_msg_no0#define sts$v_code sts$r_stsdef_bits2.sts$v_code4#define sts$v_fac_sp sts$r_stsdef_bits2.sts$v_fac_sp8#define sts$v_cust_def sts$r_stsdef_bits2.sts$v_cust_def:#define sts$v_inhib_ o/msg sts$r_stsdef_bits2.sts$v_inhib_msg4#define sts$v_fac_no sts$r_stsdef_bits3.sts$v_fac_no"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union stsdef { __struct {N unsigned sts$v_severity : 3; /* severity code */N unsigned sts$v_cond_id : 25; /* condition id */N unsigned sts$v_control : 4; /* control bits */ } sts$r_stsdef_bits0; __struct {N unsignedp/ sts$v_success : 1; /* Success */N unsigned stsdef$$_fill_1 : 2; /* skip severity field */N unsigned sts$v_msg_no : 13; /* Message number */ } sts$r_stsdef_bits1; __struct {N unsigned stsdef$$_fill_2 : 3; /* Skip severity field */N unsigned sts$v_code : 12; /* code */N unsigned sts$v_fac_sp : 1; /* 1 if facility specific q/ */& unsigned stsdef$$_fill_3 : 11;[ unsigned sts$v_cust_def : 1; /* 1 if sub-system is customer (or CSS) defined */Q unsigned sts$v_inhib_msg : 1; /* 1 if message should not be printed */N unsigned stsdef$$_fill_4 : 3; /* reserved control bits */ } sts$r_stsdef_bits2; __struct {N unsigned stsdef$$_fill_5 : 16; /* Skip message nubmer field */N unsigned sts$v_fac_no : 12; /* Facility is 12 bits r/ */N unsigned stsdef$$_fill_6 : 4; /* Control bits */ } sts$r_stsdef_bits3;N/*+ */N/* Define severity codes */N/*- */ } ; #if !defined(__VAXC)8#define sts$v_severity sts$r_stsdef_bits0.sts$v_severity6#define sts$v_cond_id sts$r_stsdef_bits0.sts$v_con s/d_id6#define sts$v_control sts$r_stsdef_bits0.sts$v_control6#define sts$v_success sts$r_stsdef_bits1.sts$v_success4#define sts$v_msg_no sts$r_stsdef_bits1.sts$v_msg_no0#define sts$v_code sts$r_stsdef_bits2.sts$v_code4#define sts$v_fac_sp sts$r_stsdef_bits2.sts$v_fac_sp8#define sts$v_cust_def sts$r_stsdef_bits2.sts$v_cust_def:#define sts$v_inhib_msg sts$r_stsdef_bits2.sts$v_inhib_msg4#define sts$v_fac_no sts$r_stsdef_bits3.sts$v_fac_no"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdt/ef __NEW_STARLET */ #define STS$S_CODE 0x0C#define STS$S_COND_ID 0x19#define STS$S_CONTROL 0x04#define STS$S_FAC_NO 0x0C#define STS$S_MSG_NO 0x0D#define STS$S_SEVERITY 0x03#define STS$V_CODE 0x03#define STS$V_COND_ID 0x03#define STS$V_CONTROL 0x1C#define STS$V_CUST_DEF 0x1B#define STS$V_FAC_NO 0x10#define STS$V_FAC_SP 0x0F#define STS$V_INHIB_MSG 0x1C#define STS$V_MSG_NO 0x03#define STS$V_SEVERITY 0x00u/#define STS$V_SUCCESS 0x00D/* Define MACROS to extract individual fields from a status value */K#define $VMS_STATUS_CODE(code) ( ( (code) & STS$M_CODE ) >> STS$V_CODE )S#define $VMS_STATUS_COND_ID(code) ( ( (code) & STS$M_COND_ID ) >> STS$V_COND_ID )S#define $VMS_STATUS_CONTROL(code) ( ( (code) & STS$M_CONTROL ) >> STS$V_CONTROL )V#define $VMS_STATUS_CUST_DEF(code) ( ( (code) & STS$M_CUST_DEF ) >> STS$V_CUST_DEF )P#define $VMS_STATUS_FAC_NO(code) ( ( (code) & STS$M_FAC_NO ) >> v/STS$V_FAC_NO )P#define $VMS_STATUS_FAC_SP(code) ( ( (code) & STS$M_FAC_SP ) >> STS$V_FAC_SP )X#define $VMS_STATUS_INHIB_MSG(code) ( ( (code) & STS$M_INHIB_MSG ) >> STS$V_INHIB_MSG )P#define $VMS_STATUS_MSG_NO(code) ( ( (code) & STS$M_MSG_NO ) >> STS$V_MSG_NO )V#define $VMS_STATUS_SEVERITY(code) ( ( (code) & STS$M_SEVERITY ) >> STS$V_SEVERITY )S#define $VMS_STATUS_SUCCESS(code) ( ( (code) & STS$M_SUCCESS ) >> STS$V_SUCCESS ) $#pragma __member_alignment __restoreR#ifdef __INITIAL_POIw/NTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __STSDEF_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */ww_/********************************************************************************************************************************/=/* Created: 5-Apr-2012 x/13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $SYIDEF ***/#ifndef __SYIDEF_LOADED#define __SYIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE y/ /* 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#elsez/#define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* Get System Information Data Identifier Definitions */N/* */N/* **** NOTE **** */N/* {/ */N/* New items must always be added to the END of each item list */N/* (preceding the ENDlistname item) so that users will not have */N/* to relink. */N/*- */N/* DEFINE TABLE TYPES */N#define SYI$C_EXETYPE 1 |/ /* Executive cells */N#define SYI$C_FLDTYPE 2 /* Sub-field data */N#define SYI$C_RSDTYPE 3 /* Reduced system data */I/* The following item-codes are for executive data cells. */I/* Processor registers are a special case of this type. */I/* Some EXE-type cells have frequently used sub-fields, */I/* which have item-codes in the FLD section. (after this one) *}//N#define SYI$_VERSION 4096 /* VMS version number */N#define SYI$_SID 4097 /* System ID register */N#define SYI$_PFCDEFAULT 4098 /* Default page fault cluster size */S#define SYI$_PAGTBLPFC 4099 /* Default page table page fault cluster */R#define SYI$_SYSPFC 4100 /* Page fault cluster for system paging */[#define SYI$_KFILSTCNT 4101 /* (Obsolete, to be deleted in a future release) */~/N#define SYI$_GBLSECTIONS 4102 /* Global section count */N#define SYI$_GBLPAGES 4103 /* Global page count */N#define SYI$_GBLPAGFIL 4104 /* Global page page file page limit */N#define SYI$_MAXPROCESSCNT 4105 /* Maximum process count */N#define SYI$_PIXSCAN 4106 /* Process scan count */N#define SYI$_PROCSECTCNT 4107 /* Process section count */N#define SYI$_MINWSCNT 41/08 /* Minimum working set size */N#define SYI$_PAGFILCNT 4109 /* Number of paging files */N#define SYI$_SWPFILCNT 4110 /* Number of swap files */N#define SYI$_SYSMWCNT 4111 /* System working set count */N#define SYI$_INTSTKPAGES 4112 /* Interrupt stack size */S#define SYI$_DLCKEXTRASTK 4113 /* Extra int stack for deadlock searches */N#define SYI$_BALSETCNT 4114 /* B/alance set count */N#define SYI$_IRPCOUNT 4115 /* Count of I/O packets */N#define SYI$_IRPCOUNTV 4116 /* Limit of extension of IRP list */N#define SYI$_WSMAX 4117 /* Max size of process working set */N#define SYI$_NPAGEDYN 4118 /* Non-paged dynamic pool */N#define SYI$_NPAGEVIR 4119 /* Limit of extension of above */N#define SYI$_PAGEDYN 4120 /* Paged dynamic pool / */N#define SYI$_VIRTUALPAGECNT 4121 /* Max virtual page count */N#define SYI$_SPTREQ 4122 /* Requested SPT extension */N#define SYI$_EXUSRSTK 4123 /* Extra user stack provided */N#define SYI$_LRPCOUNT 4124 /* Number of large request packets */N#define SYI$_LRPCOUNTV 4125 /* Limit of extension of LRP list */N#define SYI$_LRPSIZE 4126 /* Size of large request packet */N#define SYI$_LRP/MIN 4127 /* Min alloc request for LRPs */N#define SYI$_SRPCOUNT 4128 /* Number of small request packets */N#define SYI$_SRPCOUNTV 4129 /* Limit of extension of SRP list */N#define SYI$_SRPSIZE 4130 /* Size of small request packet */N#define SYI$_SRPMIN 4131 /* Min alloc request for SRPs */N#define SYI$_CHANNELCNT 4132 /* Number of permanent I/O channels */N#define SYI$_PIOPAGES 4133 /*/ Process I/O pages */N#define SYI$_CTLPAGES 4134 /* Control region impure pages */O#define SYI$_CTLIMGLIM 4135 /* Limit on use of proc alloc region */N#define SYI$_IMGIOCNT 4136 /* Default image I/O address space */N#define SYI$_QUANTUM 4137 /* Process quantum */N#define SYI$_MPW_WRTCLUSTER 4138 /* Page write cluster factor */N#define SYI$_MPW_HILIMIT 4139 /* Modified page list high/ limit */N#define SYI$_MPW_LOLIMIT 4140 /* Modified page list low limit */O#define SYI$_MPW_PRIO 4141 /* Modified page writer I/O priority */N#define SYI$_SWP_PRIO 4142 /* Swapper I/O priority */R#define SYI$_MPW_THRESH 4143 /* Modified page writer lower threshold */R#define SYI$_MPW_WAITLIMIT 4144 /* Modified page writer busy wait limit */O#define SYI$_TBSKIPWSL 4145 /* Max number WSlist entries to skip */N/#define SYI$_PHYSICALPAGES 4146 /* Memory size in pages */N#define SYI$_PFRATL 4147 /* Page fault rate lower threshold */N#define SYI$_PFRATH 4148 /* Page fault rate high threshold */P#define SYI$_PFRATL_SYS 4149 /* PFRATL for the system working set */N#define SYI$_WSINC 4150 /* Working set increment */N#define SYI$_WSDEC 4151 /* Working set decrement */N#define SYI$_AWSMIN 4152/ /* Working set minimum */N#define SYI$_AWSTIME 4153 /* Working set measurement interval */N#define SYI$_SWPRATE 4154 /* Swap rate control (max) */R#define SYI$_SWPOUTPGCNT 4155 /* Desired proc page cnt for an outswap */R#define SYI$_SWPALLOCINC 4156 /* Swap file allocation increment value */N#define SYI$_IOTA 4157 /* I/O time allowance */S#define SYI$_LONGWAIT 4158 /*/ When HIB or LEF proc becomes longwait */N#define SYI$_SWPFAIL 4159 /* Swap fail count */S#define SYI$_VMSD1 4160 /* Reserved to VMS development (DYNAMIC) */N#define SYI$_VMSD2 4161 /* " */N#define SYI$_VMSD3 4162 /* " */N#define SYI$_VMSD4 4163 /* " */R#define SYI$_VMS5 4164 /* Reserved to V/MS development (STATIC) */N#define SYI$_VMS6 4165 /* " */N#define SYI$_VMS7 4166 /* " */N#define SYI$_VMS8 4167 /* " */N#define SYI$_USERD1 4168 /* Reserved for users (DYNAMIC) */N#define SYI$_USERD2 4169 /* " */N#define SYI$_USER3 4170 /* Reserved for users (STATIC) *//N#define SYI$_USER4 4171 /* " */R#define SYI$_EXTRACPU 4172 /* Extra CPU time allowed on expiration */N#define SYI$_MAXSYSGROUP 4173 /* Max group code for system UIC */N#define SYI$_MVTIMEOUT 4174 /* Timeout for mount verification */Q#define SYI$_MAXBUF 4175 /* Maximum allowable buffered I/O size */S#define SYI$_DEFMBXBUFQUO 4176 /* Def buffer quota for mailbox creation */S#define SY/I$_DEFMBXMXMSG 4177 /* Def max msg size for mailbox creation */N#define SYI$_DEFMBXNUMMSG 4178 /* Def number of messages for " */N#define SYI$_FREELIM 4179 /* Desired free list length */N#define SYI$_FREEGOAL 4180 /* Target free list length */S#define SYI$_GROWLIM 4181 /* Free > growlim to grow proc > wsquota */N#define SYI$_BORROWLIM 4182 /* Same as above??? */N#define SYI$_LOCKRETRY 4/183 /* Multi-CPU lock retry count */N#define SYI$_XFMAXRATE 4184 /* Max DR32 data rate */N#define SYI$_LAMAPREGS 4185 /* Number of UBA map regs for LPA11 */Q#define SYI$_REALTIME_SPTS 4186 /* SPT entries for CONINTERR processes */R#define SYI$_CLISYMTBL 4187 /* Number of pages for CLI symbol table */N#define SYI$_LOCKIDTBL 4188 /* Size of lock ID table */N#define SYI$_RESHASHTBL 4189 /*/ Size of resource hash table */O#define SYI$_DEADLOCK_WAIT 4190 /* Deadlock detection timeout period */Q#define SYI$_SCSBUFFCNT 4191 /* SCS buffer descriptor table entries */R#define SYI$_SCSCONNCNT 4192 /* SCS connect descriptor table entries */S#define SYI$_SCSRESPCNT 4193 /* SCS response descriptor table entries */N#define SYI$_SCSMAXDG 4194 /* SCS maximum datagram size */N#define SYI$_SCSMAXMSG 4195 /* SCS max s/equenced message size */N#define SYI$_SCSFLOWCUSH 4196 /* SCS flow control cushion */N#define SYI$_SCSSYSTEMID 4197 /* SCS system ID (48 bits) */N#define SYI$_SCSSYSTEMIDH 4198 /* High bits of above */N#define SYI$_SCSNODE 4199 /* SCS system node name */N#define SYI$_PRCPOLINTERVAL 4201 /* SCA process polling interval */N#define SYI$_PASTIMOUT 4202 /* CI port START/STACK timeout *//T#define SYI$_PASTDGBUF 4203 /* CI port DG buffers for START handshake */N#define SYI$_PANUMPOLL 4204 /* Number of CI ports to poll */N#define SYI$_PAPOLLINTERVAL 4205 /* Time between CI port polls */N#define SYI$_PAPOOLINTERVAL 4206 /* Time between SYSAPs pool check */P#define SYI$_TIMEPROMPTWAIT 4207 /* Time prompt timeout (when booting) */Q#define SYI$_UDABURSTRATE 4208 /* Max number of longwords per NPR - 1 */V#define SYI$/_LNMSHASHTBL 4209 /* Size of system space log name hash table */N#define SYI$_LNMPHASHTBL 4210 /* Size of process space " */N#define SYI$_TTY_SCANDELTA 4211 /* Delta time for dialup timer scan */N#define SYI$_TTY_DIALTYPE 4212 /* Flags for dialup type */N#define SYI$_TTY_SPEED 4213 /* Terminal default: speed */N#define SYI$_TTY_RSPEED 4214 /* " " receive speed */N#define SYI$_TTY_PARITY 4215 / /* " " parity */N#define SYI$_TTY_BUF 4216 /* " " line width */N#define SYI$_TTY_DEFCHAR 4217 /* " " characteristics */O#define SYI$_TTY_DEFCHAR2 4218 /* " " characteristics, 2nd longword */N#define SYI$_TTY_TYPAHDSZ 4219 /* Size of typeahead buffer */N#define SYI$_TTY_ALTYPAHD 4220 /* Alternate typeahead size */N#define SYI$_TTY_ALTALARM 4221 /* Alt typeahe/ad alarm size */N#define SYI$_TTY_DMASIZE 4222 /* Dma size */O#define SYI$_TTY_PROT 4223 /* Default terminal alloc protection */N#define SYI$_TTY_OWNER 4224 /* Default terminal owner */P#define SYI$_TTY_CLASSNAME 4225 /* Default terminal class name prefix */N#define SYI$_TTY_SILOTIME 4226 /* Default silo timeout for DMF32 */N#define SYI$_TTY_DEFPORT 4227 /* DEFAULT PORT ACTION PARAMETER /*/N#define SYI$_RMS_DFMBC 4228 /* RMS default: multi-block count */S#define SYI$_RMS_DFMBFSDK 4229 /* " " multi-buffer count for disk (SEQ) */N#define SYI$_RMS_DFMBFSMT 4230 /* " " multi-buffer count for tape */T#define SYI$_RMS_DFMBFSUR 4231 /* " " multi-buffer count for unit record */R#define SYI$_RMS_DFMBFREL 4232 /* " " multi-buffer count for REL files */S#define SYI$_RMS_DFMBFIDX 4233 /* " " multi-buffer count for ISAM files */O/#define SYI$_RMS_CONPOLICY 4234 /* " " Default RMS Contention Policy */N#define SYI$_RMS_PROLOGUE 4235 /* " " prolog */N#define SYI$_RMS_EXTEND_SIZE 4236 /* " " file extend quantity */N#define SYI$_RMS_FILEPROT 4237 /* " " file protection */N#define SYI$_PQL_DASTLM 4238 /* Def AST limit */N#define SYI$_PQL_MASTLM 4239 /* Min " */N#define SYI$_PQL_DBIOLM /4240 /* Def buffered I/O limit */N#define SYI$_PQL_MBIOLM 4241 /* Min " */O#define SYI$_PQL_DBYTLM 4242 /* Def buffered I/O byte count limit */N#define SYI$_PQL_MBYTLM 4243 /* Min " */N#define SYI$_PQL_DCPULM 4244 /* Def CPU time limit */N#define SYI$_PQL_MCPULM 4245 /* Min " */N#define SYI$_PQL_DDIOLM 4246 /* Def d/irect I/O limit */N#define SYI$_PQL_MDIOLM 4247 /* Min " */N#define SYI$_PQL_DFILLM 4248 /* Def open file limit */N#define SYI$_PQL_MFILLM 4249 /* Min " */N#define SYI$_PQL_DPGFLQUOTA 4250 /* Def paging file quota */N#define SYI$_PQL_MPGFLQUOTA 4251 /* Min " */N#define SYI$_PQL_DPRCLM 4252 /* Def sub-process limit / */N#define SYI$_PQL_MPRCLM 4253 /* Min " */N#define SYI$_PQL_DTQELM 4254 /* Def timer queue entry limit */N#define SYI$_PQL_MTQELM 4255 /* Min " */N#define SYI$_PQL_DWSDEFAULT 4256 /* Def working set default size */N#define SYI$_PQL_MWSDEFAULT 4257 /* Min " */N#define SYI$_PQL_DWSQUOTA 4258 /* Def working set quota */N#define SYI$_PQL_MWS/QUOTA 4259 /* Min " */N#define SYI$_PQL_DWSEXTENT 4260 /* Def working set extent */N#define SYI$_PQL_MWSEXTENT 4261 /* Min " */N#define SYI$_PQL_DENQLM 4262 /* Def enqueue limit */N#define SYI$_PQL_MENQLM 4263 /* Min " */N#define SYI$_ACP_MAPCACHE 4264 /* Number of blocks in bitmap cache */S#define SYI$_ACP_HDRCACHE 4265 /* Num/ber of blocks in file header cache */Q#define SYI$_ACP_DIRCACHE 4266 /* Number of blocks in directory cache */N#define SYI$_ACP_WORKSET 4267 /* ACP working set */O#define SYI$_ACP_FIDCACHE 4268 /* Number of cached index file slots */N#define SYI$_ACP_EXTCACHE 4269 /* Number of cached disk extents */N#define SYI$_ACP_EXTLIMIT 4270 /* Max fraction of disk to cache */S#define SYI$_ACP_QUOCACHE 4271 /* Number of file qu/ota entries to cache */O#define SYI$_ACP_SYSACC 4272 /* Default access for system volumes */O#define SYI$_ACP_MAXREAD 4273 /* Max number of direct blks to read */T#define SYI$_ACP_WINDOW 4274 /* Default window size for system volumes */N#define SYI$_ACP_WRITEBACK 4275 /* Deferred cache writeback enable */N#define SYI$_ACP_DATACHECK 4276 /* ACP datacheck enable flags */N#define SYI$_ACP_BASEPRIO 4277 /* ACP base priority / */N#define SYI$_ACP_SWAPFLGS 4278 /* ACP swap flags */R#define SYI$_DEFPRI 4279 /* Default priority for Job Initiations */N#define SYI$_IJOBLIM 4280 /* Limit for interactive jobs */N#define SYI$_BJOBLIM 4281 /* Limit for batch jobs */N#define SYI$_NJOBLIM 4282 /* Limit for network jobs */N#define SYI$_RJOBLIM 4283 /* Limit for remote terminal jobs */O#define SYI$/_QUORUM 4284 /* Connection manager cluster QUORUM */W#define SYI$_VOTES 4285 /* Connection manager VOTES from this system */S#define SYI$_RECNXINTERVAL 4286 /* Connection manager reconnect interval */T#define SYI$_BOOTTIME 4287 /* 64-bit abs. system time at system boot */N#define SYI$_LOCKIDTBL_MAX 4288 /* Maximum size of lock ID table. */N#define SYI$_TAILORED 4289 /* Is this system tailored? */P#define SYI$_S /TARTUP_P1 4290 /* Parameters for passing information */N#define SYI$_STARTUP_P2 4291 /* to system startup procedure. */#define SYI$_STARTUP_P3 4292#define SYI$_STARTUP_P4 4293#define SYI$_STARTUP_P5 4294#define SYI$_STARTUP_P6 4295#define SYI$_STARTUP_P7 4296#define SYI$_STARTUP_P8 4297N#define SYI$_CLUSTER_NODES 4298 /* total number of nodes in cluster */N#define SYI$_CLUSTER_VOTES 4299 /* " " " votes " " */N#define SYI$_CLUST/ER_QUORUM 4300 /* " quorum in cluster */N#define SYI$_CLUSTER_FSYSID 4301 /* founding systemid */N#define SYI$_CLUSTER_FTIME 4302 /* founding boottime */N#define SYI$_CLUSTER_MEMBER 4303 /* true if in a live cluster */N#define SYI$_NODE_CSID 4304 /* cluster system id of target node */N#define SYI$_NODE_VOTES 4305 /* votes of target node */N#define SYI$_NODE_QUORUM 4306 /* q/uorum of " " */N#define SYI$_NODE_SYSTEMID 4307 /* systemid of " " */N#define SYI$_NODE_SWINCARN 4308 /* S/W incarnation of " " */N#define SYI$_NODE_SWTYPE 4309 /* S/W type of " " */N#define SYI$_NODE_SWVERS 4310 /* S/W version of " " */N#define SYI$_NODE_HWTYPE 4311 /* H/W type of " " */N#define SYI$_NODE_HWVERS 4312 /* H/W version of " " / */N#define SYI$_NODENAME 4313 /* SCS nodename of " " */N#define SYI$_ARCHFLAG 4314 /* Flags used by uVAX code */N#define SYI$_SCS_EXISTS 4315 /* Flag to indicate presence of SCS */S#define SYI$_DISK_QUORUM 4316 /* Cluster quorum device name (in ASCII) */U#define SYI$_XSID 4317 /* Extended System Identification Register */N#define SYI$_PAMAXPORT 4320 /* Max PA port to poll */S#d/efine SYI$_PASANITY 4321 /* PA sanity timer enable/disable switch */N#define SYI$_DEFQUEPRI 4322 /* Default Que Priority */N#define SYI$_MAXQUEPRI 4323 /* Max Que Priority */N#define SYI$_QDSKINTERVAL 4324 /* Disk Quorum Interval */N#define SYI$_ALLOCLASS 4325 /* Allocation class */N#define SYI$_LGI_RETRY_LIM 4326 /* Login retry limit */N#define SYI$_LGI_RETRY/_TMO 4327 /* Login retry timeout */N#define SYI$_LGI_BRK_LIM 4328 /* Login failure limit */N#define SYI$_LGI_BRK_TMO 4329 /* Login suspect timeout */N#define SYI$_LGI_HID_TIM 4330 /* Login evasive action time */N#define SYI$_LGI_PWD_TMO 4331 /* System password drop dead time */`#define SYI$_PQL_DJTQUOTA 4332 /* Default Job-wide Logical Name Table Creation Quota */`#define SYI$_PQL_MJTQUOTA 4333/ /* Minimum Job-wide Logical Name Table Creation Quota */N#define SYI$_VAXCLUSTER 4334 /* VAXcluster participation */R#define SYI$_LOCKDIRWT 4335 /* Lock manager directory system weight */N#define SYI$_QDSKVOTES 4336 /* Votes held by quorum disk */S#define SYI$_DORMANTWAIT 4337 /* When low pri COM proc becomes dormant */N#define SYI$_PAGEFILE_PAGE 4338 /* Total pagefile pages */N#define SYI$_SWAPFILE_PAGE 4/339 /* Total swapfile pages */N#define SYI$_PAGEFILE_FREE 4340 /* Free pagefile pages */N#define SYI$_SWAPFILE_FREE 4341 /* Free swapfile pages */R#define SYI$_TTY_TIMEOUT 4342 /* Seconds for virtual terminal timeout */N#define SYI$_TTY_AUTOCHAR 4343 /* autobaud recognition character */N#define SYI$_PANOPOLL 4344 /* Disable/enable CI port polling */N#define SYI$_PE1 4345 /* Reserve/d TO PEDRIVER (DYNAMIC) */N#define SYI$_PE2 4346 /* " */N#define SYI$_PE3 4347 /* " */N#define SYI$_PE4 4348 /* " */N#define SYI$_PE5 4349 /* Reserved TO PEDRIVER (STATIC) */N#define SYI$_PE6 4350 /* " */N#define SYI$_RMS_GBLBUFQUO 4351 /* RMS global buffer quota /*/N#define SYI$_RMS_DFNBC 4352 /* " " network block count */V#define SYI$_ACP_DINDXCACHE 4353 /* File system directory index cache blocks */a#define SYI$_MAXATTACHPRI 4354 /* Maximum scheduling prio for ASMP attached processor */R#define SYI$_SMP_CPUS 4355 /* Number of CPUs to boot in SMP system */U#define SYI$_SMP_CPUSH 4356 /* Hi Number of CPUs to boot in SMP system */N#define SYI$_FALLBACK_MODE 4357 /* Cluster fallback mo/de */X#define SYI$_MPW_LOWAITLIMIT 4358 /* Modified page writer lower busy wait limit */[#define SYI$_MPW_IOLIMIT 4359 /* Modified page writer max concurrent I/O count */N#define SYI$_S0_PAGING 4360 /* System space paging flags */T#define SYI$_HW_MODEL 4361 /* System model number (from SB$B_HWVERS) */X#define SYI$_HW_NAME 4362 /* System model name from #/name trans. table */U#define SYI$_SCH_CTLFLAGS 4363 /* CPU s/cheduling control flags (obsolete) */N#define SYI$_NODE_EVOTES 4364 /* Votes expected by target node */Q#define SYI$_CLUSTER_EVOTES 4365 /* Number of expected votes in cluster */N#define SYI$_MULTIPROCESSING 4366 /* Multiprocessor participation */N#define SYI$_FREE_GBLPAGES 4367 /* Total, free global pages */S#define SYI$_CONTIG_GBLPAGES 4368 /* Maximum, contiguous free global pages */N#define SYI$_FREE_GBLSECTS 4369 /* Total, free g/lobal sections */N#define SYI$_EXPECTED_VOTES 4370 /* Expected votes */N#define SYI$_PU_OPTIONS 4371 /* Select PUDRIVER load options */N#define SYI$_WPTTE_SIZE 4372 /* # Watchpoint Trace Table Entries */N#define SYI$_WPRE_SIZE 4373 /* Watchpoint Restore Entry size */N#define SYI$_SMP_SANITY_CNT 4374 /* # SMP Sanity events bef. timeout */X#define SYI$_SMP_TICK_CNT 4375 /* Clock ticks between SMP sanity time cyc/les */Y#define SYI$_QBUS_MULT_INTR 4376 /* uVAX/QBUS multi-level interrupt enable flag */N#define SYI$_SYSTEM_RIGHTS 4377 /* System rights list segment */N#define SYI$_SMP_SPINWAIT 4378 /* SMP normal busywait timeout */N#define SYI$_SMP_LNGSPINWAIT 4379 /* SMP LONG busywait timeout */N#define SYI$_TIME_CONTROL 4380 /* Time-related control functions */N#define SYI$_AVAILCPU_CNT 4381 /* Number of CPUs in this machine */N#defin/e SYI$_ACTIVECPU_CNT 4382 /* Number of CPUs up and running */N#define SYI$_MSCP_LOAD 4386 /* Load MSCP server at boot time */N#define SYI$_MSCP_SERVE_ALL 4387 /* Serve all disks */N#define SYI$_POOLCHECK 4388 /* Pool debugging in MEMORYALC.MAR */N#define SYI$_TAPE_MVTIMEOUT 4389 /* Magtape mount verification */P#define SYI$_PSEUDOLOA 4390 /* Pseudoloa image size for tape boot */Q#define SYI$_MINCLASSPRI 4391 / /* Min. priority for class scheduling */Q#define SYI$_MAXCLASSPRI 4392 /* Max. priority for class scheduling */]#define SYI$_MINPRPRI 4393 /* Min. priority for preemptive-resume scheduling */d#define SYI$_AUTOCONFIG_ALGO 4394 /* Selects which algorithmn SYSGEN uses to autoconfigure. */Q#define SYI$_ERRORLOGBUFFERS 4395 /* Number of buffers for error logging */{#define SYI$_JOBCTLD 4396 /* Dynamic SYSGEN flag to handle job controlle/r diagnostics and Rolling upgrade. */V#define SYI$_WINDOW_SYSTEM 4397 /* Default windowing system for workstation */R#define SYI$_MSCP_BUFFER 4398 /* Pages allocated to server local pool */W#define SYI$_MSCP_CREDITS 4399 /* Number of send credits extended by server */_#define SYI$_BREAKPOINTS 4400 /* Mask of INI$BRK callers in exec used in this boot */e#define SYI$_CLOCK_INTERVAL 4401 /* Time (in usec) between interval timer clock interrupts */t#d/efine SYI$_DUMPSTYLE 4402 /* Mask specifying desired format of dump file (full dump or subset dump) */N#define SYI$_NISCS_PORT_SERV 4403 /* Port services flag */N#define SYI$_RSRVPAGCNT 4404 /* No. of pagefile pages to escrow */N#define SYI$_VECTOR_PROC 4405 /* Load vector processing */N#define SYI$_VECTOR_MARGIN 4406 /* Vector margin */N#define SYI$_AFFINITY_SKIP 4407 /* Affinity skip count / */N#define SYI$_AFFINITY_TIME 4408 /* Affinity queue time */N#define SYI$_VECTOR_EMULATOR 4409 /* Vector emulator present flag */N#define SYI$_VP_MASK 4410 /* Mask of vector processors */N#define SYI$_VP_NUMBER 4411 /* Number of vector processors */R#define SYI$_USED_GBLPAGCNT 4412 /* Current count of global pages in use */R#define SYI$_USED_GBLPAGMAX 4413 /* Maximum count of global pages in use */U#define /SYI$_USED_GBLSECTCNT 4414 /* Current count of global sections in use */U#define SYI$_USED_GBLSECTMAX 4415 /* Maximum count of global sections in use */N#define SYI$_ERLBUFFERPAGES 4416 /* Pages in each ERL Buffer */N#define SYI$_TAPE_ALLOCLASS 4417 /* Tape Allocation class */P#define SYI$_PFRATH_SYS 4418 /* PFRATH for the system working set */P#define SYI$_WSINC_SYS 4419 /* WSINC for the system working set */P#define SYI$_W/SDEC_SYS 4420 /* WSDEC for the system working set */P#define SYI$_AWSMIN_SYS 4421 /* AWSMIN for the system working set */P#define SYI$_AWSTIME_SYS 4422 /* AWSTIME for the system working set */N#define SYI$_BOOT_STYLE 4423 /* Boot Style */N#define SYI$_FT_FLAGS 4424 /* Fault Tolerance Flags field */N#define SYI$_SHADOWING 4425 /* Shadowing mode */N#define SYI$_SHADOW_SYS_DISK 4426 / /* Volume shadowed system disk */N#define SYI$_SHADOW_SYS_UNIT 4427 /* Shadowed system disk unit number */N#define SYI$_SHADOW_MAX_COPY 4428 /* Max shadow copy threads allowed */N#define SYI$_TIMVCFAIL 4429 /* Time to detect VC failure */N#define SYI$_PRIORITY_OFFSET 4431 /* Priority gap for preemption */N#define SYI$_VCC_FLAGS 4432 /* VBN static cache flags */N#define SYI$_VCC_MAXSIZE 4437 /* Max size of VBN c/ache */O#define SYI$_MMG_CTLFLAGS 4441 /* Bit mask to control A/T mem mgmt. */e#define SYI$_NISCS_MAX_PKTSZ 4443 /* Maximum number of bytes allocated for all NISCS packets */g#define SYI$_NISCS_LAN_OVRHD 4444 /* Bytes in NISCS packets reserved for other uses (eg DESNC) */N#define SYI$_DECNET_VERSION 4445 /* Version of DECnet installed */Q#define SYI$_TMSCP_LOAD 4446 /* Load TMSCP tape server at boot time */V#define SYI$_LGI_CALLOUTS 4447/ /* Number of LOGINOUT local policy callouts */Z#define SYI$_NET_CALLOUTS 4448 /* Number of DECNET Login local policy callouts */\#define SYI$_IEEE_ADDRESS 4449 /* 48 bit IEEE unique address - low order 32 bits */]#define SYI$_IEEE_ADDRESSH 4450 /* 48 bit IEEE unique address - high order 16 bits */U#define SYI$_SHADOW_MBR_TMO 4451 /* Timeout interval for HBS shadow members */N#define SYI$_PAGE_SIZE 4452 /* Memory page size in bytes *//N#define SYI$_ARCH_TYPE 4453 /* Architecture type */N#define SYI$_ARCH_NAME 4454 /* Architecture name */N#define SYI$_CRD_CONTROL 4455 /* CRD scrub/replace control */N#define SYI$_SECURITY_POLICY 4456 /* C2/B1 security policy bitmask */N#define SYI$_DNVOSI1 4457 /* DECnet/OSI for VMS */N#define SYI$_MEMSIZE 4459 /* System memory size in pages */N#define SYI$_KSTACKPAGES/ 4460 /* Pages in Kernel Stack */N#define SYI$_PHYSICAL_MEMORY 4461 /* Max of physical memory to use */N#define SYI$_XQP_ALLOC_BLKS 4462 /* Flag - can XQP allocate blocks */N#define SYI$_ZERO_LIST_HI 4463 /* Zeroed list high limit */P#define SYI$_CPUTYPE 4464 /* CPU type of Primary CPU from HWRPB */N#define SYI$_SYSTYPE 4465 /* System type from HWRPB */Q#define SYI$_ITB_ENTRIES 4466 /* Numbe/r of code huge page TBs to use */O#define SYI$_GH_RSRVPGCNT 4467 /* pages reserved in code huge page */N#define SYI$_DEF_PRIO_MIN 4468 /* MIN priority for default policy */N#define SYI$_DEF_PRIO_MAX 4469 /* MAX priority for default policy */P#define SYI$_PSXFIFO_PRIO_MIN 4470 /* MIN priority for POSIX FIFO policy */P#define SYI$_PSXFIFO_PRIO_MAX 4471 /* MAX priority for POSIX FIFO policy */V#define SYI$_PSXRR_PRIO_MIN 4472 /* MIN priority for POSI/X Rnd-Robbin policy */V#define SYI$_PSXRR_PRIO_MAX 4473 /* MAX priority for POSIX Rnd-Robbin policy */N#define SYI$_XQPCTLD1 4474 /* Reserved for XQP use (dynamic) */N#define SYI$_XQPCTL2 4475 /* Reserved for XQP use */U#define SYI$_CPUCONF 4477 /* CPU Configuration bitmask: 0 through 31 */`#define SYI$_DECNET_FULLNAME 4478 /* DECnet/OSI fullname (or DECnet Phase IV node name) */N#define SYI$_XQPCTLD3 4479 /* F11BX/QP Specific parameters */I#define SYI$_XQPCTL4 4480 /* | */I#define SYI$_XQPCTLD5 4481 /* | */I#define SYI$_XQPCTL6 4482 /* | */I#define SYI$_XQPCTLD7 4483 /* | */I#define SYI$_XQPCTL8 4484 /* v */X#define SYI$_DBGTK_SCRATCH 4485 /* HLL System debugger scratch memory request */N#def/ine SYI$_PALCODE_VERSION 4486 /* Version of PALcode */N#define SYI$_CONSOLE_VERSION 4487 /* Version of Console firmware */N#define SYI$_GH_EXEC_CODE 4488 /* Pages in the execlet code region */N#define SYI$_GH_EXEC_DATA 4489 /* Pages in the execlet data region */Z#define SYI$_GH_RES_CODE 4490 /* Pages in the resident image S0S1 code region */U#define SYI$_GH_RES_DATA 4491 /* Pages in the resident image data region */N#define SY/I$_IMGREG_PAGES 4492 /* Pages in the P1 image-region */s#define SYI$_SHADOW_SYS_TMO 4493 /* Timeout interval for HBS system disk- new and after - shadow members */k#define SYI$_SHADOW_SYS_WAIT 4494 /* Timeout interval for HBS system disk- exists - shadow members */U#define SYI$_SHADOW_ENABLE 4495 /* Member removed at reboot from HBVS set. */Y#define SYI$_SHADOW_SITE_O 4496 /* OBSOLETE default site for shadow set (text) */W#define SYI$_SYSTEM_CHECK 44/97 /* load/enable system problem isolation code */N#define SYI$_PFN_COLOR_COUNT 4498 /* PFN Color Count */Q#define SYI$_REAL_CPUTYPE 4499 /* Actual CPU type of Primary CPU from */N#define SYI$_SCSICLUSTER_P1 4500 /* Reserved for SCSI Cluster */N#define SYI$_SCSICLUSTER_P2 4501 /* Reserved for SCSI Cluster */N#define SYI$_SCSICLUSTER_P3 4502 /* Reserved for SCSI Cluster */N#define SYI$_SCSICLUSTER_P4 4503 //* Reserved for SCSI Cluster */q#define SYI$_FILE_CACHE 4504 /* Percentage of physical memory reserved for Dollar file system cache */N#define SYI$_TMSCP_SERVE_ALL 4505 /* Serve all tapes */N#define SYI$_DR_UNIT_BASE 4506 /* unit base for DR devices */R#define SYI$_MC_SERVICES_P0 4507 /* Reserved for MEmory Channel Services */R#define SYI$_MC_SERVICES_P1 4508 /* Reserved for MEmory Channel Services */R#define SYI$_MC_SERVIC/ES_P2 4509 /* Reserved for MEmory Channel Services */R#define SYI$_MC_SERVICES_P3 4510 /* Reserved for MEmory Channel Services */R#define SYI$_MC_SERVICES_P4 4511 /* Reserved for MEmory Channel Services */R#define SYI$_MC_SERVICES_P5 4512 /* Reserved for MEmory Channel Services */R#define SYI$_MC_SERVICES_P6 4513 /* Reserved for MEmory Channel Services */R#define SYI$_MC_SERVICES_P7 4514 /* Reserved for MEmory Channel Services */R#define SYI$_MC_SERVICES/_P8 4515 /* Reserved for MEmory Channel Services */R#define SYI$_MC_SERVICES_P9 4516 /* Reserved for MEmory Channel Services */N#define SYI$_S2_SIZE 4517 /* Size in Mbytes for S2 space */N#define SYI$_PROCESS_SPACE_LIMIT 4518 /* Highest process private VA */N#define SYI$_PT_BASE 4519 /* Base VA of PT_space */\#define SYI$_SHARED_VA_PTES 4520 /* Boundary between process and system space PTEs */N#define SYI$_MULTITHREAD 452/1 /* per process kernel thread limit */`#define SYI$_CWCREPRC_ENABLE 4522 /* Allow remote process creation by unprivileged user */c#define SYI$_MAXBOBMEM 4523 /* Maximum physical memory for buffer objects (pagelets) */N#define SYI$_FAST_PATH 4524 /* Fast Path enable/disable */g#define SYI$_IO_PREFER_CPUS 4525 /* Bit mask of CPUs available to be Fast Path preferred CPUs */N#define SYI$_ACTIVE_CPU_MASK 4526 /* Currently active CPU mask/ */N#define SYI$_AVAIL_CPU_MASK 4527 /* Mask of existing system CPUs */N#define SYI$_PRIMARY_CPUID 4528 /* CPUID of the primary processor */N#define SYI$_MAX_CPUS 4529 /* Maximum allowed CPUs in system */N#define SYI$_CPUCAP_MASK 4530 /* Array of CPU capability masks */g#define SYI$_FILE_CACHE_MIN 4531 /* Min # of pages of cache reserved for Spiralog file system */g#define SYI$_FILE_CACHE_MAX 4532 /* Max # of pages of cache r/eserved for Spiralog file system */N#define SYI$_F64CTL1 4533 /* Reserved to Spiralog file system */N#define SYI$_F64CTL2 4534 /* | */N#define SYI$_F64CTLD3 4535 /* | */N#define SYI$_F64CTLD4 4536 /* V */Y#define SYI$_DISABLE_UPCALLS 4537 /* Bitmask to disable specific threads upcalls */N#define SYI$_DEVICE_NAMING 4538 /* DEVICE_NAMING/ bitmask */N#define SYI$_AVAIL_PAGES 4539 /* Available physical pages */N#define SYI$_PROC_SLOTS 4540 /* Process slot information */N#define SYI$_BAL_SLOTS 4541 /* Balance slot information */N#define SYI$_NPAGED_POOL 4542 /* Nonpaged pool information */N#define SYI$_PAGED_POOL 4543 /* Paged pool information */N#define SYI$_MAIN_MEMORY 4544 /* Memory information */V#d/efine SYI$_ARB_SUPPORT 4545 /* Level of security backward compatibility */N/*ifsymbol PFNBITS_32; */O#define SYI$_MAX_PFN 4546 /* Returns contents of MMG$GL_MAXPFN */N#define SYI$_PFN_MEMORY_MAP 4547 /* Returns a physical memory map */N/*end_ifsymbol; */X#define SYI$_PMD_COUNT 4548 /* Returns count of phys. mem. desc. in HWRPB */N#define /SYI$_MSCP_CMD_TMO 4549 /* VMS-MSCP server timer value */N#define SYI$_LAN_FLAGS 4550 /* LAN specific flags */N#define SYI$_RMS_DFLRL 4551 /* RMS default max record length */S#define SYI$_RMS_HEURISTIC 4552 /* RMS file attribute heuristic ctr flag */f#define SYI$_NPAG_INTERVAL 4553 /* nonpaged pool gentle reclamation interval (# of seconds) */R#define SYI$_NPAG_GENTLE 4554 /* gentle reclamation refill percentage */V/#define SYI$_NPAG_AGGRESSIVE 4555 /* aggressive reclamation refill percentage */N#define SYI$_NPAG_BAP_MIN 4556 /* Min Size of Bus Addressable Pool */N#define SYI$_NPAG_BAP_MAX 4557 /* Max Size of Bus Addressable Pool */N#define SYI$_NPAG_BAP_MAX_PA 4558 /* max. PA for BAP */N#define SYI$_NPAG_RING_SIZE 4559 /* size of ring buffer */N#define SYI$_CLUSTER_CREDITS 4560 /* cluster send credits */N#define SYI$_PTES_/PER_PAGE 4561 /* */N#define SYI$_TEMPERATURE_VECTOR 4562 /* 16-byte temperature vector */N#define SYI$_POWER_VECTOR 4563 /* 16-byte power vector */N#define SYI$_FAN_VECTOR 4564 /* 16-byte fan vector */N#define SYI$_THERMAL_VECTOR 4565 /* 16-byte thermal vector */\#define SYI$_MAXBOBS0S1 4566 /* Maximum buffer object S0S1 VA space (pagelets) */Z#define SYI$_MAXBOBS2 4567 / /* Maximum buffer object S2 VA space (pagelets) */N#define SYI$_VCC_MAX_CACHE 4568 /* Maximum VDC Cache Size */N#define SYI$_VCC_MAX_IO_SIZE 4569 /* Maximum Cached VDC I/O Size */N#define SYI$_VCC_MAX_LOCKS 4570 /* Maximum number of locks for VDC */N#define SYI$_VCC_READAHEAD 4571 /* VDC Readahead caching on/off */N#define SYI$_VCC_WRITEBEHIND 4572 /* VDC Writebehind caching on/off */N#define SYI$_VCC_WRITE_DELAY 4573 /* V/DC Writebehind write delay */[#define SYI$_SD_ALLOCLASS 4574 /* Snapshot-capable disk device allocation class */Q#define SYI$_GALAXY 4575 /* Node should participate in a Galaxy */N#define SYI$_NPAG_BAP_MIN_PA 4576 /* min. PA for BAP */g#define SYI$_BAP_MIN_REQ_SZ 4577 /* Bus addressable pool (BAP) minimum size requested (bytes) */g#define SYI$_BAP_MAX_REQ_SZ 4578 /* Bus addressable pool (BAP) maximum size requested (bytes) */j/#define SYI$_BAP_MIN_PA_REG 4579 /* Bus addressable pool (BAP) minimum PA registered (megabytes) */j#define SYI$_BAP_MAX_PA_REG 4580 /* Bus addressable pool (BAP) maximum PA registered (megabytes) */R#define SYI$_GALAXY_ID 4581 /* 16-byte unique ID of Galaxy platform */S#define SYI$_RMSD6 4582 /* Reserved to RMS development (dynamic) */`#define SYI$_MPDEV_ENABLE_O 4583 /* OBSOLETE Multipath I/O switching control parameter */q#define SYI$_MPDEV_REM/OTE_O 4584 /* OBSOLETE Multipath I/O switching control parameter for remote paths */T#define SYI$_RMSD1 4585 /* Reserved to RMS development (dynamic) */N#define SYI$_GALAXY_MEMBER 4586 /* Flag - Are we a Galaxy member? */Q#define SYI$_GALAXY_PLATFORM 4587 /* Flag - Are we on a Galaxy platform? */N#define SYI$_PARTITION_ID 4588 /* Galaxy Partition ID */N#define SYI$_COMMUNITY_ID 4589 /* Galaxy Community ID */N#d/efine SYI$_GLX_INST_TMO 4590 /* Galaxy heartbeat timeout value */N#define SYI$_SMCI_FLAGS 4591 /* SMCI Flags */N#define SYI$_SMCI_PORTS 4592 /* SMCI Port bitmask */N#define SYI$_SERVED_IO 4593 /* QIOserver control parameter */N#define SYI$_GLX_SW_VERSION 4594 /* Galaxy software version */N#define SYI$_GLX_MAX_MEMBERS 4595 /* maximum node_id this platform */N#define SYI$_GLX_INCARNATION/ 4596 /* galaxy incarnation count */N#define SYI$_GLX_FORMATION 4597 /* galaxy creation time (systime) */N#define SYI$_GLX_TERMINATION 4598 /* systime galaxy died */N#define SYI$_GLX_MBR_NAME 4599 /* galaxy member name */N#define SYI$_GLX_MBR_MEMBER 4600 /* galaxy member */N#define SYI$_GLX_MBR_INCARNATION 4601 /* galaxy member incarnation number */N#define SYI$_GLX_MBR_JOINED 4602 /* galaxy memb/er join time */Y#define SYI$_MPDEV_LCRETRIES 4603 /* Multipath Switching - local connect retries */N#define SYI$_MPDEV_D1 4604 /* Multipath Switching - dynamic */N#define SYI$_CLUSTER_NTIME 4605 /* Cluster New time */P#define SYI$_CLUSTER_NTIME_REF 4606 /* Cluster New time - local reference */R#define SYI$_MPDEV_POLLER_O 4607 /* OBSOLETE Multipath poller parameter */N#define SYI$_CPU_FAILOVER 4608 /* Array of CPU failov/er partitions */_#define SYI$_POTENTIAL_CPU_MASK 4609 /* Mask of CPUs that are compatible on this instance */h#define SYI$_POTENTIALCPU_CNT 4610 /* Number of CPUs that could potentially run on this instance */N#define SYI$_CPU_AUTOSTART 4611 /* Array of CPU autostart states */N#define SYI$_FAST_PATH_PORTS 4614 /* New Fastpath implementations */\#define SYI$_GLX_SHM_REG 4615 /* Number of Galaxy shared memory regions in GMDB */V#define SYI$_RAD_SUPPORT 4616 / /* Switch to turn RAD (aka NUMA) support on */c#define SYI$_NPAGECALC 4617 /* Tell VMS to calculate default npagedyn and vir values */N#define SYI$_WBM_MSG_INT 4618 /* write bitmap msg check interval */N#define SYI$_WBM_MSG_UPPER 4619 /* upper threshold for msgs */N#define SYI$_WBM_MSG_LOWER 4620 /* lower threshold for msgs */Z#define SYI$_HP_ACTIVE_CPU_CNT 4621 /* number of active CPUs in this hard partition */e#define SYI$_H/P_ACTIVE_SP_CNT 4622 /* number of active soft partitions in this hard partition */i#define SYI$_HP_CONFIG_SP_CNT 4623 /* number of configured soft partitions in this hard partition */^#define SYI$_HP_CONFIG_SBB_CNT 4624 /* number of configured SBBs in this hard partition */g#define SYI$_SHADOW_MAX_UNIT 4625 /* maximum number of dsa devices which can exist on the node */_#define SYI$_WBM_OPCOM_LVL 4626 /* opcom mode for write bitmap information messages */S#define /SYI$_AUTO_DLIGHT_SAV 4627 /* automatic daylight saving SYSGEN flag */U#define SYI$_RAD_MAX_RADS 4628 /* maximum number of RADs on this platform */V#define SYI$_RAD_CPUS 4629 /* potential CPUs per RAD for this instance */V#define SYI$_RAD_MEMSIZE 4630 /* private memory per RAD for this instance */N#define SYI$_RAD_SHMEMSIZE 4631 /* number of shared memory per RAD */Q#define SYI$_GALAXY_SHMEMSIZE 4632 /* number of shared memory pages total */`/#define SYI$_NPAGERAD 4633 /* How much of NPAGEDYN is in other than the base RAD */W#define SYI$_SERIAL_NUMBER 4634 /* System Serial Number - may be virtualized */N#define SYI$_MPDEV_D2 4636 /* Multipath Switching - dynamic */N#define SYI$_MPDEV_D3 4637 /* Multipath Switching - dynamic */N#define SYI$_MPDEV_D4 4638 /* Multipath Switching - dynamic */Y#define SYI$_MPDEV_AFB_INTVL 4639 /* Multipath Auto fail back Interval -/ dynamic */N#define SYI$_MPW_STACKPAGES 4640 /* MPW Stack Pages */a#define SYI$_PRESENT_CPU_MASK 4641 /* Mask of CPUs that are present in the hard partition */c#define SYI$_PRESENTCPU_CNT 4642 /* Number of CPUs that are present in the hard partition */d#define SYI$_POWERED_CPU_MASK 4643 /* Mask of CPUs that are powered up in the hard partition */f#define SYI$_POWEREDCPU_CNT 4644 /* Number of CPUs that are powered up in the hard partition */P#def/ine SYI$_RMSD7 4645 /* RMS readahead hint feature for XFC */N#define SYI$_RMS_SEQFILE_WBH 4646 /* RMS default writebehind feature */N#define SYI$_DCL_CTLFLAGS 4647 /* DCL Control Flags */c#define SYI$_DELPRC_EXIT 4648 /* System-wide EXIT behavior for direct calls to $DELPRC */R#define SYI$_PHYMEM_CONFIG 4649 /* Dynamic memory configuration control */N#define SYI$_KTK_D1 4650 /* Dynamic kernel tuning knob */N#d/efine SYI$_KTK_D2 4651 /* Dynamic kernel tuning knob */N#define SYI$_KTK_D3 4652 /* Dynamic kernel tuning knob */N#define SYI$_KTK_D4 4653 /* Dynamic kernel tuning knob */N#define SYI$_KTK_D5 4654 /* Dynamic kernel tuning knob */N#define SYI$_KTK_D6 4655 /* Dynamic kernel tuning knob */N#define SYI$_KTK_D7 4656 /* Dynamic kernel tuning knob */N#define SYI$_KTK_D8 4657 / /* Dynamic kernel tuning knob */N#define SYI$_KTK_D9 4658 /* Dynamic kernel tuning knob */N#define SYI$_KTK_D10 4659 /* Dynamic kernel tuning knob */N#define SYI$_KTK_D11 4660 /* Dynamic kernel tuning knob */N#define SYI$_KTK_D12 4661 /* Dynamic kernel tuning knob */T#define SYI$_MIN_CPU_FEATURE_MASK 4662 /* AMASK value of all CPUs ANDed together */N#define SYI$_FIBRE_SCSI_RSV1 4663 /* reser/ved for Fibre SCSI use */N#define SYI$_DEFUID 4664 /* default POSIX UID */N#define SYI$_DEFGID 4665 /* default POSIX GID */Z#define SYI$_MVSUPMSG_INTVL 4666 /* Quiet mountver suppression interval -dynamic */Y#define SYI$_MVSUPMSG_NUM 4667 /* Quiet mountver suppression number -dynamic */N#define SYI$_SHADOW_SITE_ID 4668 /* Shadow Site value */T#define SYI$_RMSD2 4669 /* Reserve/d to RMS development (dynamic) */T#define SYI$_RMSD3 4670 /* Reserved to RMS development (dynamic) */T#define SYI$_RMSD4 4671 /* Reserved to RMS development (dynamic) */T#define SYI$_RMSD5 4672 /* Reserved to RMS development (dynamic) */N#define SYI$_TESTING123 4673 /* Reserved for debugging */N#define SYI$_VCC_PAGESIZE 4674 /* Reserved for XFC use */N#define SYI$_VCC_RSVD 4675 /* Reserved /for XFC use */S#define SYI$_RSVD_IO_1 4676 /* Reserved for debug/future enhancement */S#define SYI$_RSVD_IO_2 4677 /* Reserved for debug/future enhancement */S#define SYI$_RSVD_CLU_1 4678 /* Reserved for debug/future enhancement */S#define SYI$_RSVD_CLU_2 4679 /* Reserved for debug/future enhancement */S#define SYI$_RSVD_EXEC_1 4680 /* Reserved for debug/future enhancement */S#define SYI$_RSVD_EXEC_2 4681 /* Reser/ved for debug/future enhancement */S#define SYI$_RSVD_SECUR_1 4682 /* Reserved for debug/future enhancement */S#define SYI$_RSVD_SECUR_2 4683 /* Reserved for debug/future enhancement */S#define SYI$_RSVD_LAN_1 4684 /* Reserved for debug/future enhancement */S#define SYI$_RSVD_LAN_2 4685 /* Reserved for debug/future enhancement */Y#define SYI$_SHADOW_REC_DLY 4686 /* Time to wait after crash before merge start */N#define SYI$_SHADOW_D1 4687 / /* Shadowing spare */N#define SYI$_SHADOW_D2 4688 /* Shadowing spare */N#define SYI$_SHADOW_D3 4689 /* Shadowing spare */N#define SYI$_SHADOW_D4 4690 /* Shadowing spare */N#define SYI$_SHADOW_D5 4691 /* Shadowing spare */N#define SYI$_WBM_D1 4692 /* Write Bit Map for HBMM */N#define SYI$_TTY_DEFCHAR3 4693 /* Terminal charac/teristics, 3nd */N/* longword only lower 16 attributes */N/* upper 16 bits are Asian VMS bits */N#define SYI$_VHPT_SIZE 4694 /* Size of VHPT on IA64 only */W#define SYI$_SHADOW_HBMM_RTC 4696 /* HBMM Reset Threshold Check Timer Interval */N#define SYI$_FCLAN_FRAME 4697 /* Fibre Channel LAN frame size */O#define SYI$_MAX_PFN_64 4698 /* Returns contents of MMG$GQ_MAXP/FN */R#define SYI$_PFN_MEMORY_MAP_64 4699 /* Returns a 64 bit physical memory map */N#define SYI$_CPU_SOCKETS 4700 /* Returns number of cpu sockets */X#define SYI$_ERLBUFFERPAG_S2 4701 /* Number of pagelets per S2 error log buffer */N#define SYI$_ERRORLOGBUFF_S2 4702 /* Number of S2 error log buffers */X#define SYI$_SHADOW_PSM_RDLY 4703 /* Shadowing Per Served Member Recovery Delay */m#define SYI$_SYSTEM_UUID 4704 /* Returns the system UUID on Itan/ium systems - may be virtualized */X#define SYI$_PLATF_SPT_D1 4705 /* Reserved to VMS platform support (dynamic) */D#define SYI$_PLATF_SPT_D2 4706 /* " */D#define SYI$_PLATF_SPT_D3 4707 /* " */D#define SYI$_PLATF_SPT_D4 4708 /* " */W#define SYI$_PLATF_SPT_1 4709 /* Reserved to VMS platform support (static) */N#define SYI$_PLATF_SPT_2 4710 /* " *//D#define SYI$_PLATF_SPT_3 4711 /* " */D#define SYI$_PLATF_SPT_4 4712 /* " */N#define SYI$_SWIS_LOG 4713 /* Knob to change the swis log */[#define SYI$_EXECSTACKPAGES 4714 /* Number of pages for RMS EXEC ASB or RSE stack */Z#define SYI$_GB_CACHEALLMAX 4715 /* RMS global buffer cache whole file criterion */_#define SYI$_GB_DEFPERCENT 4716 /* RMS global buffer cache default percent criterion */b/#define SYI$_CPU_THREADING 4717 /* Knob to change how we deal with CPU hardware threads */N#define SYI$_CPU_POWER_MGMT 4718 /* Control Power Managment on IPF */^#define SYI$_CPU_POWER_THRSH 4719 /* Idle Threshold necessary to use Power Management */m#define SYI$_SMP_CPU_BITMAP 4720 /* (1024-bit) Map of CPUs eligible for participation in SMP system */a#define SYI$_IO_PRCPU_BITMAP 4721 /* (1024-bit) Map of CPUs for fast path I/O processing */N#define SYI$_LOCKR/MWT 4722 /* Lock Remaster Weight */N#define SYI$_SAS_NAMING 4723 /* SAS Device Naming */N#define SYI$_ACTIVE_CPU_BITMAP 4724 /* CBB bitmap data */N#define SYI$_AVAIL_CPU_BITMAP 4725 /* of CPUs */N#define SYI$_POTENTIAL_CPU_BITMAP 4726 /* in various */N#define SYI$_POWERED_CPU_BITMAP 4727 /* states */N#define SYI$_PRESENT_CPU_BITMAP 4728 /* / ... */N#define SYI$_COMPLEX_ID 4729 /* Complex Profile ID */N#define SYI$_COMPLEX_NAME 4730 /* Complex Profile Name */N#define SYI$_HP_ID 4731 /* Hard Partition ID (nPar ID) */N#define SYI$_HP_NAME 4732 /* Hard Partition Name (nPar Name) */N#define SYI$_CELLULAR_PLATFORM 4733 /* System is cell-based */N#define SYI$_BOOT_DEVICE 4734 /* sys$ar_bootucb / */U#define SYI$_HP_CORE_CNT 4735 /* Count of unique cores in hard partition */j#define SYI$_ACTIVE_CORE_CNT 4736 /* Count of cores in hard partition with at least one active LP */c#define SYI$_SSIO_SYNC_INTVL 4737 /* Interval at which dirty shared stream I/O buffers are */N/* written to disk by process doing sync() */_#define SYI$_SCH_SOFT_OFFLD 4738 /* Bitmap of CPUs sometimes excluded from scheduling */U#define SYI$_SCH_HAR/D_OFFLD 4739 /* Bitmap of CPUs excluded from scheduling */o#define SYI$_SCHED_FLAGS 4740 /* Reserved cell for sched noodling, replaces parameter SCH_CTLFLAGS */X#define SYI$_GH_RES_CODE_S2 4741 /* Pages in the resident image S2 code region */N#define SYI$_GRAPHICS_CONSOLE 4742 /* 1 if Graphics Console, 0 if not */X#define SYI$_TCPIP_LOAD 4743 /* 1 Enables load TCPIP Services at boot time */Y#define SYI$_NISCS_UDP_PORT 4744 /* UDP Port number for c/luster communications. */^#define SYI$_PHYS_SERIAL_NUMBER 4745 /* Physical System Serial Number on Itanium systems */U#define SYI$_PHYS_SYSTEM_UUID 4746 /* Physical system UUID on Itanium systems */X#define SYI$_PAGED_LAL_SIZE 4747 /* Pagedyn Lookaside list maximum packet size */\#define SYI$_RMS_PATH_TMO 4748 /* Lifetime for symlink entries in RMS path cache */W#define SYI$_NISCS_UDP_PKTSZ 4749 /* udp packet size for cluster communication */N/* ADD 'EXE' (LONGWO/RD) ITEM-CODES *ONLY* JUST BEFORE THIS COMMENT ******** */N/* DO NOT ADD 'FLD' (FIELD) ITEMS HERE!!!! ADD THEM BEFORE 'LASTFLD' ****** */N#define SYI$_LASTEXE 4750 /* LAST INDEX */I/* The following item-codes are for 'sub-field data' items. */I/* There usually exists another item-code to retrieve the */I/* whole parent cell (longword) - in the EXE section above. */N#define SYI$_CPU 8192 /* CPU type / */N#define SYI$_BUGREBOOT 8193 /* Bugcheck reboot enable */N#define SYI$_CRDENABLE 8194 /* Memory error checking enable */N#define SYI$_DUMPBUG 8195 /* Bugcheck dump enable */N#define SYI$_BUGCHECKFATAL 8196 /* All bugchecks become fatal */N#define SYI$_ACP_MULTIPLE 8197 /* New ACP for each disk class */N#define SYI$_NOAUTOCONFIG 8198 /* Auto configuration inhibit */N#def/ine SYI$_NOCLOCK 8199 /* Interval timer inhibit */N#define SYI$_NOCLUSTER 8200 /* Page read clustering inhibit */N#define SYI$_POOLPAGING 8201 /* Enable paging of paged pool */N#define SYI$_SBIERRENABLE 8202 /* SBI error detection enable */P#define SYI$_SETTIME 8203 /* Force entry of time at system boot */N#define SYI$_ACP_SHARE 8204 /* Enable sharing of F11ACP */N#define SYI$_SYSPAGING 8205 / /* Enable paging of system code */Q#define SYI$_UAFALTERNATE 8206 /* Select alternate authorization file */Q#define SYI$_WRITABLESYS 8207 /* Leave system writable for debugging */Q#define SYI$_RESALLOC 8208 /* Enable resource allocation checking */S#define SYI$_SSINHIBIT 8209 /* Inhibit system services for processes */N#define SYI$_CONCEAL_DEVICES 8210 /* Enable concealed devices */N#define SYI$_SAVEDUMP 8211 / /* Save dump if it's in page file */T#define SYI$_MOUNTMSG 8212 /* Enable oper notification of vol mounts */R#define SYI$_DISMOUMSG 8213 /* Enable oper notification of vol dism */N#define SYI$_LOADERAPT 8214 /* Load alt erase pattern generator */O#define SYI$_LOADCHKPRT 8215 /* Load alt protection check routine */N#define SYI$_XCPU 8216 /* CPU subtype (Extended SID info) */N#define SYI$_CJFLOAD 8217 /* Load co/mmon journaling code */P#define SYI$_CJFSYSRUJ 8218 /* Load recovery unit journaling code */N#define SYI$_NODE_AREA 8219 /* System ID node area */N#define SYI$_NODE_NUMBER 8220 /* System ID node number */N#define SYI$_CLASS_PROT 8221 /* Non-discretionary check flag */T#define SYI$_CHARACTER_EMULATED 8222 /* Character string instructions emulated */R#define SYI$_DECIMAL_EMULATED 8223 /* Decimal string instructio/ns emulated */N#define SYI$_D_FLOAT_EMULATED 8224 /* D floating instructions emulated */N#define SYI$_F_FLOAT_EMULATED 8225 /* F floating instructions emulated */N#define SYI$_G_FLOAT_EMULATED 8226 /* G floating instructions emulated */N#define SYI$_H_FLOAT_EMULATED 8227 /* H floating instructions emulated */W#define SYI$_LOADMTACCESS 8228 /* Load installation specific access routine */N#define SYI$_ACP_XQP_RES 8229 /* Resident XQP */]/#define SYI$_WRITESYSPARAMS 8230 /* Write active parameters to the system .PAR file */P#define SYI$_LGI_BRK_TERM 8231 /* Use term name in breakin detection */N#define SYI$_LGI_BRK_DISUSER 8232 /* Disable user account on breakin */R#define SYI$_ACP_REBLDSYSD 8233 /* Rebuild system disk when mounting it */N#define SYI$_WS_OPA0 8234 /* Workstation using QVSS for OPA0 */N#define SYI$_NOPGFLSWP 8235 /* Inhibit swapping into pagefiles */U#def/ine SYI$_LOAD_SYS_IMAGES 8237 /* Control of how system images are loaded */N#define SYI$_NISCS_CONV_BOOT 8238 /* Allow remote conversational boot */N#define SYI$_NISCS_LOAD_PEA0 8239 /* Load NI-SCS driver for PEA0 */Y#define SYI$_SA_APP 8240 /* Booting stand-alone application (SA-BACKUP) */P#define SYI$_LOAD_PWD_POLICY 8241 /* Load site-specific password policy */N#define SYI$_FT_ACTIVE 8242 /* CIRRUS system is fully active */P#define /SYI$_WLKSYSDSK 8244 /* Booting with write locked sys disk */\#define SYI$_DBGTK_LOADED 8245 /* Remote system debugger target kernel is loaded */T#define SYI$_DAY_OVERRIDE 8246 /* UAF day classifications are overridden */N#define SYI$_DAY_SECONDARY 8247 /* UAF day override is to Secondary */N#define SYI$_CWLOGICALS 8248 /* State of CAP_CWLOGICALS */N#define SYI$_POWEROFF 8249 /* Enable software power-off */W#define SYI$/_MPDEV_ENABLE 8250 /* Multipath I/O switching control parameter */h#define SYI$_MPDEV_REMOTE 8251 /* Multipath I/O switching control parameter for remote paths */N#define SYI$_MPDEV_POLLER 8252 /* Multipath poller parameter */N#define SYI$_LCKMGR_MODE 8253 /* Lock Manager Mode */N#define SYI$_LCKMGR_RSVD 8254 /* Lock Manager Reserved */N#define SYI$_LCKMGR_CPUID 8255 /* Lock Manager CPU ID */N#d/efine SYI$_PERSISTENT_RES 8256 /* Fibre SCSI Reservation Support */N#define SYI$_SYSSER_LOGGING 8257 /* Enable system service logging */Q#define SYI$_SCSI_ERROR_POLL 8258 /* Enable polling to flush SCSI errors */T#define SYI$_SSI_ENABLE 8259 /* Enable system service intercept on I64 */v#define SYI$_VIRTUAL_MACHINE 8260 /* True if we're running on a VMS guest under HPVM -- useful on I64 only. */X#define SYI$_NISCS_USE_LAN 8261 /* True enables cl/uster comm. use of 802 LAN. */T#define SYI$_NISCS_USE_UDP 8262 /* True enables cluster comm. use of UDP. */N/* ADD 'FLD' (FIELD) ITEM-CODES *ONLY* JUST BEFORE THIS COMMENT *********** */N/* DO NOT ADD 'EXE' (LONGWORD) ITEMS HERE!!!! ADD THEM BEFORE 'LASTEXE' *** */N#define SYI$_LASTFLD 8263 /* LAST INDEX */N/* ) equals SYI$C_FLDTYPE@12 increment 1 prefix SYI tag $; */Q/*******************************************************************/********** */N/** */J/** THE FOLLOWING DEFINITIONS EXIST FOR COMPATIBILITY WITH THE 1ST */J/** IMPLEMENTATION OF SYS$GETSYI. DO NOT CHANGE THEM!!! */J/** ADD NEW GETSYI ITEM-CODES ONLY TO THE PREVIOUS LISTS. */N/** */Q/***************************************************************************** */N#define SYI$C_SFWT/YPE 1 /* SYSTEM SOFTWARE ITEM */N#define SYI$C_HDWTYPE 2 /* HARDWARE ITEM */N#define SYI$C_LISTEND 0 /* ITMLST TERMINATOR */N/* IDENTIFIER FOR SYSTEM SOFTWARE */N#define SYI$_OLDVERSION 256 /* VMS VERSION NUMBER */N#define SYI$_LASTSFW 257 /* LAST INDEX */N/* *****************************************/************************** */N/* ********************* BEGIN TEMP FIX ****************************** */N/* ********************* BEGIN TEMP FIX ****************************** */N/* ******************************************************************* */N/* ) equals SYI$C_SFWTYPE@8 increment 1 prefix SYI tag $; */N/* ******************************************************************* */N/* ********************** END TEMP FIX *******************************/ */N/* ********************** END TEMP FIX ******************************* */N/* ******************************************************************* */N/* IDENTIFIER FOR HARDWARE TYPE */N#define SYI$_OLDCPU 512 /* CPU TYPE */N#define SYI$_OLDSID 513 /* SYSTEM ID REGISTER */N#define SYI$_LASTHDW 514 /* LAST INDEX */N/* ) equals S /YI$C_HDWTYPE@8 increment 1 prefix SYI tag $; */N/* Define constant for the length of environmental vector item codes */N/* (POWER_VECTOR, TEMPERATURE_VECTOR, THERMAL_VECTOR, and FAN_VECTOR). */"#define SYI$K_ENV_VECTOR_LENGTH 16N/* Define status code for each element in the environmental vector */!#define SYI$K_ENV_STATUS_FAILED 0#define SYI$K_ENV_STATUS_OK 1(#define SYI$K_ENV_STATUS_NOT_PRESENT 255$#define SYI$K_ENV_STATUS_UNKNOWN 254N/* Define the SYI$/_ARCH_TYPE return constants */N#define SYI$K_ARCH_OTHER 0 /* Unknown SYI$_ARCH_TYPE */N#define SYI$K_ARCH_VAX 1 /* VAX Architecture */N#define SYI$K_ARCH_ALPHA 2 /* Alpha Architecture */N#define SYI$K_ARCH_IA64 3 /* IA-64 (IPF) Architecture */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported *//b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SYIDEF_LOADED */ wwK{c/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//* /*******************************************************************************************************************************//*** MODULE $SYSEVTDEF ***/#ifndef __SYSEVTDEF_LOADED#define __SYSEVTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previou/sly-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 unio /n#else#define __union variant_union#endif#endif P#define SYSEVT$C_ALL_EVENTS 1 /* Valid for $Clear_system_event only */S#define SYSEVT$C_ADD_GALAXY_MEMBER 2 /* One or more instances have joined the */N/* Galaxy community */Q#define SYSEVT$C_DEL_GALAXY_MEMBER 3 /* One or more instances have left the */N/* Galaxy community */Q#define SYSEVT$C_ADD_ACTIVE_CP/U 4 /* One or more CPUs have become active */N/* within this VMS instance */R#define SYSEVT$C_DEL_ACTIVE_CPU 5 /* One or more CPU have become inactive */R#define SYSEVT$C_ADD_CONFIG_CPU 6 /* One or more CPUs are now part of the */N/* configure set for this instance. */V#define SYSEVT$C_DEL_CONFIG_CPU 7 /* One or more CPUS have left this instance */^#define SYSEVT$C_CONFIG_TREE 8 / /* An update has occurred to the Galaxy config tree */Y#define SYSEVT$C_FASTPATH_CPUS 9 /* A modification has been made to the system */N/* parameter, IO_PREFER_CPUS. */N#define SYSEVT$C_TDF_CHANGE 10 /* time differential change */N#define SYSEVT$C_CPU_POWER 11 /* CPU power transition */P#define SYSEVT$C_INDICTMENT 12 /* Component Indictment was performed */Q#define SYSEVT$C_CPU_DEALLOCATE /13 /* CPU deallocated from running system */N#define SYSEVT$C_MAX_EVENT 14 /* maximum event number */N#define SYSEVT$C_NUM_EVENTS 13 /* Number of events */#define SYSEVT$K_NUM_EVENTS 13N#define SYSEVT$M_NOTIFY_ONCE 0 /* indicate one shot request */b#define SYSEVT$M_REPEAT_NOTIFY 1 /* Bit 0 represents whether the event notification is a */b#define SYSEVT$V_REPEAT_NOTIFY 0 /* one shot deal or should be a repeating 0notification. */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __SYSEVTDEF_LOADED */ wwkc/********************************************************************************************************************************/= 0/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]TBK$ROUTINES.SDI;1 *//********************************************************************************************************************************//*** MODULE TBK$ROUTINES ***/#ifndef __TBK_ROUTINES_LOADED#define __TBK_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomemb0er_alignmentR#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 !defined0(__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 "#pragma required_pointer_size save #pragma required_pointer_size 64 -#define tbk$i64_symbolize TBK$I64_SYMBOLIZE#ifdef __NEW_STARLETunsigned int tbk$i64_symbolize( __optional_params);#else /* __OLD_STARLET */1unsigned int tbk$i64_symbolize(__unknown_params);!#end0if /* #ifdef __NEW_STARLET */  %#pragma required_pointer_size restore $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __TBK_ROUTINES_LOADED */ ww{c/******************************************************************* 0*************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $TBKDEF ***/#ifndef __TBKDEF_LOADED#define __TBKDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma 0__member_alignment __save#pragma __nomember_alignmentR#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 ...0#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 "#pragma required_pointer_size save #pragma required_pointer_size 64  9#ifdef __cplusplus /* Define structure prototypes */struct _descriptor; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETc#if !defined(__NOBAS 0EALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _tbk_api_param {#pragma __nomember_alignmentN unsigned short int tbk$w_length; /*Input, structure length, by value */N unsigned char tbk$b_type; /*Input, must be zero. */N unsigned char tbk$b_version; /*Input, version of this structure. */N unsigned int tbk$l_reserveda 0; /*Input, must be zero. */N unsigned __int64 tbk$q_faulting_pc; /*Input, pc value, by value */N unsigned __int64 tbk$q_faulting_fp; /*Input, frame pointer, by value */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N struct _descriptor *tbk$pq_filename_desc; /*Output, string descriptor */#else' unsigned __int64 tbk$pq_filename_ 0desc;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */R struct _descriptor *tbk$pq_library_module_desc; /*Output, string descriptor */#else- unsigned __int64 tbk$pq_library_module_desc;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit poi 0nters */p unsigned int *tbk$pq_record_number; /*Output, record number within filename or within text library module */#else' unsigned __int64 tbk$pq_record_number;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */U struct _descriptor *tbk$pq_image_desc; /*Output, string descriptor, image name */#else$ unsigned __int64 tbk$pq_image_desc;#endifR#ifdef 0 __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */W struct _descriptor *tbk$pq_module_desc; /*Output, string descriptor, module name */#else% unsigned __int64 tbk$pq_module_desc;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */Y struct _de 0scriptor *tbk$pq_routine_desc; /*Output, string descriptor, routine name */#else& unsigned __int64 tbk$pq_routine_desc;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */R unsigned int *tbk$pq_listing_lineno; /*Output, compiler listing line number */#else( unsigned __int64 tbk$pq_listing_lineno;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever p 0tr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */^ unsigned __int64 *tbk$pq_rel_pc; /*Output, relative pc within module or within image */#else unsigned __int64 tbk$pq_rel_pc;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */} unsigned __int64 *tbk$pq_image_base_addr; /*Output, base a0ddress of the image which contains the pc value object code, */#else) unsigned __int64 tbk$pq_image_base_addr;#endifN/*by reference */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ unsigned __int64 *tbk$pq_module_base_addr; /*Output, base address of the module, which contains the pc value object code 0, */#else* unsigned __int64 tbk$pq_module_base_addr;#endifN/*by reference */N/*Input, address of a routine, which provides malloc() functionality */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *(*tbk$pq_malloc_rtn)( unsigned int );#else$ unsigned __int64 tbk$pq_malloc_rtn;#endif 0N/*Input, address of a routine, which provides free() functionality */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void (*tbk$pq_free_rtn)(R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ void *#else unsigned __int64 #end 0if);#else" unsigned __int64 tbk$pq_free_rtn;#endifQ/*Input, address of a quadword, specifying options to be provided by this call */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */- unsigned __int64 *tbk$pq_symbolize_flags;#else) unsigned __int64 tbk$pq_symbolize_flags;#endifN unsigned __int64 tbk$q_reserved0; /*Reserved by HP */ 0N unsigned __int64 tbk$q_reserved1; /*Reserved by HP */N unsigned __int64 tbk$q_reserved2; /*Reserved by HP */ } TBK_API_PARAM;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _tbk_api_param {#pragma __nomember_alignmentN unsigned short int tbk$w_length;0 /*Input, structure length, by value */N unsigned char tbk$b_type; /*Input, must be zero. */N unsigned char tbk$b_version; /*Input, version of this structure. */N unsigned int tbk$l_reserveda; /*Input, must be zero. */N unsigned int tbk$q_faulting_pc [2]; /*Input, pc value, by value */N unsigned int tbk$q_faulting_fp [2]; /*Input, frame pointer, by value */N unsigned __int64 tbk$pq_filename_desc; /*Output, string de0scriptor */O unsigned __int64 tbk$pq_library_module_desc; /*Output, string descriptor */s unsigned __int64 tbk$pq_record_number; /*Output, record number within filename or within text library module */R unsigned __int64 tbk$pq_image_desc; /*Output, string descriptor, image name */T unsigned __int64 tbk$pq_module_desc; /*Output, string descriptor, module name */V unsigned __int64 tbk$pq_routine_desc; /*Output, string descriptor, routine name */U unsigned __int64 tbk$pq_li0sting_lineno; /*Output, compiler listing line number */^ unsigned __int64 tbk$pq_rel_pc; /*Output, relative pc within module or within image */| unsigned __int64 tbk$pq_image_base_addr; /*Output, base address of the image which contains the pc value object code, */N/*by reference */ unsigned __int64 tbk$pq_module_base_addr; /*Output, base address of the module, which contains the pc value object code, */N/*by reference 0 */N/*Input, address of a routine, which provides malloc() functionality */, unsigned __int64 *(tbk$pq_malloc_rtn)();N/*Input, address of a routine, which provides free() functionality */ void (tbk$pq_free_rtn)();Q/*Input, address of a quadword, specifying options to be provided by this call */, unsigned __int64 tbk$pq_symbolize_flags;N unsigned int tbk$q_reserved0 [2]; /*Reserved by HP 0 */N unsigned int tbk$q_reserved1 [2]; /*Reserved by HP */N unsigned int tbk$q_reserved2 [2]; /*Reserved by HP */ } tbk_api_param;%#endif /* #ifdef __NEW_STARLET */#define TBK$K_LENGTH 152#define TBK$C_LENGTH 152#define TBK$K_VERSION 1 %#pragma required_pointer_size restoreN/* */N/************************************************************* 0*/N/* SYMBOLIZE_FLAGS options */N/* The following may be applied to the quadword pointed to */N/* by the SYMBOLIZE_FLAGS field. */N/* */N/* EXCEPTION_IS_FAULT values affect line number and */N/* record number calculation. */U/* On an API entry, wh0en an exception has occurred in a frame, select the value 1. */[/* 0=> (Default) Program Adjusts the PC value to correctly determine the line number */N/* 1=> Program Uses the supplied PC value to determine the line number */N/* */N/* ENTRY_TYPE values which affect processing */N/* 0=> TRACE was entered via the API ENTRY */N/* 1=> TRACE was enter 0ed via the TRACEBACK exception processing */N/* */N/************************************************************* */$#define TBK$M_EXCEPTION_IS_FAULT 0x1$#define TBK$M_ENTRY_TYPE 0x100000000 #ifdef __NEW_STARLET%typedef struct _tbk_symbolize_flags {* unsigned tbk$v_exception_is_fault : 1; unsigned tbk$v_filler1 : 31;" unsigned tbk$v_entry_type : 1; unsigned tbk$v_filler2 : 31; 0 } TBK_SYMBOLIZE_FLAGS;#else /* __OLD_STARLET */struct tbk_symbolize_flags {* unsigned tbk$v_exception_is_fault : 1; unsigned tbk$v_filler1 : 31;" unsigned tbk$v_entry_type : 1; unsigned tbk$v_filler2 : 31; } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr siz0e */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __TBKDEF_LOADED */ ww>d/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// ----------------------------------------------------------------------------- 0*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ************************************************************************* */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * * */P/* * Confidential computer software. Valid license from HP and/or * */P/* * its su0bsidiaries required for possession, use, or copying. * */P/* * * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. * */P/* *  0 * */P/* * Neither HP nor any of its subsidiaries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein sho!0uld be construed as constituting an * */P/* * additional warranty. * */P/* * * */P/* ************************************************************************* *//* ******************************************************************************************************************************** */@/* Created: 5-Apr-2012 13:00:57 by OpenVMS SDL EV3-3 */M/* Source: "016-MAR-2005 11:40:59 $1$DGA7304:[STARLET_H.SRC]TEBDEF.SDL;1 *//* ******************************************************************************************************************************** */  /* .MACRO $TEBDEF,$GBL */ /* $DEFINI TEB,$GBL *//* */,/* Thread Environment Block Definitions *//* */ /* .SYMBOL_ALIGNMENT QUAD */#define TEB$M_ASTACT 0x1#define TEB$M_ASTEN 0x2#define TEB$S_TEB 184#define TEB$S_FLINK 8?#define TEB$PQ_FLINK 0 /* Forw #0ard queue link */#define TEB$S_BLINK 8@#define TEB$PQ_BLINK 8 /* Backward queue link */@#define TEB$W_SIZE 16 /* Size of TEB, in bytes */D#define TEB$B_VERSION 18 /* Version number for TEB */F#define TEB$B_TYPE 19 /* Structure type code for TEB */#define TEB$S_reserved_2 4?#define TEB$b_reserved_2 20 /* Reserved to DECthreads */#define TEB$S_SEQUENCE 8E#define TEB$Q_SEQUENCE 24 /* Thread sequence number * $0/#define TEB$S_reserved_3 16?#define TEB$q_reserved_3 32 /* Reserved to DECthreads */#define TEB$S_PER_KT_AREA 8L#define TEB$PQ_PER_KT_AREA 48 /* Address of per kernel thread area */#define TEB$S_STACK_BASE 8O#define TEB$PQ_STACK_BASE 56 /* Address of first usable byte in stack */#define TEB$S_STACK_RESERVE 8R#define TEB$PQ_STACK_RESERVE 64 /* Address of first byte in reserve area */#define TEB$S_STACK_YELLOW 8P#define TEB$PQ_STACK_YELLOW 72 /* A %0ddress of first byte in yellow area */#define TEB$S_STACK_GUARD 8N#define TEB$PQ_STACK_GUARD 80 /* Address of first byte in guard area */#define TEB$S_STACK_SIZE 8Z#define TEB$Q_STACK_SIZE 88 /* Total stack allocation (green+reserve+yellow+red) */#define TEB$S_TSD_VALUES 8O#define TEB$PQ_TSD_VALUES 96 /* Address of thread-specific data array */T#define TEB$L_TSD_COUNT 104 /* Count of thread-specific data values */7#define TEB$L_CANCEL_FLAGS 108 /* &0cancel flags */H#define TEB$L_CANCEL_COUNT 112 /* CMA alert scope nesting count */7#define TEB$L_THREAD_FLAGS 116 /* thread flags */K#define TEB$V_ASTACT 0 /* there's a user mode AST active */E#define TEB$V_ASTEN 1 /* use mode ASTs are enabled */F#define TEB$L_THD_ERRNO 120 /* Per-thread errno value */?#define TEB$l_reserved_4 124 /* Reserved to DECthreads */#define TEB$S_STACK_HIWATER 8D#define TEB$PQ_STACK_HIWATER 128 '0 /* Lowest known SP address */@#define TEB$L_HOME_RAD 136 /* Thread's home RAD */M#define TEB$L_RAD_SAFE 140 /* Scratch: written by Tru64 UNIX */#define TEB$S_REG_STACK_BASE 8C#define TEB$PQ_REG_STACK_BASE 144 /* Current regstack base */ #define TEB$S_REG_STACK_YELLOW 8L#define TEB$PQ_REG_STACK_YELLOW 152 /* Current regstack yellow zone */#define TEB$S_REG_STACK_GUARD 8J#define TEB$PQ_REG_STACK_GUARD 160 /* Current regstack guard zone */#d (0efine TEB$S_REG_STACK_SIZE 8>#define TEB$PQ_REG_STACK_SIZE 168 /* Size of regstack */!#define TEB$S_REG_STACK_HIWATER 8>#define TEB$PQ_REG_STACK_HIWATER 176 /* Highest known bsp */;#define TEB$K_LENGTH 184 /* Length of TEB */;#define TEB$C_LENGTH 184 /* Length of TEB */J#define TEB$C_TSD_KEY_SSPI 1 /* TSD key value reserved for SSPI */ /* .SYMBOL_ALIGNMENT NONE */ /* $DEFEND TEB,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends her )0e */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $TEBDEF ***/#i *0fndef __TEBDEF_LOADED#define __TEBDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 ex+0tern "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 N/* */N/* Thread Environment ,0Block Definitions */N/* */ #define TEB$M_ASTACT 0x1#define TEB$M_ASTEN 0x2 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _teb {#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Define -0d whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N struct _teb *teb$pq_flink; /* Forward queue link */#else unsigned __int64 teb$pq_flink;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N struct _teb *teb$pq_blink; /* Backward queue link .0 */#else unsigned __int64 teb$pq_blink;#endifN unsigned short int teb$w_size; /* Size of TEB, in bytes */N unsigned char teb$b_version; /* Version number for TEB */N unsigned char teb$b_type; /* Structure type code for TEB */N unsigned char teb$b_reserved_2 [4]; /* Reserved to DECthreads */N unsigned __int64 teb$q_sequence; /* Thread sequence number */N unsigned __int64 teb$q_reserved_3 [2]; /0 /* Reserved to DECthreads */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */O void *teb$pq_per_kt_area; /* Address of per kernel thread area */#else% unsigned __int64 teb$pq_per_kt_area;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default t 00o 64-bit pointers */S void *teb$pq_stack_base; /* Address of first usable byte in stack */#else$ unsigned __int64 teb$pq_stack_base;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */S void *teb$pq_stack_reserve; /* Address of first byte in reserve area */#else' unsigned __int64 teb$pq_stack_reserve;#endifR#ifdef __INITIAL_POINTER 10_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */R void *teb$pq_stack_yellow; /* Address of first byte in yellow area */#else& unsigned __int64 teb$pq_stack_yellow;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */Q void *teb$pq_stack_guard; 20 /* Address of first byte in guard area */#else% unsigned __int64 teb$pq_stack_guard;#endif_ unsigned __int64 teb$q_stack_size; /* Total stack allocation (green+reserve+yellow+red) */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */S void (*(*teb$pq_tsd_values)); /* Address of thread-specific data array */#else$ unsigned __int64 teb$pq_tsd_values; 30#endifR unsigned int teb$l_tsd_count; /* Count of thread-specific data values */N unsigned int teb$l_cancel_flags; /* cancel flags */N unsigned int teb$l_cancel_count; /* CMA alert scope nesting count */ __union {N unsigned int teb$l_thread_flags; /* thread flags */ __struct {N unsigned teb$v_astact : 1; /* there's a user mode AST active */N unsigned teb$v_asten : 1; /* use mode AS 40Ts are enabled */( unsigned teb$v_fill_29_ : 6; } teb$r_fill_28_; } teb$r_fill_27_;N int teb$l_thd_errno; /* Per-thread errno value */N int teb$l_reserved_4; /* Reserved to DECthreads */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *teb$pq_stack_hiwater; /* 50 Lowest known SP address */#else' unsigned __int64 teb$pq_stack_hiwater;#endifN int teb$l_home_rad; /* Thread's home RAD */N int teb$l_rad_safe; /* Scratch: written by Tru64 UNIX */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *teb$pq_reg_stack_base; /* Current regstack base 60 */#else( unsigned __int64 teb$pq_reg_stack_base;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *teb$pq_reg_stack_yellow; /* Current regstack yellow zone */#else* unsigned __int64 teb$pq_reg_stack_yellow;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long / 70* And set ptr size default to 64-bit pointers */N void *teb$pq_reg_stack_guard; /* Current regstack guard zone */#else) unsigned __int64 teb$pq_reg_stack_guard;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *teb$pq_reg_stack_size; /* Size of regstack */#else( unsigned __int64 teb$pq_reg_stack_size;#endifR#i 80fdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *teb$pq_reg_stack_hiwater; /* Highest known bsp */#else+ unsigned __int64 teb$pq_reg_stack_hiwater;#endif } TEB; #if !defined(__VAXC)<#define teb$l_thread_flags teb$r_fill_27_.teb$l_thread_flags?#define teb$v_astact teb$r_fill_27_.teb$r_fill_28_.teb$v_astact=#define teb$v_asten teb$ 90r_fill_27_.teb$r_fill_28_.teb$v_asten"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _teb {#pragma __nomember_alignmentN unsigned __int64 teb$pq_flink; /* Forward queue link */N unsigned __int64 teb$pq_blink; /* Backward queue link :0 */N unsigned short int teb$w_size; /* Size of TEB, in bytes */N unsigned char teb$b_version; /* Version number for TEB */N unsigned char teb$b_type; /* Structure type code for TEB */N unsigned char teb$b_reserved_2 [4]; /* Reserved to DECthreads */N unsigned int teb$q_sequence [2]; /* Thread sequence number */N unsigned int teb$q_reserved_3 [2] [2]; /* Reserved to DECthreads */P unsigned __i;0nt64 teb$pq_per_kt_area; /* Address of per kernel thread area */S unsigned __int64 teb$pq_stack_base; /* Address of first usable byte in stack */V unsigned __int64 teb$pq_stack_reserve; /* Address of first byte in reserve area */T unsigned __int64 teb$pq_stack_yellow; /* Address of first byte in yellow area */R unsigned __int64 teb$pq_stack_guard; /* Address of first byte in guard area */_ unsigned int teb$q_stack_size [2]; /* Total stack allocation (green+reserve+yellow+red) */<0S unsigned __int64 teb$pq_tsd_values; /* Address of thread-specific data array */R unsigned int teb$l_tsd_count; /* Count of thread-specific data values */N unsigned int teb$l_cancel_flags; /* cancel flags */N unsigned int teb$l_cancel_count; /* CMA alert scope nesting count */ __union {N unsigned int teb$l_thread_flags; /* thread flags */ __struct {N unsigned teb$v_astact : 1; /* there's a use =0r mode AST active */N unsigned teb$v_asten : 1; /* use mode ASTs are enabled */( unsigned teb$v_fill_29_ : 6; } teb$r_fill_28_; } teb$r_fill_27_;N int teb$l_thd_errno; /* Per-thread errno value */N int teb$l_reserved_4; /* Reserved to DECthreads */N unsigned __int64 teb$pq_stack_hiwater; /* Lowest known SP address */N int teb$l_home_rad; /* Thread's home RAD>0 */N int teb$l_rad_safe; /* Scratch: written by Tru64 UNIX */N unsigned __int64 teb$pq_reg_stack_base; /* Current regstack base */P unsigned __int64 teb$pq_reg_stack_yellow; /* Current regstack yellow zone */N unsigned __int64 teb$pq_reg_stack_guard; /* Current regstack guard zone */N unsigned __int64 teb$pq_reg_stack_size; /* Size of regstack */N unsigned __int64 teb$pq_reg_stack_hiwater; /* Highest known bsp */ ?0} teb; #if !defined(__VAXC)<#define teb$l_thread_flags teb$r_fill_27_.teb$l_thread_flags?#define teb$v_astact teb$r_fill_27_.teb$r_fill_28_.teb$v_astact=#define teb$v_asten teb$r_fill_27_.teb$r_fill_28_.teb$v_asten"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N#define TEB$K_LENGTH 184 /* Length of TEB */N#define TEB$C_LENGTH 184 /* Length of TEB */N#define TEB$C_TSD_KEY_SSPI 1 @0/* TSD key value reserved for SSPI */  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __TEBDEF_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */ww Pe/************************************************* A0*******************************************************************************/=/* Created: 5-Apr-2012 13:00:45 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]OBJFMT.SDI;1 *//********************************************************************************************************************************//*** MODULE $TIRDEF ***/#ifndef __TIRDEF_LOADED#define __TIRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard featuresB0 */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __optionC0al_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 N/* */N/* Text, information and relocation record (TIR) */N/* D0 */N#define TIR$C_STA_GBL 0 /*Stack global symbol value */N#define TIR$C_STA_SB 1 /*Stack signed byte */N#define TIR$C_STA_SW 2 /*Stack signed word */N#define TIR$C_STA_LW 3 /*Stack longword */O#define TIR$C_STA_PB 4 /*Stack psect base plus byte offset */O#define TIR$C_STA_PW 5 /*Stack psect base plus word offset */S#define E0TIR$C_STA_PL 6 /*Stack psect base plus longword offset */N#define TIR$C_STA_UB 7 /*Stack unsigned byte */N#define TIR$C_STA_UW 8 /*Stack unsigned word */N#define TIR$C_STA_BFI 9 /*Stack byte from image */N#define TIR$C_STA_WFI 10 /*Stack word from image */N#define TIR$C_STA_LFI 11 /*Stack longword from image */N#define TIR$C_STA_EPM 12 F0 /*Stack entry point mask */_#define TIR$C_STA_CKARG 13 /*Stack result of argument checking (true or false) */d#define TIR$C_STA_WPB 14 /*Stack psect base plus byte offset -- word psect number */d#define TIR$C_STA_WPW 15 /*Stack psect base plus word offset -- word psect number */k#define TIR$C_STA_WPL 16 /*Stack psect base plus longword offset -- word of psect number */N#define TIR$C_STA_LSY 17 /*G0Stack local symbol value */N#define TIR$C_STA_LIT 18 /*Stack literal */Q#define TIR$C_STA_LEPM 19 /*Stack local symbol entry point mask */O#define TIR$C_MAXSTACOD 19 /*Last assigned code of stack group */O#define TIR$C_MINSTOCOD 20 /*First assigned store command code */N#define TIR$C_STO_SB 20 /*Store signed byte */N#define TIR$C_STO_SW 21 /*Store signed word H0 */N#define TIR$C_STO_L 22 /*Store longword */N#define TIR$C_STO_BD 23 /*Store byte displaced */N#define TIR$C_STO_WD 24 /*Store word displaced */N#define TIR$C_STO_LD 25 /*Store longword displaced */N#define TIR$C_STO_LI 26 /*Store short literal */N#define TIR$C_STO_PIDR 27 /*Store pos. indep. data reference */N#definI0e TIR$C_STO_PICR 28 /*Store pos. indep. code reference */N#define TIR$C_STO_RSB 29 /*Store repeated signed byte */N#define TIR$C_STO_RSW 30 /*Store repeated signed word */N#define TIR$C_STO_RL 31 /*Store repeated longword */N#define TIR$C_STO_VPS 32 /*Store arbitrary field */N#define TIR$C_STO_USB 33 /*Store unsigned byte */N#define TIR$C_STO_USW 34 J0 /*Store unsigned word */N#define TIR$C_STO_RUB 35 /*Store repeated unsigned byte */N#define TIR$C_STO_RUW 36 /*Store repeated unsigned word */N#define TIR$C_STO_B 37 /*Store byte */N#define TIR$C_STO_W 38 /*Store word */N#define TIR$C_STO_RB 39 /*Store repeated byte */N#define TIR$C_STO_RW 40 /*Store repeated wK0ord */U#define TIR$C_STO_RIVB 41 /*Store repeated immediate variable bytes */R#define TIR$C_STO_PIRR 42 /*Store pos. indep. relative reference */N#define TIR$C_MAXSTOCOD 42 /*Last assigned store command code */R#define TIR$C_MINOPRCOD 50 /*First assigned operator command code */N#define TIR$C_OPR_NOP 50 /*No-op */N#define TIR$C_OPR_ADD 51 /*Add L0 */N#define TIR$C_OPR_SUB 52 /*Subtract */N#define TIR$C_OPR_MUL 53 /*Multiply */N#define TIR$C_OPR_DIV 54 /*Divide */N#define TIR$C_OPR_AND 55 /*Logical AND */N#define TIR$C_OPR_IOR 56 /*Logical inclusive OR */N#define TIR$C_OPR_EOR 57 /*Logical exclusive OR */N#define TIR$C_M0OPR_NEG 58 /*Negate */N#define TIR$C_OPR_COM 59 /*Complement */N#define TIR$C_OPR_INSV 60 /*Insert bit field */N#define TIR$C_OPR_ASH 61 /*Arithmetic shift */N#define TIR$C_OPR_USH 62 /*Unsigned shift */N#define TIR$C_OPR_ROT 63 /*Rotate */[#define TIR$C_OPR_SEL 64 N0/*Select one of three longwords on top of stack */O#define TIR$C_OPR_REDEF 65 /*Redefine this symbol after pass 2 */N#define TIR$C_OPR_DFLIT 66 /*Define a literal */Q#define TIR$C_MAXOPRCOD 66 /*Last assigned operator command code */Q#define TIR$C_MINCTLCOD 80 /*First assigned control command code */N#define TIR$C_CTL_SETRB 80 /*Set relocation base */N#define TIR$C_CTL_AUGRB 81 /* O0Augment relocation base */N#define TIR$C_CTL_DFLOC 82 /*Define debug location */N#define TIR$C_CTL_STLOC 83 /*Set debug location */N#define TIR$C_CTL_STKDL 84 /*Stack debug location */P#define TIR$C_MAXCTLCOD 84 /*Last assigned control command code */ #ifdef __NEW_STARLETtypedef union _tirdef {N unsigned char tir$b_rectyp; /*Record type (OBJ$C_TIR) */N/* Define relo P0cation commands */ } TIRDEF;#else /* __OLD_STARLET */union tirdef {N unsigned char tir$b_rectyp; /*Record type (OBJ$C_TIR) */N/* Define relocation commands */ } ;%#endif /* #ifdef __NEW_STARLET */N/* */N/* EVAX dependent structures start here */N/* R0 */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __TIRDEF_LOADED */ wwwe/*******************************************************************************pJ/STRDEFZ/RSTSDEFv/PSYIDEF/ SYSEVTDEF& SYS_PAL_QINST/h TBK$ROUTINES0TBKDEF0vTEBDEF?0TIRDEFZ7TISP0TPADEFm0 TPU$ROUTINES0TPUDEF0TRMDEF0RTT2DEF0TT3DEF0"TTCDEF1TTDEF 1~ TTYDPORTDEF)1  UAF070DEFc1UAIDEF1UICDEF1&UIDDEF1.USGDEF1USRIDEF1 UTCBLKDEFL$ROUTINES1VADEF1VAXDEF:2F VA_RANGEDEF@2nWBEMIDEFR2,WWIDDEFXABl2 XABALLDEF2 XABCXFDEF S0*************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $TPADEF ***/#ifndef __TPADEF_LOADED#define __TPADEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_aliT0gnment __save#pragma __nomember_alignmentR#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 U0#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 N/* */S/* TPARSE CONTROL BLOCK. THIS BLOCK IS ONE OF THE ARGUMENTS USED TO CALL TPARSE, */N/* AND BECOMES THE ARGUMENT LIST TO ACTION ROUTINES. */N/* V0 */N#define TPA$K_COUNT0 8 /* ZERO LEVEL VALUE IS 8 */#define TPA$M_BLANKS 0x1#define TPA$M_ABBREV 0x2#define TPA$M_ABBRFM 0x4#define TPA$M_AMBIG 0x10000S#define TPA$K_LENGTH0 36 /* LENGTH OF ZERO LEVEL PARAMETER BLOCK */S#define TPA$C_LENGTH0 36 /* LENGTH OF ZERO LEVEL PARAMETER BLOCK */ #ifdef __NEW_STARLETtypedef struct _tpadef {S unsigned int tpa W0$l_count; /* ARGUMENT COUNT (NUMBER OF LONGWORDS) */ __union {N unsigned int tpa$l_options; /* OPTIONS LONGWORD */ __struct {Q unsigned tpa$v_blanks : 1; /* PROCESS BLANKS AND TABS EXPLICITLY */N unsigned tpa$v_abbrev : 1; /* ALLOW MINIMAL ABBREVIATION */N unsigned tpa$v_abbrfm : 1; /* ALLOW FIRST MATCH ABBREVIATION */* unsigned tpadef$$_fill_1 : 13;N unsigned tpa$v_ambig : X0 1; /* AMBIGUOUS KEYWORD AT THIS STATE */( unsigned tpa$v_fill_30_ : 7;! } tpa$r_options_bits; __struct {% char tpadef$$_fill_2 [3];O unsigned char tpa$b_mcount; /* MINIMUM ABBREVIATION ON KEYWORDS */# } tpa$r_options_fields; } tpa$r_options_overlay;P unsigned int tpa$l_stringcnt; /* BYTE COUNT OF STRING BEING PARSED */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[ Y0#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endifN void *tpa$l_stringptr; /* ADDRESS OF STRING BEING PARSED */S unsigned int tpa$l_tokencnt; /* BYTE COUNT OF CURRENT MATCHING TOKEN */N void *tpa$l_tokenptr; /* ADDRESS OF MATCHING TOKEN */ __union { __struct { __union {T unsigned int tpa$l_char; /* ASCII CODE OF SINGLE CHARACTER TOKEN */N Z0 unsigned char tpa$b_char; /* BYTE FORM OF SINGLE CHAR CELL */% } tpa$r_char_overlay;N unsigned int tpa$l_number; /* NUMERIC VALUE OF NUMERIC TOKEN */" } tpa$r_number_struct;T unsigned __int64 tpa$q_number; /* 64-bit NUMERIC VALUE OF NUMERIC TOKEN */ } tpa$r_number_overlay;R unsigned int tpa$l_param; /* PARAMETER LONGWORD FROM STATE TABLE */ } TPADEF; #if !defined(__VAXC)9#define tpa$l_options tpa$r_option[0s_overlay.tpa$l_optionsJ#define tpa$v_blanks tpa$r_options_overlay.tpa$r_options_bits.tpa$v_blanksJ#define tpa$v_abbrev tpa$r_options_overlay.tpa$r_options_bits.tpa$v_abbrevJ#define tpa$v_abbrfm tpa$r_options_overlay.tpa$r_options_bits.tpa$v_abbrfmH#define tpa$v_ambig tpa$r_options_overlay.tpa$r_options_bits.tpa$v_ambigL#define tpa$b_mcount tpa$r_options_overlay.tpa$r_options_fields.tpa$b_mcountD#define tpa$r_number_struct tpa$r_number_overlay.tpa$r_number_structD#define tpa$l_char tpa$r_numbe \0r_struct.tpa$r_char_overlay.tpa$l_charD#define tpa$b_char tpa$r_number_struct.tpa$r_char_overlay.tpa$b_char5#define tpa$l_number tpa$r_number_struct.tpa$l_number6#define tpa$q_number tpa$r_number_overlay.tpa$q_number"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct tpadef {S unsigned int tpa$l_count; /* ARGUMENT COUNT (NUMBER OF LONGWORDS) */ __union {N unsigned int tpa$l_options; /* OPTIONS LONGWORD */ __st ]0ruct {Q unsigned tpa$v_blanks : 1; /* PROCESS BLANKS AND TABS EXPLICITLY */N unsigned tpa$v_abbrev : 1; /* ALLOW MINIMAL ABBREVIATION */N unsigned tpa$v_abbrfm : 1; /* ALLOW FIRST MATCH ABBREVIATION */* unsigned tpadef$$_fill_1 : 13;N unsigned tpa$v_ambig : 1; /* AMBIGUOUS KEYWORD AT THIS STATE */( unsigned tpa$v_fill_30_ : 7;! } tpa$r_options_bits; __struct {% char tpadef$$_fi ^0ll_2 [3];O unsigned char tpa$b_mcount; /* MINIMUM ABBREVIATION ON KEYWORDS */# } tpa$r_options_fields; } tpa$r_options_overlay;P unsigned int tpa$l_stringcnt; /* BYTE COUNT OF STRING BEING PARSED */N int tpa$l_stringptr; /* ADDRESS OF STRING BEING PARSED */S unsigned int tpa$l_tokencnt; /* BYTE COUNT OF CURRENT MATCHING TOKEN */N int tpa$l_tokenptr; /* ADDRESS OF MATCHING TOKEN */ __union _0 { __struct { __union {T unsigned int tpa$l_char; /* ASCII CODE OF SINGLE CHARACTER TOKEN */N unsigned char tpa$b_char; /* BYTE FORM OF SINGLE CHAR CELL */% } tpa$r_char_overlay;N unsigned int tpa$l_number; /* NUMERIC VALUE OF NUMERIC TOKEN */" } tpa$r_number_struct;T unsigned int tpa$q_number [2]; /* 64-bit NUMERIC VALUE OF NUMERIC TOKEN */ } tpa$r_number_overlay;R unsigned i `0nt tpa$l_param; /* PARAMETER LONGWORD FROM STATE TABLE */ } ; #if !defined(__VAXC)9#define tpa$l_options tpa$r_options_overlay.tpa$l_optionsJ#define tpa$v_blanks tpa$r_options_overlay.tpa$r_options_bits.tpa$v_blanksJ#define tpa$v_abbrev tpa$r_options_overlay.tpa$r_options_bits.tpa$v_abbrevJ#define tpa$v_abbrfm tpa$r_options_overlay.tpa$r_options_bits.tpa$v_abbrfmH#define tpa$v_ambig tpa$r_options_overlay.tpa$r_options_bits.tpa$v_ambigL#define tpa$b_mcount tpa$r_options_ove a0rlay.tpa$r_options_fields.tpa$b_mcountY#define tpa$l_char tpa$r_number_overlay.tpa$r_number_struct.tpa$r_char_overlay.tpa$l_charY#define tpa$b_char tpa$r_number_overlay.tpa$r_number_struct.tpa$r_char_overlay.tpa$b_charJ#define tpa$l_number tpa$r_number_overlay.tpa$r_number_struct.tpa$l_number6#define tpa$q_number tpa$r_number_overlay.tpa$q_number"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* b0 */S/* TPARSE CONTROL BLOCK. THIS BLOCK IS ONE OF THE ARGUMENTS USED TO CALL TPARSE, */N/* AND BECOMES THE ARGUMENT LIST TO ACTION ROUTINES. */N/* */N#define TPA64$K_COUNT0 -1 /* ZERO LEVEL VALUE IS -1 */#define TPA64$M_BLANKS 0x1#define TPA64$M_ABBREV 0x2#define TPA64$M_ABBRFM 0x4#define TPA64$M_AMBIG 0x10000S#define TPA64$K_LENGTH0 80 /* LENGTH OF Z c0ERO LEVEL PARAMETER BLOCK */S#define TPA64$C_LENGTH0 80 /* LENGTH OF ZERO LEVEL PARAMETER BLOCK */ #ifdef __NEW_STARLETtypedef struct _tpa64def {S unsigned int tpa64$l_count; /* ARGUMENT COUNT (NUMBER OF LONGWORDS) */ __union {N unsigned int tpa64$l_options; /* OPTIONS LONGWORD */ __struct {R unsigned tpa64$v_blanks : 1; /* PROCESS BLANKS AND TABS EXPLICITLY */N unsigned tpa64$v_abbrev : 1; /* AL d0LOW MINIMAL ABBREVIATION */N unsigned tpa64$v_abbrfm : 1; /* ALLOW FIRST MATCH ABBREVIATION */, unsigned tpa64def$$_fill_1 : 13;N unsigned tpa64$v_ambig : 1; /* AMBIGUOUS KEYWORD AT THIS STATE */* unsigned tpa64$v_fill_31_ : 7;# } tpa64$r_options_bits; __struct {' char tpa64def$$_fill_2 [3];Q unsigned char tpa64$b_mcount; /* MINIMUM ABBREVIATION ON KEYWORDS */% } tpa64$r_options_fields e0;" } tpa64$r_options_overlay;Z unsigned __int64 tpa64$q_stringdesc; /* DSC64 first quadword of string being parsed */P unsigned __int64 tpa64$q_stringcnt; /* BYTE COUNT OF STRING BEING PARSED */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *tpa64$q_stringptr; /* ADDRESS OF STRING BEING PARSED */#else$ unsigned __int64 tpa64$q_st f0ringptr;#endif] unsigned __int64 tpa64$q_tokendesc; /* DSC64 first quadword OF CURRENT MATCHING TOKEN */S unsigned __int64 tpa64$q_tokencnt; /* BYTE COUNT OF CURRENT MATCHING TOKEN */R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *tpa64$q_tokenptr; /* ADDRESS OF MATCHING TOKEN */#else# unsigned __int64 tpa64$q_tokenptr;#end g0if __union {S unsigned __int64 tpa64$q_char; /* ASCII CODE OF SINGLE CHARACTER TOKEN */N unsigned char tpa64$b_char; /* BYTE FORM OF SINGLE CHAR CELL */ } tpa64$r_char_overlay;N unsigned __int64 tpa64$q_number; /* NUMERIC VALUE OF NUMERIC TOKEN */R unsigned __int64 tpa64$q_param; /* PARAMETER LONGWORD FROM STATE TABLE */ } TPA64DEF; #if !defined(__VAXC)?#define tpa64$l_options tpa64$r_options_overlay.tpa64$l_optionsR#define tpa6h04$v_blanks tpa64$r_options_overlay.tpa64$r_options_bits.tpa64$v_blanksR#define tpa64$v_abbrev tpa64$r_options_overlay.tpa64$r_options_bits.tpa64$v_abbrevR#define tpa64$v_abbrfm tpa64$r_options_overlay.tpa64$r_options_bits.tpa64$v_abbrfmP#define tpa64$v_ambig tpa64$r_options_overlay.tpa64$r_options_bits.tpa64$v_ambigT#define tpa64$b_mcount tpa64$r_options_overlay.tpa64$r_options_fields.tpa64$b_mcount6#define tpa64$q_char tpa64$r_char_overlay.tpa64$q_char6#define tpa64$b_char tpa64$r_char_overlay. i0tpa64$b_char"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct tpa64def {S unsigned int tpa64$l_count; /* ARGUMENT COUNT (NUMBER OF LONGWORDS) */ __union {N unsigned int tpa64$l_options; /* OPTIONS LONGWORD */ __struct {R unsigned tpa64$v_blanks : 1; /* PROCESS BLANKS AND TABS EXPLICITLY */N unsigned tpa64$v_abbrev : 1; /* ALLOW MINIMAL ABBREVIATION */N unsigned tpa64$v_abb j0rfm : 1; /* ALLOW FIRST MATCH ABBREVIATION */, unsigned tpa64def$$_fill_1 : 13;N unsigned tpa64$v_ambig : 1; /* AMBIGUOUS KEYWORD AT THIS STATE */* unsigned tpa64$v_fill_31_ : 7;# } tpa64$r_options_bits; __struct {' char tpa64def$$_fill_2 [3];Q unsigned char tpa64$b_mcount; /* MINIMUM ABBREVIATION ON KEYWORDS */% } tpa64$r_options_fields;" } tpa64$r_options_overlay;Z unsigned int tpa64$q_sk0tringdesc [2]; /* DSC64 first quadword of string being parsed */P unsigned int tpa64$q_stringcnt [2]; /* BYTE COUNT OF STRING BEING PARSED */N unsigned __int64 tpa64$q_stringptr; /* ADDRESS OF STRING BEING PARSED */] unsigned int tpa64$q_tokendesc [2]; /* DSC64 first quadword OF CURRENT MATCHING TOKEN */S unsigned int tpa64$q_tokencnt [2]; /* BYTE COUNT OF CURRENT MATCHING TOKEN */N unsigned __int64 tpa64$q_tokenptr; /* ADDRESS OF MATCHING TOKEN */ __union {S l0 unsigned int tpa64$q_char [2]; /* ASCII CODE OF SINGLE CHARACTER TOKEN */N unsigned char tpa64$b_char; /* BYTE FORM OF SINGLE CHAR CELL */ } tpa64$r_char_overlay;N unsigned int tpa64$q_number [2]; /* NUMERIC VALUE OF NUMERIC TOKEN */R unsigned int tpa64$q_param [2]; /* PARAMETER LONGWORD FROM STATE TABLE */ } ; #if !defined(__VAXC)?#define tpa64$l_options tpa64$r_options_overlay.tpa64$l_optionsR#define tpa64$v_blanks tpa64$r_options_om0verlay.tpa64$r_options_bits.tpa64$v_blanksR#define tpa64$v_abbrev tpa64$r_options_overlay.tpa64$r_options_bits.tpa64$v_abbrevR#define tpa64$v_abbrfm tpa64$r_options_overlay.tpa64$r_options_bits.tpa64$v_abbrfmP#define tpa64$v_ambig tpa64$r_options_overlay.tpa64$r_options_bits.tpa64$v_ambigT#define tpa64$b_mcount tpa64$r_options_overlay.tpa64$r_options_fields.tpa64$b_mcount6#define tpa64$q_char tpa64$r_char_overlay.tpa64$q_char6#define tpa64$b_char tpa64$r_char_overlay.tpa64$b_char"#endif /* #ifn0 !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __TPADEF_LOADED */ wwKe/*************************************************************************************** o0*****************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */P/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]TPU$ROUTINES.SDI;1 *//********************************************************************************************************************************/'/*** MODULE TPU$ROUTINES IDENT X-1 ***/#ifndef __TPU_ROUTINES_LOADED#define __TPU_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */p0!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_pq0arams ...#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 N/* */N/* Text Processing Utility (TPU) Routines */N/* r0 */N/* */N/* TPU$CLEANUP - Free System Resources Used During TPU Session */N/* */N/* status = TPU$CLEANUP (flags) */N/* */N/* flags - Cleanup options */N/* s0 */!#define tpu$cleanup TPU$CLEANUP #ifdef __NEW_STARLETunsigned int tpu$cleanup( unsigned int *flags);#else /* __OLD_STARLET */+unsigned int tpu$cleanup(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$CLIPARSE - Parse a command line */N/* t0 */N/* status = TPU$CLIPARSE (string, fileio, call_user) */N/* */N/* string - Command line to be parsed */N/* fileio - Bound Procedure Value for File I/O routine */N/* call_user - Bound Procedure Value for call-user routine */N/* */##defu0ine tpu$cliparse TPU$CLIPARSE #ifdef __NEW_STARLETunsigned int tpu$cliparse( void *string, unsigned int *fileio, unsigned int *call_user);#else /* __OLD_STARLET */,unsigned int tpu$cliparse(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$CLOSE_TERMINAL - Close Channel to Terminal */N/* */N v0/* status = TPU$CLOSE_TERMINAL () */N/* *//#define tpu$close_terminal TPU$CLOSE_TERMINAL#ifdef __NEW_STARLET&unsigned int tpu$close_terminal(void);#else /* __OLD_STARLET */&unsigned int tpu$close_terminal(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$CONTROL - Pass Control to TPU w0 */N/* */N/* status = TPU$CONTROL () */N/* */!#define tpu$control TPU$CONTROL#ifdef __NEW_STARLETunsigned int tpu$control(void);#else /* __OLD_STARLET */unsigned int tpu$control(void);!#endif /* #ifdef __NEW_STARLET */N/* x0 */N/* TPU$EDIT - Edit a file */N/* */N/* status = TPU$EDIT (input, output) */N/* */N/* input - Input file name */N/* output - Output file name y0 */N/* */#define tpu$edit TPU$EDIT #ifdef __NEW_STARLETunsigned int tpu$edit( void *input, void *output);#else /* __OLD_STARLET */(unsigned int tpu$edit(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$EXECUTE_COMMAND - Execute One or More TPU Statements */N/* z0 */N/* status = TPU$EXECUTE_COMMAND (string) */N/* */N/* string - TPU statement(s) to execute */N/* */1#define tpu$execute_command TPU$EXECUTE_COMMAND #ifdef __NEW_STARLET!unsigned int tpu$execute_command( void *string);#else /* __O {0LD_STARLET */3unsigned int tpu$execute_command(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$EXECUTE_INIFILE - Execute Initialization Files */N/* */N/* status = TPU$EXECUTE_INIFILE () */N/* */1 |0#define tpu$execute_inifile TPU$EXECUTE_INIFILE#ifdef __NEW_STARLET'unsigned int tpu$execute_inifile(void);#else /* __OLD_STARLET */'unsigned int tpu$execute_inifile(void);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$FILEIO - Perform File Operations */N/* */N/* status = TPU$FILEIO (code, stream, data) }0 */N/* */N/* code - Item code specifying a TPU function */N/* stream - File description */N/* data - Stream data */N/* */#define tpu$fileio TPU$FILEIO #ifdef __NEW_STARLETunsigned i ~0nt tpu$fileio( unsigned int *code, unsigned int *stream, unsigned int *data);#else /* __OLD_STARLET */*unsigned int tpu$fileio(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$FILE_PARSE - Parse a File Specification */N/* */N/* status = TPU$FILE_PARSE (result_string, flags, filespec, 0 */N/* [default_spec], [related_spec]) */N/* */N/* result_string - Resultant file specification */N/* flags - Specifies components to be returned */N/* filespec - File specification to parse */N/* default_spec - Default file specification */N/* related_spec 0- Related file specification */N/* */'#define tpu$file_parse TPU$FILE_PARSE #ifdef __NEW_STARLETunsigned int tpu$file_parse( void *result_string, unsigned int *flags, void *filespec, __optional_params );#else /* __OLD_STARLET */.unsigned int tpu$file_parse(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* 0 */N/* TPU$FILE_SEARCH - Search for a File Specification */N/* */N/* status = TPU$FILE_SEARCH (result_string, flags, filespec, */N/* [default_spec], [related_spec]) */N/* */N/* result_string - Resultant file specification */N/* flag 0s - Specifies components to be returned */N/* filespec - File specification to parse */N/* default_spec - Default file specification */N/* related_spec - Related file specification */N/* */)#define tpu$file_search TPU$FILE_SEARCH #ifdef __NEW_STARLETunsigned int tpu$file_search( void *resul 0t_string, unsigned int *flags, void *filespec, __optional_params );#else /* __OLD_STARLET *//unsigned int tpu$file_search(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$HANDLER - TPU Condition Handler */N/* */N/* status = TPU$HANDLER (signal_vector, mechanism_vector) 0 */N/* */N/* signal_vector - Signal vector */N/* mechanism_vector - Mechanism vector */N/* */!#define tpu$handler TPU$HANDLER #ifdef __NEW_STARLETunsigned int tpu$handler( unsigned int signal_vector [],# unsigned int mechanism_vector []);#else /* __OLD_S 0TARLET */+unsigned int tpu$handler(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$INITIALIZE - Initialize TPU for Editing */N/* */N/* status = TPU$INITIALIZE (callback [, user_arg) */N/* */N/* callback 0 - Callback routine bound procedure value */N/* user_arg - User argument */N/* */'#define tpu$initialize TPU$INITIALIZE #ifdef __NEW_STARLETunsigned int tpu$initialize( unsigned int *callback, __optional_params);#else /* __OLD_STARLET */.unsigned int tpu$initialize(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* 0 */N/* TPU$MESSAGE - Write Message String */N/* */N/* status = TPU$MESSAGE (string) */N/* */N/* string - Formatted message */N/* 0 */!#define tpu$message TPU$MESSAGE #ifdef __NEW_STARLETunsigned int tpu$message( void *string);#else /* __OLD_STARLET */+unsigned int tpu$message(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$PARSEINFO - Parse Command Line and Build Item List */N/* */N/* status = TP 0U$PARSEINFO (fileio, call_user) */N/* */N/* fileio - Bound Procedure Value File I/O routine */N/* call_user - Bound Procedure Value for call-user routine */N/* */%#define tpu$parseinfo TPU$PARSEINFO #ifdef __NEW_STARLETunsigned int tpu$parseinfo( unsigned int *fileio, 0 unsigned int *call_user);#else /* __OLD_STARLET */-unsigned int tpu$parseinfo(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$SIGNAL - Signal a TPU Status */N/* */N/* status = TPU$SIGNAL (condition_code) */N/* 0 */N/* condition_code - Condition code to signal */N/* */#define tpu$signal TPU$SIGNAL #ifdef __NEW_STARLETunsigned int tpu$signal( unsigned int condition_code);#else /* __OLD_STARLET */*unsigned int tpu$signal(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU0$SPECIFY_ASYNC_ACTION - Register an Asynchronous Action */N/* */N/* status = TPU$SPECIFY_ASYNC_ACTION (facility_index [, tpu_statement]) */N/* */N/* facility_index - Index number of this action */N/* tpu_statement - TPU statement to execute for action */N/* 0 */;#define tpu$specify_async_action TPU$SPECIFY_ASYNC_ACTION #ifdef __NEW_STARLET&unsigned int tpu$specify_async_action( unsigned int *facility_index, __optional_params);#else /* __OLD_STARLET */8unsigned int tpu$specify_async_action(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$TPU - Invoke TPU 0 */N/* */N/* status = TPU$TPU (command) */N/* */N/* command - Command string */N/* */#define tpu$tpu TPU$TPU #ifdef __NEW_STARLETunsigned int tpu$tpu( void *command);#els 0e /* __OLD_STARLET */'unsigned int tpu$tpu(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* TPU$TRIGGER_ASYNC_ACTION - Trigger an Asynchronous Action */N/* */N/* status = TPU$TRIGGER_ASYNC_ACTION (facility_index) */N/* */N/* 0facility_index - Index number of this action */N/* */;#define tpu$trigger_async_action TPU$TRIGGER_ASYNC_ACTION #ifdef __NEW_STARLET&unsigned int tpu$trigger_async_action( unsigned int *facility_index);#else /* __OLD_STARLET */8unsigned int tpu$trigger_async_action(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER0_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard "#endif /* __TPU_ROUTINES_LOADED */ wwk:f/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR 0-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************/&/*** MODULE $TPUDEF IDENT V03-006 ***/#ifndef __TPUDEF_LOADED#define __TPUDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supp0orted */\#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#e0ndif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* Item list codes for TPU$INITIALIZE */[#define TPU$_CHAIN -1 /* Chain entry - Matches other VMS CHAIN entries */P#define TPU$_ENDLIST 0 /* End of list [*** Must be zero ***] */N#define TPU$_OPTIONS 1 /* Command line options (see below) */N#define TPU$_FILENAME 6 0 /* File name */N#define TPU$_OTHER_FILENAMES 7 /* more filenames */N#define TPU$_FILEIO 14 /* File I/O routine */N#define TPU$_CALLUSER 15 /* CALL_USER routine */N#define TPU$_JOURNALFILE 16 /* /JOURNAL= file name */N#define TPU$_SECTIONFILE 19 /* /SECTION= file name */N#define TPU$_OUTPUTFILE 20 /* /OUTPUT= file name 0 */N#define TPU$_COMMANDFILE 21 /* /COMMAND= file name */N#define TPU$_DISPLAYFILE 22 /* /DISPLAY= keyword -or- file name */N#define TPU$_CTRL_C_ROUTINE 23 /* CTRL/C routine */N#define TPU$_FREEITEMLIST 24 /* Free the item list */N#define TPU$_DEBUGFILE 25 /* /DEBUG= file name */N#define TPU$_FILE_PARSE 26 /* FILE_PARSE routine */N#define 0TPU$_FILE_SEARCH 27 /* FILE_SEARCH routine */N#define TPU$_TERMINAL_INPUT 28 /* Terminal input routine */N#define TPU$_KANJI_DICFILE 29 /* /KANJI_DICTIONARY= file name */N#define TPU$_TEXT_LANGUAGE 30 /* /TEXT_LANGUAGE= language name */N#define TPU$_DEFAULTSFILE 31 /* /DEFAULTS= file name */T#define TPU$_PARENT_WIDGET 32 /* DECwindows widget to use as our parent */N#define TPU$_EXTENSION 33 0 /* Extension Table Entry */N#define TPU$_GET_DEFAULT 34 /* GET_DEFAULT routine */N#define TPU$_SET_DEFAULT 35 /* SET_DEFAULT routine */N#define TPU$_WORKFILE 36 /* /WORK= file name */N#define TPU$_APPLICATION_CONTEXT 37 /* Decwindows application context */P#define TPU$_CHARACTERSET 38 /* /CHARACTER_SET= character set name */N#define TPU$_LANGUAGE 257 /* LSE's /LA0NGUAGE= file name */N#define TPU$_ENVFILE 258 /* LSE's /ENVIRONMENT= file name */N#define TPU$_INIT_FILE 259 /* /INITIALIZATION= file name */N#define TPU$_START_LINE 260 /* /START_POSITION= line */N#define TPU$_START_CHAR 261 /* /START_POSITION= character */Q#define TPU$_SYSTEM_ENVFILE 262 /* LSE's /SYSTEM_ENVIROMENT= file name */N/* Item list codes for file I/O 0 */N#define TPU$_ACCESS 4 /* File access type (see below) */N#define TPU$_FLUSH 5 /* Flush after Puts */N#define TPU$_FILESIZE 7 /* File size */N#define TPU$_RECORD_ATTR 8 /* Record attributes */N#define TPU$_RECORD_FORM 9 /* Record format */N#define TPU$_MAXIMIZE_VER 10 /* Maximize version number */N#define TPU$_DEFAULT0FILE 17 /* Default file name */N#define TPU$_RELATEDFILE 18 /* Related file name */N#define TPU$_FILE_RECOVERABLE 19 /* File available upon recovery */\#define TPU$_TRN_TPT 20 /* File will allow truncates - journal files only */N#define TPU$_CREATE_TIME 257 /* Creation date/time */N#define TPU$_EOF_BLOCK 258 /* EOF block */N#define TPU$_EOF_FFB 259 0 /* EOF first free byte */N/* TPU$_OPTIONS flags */#define TPU$M_RECOVER 0x1#define TPU$M_JOURNAL 0x2#define TPU$M_READ 0x4#define TPU$M_SECTION 0x8#define TPU$M_OUTPUT 0x10#define TPU$M_COMMAND 0x20#define TPU$M_DISPLAY 0x40#define TPU$M_CREATE 0x80#define TPU$M_STARTPOS 0x100"#define TPU$M_COMMAND_DFLTED 0x200#define TPU$M_DEBUG 0x400#define TPU$M_NOKANJI_DIC 0x800"#define TPU$M_TEXT_LANGUAGE 0x01000#define TPU$M_DEFAULTS 0x2000#define TPU$M_NODEFAULTS 0x4000!#define TPU$M_ENVIRONMENT 0x10000#define TPU$M_INIT 0x20000 #define TPU$M_SYSTEM_ENV 0x40000"#define TPU$M_CURRENT_FILE 0x80000#define TPU$M_WRITE 0x100000#define TPU$M_MODIFY 0x200000#define TPU$M_NOMODIFY 0x400000#define TPU$M_NOMAP 0x800000#define TPU$M_WORK 0x1000000$#define TPU$M_SEC_LNM_MODE 0x2000000#define TPU$M_CHARSET 0x4000000 #ifdef __NEW_STARLETtypedef union _fill_32_ { unsigned int t0pu$l_options; __struct {N unsigned tpu$v_recover : 1; /* /RECOVER */N unsigned tpu$v_journal : 1; /* /JOURNAL */N unsigned tpu$v_read : 1; /* /READ_ONLY */N unsigned tpu$v_section : 1; /* /SECTION */N unsigned tpu$v_output : 1; /* /OUTPUT */N unsigned tpu$v_command : 1; /* /COMMAND 0 */N unsigned tpu$v_display : 1; /* /DISPLAY */N unsigned tpu$v_create : 1; /* /CREATE */N unsigned tpu$v_startpos : 1; /* /START_POSITION */N unsigned tpu$v_command_dflted : 1; /* /COMMAND defaulted */N unsigned tpu$v_debug : 1; /* /DEBUG */N unsigned tpu$v_nokanji_dic : 1; /* /KANJI_DICTIONARY */N unsigned t0pu$v_text_language : 1; /* /TEXT_LANGUAGE */N unsigned tpu$v_defaults : 1; /* Explicit /DEFAULTS */N unsigned tpu$v_nodefaults : 1; /* Explicit /NODEFAULTS */" unsigned tpu$v_bit_15 : 1;N unsigned tpu$v_environment : 1; /* LSE's /ENVIRONMENT */N unsigned tpu$v_init : 1; /* /INITIALIZATION */N unsigned tpu$v_system_env : 1; /* LSE's /SYSTEM_ENVIRONMENT */N 0unsigned tpu$v_current_file : 1; /* LSE's /CURRENT_FILE */N unsigned tpu$v_write : 1; /* /WRITE */N unsigned tpu$v_modify : 1; /* Explicit /MODIFY */N unsigned tpu$v_nomodify : 1; /* Explicit /NOMODFIY */N unsigned tpu$v_nomap : 1; /* Don't map top DECwindows widget */N unsigned tpu$v_work : 1; /* /WORK */N unsigned tpu$v_sec_lnm_mod0e : 1; /* Section logical name mode */N unsigned tpu$v_charset : 1; /* /CHARACTER_SET */" unsigned tpu$v_bit_27 : 1;" unsigned tpu$v_bit_28 : 1;" unsigned tpu$v_bit_29 : 1;" unsigned tpu$v_bit_30 : 1;" unsigned tpu$v_bit_31 : 1; } tpu$r_fill_33_; } FILL_32_; #if !defined(__VAXC)2#define tpu$v_recover tpu$r_fill_33_.tpu$v_recover2#define tpu$v_journal tpu$r_fill_33_.tpu$v_journal,#define tpu$v_read tpu$r 0_fill_33_.tpu$v_read2#define tpu$v_section tpu$r_fill_33_.tpu$v_section0#define tpu$v_output tpu$r_fill_33_.tpu$v_output2#define tpu$v_command tpu$r_fill_33_.tpu$v_command2#define tpu$v_display tpu$r_fill_33_.tpu$v_display0#define tpu$v_create tpu$r_fill_33_.tpu$v_create4#define tpu$v_startpos tpu$r_fill_33_.tpu$v_startpos@#define tpu$v_command_dflted tpu$r_fill_33_.tpu$v_command_dflted.#define tpu$v_debug tpu$r_fill_33_.tpu$v_debug:#define tpu$v_nokanji_dic tpu$r_fill_33_.tpu$v_nokanji_dic> 0#define tpu$v_text_language tpu$r_fill_33_.tpu$v_text_language4#define tpu$v_defaults tpu$r_fill_33_.tpu$v_defaults8#define tpu$v_nodefaults tpu$r_fill_33_.tpu$v_nodefaults:#define tpu$v_environment tpu$r_fill_33_.tpu$v_environment,#define tpu$v_init tpu$r_fill_33_.tpu$v_init8#define tpu$v_system_env tpu$r_fill_33_.tpu$v_system_env<#define tpu$v_current_file tpu$r_fill_33_.tpu$v_current_file.#define tpu$v_write tpu$r_fill_33_.tpu$v_write0#define tpu$v_modify tpu$r_fill_33_.tpu$v_modify4#defin 0e tpu$v_nomodify tpu$r_fill_33_.tpu$v_nomodify.#define tpu$v_nomap tpu$r_fill_33_.tpu$v_nomap,#define tpu$v_work tpu$r_fill_33_.tpu$v_work<#define tpu$v_sec_lnm_mode tpu$r_fill_33_.tpu$v_sec_lnm_mode2#define tpu$v_charset tpu$r_fill_33_.tpu$v_charset"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union fill_32_ { unsigned int tpu$l_options; __struct {N unsigned tpu$v_recover : 1; /* /RECOVER */N unsigned tpu$v_journ0al : 1; /* /JOURNAL */N unsigned tpu$v_read : 1; /* /READ_ONLY */N unsigned tpu$v_section : 1; /* /SECTION */N unsigned tpu$v_output : 1; /* /OUTPUT */N unsigned tpu$v_command : 1; /* /COMMAND */N unsigned tpu$v_display : 1; /* /DISPLAY */N unsigned tpu$v_create : 1; /* /CREATE 0 */N unsigned tpu$v_startpos : 1; /* /START_POSITION */N unsigned tpu$v_command_dflted : 1; /* /COMMAND defaulted */N unsigned tpu$v_debug : 1; /* /DEBUG */N unsigned tpu$v_nokanji_dic : 1; /* /KANJI_DICTIONARY */N unsigned tpu$v_text_language : 1; /* /TEXT_LANGUAGE */N unsigned tpu$v_defaults : 1; /* Explicit /DEFAULTS */N0 unsigned tpu$v_nodefaults : 1; /* Explicit /NODEFAULTS */" unsigned tpu$v_bit_15 : 1;N unsigned tpu$v_environment : 1; /* LSE's /ENVIRONMENT */N unsigned tpu$v_init : 1; /* /INITIALIZATION */N unsigned tpu$v_system_env : 1; /* LSE's /SYSTEM_ENVIRONMENT */N unsigned tpu$v_current_file : 1; /* LSE's /CURRENT_FILE */N unsigned tpu$v_write : 1; /* /WRITE 0 */N unsigned tpu$v_modify : 1; /* Explicit /MODIFY */N unsigned tpu$v_nomodify : 1; /* Explicit /NOMODFIY */N unsigned tpu$v_nomap : 1; /* Don't map top DECwindows widget */N unsigned tpu$v_work : 1; /* /WORK */N unsigned tpu$v_sec_lnm_mode : 1; /* Section logical name mode */N unsigned tpu$v_charset : 1; /* /CHARACTER_SET */" unsigned0 tpu$v_bit_27 : 1;" unsigned tpu$v_bit_28 : 1;" unsigned tpu$v_bit_29 : 1;" unsigned tpu$v_bit_30 : 1;" unsigned tpu$v_bit_31 : 1; } tpu$r_fill_33_; } ; #if !defined(__VAXC)2#define tpu$v_recover tpu$r_fill_33_.tpu$v_recover2#define tpu$v_journal tpu$r_fill_33_.tpu$v_journal,#define tpu$v_read tpu$r_fill_33_.tpu$v_read2#define tpu$v_section tpu$r_fill_33_.tpu$v_section0#define tpu$v_output tpu$r_fill_33_.tpu$v_output2#define tpu$v_command tpu$ 0r_fill_33_.tpu$v_command2#define tpu$v_display tpu$r_fill_33_.tpu$v_display0#define tpu$v_create tpu$r_fill_33_.tpu$v_create4#define tpu$v_startpos tpu$r_fill_33_.tpu$v_startpos@#define tpu$v_command_dflted tpu$r_fill_33_.tpu$v_command_dflted.#define tpu$v_debug tpu$r_fill_33_.tpu$v_debug:#define tpu$v_nokanji_dic tpu$r_fill_33_.tpu$v_nokanji_dic>#define tpu$v_text_language tpu$r_fill_33_.tpu$v_text_language4#define tpu$v_defaults tpu$r_fill_33_.tpu$v_defaults8#define tpu$v_nodefaults tpu$r_f 0ill_33_.tpu$v_nodefaults:#define tpu$v_environment tpu$r_fill_33_.tpu$v_environment,#define tpu$v_init tpu$r_fill_33_.tpu$v_init8#define tpu$v_system_env tpu$r_fill_33_.tpu$v_system_env<#define tpu$v_current_file tpu$r_fill_33_.tpu$v_current_file.#define tpu$v_write tpu$r_fill_33_.tpu$v_write0#define tpu$v_modify tpu$r_fill_33_.tpu$v_modify4#define tpu$v_nomodify tpu$r_fill_33_.tpu$v_nomodify.#define tpu$v_nomap tpu$r_fill_33_.tpu$v_nomap,#define tpu$v_work tpu$r_fill_33_.tpu$v_work<#define 0tpu$v_sec_lnm_mode tpu$r_fill_33_.tpu$v_sec_lnm_mode2#define tpu$v_charset tpu$r_fill_33_.tpu$v_charset"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* Access codes for TPU$_ACCESS */N#define TPU$K_INPUT 0 /* Open file for input only */N#define TPU$K_OUTPUT 1 /* Open file for output only */Q#define TPU$K_IO 2 /* Open file for both input and output *0/N#define TPU$K_OUTPUT_DDIF 3 /* Open file for DDIF output only */N/* Codes for file I/O */N#define TPU$K_OPEN 0 /* Open a file */N#define TPU$K_CLOSE 1 /* Close a file */N#define TPU$K_CLOSE_DELETE 2 /* Close and delete a file */N#define TPU$K_PUT 3 /* Put a record to a file */N#define TPU$K_GET 4 0 /* Get a record from a file */N#define TPU$K_REWIND 5 /* Rewind the file */N/* FILE_PARSE and FILE_SEARCH item flags */#define TPU$M_NODE 0x1#define TPU$M_DEV 0x2#define TPU$M_DIR 0x4#define TPU$M_NAME 0x8#define TPU$M_TYPE 0x10#define TPU$M_VER 0x20#define TPU$M_HEAD 0x40#define TPU$M_TAIL 0x80#define TPU$M_REPARSE 0x10000 #ifdef __NEW_STARLETtypedef union _fill_34_ {" 0unsigned int tpu$l_item_flags; __struct {N unsigned tpu$v_node : 1; /* Return node */N unsigned tpu$v_dev : 1; /* Return device */N unsigned tpu$v_dir : 1; /* Return directory */N unsigned tpu$v_name : 1; /* Return name */N unsigned tpu$v_type : 1; /* Return type */N unsigned tpu$v_ver : 1; /* Return versio 0n */O unsigned tpu$v_head : 1; /* Return head (Ultrix node+dev+dir) */P unsigned tpu$v_tail : 1; /* Return tail (Ultrix name+type+ver) */" unsigned tpu$v_bit_08 : 1;" unsigned tpu$v_bit_09 : 1;" unsigned tpu$v_bit_10 : 1;" unsigned tpu$v_bit_11 : 1;" unsigned tpu$v_bit_12 : 1;" unsigned tpu$v_bit_13 : 1;" unsigned tpu$v_bit_14 : 1;" unsigned tpu$v_bit_15 : 1;N unsigned tpu$v_reparse0 : 1; /* Reparse (FILE_SEARCH only) */$ unsigned tpu$v_fill_36_ : 7; } tpu$r_fill_35_; } FILL_34_; #if !defined(__VAXC),#define tpu$v_node tpu$r_fill_35_.tpu$v_node*#define tpu$v_dev tpu$r_fill_35_.tpu$v_dev*#define tpu$v_dir tpu$r_fill_35_.tpu$v_dir,#define tpu$v_name tpu$r_fill_35_.tpu$v_name,#define tpu$v_type tpu$r_fill_35_.tpu$v_type*#define tpu$v_ver tpu$r_fill_35_.tpu$v_ver,#define tpu$v_head tpu$r_fill_35_.tpu$v_head,#define tpu$v_tail tpu$r_fill_ 035_.tpu$v_tail2#define tpu$v_reparse tpu$r_fill_35_.tpu$v_reparse"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union fill_34_ {" unsigned int tpu$l_item_flags; __struct {N unsigned tpu$v_node : 1; /* Return node */N unsigned tpu$v_dev : 1; /* Return device */N unsigned tpu$v_dir : 1; /* Return directory */N unsigned tpu$v_name : 1; /* Return name 0 */N unsigned tpu$v_type : 1; /* Return type */N unsigned tpu$v_ver : 1; /* Return version */O unsigned tpu$v_head : 1; /* Return head (Ultrix node+dev+dir) */P unsigned tpu$v_tail : 1; /* Return tail (Ultrix name+type+ver) */" unsigned tpu$v_bit_08 : 1;" unsigned tpu$v_bit_09 : 1;" unsigned tpu$v_bit_10 : 1;" unsigned tpu$v_bit_11 : 1;" unsi0gned tpu$v_bit_12 : 1;" unsigned tpu$v_bit_13 : 1;" unsigned tpu$v_bit_14 : 1;" unsigned tpu$v_bit_15 : 1;N unsigned tpu$v_reparse : 1; /* Reparse (FILE_SEARCH only) */$ unsigned tpu$v_fill_36_ : 7; } tpu$r_fill_35_; } ; #if !defined(__VAXC),#define tpu$v_node tpu$r_fill_35_.tpu$v_node*#define tpu$v_dev tpu$r_fill_35_.tpu$v_dev*#define tpu$v_dir tpu$r_fill_35_.tpu$v_dir,#define tpu$v_name tpu$r_fill_35_.tpu$v_name,#define tpu$ 0v_type tpu$r_fill_35_.tpu$v_type*#define tpu$v_ver tpu$r_fill_35_.tpu$v_ver,#define tpu$v_head tpu$r_fill_35_.tpu$v_head,#define tpu$v_tail tpu$r_fill_35_.tpu$v_tail2#define tpu$v_reparse tpu$r_fill_35_.tpu$v_reparse"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* Codes for terminal input */N#define TPU$K_INITIALIZE_INPUT 0 /* Initialize terminal input */N#define TPU$K_TYPEAHEAD_COUNT 1 /* F0etch typeahead count */O#define TPU$K_CANCEL_INPUT 2 /* Cancel outstanding terminal input */N#define TPU$K_READ_CHARACTER 3 /* Read a single character */N#define TPU$K_READ_STRING 4 /* Read a string of characters */N#define TPU$K_READ_LINE 5 /* Read a line with prompting */N#define TPU$K_TERMINATE_INPUT 6 /* Terminate terminal input */O#define TPU$K_READ_TYPEAHEAD_NOECHO 7 /* Read the typeahead and do0n't echo */N/* TPU$CLEANUP flags */ #define TPU$M_DELETE_JOURNAL 0x1#define TPU$M_DELETE_EXITH 0x2 #define TPU$M_DELETE_BUFFERS 0x4 #define TPU$M_DELETE_WINDOWS 0x8#define TPU$M_DELETE_CACHE 0x10#define TPU$M_PRUNE_CACHE 0x20#define TPU$M_EXECUTE_FILE 0x40#define TPU$M_EXECUTE_PROC 0x80"#define TPU$M_DELETE_CONTEXT 0x100"#define TPU$M_RESET_TERMINAL 0x200"#define TPU$M_KILL_PROCESSES 0x400!#define TPU$M_CLOSE_SECTION 0x800" 0#define TPU$M_DELETE_OTHERS 0x1000#define TPU$M_LAST_TIME 0x2000$#define TPU$M_CLOSE_KANJI_DIC 0x4000 #ifdef __NEW_STARLETtypedef union _fill_37_ { unsigned int tpu$l_cleanup; __struct {N unsigned tpu$v_delete_journal : 1; /* Delete journal */N unsigned tpu$v_delete_exith : 1; /* Delete exit handler */N unsigned tpu$v_delete_buffers : 1; /* Delete buffers */N unsigned tpu$v_delete_windows : 1; /* Delete w0indows */N unsigned tpu$v_delete_cache : 1; /* Delete caches */N unsigned tpu$v_prune_cache : 1; /* Purge caches */N unsigned tpu$v_execute_file : 1; /* Re-execute command file */N unsigned tpu$v_execute_proc : 1; /* Re-execute TPU$INIT_PROCEDURE */N unsigned tpu$v_delete_context : 1; /* Delete all context */N unsigned tpu$v_reset_terminal : 1; /* Reset terminal state */N 0 unsigned tpu$v_kill_processes : 1; /* Delete subprocesses */N unsigned tpu$v_close_section : 1; /* Close section file */N unsigned tpu$v_delete_others : 1; /* Delete miscellaneous */N unsigned tpu$v_last_time : 1; /* Last call */N unsigned tpu$v_close_kanji_dic : 1; /* Close dictionary */$ unsigned tpu$v_fill_39_ : 1; } tpu$r_fill_38_; } FILL_37_; #if !defined(__VAX 0C)@#define tpu$v_delete_journal tpu$r_fill_38_.tpu$v_delete_journal<#define tpu$v_delete_exith tpu$r_fill_38_.tpu$v_delete_exith@#define tpu$v_delete_buffers tpu$r_fill_38_.tpu$v_delete_buffers@#define tpu$v_delete_windows tpu$r_fill_38_.tpu$v_delete_windows<#define tpu$v_delete_cache tpu$r_fill_38_.tpu$v_delete_cache:#define tpu$v_prune_cache tpu$r_fill_38_.tpu$v_prune_cache<#define tpu$v_execute_file tpu$r_fill_38_.tpu$v_execute_file<#define tpu$v_execute_proc tpu$r_fill_38_.tpu$v_execute_pr 0oc@#define tpu$v_delete_context tpu$r_fill_38_.tpu$v_delete_context@#define tpu$v_reset_terminal tpu$r_fill_38_.tpu$v_reset_terminal@#define tpu$v_kill_processes tpu$r_fill_38_.tpu$v_kill_processes>#define tpu$v_close_section tpu$r_fill_38_.tpu$v_close_section>#define tpu$v_delete_others tpu$r_fill_38_.tpu$v_delete_others6#define tpu$v_last_time tpu$r_fill_38_.tpu$v_last_timeB#define tpu$v_close_kanji_dic tpu$r_fill_38_.tpu$v_close_kanji_dic"#endif /* #if !defined(__VAXC) */ #else /* 0 __OLD_STARLET */union fill_37_ { unsigned int tpu$l_cleanup; __struct {N unsigned tpu$v_delete_journal : 1; /* Delete journal */N unsigned tpu$v_delete_exith : 1; /* Delete exit handler */N unsigned tpu$v_delete_buffers : 1; /* Delete buffers */N unsigned tpu$v_delete_windows : 1; /* Delete windows */N unsigned tpu$v_delete_cache : 1; /* Delete caches */N unsigned0 tpu$v_prune_cache : 1; /* Purge caches */N unsigned tpu$v_execute_file : 1; /* Re-execute command file */N unsigned tpu$v_execute_proc : 1; /* Re-execute TPU$INIT_PROCEDURE */N unsigned tpu$v_delete_context : 1; /* Delete all context */N unsigned tpu$v_reset_terminal : 1; /* Reset terminal state */N unsigned tpu$v_kill_processes : 1; /* Delete subprocesses */N unsigned tpu$v_close_section : 1; 0/* Close section file */N unsigned tpu$v_delete_others : 1; /* Delete miscellaneous */N unsigned tpu$v_last_time : 1; /* Last call */N unsigned tpu$v_close_kanji_dic : 1; /* Close dictionary */$ unsigned tpu$v_fill_39_ : 1; } tpu$r_fill_38_; } ; #if !defined(__VAXC)@#define tpu$v_delete_journal tpu$r_fill_38_.tpu$v_delete_journal<#define tpu$v_delete_exith tpu$r_fill_38_.tpu$v_delete_exith0@#define tpu$v_delete_buffers tpu$r_fill_38_.tpu$v_delete_buffers@#define tpu$v_delete_windows tpu$r_fill_38_.tpu$v_delete_windows<#define tpu$v_delete_cache tpu$r_fill_38_.tpu$v_delete_cache:#define tpu$v_prune_cache tpu$r_fill_38_.tpu$v_prune_cache<#define tpu$v_execute_file tpu$r_fill_38_.tpu$v_execute_file<#define tpu$v_execute_proc tpu$r_fill_38_.tpu$v_execute_proc@#define tpu$v_delete_context tpu$r_fill_38_.tpu$v_delete_context@#define tpu$v_reset_terminal tpu$r_fill_38_.tpu$v_reset_term 0inal@#define tpu$v_kill_processes tpu$r_fill_38_.tpu$v_kill_processes>#define tpu$v_close_section tpu$r_fill_38_.tpu$v_close_section>#define tpu$v_delete_others tpu$r_fill_38_.tpu$v_delete_others6#define tpu$v_last_time tpu$r_fill_38_.tpu$v_last_timeB#define tpu$v_close_kanji_dic tpu$r_fill_38_.tpu$v_close_kanji_dic"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr siz0e pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __TPUDEF_LOADED */ wwf/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]S 0TARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $TRMDEF ***/#ifndef __TRMDEF_LOADED#define __TRMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Sa0ve 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)#defin0e __union union#else#define __union variant_union#endif#endif N/* */N/* Define symbols for the item list QIO format */N/* */N/* Item list type codes */#define TRM$_MODIFIERS 0#define TRM$_EDITMODE 1#define TRM$_TIMEOUT 2#define TRM$_TERM 3#define TR0M$_PROMPT 4#define TRM$_INISTRNG 5#define TRM$_PICSTRNG 6#define TRM$_FILLCHR 7#define TRM$_INIOFFSET 8#define TRM$_ALTECHSTR 9#define TRM$_ESCTRMOVR 10N#define TRM$_LASTITM 11 /* must remain the last item */#define TRM$_RESERVE12 12#define TRM$_RESERVE13 13#define TRM$_RESERVE14 14#define TRM$_RESERVE15 15#define TRM$_RESERVE16 16#define TRM$_RESERVE17 17#define TRM$_RESERVE18 18#define TRM$_RESERVE19 19#define TRM$_RESERVE20 20#def 0ine TRM$_RESERVE21 21#define TRM$_RESERVE22 22#define TRM$_RESERVE23 23#define TRM$_RESERVE24 24#define TRM$_RESERVE25 25#define TRM$_RESERVE26 26#define TRM$_RESERVE27 27#define TRM$_RESERVE28 28#define TRM$_RESERVE29 29#define TRM$_RESERVE30 30N#define TRM$_RECLINE 31 /* Reserved for exclusive use by */N/* Japanese input method; this code MUST */N/* remain in the invalid item code range 0 */N/* */N/* Editmode type codes */N/* */#define TRM$K_EM_DEFAULT 0#define TRM$K_EM_RDVERIFY 1#define TRM$M_TM_NOECHO 0x40#define TRM$M_TM_TIMED 0x80#define TRM$M_TM_CVTLOW 0x100#define TRM$M_TM_NOFILTR 0x200#define TRM$M_TM_DSABLMBX 0x400#define TRM$M_TM_PURGE 0x800!#define TR0M$M_TM_TRMNOECHO 0x1000#define TRM$M_TM_REFRESH 0x2000#define TRM$M_TM_ESCAPE 0x4000#define TRM$M_TM_NOEDIT 0x8000!#define TRM$M_TM_NORECALL 0x10000#define TRM$M_TM_R_JUST 0x20000!#define TRM$M_TM_AUTO_TAB 0x40000#define TRM$M_TM_ARROWS 0x80000$#define TRM$M_TM_TERM_ARROW 0x100000"#define TRM$M_TM_TERM_DEL 0x200000 #define TRM$M_TM_TOGGLE 0x400000"#define TRM$M_TM_OTHERWAY 0x800000"#define TRM$M_TM_NOCLEAR 0x1000000#define TRM$M_CV_UPPER 0x1#define TRM$M_CV_LOWER 0x2#defin0e TRM$M_CV_NUMERIC 0x4#define TRM$M_CV_NUMPUNC 0x8#define TRM$M_CV_PRINTABLE 0x10#define TRM$M_CV_ANY 0x20#define TRM$M_ST_FIELD_FULL 0x1#define TRM$M_ST_OTHERWAY 0x2 #ifdef __NEW_STARLETtypedef union _trmdef { __struct {N unsigned trmdef$$_fill_1 : 6; /*FUNCTION CODE */N unsigned trm$v_tm_noecho : 1; /*NOECHO */N unsigned trm$v_tm_timed : 1; /*TIMED */N unsign0ed trm$v_tm_cvtlow : 1; /*CONVERT LOWER CASE */N unsigned trm$v_tm_nofiltr : 1; /*NO FILTER */N unsigned trm$v_tm_dsablmbx : 1; /*DISABLE MAILBOX */N unsigned trm$v_tm_purge : 1; /*PURGE TYPEAHEAD */N unsigned trm$v_tm_trmnoecho : 1; /*TERMINATORS ARE NOT ECHOED */N unsigned trm$v_tm_refresh : 1; /*Control-R interrupted read n */O unsigned trm$v_tm_escape : 1; 0/*TERMINATE READ ON ESCAPE SEQUENCE */N unsigned trm$v_tm_noedit : 1; /*DISABLE ADVANCED EDITING */[ unsigned trm$v_tm_norecall : 1; /*Disable the recall feature of advanced editing */N unsigned trm$v_tm_r_just : 1; /*Right justification */N unsigned trm$v_tm_auto_tab : 1; /*Auto tab field */N unsigned trm$v_tm_arrows : 1; /* enable left & right arrow keys */N unsigned trm$v_tm_term_arrow : 1; /* pass 0arrows as terminator */N unsigned trm$v_tm_term_del : 1; /* pass as terminator */N unsigned trm$v_tm_toggle : 1; /* allow insert/overstrike toggle */V unsigned trm$v_tm_otherway : 1; /* overstrike R-justify or insert L-justify */` unsigned trm$v_tm_noclear : 1; /* don't replace fill with clear after first non-fill */$ unsigned trm$v_fill_40_ : 7; } trm$r_trmdef_bits0;N __struct { /* picture string ma0sk */N unsigned trm$v_cv_upper : 1; /* upper case */N unsigned trm$v_cv_lower : 1; /* lower case */N unsigned trm$v_cv_numeric : 1; /* numeric (0-9) */N unsigned trm$v_cv_numpunc : 1; /* numeric punctuation (+ - .) */N unsigned trm$v_cv_printable : 1; /* printable character */N unsigned trm$v_cv_any : 1; /* any character */$ 0 unsigned trm$v_fill_41_ : 2; } trm$r_trmdef_bits1; __struct {d unsigned trm$v_st_field_full : 1; /* field full condition IOSB+7 contains index to cursor */] unsigned trm$v_st_otherway : 1; /* left-justify insert OR right-justify overstrike */$ unsigned trm$v_fill_42_ : 6; } trm$r_trmdef_bits2; } TRMDEF; #if !defined(__VAXC):#define trm$v_tm_noecho trm$r_trmdef_bits0.trm$v_tm_noecho8#define trm$v_tm_timed trm$r_trmdef_bits0.trm$v_tm_tim 0ed:#define trm$v_tm_cvtlow trm$r_trmdef_bits0.trm$v_tm_cvtlow<#define trm$v_tm_nofiltr trm$r_trmdef_bits0.trm$v_tm_nofiltr>#define trm$v_tm_dsablmbx trm$r_trmdef_bits0.trm$v_tm_dsablmbx8#define trm$v_tm_purge trm$r_trmdef_bits0.trm$v_tm_purge@#define trm$v_tm_trmnoecho trm$r_trmdef_bits0.trm$v_tm_trmnoecho<#define trm$v_tm_refresh trm$r_trmdef_bits0.trm$v_tm_refresh:#define trm$v_tm_escape trm$r_trmdef_bits0.trm$v_tm_escape:#define trm$v_tm_noedit trm$r_trmdef_bits0.trm$v_tm_noedit>#define tr 0m$v_tm_norecall trm$r_trmdef_bits0.trm$v_tm_norecall:#define trm$v_tm_r_just trm$r_trmdef_bits0.trm$v_tm_r_just>#define trm$v_tm_auto_tab trm$r_trmdef_bits0.trm$v_tm_auto_tab:#define trm$v_tm_arrows trm$r_trmdef_bits0.trm$v_tm_arrowsB#define trm$v_tm_term_arrow trm$r_trmdef_bits0.trm$v_tm_term_arrow>#define trm$v_tm_term_del trm$r_trmdef_bits0.trm$v_tm_term_del:#define trm$v_tm_toggle trm$r_trmdef_bits0.trm$v_tm_toggle>#define trm$v_tm_otherway trm$r_trmdef_bits0.trm$v_tm_otherway<#define trm$ 0v_tm_noclear trm$r_trmdef_bits0.trm$v_tm_noclear8#define trm$v_cv_upper trm$r_trmdef_bits1.trm$v_cv_upper8#define trm$v_cv_lower trm$r_trmdef_bits1.trm$v_cv_lower<#define trm$v_cv_numeric trm$r_trmdef_bits1.trm$v_cv_numeric<#define trm$v_cv_numpunc trm$r_trmdef_bits1.trm$v_cv_numpunc@#define trm$v_cv_printable trm$r_trmdef_bits1.trm$v_cv_printable4#define trm$v_cv_any trm$r_trmdef_bits1.trm$v_cv_anyB#define trm$v_st_field_full trm$r_trmdef_bits2.trm$v_st_field_full>#define trm$v_st_otherway tr 0m$r_trmdef_bits2.trm$v_st_otherway"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union trmdef { __struct {N unsigned trmdef$$_fill_1 : 6; /*FUNCTION CODE */N unsigned trm$v_tm_noecho : 1; /*NOECHO */N unsigned trm$v_tm_timed : 1; /*TIMED */N unsigned trm$v_tm_cvtlow : 1; /*CONVERT LOWER CASE */N unsigned trm$v_tm_nofiltr : 1; /*NO0 FILTER */N unsigned trm$v_tm_dsablmbx : 1; /*DISABLE MAILBOX */N unsigned trm$v_tm_purge : 1; /*PURGE TYPEAHEAD */N unsigned trm$v_tm_trmnoecho : 1; /*TERMINATORS ARE NOT ECHOED */N unsigned trm$v_tm_refresh : 1; /*Control-R interrupted read n */O unsigned trm$v_tm_escape : 1; /*TERMINATE READ ON ESCAPE SEQUENCE */N unsigned trm$v_tm_noedit : 1; /*DISABLE ADVANCED EDITING 0 */[ unsigned trm$v_tm_norecall : 1; /*Disable the recall feature of advanced editing */N unsigned trm$v_tm_r_just : 1; /*Right justification */N unsigned trm$v_tm_auto_tab : 1; /*Auto tab field */N unsigned trm$v_tm_arrows : 1; /* enable left & right arrow keys */N unsigned trm$v_tm_term_arrow : 1; /* pass arrows as terminator */N unsigned trm$v_tm_term_del : 1; /* pass as terminator */N0 unsigned trm$v_tm_toggle : 1; /* allow insert/overstrike toggle */V unsigned trm$v_tm_otherway : 1; /* overstrike R-justify or insert L-justify */` unsigned trm$v_tm_noclear : 1; /* don't replace fill with clear after first non-fill */$ unsigned trm$v_fill_40_ : 7; } trm$r_trmdef_bits0;N __struct { /* picture string mask */N unsigned trm$v_cv_upper : 1; /* upper case */N un 0signed trm$v_cv_lower : 1; /* lower case */N unsigned trm$v_cv_numeric : 1; /* numeric (0-9) */N unsigned trm$v_cv_numpunc : 1; /* numeric punctuation (+ - .) */N unsigned trm$v_cv_printable : 1; /* printable character */N unsigned trm$v_cv_any : 1; /* any character */$ unsigned trm$v_fill_41_ : 2; } trm$r_trmdef_bits1; __struct {d unsigned trm$v_st_fi 0eld_full : 1; /* field full condition IOSB+7 contains index to cursor */] unsigned trm$v_st_otherway : 1; /* left-justify insert OR right-justify overstrike */$ unsigned trm$v_fill_42_ : 6; } trm$r_trmdef_bits2; } ; #if !defined(__VAXC):#define trm$v_tm_noecho trm$r_trmdef_bits0.trm$v_tm_noecho8#define trm$v_tm_timed trm$r_trmdef_bits0.trm$v_tm_timed:#define trm$v_tm_cvtlow trm$r_trmdef_bits0.trm$v_tm_cvtlow<#define trm$v_tm_nofiltr trm$r_trmdef_bits0.trm$v_tm 0_nofiltr>#define trm$v_tm_dsablmbx trm$r_trmdef_bits0.trm$v_tm_dsablmbx8#define trm$v_tm_purge trm$r_trmdef_bits0.trm$v_tm_purge@#define trm$v_tm_trmnoecho trm$r_trmdef_bits0.trm$v_tm_trmnoecho<#define trm$v_tm_refresh trm$r_trmdef_bits0.trm$v_tm_refresh:#define trm$v_tm_escape trm$r_trmdef_bits0.trm$v_tm_escape:#define trm$v_tm_noedit trm$r_trmdef_bits0.trm$v_tm_noedit>#define trm$v_tm_norecall trm$r_trmdef_bits0.trm$v_tm_norecall:#define trm$v_tm_r_just trm$r_trmdef_bits0.trm$v_tm_r_just>#d 0efine trm$v_tm_auto_tab trm$r_trmdef_bits0.trm$v_tm_auto_tab:#define trm$v_tm_arrows trm$r_trmdef_bits0.trm$v_tm_arrowsB#define trm$v_tm_term_arrow trm$r_trmdef_bits0.trm$v_tm_term_arrow>#define trm$v_tm_term_del trm$r_trmdef_bits0.trm$v_tm_term_del:#define trm$v_tm_toggle trm$r_trmdef_bits0.trm$v_tm_toggle>#define trm$v_tm_otherway trm$r_trmdef_bits0.trm$v_tm_otherway<#define trm$v_tm_noclear trm$r_trmdef_bits0.trm$v_tm_noclear8#define trm$v_cv_upper trm$r_trmdef_bits1.trm$v_cv_upper8#define 0trm$v_cv_lower trm$r_trmdef_bits1.trm$v_cv_lower<#define trm$v_cv_numeric trm$r_trmdef_bits1.trm$v_cv_numeric<#define trm$v_cv_numpunc trm$r_trmdef_bits1.trm$v_cv_numpunc@#define trm$v_cv_printable trm$r_trmdef_bits1.trm$v_cv_printable4#define trm$v_cv_any trm$r_trmdef_bits1.trm$v_cv_anyB#define trm$v_st_field_full trm$r_trmdef_bits2.trm$v_st_field_full>#define trm$v_st_otherway trm$r_trmdef_bits2.trm$v_st_otherway"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */0 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __TRMDEF_LOADED */ wwf/********************************************************************************************************************************/=/* Created: 5-Apr-201 02 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $TT2DEF ***/#ifndef __TT2DEF_LOADED#define __TT2DEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZ0E /* 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#else0#define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif #define TT2$M_LOCALECHO 0x1#define TT2$M_AUTOBAUD 0x2#define TT2$M_HANGUP 0x4#define TT2$M_MODHANGUP 0x8#define TT2$M_BRDCSTMBX 0x10#define TT2$M_XON 0x20#define TT2$M_DMA 0x40#define TT2$M_ALTYPEAHD 0x80#define TT2$M_SETSPEED 0x100#define TT2$M_DCL_MAILBX 0x200#define TT2$M_DECCRT4 0x400#define TT2$0M_COMMSYNC 0x800#define TT2$M_EDITING 0x1000#define TT2$M_INSERT 0x2000#define TT2$M_FALLBACK 0x4000#define TT2$M_DIALUP 0x8000#define TT2$M_SECURE 0x10000 #define TT2$M_DISCONNECT 0x20000#define TT2$M_PASTHRU 0x40000#define TT2$M_SYSPWD 0x80000#define TT2$M_SIXEL 0x100000#define TT2$M_DRCS 0x200000#define TT2$M_PRINTER 0x400000!#define TT2$M_APP_KEYPAD 0x800000#define TT2$M_ANSICRT 0x1000000#define TT2$M_REGIS 0x2000000#define TT2$M_BLOCK 0x4000000#define TT2$M_0AVO 0x8000000#define TT2$M_EDIT 0x10000000#define TT2$M_DECCRT 0x20000000 #define TT2$M_DECCRT2 0x40000000 #define TT2$M_DECCRT3 0x80000000 #ifdef __NEW_STARLETtypedef union _tt2def { __struct {% unsigned tt2$v_localecho : 1;$ unsigned tt2$v_autobaud : 1;" unsigned tt2$v_hangup : 1;% unsigned tt2$v_modhangup : 1;% unsigned tt2$v_brdcstmbx : 1; unsigned tt2$v_xon : 1; unsigned tt2$v_dma : 1;% unsigned tt2$v_a0ltypeahd : 1;$ unsigned tt2$v_setspeed : 1;N unsigned tt2$v_dcl_mailbx : 1; /* TEMP DEFINITIONS FOR DCL SPAWN */V unsigned tt2$v_deccrt4 : 1; /* Level 4 terminals (was OUTBAND-obsolete) */N unsigned tt2$v_commsync : 1; /* (was DCL_CTRLC-obsolete) */N unsigned tt2$v_editing : 1; /* enable advanced editing */N unsigned tt2$v_insert : 1; /* INPUT EDITING INSTER DEFAULT */N unsigned tt2$v_fallback : 1; /* U0SE MULTINATIONAL FALLBACK */N unsigned tt2$v_dialup : 1; /* TERMINAL IS CONNECTED TO DIALUP */N unsigned tt2$v_secure : 1; /* RECOGNIZE SECURE SERVER */N unsigned tt2$v_disconnect : 1; /* TERMINAL CAN BE DISCONNECTED */N unsigned tt2$v_pasthru : 1; /* passall with flowcontrol */N unsigned tt2$v_syspwd : 1; /* System password required */N unsigned tt2$v_sixel : 1; /* SIXEL SUPPORTED 0 */N unsigned tt2$v_drcs : 1; /* */N unsigned tt2$v_printer : 1; /* PRINTER PORT AVAILABLE */N unsigned tt2$v_app_keypad : 1; /* Keypad in applicationis mode */N unsigned tt2$v_ansicrt : 1; /* ANSI, REGIS, BLOCK and AVO */N unsigned tt2$v_regis : 1; /* must be contiguous for SCRPKG. */! unsigned tt2$v_block : 1; unsigned tt2$v_avo : 1; unsigned tt2$v_edi 0t : 1;" unsigned tt2$v_deccrt : 1;N unsigned tt2$v_deccrt2 : 1; /* DECCRT level 2 */N unsigned tt2$v_deccrt3 : 1; /* DECCRT level 3 */ } tt2$r_tt2def_bits; } TT2DEF; #if !defined(__VAXC)9#define tt2$v_localecho tt2$r_tt2def_bits.tt2$v_localecho7#define tt2$v_autobaud tt2$r_tt2def_bits.tt2$v_autobaud3#define tt2$v_hangup tt2$r_tt2def_bits.tt2$v_hangup9#define tt2$v_modhangup tt2$r_tt2def_bits.tt2$v_modhangup 09#define tt2$v_brdcstmbx tt2$r_tt2def_bits.tt2$v_brdcstmbx-#define tt2$v_xon tt2$r_tt2def_bits.tt2$v_xon-#define tt2$v_dma tt2$r_tt2def_bits.tt2$v_dma9#define tt2$v_altypeahd tt2$r_tt2def_bits.tt2$v_altypeahd7#define tt2$v_setspeed tt2$r_tt2def_bits.tt2$v_setspeed;#define tt2$v_dcl_mailbx tt2$r_tt2def_bits.tt2$v_dcl_mailbx5#define tt2$v_deccrt4 tt2$r_tt2def_bits.tt2$v_deccrt47#define tt2$v_commsync tt2$r_tt2def_bits.tt2$v_commsync5#define tt2$v_editing tt2$r_tt2def_bits.tt2$v_editing 03#define tt2$v_insert tt2$r_tt2def_bits.tt2$v_insert7#define tt2$v_fallback tt2$r_tt2def_bits.tt2$v_fallback3#define tt2$v_dialup tt2$r_tt2def_bits.tt2$v_dialup3#define tt2$v_secure tt2$r_tt2def_bits.tt2$v_secure;#define tt2$v_disconnect tt2$r_tt2def_bits.tt2$v_disconnect5#define tt2$v_pasthru tt2$r_tt2def_bits.tt2$v_pasthru3#define tt2$v_syspwd tt2$r_tt2def_bits.tt2$v_syspwd1#define tt2$v_sixel tt2$r_tt2def_bits.tt2$v_sixel/#define tt2$v_drcs tt2$r_tt2def_bits.tt2$v_drcs5#define tt 02$v_printer tt2$r_tt2def_bits.tt2$v_printer;#define tt2$v_app_keypad tt2$r_tt2def_bits.tt2$v_app_keypad5#define tt2$v_ansicrt tt2$r_tt2def_bits.tt2$v_ansicrt1#define tt2$v_regis tt2$r_tt2def_bits.tt2$v_regis1#define tt2$v_block tt2$r_tt2def_bits.tt2$v_block-#define tt2$v_avo tt2$r_tt2def_bits.tt2$v_avo/#define tt2$v_edit tt2$r_tt2def_bits.tt2$v_edit3#define tt2$v_deccrt tt2$r_tt2def_bits.tt2$v_deccrt5#define tt2$v_deccrt2 tt2$r_tt2def_bits.tt2$v_deccrt25#define tt2$v_deccrt3 tt2$r_tt02def_bits.tt2$v_deccrt3"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union tt2def { __struct {% unsigned tt2$v_localecho : 1;$ unsigned tt2$v_autobaud : 1;" unsigned tt2$v_hangup : 1;% unsigned tt2$v_modhangup : 1;% unsigned tt2$v_brdcstmbx : 1; unsigned tt2$v_xon : 1; unsigned tt2$v_dma : 1;% unsigned tt2$v_altypeahd : 1;$ unsigned tt2$v_setspeed : 1;N unsigned tt2$v_dcl_mailbx 0: 1; /* TEMP DEFINITIONS FOR DCL SPAWN */V unsigned tt2$v_deccrt4 : 1; /* Level 4 terminals (was OUTBAND-obsolete) */N unsigned tt2$v_commsync : 1; /* (was DCL_CTRLC-obsolete) */N unsigned tt2$v_editing : 1; /* enable advanced editing */N unsigned tt2$v_insert : 1; /* INPUT EDITING INSTER DEFAULT */N unsigned tt2$v_fallback : 1; /* USE MULTINATIONAL FALLBACK */N unsigned tt2$v_dialup : 1; /* TERMINAL 0IS CONNECTED TO DIALUP */N unsigned tt2$v_secure : 1; /* RECOGNIZE SECURE SERVER */N unsigned tt2$v_disconnect : 1; /* TERMINAL CAN BE DISCONNECTED */N unsigned tt2$v_pasthru : 1; /* passall with flowcontrol */N unsigned tt2$v_syspwd : 1; /* System password required */N unsigned tt2$v_sixel : 1; /* SIXEL SUPPORTED */N unsigned tt2$v_drcs : 1; /* */ 0N unsigned tt2$v_printer : 1; /* PRINTER PORT AVAILABLE */N unsigned tt2$v_app_keypad : 1; /* Keypad in applicationis mode */N unsigned tt2$v_ansicrt : 1; /* ANSI, REGIS, BLOCK and AVO */N unsigned tt2$v_regis : 1; /* must be contiguous for SCRPKG. */! unsigned tt2$v_block : 1; unsigned tt2$v_avo : 1; unsigned tt2$v_edit : 1;" unsigned tt2$v_deccrt : 1;N unsigned tt2$v_deccrt2 : 1; /* D 0ECCRT level 2 */N unsigned tt2$v_deccrt3 : 1; /* DECCRT level 3 */ } tt2$r_tt2def_bits; } ; #if !defined(__VAXC)9#define tt2$v_localecho tt2$r_tt2def_bits.tt2$v_localecho7#define tt2$v_autobaud tt2$r_tt2def_bits.tt2$v_autobaud3#define tt2$v_hangup tt2$r_tt2def_bits.tt2$v_hangup9#define tt2$v_modhangup tt2$r_tt2def_bits.tt2$v_modhangup9#define tt2$v_brdcstmbx tt2$r_tt2def_bits.tt2$v_brdcstmbx-#define tt2$v_xon tt2$r_tt2def_b 0its.tt2$v_xon-#define tt2$v_dma tt2$r_tt2def_bits.tt2$v_dma9#define tt2$v_altypeahd tt2$r_tt2def_bits.tt2$v_altypeahd7#define tt2$v_setspeed tt2$r_tt2def_bits.tt2$v_setspeed;#define tt2$v_dcl_mailbx tt2$r_tt2def_bits.tt2$v_dcl_mailbx5#define tt2$v_deccrt4 tt2$r_tt2def_bits.tt2$v_deccrt47#define tt2$v_commsync tt2$r_tt2def_bits.tt2$v_commsync5#define tt2$v_editing tt2$r_tt2def_bits.tt2$v_editing3#define tt2$v_insert tt2$r_tt2def_bits.tt2$v_insert7#define tt2$v_fallback tt2$r_tt2def_bi 0ts.tt2$v_fallback3#define tt2$v_dialup tt2$r_tt2def_bits.tt2$v_dialup3#define tt2$v_secure tt2$r_tt2def_bits.tt2$v_secure;#define tt2$v_disconnect tt2$r_tt2def_bits.tt2$v_disconnect5#define tt2$v_pasthru tt2$r_tt2def_bits.tt2$v_pasthru3#define tt2$v_syspwd tt2$r_tt2def_bits.tt2$v_syspwd1#define tt2$v_sixel tt2$r_tt2def_bits.tt2$v_sixel/#define tt2$v_drcs tt2$r_tt2def_bits.tt2$v_drcs5#define tt2$v_printer tt2$r_tt2def_bits.tt2$v_printer;#define tt2$v_app_keypad tt2$r_tt2def_bits.tt2$v 0_app_keypad5#define tt2$v_ansicrt tt2$r_tt2def_bits.tt2$v_ansicrt1#define tt2$v_regis tt2$r_tt2def_bits.tt2$v_regis1#define tt2$v_block tt2$r_tt2def_bits.tt2$v_block-#define tt2$v_avo tt2$r_tt2def_bits.tt2$v_avo/#define tt2$v_edit tt2$r_tt2def_bits.tt2$v_edit3#define tt2$v_deccrt tt2$r_tt2def_bits.tt2$v_deccrt5#define tt2$v_deccrt2 tt2$r_tt2def_bits.tt2$v_deccrt25#define tt2$v_deccrt3 tt2$r_tt2def_bits.tt2$v_deccrt3"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_S0TARLET */ # define TT2$V_LOCALECHO 0X0# define TT2$V_AUTOBAUD 0X1# define TT2$V_HANGUP 0X2# define TT2$V_MODHANGUP 0X3# define TT2$V_BRDCSTMBX 0X4# define TT2$V_XON 0X5# define TT2$V_DMA 0X6# define TT2$V_ALTYPEAHD 0X7# define TT2$V_SETSPEED 0X8# define TT2$V_DCL_MAILBX 0X9# define TT2$V_DECCRT4 0XA# define TT2$V_COMMSYNC 0XB# define TT2$V_EDITING 0XC# define TT2$V_INSERT 0XD# define TT2$V_FALLBACK 0XE# define TT2$V_DIALUP 0XF# define TT2$V_SECURE 0 0X10# define TT2$V_DISCONNECT 0X11# define TT2$V_PASTHRU 0X12# define TT2$V_SYSPWD 0X13# define TT2$V_SIXEL 0X14# define TT2$V_DRCS 0X15# define TT2$V_PRINTER 0X16# define TT2$V_APP_KEYPAD 0X17# define TT2$V_ANSICRT 0X18# define TT2$V_REGIS 0X19# define TT2$V_BLOCK 0X1A# define TT2$V_AVO 0X1B# define TT2$V_EDIT 0X1C# define TT2$V_DECCRT 0X1D# define TT2$V_DECCRT2 0X1E# define TT2$V_DECCRT3 0X1F $#pragma __member_alignment __restoreR#ifdef __INITIAL0_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __TT2DEF_LOADED */ wwrg/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-A 0PR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $TT3DEF ***/#ifndef __TT3DEF_LOADED#define __TT3DEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#p0ragma __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 #i0fndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif #define TT3$M_POSIX 0x1#define TT3$M_ANSI_COLOR 0x2#define TT3$M_DECCRT5 0x4#define TT3$M_RTS_FLOW 0x8#define TT3$M_BS 0x10 #ifdef __NEW_STARLETtypedef union _tt3def { __struct {! unsigned tt3$v_posix : 1;& unsigned tt3$v_ansi_color : 1;# unsigned tt3$v_deccrt5 : 1;$ unsigned tt3$v_rts_flow : 1; unsigned tt3$v_bs 0: 1;% unsigned tt3$v_tt_spare : 11;( unsigned tt3$v_as_reserved : 16; } tt3$r_tt3def_bits; } TT3DEF; #if !defined(__VAXC)1#define tt3$v_posix tt3$r_tt3def_bits.tt3$v_posix;#define tt3$v_ansi_color tt3$r_tt3def_bits.tt3$v_ansi_color5#define tt3$v_deccrt5 tt3$r_tt3def_bits.tt3$v_deccrt57#define tt3$v_rts_flow tt3$r_tt3def_bits.tt3$v_rts_flow+#define tt3$v_bs tt3$r_tt3def_bits.tt3$v_bs7#define tt3$v_tt_spare tt3$r_tt3def_bits.tt3$v_tt_spare=#define tt3$v_0as_reserved tt3$r_tt3def_bits.tt3$v_as_reserved"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union tt3def { __struct {! unsigned tt3$v_posix : 1;& unsigned tt3$v_ansi_color : 1;# unsigned tt3$v_deccrt5 : 1;$ unsigned tt3$v_rts_flow : 1; unsigned tt3$v_bs : 1;% unsigned tt3$v_tt_spare : 11;( unsigned tt3$v_as_reserved : 16; } tt3$r_tt3def_bits; } ; #if !defined(__VAXC)1#define tt3$v_posi 0x tt3$r_tt3def_bits.tt3$v_posix;#define tt3$v_ansi_color tt3$r_tt3def_bits.tt3$v_ansi_color5#define tt3$v_deccrt5 tt3$r_tt3def_bits.tt3$v_deccrt57#define tt3$v_rts_flow tt3$r_tt3def_bits.tt3$v_rts_flow+#define tt3$v_bs tt3$r_tt3def_bits.tt3$v_bs7#define tt3$v_tt_spare tt3$r_tt3def_bits.tt3$v_tt_spare=#define tt3$v_as_reserved tt3$r_tt3def_bits.tt3$v_as_reserved"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef0 __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __TT3DEF_LOADED */ wwg/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Sou 0rce: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $TTCDEF ***/#ifndef __TTCDEF_LOADED#define __TTCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas suppor0ted */\#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#end0if #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif #define TTC$M_RESERVED 0xFF#define TTC$M_KANA 0x100#define TTC$M_KANJI 0x200#define TTC$M_HANZI 0x400#define TTC$M_HANGUL 0x800#define TTC$M_HANYU 0x1000#define TTC$M_THAI 0x2000 #ifdef __NEW_STARLETtypedef union _ttcdef { __struct {N unsigned ttc$v_reserved : 8; /* First byte is reserved */N unsigned ttc$v_kana 0: 1; /* Katakana */N unsigned ttc$v_kanji : 1; /* Kanji */N unsigned ttc$v_hanzi : 1; /* Hanzi */N unsigned ttc$v_hangul : 1; /* Hangul */N unsigned ttc$v_hanyu : 1; /* Hanyu */N unsigned ttc$v_thai : 1; /* Thai */$ unsigned ttc$v_fill_45_ : 2; } ttc$r_1ttcdef_bits; } TTCDEF; #if !defined(__VAXC)7#define ttc$v_reserved ttc$r_ttcdef_bits.ttc$v_reserved/#define ttc$v_kana ttc$r_ttcdef_bits.ttc$v_kana1#define ttc$v_kanji ttc$r_ttcdef_bits.ttc$v_kanji1#define ttc$v_hanzi ttc$r_ttcdef_bits.ttc$v_hanzi3#define ttc$v_hangul ttc$r_ttcdef_bits.ttc$v_hangul1#define ttc$v_hanyu ttc$r_ttcdef_bits.ttc$v_hanyu/#define ttc$v_thai ttc$r_ttcdef_bits.ttc$v_thai"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union ttcd 1ef { __struct {N unsigned ttc$v_reserved : 8; /* First byte is reserved */N unsigned ttc$v_kana : 1; /* Katakana */N unsigned ttc$v_kanji : 1; /* Kanji */N unsigned ttc$v_hanzi : 1; /* Hanzi */N unsigned ttc$v_hangul : 1; /* Hangul */N unsigned ttc$v_hanyu : 1; /* Hanyu */N 1 unsigned ttc$v_thai : 1; /* Thai */$ unsigned ttc$v_fill_45_ : 2; } ttc$r_ttcdef_bits; } ; #if !defined(__VAXC)7#define ttc$v_reserved ttc$r_ttcdef_bits.ttc$v_reserved/#define ttc$v_kana ttc$r_ttcdef_bits.ttc$v_kana1#define ttc$v_kanji ttc$r_ttcdef_bits.ttc$v_kanji1#define ttc$v_hanzi ttc$r_ttcdef_bits.ttc$v_hanzi3#define ttc$v_hangul ttc$r_ttcdef_bits.ttc$v_hangul1#define ttc$v_hanyu ttc$r_ttcdef_bits.ttc$v_hanyu/#defin1e ttc$v_thai ttc$r_ttcdef_bits.ttc$v_thai"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __TTCDEF_LOADED */ wwg/***************************** 1***************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $TTDEF ***/#ifndef __TTDEF_LOADED#define __TTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-AN1SI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_para1ms#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 N/* */N/* DEFINE TERMINAL SPECIAL SYMBOLS */N/* 1 */#define TT$C_BAUD_50 1#define TT$C_BAUD_75 2#define TT$C_BAUD_110 3#define TT$C_BAUD_134 4#define TT$C_BAUD_150 5#define TT$C_BAUD_300 6#define TT$C_BAUD_600 7#define TT$C_BAUD_1200 8#define TT$C_BAUD_1800 9#define TT$C_BAUD_2000 10#define TT$C_BAUD_2400 11#define TT$C_BAUD_3600 12#define TT$C_BAUD_4800 13#define TT$C_BAUD_7200 14#define TT$C_BAUD_9600 15#define TT$C_BAUD_19200 16#define TT$C_BAUD_38400 17#define TT$C_BAUD_ 157600 18#define TT$C_BAUD_76800 19#define TT$C_BAUD_115200 20N/* *** MATCHES DCDEF MACRO */#define TT$_UNKNOWN 0N#define TT$_VT05 1 /* VT05 */N#define TT$_VK100 2 /* strange terminals */#define TT$_VT173 3#define TT$_TQ_BTS 4#define TT$_TEK401X 10N#define TT$_FT1 16 /* FOREIGN TERMINAL TYPES */N#define TT$_FT2 17  1 /* new support also includes */N#define TT$_FT3 18 /* the negative numbers */#define TT$_FT4 19#define TT$_FT5 20#define TT$_FT6 21#define TT$_FT7 22N#define TT$_FT8 23 /* END OF FOREIGN TYPES */N/* RESERVE REST UP TO 32 FOR EXTENSIONS */#define TT$_LAX 32#define TT$_LA36 32#define TT$_LA120 33#define TT$_LA34 34#define TT$_LA38 35#define TT$_LA12 36#d 1efine TT$_LA100 37#define TT$_LA24 37#define TT$_LQP02 38#define TT$_LA84 39#define TT$_LA210 40#define TT$_LN03 41#define TT$_LN01K 42#define TT$_LA80 43#define TT$_VT5X 64#define TT$_VT52 64#define TT$_VT55 65N#define TT$_VT100 96 /* VT100 */#define TT$_VT101 97#define TT$_VT102 98#define TT$_VT105 99#define TT$_VT125 100#define TT$_VT131 101#define TT$_VT132 102#define TT$_VT80 103#define TT$_VT200_SERIES 1 110#define TT$_PRO_SERIES 111#define TT$_VT300_SERIES 112#define TT$_VT400_SERIES 113#define TT$_VT500_SERIES 114N/* from 128 on is reserved for foreign terminals and must not be */N/* used for terminal definitions */#define TT$M_PASSALL 0x1#define TT$M_NOECHO 0x2#define TT$M_NOTYPEAHD 0x4#define TT$M_ESCAPE 0x8#define TT$M_HOSTSYNC 0x10#define TT$M_TTSYNC 0x20#define TT$M_SCRIPT 0x40#define TT$M_LOWER 0x80#define TT$M 1_MECHTAB 0x100#define TT$M_WRAP 0x200#define TT$M_CRFILL 0x400#define TT$M_LFFILL 0x800#define TT$M_SCOPE 0x1000#define TT$M_REMOTE 0x2000#define TT$M_RESERVED 0x4000#define TT$M_EIGHTBIT 0x8000#define TT$M_MBXDSABL 0x10000#define TT$M_NOBRDCST 0x20000#define TT$M_READSYNC 0x40000#define TT$M_MECHFORM 0x80000#define TT$M_HALFDUP 0x100000#define TT$M_MODEM 0x200000#define TT$M_OPER 0x400000#define TT$M_PAGE 0xFF000000#define TT$M_ALTFRAME 0x10#define TT$M_ALT 1RPAR 0x20#define TT$M_PARITY 0x40#define TT$M_ODD 0x80#define TT$M_TWOSTOP 0x100#define TT$M_DISPARERR 0x200#define TT$M_ALTDISPAR 0x400#define TT$M_BREAK 0x800#define TT$M_DS_DTR 0x2#define TT$M_DS_SECTX 0x8#define TT$M_DS_RTS 0x10#define TT$M_DS_SECREC 0x8#define TT$M_DS_CTS 0x10#define TT$M_DS_CARRIER 0x20#define TT$M_DS_RING 0x40#define TT$M_DS_DSR 0x80 #ifdef __NEW_STARLETtypedef union _ttdef { __struct {" unsigned tt$v_passall : 1;! 1unsigned tt$v_noecho : 1;$ unsigned tt$v_notypeahd : 1;! unsigned tt$v_escape : 1;# unsigned tt$v_hostsync : 1;! unsigned tt$v_ttsync : 1;! unsigned tt$v_script : 1; unsigned tt$v_lower : 1;" unsigned tt$v_mechtab : 1; unsigned tt$v_wrap : 1;! unsigned tt$v_crfill : 1;! unsigned tt$v_lffill : 1; unsigned tt$v_scope : 1;! unsigned tt$v_remote : 1;# unsigned tt$v_reserved : 1;# un1signed tt$v_eightbit : 1;# unsigned tt$v_mbxdsabl : 1;# unsigned tt$v_nobrdcst : 1;# unsigned tt$v_readsync : 1;# unsigned tt$v_mechform : 1;" unsigned tt$v_halfdup : 1; unsigned tt$v_modem : 1; unsigned tt$v_oper : 1;$ unsigned ttdef$$_fill_1 : 1; unsigned tt$v_page : 8; } tt$r_ttdef_bits0; __struct {$ unsigned ttdef$$_fill_2 : 4;# unsigned tt$v_altframe : 1;" unsigned tt$v_altr1par : 1;! unsigned tt$v_parity : 1; unsigned tt$v_odd : 1;" unsigned tt$v_twostop : 1;$ unsigned tt$v_disparerr : 1;$ unsigned tt$v_altdispar : 1; unsigned tt$v_break : 1;# unsigned tt$v_fill_43_ : 4; } tt$r_ttdef_bits1; __struct {$ unsigned ttdef$$_fill_3 : 1;N unsigned tt$v_ds_dtr : 1; /*OUTPUT MODEM CONTROL */$ unsigned ttdef$$_fill_4 : 1;# unsigned tt$v_ds_sectx : 1;! 1 unsigned tt$v_ds_rts : 1;# unsigned tt$v_fill_44_ : 3; } tt$r_ttdef_bits2; __struct {$ unsigned ttdef$$_fill_5 : 3;$ unsigned tt$v_ds_secrec : 1;! unsigned tt$v_ds_cts : 1;% unsigned tt$v_ds_carrier : 1;" unsigned tt$v_ds_ring : 1;! unsigned tt$v_ds_dsr : 1; } tt$r_ttdef_bits3; } TTDEF; #if !defined(__VAXC)2#define tt$v_passall tt$r_ttdef_bits0.tt$v_passall0#define tt$v_noecho tt$r_ttdef_bits0.tt$ 1v_noecho6#define tt$v_notypeahd tt$r_ttdef_bits0.tt$v_notypeahd0#define tt$v_escape tt$r_ttdef_bits0.tt$v_escape4#define tt$v_hostsync tt$r_ttdef_bits0.tt$v_hostsync0#define tt$v_ttsync tt$r_ttdef_bits0.tt$v_ttsync0#define tt$v_script tt$r_ttdef_bits0.tt$v_script.#define tt$v_lower tt$r_ttdef_bits0.tt$v_lower2#define tt$v_mechtab tt$r_ttdef_bits0.tt$v_mechtab,#define tt$v_wrap tt$r_ttdef_bits0.tt$v_wrap0#define tt$v_crfill tt$r_ttdef_bits0.tt$v_crfill0#define tt$v_lffill tt$r_ttdef_bits0.tt$ 1v_lffill.#define tt$v_scope tt$r_ttdef_bits0.tt$v_scope0#define tt$v_remote tt$r_ttdef_bits0.tt$v_remote4#define tt$v_reserved tt$r_ttdef_bits0.tt$v_reserved4#define tt$v_eightbit tt$r_ttdef_bits0.tt$v_eightbit4#define tt$v_mbxdsabl tt$r_ttdef_bits0.tt$v_mbxdsabl4#define tt$v_nobrdcst tt$r_ttdef_bits0.tt$v_nobrdcst4#define tt$v_readsync tt$r_ttdef_bits0.tt$v_readsync4#define tt$v_mechform tt$r_ttdef_bits0.tt$v_mechform2#define tt$v_halfdup tt$r_ttdef_bits0.tt$v_halfdup.#define tt$v_modem tt$ 1r_ttdef_bits0.tt$v_modem,#define tt$v_oper tt$r_ttdef_bits0.tt$v_oper,#define tt$v_page tt$r_ttdef_bits0.tt$v_page4#define tt$v_altframe tt$r_ttdef_bits1.tt$v_altframe2#define tt$v_altrpar tt$r_ttdef_bits1.tt$v_altrpar0#define tt$v_parity tt$r_ttdef_bits1.tt$v_parity*#define tt$v_odd tt$r_ttdef_bits1.tt$v_odd2#define tt$v_twostop tt$r_ttdef_bits1.tt$v_twostop6#define tt$v_disparerr tt$r_ttdef_bits1.tt$v_disparerr6#define tt$v_altdispar tt$r_ttdef_bits1.tt$v_altdispar.#define tt$v_break tt$r_ 1ttdef_bits1.tt$v_break0#define tt$v_ds_dtr tt$r_ttdef_bits2.tt$v_ds_dtr4#define tt$v_ds_sectx tt$r_ttdef_bits2.tt$v_ds_sectx0#define tt$v_ds_rts tt$r_ttdef_bits2.tt$v_ds_rts6#define tt$v_ds_secrec tt$r_ttdef_bits3.tt$v_ds_secrec0#define tt$v_ds_cts tt$r_ttdef_bits3.tt$v_ds_cts8#define tt$v_ds_carrier tt$r_ttdef_bits3.tt$v_ds_carrier2#define tt$v_ds_ring tt$r_ttdef_bits3.tt$v_ds_ring0#define tt$v_ds_dsr tt$r_ttdef_bits3.tt$v_ds_dsr"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STA1RLET */ union ttdef { __struct {" unsigned tt$v_passall : 1;! unsigned tt$v_noecho : 1;$ unsigned tt$v_notypeahd : 1;! unsigned tt$v_escape : 1;# unsigned tt$v_hostsync : 1;! unsigned tt$v_ttsync : 1;! unsigned tt$v_script : 1; unsigned tt$v_lower : 1;" unsigned tt$v_mechtab : 1; unsigned tt$v_wrap : 1;! unsigned tt$v_crfill : 1;! unsigned tt$v_lffill : 1; unsigned tt$v_scope : 11;! unsigned tt$v_remote : 1;# unsigned tt$v_reserved : 1;# unsigned tt$v_eightbit : 1;# unsigned tt$v_mbxdsabl : 1;# unsigned tt$v_nobrdcst : 1;# unsigned tt$v_readsync : 1;# unsigned tt$v_mechform : 1;" unsigned tt$v_halfdup : 1; unsigned tt$v_modem : 1; unsigned tt$v_oper : 1;$ unsigned ttdef$$_fill_1 : 1; unsigned tt$v_page : 8; } tt$r_ttdef_bits0; __struct {$ unsign1ed ttdef$$_fill_2 : 4;# unsigned tt$v_altframe : 1;" unsigned tt$v_altrpar : 1;! unsigned tt$v_parity : 1; unsigned tt$v_odd : 1;" unsigned tt$v_twostop : 1;$ unsigned tt$v_disparerr : 1;$ unsigned tt$v_altdispar : 1; unsigned tt$v_break : 1;# unsigned tt$v_fill_43_ : 4; } tt$r_ttdef_bits1; __struct {$ unsigned ttdef$$_fill_3 : 1;N unsigned tt$v_ds_dtr : 1; /*OUTPUT MODEM CONTROL 1 */$ unsigned ttdef$$_fill_4 : 1;# unsigned tt$v_ds_sectx : 1;! unsigned tt$v_ds_rts : 1;# unsigned tt$v_fill_44_ : 3; } tt$r_ttdef_bits2; __struct {$ unsigned ttdef$$_fill_5 : 3;$ unsigned tt$v_ds_secrec : 1;! unsigned tt$v_ds_cts : 1;% unsigned tt$v_ds_carrier : 1;" unsigned tt$v_ds_ring : 1;! unsigned tt$v_ds_dsr : 1; } tt$r_ttdef_bits3; } ; #if !defined(__VAXC)2#define 1tt$v_passall tt$r_ttdef_bits0.tt$v_passall0#define tt$v_noecho tt$r_ttdef_bits0.tt$v_noecho6#define tt$v_notypeahd tt$r_ttdef_bits0.tt$v_notypeahd0#define tt$v_escape tt$r_ttdef_bits0.tt$v_escape4#define tt$v_hostsync tt$r_ttdef_bits0.tt$v_hostsync0#define tt$v_ttsync tt$r_ttdef_bits0.tt$v_ttsync0#define tt$v_script tt$r_ttdef_bits0.tt$v_script.#define tt$v_lower tt$r_ttdef_bits0.tt$v_lower2#define tt$v_mechtab tt$r_ttdef_bits0.tt$v_mechtab,#define tt$v_wrap tt$r_ttdef_bits0.tt$v_wrap0#defin 1e tt$v_crfill tt$r_ttdef_bits0.tt$v_crfill0#define tt$v_lffill tt$r_ttdef_bits0.tt$v_lffill.#define tt$v_scope tt$r_ttdef_bits0.tt$v_scope0#define tt$v_remote tt$r_ttdef_bits0.tt$v_remote4#define tt$v_reserved tt$r_ttdef_bits0.tt$v_reserved4#define tt$v_eightbit tt$r_ttdef_bits0.tt$v_eightbit4#define tt$v_mbxdsabl tt$r_ttdef_bits0.tt$v_mbxdsabl4#define tt$v_nobrdcst tt$r_ttdef_bits0.tt$v_nobrdcst4#define tt$v_readsync tt$r_ttdef_bits0.tt$v_readsync4#define tt$v_mechform tt$r_ttdef_bits0.tt$v_ 1mechform2#define tt$v_halfdup tt$r_ttdef_bits0.tt$v_halfdup.#define tt$v_modem tt$r_ttdef_bits0.tt$v_modem,#define tt$v_oper tt$r_ttdef_bits0.tt$v_oper,#define tt$v_page tt$r_ttdef_bits0.tt$v_page4#define tt$v_altframe tt$r_ttdef_bits1.tt$v_altframe2#define tt$v_altrpar tt$r_ttdef_bits1.tt$v_altrpar0#define tt$v_parity tt$r_ttdef_bits1.tt$v_parity*#define tt$v_odd tt$r_ttdef_bits1.tt$v_odd2#define tt$v_twostop tt$r_ttdef_bits1.tt$v_twostop6#define tt$v_disparerr tt$r_ttdef_bits1.tt$v_dispare 1rr6#define tt$v_altdispar tt$r_ttdef_bits1.tt$v_altdispar.#define tt$v_break tt$r_ttdef_bits1.tt$v_break0#define tt$v_ds_dtr tt$r_ttdef_bits2.tt$v_ds_dtr4#define tt$v_ds_sectx tt$r_ttdef_bits2.tt$v_ds_sectx0#define tt$v_ds_rts tt$r_ttdef_bits2.tt$v_ds_rts6#define tt$v_ds_secrec tt$r_ttdef_bits3.tt$v_ds_secrec0#define tt$v_ds_cts tt$r_ttdef_bits3.tt$v_ds_cts8#define tt$v_ds_carrier tt$r_ttdef_bits3.tt$v_ds_carrier2#define tt$v_ds_ring tt$r_ttdef_bits3.tt$v_ds_ring0#define tt$v_ds_dsr tt$r_ttd1ef_bits3.tt$v_ds_dsr"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #define TT$V_PASSALL 0x00#define TT$V_NOECHO 0x01#define TT$V_NOTYPEAHD 0x02#define TT$V_ESCAPE 0x03#define TT$V_HOSTSYNC 0x04#define TT$V_TTSYNC 0x05#define TT$V_SCRIPT 0x06#define TT$V_LOWER 0x07#define TT$V_MECHTAB 0x08#define TT$V_WRAP 0x09#define TT$V_CRFILL 0x0A#define TT$V_LFFILL 0x0B#define TT$V_SCOPE 0x0C#define TT1$V_REMOTE 0x0D#define TT$V_RESERVED 0x0E#define TT$V_EIGHTBIT 0x0F#define TT$V_MBXDSABL 0x10#define TT$V_NOBRDCST 0x11#define TT$V_READSYNC 0x12#define TT$V_MECHFORM 0x13#define TT$V_HALFDUP 0x14#define TT$V_MODEM 0x15#define TT$V_OPER 0x16#define TT$V_PAGE 0x18#define TT$V_ALTFRAME 0x04#define TT$V_ALTRPAR 0x05#define TT$V_PARITY 0x06#define TT$V_ODD 0x07#define TT$V_TWOSTOP 0x08#define TT$V_DISPARERR 0x09#defin 1e TT$V_ALTDISPAR 0x0A#define TT$V_BREAK 0x0B#define TT$V_DS_DTR 0x01#define TT$V_DS_SECTX 0x03#define TT$V_DS_RTS 0x04#define TT$V_DS_SECREC 0x03#define TT$V_DS_CTS 0x04#define TT$V_DS_CARRIER 0x05#define TT$V_DS_RING 0x06#define TT$V_DS_DSR 0x07 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required!1 ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __TTDEF_LOADED */ wwK]h/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//***************************************************************************************** "1***************************************//*** MODULE $TTYDPORTDEF ***/#ifndef __TTYDPORTDEF_LOADED#define __TTYDPORTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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#1 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 #define TTY$M_NO_A$1UTO_XON 0x1#define TTY$M_RESERVED 0xFE #define TTY$M_PARITY_ERROR 0x100&#define TTY$M_USE_WINDOW_CONSOLE 0x200(#define TTY$M_LOAD_INPUT_EXTENSION 0x400'#define TTY$M_IA64_POLLED_CONSOLE 0x800(#define TTY$M_IA64_CONSOLE_NOTIME 0x1000 #ifdef __NEW_STARLETtypedef union _ttydportdef { __struct {N unsigned tty$v_no_auto_xon : 1; /* Disable automatic Xon/Xoff */N unsigned tty$v_reserved : 7; /* Next 7 bits are reserved */N unsigned tty$v_parit %1y_error : 1; /* Drop parity error chars */N unsigned tty$v_use_window_console : 1; /* Console option */N unsigned tty$v_load_input_extension : 1; /* Console option */X unsigned tty$v_ia64_polled_console : 1; /* IA64 flag to force console to poll */\ unsigned tty$v_ia64_console_notime : 1; /* IA64 console disable output timer flag */$ unsigned tty$v_fill_46_ : 3;! } tty$r_ttydportdef_bits; } TTYDPORTDEF; #if !defined&1(__VAXC)B#define tty$v_no_auto_xon tty$r_ttydportdef_bits.tty$v_no_auto_xon<#define tty$v_reserved tty$r_ttydportdef_bits.tty$v_reservedD#define tty$v_parity_error tty$r_ttydportdef_bits.tty$v_parity_errorP#define tty$v_use_window_console tty$r_ttydportdef_bits.tty$v_use_window_consoleT#define tty$v_load_input_extension tty$r_ttydportdef_bits.tty$v_load_input_extensionR#define tty$v_ia64_polled_console tty$r_ttydportdef_bits.tty$v_ia64_polled_consoleR#define tty$v_ia64_console_notime tty$r_ttyd '1portdef_bits.tty$v_ia64_console_notime"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union ttydportdef { __struct {N unsigned tty$v_no_auto_xon : 1; /* Disable automatic Xon/Xoff */N unsigned tty$v_reserved : 7; /* Next 7 bits are reserved */N unsigned tty$v_parity_error : 1; /* Drop parity error chars */N unsigned tty$v_use_window_console : 1; /* Console option */N unsigned tty$v_load_input_ (1extension : 1; /* Console option */X unsigned tty$v_ia64_polled_console : 1; /* IA64 flag to force console to poll */\ unsigned tty$v_ia64_console_notime : 1; /* IA64 console disable output timer flag */$ unsigned tty$v_fill_46_ : 3;! } tty$r_ttydportdef_bits; } ; #if !defined(__VAXC)B#define tty$v_no_auto_xon tty$r_ttydportdef_bits.tty$v_no_auto_xon<#define tty$v_reserved tty$r_ttydportdef_bits.tty$v_reservedD#define tty$v_parity_error tty$r_tty )1dportdef_bits.tty$v_parity_errorP#define tty$v_use_window_console tty$r_ttydportdef_bits.tty$v_use_window_consoleT#define tty$v_load_input_extension tty$r_ttydportdef_bits.tty$v_load_input_extensionR#define tty$v_ia64_polled_console tty$r_ttydportdef_bits.tty$v_ia64_polled_consoleR#define tty$v_ia64_console_notime tty$r_ttydportdef_bits.tty$v_ia64_console_notime"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITI*1AL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard !#endif /* __TTYDPORTDEF_LOADED */ ww[h/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Sourc +1e: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $UAF070DEF ***/#ifndef __UAF070DEF_LOADED#define __UAF070DEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas ,1supported */\#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-1#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*++ */N/* User authorization file format */N/* Note: With the exception of the username and account name, */N/* all strings are blank padded counted strings. Username and */N/* account name are uncounted, blank padded. .1 */N/*-- */N#define UAF070$C_USER_ID 1 /* main user ID record */N#define UAF070$C_VERSION1 1 /* this version */N#define UAF070$C_KEYED_PART 52 /* ISAM keys come this far */O#define UAF070$C_MAX_PWD_LENGTH 32 /* maximum plaintext password length */O#define UAF070$K_MAX_PWD_LENGTH 32 /* maximum plaintext password le/1ngth */N#define UAF070$C_AD_II 0 /* AUTODIN-II 32 bit crc code */P#define UAF070$C_PURDY 1 /* Purdy polynomial over salted input */Y#define UAF070$C_PURDY_V 2 /* Purdy polynomial + variable length username */Q#define UAF070$C_PURDY_S 3 /* PURDY_V folded into password length */N#define UAF070$K_CURRENT_ALGORITHM 3 /* current DEC algorithm number */N#define UAF070$C_CURRENT_ALGORITHM 3 /* current DEC algorithm number */01'#define UAF070$C_PREFERED_ALGORITHM 127'#define UAF070$K_PREFERED_ALGORITHM 127U#define UAF070$C_PREFERRED_ALGORITHM 127 /* preferred hash algorithm - use current */U#define UAF070$K_PREFERRED_ALGORITHM 127 /* preferred hash algorithm - use current */N#define UAF070$C_CUST_ALGORITHM 128 /* customer algorithm division */N#define UAF070$K_CUST_ALGORITHM 128 /* customer algorithm division */N#define UAF070$K_FIXED 644 /* length of fixed portion */N#def 11ine UAF070$C_FIXED 644 /* length of fixed portion */#define UAF070$K_LENGTH 1412#define UAF070$C_LENGTH 1412Y#define UAF070$S_UAF070DEF 1412 /* Old size name, synonym for UAF070$S_UAF070 */ #ifdef __NEW_STARLETtypedef struct _uaf070 {N unsigned char uaf070$b_rtype; /* UAF070 record type */N unsigned char uaf070$b_version; /* UAF070 format version */V unsigned short int uaf070$w_usrdatoff; /* offset of counted st 21ring of user data */ __union {N char uaf070$t_username [32]; /* username */ __struct {& char uaf070$t_fill_0 [31];N char uaf070$t_username_tag; /* tag to differentiate records */ } uaf070$r_fill_48_; } uaf070$r_fill_47_; __union {N unsigned int uaf070$l_uic; /* user ID code */ __struct {N unsigned short int uaf070$w_mem; /* member subfield 31 */N unsigned short int uaf070$w_grp; /* group subfield */ } uaf070$r_fill_50_; } uaf070$r_fill_49_;N unsigned int uaf070$l_sub_id; /* user sub-identifier */R unsigned __int64 uaf070$q_parent_id; /* identifier of owner of this account */N char uaf070$t_account [32]; /* account name */N char uaf070$t_owner [32]; /* owner's name */N char uaf070$t_defd 41ev [32]; /* default device */N char uaf070$t_defdir [64]; /* default directory */N char uaf070$t_lgicmd [64]; /* login command file */N char uaf070$t_defcli [32]; /* default command interpreter */N char uaf070$t_clitables [32]; /* user CLI tables */ __union {N unsigned __int64 uaf070$q_pwd; /* hashed password */ __struct {N 51 unsigned int uaf070$l_pwd; /* 32 bit subfield */ } uaf070$r_fill_52_; } uaf070$r_fill_51_;N unsigned __int64 uaf070$q_pwd2; /* second password */N unsigned short int uaf070$w_logfails; /* count of login failures */N unsigned short int uaf070$w_salt; /* random password salt */N unsigned char uaf070$b_encrypt; /* primary password hash algorithm */N/* known hash algorithm indices 61 */O unsigned char uaf070$b_encrypt2; /* secondary password hash algorithm */N unsigned char uaf070$b_pwd_length; /* minimum password length */ char uaf070$$$_fill_1 [1];N unsigned __int64 uaf070$q_expiration; /* expiration date for account */N unsigned __int64 uaf070$q_pwd_lifetime; /* password lifetime */N unsigned __int64 uaf070$q_pwd_date; /* date of password change */N unsigned __int64 uaf070$q_pwd2_date; /* 71date of 2nd password change */O unsigned __int64 uaf070$q_lastlogin_i; /* date of last interactive login */S unsigned __int64 uaf070$q_lastlogin_n; /* date of last non-interactive login */N unsigned __int64 uaf070$q_priv; /* process privilege vector */N unsigned __int64 uaf070$q_def_priv; /* default process privileges */N __struct { /* minimum security class */" char uaf070$b_fill_2 [20]; } uaf070$r_min_cla 81ss;N __struct { /* maximum security class */" char uaf070$b_fill_3 [20]; } uaf070$r_max_class; __union {N unsigned int uaf070$l_flags; /* user flags longword */ __struct {N unsigned uaf070$v_disctly : 1; /* no user control-y */N unsigned uaf070$v_defcli : 1; /* only allow user default CLI */N unsigned uaf070$v_lockpwd : 1; /* disable SET PASSWORD command91 */Y unsigned uaf070$v_restricted : 1; /* restricted account (pre-V5.2 CAPTIVE) */N unsigned uaf070$v_disacnt : 1; /* no interactive login */N unsigned uaf070$v_diswelcom : 1; /* skip welcome message */N unsigned uaf070$v_dismail : 1; /* skip new mail message */N unsigned uaf070$v_nomail : 1; /* disable mail delivery */N unsigned uaf070$v_genpwd : 1; /* passwords must be generated */N :1 unsigned uaf070$v_pwd_expired : 1; /* password has expired */N unsigned uaf070$v_pwd2_expired : 1; /* 2nd password has expired */N unsigned uaf070$v_audit : 1; /* audit all actions */N unsigned uaf070$v_disreport : 1; /* skip last login messages */N unsigned uaf070$v_disreconnect : 1; /* inhibit reconnections */N unsigned uaf070$v_autologin : 1; /* auto-login only */[ unsigned uaf070$v_disf;1orce_pwd_change : 1; /* disable forced password change */O unsigned uaf070$v_captive : 1; /* captive account (no overrides) */T unsigned uaf070$v_disimage : 1; /* disable arbitrary image activation */U unsigned uaf070$v_dispwddic : 1; /* disable password dictionary search */R unsigned uaf070$v_dispwdhis : 1; /* disable password history search */R unsigned uaf070$v_defclsval : 1; /* default classification is valid */+ unsigned u<1af070$v_fill_57_ : 3; } uaf070$r_fill_54_; } uaf070$r_fill_53_;U unsigned char uaf070$b_network_access_p [3]; /* hourly network access, primary */W unsigned char uaf070$b_network_access_s [3]; /* hourly network access, secondary */Q unsigned char uaf070$b_batch_access_p [3]; /* hourly batch access, primary */S unsigned char uaf070$b_batch_access_s [3]; /* hourly batch access, secondary */Q unsigned char uaf070$b_local_access_p [3]; /* hourly local access,=1 primary */S unsigned char uaf070$b_local_access_s [3]; /* hourly local access, secondary */S unsigned char uaf070$b_dialup_access_p [3]; /* hourly dialup access, primary */U unsigned char uaf070$b_dialup_access_s [3]; /* hourly dialup access, secondary */S unsigned char uaf070$b_remote_access_p [3]; /* hourly remote access, primary */U unsigned char uaf070$b_remote_access_s [3]; /* hourly remote access, secondary */N char uaf070$$$_fill_4 [12]; /* space for 2 mor >1e access types */ __union {N unsigned char uaf070$b_primedays; /* bits representing primary days */ __struct {U unsigned uaf070$v_monday : 1; /* bit clear means this is a primary day */Q unsigned uaf070$v_tuesday : 1; /* bit set means this is an off day */, unsigned uaf070$v_wednesday : 1;+ unsigned uaf070$v_thursday : 1;) unsigned uaf070$v_friday : 1;+ unsigned uaf070$v_saturday : 1;) ?1unsigned uaf070$v_sunday : 1;+ unsigned uaf070$v_fill_58_ : 1; } uaf070$r_fill_56_; } uaf070$r_fill_55_; char uaf070$$$_fill_5 [1];N unsigned char uaf070$b_pri; /* base process priority */N unsigned char uaf070$b_quepri; /* maximum job queuing priority */N unsigned short int uaf070$w_maxjobs; /* maximum jobs for UIC allowed */N/* 0 means no limit */S unsigned@1 short int uaf070$w_maxacctjobs; /* maximum jobs for account allowed */N/* 0 means no limit */S unsigned short int uaf070$w_maxdetach; /* maximum detached processes for UIC */N/* 0 means no limit */N unsigned short int uaf070$w_prccnt; /* subprocess creation limit */N unsigned short int uaf070$w_biolm; /* buffered I/O limit */N unsigned short int uafA1070$w_diolm; /* direct I/O limit */N unsigned short int uaf070$w_tqcnt; /* timer queue entry limit */N unsigned short int uaf070$w_astlm; /* AST queue limit */N unsigned short int uaf070$w_enqlm; /* enqueue limit */N unsigned short int uaf070$w_fillm; /* open file limit */N unsigned short int uaf070$w_shrfillm; /* shared file limit */N unsigned int uaf070$l_wsquota; /* working sB1et size quota */N unsigned int uaf070$l_dfwscnt; /* default working set size */N unsigned int uaf070$l_wsextent; /* working set size limit */N unsigned int uaf070$l_pgflquota; /* page file quota */N unsigned int uaf070$l_cputim; /* CPU time quota */N unsigned int uaf070$l_bytlm; /* buffered I/O byte count limit */O unsigned int uaf070$l_pbytlm; /* paged buffer I/O byte count limit *C1/X unsigned int uaf070$l_jtquota; /* job-wide logical name table creation quota */Q unsigned short int uaf070$w_proxy_lim; /* number of proxies user can grant */N unsigned short int uaf070$w_proxies; /* number of proxies granted */Q unsigned short int uaf070$w_account_lim; /* number of sub-accounts allowed */N unsigned short int uaf070$w_accounts; /* number of sub-accounts in use */N __struct { /* default security class */" D1 char uaf070$b_fill_6 [20]; } uaf070$r_def_class;N char uaf070$$$_fill_99 [44]; /* spare space */N char uaf070$$$_fill_100 [768]; /* user-extensible area */ } UAF070; #if !defined(__VAXC)=#define uaf070$t_username uaf070$r_fill_47_.uaf070$t_usernameW#define uaf070$t_username_tag uaf070$r_fill_47_.uaf070$r_fill_48_.uaf070$t_username_tag3#define uaf070$l_uic uaf070$r_fill_49_.uaf070$l_uicE#define uaf070$w_mem uaf070$r_fiE1ll_49_.uaf070$r_fill_50_.uaf070$w_memE#define uaf070$w_grp uaf070$r_fill_49_.uaf070$r_fill_50_.uaf070$w_grp3#define uaf070$q_pwd uaf070$r_fill_51_.uaf070$q_pwdE#define uaf070$l_pwd uaf070$r_fill_51_.uaf070$r_fill_52_.uaf070$l_pwd7#define uaf070$l_flags uaf070$r_fill_53_.uaf070$l_flagsM#define uaf070$v_disctly uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disctlyK#define uaf070$v_defcli uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_defcliM#define uaf070$v_lockpwd uaf070$r_fill_53_.uaf070$r_F1fill_54_.uaf070$v_lockpwdS#define uaf070$v_restricted uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_restrictedM#define uaf070$v_disacnt uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disacntQ#define uaf070$v_diswelcom uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_diswelcomM#define uaf070$v_dismail uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_dismailK#define uaf070$v_nomail uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_nomailK#define uaf070$v_genpwd uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_gG1enpwdU#define uaf070$v_pwd_expired uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_pwd_expiredW#define uaf070$v_pwd2_expired uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_pwd2_expiredI#define uaf070$v_audit uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_auditQ#define uaf070$v_disreport uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disreportW#define uaf070$v_disreconnect uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disreconnectQ#define uaf070$v_autologin uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$H1v_autologine#define uaf070$v_disforce_pwd_change uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disforce_pwd_changeM#define uaf070$v_captive uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_captiveO#define uaf070$v_disimage uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disimageQ#define uaf070$v_dispwddic uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_dispwddicQ#define uaf070$v_dispwdhis uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_dispwdhisQ#define uaf070$v_defclsval uaf070$r_fill_53_.uaf070$r_fillI1_54_.uaf070$v_defclsval?#define uaf070$b_primedays uaf070$r_fill_55_.uaf070$b_primedaysK#define uaf070$v_monday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_mondayM#define uaf070$v_tuesday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_tuesdayQ#define uaf070$v_wednesday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_wednesdayO#define uaf070$v_thursday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_thursdayK#define uaf070$v_friday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_fridayO#define uaf0 J170$v_saturday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_saturdayK#define uaf070$v_sunday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_sunday"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _uaf070 {N unsigned char uaf070$b_rtype; /* UAF070 record type */N unsigned char uaf070$b_version; /* UAF070 format version */V unsigned short int uaf070$w_usrdatoff; /* offset of counted string of user data */ __union K1 {N char uaf070$t_username [32]; /* username */ __struct {& char uaf070$t_fill_0 [31];N char uaf070$t_username_tag; /* tag to differentiate records */ } uaf070$r_fill_48_; } uaf070$r_fill_47_; __union {N unsigned int uaf070$l_uic; /* user ID code */ __struct {N unsigned short int uaf070$w_mem; /* member subfield */N unsignL1ed short int uaf070$w_grp; /* group subfield */ } uaf070$r_fill_50_; } uaf070$r_fill_49_;N unsigned int uaf070$l_sub_id; /* user sub-identifier */R unsigned int uaf070$q_parent_id [2]; /* identifier of owner of this account */N char uaf070$t_account [32]; /* account name */N char uaf070$t_owner [32]; /* owner's name */N char uaf070$t_defdev [32]; /* default devic M1e */N char uaf070$t_defdir [64]; /* default directory */N char uaf070$t_lgicmd [64]; /* login command file */N char uaf070$t_defcli [32]; /* default command interpreter */N char uaf070$t_clitables [32]; /* user CLI tables */ __union {N unsigned int uaf070$q_pwd [2]; /* hashed password */ __struct {N unsigned int uaf070$l_pwd; /* 3 N12 bit subfield */ } uaf070$r_fill_52_; } uaf070$r_fill_51_;N unsigned int uaf070$q_pwd2 [2]; /* second password */N unsigned short int uaf070$w_logfails; /* count of login failures */N unsigned short int uaf070$w_salt; /* random password salt */N unsigned char uaf070$b_encrypt; /* primary password hash algorithm */N/* known hash algorithm indices */O unO1signed char uaf070$b_encrypt2; /* secondary password hash algorithm */N unsigned char uaf070$b_pwd_length; /* minimum password length */ char uaf070$$$_fill_1 [1];N unsigned int uaf070$q_expiration [2]; /* expiration date for account */N unsigned int uaf070$q_pwd_lifetime [2]; /* password lifetime */N unsigned int uaf070$q_pwd_date [2]; /* date of password change */N unsigned int uaf070$q_pwd2_date [2]; /* date of 2nd password change */P1O unsigned int uaf070$q_lastlogin_i [2]; /* date of last interactive login */S unsigned int uaf070$q_lastlogin_n [2]; /* date of last non-interactive login */N unsigned int uaf070$q_priv [2]; /* process privilege vector */N unsigned int uaf070$q_def_priv [2]; /* default process privileges */N __struct { /* minimum security class */" char uaf070$b_fill_2 [20]; } uaf070$r_min_class;N __struct { Q1 /* maximum security class */" char uaf070$b_fill_3 [20]; } uaf070$r_max_class; __union {N unsigned int uaf070$l_flags; /* user flags longword */ __struct {N unsigned uaf070$v_disctly : 1; /* no user control-y */N unsigned uaf070$v_defcli : 1; /* only allow user default CLI */N unsigned uaf070$v_lockpwd : 1; /* disable SET PASSWORD command */Y unsigned uaf070$R1v_restricted : 1; /* restricted account (pre-V5.2 CAPTIVE) */N unsigned uaf070$v_disacnt : 1; /* no interactive login */N unsigned uaf070$v_diswelcom : 1; /* skip welcome message */N unsigned uaf070$v_dismail : 1; /* skip new mail message */N unsigned uaf070$v_nomail : 1; /* disable mail delivery */N unsigned uaf070$v_genpwd : 1; /* passwords must be generated */N unsigned uaf070$v_pwd_expired S1: 1; /* password has expired */N unsigned uaf070$v_pwd2_expired : 1; /* 2nd password has expired */N unsigned uaf070$v_audit : 1; /* audit all actions */N unsigned uaf070$v_disreport : 1; /* skip last login messages */N unsigned uaf070$v_disreconnect : 1; /* inhibit reconnections */N unsigned uaf070$v_autologin : 1; /* auto-login only */[ unsigned uaf070$v_disforce_pwd_change : 1; /* disable foT1rced password change */O unsigned uaf070$v_captive : 1; /* captive account (no overrides) */T unsigned uaf070$v_disimage : 1; /* disable arbitrary image activation */U unsigned uaf070$v_dispwddic : 1; /* disable password dictionary search */R unsigned uaf070$v_dispwdhis : 1; /* disable password history search */R unsigned uaf070$v_defclsval : 1; /* default classification is valid */+ unsigned uaf070$v_fill_57_ : 3; U1 } uaf070$r_fill_54_; } uaf070$r_fill_53_;U unsigned char uaf070$b_network_access_p [3]; /* hourly network access, primary */W unsigned char uaf070$b_network_access_s [3]; /* hourly network access, secondary */Q unsigned char uaf070$b_batch_access_p [3]; /* hourly batch access, primary */S unsigned char uaf070$b_batch_access_s [3]; /* hourly batch access, secondary */Q unsigned char uaf070$b_local_access_p [3]; /* hourly local access, primary */S unsigned char uaV1f070$b_local_access_s [3]; /* hourly local access, secondary */S unsigned char uaf070$b_dialup_access_p [3]; /* hourly dialup access, primary */U unsigned char uaf070$b_dialup_access_s [3]; /* hourly dialup access, secondary */S unsigned char uaf070$b_remote_access_p [3]; /* hourly remote access, primary */U unsigned char uaf070$b_remote_access_s [3]; /* hourly remote access, secondary */N char uaf070$$$_fill_4 [12]; /* space for 2 more access types */ __union W1 {N unsigned char uaf070$b_primedays; /* bits representing primary days */ __struct {U unsigned uaf070$v_monday : 1; /* bit clear means this is a primary day */Q unsigned uaf070$v_tuesday : 1; /* bit set means this is an off day */, unsigned uaf070$v_wednesday : 1;+ unsigned uaf070$v_thursday : 1;) unsigned uaf070$v_friday : 1;+ unsigned uaf070$v_saturday : 1;) unsigned uaf070$v_sunday : 1;+ X1 unsigned uaf070$v_fill_58_ : 1; } uaf070$r_fill_56_; } uaf070$r_fill_55_; char uaf070$$$_fill_5 [1];N unsigned char uaf070$b_pri; /* base process priority */N unsigned char uaf070$b_quepri; /* maximum job queuing priority */N unsigned short int uaf070$w_maxjobs; /* maximum jobs for UIC allowed */N/* 0 means no limit */S unsigned short int uaf070$w_maxacctjobs; /Y1* maximum jobs for account allowed */N/* 0 means no limit */S unsigned short int uaf070$w_maxdetach; /* maximum detached processes for UIC */N/* 0 means no limit */N unsigned short int uaf070$w_prccnt; /* subprocess creation limit */N unsigned short int uaf070$w_biolm; /* buffered I/O limit */N unsigned short int uaf070$w_diolm; /* direct I/O limit Z1 */N unsigned short int uaf070$w_tqcnt; /* timer queue entry limit */N unsigned short int uaf070$w_astlm; /* AST queue limit */N unsigned short int uaf070$w_enqlm; /* enqueue limit */N unsigned short int uaf070$w_fillm; /* open file limit */N unsigned short int uaf070$w_shrfillm; /* shared file limit */N unsigned int uaf070$l_wsquota; /* working set size quota */N un[1signed int uaf070$l_dfwscnt; /* default working set size */N unsigned int uaf070$l_wsextent; /* working set size limit */N unsigned int uaf070$l_pgflquota; /* page file quota */N unsigned int uaf070$l_cputim; /* CPU time quota */N unsigned int uaf070$l_bytlm; /* buffered I/O byte count limit */O unsigned int uaf070$l_pbytlm; /* paged buffer I/O byte count limit */X unsigned int uaf070$l_jtqu\1ota; /* job-wide logical name table creation quota */Q unsigned short int uaf070$w_proxy_lim; /* number of proxies user can grant */N unsigned short int uaf070$w_proxies; /* number of proxies granted */Q unsigned short int uaf070$w_account_lim; /* number of sub-accounts allowed */N unsigned short int uaf070$w_accounts; /* number of sub-accounts in use */N __struct { /* default security class */" char uaf070$b_fill_6 [20]; ]1 } uaf070$r_def_class;N char uaf070$$$_fill_99 [44]; /* spare space */N char uaf070$$$_fill_100 [768]; /* user-extensible area */ } uaf070; #if !defined(__VAXC)=#define uaf070$t_username uaf070$r_fill_47_.uaf070$t_usernameW#define uaf070$t_username_tag uaf070$r_fill_47_.uaf070$r_fill_48_.uaf070$t_username_tag3#define uaf070$l_uic uaf070$r_fill_49_.uaf070$l_uicE#define uaf070$w_mem uaf070$r_fill_49_.uaf070$r_fill_50_.uaf070$w_ ^1memE#define uaf070$w_grp uaf070$r_fill_49_.uaf070$r_fill_50_.uaf070$w_grp3#define uaf070$q_pwd uaf070$r_fill_51_.uaf070$q_pwdE#define uaf070$l_pwd uaf070$r_fill_51_.uaf070$r_fill_52_.uaf070$l_pwd7#define uaf070$l_flags uaf070$r_fill_53_.uaf070$l_flagsM#define uaf070$v_disctly uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disctlyK#define uaf070$v_defcli uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_defcliM#define uaf070$v_lockpwd uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_lockpwdS#defin_1e uaf070$v_restricted uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_restrictedM#define uaf070$v_disacnt uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disacntQ#define uaf070$v_diswelcom uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_diswelcomM#define uaf070$v_dismail uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_dismailK#define uaf070$v_nomail uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_nomailK#define uaf070$v_genpwd uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_genpwdU#define uaf070$v_pwd_expir`1ed uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_pwd_expiredW#define uaf070$v_pwd2_expired uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_pwd2_expiredI#define uaf070$v_audit uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_auditQ#define uaf070$v_disreport uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disreportW#define uaf070$v_disreconnect uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disreconnectQ#define uaf070$v_autologin uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_autologine#define uaf070$v_disa1force_pwd_change uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disforce_pwd_changeM#define uaf070$v_captive uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_captiveO#define uaf070$v_disimage uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_disimageQ#define uaf070$v_dispwddic uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_dispwddicQ#define uaf070$v_dispwdhis uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_dispwdhisQ#define uaf070$v_defclsval uaf070$r_fill_53_.uaf070$r_fill_54_.uaf070$v_defclsval?#define b1uaf070$b_primedays uaf070$r_fill_55_.uaf070$b_primedaysK#define uaf070$v_monday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_mondayM#define uaf070$v_tuesday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_tuesdayQ#define uaf070$v_wednesday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_wednesdayO#define uaf070$v_thursday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_thursdayK#define uaf070$v_friday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_fridayO#define uaf070$v_saturday uaf070$r_fill_55_.uac1f070$r_fill_56_.uaf070$v_saturdayK#define uaf070$v_sunday uaf070$r_fill_55_.uaf070$r_fill_56_.uaf070$v_sunday"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __UAF070 d1DEF_LOADED */ wwh/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:49 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $UAIDEF ***/#ifndef __UAIDEF_LOADED#d e1efine __UAIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __unknf1own_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 N/*+ */N/* g1 */N/* Get User Authorization Information Data Identifier Definitions */N/* */N/* **** NOTE **** */N/* */N/* New items must always be added to the END of each item list */N/* so that users will not have to relink. h1 */N/* */N/*- */N#define UAI$_RTYPE 1 /* UAF record type */N#define UAI$_VERSION 2 /* UAF format version */S#define UAI$_USRDATOFF 3 /* offset of counted string of user data */N#define UAI$_USERNAME 4 /* username */N#define UAI$_Ui1SERNAME_TAG 5 /* tag to differentiate records */N#define UAI$_UIC 6 /* user ID code */N#define UAI$_MEM 7 /* member subfield */N#define UAI$_GRP 8 /* group subfield */N#define UAI$_SUB_ID 9 /* user sub-identifier */Q#define UAI$_PARENT_ID 10 /* identifier of owner of this account */N#define UAI$_ACCOUNT 11 j1 /* account name */N#define UAI$_OWNER 12 /* owner's name */N#define UAI$_DEFDEV 13 /* default device */N#define UAI$_DEFDIR 14 /* default directory */N#define UAI$_LGICMD 15 /* login command file */N#define UAI$_DEFCLI 16 /* default command interpreter */N#define UAI$_CLITABLES 17 /* user CLI tables k1 */N#define UAI$_PWD 18 /* hashed password */N#define UAI$_PWD2 19 /* second password */N#define UAI$_LOGFAILS 20 /* count of login failures */N#define UAI$_SALT 21 /* random password salt */N#define UAI$_ENCRYPT 22 /* primary password hash algorithm */O#define UAI$_ENCRYPT2 23 /* secondary password hash algorithm */N#definl1e UAI$_PWD_LENGTH 24 /* minimum password length */N#define UAI$_EXPIRATION 25 /* expiration date for account */N#define UAI$_PWD_LIFETIME 26 /* password lifetime */N#define UAI$_PWD_DATE 27 /* date of password change */N#define UAI$_PWD2_DATE 28 /* date of 2nd password change */N#define UAI$_LASTLOGIN_I 29 /* date of last interactive login */P#define UAI$_LASTLOGIN_N 30 m1 /* date of last non-interactive login */N#define UAI$_PRIV 31 /* process privilege vector */N#define UAI$_DEF_PRIV 32 /* default process privileges */N#define UAI$_MIN_CLASS 33 /* minimum security class */N#define UAI$_MAX_CLASS 34 /* maximum security class */N#define UAI$_FLAGS 35 /* user flags longword */N#define UAI$_NETWORK_ACCESS_P 36 /* hourly networn1k access, primary */N#define UAI$_NETWORK_ACCESS_S 37 /* hourly network access, secondary */N#define UAI$_BATCH_ACCESS_P 38 /* hourly batch access, primary */N#define UAI$_BATCH_ACCESS_S 39 /* hourly batch access, secondary */N#define UAI$_LOCAL_ACCESS_P 40 /* hourly local access, primary */N#define UAI$_LOCAL_ACCESS_S 41 /* hourly local access, secondary */N#define UAI$_DIALUP_ACCESS_P 42 /* hourly dialup access, primary */N#do1efine UAI$_DIALUP_ACCESS_S 43 /* hourly dialup access, secondary */N#define UAI$_REMOTE_ACCESS_P 44 /* hourly remote access, primary */N#define UAI$_REMOTE_ACCESS_S 45 /* hourly remote access, secondary */N#define UAI$_PRIMEDAYS 46 /* bits representing primary days */N#define UAI$_PRI 47 /* base process priority */N#define UAI$_QUEPRI 48 /* maximum job queuing priority */N#define UAI$_MAXJOBS 49 p1 /* maximum jobs for UIC allowed */N#define UAI$_MAXACCTJOBS 50 /* maximum jobs for account allowed */P#define UAI$_MAXDETACH 51 /* maximum detached processes for UIC */N#define UAI$_PRCCNT 52 /* subprocess creation limit */N#define UAI$_BIOLM 53 /* buffered I/O limit */N#define UAI$_DIOLM 54 /* direct I/O limit */N#define UAI$_TQCNT 55 /* timer queq1ue entry limit */N#define UAI$_ASTLM 56 /* AST queue limit */N#define UAI$_ENQLM 57 /* enqueue limit */N#define UAI$_FILLM 58 /* open file limit */N#define UAI$_SHRFILLM 59 /* shared file limit */N#define UAI$_WSQUOTA 60 /* working set size quota */N#define UAI$_DFWSCNT 61 /* default working set size */r1N#define UAI$_WSEXTENT 62 /* working set size limit */N#define UAI$_PGFLQUOTA 63 /* page file quota */N#define UAI$_CPUTIM 64 /* CPU time quota */N#define UAI$_BYTLM 65 /* buffered I/O byte count limit */O#define UAI$_PBYTLM 66 /* paged buffer I/O byte count limit */X#define UAI$_JTQUOTA 67 /* job-wide logical name table creation quota */N#define UAI$s1_PROXY_LIM 68 /* number of proxies user can grant */N#define UAI$_PROXIES 69 /* number of proxies granted */N#define UAI$_ACCOUNT_LIM 70 /* number of sub-accounts allowed */N#define UAI$_ACCOUNTS 71 /* number of sub-accounts in use */N#define UAI$_USER_DATA 72 /* user data area */N#define UAI$_PASSWORD 73 /* plaintext primary password */N#define UAI$_PASSWORD2 74 t1 /* plaintext secondary password */N#define UAI$_DEF_CLASS 75 /* default security classification */W#define UAI$_AUDIT_FLAGS 76 /* passed from $SETUAI to UAF$SECURITY_AUDIT */N/* ADD ITEM-CODES BEFORE THIS COMMENT */N#define UAI$_MAX_ITEM_CODE 77 /* maximum legal item code + 1 */N/* Add UAI$_DEFCHARGE_CODE as an alias for UAI$_ACCOUNT. */N#define UAI$_DEFCHARGE_CODE 11 /* default chau1rge code (=account) */N/* Define the various password hash algorithms. */N#define UAI$C_AD_II 0 /* AUTODIN-II 32 bit crc code */P#define UAI$C_PURDY 1 /* Purdy polynomial over salted input */Y#define UAI$C_PURDY_V 2 /* Purdy polynomial + variable length username */Q#define UAI$C_PURDY_S 3 /* PURDY_V folded into password length */$#define UAI$C_PREFERED_ALGORITHM 127T#define UAI$C_PREFERRED_ v1ALGORITHM 127 /* preferred hash algorithm - use current */N#define UAI$C_CUST_ALGORITHM 128 /* customer algorithm division */N#define UAI$C_MAX_PWD_LENGTH 32 /* maximum plaintext password */N/* Define the flags for the user flags longword. */#define UAI$M_DISCTLY 0x1#define UAI$M_DEFCLI 0x2#define UAI$M_LOCKPWD 0x4#define UAI$M_RESTRICTED 0x8#define UAI$M_DISACNT 0x10#define UAI$M_DISWELCOM 0x20#define UAI$M_DISMAIL 0x40#definw1e UAI$M_NOMAIL 0x80#define UAI$M_GENPWD 0x100#define UAI$M_PWD_EXPIRED 0x200 #define UAI$M_PWD2_EXPIRED 0x400#define UAI$M_AUDIT 0x800#define UAI$M_DISREPORT 0x1000!#define UAI$M_DISRECONNECT 0x2000#define UAI$M_AUTOLOGIN 0x4000(#define UAI$M_DISFORCE_PWD_CHANGE 0x8000#define UAI$M_CAPTIVE 0x10000#define UAI$M_DISIMAGE 0x20000#define UAI$M_DISPWDDIC 0x40000#define UAI$M_DISPWDHIS 0x80000 #define UAI$M_DEFCLSVAL 0x100000#define UAI$M_EXTAUTH 0x200000!#define UAI$M_MIGRAT x1EPWD 0x400000#define UAI$M_VMSAUTH 0x800000##define UAI$M_DISPWDSYNCH 0x1000000#define UAI$M_PWDMIX 0x2000000 #ifdef __NEW_STARLETNtypedef struct _flags { /* user flags longword */N unsigned uai$v_disctly : 1; /* no user control-y */N unsigned uai$v_defcli : 1; /* only allow user default CLI */N unsigned uai$v_lockpwd : 1; /* disable SET PASSWORD command */S unsigned uai$v_restricted : 1; /*y1 restricted account (pre-V5.2 CAPTIVE) */N unsigned uai$v_disacnt : 1; /* no interactive login */N unsigned uai$v_diswelcom : 1; /* skip welcome message */N unsigned uai$v_dismail : 1; /* skip new mail message */N unsigned uai$v_nomail : 1; /* disable mail delivery */N unsigned uai$v_genpwd : 1; /* passwords must be generated */N unsigned uai$v_pwd_expired : 1; /* password has expirez1d */N unsigned uai$v_pwd2_expired : 1; /* 2nd password has expired */N unsigned uai$v_audit : 1; /* audit all actions */N unsigned uai$v_disreport : 1; /* skip last login messages */N unsigned uai$v_disreconnect : 1; /* inhibit reconnections */N unsigned uai$v_autologin : 1; /* auto-login only */P unsigned uai$v_disforce_pwd_change : 1; /* disable forced password change */N un{1signed uai$v_captive : 1; /* captive account (no overrides) */P unsigned uai$v_disimage : 1; /* disable arbitrary image activation */P unsigned uai$v_dispwddic : 1; /* disable password dictionary filter */N unsigned uai$v_dispwdhis : 1; /* disable password history search */N unsigned uai$v_defclsval : 1; /* default classification is valid */N unsigned uai$v_extauth : 1; /* external authentication enabled */N unsigned uai$v_migratepw |1d : 1; /* migrate UAF pwd to external auth */N unsigned uai$v_vmsauth : 1; /* VMS alternative is allowed */N unsigned uai$v_dispwdsynch : 1; /* no ACME password sharing */N unsigned uai$v_pwdmix : 1; /* enable mixed-case passwords */ unsigned uai$v_fill_59_ : 6; } FLAGS;#else /* __OLD_STARLET */Nstruct flags { /* user flags longword */N unsigned uai$v_disctly : 1; /* no user con}1trol-y */N unsigned uai$v_defcli : 1; /* only allow user default CLI */N unsigned uai$v_lockpwd : 1; /* disable SET PASSWORD command */S unsigned uai$v_restricted : 1; /* restricted account (pre-V5.2 CAPTIVE) */N unsigned uai$v_disacnt : 1; /* no interactive login */N unsigned uai$v_diswelcom : 1; /* skip welcome message */N unsigned uai$v_dismail : 1; /* skip new mail message ~1 */N unsigned uai$v_nomail : 1; /* disable mail delivery */N unsigned uai$v_genpwd : 1; /* passwords must be generated */N unsigned uai$v_pwd_expired : 1; /* password has expired */N unsigned uai$v_pwd2_expired : 1; /* 2nd password has expired */N unsigned uai$v_audit : 1; /* audit all actions */N unsigned uai$v_disreport : 1; /* skip last login messages */N unsigned uai$v_d1isreconnect : 1; /* inhibit reconnections */N unsigned uai$v_autologin : 1; /* auto-login only */P unsigned uai$v_disforce_pwd_change : 1; /* disable forced password change */N unsigned uai$v_captive : 1; /* captive account (no overrides) */P unsigned uai$v_disimage : 1; /* disable arbitrary image activation */P unsigned uai$v_dispwddic : 1; /* disable password dictionary filter */N unsigned uai$v_dispwdhis : 1; 1/* disable password history search */N unsigned uai$v_defclsval : 1; /* default classification is valid */N unsigned uai$v_extauth : 1; /* external authentication enabled */N unsigned uai$v_migratepwd : 1; /* migrate UAF pwd to external auth */N unsigned uai$v_vmsauth : 1; /* VMS alternative is allowed */N unsigned uai$v_dispwdsynch : 1; /* no ACME password sharing */N unsigned uai$v_pwdmix : 1; /* enable mixed-case passw 1ords */ unsigned uai$v_fill_59_ : 6; } ;%#endif /* #ifdef __NEW_STARLET */N/* Define the flags representing primary days. */ #ifdef __NEW_STARLETNtypedef struct _primedays { /* bits representing primary days */S unsigned uai$v_monday : 1; /* bit clear means this is a primary day */N unsigned uai$v_tuesday : 1; /* bit set means this is an off day */! unsigned uai$v_wednesday : 1; unsigned uai$v_t 1hursday : 1; unsigned uai$v_friday : 1; unsigned uai$v_saturday : 1; unsigned uai$v_sunday : 1; unsigned uai$v_fill_60_ : 1; } PRIMEDAYS;#else /* __OLD_STARLET */Nstruct primedays { /* bits representing primary days */S unsigned uai$v_monday : 1; /* bit clear means this is a primary day */N unsigned uai$v_tuesday : 1; /* bit set means this is an off day */! unsigned uai$v_wednesday : 1; unsigned uai$v_thursday 1: 1; unsigned uai$v_friday : 1; unsigned uai$v_saturday : 1; unsigned uai$v_sunday : 1; unsigned uai$v_fill_60_ : 1; } ;%#endif /* #ifdef __NEW_STARLET */ #define UAI$V_DISCTLY 0#define UAI$V_DEFCLI 1#define UAI$V_LOCKPWD 2#define UAI$V_RESTRICTED 3#define UAI$V_DISACNT 4#define UAI$V_DISWELCOM 5#define UAI$V_DISMAIL 6#define UAI$V_NOMAIL 7#define UAI$V_GENPWD 8#define UAI$V_PWD_EXPIRED 9#define UAI$V_PWD2_EXPIRED 10#define UAI$V_AUDIT 111#define UAI$V_DISREPORT 12#define UAI$V_DISRECONNECT 13#define UAI$V_AUTOLOGIN 14$#define UAI$V_DISFORCE_PWD_CHANGE 15#define UAI$V_CAPTIVE 16#define UAI$V_DISIMAGE 17#define UAI$V_DISPWDDIC 18#define UAI$V_DISPWDHIS 19#define UAI$V_DEFCLSVAL 20#define UAI$V_EXTAUTH 21#define UAI$V_MIGRATEPWD 22#define UAI$V_VMSAUTH 23#define UAI$V_DISPWDSYNCH 24#define UAI$V_PWDMIX 25#define UAI$V_MONDAY 0#define UAI$V_TUESDAY 1#define UAI$V_WEDNESDAY 2#define UAI$V_THURSDAY1 3#define UAI$V_FRIDAY 4#define UAI$V_SATURDAY 5#define UAI$V_SUNDAY 6 $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __UAIDEF_LOADED */ wwGi/*************************************************************************** 1*****************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $UICDEF ***/#ifndef __UICDEF_LOADED#define __UICDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member1_alignment __save#pragma __nomember_alignmentR#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 ...#endif1 #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 N/*+ */N/* */N/* Format of UIC - user identification code. May be either two part */N/* group1 / member identifier, or a single uniform identifier. */N/* */N/* The binary layout of the id space is as follows: */N/* */N/* ---------- Bit -------- */J/* 31 30 29 28 27 26 Description */J/* === === === === === === ==========1============================== */N/* */J/* 0 0 - - - - UIC form (group/member) */J/* 0 1 - - - - Unused */J/* 1 0 - - - - Identifier form */J/* 1 0 0 0 - - System identifiers */J/* 1 0 0 1 - - Facility-specific identifiers */J/* 1 1 0 1 0 - - Arbitrary assignment identifiers */J/* 1 0 1 0 0 0 SEVMS identifier space */J/* 1 0 1 0 0 1 Unused */J/* 1 0 1 0 1 0 Unused */J/* 1 0 1 0 1 1 Unused */J/* 1 0 1 1 - - Unused */J/* 1 1 - - - - Unused 1 */N/*- */N#define UIC$K_MAX_UIC 1073741823 /* Highest possible UIC */N#define UIC$K_WILD_MEMBER 65535 /* Code for wild card member */N#define UIC$K_WILD_GROUP 16383 /* Code for wild card group */N#define UIC$K_UIC_FORMAT 0 /* UIC format code */N#define UIC$K_ID_FORMAT 2 /* ID format code */N#define 1UIC$K_TYPE_SYSTEM 8 /* system ID or UIC */N#define UIC$K_TYPE_FACILITY 9 /* facility ID or UIC */N#define UIC$K_TYPE_ARBITRARY 10 /* arbitrary assignment space */N#define UIC$K_FIRST_ID -2147418112 /* First general identifier */N#define UIC$K_LAST_ID -1879048193 /* Last general identifier */N#define UIC$K_MATCH_ALL -1 /* Match all identifiers */N#define UIC$K_ASSIGN_SEVMS 0 1 /* SEVMS block of identifier space */ #ifdef __NEW_STARLETtypedef union _uicdef { __union {N unsigned int uic$l_uic; /* Full longword */ __struct {N unsigned short int uic$w_mem; /* Member number */N unsigned short int uic$w_grp; /* Group number */ } uic$r_fill_62_; } uic$r_fill_61_;N __struct { /* Group / member format 1 */N unsigned uic$v_member : 16; /* Member number */N unsigned uic$v_group : 14; /* Group number */N unsigned uic$v_format : 2; /* Format code */ } uic$r_uic_form;N __struct { /* General identifier format */N unsigned uic$v_id_code : 28; /* ID code */N unsigned uic$v_id_type : 4; /* ID type 1 */ } uic$r_id_form;N __struct { /* Facility identifier format */N unsigned uic$v_fac_id_code : 16; /* ID code */N unsigned uic$v_facility : 12; /* Facility code */N unsigned uic$v_fill_1 : 4; /* space for ID type code */ } uic$r_fac_id_form;N __struct { /* Arbitrary assignment format */N unsigned uic$v_arb_id_code : 2 16; /* ID code */N unsigned uic$v_assign_code : 2; /* Assignment code */N 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_uic9#define uic$w_mem uic$r_fill_61_.uic$r_fill_62_.uic$w_mem9#define uic$w_grp uic$r_fill_61_.uic$r_fill_62_.uic$w_grp0#define uic$v_member uic$r_uic_form.uic$v_member.#define uic$ 1v_group uic$r_uic_form.uic$v_group0#define uic$v_format uic$r_uic_form.uic$v_format1#define uic$v_id_code uic$r_id_form.uic$v_id_code1#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_code7#define uic$v_facility uic$r_fac_id_form.uic$v_facilityC#define uic$v_arb_id_code uic$r_arbitrary_id_form.uic$v_arb_id_codeC#define uic$v_assign_code uic$r_arbitrary_id_form.uic$v_assign_code"#endif /* #if !defined(__VAXC) */ #else /* _ 1_OLD_STARLET */union uicdef { __union {N unsigned int uic$l_uic; /* Full longword */ __struct {N unsigned short int uic$w_mem; /* Member number */N unsigned short int uic$w_grp; /* Group number */ } uic$r_fill_62_; } uic$r_fill_61_;N __struct { /* Group / member format */N unsigned uic$v_member : 16; /* Member numb 1er */N unsigned uic$v_group : 14; /* Group number */N unsigned uic$v_format : 2; /* Format code */ } uic$r_uic_form;N __struct { /* General identifier format */N unsigned uic$v_id_code : 28; /* ID code */N unsigned uic$v_id_type : 4; /* ID type */ } uic$r_id_form;N __struct { 1 /* Facility identifier format */N unsigned uic$v_fac_id_code : 16; /* ID code */N unsigned uic$v_facility : 12; /* Facility code */N unsigned uic$v_fill_1 : 4; /* space for ID type code */ } uic$r_fac_id_form;N __struct { /* Arbitrary assignment format */N unsigned uic$v_arb_id_code : 26; /* ID code */N unsigned uic$v 1_assign_code : 2; /* Assignment code */N 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_uic9#define uic$w_mem uic$r_fill_61_.uic$r_fill_62_.uic$w_mem9#define uic$w_grp uic$r_fill_61_.uic$r_fill_62_.uic$w_grp0#define uic$v_member uic$r_uic_form.uic$v_member.#define uic$v_group uic$r_uic_form.uic$v_group0#define uic$v_format uic$r_uic_for 1m.uic$v_format1#define uic$v_id_code uic$r_id_form.uic$v_id_code1#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_code7#define uic$v_facility uic$r_fac_id_form.uic$v_facilityC#define uic$v_arb_id_code uic$r_arbitrary_id_form.uic$v_arb_id_codeC#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 __restoreR#i1fdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __UICDEF_LOADED */ ww˕i/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* 1 Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $UIDDEF ***/#ifndef __UIDDEF_LOADED#define __UIDDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas su1pported */\#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#endif1#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N#define UID$K_ARCHVERSION 1 /* Current architecture version */N#define UID$K_APOLLO1 0 /* UID format types */#define UID$K_APOLLO2 1#define UID$K_DIGITAL 2#define UID$K_MICROSOFT 3N#define UID$K_LENGTH 16 /* Total structure length */ #ifdef __NEW_STARLETtypedef struct _uiddef { 1 __union {N unsigned __int64 uid$q_timeandversion; /* Time and version */ __struct {N unsigned int uid$l_timelow; /* Low order 32 bits of time */P unsigned short int uid$w_timemid; /* Middle order 16 bits of time */ __union {_ unsigned short int uid$w_timehiandversion; /* High order 12 bits of time and */ __struct {N/* 4 bits of version 1 */P unsigned uid$v_timehi : 12; /* High order 12 bits of time */N unsigned uid$v_version : 4; /* 4 bits of version */% } uid$r_fill_66_;! } uid$r_fill_65_; } uid$r_fill_64_; } uid$r_fill_63_; __union {W unsigned short int uid$w_clockseqandreserved; /* Clock sequence and reserved */ __struct { __union {d unsigned char uid$b_clockseqhian 1dreserved; /* High order 6 bits of clock sequence */ __struct {N/* and 2 reserved bits */\ unsigned uid$v_clockseqhi : 6; /* High order 6 bits of clock sequence */N unsigned uid$v_reserved : 2; /* 2 bits of reserved */% } uid$r_fill_70_;! } uid$r_fill_69_;U unsigned char uid$b_clockseqlow; /* Low order 8 bits of clock sequence */ 1 } uid$r_fill_68_; } uid$r_fill_67_; __union {% unsigned char uid$b_node [6]; __struct {T unsigned short int uid$w_nodehi; /* High order 16 bits of node number */N unsigned int uid$l_nodelow; /* Low order 32 bits of node number */ } uid$r_fill_72_; } uid$r_fill_71_; } UIDDEF; #if !defined(__VAXC)@#define uid$q_timeandversion uid$r_fill_63_.uid$q_timeandversionA#define uid$l_timelow uid$r_fill_63_.u1id$r_fill_64_.uid$l_timelowA#define uid$w_timemid uid$r_fill_63_.uid$r_fill_64_.uid$w_timemidb#define uid$w_timehiandversion uid$r_fill_63_.uid$r_fill_64_.uid$r_fill_65_.uid$w_timehiandversion]#define uid$v_timehi uid$r_fill_63_.uid$r_fill_64_.uid$r_fill_65_.uid$r_fill_66_.uid$v_timehi_#define uid$v_version uid$r_fill_63_.uid$r_fill_64_.uid$r_fill_65_.uid$r_fill_66_.uid$v_versionJ#define uid$w_clockseqandreserved uid$r_fill_67_.uid$w_clockseqandreservedl#define uid$b_clockseqhiandreserved ui1d$r_fill_67_.uid$r_fill_68_.uid$r_fill_69_.uid$b_clockseqhiandreservede#define uid$v_clockseqhi uid$r_fill_67_.uid$r_fill_68_.uid$r_fill_69_.uid$r_fill_70_.uid$v_clockseqhia#define uid$v_reserved uid$r_fill_67_.uid$r_fill_68_.uid$r_fill_69_.uid$r_fill_70_.uid$v_reservedI#define uid$b_clockseqlow uid$r_fill_67_.uid$r_fill_68_.uid$b_clockseqlow,#define uid$b_node uid$r_fill_71_.uid$b_node?#define uid$w_nodehi uid$r_fill_71_.uid$r_fill_72_.uid$w_nodehiA#define uid$l_nodelow uid$r_fill_71_.uid$r 1_fill_72_.uid$l_nodelow"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct uiddef { __union {N unsigned int uid$q_timeandversion [2]; /* Time and version */ __struct {N unsigned int uid$l_timelow; /* Low order 32 bits of time */P unsigned short int uid$w_timemid; /* Middle order 16 bits of time */ __union {_ unsigned short int uid$w_timehiandversion; /* High order 12 bits of ti 1me and */ __struct {N/* 4 bits of version */P unsigned uid$v_timehi : 12; /* High order 12 bits of time */N unsigned uid$v_version : 4; /* 4 bits of version */% } uid$r_fill_66_;! } uid$r_fill_65_; } uid$r_fill_64_; } uid$r_fill_63_; __union {W unsigned short int uid$w_clockseqandreserved; /* Clock sequenc 1e and reserved */ __struct { __union {d unsigned char uid$b_clockseqhiandreserved; /* High order 6 bits of clock sequence */ __struct {N/* and 2 reserved bits */\ unsigned uid$v_clockseqhi : 6; /* High order 6 bits of clock sequence */N unsigned uid$v_reserved : 2; /* 2 bits of reserved */% } uid$r_fill_70_;! 1 } uid$r_fill_69_;U unsigned char uid$b_clockseqlow; /* Low order 8 bits of clock sequence */ } uid$r_fill_68_; } uid$r_fill_67_; __union {% unsigned char uid$b_node [6]; __struct {T unsigned short int uid$w_nodehi; /* High order 16 bits of node number */N unsigned int uid$l_nodelow; /* Low order 32 bits of node number */ } uid$r_fill_72_; } uid$r_fill_71_; } ; #if !defined(__VAX1C)@#define uid$q_timeandversion uid$r_fill_63_.uid$q_timeandversionA#define uid$l_timelow uid$r_fill_63_.uid$r_fill_64_.uid$l_timelowA#define uid$w_timemid uid$r_fill_63_.uid$r_fill_64_.uid$w_timemidb#define uid$w_timehiandversion uid$r_fill_63_.uid$r_fill_64_.uid$r_fill_65_.uid$w_timehiandversion]#define uid$v_timehi uid$r_fill_63_.uid$r_fill_64_.uid$r_fill_65_.uid$r_fill_66_.uid$v_timehi_#define uid$v_version uid$r_fill_63_.uid$r_fill_64_.uid$r_fill_65_.uid$r_fill_66_.uid$v_versionJ#defin1e uid$w_clockseqandreserved uid$r_fill_67_.uid$w_clockseqandreservedl#define uid$b_clockseqhiandreserved uid$r_fill_67_.uid$r_fill_68_.uid$r_fill_69_.uid$b_clockseqhiandreservede#define uid$v_clockseqhi uid$r_fill_67_.uid$r_fill_68_.uid$r_fill_69_.uid$r_fill_70_.uid$v_clockseqhia#define uid$v_reserved uid$r_fill_67_.uid$r_fill_68_.uid$r_fill_69_.uid$r_fill_70_.uid$v_reservedI#define uid$b_clockseqlow uid$r_fill_67_.uid$r_fill_68_.uid$b_clockseqlow,#define uid$b_node uid$r_fill_71_.uid$b_node?1#define uid$w_nodehi uid$r_fill_71_.uid$r_fill_72_.uid$w_nodehiA#define uid$l_nodelow uid$r_fill_71_.uid$r_fill_72_.uid$l_nodelow"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard 1#endif /* __UIDDEF_LOADED */ wwi/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $USGDEF ***/#ifndef __US 1GDEF_LOADED#define __USGDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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" {1#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 N/*+ */N/* Disk usage accounting file pr 1oduced by ANALYZE/DISK_STRUCTURE utility. */N/*- */N#define USG$K_IDENT 1 /* Identification record */N#define USG$K_FILE 2 /* File record */N#define USG$K_IDENT_LEN 61 /* Length of IDENT record */N#define USG$C_IDENT_LEN 61 /* Length of IDENT record */ #ifdef __NEW_STARLETtypedef struct _usgdef {N un1signed char usg$b_type; /* Record type */N unsigned int usg$l_serialnum; /* Pack serial number */N char usg$t_strucname [12]; /* Volume set name */N char usg$t_volname [12]; /* Volume name */N char usg$t_ownername [12]; /* Volume owner name */N char usg$t_format [12]; /* Volume format type */N/* *** Preceding same as home bl 1ock *** */N unsigned __int64 usg$q_time; /* Time usage file created */ } USGDEF;#else /* __OLD_STARLET */struct usgdef {N unsigned char usg$b_type; /* Record type */N unsigned int usg$l_serialnum; /* Pack serial number */N char usg$t_strucname [12]; /* Volume set name */N char usg$t_volname [12]; /* Volume name 1 */N char usg$t_ownername [12]; /* Volume owner name */N char usg$t_format [12]; /* Volume format type */N/* *** Preceding same as home block *** */N unsigned int usg$q_time [2]; /* Time usage file created */ } ;%#endif /* #ifdef __NEW_STARLET */N#define USG$K_FILE_LEN 423 /* Maximum length of FILE record */N#define USG$C_FILE_LEN 423 /* Maxim 1um length of FILE record */ #ifdef __NEW_STARLETtypedef struct _usgdef1 { char usgdef$$_fill_1; __union {N unsigned int usg$l_fileowner; /* File owner UIC */ __struct {N unsigned short int usg$w_uicmember; /* UIC member number */N unsigned short int usg$w_uicgroup; /* UIC group number */% } usg$r_fileowner_fields;" } usg$r_fileowner_overlay;R unsigned int usg$l_allocated; 1 /* Blocks allocated, including headers */N unsigned int usg$l_used; /* Blocks used */N unsigned short int usg$w_dir_len; /* Length of directory string */T unsigned short int usg$w_spec_len; /* Length of complete file specification */N char usg$t_filespec [406]; /* File spec "[dir]nam.typ;ver" */ } USGDEF1; #if !defined(__VAXC)?#define usg$l_fileowner usg$r_fileowner_overlay.usg$l_fileownerV#define usg$w_uicmember us 1g$r_fileowner_overlay.usg$r_fileowner_fields.usg$w_uicmemberT#define usg$w_uicgroup usg$r_fileowner_overlay.usg$r_fileowner_fields.usg$w_uicgroup"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct usgdef1 { char usgdef$$_fill_1; __union {N unsigned int usg$l_fileowner; /* File owner UIC */ __struct {N unsigned short int usg$w_uicmember; /* UIC member number */N unsigned short int usg$w_uicgr1oup; /* UIC group number */% } usg$r_fileowner_fields;" } usg$r_fileowner_overlay;R unsigned int usg$l_allocated; /* Blocks allocated, including headers */N unsigned int usg$l_used; /* Blocks used */N unsigned short int usg$w_dir_len; /* Length of directory string */T unsigned short int usg$w_spec_len; /* Length of complete file specification */N char usg$t_filespec [406]; /* File spec "[dir]nam1.typ;ver" */ } ; #if !defined(__VAXC)?#define usg$l_fileowner usg$r_fileowner_overlay.usg$l_fileownerV#define usg$w_uicmember usg$r_fileowner_overlay.usg$r_fileowner_fields.usg$w_uicmemberT#define usg$w_uicgroup usg$r_fileowner_overlay.usg$r_fileowner_fields.usg$w_uicgroup"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragm1a __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __USGDEF_LOADED */ ww 2j/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********* 1***********************************************************************************************************************//*** MODULE $USRIDEF ***/#ifndef __USRIDEF_LOADED#define __USRIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined re1quired 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#d1efine __union variant_union#endif#endif N/* */N/* User image bit definitions */N/* */N/* */#define USRI$M_DBG_MAPPED 0x1 #ifdef __NEW_STARLETtypedef union _usridef { __struct {N unsigned usri$v_dbg_mapped1 : 1; /* Debugger is now mapped */% unsigned usri$v_fill_73_ : 7; } usri$r_usri_bits; } USRIDEF; #if !defined(__VAXC)<#define usri$v_dbg_mapped usri$r_usri_bits.usri$v_dbg_mapped"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union usridef { __struct {N unsigned usri$v_dbg_mapped : 1; /* Debugger is now mapped */% unsigned usri$v_fill_73_ : 7; } usri$r_usri_bits; } ; #if !defined(_1_VAXC)<#define usri$v_dbg_mapped usri$r_usri_bits.usri$v_dbg_mapped"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __USRIDEF_LOADED */ wwYj/* 1*******************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:47 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFAE.SDI;1 *//********************************************************************************************************************************//*** MODULE $UTCBLKDEF ***/#ifndef __UTCBLKDEF_LOADED#define __UTCBLKDEF_LOADED 1 G#pragma 1__nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_par1ams ...#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 N/*+ */N/* */N/* $UT 1CBLKDEF defines the STARLET structure for UTC based times. */N/* */N/*- */  #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _utcblk {#pragma __nomember_alignme1ntN __int64 utcblk$o_time_block [2]; /* Double quad for entire time */ } UTCBLK;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _utcblk {#pragma __nomember_alignmentN int utcblk$o_time_block [2] [2]; /* Double quad for entire time */ } utcblk;%#endif /* #ifdef __NEW_STARL 1ET */ )#if defined (__ALPHA) || defined (__ia64)# ifdef __INITIAL_POINTER_SIZEM# pragma __required_pointer_size __save /* Save current pointer size */G# pragma __required_pointer_size 64 /* Pointers are 64-bits */L typedef struct _utcblk * UTCBLK_PQ; /* 64-bit pointer to struct */O typedef struct _utcblk ** UTCBLK_PPQ; /* 64-bit ptr to ptr to struct */O# pragma __required_pointer_size __restore /* Return to previous ptr size */# elseB typed1ef unsigned __int64 UTCBLK_PQ; /* Size = 64-bit ptr */K typedef unsigned __int64 UTCBLK_PPQ; /* Size = 64-bit ptr to a ptr */# endif#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __UTCBLKDEF_LOADED */ ww;1j/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:51 by OpenVMS SDL EV3-3 */Q/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]UTIL$ROUTINES.SDI;1 *//********************************************************************************************************************************/+/*** MODULE util$routines IDENT X01-02 ***/#ifndef __UTIL_ROUTINES_LOADED #define 1__UTIL_ROUTINES_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __unkn1own_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 P/**************************************************************************** *//* * */'/* COPYRIGHT (c) 1998 B 1Y * */D/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */&/* ALL RIGHTS RESERVED. * *//* * */P/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */P/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */P/* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */P/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */Q/* OTHER PERSON. NO TITLE 1TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */&/* TRANSFERRED. * *//* * */P/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */P/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * *//* CORPORATION. * *//* * */P/* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */E/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * *//* 1 * *//* * */P/**************************************************************************** */N/* */N/* UTIL$CQUAL_FILE_PARSE */N/* */5#define util$cqual_file_parse UTIL$CQUAL_FILE_PARSE #ifdef __NEW_STARLET#unsigned int util$cqual_file_parse( unsigned int *flags, unsigned 1int *context, __optional_params );#else /* __OLD_STARLET */5unsigned int util$cqual_file_parse(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* UTIL$CQUAL_FILE_MATCH */N/* */5#define util$cqual_file_match UTIL$CQUAL_FILE_MATCH #ifdef __NEW_STARLET#unsigned int util$cqua1l_file_match( unsigned int *context, __optional_params );#else /* __OLD_STARLET */5unsigned int util$cqual_file_match(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* UTIL$CQUAL_FILE_END */N/* */1#define util$cqual_file_end UTIL$CQUAL_FILE_END #ifdef __NEW_STARLET! 1unsigned int util$cqual_file_end( unsigned int *context);#else /* __OLD_STARLET */3unsigned int util$cqual_file_end(__unknown_params);!#endif /* #ifdef __NEW_STARLET */N/* */N/* UTIL$CQUAL_CONFIRM_ACT */N/* */7#define util$cqual_confirm_act UTIL$CQUAL_CONFIRM_ACT #ifdef __NEW_STARLET$un1signed int util$cqual_confirm_act( __optional_params );#else /* __OLD_STARLET */6unsigned int util$cqual_confirm_act(__unknown_params);!#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard ##endif /* __UTIL_ROUTINES_LOAD1ED */ wwKj/*B// Note: This header is use by both the CC compiler and the IA64 B// assembler (via the CC preprocessor which creates the &// IA64 assembler source file).//B// The CC portion of this header starts at the comment line"// 'CC header begins here'.//P// -----------------------------------------------------------------------------*/#ifdef IAS_ASSEMBLER(/* IA64 assembler header begins here *//* */P/* ********1***************************************************************** */P/* * * */P/* * Copyright 2012, Hewlett-Packard Development Company, L.P. * */P/* * * */P/* * Confidential computer software. Valid license from HP and/or * */P/* * its subsidiaries required for possession, use, or copying. * */P/* * 1 * */P/* * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, * */P/* * Computer Software Documentation, and Technical Data for Commercial * */P/* * Items are licensed to the U.S. Government under vendor's standard * */P/* * commercial license. * */P/* * * */P/* * Neither HP nor any of its subsidia1ries shall be liable for technical * */P/* * or editorial errors or omissions contained herein. The information * */P/* * in this document is provided "as is" without warranty of any kind and * */P/* * is subject to change without notice. The warranties for HP products * */P/* * are set forth in the express limited warranty statements accompanying * */P/* * such products. Nothing herein should be construed as constituting an * */P/* * additional warranty. 1 * */P/* * * */P/* ************************************************************************* *//* ******************************************************************************************************************************** */@/* Created: 5-Apr-2012 13:00:58 by OpenVMS SDL EV3-3 */L/* Source: 26-MAR-2003 10:42:00 $1$DGA7304:[STARLET_H.SRC]VADEF.SDL;1 *//* ****************************1**************************************************************************************************** */  /* .MACRO $VADEF,$GBL */ /* $DEFINI VA,$GBL *//* + *//* VIRTUAL ADDRESS VIELDS *//* - */#define VA$M_P1 0x40000000#define VA$M_SYSTEM 0x80000000$#define VA$M_BYTES_PER_PAGELET 0x1FF"#define VA$M_BYTE_IN_PAGELET 0x1FF##define VA$M_VRN 0xE000000000000000D#define VA$C_VRN_SYSTEM 7 /* VRN for system space */C#define VA$C_REGION_COUNT 8 /* Number of v 1irtual regions */$#define VA$M_VRNX 0xF000000000000000>#define VA$C_VRNX_SYSTEM 15 /* VRNX for system space */P#define VA$C_VRNX_COUNT 16 /* Number of virtual address spaces */#define VA$S_VADEF 8#define VA$C_PAGELET_SIZE 512!#define VA$C_PAGELET_SHIFT_SIZE 9#define VA$S_VA 8#define VA$S_QUAD 8#define VA$Q_QUAD 08#define VA$V_P1 30 /* P1 SPACE */8#define VA$V_SYSTEM 31 /* SYSTEM SPACE */ #define VA$S_BYTES_PER_PAGELET 9 1?#define VA$V_BYTES_PER_PAGELET 0 /* BYTES PER PAGELET */#define VA$S_BYTE_IN_PAGELET 9I#define VA$V_BYTE_IN_PAGELET 0 /* BYTE IN PAGELET (common name) */#define VA$S_VRN 3>#define VA$V_VRN 61 /* Virtual Region Number */#define VA$S_VRNX 4@#define VA$V_VRNX 60 /* Virtual Address Space *//* + */$/* Process permanent region ids *//* - */S#define VA$C_P0 0 /* Region id for 32-bit program region */L#define VA$C_P11 1 /* Region id for control region */T#define VA$C_P2 2 /* Region id for 64-bit program region */#define VA$M_DESCEND 0x1#define VA$M_P0_SPACE 0x2#define VA$M_P1_SPACE 0x4#define VA$M_PERMANENT 0x8"#define VA$M_EXPAND_ON_ACCVIO 0x10#define VA$M_SHARED_PTS 0x40#define VA$M_OWNER_MODE 0xF#define VA$M_CREATE_MODE 0xF0#define VA$C_REGSUM_LENGTH 40#define VA$_REGSUM_BY_ID 0#define VA$_REGSUM_BY_VA 1#define VA$_NEXT_REGSUM_BY_VA 12/* + */##define VA$C_REGION_UCREATE_UOWN 51##define VA$C_REGION_UCREATE_SOWN 50##define VA$C_REGION_UCREATE_EOWN 49##define VA$C_REGION_UCREATE_KOWN 48##define VA$C_REGION_SCREATE_SOWN 34##define VA$C_REGION_SCREATE_EOWN 33##define VA$C_REGION_SCREATE_KOWN 32##define VA$C_REGION_ECREATE_EOWN 17##define VA$C_REGION_ECREATE_KOWN 16"#define VA$C_REGION_KCREATE_KOWN 0#define VA$S_REGSUM 40#define VA$S_REGION_ID 8;#define VA$Q_REGION_ID 0 /* Id of region */9#d1efine VA$L_FLAGS 8 /* FLAGS longword */A#define VA$V_DESCEND 0 /* Region is descending */C#define VA$V_P0_SPACE 1 /* Region is in P0 space */C#define VA$V_P1_SPACE 2 /* Region is in P1 space */B#define VA$V_PERMANENT 3 /* Region is permanent */L#define VA$V_EXPAND_ON_ACCVIO 4 /* Expand within region on accvio *//* public interface. */L#define VA$V_SHARED_PTS 6 /* Region is a shared PT 1 region */!#define VA$L_REGION_PROTECTION 12#define VA$S_OWNER_MODE 4A#define VA$V_OWNER_MODE 0 /* Region owner mode */#define VA$S_CREATE_MODE 4;#define VA$V_CREATE_MODE 4 /* Region create mode */#define VA$S_START_VA 8G#define VA$PQ_START_VA 16 /* Lowest address in region */N#define VA$PS_START_VA 16 /* Lowest address in 32-bit region */#define VA$S_REGION_SIZE 87#define VA$Q_REGION_SIZE 24 /* Size of region */>#defin1e VA$L_REGION_SIZE 24 /* Size of 32-bit region */#define VA$S_FIRST_FREE_VA 8C#define VA$PQ_FIRST_FREE_VA 32 /* First free VA in region */J#define VA$PS_FIRST_FREE_VA 32 /* First free VA in 32-bit region */#/* Region protection encodings *//* - *//* + *//* VA flags *//* - */#define VA$M_NO_OVERMAP 0x1S#define VA$V_NO_OVERMAP 0 /* Do not overmap while creating pages *//* + *//* SETSTK_64 flags *//* - */ #define VA$M_SETSTK_RE1GISTER 0x1F#define VA$V_SETSTK_REGISTER 0 /* Set register stack limits */ /* $DEFEND VA,$GBL,DEF */ /* .ENDM */&/* IA64 assembler header ends here */#else /* IAS_ASSEMBLER *//* CC header begins here *//********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 */ 1/********************************************************************************************************************************//*** MODULE $VADEF ***/#ifndef __VADEF_LOADED#define __VADEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defi1ned 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#els1e#define __union variant_union#endif#endif N/*+ */N/* VIRTUAL ADDRESS VIELDS */N/*- */#define VA$M_P1 0x40000000#define VA$M_SYSTEM 0x80000000$#define VA$M_BYTES_PER_PAGELET 0x1FF"#define VA$M_BYTE_IN_PAGELET 0x1FF##define VA$M_VRN 0xE000000000000000N#define VA$C_VRN_SYSTEM 7 1 /* VRN for system space */N#define VA$C_REGION_COUNT 8 /* Number of virtual regions */$#define VA$M_VRNX 0xF000000000000000N#define VA$C_VRNX_SYSTEM 15 /* VRNX for system space */N#define VA$C_VRNX_COUNT 16 /* Number of virtual address spaces */#define VA$S_VADEF 8#define VA$C_PAGELET_SIZE 512!#define VA$C_PAGELET_SHIFT_SIZE 9 #ifdef __NEW_STARLETtypedef struct _va { __union {# unsigned __int64 va$q_qu 1ad; __struct {) unsigned vadef$$_fill_1 : 30;N unsigned va$v_p1 : 1; /*P1 SPACE */N unsigned va$v_system : 1; /*SYSTEM SPACE */ } va$r_vadef_bits0; __struct {N unsigned va$v_bytes_per_pagelet : 9; /*BYTES PER PAGELET */' unsigned va$v_fill_74_ : 7; } va$r_vadef_bits2; __struct {Q unsigned va$v_byte_in_pagele 1t : 9; /*BYTE IN PAGELET (common name) */' unsigned va$v_fill_75_ : 7; } va$r_vadef_bits3; __struct {& unsigned va$v_fill_4 : 32;& unsigned va$v_fill_5 : 29;N unsigned va$v_vrn : 3; /* Virtual Region Number */ } va$r_vadef_bits4; __struct {& unsigned va$v_fill_6 : 32;& unsigned va$v_fill_7 : 28;N unsigned va$v_vrnx : 4; /* Virtual Address Space 1 */ } va$r_vadef_bits5; } va$r_vadef_union; } VA; #if !defined(__VAXC),#define va$q_quad va$r_vadef_union.va$q_quad9#define va$v_p1 va$r_vadef_union.va$r_vadef_bits0.va$v_p1A#define va$v_system va$r_vadef_union.va$r_vadef_bits0.va$v_systemW#define va$v_bytes_per_pagelet va$r_vadef_union.va$r_vadef_bits2.va$v_bytes_per_pageletS#define va$v_byte_in_pagelet va$r_vadef_union.va$r_vadef_bits3.va$v_byte_in_pagelet;#define va$v_vrn va$r_vadef_union.va$r_vad1ef_bits4.va$v_vrn=#define va$v_vrnx va$r_vadef_union.va$r_vadef_bits5.va$v_vrnx"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _va { __union {# unsigned int va$q_quad [2]; __struct {) unsigned vadef$$_fill_1 : 30;N unsigned va$v_p1 : 1; /*P1 SPACE */N unsigned va$v_system : 1; /*SYSTEM SPACE */ } va$r_vadef_bits0; __stru 1ct {N unsigned va$v_bytes_per_pagelet : 9; /*BYTES PER PAGELET */' unsigned va$v_fill_74_ : 7; } va$r_vadef_bits2; __struct {Q unsigned va$v_byte_in_pagelet : 9; /*BYTE IN PAGELET (common name) */' unsigned va$v_fill_75_ : 7; } va$r_vadef_bits3; __struct {& unsigned va$v_fill_4 : 32;& unsigned va$v_fill_5 : 29;N unsigned va$v_vrn : 3; /* Virtual Region 1Number */ } va$r_vadef_bits4; __struct {& unsigned va$v_fill_6 : 32;& unsigned va$v_fill_7 : 28;N unsigned va$v_vrnx : 4; /* Virtual Address Space */ } va$r_vadef_bits5; } va$r_vadef_union; } va; #if !defined(__VAXC),#define va$q_quad va$r_vadef_union.va$q_quad9#define va$v_p1 va$r_vadef_union.va$r_vadef_bits0.va$v_p1A#define va$v_system va$r_vadef_union.va$r_vadef_bits0.va$v_s 1ystemW#define va$v_bytes_per_pagelet va$r_vadef_union.va$r_vadef_bits2.va$v_bytes_per_pageletS#define va$v_byte_in_pagelet va$r_vadef_union.va$r_vadef_bits3.va$v_byte_in_pagelet;#define va$v_vrn va$r_vadef_union.va$r_vadef_bits4.va$v_vrn=#define va$v_vrnx va$r_vadef_union.va$r_vadef_bits5.va$v_vrnx"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/*+ */N/* Process permanent region ids 1 */N/*- */Q#define VA$C_P0 0 /* Region id for 32-bit program region */N#define VA$C_P1 1 /* Region id for control region */R#define VA$C_P2 2 /* Region id for 64-bit program region */#define VA$M_DESCEND 0x1#define VA$M_P0_SPACE 0x2#define VA$M_P1_SPACE 0x4#define VA$M_PERMANENT 0x8"#define VA$M_EXPAND_ON_A1CCVIO 0x10#define VA$M_SHARED_PTS 0x40#define VA$M_OWNER_MODE 0xF#define VA$M_CREATE_MODE 0xF0#define VA$C_REGSUM_LENGTH 40#define VA$_REGSUM_BY_ID 0#define VA$_REGSUM_BY_VA 1#define VA$_NEXT_REGSUM_BY_VA 2N/*+ */##define VA$C_REGION_UCREATE_UOWN 51##define VA$C_REGION_UCREATE_SOWN 50##define VA$C_REGION_UCREATE_EOWN 49##define VA$C_REGION_UCREATE_KOWN 48##define VA$C_REGION_SCREATE_SOWN 34##define VA 1$C_REGION_SCREATE_EOWN 33##define VA$C_REGION_SCREATE_KOWN 32##define VA$C_REGION_ECREATE_EOWN 17##define VA$C_REGION_ECREATE_KOWN 16"#define VA$C_REGION_KCREATE_KOWN 0 #ifdef __NEW_STARLETtypedef struct _regsum {N unsigned __int64 va$q_region_id; /* Id of region */ __union {N unsigned int va$l_flags; /* FLAGS longword */ __struct {N unsigned va$v_descend : 1; /* Region is descending */1N unsigned va$v_p0_space : 1; /* Region is in P0 space */N unsigned va$v_p1_space : 1; /* Region is in P1 space */N unsigned va$v_permanent : 1; /* Region is permanent */T unsigned va$v_expand_on_accvio : 1; /* Expand within region on accvio */N unsigned va$v_no_clone : 1; /* Don't replicate this bit in the */N/* public interface. */N unsign 1ed va$v_shared_pts : 1; /* Region is a shared PT region */' unsigned va$v_fill_76_ : 1; } va$r_flags_bits; } va$r_flags_overlay; __union {# int va$l_region_protection; __struct {N unsigned va$v_owner_mode : 4; /* Region owner mode */N unsigned va$v_create_mode : 4; /* Region create mode */! } va$r_region_fields; } va$r_region_prot; __union {R#ifdef __INITIAL_POI 1NTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *va$pq_start_va; /* Lowest address in region */#else! unsigned __int64 va$pq_start_va;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endifN void *va$ps_start_va; 1 /* Lowest address in 32-bit region */ } va$r_start_va_union; __union {N unsigned __int64 va$q_region_size; /* Size of region */N unsigned int va$l_region_size; /* Size of 32-bit region */! } va$r_region_size_union; __union {R#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */Z#pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */N void *va$pq_fi 1rst_free_va; /* First free VA in region */#else& unsigned __int64 va$pq_first_free_va;#endifR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */[#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */#endifN void *va$ps_first_free_va; /* First free VA in 32-bit region */ } va$r_free_va_union;N/* Region protection encodings */N/*- 1 */ } REGSUM; #if !defined(__VAXC)0#define va$l_flags va$r_flags_overlay.va$l_flagsD#define va$v_descend va$r_flags_overlay.va$r_flags_bits.va$v_descendF#define va$v_p0_space va$r_flags_overlay.va$r_flags_bits.va$v_p0_spaceF#define va$v_p1_space va$r_flags_overlay.va$r_flags_bits.va$v_p1_spaceH#define va$v_permanent va$r_flags_overlay.va$r_flags_bits.va$v_permanentV#define va$v_expand_on_accvio va$r_flags_overlay.va$r_flags_1bits.va$v_expand_on_accvioJ#define va$v_shared_pts va$r_flags_overlay.va$r_flags_bits.va$v_shared_ptsF#define va$l_region_protection va$r_region_prot.va$l_region_protectionK#define va$v_owner_mode va$r_region_prot.va$r_region_fields.va$v_owner_modeM#define va$v_create_mode va$r_region_prot.va$r_region_fields.va$v_create_mode9#define va$pq_start_va va$r_start_va_union.va$pq_start_va9#define va$ps_start_va va$r_start_va_union.va$ps_start_va@#define va$q_region_size va$r_region_size_union.va$q 1_region_size@#define va$l_region_size va$r_region_size_union.va$l_region_sizeB#define va$pq_first_free_va va$r_free_va_union.va$pq_first_free_vaB#define va$ps_first_free_va va$r_free_va_union.va$ps_first_free_va"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */typedef struct _regsum {N unsigned int va$q_region_id [2]; /* Id of region */ __union {N unsigned int va$l_flags; /* FLAGS longword */ __struct1 {N unsigned va$v_descend : 1; /* Region is descending */N unsigned va$v_p0_space : 1; /* Region is in P0 space */N unsigned va$v_p1_space : 1; /* Region is in P1 space */N unsigned va$v_permanent : 1; /* Region is permanent */T unsigned va$v_expand_on_accvio : 1; /* Expand within region on accvio */N unsigned va$v_no_clone : 1; /* Don't replicate this bit in the */N/* public inte 1rface. */N unsigned va$v_shared_pts : 1; /* Region is a shared PT region */' unsigned va$v_fill_76_ : 1; } va$r_flags_bits; } va$r_flags_overlay; __union {# int va$l_region_protection; __struct {N unsigned va$v_owner_mode : 4; /* Region owner mode */N unsigned va$v_create_mode : 4; /* Region create mode */! } va$r 1_region_fields; } va$r_region_prot; __union {N unsigned __int64 va$pq_start_va; /* Lowest address in region */N int va$ps_start_va; /* Lowest address in 32-bit region */ } va$r_start_va_union; __union {N unsigned int va$q_region_size [2]; /* Size of region */N unsigned int va$l_region_size; /* Size of 32-bit region */! } va$r_region_size_union; __union {N unsigned __int 164 va$pq_first_free_va; /* First free VA in region */N int va$ps_first_free_va; /* First free VA in 32-bit region */ } va$r_free_va_union;N/* Region protection encodings */N/*- */ } regsum; #if !defined(__VAXC)0#define va$l_flags va$r_flags_overlay.va$l_flagsD#define va$v_descend va$r_flags_overlay.va$r_flags_bits.va$v_descendF#define va$v_p10_space va$r_flags_overlay.va$r_flags_bits.va$v_p0_spaceF#define va$v_p1_space va$r_flags_overlay.va$r_flags_bits.va$v_p1_spaceH#define va$v_permanent va$r_flags_overlay.va$r_flags_bits.va$v_permanentV#define va$v_expand_on_accvio va$r_flags_overlay.va$r_flags_bits.va$v_expand_on_accvioJ#define va$v_shared_pts va$r_flags_overlay.va$r_flags_bits.va$v_shared_ptsF#define va$l_region_protection va$r_region_prot.va$l_region_protectionK#define va$v_owner_mode va$r_region_prot.va$r_region_fields.va$v_o 1wner_modeM#define va$v_create_mode va$r_region_prot.va$r_region_fields.va$v_create_mode9#define va$pq_start_va va$r_start_va_union.va$pq_start_va9#define va$ps_start_va va$r_start_va_union.va$ps_start_va@#define va$q_region_size va$r_region_size_union.va$q_region_size@#define va$l_region_size va$r_region_size_union.va$l_region_sizeB#define va$pq_first_free_va va$r_free_va_union.va$pq_first_free_vaB#define va$ps_first_free_va va$r_free_va_union.va$ps_first_free_va"#endif /* #if !defined(__ 1VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/*+ */N/* VA flags */N/*- */#define VA$M_NO_OVERMAP 0x1 #ifdef __NEW_STARLETtypedef struct _va_flags {Q unsigned va$v_no_overmap : 1; /* Do not overmap while creating pages */ unsigned va$v_fill_77_ : 7; } VA_F 1LAGS;#else /* __OLD_STARLET */typedef struct _va_flags {Q unsigned va$v_no_overmap : 1; /* Do not overmap while creating pages */ unsigned va$v_fill_77_ : 7; } va_flags;%#endif /* #ifdef __NEW_STARLET */N/*+ */N/* SETSTK_64 flags */N/*- */ #define VA$M_SETSTK_RE1GISTER 0x1 #ifdef __NEW_STARLETtypedef struct _setstk_flags {N unsigned va$v_setstk_register : 1; /* Set register stack limits */ unsigned va$v_fill_78_ : 7; } SETSTK_FLAGS;#else /* __OLD_STARLET */typedef struct _setstk_flags {N unsigned va$v_setstk_register : 1; /* Set register stack limits */ unsigned va$v_fill_78_ : 7; } setstk_flags;%#endif /* #ifdef __NEW_STARLET */ #ifdef __INITIAL_POINTER_SIZE&#pragma __required_point1er_size __save&#pragma __required_pointer_size __long#ifdef __NEW_STARLETtypedef REGSUM *REGSUM_PQ;#elsetypedef regsum *regsum_pq;#endif)#pragma __required_pointer_size __restore#endif#ifndef __INITIAL_POINTER_SIZE#ifdef __NEW_STARLET#typedef unsigned __int64 REGSUM_PQ;#else#typedef unsigned __int64 regsum_pq;#endif#endif $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_poi1nter_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __VADEF_LOADED */ /* CC header ends here */#endif /* IAS_ASSEMBLER */ww{Ck/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[S 1TARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $VAXDEF ***/#ifndef __VAXDEF_LOADED#define __VAXDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size 1__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(_1_VAXC)#define __union union#else#define __union variant_union#endif#endif #define VAX$C_V780 1#define VAX$K_V780 1#define VAX$C_V782 2#define VAX$K_V782 2#define VAX$C_V750 3#define VAX$K_V750 3#define VAX$C_V730 4#define VAX$K_V730 4#define VAX$C_V785 5#define VAX$K_V785 5#define VAX$C_VUV1 6#define VAX$K_VUV1 6#define VAX$C_VWS1 7#define VAX$K_VWS1 7#define VAX$C_VUV2 8#define VAX$K_VUV2 8#define VAX$C_VWS2 9#define VAX$K_VWS2 9#define VAX$C_VWSD1 10#define VAX$K_VWSD 10#define VAX$C_V8600 11#define VAX$K_V8600 11#define VAX$C_V8650 12#define VAX$K_V8650 12#define VAX$C_V8200 13#define VAX$K_V8200 13#define VAX$C_V8300 14#define VAX$K_V8300 14#define VAX$C_V8530 15#define VAX$K_V8530 15#define VAX$C_V8550 16#define VAX$K_V8550 16#define VAX$C_V8700 17#define VAX$K_V8700 17#define VAX$C_V8800 18#define VAX$K_V8800 18#define VAX$C_VWS2000 19#define VAX$K_VWS2000 19#define VAX$C_VUV2000 20#define VAX$K_1VUV2000 20#define VAX$C_VWSD2000 21#define VAX$K_VWSD2000 21#define VAX$C_V009 22#define VAX$K_V009 22#define VAX$C_V8250 23#define VAX$K_V8250 23#define VAX$C_V8350 24#define VAX$K_V8350 24#define VAX$C_V3600 25#define VAX$K_V3600 25#define VAX$C_V3600W 26#define VAX$K_V3600W 26#define VAX$C_V3600D 27#define VAX$K_V3600D 27#define VAX$K_V9CC 28#define VAX$C_V9CC 28#define VAX$K_V6210_T 28#define VAX$C_V6210_T 28#define VAX$K_V6210 28#define VAX$C_V62120 28#define VAX$C_V3520 29#define VAX$K_V3520 29#define VAX$C_V3520L 30#define VAX$K_V3520L 30#define VAX$K_V8PS 31#define VAX$C_V8PS 31#define VAX$K_V8840 31#define VAX$C_V8840 31#define VAX$K_V9RR 32#define VAX$C_V9RR 32#define VAX$K_VUV2_S 33#define VAX$C_VUV2_S 33#define VAX$K_VUV2_J 34#define VAX$C_VUV2_J 34#define VAX$K_VWS2_T 35#define VAX$C_VWS2_T 35#define VAX$K_VWS2_J 36#define VAX$C_VWS2_J 36#define VAX$K_VWSD_T 37#define VAX$C_VWSD_T 327#define VAX$K_VWSD_J 38#define VAX$C_VWSD_J 38#define VAX$K_VUV2000_S 39#define VAX$C_VUV2000_S 39#define VAX$K_VUV2000_J 40#define VAX$C_VUV2000_J 40#define VAX$K_VWS2000_T 41#define VAX$C_VWS2000_T 41#define VAX$K_VWS2000_J 42#define VAX$C_VWS2000_J 42#define VAX$K_VWSD2000_T 43#define VAX$C_VWSD2000_T 43#define VAX$K_VWSD2000_J 44#define VAX$C_VWSD2000_J 44#define VAX$K_V3600_S 45#define VAX$C_V3600_S 45#define VAX$K_V3600_J 46#define VAX$C_V3600_J 46#d2efine VAX$K_V3600W_T 47#define VAX$C_V3600W_T 47#define VAX$K_V3600W_J 48#define VAX$C_V3600W_J 48#define VAX$K_V3600D_T 49#define VAX$C_V3600D_T 49#define VAX$K_V3600D_J 50#define VAX$C_V3600D_J 50#define VAX$K_V3520_S 51#define VAX$C_V3520_S 51#define VAX$K_V3520_J 52#define VAX$C_V3520_J 52#define VAX$K_V3520L_T 53#define VAX$C_V3520L_T 53#define VAX$K_V3520L_J 54#define VAX$C_V3520L_J 54#define VAX$K_V8250L 55#define VAX$C_V8250L 55#define VAX$K_V82250L_J 56#define VAX$C_V8250L_J 56#define VAX$K_VCV 57#define VAX$C_VCV 57#define VAX$K_VCVWS 58#define VAX$C_VCVWS 58#define VAX$K_VCVWSD 59#define VAX$C_VCVWSD 59#define VAX$K_VCV_S 60#define VAX$C_VCV_S 60#define VAX$K_VCV_J 61#define VAX$C_VCV_J 61#define VAX$K_VCVWS_T 62#define VAX$C_VCVWS_T 62#define VAX$K_VCVWS_J 63#define VAX$C_VCVWS_J 63#define VAX$K_VCVWSD_T 64#define VAX$C_VCVWSD_T 64#define VAX$K_VCVWSD_J 65#define VAX$C_VCVWSD_J 65#define VA2X$C_V8500 66#define VAX$K_V8500 66#define VAX$K_V8370 67#define VAX$C_V8370 67#define VAX$K_V8650P 68#define VAX$C_V8650P 68#define VAX$K_V6220_T 69#define VAX$C_V6220_T 69#define VAX$K_V6220 69#define VAX$C_V6220 69#define VAX$K_V6230_T 70#define VAX$C_V6230_T 70#define VAX$K_V6230 70#define VAX$C_V6230 70#define VAX$K_V6240_T 71#define VAX$C_V6240_T 71#define VAX$K_V6240 71#define VAX$C_V6240 71#define VAX$K_V6250_T 72#define VAX$C_V6250_T 72#define VAX$K_V62250 72#define VAX$C_V6250 72#define VAX$K_V6260_T 73#define VAX$C_V6260_T 73#define VAX$K_V6260 73#define VAX$C_V6260 73#define VAX$K_V6270_T 74#define VAX$C_V6270_T 74#define VAX$K_V6270 74#define VAX$C_V6270 74#define VAX$K_V6280_T 75#define VAX$C_V6280_T 75#define VAX$K_V6280 75#define VAX$C_V6280 75#define VAX$K_V6310_T 76#define VAX$C_V6310_T 76#define VAX$K_V6215 76#define VAX$C_V6215 76#define VAX$K_V6320_T 77#define VAX$C_V6320_T 77#define VAX$K_V6225 772#define VAX$C_V6225 77#define VAX$K_V6330_T 78#define VAX$C_V6330_T 78#define VAX$K_V6235 78#define VAX$C_V6235 78#define VAX$K_V6340_T 79#define VAX$C_V6340_T 79#define VAX$K_V6245 79#define VAX$C_V6245 79#define VAX$K_V6350_T 80#define VAX$C_V6350_T 80#define VAX$K_V6255 80#define VAX$C_V6255 80#define VAX$K_V6360_T 81#define VAX$C_V6360_T 81#define VAX$K_V6265 81#define VAX$C_V6265 81#define VAX$K_V6370_T 82#define VAX$C_V6370_T 82#define VAX$K_V6275 82#def2ine VAX$C_V6275 82#define VAX$K_V6380_T 83#define VAX$C_V6380_T 83#define VAX$K_V6285 83#define VAX$C_V6285 83#define VAX$K_V8810 84#define VAX$C_V8810 84#define VAX$K_V8820 85#define VAX$C_V8820 85#define VAX$K_V8830 86#define VAX$C_V8830 86#define VAX$C_V3400 87#define VAX$K_V3400 87#define VAX$C_V3400W 88#define VAX$K_V3400W 88#define VAX$C_V3400D 89#define VAX$K_V3400D 89#define VAX$K_V3400_S 90#define VAX$C_V3400_S 90#define VAX$K_V3400_J 91#define VAX$2C_V3400_J 91#define VAX$K_V3400W_T 92#define VAX$C_V3400W_T 92#define VAX$K_V3400W_J 93#define VAX$C_V3400W_J 93#define VAX$K_V3400D_T 94#define VAX$C_V3400D_T 94#define VAX$K_V3400D_J 95#define VAX$C_V3400D_J 95#define VAX$K_VUV2000_O 96#define VAX$C_VUV2000_O 96#define VAX$K_VWS2000_O 97#define VAX$C_VWS2000_O 97#define VAX$K_VWSD2000_O 98#define VAX$C_VWSD2000_O 98#define VAX$C_VWSK2000 99#define VAX$K_VWSK2000 99#define VAX$K_V6210_S 100#define VAX$ 2C_V6210_S 100#define VAX$K_V6220_S 101#define VAX$C_V6220_S 101#define VAX$K_V6230_S 102#define VAX$C_V6230_S 102#define VAX$K_V6240_S 103#define VAX$C_V6240_S 103#define VAX$K_V6250_S 104#define VAX$C_V6250_S 104#define VAX$K_V6260_S 105#define VAX$C_V6260_S 105#define VAX$K_V6270_S 106#define VAX$C_V6270_S 106#define VAX$K_V6280_S 107#define VAX$C_V6280_S 107#define VAX$K_V6310_S 108#define VAX$C_V6310_S 108#define VAX$K_V6215_S 108#define VAX$C_ 2V6215_S 108#define VAX$K_V6320_S 109#define VAX$C_V6320_S 109#define VAX$K_V6225_S 109#define VAX$C_V6225_S 109#define VAX$K_V6330_S 110#define VAX$C_V6330_S 110#define VAX$K_V6235_S 110#define VAX$C_V6235_S 110#define VAX$K_V6340_S 111#define VAX$C_V6340_S 111#define VAX$K_V6245_S 111#define VAX$C_V6245_S 111#define VAX$K_V6350_S 112#define VAX$C_V6350_S 112#define VAX$K_V6255_S 112#define VAX$C_V6255_S 112#define VAX$K_V6360_S 113#define VAX$C_V6 2360_S 113#define VAX$K_V6265_S 113#define VAX$C_V6265_S 113#define VAX$K_V6370_S 114#define VAX$C_V6370_S 114#define VAX$K_V6275_S 114#define VAX$C_V6275_S 114#define VAX$K_V6380_S 115#define VAX$C_V6380_S 115#define VAX$K_V6285_S 115#define VAX$C_V6285_S 115#define VAX$K_V6200_J 116#define VAX$C_V6200_J 116#define VAX$K_V6300_J 117#define VAX$C_V6300_J 117#define VAX$K_V6205_J 117#define VAX$C_V6205_J 117#define VAX$C_V3900 118#define VAX$K_V3900  2118#define VAX$K_V3900_S 119#define VAX$C_V3900_S 119#define VAX$C_V3900D 120#define VAX$K_V3900D 120#define VAX$K_V3900D_T 121#define VAX$C_V3900D_T 121#define VAX$K_V3900_J 122#define VAX$C_V3900_J 122#define VAX$K_V3900D_J 123#define VAX$C_V3900D_J 123#define VAX$C_V2000A 124#define VAX$K_V2000A 124#define VAX$K_V2000A_S 125#define VAX$C_V2000A_S 125#define VAX$C_V2000AW 126#define VAX$K_V2000AW 126#define VAX$C_V2000AD 127#define VAX$K_V2000AD 127#def 2ine VAX$K_V2000AW_T 128#define VAX$C_V2000AW_T 128#define VAX$K_V2000AD_T 129#define VAX$C_V2000AD_T 129#define VAX$K_V2000A_J 130#define VAX$C_V2000A_J 130#define VAX$K_V2000AW_J 131#define VAX$C_V2000AW_J 131#define VAX$K_V2000AD_J 132#define VAX$C_V2000AD_J 132#define VAX$C_V3540 133#define VAX$K_V3540 133#define VAX$K_V3540_S 134#define VAX$C_V3540_S 134#define VAX$C_V3540L 135#define VAX$K_V3540L 135#define VAX$K_V3540L_T 136#define VAX$C_V3540L_T 1362#define VAX$C_V3560 137#define VAX$K_V3560 137#define VAX$K_V3560_S 138#define VAX$C_V3560_S 138#define VAX$C_V3560L 139#define VAX$K_V3560L 139#define VAX$K_V3560L_T 140#define VAX$C_V3560L_T 140#define VAX$C_V3580 141#define VAX$K_V3580 141#define VAX$K_V3580_S 142#define VAX$C_V3580_S 142#define VAX$C_V3580L 143#define VAX$K_V3580L 143#define VAX$K_V3580L_T 144#define VAX$C_V3580L_T 144#define VAX$C_V35A0 145#define VAX$K_V35A0 145#define VAX$K_V35A0_2S 146#define VAX$C_V35A0_S 146#define VAX$K_VPV 147#define VAX$C_VPV 147#define VAX$K_VPVWS 148#define VAX$C_VPVWS 148#define VAX$K_VPVWSD 149#define VAX$C_VPVWSD 149#define VAX$K_VPV_S 150#define VAX$C_VPV_S 150#define VAX$K_VPV_J 151#define VAX$C_VPV_J 151#define VAX$K_VPVWS_T 152#define VAX$C_VPVWS_T 152#define VAX$K_VPVWS_J 153#define VAX$C_VPVWS_J 153#define VAX$K_VPVWSD_T 154#define VAX$C_VPVWSD_T 154#define VAX$K_VPVWSD_J 155#define VAX$C_VPVW2SD_J 155#define VAX$K_VTM 156#define VAX$C_VTM 156#define VAX$K_VTM_S 157#define VAX$C_VTM_S 157#define VAX$K_VTM_J 158#define VAX$C_VTM_J 158#define VAX$K_V9RR10_T 159#define VAX$C_V9RR10_T 159#define VAX$K_V9RR20_T 160#define VAX$C_V9RR20_T 160#define VAX$K_V9RR30_T 161#define VAX$C_V9RR30_T 161#define VAX$K_V9RR40_T 162#define VAX$C_V9RR40_T 162#define VAX$K_V9RR50_T 163#define VAX$C_V9RR50_T 163#define VAX$K_V9RR60_T 164#define VAX$C_V9RR60_T 164#define 2VAX$K_V9RR70_T 165#define VAX$C_V9RR70_T 165#define VAX$K_V9RR80_T 166#define VAX$C_V9RR80_T 166#define VAX$K_V9RR10_S 167#define VAX$C_V9RR10_S 167#define VAX$K_V9RR20_S 168#define VAX$C_V9RR20_S 168#define VAX$K_V9RR30_S 169#define VAX$C_V9RR30_S 169#define VAX$K_V9RR40_S 170#define VAX$C_V9RR40_S 170#define VAX$K_V9RR50_S 171#define VAX$C_V9RR50_S 171#define VAX$K_V9RR60_S 172#define VAX$C_V9RR60_S 172#define VAX$K_V9RR70_S 173#define VAX$C_V9RR70_S 173#define VA2X$K_V9RR80_S 174#define VAX$C_V9RR80_S 174#define VAX$K_V9RR10_J 175#define VAX$C_V9RR10_J 175#define VAX$K_V9AR10 176#define VAX$C_V9AR10 176#define VAX$K_V9AR20 177#define VAX$C_V9AR20 177#define VAX$K_V9AQ10 178#define VAX$C_V9AQ10 178#define VAX$K_V9AQ20 179#define VAX$C_V9AQ20 179#define VAX$K_V9AQ30 180#define VAX$C_V9AQ30 180#define VAX$K_V9AQ40 181#define VAX$C_V9AQ40 181#define VAX$K_V6305E_T 182#define VAX$C_V6305E_T 182#define VAX$K_V6305E_S 183#define 2VAX$C_V6305E_S 183#define VAX$K_V6305E_J 184#define VAX$C_V6305E_J 184#define VAX$K_V1202_1T 185#define VAX$C_V1202_1T 185#define VAX$K_V1202_2T 186#define VAX$C_V1202_2T 186#define VAX$K_V1202_3T 187#define VAX$C_V1202_3T 187#define VAX$K_V1202_4T 188#define VAX$C_V1202_4T 188#define VAX$K_V1202_5T 189#define VAX$C_V1202_5T 189#define VAX$K_V1202_6T 190#define VAX$C_V1202_6T 190#define VAX$K_V1202_7T 191#define VAX$C_V1202_7T 191#define VAX$K_V1202_8T 192#define VA2X$C_V1202_8T 192#define VAX$K_V1202_1S 193#define VAX$C_V1202_1S 193#define VAX$K_V1202_2S 194#define VAX$C_V1202_2S 194#define VAX$K_V1202_3S 195#define VAX$C_V1202_3S 195#define VAX$K_V1202_4S 196#define VAX$C_V1202_4S 196#define VAX$K_V1202_5S 197#define VAX$C_V1202_5S 197#define VAX$K_V1202_6S 198#define VAX$C_V1202_6S 198#define VAX$K_V1202_7S 199#define VAX$C_V1202_7S 199#define VAX$K_V1202_8S 200#define VAX$C_V1202_8S 200#define VAX$K_V1202_1J 201#define VAX$2C_V1202_1J 201#define VAX$K_VPV2M_S 202#define VAX$C_VPV2M_S 202#define VAX$K_VPV2M_T 203#define VAX$C_VPV2M_T 203#define VAX$K_VPV2M_J 204#define VAX$C_VPV2M_J 204#define VAX$K_VPV2C_S 205#define VAX$C_VPV2C_S 205#define VAX$K_VPV2C_T 206#define VAX$C_VPV2C_T 206#define VAX$K_VPV2C_J 207#define VAX$C_VPV2C_J 207#define VAX$K_VPV2_S 208#define VAX$C_VPV2_S 208#define VAX$K_VPV2_T 209#define VAX$C_VPV2_T 209#define VAX$K_VPV2_J 210#define VAX$C_VPV2_J 2102#define VAX$K_V4500 211#define VAX$C_V4500 211#define VAX$C_V670 211#define VAX$K_V670 211#define VAX$K_V4500_S 212#define VAX$C_V4500_S 212#define VAX$K_V670_S 212#define VAX$C_V670_S 212#define VAX$K_V4500_J 213#define VAX$C_V4500_J 213#define VAX$K_V670_J 213#define VAX$C_V670_J 213#define VAX$K_V520FT 214#define VAX$C_V520FT 214#define VAX$K_VRMAXM_S 215#define VAX$C_VRMAXM_S 215#define VAX$K_VRMAXM_T 216#define VAX$C_VRMAXM_T 216#define VAX$K_VRMAXM_J 2217#define VAX$C_VRMAXM_J 217#define VAX$K_VRMAXS_S 218#define VAX$C_VRMAXS_S 218#define VAX$K_VRMAXS_T 219#define VAX$C_VRMAXS_T 219#define VAX$K_VRMAXS_J 220#define VAX$C_VRMAXS_J 220#define VAX$K_VRMAX_S 221#define VAX$C_VRMAX_S 221#define VAX$K_VRMAX_T 222#define VAX$C_VRMAX_T 222#define VAX$K_VRMAX_J 223#define VAX$C_VRMAX_J 223#define VAX$K_VRMAXD_S 224#define VAX$C_VRMAXD_S 224#define VAX$K_VRMAXD_T 225#define VAX$C_VRMAXD_T 225#define VAX$K_VRMAXD_J 2262#define VAX$C_VRMAXD_J 226#define VAX$K_VPV0S_S 227#define VAX$C_VPV0S_S 227#define VAX$K_VPV0S_T 228#define VAX$C_VPV0S_T 228#define VAX$K_VPV0S_J 229#define VAX$C_VPV0S_J 229#define VAX$K_VPV1S_S 230#define VAX$C_VPV1S_S 230#define VAX$K_VPV1S_T 231#define VAX$C_VPV1S_T 231#define VAX$K_VPV1S_J 232#define VAX$C_VPV1S_J 232#define VAX$K_VPV2S_S 233#define VAX$C_VPV2S_S 233#define VAX$K_VPV2S_T 234#define VAX$C_VPV2S_T 234#define VAX$K_VPV2S_J 2352#define VAX$C_VPV2S_J 235#define VAX$K_VKA46M_S 236#define VAX$C_VKA46M_S 236#define VAX$K_VKA46M_T 237#define VAX$C_VKA46M_T 237#define VAX$K_VKA46M_J 238#define VAX$C_VKA46M_J 238#define VAX$K_VKA46C_S 239#define VAX$C_VKA46C_S 239#define VAX$K_VKA46C_T 240#define VAX$C_VKA46C_T 240#define VAX$K_VKA46C_J 241#define VAX$C_VKA46C_J 241#define VAX$K_VKA46S_S 242#define VAX$C_VKA46S_S 242#define VAX$K_VKA46S_T 243#define VAX$C_VKA46S_T 243#define VAX$K_VKA46S_J 244#d2efine VAX$C_VKA46S_J 244#define VAX$K_VKA46_S 245#define VAX$C_VKA46_S 245#define VAX$K_VKA46_T 246#define VAX$C_VKA46_T 246#define VAX$K_VKA46_J 247#define VAX$C_VKA46_J 247#define VAX$C_V660 248#define VAX$K_V660 248#define VAX$K_V660_S 249#define VAX$C_V660_S 249#define VAX$K_V660_J 250#define VAX$C_V660_J 250#define VAX$C_V3820 251#define VAX$K_V3820 251#define VAX$C_V3820L 252#define VAX$K_V3820L 252#define VAX$K_V3820_S 253#define VAX$C_V3820_S 2532#define VAX$K_V3820_J 254#define VAX$C_V3820_J 254#define VAX$K_V3820L_T 255#define VAX$C_V3820L_T 255#define VAX$K_V3820L_J 256#define VAX$C_V3820L_J 256#define VAX$C_V3840 257#define VAX$K_V3840 257#define VAX$K_V3840_S 258#define VAX$C_V3840_S 258#define VAX$C_V3840L 259#define VAX$K_V3840L 259#define VAX$K_V3840L_T 260#define VAX$C_V3840L_T 260#define VAX$C_V3860 261#define VAX$K_V3860 261#define VAX$K_V3860_S 262#define VAX$C_V3860_S 262#define VAX$C_2V3860L 263#define VAX$K_V3860L 263#define VAX$K_V3860L_T 264#define VAX$C_V3860L_T 264#define VAX$C_V3880 265#define VAX$K_V3880 265#define VAX$K_V3880_S 266#define VAX$C_V3880_S 266#define VAX$C_V3880L 267#define VAX$K_V3880L 267#define VAX$K_V3880L_T 268#define VAX$C_V3880L_T 268#define VAX$C_V38A0 269#define VAX$K_V38A0 269#define VAX$K_V38A0_S 270#define VAX$C_V38A0_S 270#define VAX$C_VPV1A 271#define VAX$K_VPV1A 271#define VAX$C_VPV1AW 272#define VA2X$K_VPV1AW 272#define VAX$C_VPV1AD 273#define VAX$K_VPV1AD 273#define VAX$C_VPV1A_S 274#define VAX$K_VPV1A_S 274#define VAX$K_VPV1A_J 275#define VAX$C_VPV1A_J 275#define VAX$K_VPV1AW_T 276#define VAX$C_VPV1AW_T 276#define VAX$K_VPV1AW_J 277#define VAX$C_VPV1AW_J 277#define VAX$K_VPV1AD_T 278#define VAX$C_VPV1AD_T 278#define VAX$K_VPV1AD_J 279#define VAX$C_VPV1AD_J 279#define VAX$K_VPV1AS 280#define VAX$C_VPV1AS 280#define VAX$K_VPV1AS_T 281#define VAX$C_VPV1AS_T2 281#define VAX$K_VPV1AS_J 282#define VAX$C_VPV1AS_J 282#define VAX$C_V690 283#define VAX$K_V690 283#define VAX$K_V690_S 284#define VAX$C_V690_S 284#define VAX$K_V690_J 285#define VAX$C_V690_J 285#define VAX$C_V680 286#define VAX$K_V680 286#define VAX$K_V680_S 287#define VAX$C_V680_S 287#define VAX$K_V680_J 288#define VAX$C_V680_J 288#define VAX$K_V520FT_S 289#define VAX$C_V520FT_S 289#define VAX$K_VFT110_T 290#define VAX$C_VFT110_T 290#define VAX$K_VFT110_S 2912#define VAX$C_VFT110_S 291#define VAX$K_VFT210_T 292#define VAX$C_VFT210_T 292#define VAX$K_VFT210_S 293#define VAX$C_VFT210_S 293#define VAX$K_V1302_1T 294#define VAX$C_V1302_1T 294#define VAX$K_V1302_2T 295#define VAX$C_V1302_2T 295#define VAX$K_V1302_3T 296#define VAX$C_V1302_3T 296#define VAX$K_V1302_4T 297#define VAX$C_V1302_4T 297#define VAX$K_V1302_5T 298#define VAX$C_V1302_5T 298#define VAX$K_V1302_6T 299#define VAX$C_V1302_6T 299#define VAX$K_V1302_7T 300#d 2efine VAX$C_V1302_7T 300#define VAX$K_V1302_8T 301#define VAX$C_V1302_8T 301#define VAX$K_V1302_1S 302#define VAX$C_V1302_1S 302#define VAX$K_V1302_2S 303#define VAX$C_V1302_2S 303#define VAX$K_V1302_3S 304#define VAX$C_V1302_3S 304#define VAX$K_V1302_4S 305#define VAX$C_V1302_4S 305#define VAX$K_V1302_5S 306#define VAX$C_V1302_5S 306#define VAX$K_V1302_6S 307#define VAX$C_V1302_6S 307#define VAX$K_V1302_7S 308#define VAX$C_V1302_7S 308#define VAX$K_V1302_8S 309#def!2ine VAX$C_V1302_8S 309#define VAX$K_V1302_1J 310#define VAX$C_V1302_1J 310#define VAX$K_V9AQII10 311#define VAX$C_V9AQII10 311#define VAX$K_V9AQII20 312#define VAX$C_V9AQII20 312#define VAX$K_V9AQII30 313#define VAX$C_V9AQII30 313#define VAX$K_V9AQII40 314#define VAX$C_V9AQII40 314#define VAX$K_V9ARII10 315#define VAX$C_V9ARII10 315#define VAX$K_V9ARII20 316#define VAX$C_V9ARII20 316#define VAX$K_V9AQIII10 317#define VAX$C_V9AQIII10 317#define VAX$K_V9AQIII20 318"2#define VAX$C_V9AQIII20 318#define VAX$K_V9AQIII30 319#define VAX$C_V9AQIII30 319#define VAX$K_V9AQIII40 320#define VAX$C_V9AQIII40 320#define VAX$K_V9ARIII10 321#define VAX$C_V9ARIII10 321#define VAX$K_V9ARIII20 322#define VAX$C_V9ARIII20 322#define VAX$K_VFT410_T 323#define VAX$C_VFT410_T 323#define VAX$K_VFT410_S 324#define VAX$C_VFT410_S 324#define VAX$K_VFT510_T 325#define VAX$C_VFT510_T 325#define VAX$K_VFT510_S 326#define VAX$C_VFT510_S 326#define VAX$#2K_VFT610_T 327#define VAX$C_VFT610_T 327#define VAX$K_VFT610_S 328#define VAX$C_VFT610_S 328#define VAX$K_VFT612_T 329#define VAX$C_VFT612_T 329#define VAX$K_VFT612_S 330#define VAX$C_VFT612_S 330#define VAX$K_VFT710_T 331#define VAX$C_VFT710_T 331#define VAX$K_VFT710_S 332#define VAX$C_VFT710_S 332#define VAX$K_VFT712_T 333#define VAX$C_VFT712_T 333#define VAX$K_VFT712_S 334#define VAX$C_VFT712_S 334#define VAX$K_VKA48_T 335#define VAX$C_VKA48_T 335#define VAX$K_$2VKA48_S 336#define VAX$C_VKA48_S 336#define VAX$K_VKA48_J 337#define VAX$C_VKA48_J 337#define VAX$K_VKA48W_T 338#define VAX$C_VKA48W_T 338#define VAX$K_VKA48W_S 339#define VAX$C_VKA48W_S 339#define VAX$K_VKA48W_J 340#define VAX$C_VKA48W_J 340#define VAX$K_V9AR10_S 341#define VAX$C_V9AR10_S 341#define VAX$K_V9AR20_S 342#define VAX$C_V9AR20_S 342#define VAX$K_V9AQ10_S 343#define VAX$C_V9AQ10_S 343#define VAX$K_V9AQ20_S 344#define VAX$C_V9AQ20_S 344#define VAX$K_V9%2AQ30_S 345#define VAX$C_V9AQ30_S 345#define VAX$K_V9AQ40_S 346#define VAX$C_V9AQ40_S 346#define VAX$K_V9ARII10_S 347#define VAX$C_V9ARII10_S 347#define VAX$K_V9ARII20_S 348#define VAX$C_V9ARII20_S 348#define VAX$K_V9AQII10_S 349#define VAX$C_V9AQII10_S 349#define VAX$K_V9AQII20_S 350#define VAX$C_V9AQII20_S 350#define VAX$K_V9AQII30_S 351#define VAX$C_V9AQII30_S 351#define VAX$K_V9AQII40_S 352#define VAX$C_V9AQII40_S 352#define VAX$K_V9ARIII10_S 353#define VAX$C_V9AR&2III10_S 353#define VAX$K_V9ARIII20_S 354#define VAX$C_V9ARIII20_S 354#define VAX$K_V9AQIII10_S 355#define VAX$C_V9AQIII10_S 355#define VAX$K_V9AQIII20_S 356#define VAX$C_V9AQIII20_S 356#define VAX$K_V9AQIII30_S 357#define VAX$C_V9AQIII30_S 357#define VAX$K_V9AQIII40_S 358#define VAX$C_V9AQIII40_S 358#define VAX$K_V1701_1T 359#define VAX$C_V1701_1T 359#define VAX$K_V1701_2T 360#define VAX$C_V1701_2T 360#define VAX$K_V1701_3T 361#define VAX$C_V1701_3T 361#def'2ine VAX$K_V1701_4T 362#define VAX$C_V1701_4T 362#define VAX$K_V1701_5T 363#define VAX$C_V1701_5T 363#define VAX$K_V1701_6T 364#define VAX$C_V1701_6T 364#define VAX$K_V1701_7T 365#define VAX$C_V1701_7T 365#define VAX$K_V1701_8T 366#define VAX$C_V1701_8T 366#define VAX$K_V1701_1S 367#define VAX$C_V1701_1S 367#define VAX$K_V1701_2S 368#define VAX$C_V1701_2S 368#define VAX$K_V1701_3S 369#define VAX$C_V1701_3S 369#define VAX$K_V1701_4S 370#define VAX$C_V1701_4S 370#defin(2e VAX$K_V1701_5S 371#define VAX$C_V1701_5S 371#define VAX$K_V1701_6S 372#define VAX$C_V1701_6S 372#define VAX$K_V1701_7S 373#define VAX$C_V1701_7S 373#define VAX$K_V1701_8S 374#define VAX$C_V1701_8S 374#define VAX$K_V1701_1J 375#define VAX$C_V1701_1J 375#define VAX$K_VKA49C_S 376#define VAX$C_VKA49C_S 376#define VAX$K_VKA49C_T 377#define VAX$C_VKA49C_T 377#define VAX$K_VKA49C_J 378#define VAX$C_VKA49C_J 378#define VAX$K_VKA49S_S 379#define VAX$C_VKA49S_S 379#define )2VAX$K_VKA49S_T 380#define VAX$C_VKA49S_T 380#define VAX$K_VKA49S_J 381#define VAX$C_VKA49S_J 381#define VAX$C_VKA50 382#define VAX$K_VKA50 382#define VAX$K_VKA50_S 383#define VAX$C_VKA50_S 383#define VAX$K_VKA50_J 384#define VAX$C_VKA50_J 384#define VAX$C_VKA51 385#define VAX$K_VKA51 385#define VAX$K_VKA51_S 386#define VAX$C_VKA51_S 386#define VAX$K_VKA51_J 387#define VAX$C_VKA51_J 387#define VAX$C_VKA52 388#define VAX$K_VKA52 388#define VAX$K_VKA52_S *2389#define VAX$C_VKA52_S 389#define VAX$K_VKA52_J 390#define VAX$C_VKA52_J 390#define VAX$C_VKA53 391#define VAX$K_VKA53 391#define VAX$K_VKA53_S 392#define VAX$C_VKA53_S 392#define VAX$K_VKA53_J 393#define VAX$C_VKA53_J 393#define VAX$C_VKA675 394#define VAX$K_VKA675 394#define VAX$K_VKA675_S 395#define VAX$C_VKA675_S 395#define VAX$K_VKA675_J 396#define VAX$C_VKA675_J 396#define VAX$K_V1703_1T 397#define VAX$C_V1703_1T 397#define VAX$K_V1703_2T 398#def+2ine VAX$C_V1703_2T 398#define VAX$K_V1703_3T 399#define VAX$C_V1703_3T 399#define VAX$K_V1703_4T 400#define VAX$C_V1703_4T 400#define VAX$K_V1703_5T 401#define VAX$C_V1703_5T 401#define VAX$K_V1703_6T 402#define VAX$C_V1703_6T 402#define VAX$K_V1703_7T 403#define VAX$C_V1703_7T 403#define VAX$K_V1703_8T 404#define VAX$C_V1703_8T 404#define VAX$K_V1703_1S 405#define VAX$C_V1703_1S 405#define VAX$K_V1703_2S 406#define VAX$C_V1703_2S 406#define VAX$K_V1703_3S 407#defin,2e VAX$C_V1703_3S 407#define VAX$K_V1703_4S 408#define VAX$C_V1703_4S 408#define VAX$K_V1703_5S 409#define VAX$C_V1703_5S 409#define VAX$K_V1703_6S 410#define VAX$C_V1703_6S 410#define VAX$K_V1703_7S 411#define VAX$C_V1703_7S 411#define VAX$K_V1703_8S 412#define VAX$C_V1703_8S 412#define VAX$K_V1703_1J 413#define VAX$C_V1703_1J 413#define VAX$K_VPCVAX_T 414#define VAX$C_VPCVAX_T 414#define VAX$K_VPCVAX_J 415#define VAX$C_VPCVAX_J 415#define VAX$K_V1704_1T 416#define -2VAX$C_V1704_1T 416#define VAX$K_V1704_2T 417#define VAX$C_V1704_2T 417#define VAX$K_V1704_3T 418#define VAX$C_V1704_3T 418#define VAX$K_V1704_4T 419#define VAX$C_V1704_4T 419#define VAX$K_V1704_5T 420#define VAX$C_V1704_5T 420#define VAX$K_V1704_6T 421#define VAX$C_V1704_6T 421#define VAX$K_V1704_7T 422#define VAX$C_V1704_7T 422#define VAX$K_V1704_8T 423#define VAX$C_V1704_8T 423#define VAX$K_V1704_1S 424#define VAX$C_V1704_1S 424#define VAX$K_V1704_2S 425#define VA.2X$C_V1704_2S 425#define VAX$K_V1704_3S 426#define VAX$C_V1704_3S 426#define VAX$K_V1704_4S 427#define VAX$C_V1704_4S 427#define VAX$K_V1704_5S 428#define VAX$C_V1704_5S 428#define VAX$K_V1704_6S 429#define VAX$C_V1704_6S 429#define VAX$K_V1704_7S 430#define VAX$C_V1704_7S 430#define VAX$K_V1704_8S 431#define VAX$C_V1704_8S 431#define VAX$K_V1704_1J 432#define VAX$C_V1704_1J 432#define VAX$K_V1705_1T 433#define VAX$C_V1705_1T 433#define VAX$K_V1705_2T 434#define VAX$/2C_V1705_2T 434#define VAX$K_V1705_3T 435#define VAX$C_V1705_3T 435#define VAX$K_V1705_4T 436#define VAX$C_V1705_4T 436#define VAX$K_V1705_5T 437#define VAX$C_V1705_5T 437#define VAX$K_V1705_6T 438#define VAX$C_V1705_6T 438#define VAX$K_V1705_7T 439#define VAX$C_V1705_7T 439#define VAX$K_V1705_8T 440#define VAX$C_V1705_8T 440#define VAX$K_V1705_1S 441#define VAX$C_V1705_1S 441#define VAX$K_V1705_2S 442#define VAX$C_V1705_2S 442#define VAX$K_V1705_3S 443#define VAX$C_02V1705_3S 443#define VAX$K_V1705_4S 444#define VAX$C_V1705_4S 444#define VAX$K_V1705_5S 445#define VAX$C_V1705_5S 445#define VAX$K_V1705_6S 446#define VAX$C_V1705_6S 446#define VAX$K_V1705_7S 447#define VAX$C_V1705_7S 447#define VAX$K_V1705_8S 448#define VAX$C_V1705_8S 448#define VAX$K_V1705_1J 449#define VAX$C_V1705_1J 449#define VAX$C_VKA676 450#define VAX$K_VKA676 450#define VAX$K_VKA676_S 451#define VAX$C_VKA676_S 451#define VAX$K_VKA676_J 452#define VAX$C_VKA67612_J 452#define VAX$C_VKA681 453#define VAX$K_VKA681 453#define VAX$K_VKA681_S 454#define VAX$C_VKA681_S 454#define VAX$K_VKA681_J 455#define VAX$C_VKA681_J 455#define VAX$C_VKA691 456#define VAX$K_VKA691 456#define VAX$K_VKA691_S 457#define VAX$C_VKA691_S 457#define VAX$K_VKA691_J 458#define VAX$C_VKA691_J 458#define VAX$C_VKA692 459#define VAX$K_VKA692 459#define VAX$K_VKA692_S 460#define VAX$C_VKA692_S 460#define VAX$K_VKA692_J 461#define VAX$C_VKA692_J 461#defin22e VAX$C_VKA600 462#define VAX$K_VKA600 462#define VAX$K_VKA600_S 463#define VAX$C_VKA600_S 463#define VAX$K_VKA600_J 464#define VAX$C_VKA600_J 464#define VAX$C_VKA605 465#define VAX$K_VKA605 465#define VAX$K_VKA605_S 466#define VAX$C_VKA605_S 466#define VAX$K_VKA605_J 467#define VAX$C_VKA605_J 467#define VAX$C_VKA52A 468#define VAX$K_VKA52A 468#define VAX$K_VKA52A_S 469#define VAX$C_VKA52A_S 469#define VAX$K_VKA52A_J 470#define VAX$C_VKA52A_J 470#define VAX$K_VFT81032_T 471#define VAX$C_VFT810_T 471#define VAX$K_VFT810_S 472#define VAX$C_VFT810_S 472#define VAX$K_VFT812_T 473#define VAX$C_VFT812_T 473#define VAX$K_VFT812_S 474#define VAX$C_VFT812_S 474#define VAX$K_VKA49AC_S 475#define VAX$C_VKA49AC_S 475#define VAX$K_VKA49AC_T 476#define VAX$C_VKA49AC_T 476#define VAX$K_VKA49AC_J 477#define VAX$C_VKA49AC_J 477#define VAX$K_VKA49AS_S 478#define VAX$C_VKA49AS_S 478#define VAX$K_VKA49AS_T 479#define VAX$C_VKA49AS_T 479#d42efine VAX$K_VKA49AS_J 480#define VAX$C_VKA49AS_J 480#define VAX$K_VKA49BC_S 481#define VAX$C_VKA49BC_S 481#define VAX$K_VKA49BC_T 482#define VAX$C_VKA49BC_T 482#define VAX$K_VKA49BC_J 483#define VAX$C_VKA49BC_J 483#define VAX$K_VKA49BS_S 484#define VAX$C_VKA49BS_S 484#define VAX$K_VKA49BS_T 485#define VAX$C_VKA49BS_T 485#define VAX$K_VKA49BS_J 486#define VAX$C_VKA49BS_J 486#define VAX$C_VKA54 487#define VAX$K_VKA54 487#define VAX$K_VKA54_S 488#define 52VAX$C_VKA54_S 488#define VAX$K_VKA54_J 489#define VAX$C_VKA54_J 489#define VAX$C_VKA55 490#define VAX$K_VKA55 490#define VAX$K_VKA55_S 491#define VAX$C_VKA55_S 491#define VAX$K_VKA55_J 492#define VAX$C_VKA55_J 492#define VAX$C_VKA56 493#define VAX$K_VKA56 493#define VAX$K_VKA56_S 494#define VAX$C_VKA56_S 494#define VAX$K_VKA56_J 495#define VAX$C_VKA56_J 495#define VAX$C_VKA694 496#define VAX$K_VKA694 496#define VAX$K_VKA694_S 497#define VAX$C_VKA694_S62 497#define VAX$K_VKA694_J 498#define VAX$C_VKA694_J 498#define VAX$K_V1706_1T 499#define VAX$C_V1706_1T 499#define VAX$K_V1706_2T 500#define VAX$C_V1706_2T 500#define VAX$K_V1706_3T 501#define VAX$C_V1706_3T 501#define VAX$K_V1706_4T 502#define VAX$C_V1706_4T 502#define VAX$K_V1706_5T 503#define VAX$C_V1706_5T 503#define VAX$K_V1706_6T 504#define VAX$C_V1706_6T 504#define VAX$K_V1706_7T 505#define VAX$C_V1706_7T 505#define VAX$K_V1706_8T 506#define VAX$C_V1706_8T 57206#define VAX$K_V1706_1S 507#define VAX$C_V1706_1S 507#define VAX$K_V1706_2S 508#define VAX$C_V1706_2S 508#define VAX$K_V1706_3S 509#define VAX$C_V1706_3S 509#define VAX$K_V1706_4S 510#define VAX$C_V1706_4S 510#define VAX$K_V1706_5S 511#define VAX$C_V1706_5S 511#define VAX$K_V1706_6S 512#define VAX$C_V1706_6S 512#define VAX$K_V1706_7S 513#define VAX$C_V1706_7S 513#define VAX$K_V1706_8S 514#define VAX$C_V1706_8S 514#define VAX$K_V1706_1J 515#define VAX$C_V1706_1J 51582#define VAX$K_V1707_1T 516#define VAX$C_V1707_1T 516#define VAX$K_V1707_2T 517#define VAX$C_V1707_2T 517#define VAX$K_V1707_3T 518#define VAX$C_V1707_3T 518#define VAX$K_V1707_4T 519#define VAX$C_V1707_4T 519#define VAX$K_V1707_5T 520#define VAX$C_V1707_5T 520#define VAX$K_V1707_6T 521#define VAX$C_V1707_6T 521#define VAX$K_V1707_7T 522#define VAX$C_V1707_7T 522#define VAX$K_V1707_8T 523#define VAX$C_V1707_8T 523#define VAX$K_V1707_1S 524#define VAX$C_V1707_1S 52492#define VAX$K_V1707_2S 525#define VAX$C_V1707_2S 525#define VAX$K_V1707_3S 526#define VAX$C_V1707_3S 526#define VAX$K_V1707_4S 527#define VAX$C_V1707_4S 527#define VAX$K_V1707_5S 528#define VAX$C_V1707_5S 528#define VAX$K_V1707_6S 529#define VAX$C_V1707_6S 529#define VAX$K_V1707_7S 530#define VAX$C_V1707_7S 530#define VAX$K_V1707_8S 531#define VAX$C_V1707_8S 531#define VAX$K_V1707_1J 532#define VAX$C_V1707_1J 532#define VAX$C_VKA57 533#define VAX$K_VKA57 533#defin:2e VAX$K_VKA57_S 534#define VAX$C_VKA57_S 534#define VAX$K_VKA57_J 535#define VAX$C_VKA57_J 535#define VAX$C_VKA58 536#define VAX$K_VKA58 536#define VAX$K_VKA58_S 537#define VAX$C_VKA58_S 537#define VAX$K_VKA58_J 538#define VAX$C_VKA58_J 538#define VAX$C_VKA59 539#define VAX$K_VKA59 539#define VAX$K_VKA59_S 540#define VAX$C_VKA59_S 540#define VAX$K_VKA59_J 541#define VAX$C_VKA59_J 541#define VAX$C_MAX_MODEL 541#define VAX$K_MAX_MODEL 541 $#pragma ;2__member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __VAXDEF_LOADED */ wwl/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 b <2y OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $VA_RANGEDEF ***/#ifndef __VA_RANGEDEF_LOADED#define __VA_RANGEDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_S=2IZE /* 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#els>2e#define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*+ */N/* Define the 32-bit virtual address range structure. */N/*- */  #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cpl ?2usplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _va_range {#pragma __nomember_alignmentN void *va_range$ps_start_va; /* Starting virtual address */N void *va_range$ps_end_va; /* Ending (last) virtual address */ } VA_RANGE;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */' @2#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _va_range {#pragma __nomember_alignmentN void *va_range$ps_start_va; /* Starting virtual address */N void *va_range$ps_end_va; /* Ending (last) virtual address */ } va_range;%#endif /* #ifdef __NEW_STARLET */N#define VA_RANGE$K_LENGTH 8 /* Length of VA_RANGE structure */N#define VA_RANGE$C_LENGTH 8 /* Length of VA_RANGE A2structure */  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard !#endif /* __VA_RANGEDEF_LOADED */ ww{l/***************************************************************************************************************************** B2***/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $WBEMIDEF ***/#ifndef __WBEMIDEF_LOADED#define __WBEMIDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignC2mentR#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)D2#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 N/*+ */N/* SYS$GET_WBEM_INFO item code values */N/*- */~#define WBEMI$_SPU_COUNT 1 /* Count, 64E2-bit integer, of "schedulable processing units" (SPU id, aka VMS CPUID) */{#define WBEMI$_SPU_LID_MAPPING 2 /* Vector of WBEMI_LID_MAP, with LID and SPU_ID pairings, with SPU_COUNT entries */`#define WBEMI$_SPU_FREQUENCY 3 /* SPU cycle frequency, 64-bit integer, param1=SPU id */c#define WBEMI$_SYS_HT_CAPABLE 4 /* Is system Hyperthreads capable? (0/1, 64-bit integer) */n#define WBEMI$_SYS_HT_ENABLED 5 /* Are system Hyperthreads currently enabled? (0/1, 64-bit integF2er) */y#define WBEMI$_SMBIOS_TABLE_TYPE 6 /* Get SMBIOS table entries by type, param1=SMBIOS table type, raw binary data */w#define WBEMI$_DIMM_COUNT 7 /* Number of DIMMs on the system, 64-bit integer, count of ACPI DIMM objects */a#define WBEMI$_DIMM_LOC 8 /* DIMM location, ASCII string from ACPI, param1=DIMM# */f#define WBEMI$_DIMM_UID 9 /* DIMM serial number, ASCII string from ACPI, param1=DIMM# */d#define WBEMI$_DIMM_PART 10 /* DIMM G2part number, ASCII string from ACPI, param1=DIMM# */_#define WBEMI$_DIMM_SIZE 11 /* DIMM size, 64-bit integer from ACPI, param1=DIMM# */a#define WBEMI$_DIMM_STATUS 12 /* DIMM status, 64-bit integer from ACPI, param1=DIMM# */w#define WBEMI$_CELL_COUNT 13 /* Number of cells in the system, 64-bit integer, count of ACPI cell objects */a#define WBEMI$_CELL_LOC 14 /* Cell location, ASCII string from ACPI, param1=cell# */^#define WBEMI$_CELL_UID 15 H2 /* Cell UID, 64-bit integer from ACPI, param1=cell# */v#define WBEMI$_PHYS_CPU_COUNT 16 /* Number of physical CPUs, 64-bit integer, count of ACPI processor objects */^#define WBEMI$_PHYS_CPU_ID 17 /* Vector of 64-bit ACPI ProcIDs for PHYS_CPU_COUNT */#define WBEMI$_PHYS_LID_MAPPING 18 /* Vector of WBEMI_LID_MAP, with LID and PROC_ID pairings, with PHYS_CPU_COUNT entries */f#define WBEMI$_PHYS_CPU_LOC 19 /* CPU chip location, ASCII string from ACPI, param1=PI2rocID */f#define WBEMI$_PHYS_CPU_SLOT_NUM 20 /* CPU slot number, 64-bit integer from ACPI, param1=ProcID */f#define WBEMI$_PHYS_CPU_SERIAL 21 /* CPU serial number, ASCII string from ACPI, param1=ProcID */a#define WBEMI$_PHYS_CPU_STATUS 22 /* CPU status, 64-bit integer from ACPI, param1=ProcID */b#define WBEMI$_CORES_PER_SOCKET 23 /* Number of cores per processor socket, 64-bit integer */b#define WBEMI$_THREADS_PER_CORE 24 /* Number of threads per processor core, 64-bit J2integer */l#define WBEMI$_THREADS_CORE_MAX 25 /* Number of potential threads per processor core, 64-bit integer */^#define WBEMI$_PHYS_CPU_UID_INT 26 /* CPU UID, 64-bit integer from ACPI, param1=ProcID */Y#define WBEMI$K_MAX_ITEM 26 /* Maximum currently supported item code value */N/*+ */N/* WBEMI_LID_MAP Structure */N/* K2 */N/* Data returned by SYS$GET_WBEM_INFO WBEMI$_SPU_LID_MAPPING is a vector of */T/* WBEMI_LID_MAP structures, pairing a LID to its associated VMS cpuid in SPU_ID. */N/* The total number of these pairings is given by SPU_COUNT. */N/* */O/* Data returned by SYS$GET_WBEM_INFO WBEMI$_PHYS_LID_MAPPING is a vector of */N/* WBEMI_LID_MAP structures, pairing a LID to its assoL2ciate ACPI PROC_ID. */N/* The total number of these pairings is given by PHYS_CPU_COUNT. */N/* */R/* The caller should not infer any significance to the order of the pairings in */Q/* this vector. For example, one should not assume that the 5th instance of a */S/* LID and PROC_ID pairing corresponds to VMS CPUID 5. Instead, one needs to use */R/* both the LID/SPU_ID and LID/PROC_ID pairings to determine the S M2PU_ID/PROC_ID */N/* associations. */N/*- */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _wbemi_lid_map {#pragma __nomember_alignmentN unsigned __int64 wbemi_lid_map$q_lid; /* LID N2 for the processor */ __union {N unsigned int wbemi_lid_map$l_id; /* Generic ID field, can be... */c unsigned int wbemi_lid_map$l_spu_id; /* VMS CPUID (aka SPU IS) associated with the LID */Z unsigned int wbemi_lid_map$l_proc_id; /* ACPI PROC_ID associated with the LID */% } wbemi_lid_map$r_id_overlay;( unsigned int wbemi_lid_map$l_filler; } WBEMI_LID_MAP; #if !defined(__VAXC)H#define wbemi_lid_map$l_id wbemi_lid_map$r_id_overlay. O2wbemi_lid_map$l_idP#define wbemi_lid_map$l_spu_id wbemi_lid_map$r_id_overlay.wbemi_lid_map$l_spu_idR#define wbemi_lid_map$l_proc_id wbemi_lid_map$r_id_overlay.wbemi_lid_map$l_proc_id"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _wbemi_lid_map {#pragma __nomember_align P2mentN unsigned int wbemi_lid_map$q_lid [2]; /* LID for the processor */ __union {N unsigned int wbemi_lid_map$l_id; /* Generic ID field, can be... */c unsigned int wbemi_lid_map$l_spu_id; /* VMS CPUID (aka SPU IS) associated with the LID */Z unsigned int wbemi_lid_map$l_proc_id; /* ACPI PROC_ID associated with the LID */% } wbemi_lid_map$r_id_overlay;( unsigned int wbemi_lid_map$l_filler; } wbemi_lid_map; #if !defined(__VAXC)H Q2#define wbemi_lid_map$l_id wbemi_lid_map$r_id_overlay.wbemi_lid_map$l_idP#define wbemi_lid_map$l_spu_id wbemi_lid_map$r_id_overlay.wbemi_lid_map$l_spu_idR#define wbemi_lid_map$l_proc_id wbemi_lid_map$r_id_overlay.wbemi_lid_map$l_proc_id"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ # ifdef __INITIAL_POINTER_SIZEP# pragma __required_pointer_size __save /* Save current pointer size */E# pragma __required_pointer_size 64 /* Pointers are 64-bitsR2 */b typedef struct _wbemi_lid_map * WBEMI_LID_MAP_PQ; /* 64-bit pointer to an WBEMI_LID_MAP */V# pragma __required_pointer_size __restore /* Return to previous pointer size */ # endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #e S2ndif /* __WBEMIDEF_LOADED */ ww l/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************/#/*** MODULE $WWIDDEF IDENT X-4 ***/#i T2fndef __WWIDDEF_LOADED#define __WWIDDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 exU2tern "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 N/* */R/* Longword header preV2fixed to the World-Wide Identifier used in fibre channel. */R/* A WWID can be in any one of the eleven formats specified here. At this time */P/* though, only seven of these formats (WWID types 1-4, 9-11) are implemented */N/* in OpenVMS. */N/* */O/* Note that this is a common header, used by OpenVMS, Digital UNIX, and the */Q/* Console. Any changes to this str W2ucture should be made in cooperation with */N/* these other groups. */N/* */%#define WWIDHDR$M_WWID_LENGTH 0xFFFFF%#define WWIDHDR$M_ASCII_DATA 0x100000&#define WWIDHDR$M_WWID_TYPE 0xFF000000N#define WWIDHDR$K_IEEE_REGEXT 1 /* 1: Page83, ID type 3, NAA 0110 */N#define WWIDHDR$K_IEEE_REG 2 /* 2: Page83, ID type 3, NAA 0101 */N#define WWIDHDR$K_X2PG83TY1_VID 3 /* 3: PID+Page83, ID type 1 */N#define WWIDHDR$K_PG80_SERIALNO 4 /* 4: VID+PID+Ser_No from Page80 */T#define WWIDHDR$K_INQ_SERIALNO 5 /* 5: VID+PID+Ser_No from std. inq. data */N#define WWIDHDR$K_TGT_IDENT 6 /* 6: VID+PID+Persistent_Tgt_ID */N#define WWIDHDR$K_BTL 7 /* 7: VID+PID+Bus_No+Tgt_ID+LUN */N#define WWIDHDR$K_DEC_UNIQUE 8 /* 8: HSZ-specific serial no's. */R#define WWIDHDR$K_HSZ_THISOTHER 9 Y2 /* 9: THIS/OTHER ser. no. (older HSZs) */N#define WWIDHDR$K_IEEE48_VEXT 10 /* 10: Page83, ID type 3, NAA 0010 */N#define WWIDHDR$K_IEEE48_0EXT 11 /* 11: Page83, ID type 3, NAA 0001 */N#define WWIDHDR$K_IEEE_EUI64 12 /* 12: Page83, ID type 2 */N#define WWIDHDR$K_ISCSI_NAME 13 /* 13: X-4 iSCSI Name */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __no Z2member_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _wwidhdr {#pragma __nomember_alignment __struct {N unsigned wwidhdr$v_wwid_length : 20; /* Length of WWID data */N unsigned wwidhdr$v_ascii_data : 1; /* Data is in ASCII format */N unsigned wwidhdr$v_reserved1 : 3; /* Reserved */N unsigned wwidhdr$v_wwid_type : 8; /* WWID format type */" } wwidhdr$r_header_fields; [2 } WWIDHDR; #if !defined(__VAXC)K#define wwidhdr$v_wwid_length wwidhdr$r_header_fields.wwidhdr$v_wwid_lengthI#define wwidhdr$v_ascii_data wwidhdr$r_header_fields.wwidhdr$v_ascii_dataG#define wwidhdr$v_reserved1 wwidhdr$r_header_fields.wwidhdr$v_reserved1G#define wwidhdr$v_wwid_type wwidhdr$r_header_fields.wwidhdr$v_wwid_type"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4. \20 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _wwidhdr {#pragma __nomember_alignment __struct {N unsigned wwidhdr$v_wwid_length : 20; /* Length of WWID data */N unsigned wwidhdr$v_ascii_data : 1; /* Data is in ASCII format */N unsigned wwidhdr$v_reserved1 : 3; /* Reserved */N unsigned wwidhdr$v_wwid_type : 8; /* WWID format type */" ]2} wwidhdr$r_header_fields; } wwidhdr; #if !defined(__VAXC)K#define wwidhdr$v_wwid_length wwidhdr$r_header_fields.wwidhdr$v_wwid_lengthI#define wwidhdr$v_ascii_data wwidhdr$r_header_fields.wwidhdr$v_ascii_dataG#define wwidhdr$v_reserved1 wwidhdr$r_header_fields.wwidhdr$v_reserved1G#define wwidhdr$v_wwid_type wwidhdr$r_header_fields.wwidhdr$v_wwid_type"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* ^2 */N/* World-Wide Identifier */N/* */N/* Includes the 4-byte header defined above and the body of the WWID. The */N/* largest WWID is currently the type that includes Vendor ID (8 bytes), */N/* Product ID (16 bytes), and Serial Number (up to 251 bytes). Rounding up */N/* to the nearest quadword boundary, this comes out to 276 bytes. */N_2/* */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _wwid {#pragma __nomember_alignment WWIDHDR wwid$r_header; char wwid$b_data [276]; } WWID;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__c`2plusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _wwid {#pragma __nomember_alignment wwidhdr wwid$r_header; char wwid$b_data [276]; } wwid;%#endif /* #ifdef __NEW_STARLET */#define WWID$K_LENGTH 280N/* */N/* Serial Number WWID */N/* a2 */N/* This is the WWID that gets put together from both standard and Page 80 */R/* inquiry data. The Product ID and Vendor ID come from standard inquiry data. */Q/* The Serial Number comes from Vital Product Data Page 80. The Header is the */N/* standard WWID header defined above. */N/* */ #ifdef __NEW_STARLETc#if !db2efined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _sn_wwid {#pragma __nomember_alignment WWIDHDR sn_wwid$r_header;* unsigned char sn_wwid$b_vendor_id [8];, unsigned char sn_wwid$b_product_id [16];, unsigned char sn_wwid$b_serial_no [252]; } SN_WWID;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !definedc2(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _sn_wwid {#pragma __nomember_alignment wwidhdr sn_wwid$r_header;* unsigned char sn_wwid$b_vendor_id [8];, unsigned char sn_wwid$b_product_id [16];, unsigned char sn_wwid$b_serial_no [252]; } sn_wwid;%#endif /* #ifdef __NEW_STARLET */#define SN_WWID$K_LENGTH 280N/* d2 */N/* The longest WWID is one that is made from the device's serial number, */N/* product ID, and vendor ID. */N/* 4 8 16 <= 252 */S/* +------+------------+-------------------+-----------------------------------+ */S/* |Header| Vendor | Product | Serial Number | */S/* +------+------------+-------------------+----------------------e2-------------+ */N/* */N/* Maximum WWID length comes out to 4+8+16+252 = 280 bytes. */N/* */#define WWID$K_MAX_LENGTH 280N/* */N/* WWID Table Entry */N/* f2 */N/* The WWID table is created during boot by EXEC_INIT and is used by both */P/* EXEC_INIT and, later on in the boot, STACONFIG. The table stores informa- */R/* tion about all devices that have been registered by the user at the console. */N/* */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignmeg2nt __quadword#else#pragma __nomember_alignment#endiftypedef struct _wwident {#pragma __nomember_alignment int wwident$l_unit_no; int wwident$l_dnp;# unsigned int wwident$l_wwidlen; __struct {! WWIDHDR wwident$r_header;$ char wwident$b_fcwwid [112]; } wwident$r_wwid; } WWIDENT; #if !defined(__VAXC)8#define wwident$r_header wwident$r_wwid.wwident$r_header8#define wwident$b_fcwwid wwident$r_wwid.wwident$b_fcwwid"#endif /* #if !deh2fined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __quadword#else#pragma __nomember_alignment#endiftypedef struct _wwident {#pragma __nomember_alignment int wwident$l_unit_no; int wwident$l_dnp;# unsigned int wwident$l_wwidlen; __struct {! wwidhdr wwident$r_header;$ char wwident$b_fcwwid [112]; } wwident$r_ww i2id; } wwident; #if !defined(__VAXC)8#define wwident$r_header wwident$r_wwid.wwident$r_header8#define wwident$b_fcwwid wwident$r_wwid.wwident$b_fcwwid"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */#define WWIDENT$K_LENGTH 128N#define WWIDTBL$K_MAX_ENTRIES 1000 /* Max. entries in a WWID Table */N/* */N/* This structure points to a Fibre Channel adapter ID. This WWID diffej2rs */N/* from the other WWIDs in this file in that it is obtained directly from */Q/* the adapter rather than the SCSI Device Identification page. Consequently, */N/* there is no header, vendor, and product information associated with */O/* this 64 bit identifier. The format of this 64 bit WWID is an IEEE 48 bit */N/* address with additional information as defined in the FC-PH. But we */Q/* don't really care about the FC-PH format since all we want to do is display */Q/* the 6 k24 bits using the asci hex format of XXXX-XXXX-XXXX-XXXX, which is the */N/* widely accepted format used to display this information. */N/* */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _fc_wwid_64b {#pragma __nomember_alil2gnment$ unsigned char fc_wwidb_name [8]; } FC_WWID_64B;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _fc_wwid_64b {#pragma __nomember_alignment$ unsigned char fc_wwidb_name [8]; } fc_wwid_64b;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIALm2_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __WWIDDEF_LOADED */ ww+l/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05 n2-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $XABALLDEF ***/#ifndef __XABALLDEF_LOADED#define __XABALLDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported o2*/\#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#endifp2 #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* allocation xab definitions */N/* $xaballdef */N/* */N/* the fields thru bkz cannot be rearranged due to q2 */N/* their commonality with fab */N/* */N#define XAB$C_ALL 20 /* xaball id code */#define XAB$M_HRD 0x1#define XAB$M_ONC 0x2#define XAB$M_CBT 0x20#define XAB$M_CTG 0x80N#define XAB$C_ANY 0 /* any allocation o.k. */N#define XAB$C_CYL 1 /* cylinder boundary r2 */N#define XAB$C_LBN 2 /* allocate at specified lbn */N#define XAB$C_VBN 3 /* allocate near specified vbn */N#define XAB$C_RFI 4 /* allocate near related file */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xaballdef {#pragma s2__nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xaballdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */ __union {N unsigned char xab$b_aop; /* allocation options */ __struct {T unsigned xab$v_hrd : 1; /* fait2l if requested alignment impossible */V unsigned xab$v_onc : 1; /* locate allocated space within a cylinder */N unsigned xaballdef$$_fill_5 : 3; /* (spares) */N unsigned xab$v_cbt : 1; /* contiguous alllocation, best try */N unsigned xaballdef$$_fill_6 : 1; /* spare */N unsigned xab$v_ctg : 1; /* contiguous allocation */ } xab$r_aop_bits; } xab$r_aop_overlau2y;N unsigned char xab$b_aln; /* alignment type */P unsigned short int xab$w_vol; /* relative volume no. for allocation */N/* (not applicable if aln = vbn or rfi) */N unsigned int xab$l_loc; /* allocation location */N unsigned int xab$l_alq; /* allocation quantity */N unsigned short int xab$w_deq; /* default allocation quantity */N unsigned char xa v2b$b_bkz; /*COMMON TO FHC AND ALQ XABS */N unsigned char xab$b_aid; /* area id number */ __union {N unsigned short int xab$w_rfi [3]; /* related file id */ __struct {N unsigned short int xab$w_rfi0; /* file number */N unsigned short int xab$w_rfi2; /* seq number */N unsigned short int xab$w_rfi4; /* rev number */ w2 } xab$r_rfi_fields; } xab$r_rfi_overlay;N short int xaballdef$$_fill_8; /* (spare) */ } XABALLDEF; #if !defined(__VAXC)-#define xab$b_aop xab$r_aop_overlay.xab$b_aop7#define xab$r_aop_bits xab$r_aop_overlay.xab$r_aop_bits*#define xab$v_hrd xab$r_aop_bits.xab$v_hrd*#define xab$v_onc xab$r_aop_bits.xab$v_onc*#define xab$v_cbt xab$r_aop_bits.xab$v_cbt*#define xab$v_ctg xab$r_aop_bits.xab$v_ctg-#define xab$w_rfi xab$r_rfi_overlay.xab$w_rfx2i;#define xab$r_rfi_fields xab$r_rfi_overlay.xab$r_rfi_fields.#define xab$w_rfi0 xab$r_rfi_fields.xab$w_rfi0.#define xab$w_rfi2 xab$r_rfi_fields.xab$w_rfi2.#define xab$w_rfi4 xab$r_rfi_fields.xab$w_rfi4"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct xaballdef {#pragma __nome y2mber_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xaballdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */ __union {N unsigned char xab$b_aop; /* allocation options */ __struct {T unsigned xab$v_hrd : 1; /* fail if r z2equested alignment impossible */V unsigned xab$v_onc : 1; /* locate allocated space within a cylinder */N unsigned xaballdef$$_fill_5 : 3; /* (spares) */N unsigned xab$v_cbt : 1; /* contiguous alllocation, best try */N unsigned xaballdef$$_fill_6 : 1; /* spare */N unsigned xab$v_ctg : 1; /* contiguous allocation */ } xab$r_aop_bits; } xab$r_aop_overlay;N {2 unsigned char xab$b_aln; /* alignment type */P unsigned short int xab$w_vol; /* relative volume no. for allocation */N/* (not applicable if aln = vbn or rfi) */N unsigned int xab$l_loc; /* allocation location */N unsigned int xab$l_alq; /* allocation quantity */N unsigned short int xab$w_deq; /* default allocation quantity */N unsigned char xab$b_bk |2z; /*COMMON TO FHC AND ALQ XABS */N unsigned char xab$b_aid; /* area id number */ __union {N unsigned short int xab$w_rfi [3]; /* related file id */ __struct {N unsigned short int xab$w_rfi0; /* file number */N unsigned short int xab$w_rfi2; /* seq number */N unsigned short int xab$w_rfi4; /* rev number */ } }2xab$r_rfi_fields; } xab$r_rfi_overlay;N short int xaballdef$$_fill_8; /* (spare) */ } ; #if !defined(__VAXC)-#define xab$b_aop xab$r_aop_overlay.xab$b_aop<#define xab$v_hrd xab$r_aop_overlay.xab$r_aop_bits.xab$v_hrd<#define xab$v_onc xab$r_aop_overlay.xab$r_aop_bits.xab$v_onc<#define xab$v_cbt xab$r_aop_overlay.xab$r_aop_bits.xab$v_cbt<#define xab$v_ctg xab$r_aop_overlay.xab$r_aop_bits.xab$v_ctg-#define xab$w_rfi xab$r_rfi_overlay.xab$w_rf ~2i@#define xab$w_rfi0 xab$r_rfi_overlay.xab$r_rfi_fields.xab$w_rfi0@#define xab$w_rfi2 xab$r_rfi_overlay.xab$r_rfi_fields.xab$w_rfi2@#define xab$w_rfi4 xab$r_rfi_overlay.xab$r_rfi_fields.xab$w_rfi4"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABALLDEF operates after aggregate end */N#define XAB$K_ALLLEN 32 /* length of xaball */N#define XAB$C_ALLLEN 32 /* length of xaball 2 */ S/* These are traditional macros that should be hand-maintained for compatibility */W/* Do not have to add new ones, but do have to maintain those that are here already. */G#define XAB$V_HRD 0 /* fail if requestd alignmt cannot be performed */<#define XAB$V_ONC 1 /* locate space on cylinder boundary */:#define XAB$V_CBT 5 /* contiguous allocation, best try */0#define XAB$V_CTG 7 /* contiguous allocation */I/* Note: if you wish to access the xab$w_rfi field defined in th2e struct,$ * #undef this macro in your code */#ifndef __cplusplus#undef xab$w_rfi#define xab$w_rfi xab$w_rfi0#endif#ifdef __NEW_STARLET#define XABALL _xaballdef#else#define XABALL xaballdef#endif+#define cc$rms_xaball (*decc$ga_rms_xaball)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdef[ extern struct XABALL cc$rms_xaball; /* Declare initialized prototype data structures */# pragma extern_model __restore2#else] globalref struct XABALL cc$rms_xaball; /* Declare initialized prototype data structures */#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XABALLDEF_LOADED */ ww[fm/********************************* 2***********************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $XABCXFDEF ***/#ifndef __XABCXFDEF_LOADED#define __XABCXFDEF_LOADED 1 G#pragma __nostandard /* This file uses no2n-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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_2params#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 N/* */N/* RMS Context XAB associated with the FAB */N/* $xabcxfdef 2 */N/* */N#define XAB$C_CXF 32 /* XABCXF id code */#define XAB$M_CXFRST 0x1 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabcxfdef {#pragma __nomember_alignmentN un2signed char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabcxfdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */N/* */N/* Following in common with the CXR block, too. */N/* Do not rearrange witho2ut changing both. */N/* */P unsigned int xab$l_cxfsts; /* Status of the last file operation. */V unsigned int xab$l_cxfstv; /* Status Value of the last file operation. */N/* */O/* Top four bits of the options longword are reserved for the XABCXR. These */N/* bits describe the version of the key buffer 2. */N/* */ __union {N unsigned int xab$l_cxfcop; /* Context Options. */ __struct {\ unsigned xab$v_cxfrst : 1; /* Restore file state - use context blk as input. */( unsigned xab$v_fill_15_ : 7; } xab$r_cxfcop_bits; } xab$r_cxfcop_overlay;N unsigned int xab$l_cxfbkp; /* Bookkeeping bits 2 */N unsigned short int xab$w_cxfifi; /* Internal File Identifier */N unsigned char xab$b_cxfver; /* prologue version num */Q char xabcxfdef$$_fill_5; /* spare to longword align commonality */N unsigned int xabcxfdef$$_fill_6; /* spare */N/* */N/* Up Till now in common with XABCXR, too. */N/* 2 */N/* The following fields correspond to those in the FAB or IFB */N/* They should not be rearranged as their order is assumed for */N/* purposes of moving large chunks of data rather than a byte */N/* or word at a time. Note: ASSUME is used in the actual code */N/* */N unsigned short int xab$w_cxfdeq; 2 /* Default extention quantity */N unsigned char xab$b_cxffac; /* File access */N unsigned char xab$b_cxfshr; /* File Sharing */N unsigned short int xab$w_cxfrte; /* (Not used) */N char xabcxfdef$$_fill_7; /* spare */N unsigned char xab$b_cxforg; /* file organization */N unsigned short int xab$w_cxfgbc; /* global buffer count 2 */N unsigned char xab$b_cxfrtv; /* retrieval window */ char xabcxfdef$$_fill_8;N unsigned int xabcxfdef$$_fill_9 [4]; /* spares */ } XABCXFDEF; #if !defined(__VAXC)6#define xab$l_cxfcop xab$r_cxfcop_overlay.xab$l_cxfcop@#define xab$r_cxfcop_bits xab$r_cxfcop_overlay.xab$r_cxfcop_bits3#define xab$v_cxfrst xab$r_cxfcop_bits.xab$v_cxfrst"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !def 2ined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct xabcxfdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabcxfdef$$_fill_1; /* (spare) */N void *xab$l_nxt; 2 /* xab chain link */N/* */N/* Following in common with the CXR block, too. */N/* Do not rearrange without changing both. */N/* */P unsigned int xab$l_cxfsts; /* Status of the last file operation. */V unsigned int xab$l_cxfstv; /* Status Value of 2 the last file operation. */N/* */O/* Top four bits of the options longword are reserved for the XABCXR. These */N/* bits describe the version of the key buffer. */N/* */ __union {N unsigned int xab$l_cxfcop; /* Context Options. */ __struct {\ unsigned xab$v_cxfrst : 21; /* Restore file state - use context blk as input. */( unsigned xab$v_fill_15_ : 7; } xab$r_cxfcop_bits; } xab$r_cxfcop_overlay;N unsigned int xab$l_cxfbkp; /* Bookkeeping bits */N unsigned short int xab$w_cxfifi; /* Internal File Identifier */N unsigned char xab$b_cxfver; /* prologue version num */Q char xabcxfdef$$_fill_5; /* spare to longword align commonality */N unsigned i2nt xabcxfdef$$_fill_6; /* spare */N/* */N/* Up Till now in common with XABCXR, too. */N/* */N/* The following fields correspond to those in the FAB or IFB */N/* They should not be rearranged as their order is assumed for */N/* purposes of moving large chunk2s of data rather than a byte */N/* or word at a time. Note: ASSUME is used in the actual code */N/* */N unsigned short int xab$w_cxfdeq; /* Default extention quantity */N unsigned char xab$b_cxffac; /* File access */N unsigned char xab$b_cxfshr; /* File Sharing */N unsigned short int xab$w_cxfrte; /* (Not used) 2 */N char xabcxfdef$$_fill_7; /* spare */N unsigned char xab$b_cxforg; /* file organization */N unsigned short int xab$w_cxfgbc; /* global buffer count */N unsigned char xab$b_cxfrtv; /* retrieval window */ char xabcxfdef$$_fill_8;N unsigned int xabcxfdef$$_fill_9 [4]; /* spares */ } ; #if !defined(__VAXC)6#define xab$l_cxfcop xab$r 2_cxfcop_overlay.xab$l_cxfcopH#define xab$v_cxfrst xab$r_cxfcop_overlay.xab$r_cxfcop_bits.xab$v_cxfrst"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABCXFDEF operates after aggregate end */N#define XAB$K_CXFLEN 60 /* length of xab type CXF */N#define XAB$C_CXFLEN 60 /* length of xab type CXF */ #ifdef __NEW_STARLET#define XABCXF _xabcxfdef#else#define XABCXF xabcx2fdef#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XABCXFDEF_LOADED */ ww{m/********************************************************************************************************************************/= 2/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $XABCXRDEF ***/#ifndef __XABCXRDEF_LOADED#define __XABCXRDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#i2fdef __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)#defin2e __struct struct#else#define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* RMS Context XAB associated with the RAB */N/* $xabcxrdef */N/* 2 */N#define XAB$C_CXR 33 /* XABCXR id code */#define XAB$M_CXRRST 0x1#define XAB$C_CXB_VER1 1N#define XAB$C_CXRBLEN 512 /* Length of CXRBUF (bytes) */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabcxrdef {#pragma __nomember_alignment2N unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabcxrdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */N/* */N/* Following in common with the CXF block, too. */N/* Do not rearran2ge without changing it. */N/* */R unsigned int xab$l_cxrsts; /* Status of the last record operation. */X unsigned int xab$l_cxrstv; /* Status Value of the last record operation. */ __union {N unsigned int xab$l_cxrcop; /* Context Options. */ __struct {c unsigned xab$v_cxrrst : 1; /* Restore file/record state - use con 2text blk as input. */- unsigned xabcxrdef$$_fill_5 : 27;N unsigned xab$v_cxrbver : 4; /* Version of Key buffer */ } xab$r_cxrcop_bits; } xab$r_cxrcop_overlay;N unsigned int xab$l_cxrbkp; /* Bookkeeping bits */N unsigned short int xab$w_cxrisi; /* Internal Record Identifier */N unsigned char xab$b_cxrver; /* prologue version num. */Q char xabcxrdef$$_fill_6; /* spa2re to longword align commonality */N unsigned int xabcxrdef$$_fill_7; /* spare */N/* */N/* Up Till now in common with XABCXF, too. */N/* */N/* */N/* The following elements are arranged such that large amount2s of */N/* data can be moved at a time rather than words or bytes. Do not */N/* rearrange them without this consideration in mind. */N/* */K/* The following elements are stream dependent regardless of file org. */N/* */N unsigned char xab$b_cxrmbf; /* Multibuffer count */N unsigned cha2r xab$b_cxrmbc; /* Multiblock count */N unsigned short int xab$w_cxrbfz; /* sz in byte of CXRBUF */N/* */I/* The following elements are necessary for saving the NRP context for */I/* Sequential and Relative files. */N/* */N unsigned int xab$l_cxrvbn; /* NRP VBN2 */N unsigned short int xab$w_cxroff; /* NRP offset in VBN */N unsigned short int xab$w_fill_8; /* mbz - longword align */N/* */I/* The following elements are necessary for saving the NRP context for */I/* ISAM files. */N/* */N 2unsigned int xab$l_cxrpos0; /* Primary Positioning RFA */% unsigned short int xab$w_cxrpos4;N short int xabcxrdef$$_fill_9; /* Spare MBZ */N unsigned int xab$l_cxrcur0; /* Current Positioning RFA */% unsigned short int xab$w_cxrcur4;N short int xabcxrdef$$_fill_10; /* Spare MBZ */N unsigned int xab$l_cxrsid0; /* SIDR positioning RFA */% unsigned short int xab$w_c2xrsid4;N short int xabcxrdef$$_fill_11; /* Spare MBZ */N unsigned short int xab$w_cxrcnt; /* SIDR array count */N unsigned char xab$b_cxrkref; /* Cur Key of Reference */N unsigned char xab$b_cxrklen; /* Length of key */N char *xab$l_cxrbuf; /* address of key buf */N unsigned int xabcxrdef$$_fill_12 [2]; /* Spares */ } XABCXRDEF; 2 #if !defined(__VAXC)6#define xab$l_cxrcop xab$r_cxrcop_overlay.xab$l_cxrcop@#define xab$r_cxrcop_bits xab$r_cxrcop_overlay.xab$r_cxrcop_bits3#define xab$v_cxrrst xab$r_cxrcop_bits.xab$v_cxrrst5#define xab$v_cxrbver xab$r_cxrcop_bits.xab$v_cxrbver"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_ali 2gnment#endifstruct xabcxrdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabcxrdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */N/* */N/* Following in common with the C 2XF block, too. */N/* Do not rearrange without changing it. */N/* */R unsigned int xab$l_cxrsts; /* Status of the last record operation. */X unsigned int xab$l_cxrstv; /* Status Value of the last record operation. */ __union {N unsigned int xab$l_cxrcop; /* Context Options. */ __struct {c un2signed xab$v_cxrrst : 1; /* Restore file/record state - use context blk as input. */- unsigned xabcxrdef$$_fill_5 : 27;N unsigned xab$v_cxrbver : 4; /* Version of Key buffer */ } xab$r_cxrcop_bits; } xab$r_cxrcop_overlay;N unsigned int xab$l_cxrbkp; /* Bookkeeping bits */N unsigned short int xab$w_cxrisi; /* Internal Record Identifier */N unsigned char xab$b_cxrver; /* prologue version nu2m. */Q char xabcxrdef$$_fill_6; /* spare to longword align commonality */N unsigned int xabcxrdef$$_fill_7; /* spare */N/* */N/* Up Till now in common with XABCXF, too. */N/* */N/* */N/* 2 The following elements are arranged such that large amounts of */N/* data can be moved at a time rather than words or bytes. Do not */N/* rearrange them without this consideration in mind. */N/* */K/* The following elements are stream dependent regardless of file org. */N/* */N unsigned char xab$b_cxrmbf; 2 /* Multibuffer count */N unsigned char xab$b_cxrmbc; /* Multiblock count */N unsigned short int xab$w_cxrbfz; /* sz in byte of CXRBUF */N/* */I/* The following elements are necessary for saving the NRP context for */I/* Sequential and Relative files. */N/* 2 */N unsigned int xab$l_cxrvbn; /* NRP VBN */N unsigned short int xab$w_cxroff; /* NRP offset in VBN */N unsigned short int xab$w_fill_8; /* mbz - longword align */N/* */I/* The following elements are necessary for saving the NRP context for */I/* ISAM files. */N/* 2 */N unsigned int xab$l_cxrpos0; /* Primary Positioning RFA */% unsigned short int xab$w_cxrpos4;N short int xabcxrdef$$_fill_9; /* Spare MBZ */N unsigned int xab$l_cxrcur0; /* Current Positioning RFA */% unsigned short int xab$w_cxrcur4;N short int xabcxrdef$$_fill_10; /* Spare MBZ */N unsigned int xab$l_cxrsid0; /* SID2R positioning RFA */% unsigned short int xab$w_cxrsid4;N short int xabcxrdef$$_fill_11; /* Spare MBZ */N unsigned short int xab$w_cxrcnt; /* SIDR array count */N unsigned char xab$b_cxrkref; /* Cur Key of Reference */N unsigned char xab$b_cxrklen; /* Length of key */N char *xab$l_cxrbuf; /* address of key buf */N unsigned int xabcxrdef$$_fil 2l_12 [2]; /* Spares */ } ; #if !defined(__VAXC)6#define xab$l_cxrcop xab$r_cxrcop_overlay.xab$l_cxrcopH#define xab$v_cxrrst xab$r_cxrcop_overlay.xab$r_cxrcop_bits.xab$v_cxrrstJ#define xab$v_cxrbver xab$r_cxrcop_overlay.xab$r_cxrcop_bits.xab$v_cxrbver"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABCXRDEF operates after aggregate end */N#define XAB$K_CXRLEN 84 /* Length of XAB2 type CXR */N#define XAB$C_CXRLEN 84 /* Length of XAB type CXR */ #ifdef __NEW_STARLET#define XABCXR _xabcxrdef#else#define XABCXR xabcxrdef#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif / 2* __XABCXRDEF_LOADED */ wwn/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $XABDATDEF ***/#ifndef __XABDATDE1 UTIL$ROUTINES1VADEF1VAXDEF:2F VA_RANGEDEF@2nWBEMIDEFR2,WWIDDEFXABl2 XABALLDEF2 XABCXFDEF2h XABCXRDEF2( XABDATDEF2:XABDEF2 XABFHCDEF2 XABITMDEF3X XABJNLDEF3, XABKEYDEFR3 XABPRODEFn3\ XABRDTDEFw3TXABRUDEF3 XABSUMDEF3 XABTRMDEF3vXADEF32XKDEVDEF3XKSTSDEF3 XMDEF3^XWDEF2F_LOADED#define __XABDATDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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" {2#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 N/* */N/* date/time xab definition 2s */N/* $xabdatdef */N/* */N/* */N#define XAB$C_DAT 18 /* xabdat id code */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __no 2member_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabdatdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabdatdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */! unsigned short int xab$w_rvn;! short int 2xabdatdef$$_fill_2; __int64 xab$q_rdt; __int64 xab$q_cdt; __int64 xab$q_edt; __int64 xab$q_bdt; __int64 xab$q_rcd; __int64 xab$q_eff; __int64 xab$q_acc; __int64 xab$q_att; __int64 xab$q_mod; } XABDATDEF;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct xabdatdef {#pragma 2__nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabdatdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */! unsigned short int xab$w_rvn;! short int xabdatdef$$_fill_2; __int64 xab$q_rdt; __int64 xab$q_cdt; __int64 xab$q_edt; __int64 xab$q_bd2t; __int64 xab$q_rcd; __int64 xab$q_eff; __int64 xab$q_acc; __int64 xab$q_att; __int64 xab$q_mod; } ;%#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABDATDEF operates after aggregate end */N#define XAB$K_DATLEN 84 /* length of XABDAT */N#define XAB$C_DATLEN 84 /* length of XABDAT */ #ifdef __NEW_STARLET#define XABDAT _xabdatdef#else#define XABDAT xabdatdef#end2if#define XAB$K_DATLEN_V2 36#define XAB$C_DATLEN_V2 36#define XAB$K_DATLEN_V54 44#define XAB$C_DATLEN_V54 44$#define XAB$K_DATLEN_PRE_ACCDATES 60$#define XAB$C_DATLEN_PRE_ACCDATES 60%#define XAB$K_DATLEN_POST_ACCDATES 84%#define XAB$C_DATLEN_POST_ACCDATES 84#define XAB$K_DATLEN 84#define XAB$C_DATLEN 84+#define cc$rms_xabdat (*decc$ga_rms_xabdat)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdef[ extern struct XABDA2T cc$rms_xabdat; /* Declare initialized prototype data structures */# pragma extern_model __restore#else] globalref struct XABDAT cc$rms_xabdat; /* Declare initialized prototype data structures */#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __stan 2dard #endif /* __XABDATDEF_LOADED */ wwwn/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $XABDEF ***/#ifn 2def __XABDEF_LOADED#define __XABDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 exte2rn "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 N/* */N/* definitions f2or all xabs */N/* $xabdef */N/* */N/* the first four fields are shared in common between all xabs */N/* and hence are defined only once */N/* (the only exception is that the spare word may be used by some xabs) */N/* 2 */ #ifdef __NEW_STARLETtypedef struct _xabdef {N unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */! unsigned short int xab$w_rvn; short int xabdef$$_fill_2; __int64 xab$q_rdt; } XABDEF 2;#else /* __OLD_STARLET */struct xabdef {N unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */! unsigned short int xab$w_rvn; short int xabdef$$_fill_2; __int64 xab$q_rdt; } ;%#endif /* #ifdef __NEW_STA2RLET */ #ifdef __NEW_STARLETtypedef struct _xabdef1 { char xabdef$$_fill_3 [8];O char xabdef$$_fill_4; /*THESE FIELDS WILL BE DEFINED LATER */ char xabdef$$_fill_5; short int xabdef$$_fill_6;! unsigned int xabdef$$_fill_7;! unsigned int xabdef$$_fill_8; short int xabdef$$_fill_9;N unsigned char xab$b_bkz; /*COMMON TO FHC AND ALQ XABS */ } XABDEF1;#else /* __OLD_STARLET */struct xabdef1 { char xabdef$$_2fill_3 [8];O char xabdef$$_fill_4; /*THESE FIELDS WILL BE DEFINED LATER */ char xabdef$$_fill_5; short int xabdef$$_fill_6;! unsigned int xabdef$$_fill_7;! unsigned int xabdef$$_fill_8; short int xabdef$$_fill_9;N unsigned char xab$b_bkz; /*COMMON TO FHC AND ALQ XABS */ } ;%#endif /* #ifdef __NEW_STARLET */N#define XAB$C_CXT_VER1 1 /* RMS Context Extraction version 1 */ #ifdef __NEW_STARLET#else#d2efine XAB xabdef#define XABDEF1 xabdef1#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XABDEF_LOADED */ ww۞n/************************************************************************************************* 2*******************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $XABFHCDEF ***/#ifndef __XABFHCDEF_LOADED#define __XABFHCDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save2#pragma __nomember_alignmentR#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 __st2ruct#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 N/* */N/* file header characteristics xab definitions */N/* $xabfhcdef */N/* 2 */N/* the fields of this xab cannot be rearranged since */N/* they correspond to an on-disk structure */N/* */N#define XAB$C_FHC 29 /* xabfhc id code */#define XAB$M_FTN 0x1#define XAB$M_CR 0x2#define XAB$M_PRN 0x4#define XAB$M_BLK 0x8#define XAB$M_GBC_PERCENT 0x1#defin 2e XAB$M_GBC_DEFAULT 0x2 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabfhcdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabfhcdef$$_fill_1; /* ( 2spare) */N void *xab$l_nxt; /* xab chain link */N unsigned char xab$b_rfo; /* record format and file org */ __union {N unsigned char xab$b_atr; /* record attributes */ __struct {N unsigned xab$v_ftn : 1; /* fortran carriage-ctl */N unsigned xab$v_cr : 1; /* lf-record-cr carriage ctl */N unsigned xab$v_prn : 2 1; /* print-file carriage ctl */R unsigned xab$v_blk : 1; /* records don't cross block boundaries */( unsigned xab$v_fill_11_ : 4; } xab$r_fill_10_; } xab$r_fill_9_;N unsigned short int xab$w_lrl; /* longest record's length */ __union {N unsigned int xab$l_hbk; /* hi vbn allocated */N/* (n.b. reversed on disk!) */ __struct 2{* unsigned short int xab$w_hbk0;* unsigned short int xab$w_hbk2; } xab$r_hbk_fields; } xab$r_hbk_overlay; __union {N unsigned int xab$l_ebk; /* eof vbn */N/* (n.b. reversed on disk) */ __struct {* unsigned short int xab$w_ebk0;* unsigned short int xab$w_ebk2; } xab$r_ebk_fields; } xab$r_ebk_overlay;N2 unsigned short int xab$w_ffb; /* first free byte in eof block */N unsigned char xab$b_bkz; /*COMMON TO FHC AND ALQ XABS */N/* defined above in $xabdef, since it is shared */N/* by the all xab) */N unsigned char xab$b_hsz; /* header size for vfc */N unsigned short int xab$w_mrz; /* max record size */N unsigned short int xab 2$w_dxq; /* default extend quantity */ __union {Q unsigned short int xab$w_gbc; /* global buffer count (original word) */N unsigned short int xab$w_gbc16; /* Alias */ } xab$r_gbc16_overlay; __union {P unsigned char xab$b_recattr_flags; /* flags for record attribute area */ __struct {f unsigned xab$v_gbc_percent : 1; /* Interpret value in GBC32 as percent instead of count */f unsi2gned xab$v_gbc_default : 1; /* RMS should set default for GBC at runtime and ignore */N/* any values in GBC16 or GBC32 */N unsigned xabfhcdef$$_fill_7 : 6; /* Reserved for future use */' } xab$r_recattr_flags_bits;& } xab$r_recattr_flags_overlay;a char xabfhcdef$$_fill_8; /* reserved for future use (possible flags word union) */\ unsigned int xab$l_gbc32; /* longword implementation of global 2 buffer count */Z char xabfhcdef$$_fill_6 [2]; /* spare space documented as unused in I/O REF */N unsigned short int xab$w_verlimit; /* version limit for file. */N/*-----***** */N unsigned int xab$l_sbn; /* starting lbn if contiguous */ } XABFHCDEF; #if !defined(__VAXC))#define xab$b_atr xab$r_fill_9_.xab$b_atr8#define xab$v_ftn xab$r_fill_9_.xab$r_fill_10_.xab$v_ftn6#define xa 2b$v_cr xab$r_fill_9_.xab$r_fill_10_.xab$v_cr8#define xab$v_prn xab$r_fill_9_.xab$r_fill_10_.xab$v_prn8#define xab$v_blk xab$r_fill_9_.xab$r_fill_10_.xab$v_blk-#define xab$l_hbk xab$r_hbk_overlay.xab$l_hbk;#define xab$r_hbk_fields xab$r_hbk_overlay.xab$r_hbk_fields.#define xab$w_hbk0 xab$r_hbk_fields.xab$w_hbk0.#define xab$w_hbk2 xab$r_hbk_fields.xab$w_hbk2-#define xab$l_ebk xab$r_ebk_overlay.xab$l_ebk;#define xab$r_ebk_fields xab$r_ebk_overlay.xab$r_ebk_fields.#define xab$w_ebk0 xab$r_ebk 2_fields.xab$w_ebk0.#define xab$w_ebk2 xab$r_ebk_fields.xab$w_ebk2/#define xab$w_gbc xab$r_gbc16_overlay.xab$w_gbc3#define xab$w_gbc16 xab$r_gbc16_overlay.xab$w_gbc16K#define xab$b_recattr_flags xab$r_recattr_flags_overlay.xab$b_recattr_flags`#define xab$v_gbc_percent xab$r_recattr_flags_overlay.xab$r_recattr_flags_bits.xab$v_gbc_percent`#define xab$v_gbc_default xab$r_recattr_flags_overlay.xab$r_recattr_flags_bits.xab$v_gbc_default"#endif /* #if !defined(__VAXC) */ #else /* __OLD_S 2TARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct xabfhcdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabfhcdef$$_fill_1; /* (spare) */N void *xab$ 2l_nxt; /* xab chain link */N unsigned char xab$b_rfo; /* record format and file org */ __union {N unsigned char xab$b_atr; /* record attributes */ __struct {N unsigned xab$v_ftn : 1; /* fortran carriage-ctl */N unsigned xab$v_cr : 1; /* lf-record-cr carriage ctl */N unsigned xab$v_prn : 1; /* print-file carriage ctl */R 2 unsigned xab$v_blk : 1; /* records don't cross block boundaries */( unsigned xab$v_fill_11_ : 4; } xab$r_fill_10_; } xab$r_fill_9_;N unsigned short int xab$w_lrl; /* longest record's length */ __union {N unsigned int xab$l_hbk; /* hi vbn allocated */N/* (n.b. reversed on disk!) */ __struct {* unsigned short int xab$w_hbk0;* 2 unsigned short int xab$w_hbk2; } xab$r_hbk_fields; } xab$r_hbk_overlay; __union {N unsigned int xab$l_ebk; /* eof vbn */N/* (n.b. reversed on disk) */ __struct {* unsigned short int xab$w_ebk0;* unsigned short int xab$w_ebk2; } xab$r_ebk_fields; } xab$r_ebk_overlay;N unsigned short int xab$w_ffb; /* first f2ree byte in eof block */N unsigned char xab$b_bkz; /*COMMON TO FHC AND ALQ XABS */N/* defined above in $xabdef, since it is shared */N/* by the all xab) */N unsigned char xab$b_hsz; /* header size for vfc */N unsigned short int xab$w_mrz; /* max record size */N unsigned short int xab$w_dxq; /* default extend quantity 2*/ __union {Q unsigned short int xab$w_gbc; /* global buffer count (original word) */N unsigned short int xab$w_gbc16; /* Alias */ } xab$r_gbc16_overlay; __union {P unsigned char xab$b_recattr_flags; /* flags for record attribute area */ __struct {f unsigned xab$v_gbc_percent : 1; /* Interpret value in GBC32 as percent instead of count */f unsigned xab$v_gbc_default : 1; /* RMS should set defa2ult for GBC at runtime and ignore */N/* any values in GBC16 or GBC32 */N unsigned xabfhcdef$$_fill_7 : 6; /* Reserved for future use */' } xab$r_recattr_flags_bits;& } xab$r_recattr_flags_overlay;a char xabfhcdef$$_fill_8; /* reserved for future use (possible flags word union) */\ unsigned int xab$l_gbc32; /* longword implementation of global buffer count */Z char xabfhcdef$$_fill_6 [2]; 2 /* spare space documented as unused in I/O REF */N unsigned short int xab$w_verlimit; /* version limit for file. */N/*-----***** */N unsigned int xab$l_sbn; /* starting lbn if contiguous */ } ; #if !defined(__VAXC))#define xab$b_atr xab$r_fill_9_.xab$b_atr8#define xab$v_ftn xab$r_fill_9_.xab$r_fill_10_.xab$v_ftn6#define xab$v_cr xab$r_fill_9_.xab$r_fill_10_.xab$v_cr8#define xab$ 2v_prn xab$r_fill_9_.xab$r_fill_10_.xab$v_prn8#define xab$v_blk xab$r_fill_9_.xab$r_fill_10_.xab$v_blk-#define xab$l_hbk xab$r_hbk_overlay.xab$l_hbk@#define xab$w_hbk0 xab$r_hbk_overlay.xab$r_hbk_fields.xab$w_hbk0@#define xab$w_hbk2 xab$r_hbk_overlay.xab$r_hbk_fields.xab$w_hbk2-#define xab$l_ebk xab$r_ebk_overlay.xab$l_ebk@#define xab$w_ebk0 xab$r_ebk_overlay.xab$r_ebk_fields.xab$w_ebk0@#define xab$w_ebk2 xab$r_ebk_overlay.xab$r_ebk_fields.xab$w_ebk2/#define xab$w_gbc xab$r_gbc16_overlay.xab$ 2w_gbc3#define xab$w_gbc16 xab$r_gbc16_overlay.xab$w_gbc16K#define xab$b_recattr_flags xab$r_recattr_flags_overlay.xab$b_recattr_flags`#define xab$v_gbc_percent xab$r_recattr_flags_overlay.xab$r_recattr_flags_bits.xab$v_gbc_percent`#define xab$v_gbc_default xab$r_recattr_flags_overlay.xab$r_recattr_flags_bits.xab$v_gbc_default"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABFHCDEF operates after aggregate end */N#define XA2B$K_FHCLEN 44 /* length of xabfhc */N#define XAB$C_FHCLEN 44 /* length of xabfhc */ #ifdef __NEW_STARLET#define XABFHC _xabfhcdef#else#define XABFHC xabfhcdef#endif+#define cc$rms_xabfhc (*decc$ga_rms_xabfhc)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdef[ extern struct XABFHC cc$rms_xabfhc; /* Declare initialized prototype data structures */# pragma e2xtern_model __restore#else] globalref struct XABFHC cc$rms_xabfhc; /* Declare initialized prototype data structures */#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XABFHCDEF_LOADED */ ww o/********* 2***********************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $XABITMDEF ***/#ifndef __XABITMDEF_LOADED#define __XABITMDEF_LOADED 1 G#pragma __nostandard 2 /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 ...#e2lse#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 N/* */N/* Item XAB definitions */N/* 2 */N#define XAB$C_ITM 36 /* xabitm id code */S/* The following set of flags exactly mimic the FCHDEF flags defined in STARLET. */X/* They are here to provide an unsupported interface to the UCHAR longword maintained */N/* by the file system. */N/* */N/* Note: RESERVED6 is the c2ounterpart of FCH$x_SCRATCH. This SCRATCH bit */N/* means the file is a temporary file that should only exist within the */O/* context of an XQP operation. This bit should NEVER be visible to a user. */N/* (It was implemented by XQP for ACP MOVEFILE subfunction. A 'scratch' */N/* file is created with the scratch bit set in the file header. This is */N/* made to be the 'moved' file, then the original file is replaced by the */N/* moved file, and finally everything is cleaned up. 2 If a crash occurs, */N/* the scratch file is left lying around; the scratch bit is used to signal */N/* to ANALYZE/DISK/REPAIR that this header is not being used.) RMS should */N/* not provide any interface to sense or set this bit. */N/* */#define XAB$M_WASCONTIG 0x1#define XAB$M_NOBACKUP 0x2#define XAB$M_WRITEBACK 0x4#define XAB$M_READCHECK 0x8#define XAB$M_WRITCHECK 0x10#define XA2B$M_CONTIGB 0x20#define XAB$M_LOCKED 0x40#define XAB$M_CONTIG 0x80#define XAB$M_RESERVED1 0x100#define XAB$M_RESERVED2 0x200#define XAB$M_RESERVED3 0x400#define XAB$M_BADACL 0x800#define XAB$M_SPOOL 0x1000#define XAB$M_DIRECTORY 0x2000#define XAB$M_BADBLOCK 0x4000#define XAB$M_MARKDEL 0x8000#define XAB$M_NOCHARGE 0x10000#define XAB$M_ERASE 0x20000#define XAB$M_RESERVED4 0x40000#define XAB$M_SHELVED 0x80000 #define XAB$M_RESERVED6 0x100000#define XAB$M_NOMOVE 0x2200000"#define XAB$M_NOSHELVABLE 0x400000!#define XAB$M_PRESHELVED 0x800000 #ifdef __NEW_STARLETNtypedef struct _uchar_flags { /* mimics $FCHDEF */! unsigned xab$v_wascontig : 1; unsigned xab$v_nobackup : 1;! unsigned xab$v_writeback : 1;! unsigned xab$v_readcheck : 1;! unsigned xab$v_writcheck : 1; unsigned xab$v_contigb : 1; unsigned xab$v_locked : 1; unsigned xab$v_contig : 1;! unsigned xab$v_reserved1 : 1;! unsi2gned xab$v_reserved2 : 1;! unsigned xab$v_reserved3 : 1; unsigned xab$v_badacl : 1; unsigned xab$v_spool : 1;! unsigned xab$v_directory : 1; unsigned xab$v_badblock : 1; unsigned xab$v_markdel : 1; unsigned xab$v_nocharge : 1; unsigned xab$v_erase : 1;! unsigned xab$v_reserved4 : 1; unsigned xab$v_shelved : 1;! unsigned xab$v_reserved6 : 1; unsigned xab$v_nomove : 1;# unsigned xab$v_noshelvable : 1;" unsigned xab$v_preshelved : 21; } UCHAR_FLAGS;#else /* __OLD_STARLET */Nstruct uchar_flags { /* mimics $FCHDEF */! unsigned xab$v_wascontig : 1; unsigned xab$v_nobackup : 1;! unsigned xab$v_writeback : 1;! unsigned xab$v_readcheck : 1;! unsigned xab$v_writcheck : 1; unsigned xab$v_contigb : 1; unsigned xab$v_locked : 1; unsigned xab$v_contig : 1;! unsigned xab$v_reserved1 : 1;! unsigned xab$v_reserved2 : 1;! unsigned xab$v_res2erved3 : 1; unsigned xab$v_badacl : 1; unsigned xab$v_spool : 1;! unsigned xab$v_directory : 1; unsigned xab$v_badblock : 1; unsigned xab$v_markdel : 1; unsigned xab$v_nocharge : 1; unsigned xab$v_erase : 1;! unsigned xab$v_reserved4 : 1; unsigned xab$v_shelved : 1;! unsigned xab$v_reserved6 : 1; unsigned xab$v_nomove : 1;# unsigned xab$v_noshelvable : 1;" unsigned xab$v_preshelved : 1; } ;%#endif /* #ifdef __NEW_STARLET *2/M#define XAB$_NET_BUFFER_SIZE 1 /* (sense) negociated buffer size */O#define XAB$_NET_BLOCK_COUNT 2 /* (set,sense) requested block count */J#define XAB$_NET_REMOTE_SYSTEM 3 /* (sense) remote system type */N#define XAB$_NET_REMOTE_FILE_SYSTEM 4 /* (sense) remote file system type */U#define XAB$_NET_EXTPROT 5 /* (set,sense) actual extended protection */Q#define XAB$_NET_SYSCAP_LOCAL 6 /* (sense) DAP SYSCAP of local system */R#define XAB$2_NET_SYSCAP_REMOTE 7 /* (sense) DAP SYSCAP of remote system */Q#define XAB$_NET_DAPVER_LOCAL 8 /* (sense) DAP version - local system */R#define XAB$_NET_DAPVER_REMOTE 9 /* (sense) DAP version - remote system */X#define XAB$_NET_LINK_TIMEOUT 10 /* (set,sense) logical link timeout (seconds) */M#define XAB$_NET_DATA_CRC_ENABLE 11 /* (set,sense) DAP level CRC */S#define XAB$_NET_LINK_CACHE_ENABLE 12 /* (set,sense) Logical link cache enable */I/* ,NET_D 2ATA_COMPRESSION /* (set,sense) do data compression (FUTURE) */#define XAB$K_NET_MIN 1#define XAB$K_NET_MAX 12P#define XAB$_STAT_ENABLE 64 /* (set,sense) Read statistics enable */e#define XAB$_FILE_LENGTH_HINT 65 /* (set,sense) File length hint (set of 2 quadword fields) */#define XAB$K_STAT_MIN 64#define XAB$K_STAT_MAX 65Z#define XAB$_UCHAR 128 /* (sense) Read file characteristics (obsolete) */I#define XAB$_UCHAR_WASCONTIG 129 /* (sense) FCH2$V_WASCONTIG */M#define XAB$_UCHAR_NOBACKUP 130 /* (set,sense) FCH$V_NOBACKUP */I#define XAB$_UCHAR_WRITEBACK 131 /* (sense) FCH$V_WRITEBACK */M#define XAB$_UCHAR_READCHECK 132 /* (set,sense) FCH$V_READCHECK */M#define XAB$_UCHAR_WRITECHECK 133 /* (set,sense) FCH$V_WRITECHECK */M#define XAB$_UCHAR_CONTIGB 134 /* (set,sense) FCH$V_CONTIGB */M#define XAB$_UCHAR_LOCKED 135 /* (set,sense) FCH$V_LOCKED */I#define 2XAB$_UCHAR_CONTIG 136 /* (sense) FCH$V_CONTIG */I#define XAB$_UCHAR_BADACL 137 /* (sense) FCH$V_BADACL */I#define XAB$_UCHAR_SPOOL 138 /* (sense) FCH$V_SPOOL */I#define XAB$_UCHAR_DIRECTORY 139 /* (sense) FCH$V_DIRECTORY */I#define XAB$_UCHAR_BADBLOCK 140 /* (sense) FCH$V_BADBLOCK */I#define XAB$_UCHAR_MARKDEL 141 /* (sense) FCH$V_BADBLOCK */I#define XAB$_UCHAR_NOCHARGE 142 /* (sense) FCH$V_N 2OCHARGE */M#define XAB$_UCHAR_ERASE 143 /* (set,sense) FCH$V_ERASE */M#define XAB$_UCHAR_NOMOVE 144 /* (set,sense) FCH$V_NOMOVE */N#define XAB$_UCHAR_SHELVED 145 /* (sense) FCH$V_SHELVED */N#define XAB$_UCHAR_NOSHELVABLE 146 /* (set,sense) FCH$V_NOSHELVABLE */I#define XAB$_UCHAR_PRESHELVED 147 /* (sense) FCH$V_PRESHELVED */#define XAB$K_UCHAR_MIN 128#define XAB$K_UCHAR_MAX 147V#define XAB$_STORED_SEMANTICS 1922 /* (set,sense) Stored semantics of the file */V#define XAB$_ACCESS_SEMANTICS 193 /* (set,sense) Access semantics of the file */[#define XAB$_RMS_EXTENSION 194 /* (set,sense) Required RMS processing extension */#define XAB$K_XLATE_MIN 192#define XAB$K_XLATE_MAX 194W#define XAB$C_SEMANTICS_MAX_LEN 64 /* max length for stored or access semantics */W#define XAB$K_SEMANTICS_MAX_LEN 64 /* max length for stored or access semantics */`#define XAB$_MULTIBUFFER_COU2NT 256 /* (set-only) Multibuffer count (not limited to 127) */N/* legal only on $CONNECT */w#define XAB$_NORECORD 257 /* (set-only) Norecord suppresses update of the expiration d/t, passed in on */N/* on $OPEN or $CLOSE */N#define XAB$_RECOVERY 258 /* Used to indicate type of */N/* recovery in progress. 2 */N#define XAB$_RUJVOLNAM 259 /* Used to control RUJ placement */U#define XAB$_GBC32 260 /* (set/sense) GBC longword implementation */Q#define XAB$_LINKCOUNT 261 /* (set/sense) ODS-5 (hard) link count */N#define XAB$_GBCFLAGS 262 /* (set/sense) GBC flags */#define XAB$K_MISC_MIN 256#define XAB$K_MISC_MAX 262N#define XAB$_TID 320 /* (set/sense) TID */#define XAB$K_TID_MIN 320#def2ine XAB$K_TID_MAX 320U#define XAB$_CACHING_OPTIONS 384 /* (set,sense) VDC runtime caching options */U#define XAB$_CACHING_ATTRIBUTE 385 /* (set, sense) VDC perm caching attribute */%#define XAB$K_CACHING_OPTIONS_MIN 384%#define XAB$K_CACHING_OPTIONS_MAX 385N#define XAB$_ACCDATE 448 /* (set,sense) access date */O#define XAB$_ATTDATE 449 /* (set,sense) attribute change date */P#define XAB$_MODDATE 450 /* (set,sense) data modi2fication date */#define XAB$K_DATE_MIN 448#define XAB$K_DATE_MAX 450#define XAB$K_SENSEMODE 1#define XAB$K_SETMODE 2 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabitmdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$2b_bln; /* block length */N short int xabitmdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */N void *xab$l_itemlist; /* Address of the item list */N/* In the user interface, item codes are arbitrary integer values, so */N/* we may as well allow logical groups to have contiguous codes, with */N/* room for expansion (to allow table driven cod 2e). */Q unsigned char xab$b_mode; /* must be either SETMODE or SENSEMODE */R char xab$b_itm_fill1 [3]; /* Reserved space for future definition */R unsigned int xab$il_itm_fill2 [4]; /* Reserved space for future definition */ } XABITMDEF;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_a 2lignment#endifstruct xabitmdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabitmdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */N void *xab$l_itemlist; /* Address of the item list */N/* In the user interface, item codes a 2re arbitrary integer values, so */N/* we may as well allow logical groups to have contiguous codes, with */N/* room for expansion (to allow table driven code). */Q unsigned char xab$b_mode; /* must be either SETMODE or SENSEMODE */R char xab$b_itm_fill1 [3]; /* Reserved space for future definition */R unsigned int xab$il_itm_fill2 [4]; /* Reserved space for future definition */ } ;%#endif /* #ifdef __NEW_STARLET */N/* 2 basealign on aggregate XABITMDEF operates after aggregate end */#define XAB$K_ITMLEN 32#define XAB$C_ITMLEN 32N/* Define fields and constant values for XAB$_CACHING_OPTIONS longword. */N/* These must match [STARLET]FIBDEF.SDL exactly */!#define XAB$M_FILE_ATTRIBUTES 0xF #define XAB$M_FILE_CONTENTS 0xF0#define XAB$K_DEFAULT 0#define XAB$K_WRITETHROUGH 1#define XAB$K_WRITEBEHIND 2#define XAB$K_NOCACHING 3"#define XAB$M_FLUSH_ON_CLOSE 0xF200#define XAB$K_FLUSH 1#define XAB$K_NOFLUSH 2%#define XAB$M_CACHECTL_MBZ 0xFFFFF000 #ifdef __NEW_STARLET+typedef struct _xab_caching_options_flags {' unsigned xab$v_file_attributes : 4;% unsigned xab$v_file_contents : 4;& unsigned xab$v_flush_on_close : 4;% unsigned xab$v_cachectl_mbz : 20; } XAB_CACHING_OPTIONS_FLAGS;#else /* __OLD_STARLET */"struct xab_caching_options_flags {' unsigned xab$v_file_attributes : 4;% unsigned xab$v_file_contents :2 4;& unsigned xab$v_flush_on_close : 4;% unsigned xab$v_cachectl_mbz : 20; } ;%#endif /* #ifdef __NEW_STARLET */N/* The following set of flags mimic the IFB$B_RECVRFLGS flags. */N/* They are here to provide an interface for RECOVER. */#define XAB$M_RCF_RU 0x1#define XAB$M_RCF_AI 0x2#define XAB$M_RCF_BI 0x4#define XAB$M_RCF_NOPAD 0x8 #ifdef __NEW_STARLETtypedef struct _xab_rcf_flags { unsigned xab$v_rcf_ru : 1; unsign2ed xab$v_rcf_ai : 1; unsigned xab$v_rcf_bi : 1;! unsigned xab$v_rcf_nopad : 1; unsigned xab$v_fill_17_ : 4; } XAB_RCF_FLAGS;#else /* __OLD_STARLET */struct xab_rcf_flags { unsigned xab$v_rcf_ru : 1; unsigned xab$v_rcf_ai : 1; unsigned xab$v_rcf_bi : 1;! unsigned xab$v_rcf_nopad : 1; unsigned xab$v_fill_17_ : 4; } ;%#endif /* #ifdef __NEW_STARLET */#define XAB$K_DISABLE 0#define XAB$K_ENABLE 1#define XAB$K_RT11 1#define XAB$K_RS2TS 2#define XAB$K_RSX11S 3#define XAB$K_RSX11M 4#define XAB$K_RSX11D 5#define XAB$K_IAS 6#define XAB$K_VAXVMS 7#define XAB$K_TOPS20 8#define XAB$K_TOPS10 9#define XAB$K_RTS8 10#define XAB$K_OS8 11#define XAB$K_RSX11MP 12#define XAB$K_COPOS11 13#define XAB$K_P_OS 14#define XAB$K_VAXELN 15#define XAB$K_CPM 16#define XAB$K_MS_DOS 17#define XAB$K_ULTRIX_32 18#define XAB$K_ULTRIX_11 19#define XAB$K_RMS11 1#define XAB$K_RMS20 2#define XAB$K_RMS32 3#define XA2B$K_FCS11 4#define XAB$K_RT11FS 5#define XAB$K_NO_FS 6#define XAB$K_TOPS20FS 7#define XAB$K_TOPS10FS 8#define XAB$K_OS8FS 9#define XAB$K_RMS32S 10#define XAB$K_CPMFS 11#define XAB$K_MS_DOSFS 12#define XAB$K_ULTRIX32_FS 13#define XAB$K_ULTRIX11_FS 14#define XAB$M_NET_NOREAD 0x1#define XAB$M_NET_NOWRITE 0x2#define XAB$M_NET_NOEXECUTE 0x4#define XAB$M_NET_NODELETE 0x8#define XAB$M_NET_NOAPPEND 0x10"#define XAB$M_NET_NODIRECTORY 0x20#define XAB$M_NET_NOUPDATE 0x402#define XAB$M_NET_NOCHANGE 0x80 #define XAB$M_NET_NOEXTEND 0x100 #ifdef __NEW_STARLETtypedef struct _xabnetextprot { __union {, unsigned short int xab$w_system_acc; __struct {* unsigned xab$v_net_noread : 1;+ unsigned xab$v_net_nowrite : 1;- unsigned xab$v_net_noexecute : 1;, unsigned xab$v_net_nodelete : 1;, unsigned xab$v_net_noappend : 1;/ unsigned xab$v_net_nodirectory : 1;, 2unsigned xab$v_net_noupdate : 1;, unsigned xab$v_net_nochange : 1;, unsigned xab$v_net_noextend : 1;( unsigned xab$v_fill_20_ : 7; } xab$r_fill_19_; } xab$r_fill_18_;' unsigned short int xab$w_owner_acc;' unsigned short int xab$w_group_acc;' unsigned short int xab$w_world_acc; } XABNETEXTPROT; #if !defined(__VAXC)8#define xab$w_system_acc xab$r_fill_18_.xab$w_system_accG#define xab$v_net_noread xab$r_fill_18_.xab$r_2fill_19_.xab$v_net_noreadI#define xab$v_net_nowrite xab$r_fill_18_.xab$r_fill_19_.xab$v_net_nowriteM#define xab$v_net_noexecute xab$r_fill_18_.xab$r_fill_19_.xab$v_net_noexecuteK#define xab$v_net_nodelete xab$r_fill_18_.xab$r_fill_19_.xab$v_net_nodeleteK#define xab$v_net_noappend xab$r_fill_18_.xab$r_fill_19_.xab$v_net_noappendQ#define xab$v_net_nodirectory xab$r_fill_18_.xab$r_fill_19_.xab$v_net_nodirectoryK#define xab$v_net_noupdate xab$r_fill_18_.xab$r_fill_19_.xab$v_net_noupdateK#def 3ine xab$v_net_nochange xab$r_fill_18_.xab$r_fill_19_.xab$v_net_nochangeK#define xab$v_net_noextend xab$r_fill_18_.xab$r_fill_19_.xab$v_net_noextend"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct xabnetextprot { __union {, unsigned short int xab$w_system_acc; __struct {* unsigned xab$v_net_noread : 1;+ unsigned xab$v_net_nowrite : 1;- unsigned xab$v_net_noexecute : 1;, unsigned xab$v_net_nodel3ete : 1;, unsigned xab$v_net_noappend : 1;/ unsigned xab$v_net_nodirectory : 1;, unsigned xab$v_net_noupdate : 1;, unsigned xab$v_net_nochange : 1;, unsigned xab$v_net_noextend : 1;( unsigned xab$v_fill_20_ : 7; } xab$r_fill_19_; } xab$r_fill_18_;' unsigned short int xab$w_owner_acc;' unsigned short int xab$w_group_acc;' unsigned short int xab$w_world_acc; } ; #if !defined(__VAXC)38#define xab$w_system_acc xab$r_fill_18_.xab$w_system_accG#define xab$v_net_noread xab$r_fill_18_.xab$r_fill_19_.xab$v_net_noreadI#define xab$v_net_nowrite xab$r_fill_18_.xab$r_fill_19_.xab$v_net_nowriteM#define xab$v_net_noexecute xab$r_fill_18_.xab$r_fill_19_.xab$v_net_noexecuteK#define xab$v_net_nodelete xab$r_fill_18_.xab$r_fill_19_.xab$v_net_nodeleteK#define xab$v_net_noappend xab$r_fill_18_.xab$r_fill_19_.xab$v_net_noappendQ#define xab$v_net_nodirectory xab$r_fill_18_.xab$r_fill_19_.3xab$v_net_nodirectoryK#define xab$v_net_noupdate xab$r_fill_18_.xab$r_fill_19_.xab$v_net_noupdateK#define xab$v_net_nochange xab$r_fill_18_.xab$r_fill_19_.xab$v_net_nochangeK#define xab$v_net_noextend xab$r_fill_18_.xab$r_fill_19_.xab$v_net_noextend"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _xabnetdapver { unsigned char xab$b_ver_dap; unsigned char xab$b_ver_eco; unsigned char xab$b_ver_cus; unsi3gned char xab$b_ver_dsv; unsigned char xab$b_ver_csv; } XABNETDAPVER;#else /* __OLD_STARLET */struct xabnetdapver { unsigned char xab$b_ver_dap; unsigned char xab$b_ver_eco; unsigned char xab$b_ver_cus; unsigned char xab$b_ver_dsv; unsigned char xab$b_ver_csv; } ;%#endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLETtypedef struct _xabnetcapdef {" unsigned xab$v_cap_filall : 1;" unsigned xab$v_cap_seqorg : 1;" unsigned xab$v3_cap_relorg : 1;# unsigned xab$v_cap_fill_21 : 1;" unsigned xab$v_cap_extend : 1;" unsigned xab$v_cap_seqfil : 1;" unsigned xab$v_cap_ranrrn : 1;" unsigned xab$v_cap_ranvbn : 1;" unsigned xab$v_cap_rankey : 1;# unsigned xab$v_cap_fill_22 : 1;" unsigned xab$v_cap_ranrfa : 1;" unsigned xab$v_cap_idxorg : 1;" unsigned xab$v_cap_swmode : 1;" unsigned xab$v_cap_append : 1;" unsigned xab$v_cap_submit : 1;# unsigned xab$v_cap_fill_23 : 1; unsigned x3ab$v_cap_mds : 1;# unsigned xab$v_cap_display : 1;" unsigned xab$v_cap_msgblk : 1;" unsigned xab$v_cap_unrblk : 1;" unsigned xab$v_cap_bigblk : 1;" unsigned xab$v_cap_dapcrc : 1;" unsigned xab$v_cap_keyxab : 1;" unsigned xab$v_cap_allxab : 1;" unsigned xab$v_cap_sumxab : 1;% unsigned xab$v_cap_directory : 1;" unsigned xab$v_cap_timxab : 1;" unsigned xab$v_cap_proxab : 1;# unsigned xab$v_cap_fill_24 : 1;" unsigned xab$v_cap_fopspl : 1;" unsign3ed xab$v_cap_fopscf : 1;" unsigned xab$v_cap_fopdlt : 1;# unsigned xab$v_cap_fill_26 : 1;" unsigned xab$v_cap_seqrac : 1;# unsigned xab$v_cap_fill_27 : 1;" unsigned xab$v_cap_bitopt : 1;# unsigned xab$v_cap_warning : 1;" unsigned xab$v_cap_rename : 1;$ unsigned xab$v_cap_wildcard : 1;" unsigned xab$v_cap_gngopt : 1;" unsigned xab$v_cap_nammsg : 1;" unsigned xab$v_cap_segmsg : 1;% unsigned xab$v_cap_chgattcls : 1;% unsigned xab$v_cap_chgtimcls : 13;% unsigned xab$v_cap_chgprocls : 1;% unsigned xab$v_cap_chgnamcls : 1;% unsigned xab$v_cap_modattcre : 1;$ unsigned xab$v_cap_nam3part : 1;% unsigned xab$v_cap_chgattren : 1;% unsigned xab$v_cap_chgtimren : 1;% unsigned xab$v_cap_chgproren : 1;% unsigned xab$v_cap_ctlblkcnt : 1;$ unsigned xab$v_cap_octalver : 1; unsigned xab$v_fill_21_ : 3; } XABNETCAPDEF;#else /* __OLD_STARLET */struct xabnetcapdef {" unsigned xab$v_cap_filall : 1; 3" unsigned xab$v_cap_seqorg : 1;" unsigned xab$v_cap_relorg : 1;# unsigned xab$v_cap_fill_21 : 1;" unsigned xab$v_cap_extend : 1;" unsigned xab$v_cap_seqfil : 1;" unsigned xab$v_cap_ranrrn : 1;" unsigned xab$v_cap_ranvbn : 1;" unsigned xab$v_cap_rankey : 1;# unsigned xab$v_cap_fill_22 : 1;" unsigned xab$v_cap_ranrfa : 1;" unsigned xab$v_cap_idxorg : 1;" unsigned xab$v_cap_swmode : 1;" unsigned xab$v_cap_append : 1;" unsigned xab$v_cap_submit :  31;# unsigned xab$v_cap_fill_23 : 1; unsigned xab$v_cap_mds : 1;# unsigned xab$v_cap_display : 1;" unsigned xab$v_cap_msgblk : 1;" unsigned xab$v_cap_unrblk : 1;" unsigned xab$v_cap_bigblk : 1;" unsigned xab$v_cap_dapcrc : 1;" unsigned xab$v_cap_keyxab : 1;" unsigned xab$v_cap_allxab : 1;" unsigned xab$v_cap_sumxab : 1;% unsigned xab$v_cap_directory : 1;" unsigned xab$v_cap_timxab : 1;" unsigned xab$v_cap_proxab : 1;# unsigned xab$v_cap_fill_ 324 : 1;" unsigned xab$v_cap_fopspl : 1;" unsigned xab$v_cap_fopscf : 1;" unsigned xab$v_cap_fopdlt : 1;# unsigned xab$v_cap_fill_26 : 1;" unsigned xab$v_cap_seqrac : 1;# unsigned xab$v_cap_fill_27 : 1;" unsigned xab$v_cap_bitopt : 1;# unsigned xab$v_cap_warning : 1;" unsigned xab$v_cap_rename : 1;$ unsigned xab$v_cap_wildcard : 1;" unsigned xab$v_cap_gngopt : 1;" unsigned xab$v_cap_nammsg : 1;" unsigned xab$v_cap_segmsg : 1;% unsigned xab$v_c 3ap_chgattcls : 1;% unsigned xab$v_cap_chgtimcls : 1;% unsigned xab$v_cap_chgprocls : 1;% unsigned xab$v_cap_chgnamcls : 1;% unsigned xab$v_cap_modattcre : 1;$ unsigned xab$v_cap_nam3part : 1;% unsigned xab$v_cap_chgattren : 1;% unsigned xab$v_cap_chgtimren : 1;% unsigned xab$v_cap_chgproren : 1;% unsigned xab$v_cap_ctlblkcnt : 1;$ unsigned xab$v_cap_octalver : 1; unsigned xab$v_fill_21_ : 3; } ;%#endif /* #ifdef __NEW_STARLET */#defin 3e XAB$S_BUFFER_SIZE 4##define XAB$S_NETWORK_BLOCK_COUNT 4#define XAB$S_REMOTE_SYSTEM 4"#define XAB$S_REMOTE_FILE_SYSTEM 4#define XAB$S_EXTPROT_LOCAL 8#define XAB$S_EXTPROT_REMOTE 8#define XAB$S_CAPABIL_LOCAL 8#define XAB$S_CAPABIL_REMOTE 8#define XAB$S_DAPVER_LOCAL 5#define XAB$S_DAPVER_REMOTE 5#define XAB$S_CACHE_TMO 4#define XAB$S_HINT_LENGTH 16#define XAB$S_GBC32_LENGTH 4#define XAB$S_GBCFLAGS_LENGTH 4 #ifdef __NEW_STARLET#else#define XABITM xabitmdef#def3ine UCHAR_FLAGS uchar_flags##define XAB_RCF_FLAGS xab_rcf_flags##define XABNETEXTPROT xabnetextprot!#define XABNETDAPVER xabnetdapver!#define XABNETCAPDEF xabnetcapdef;#define XAB_CACHING_OPTIONS_FLAGS xab_caching_options_flags#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus 3 }#endif#pragma __standard #endif /* __XABITMDEF_LOADED */ ww;o/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************/ 3/*** MODULE $XABJNLDEF ***/#ifndef __XABJNLDEF_LOADED#define __XABJNLDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 */#e3ndif #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 N/* 3 */N/* Journal XAB definitions */N/* $xabjnldef */N/* */N#define XAB$C_JNL 34 /* xabjnl id code */ #ifdef __NEW_STARLETstruct _fabdef;#elsestruct fabdef;#endif#define XAB$C_JNL_TYPE_NONE 0N#define XAB$C_AI 1 /* AI journal 3 */N#define XAB$C_BI 2 /* BI journal */N#define XAB$C_AT 3 /* AT journal */N#define XAB$C_RU_DEFAULT 4 /* default RU volume */"#define XAB$M_JOURNAL_DISABLED 0x1#define XAB$M_BACKUP_DONE 0x2  9#ifdef __cplusplus /* Define structure prototypes */struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) 3 && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabjnldef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabjnldef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain 3 link */N unsigned char xab$b_xabjnl_type; /* type of $XABJNL */ char xabjnldef$$_fill_5; __union {Y unsigned short int xab$w_jnl_flags; /* journal flags (from ACE$W_RMSJNL_FLAGS) */ __struct {_ unsigned xab$v_journal_disabled : 1; /* journaling disabled by BACKUP (AI/BI/AT) */N unsigned xab$v_backup_done : 1; /* Backup done since last $OPEN */( unsigned xab$v_fill_16_ : 6;# } xab$3r_jnl_flags_bits;" } xab$r_jnl_flags_overlay;_ struct _fabdef *xab$l_jnl_fab; /* address of journal file FAB ~~~ struct fabdef ~~~ */S char *xab$l_volnam_buf; /* address of journal volume name buffer */Q unsigned short int xab$w_volnam_siz; /* size of journal volume name buffer */S unsigned short int xab$w_volnam_len; /* return length of journal volume name */` unsigned __int64 xab$q_jnl_verify_cdate; /* journal file creation date (from ACE$Q_CDATE) */3N/* (to match with journal file's creation date) */V unsigned int xab$l_jnlidx; /* Journal stream index within journal file */N unsigned int xab$l_backup_seqno; /* Backup sequence number. */W unsigned __int64 xab$q_jnl_mod_time; /* Timestamp of last backup or last journal */N/* entry recovered. */$ unsigned int xabjnldef$$_fill_7;$ unsigned int xabjnldef$$_fill_8;$ unsign 3ed int xabjnldef$$_fill_9;% unsigned int xabjnldef$$_fill_10;% unsigned int xabjnldef$$_fill_11;% unsigned int xabjnldef$$_fill_12;% unsigned int xabjnldef$$_fill_13;% unsigned int xabjnldef$$_fill_14; } XABJNLDEF; #if !defined(__VAXC)?#define xab$w_jnl_flags xab$r_jnl_flags_overlay.xab$w_jnl_flagsI#define xab$r_jnl_flags_bits xab$r_jnl_flags_overlay.xab$r_jnl_flags_bitsJ#define xab$v_journal_disabled xab$r_jnl_flags_bits.xab$v_journal_disabled@#define xab$v_ba 3ckup_done xab$r_jnl_flags_bits.xab$v_backup_done"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct xabjnldef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length 3 */N short int xabjnldef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */N unsigned char xab$b_xabjnl_type; /* type of $XABJNL */ char xabjnldef$$_fill_5; __union {Y unsigned short int xab$w_jnl_flags; /* journal flags (from ACE$W_RMSJNL_FLAGS) */ __struct {_ unsigned xab$v_journal_disabled : 1; /* journaling disabled by BACKUP (AI/BI/A 3T) */N unsigned xab$v_backup_done : 1; /* Backup done since last $OPEN */( unsigned xab$v_fill_16_ : 6;# } xab$r_jnl_flags_bits;" } xab$r_jnl_flags_overlay;U struct fabdef *xab$l_jnl_fab; /* address of journal file FAB */S char *xab$l_volnam_buf; /* address of journal volume name buffer */Q unsigned short int xab$w_volnam_siz; /* size of journal volume name buffer */S unsigned short int xab$w_volnam_len; /* 3return length of journal volume name */` unsigned int xab$q_jnl_verify_cdate [2]; /* journal file creation date (from ACE$Q_CDATE) */N/* (to match with journal file's creation date) */V unsigned int xab$l_jnlidx; /* Journal stream index within journal file */N unsigned int xab$l_backup_seqno; /* Backup sequence number. */W unsigned int xab$q_jnl_mod_time [2]; /* Timestamp of last backup or last journal */N/* entry recovered. 3 */$ unsigned int xabjnldef$$_fill_7;$ unsigned int xabjnldef$$_fill_8;$ unsigned int xabjnldef$$_fill_9;% unsigned int xabjnldef$$_fill_10;% unsigned int xabjnldef$$_fill_11;% unsigned int xabjnldef$$_fill_12;% unsigned int xabjnldef$$_fill_13;% unsigned int xabjnldef$$_fill_14; } ; #if !defined(__VAXC)?#define xab$w_jnl_flags xab$r_jnl_flags_overlay.xab$w_jnl_flagsb#define xab$v_journal_disabled xab$r_j3nl_flags_overlay.xab$r_jnl_flags_bits.xab$v_journal_disabledX#define xab$v_backup_done xab$r_jnl_flags_overlay.xab$r_jnl_flags_bits.xab$v_backup_done"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABJNLDEF operates after aggregate end */#define XAB$K_JNLLEN 80#define XAB$C_JNLLEN 80 #ifdef __NEW_STARLET#define XABJNL _xabjnldef#else#define XABJNL xabjnldef#endif  $#pragma __member_alignment __restoreR3#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XABJNLDEF_LOADED */ ww[o/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 * 3/J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $XABKEYDEF ***/#ifndef __XABKEYDEF_LOADED#define __XABKEYDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size !3pragmas 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"3#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* key definition xab field definitions */N/* $xabkeydef */N/* */N#define XAB$C_KEY 21 #3/* xabkey id code */#define XAB$M_DUP 0x1#define XAB$M_CHG 0x2#define XAB$M_NUL 0x4#define XAB$M_IDX_NCMPR 0x8#define XAB$M_KEY_NCMPR 0x40#define XAB$M_DAT_NCMPR 0x80N#define XAB$C_STG 0 /* string */N#define XAB$C_IN2 1 /* signed 15 bit integer (2 bytes) */N#define XAB$C_BN2 2 /* 2 byte binary */N#define XAB$C_IN4 3 /* signed 31 bit integer$3 (4 bytes) */N#define XAB$C_BN4 4 /* 4 byte binary */N#define XAB$C_PAC 5 /* packed decimal (1-16 bytes) */N#define XAB$C_IN8 6 /* signed 63 bit integer (4 bytes) */N#define XAB$C_BN8 7 /* 8 byte binary */N#define XAB$C_COL 8 /* collated */N#define XAB$C_MAX_ASCEND 8 /* maximum ascending type */N#define XA%3B$C_DSTG 32 /* descending string */N#define XAB$C_DIN2 33 /* " signed word */N#define XAB$C_DBN2 34 /* " unsigned word */N#define XAB$C_DIN4 35 /* " signed longword */N#define XAB$C_DBN4 36 /* " unsigned longword */N#define XAB$C_DPAC 37 /* " packed decimal */N#define XAB$C_DIN8 38 &3 /* " signed quadword */N#define XAB$C_DBN8 39 /* " unsigned quadword */N#define XAB$C_DCOL 40 /* " collated */N#define XAB$C_MAXDTP 40 /* max. legal data type */N#define XAB$K_KEYLEN_V2 64 /* old xabkey length */N#define XAB$C_KEYLEN_V2 64 /* old xabkey length */N/* '3 */N#define XAB$C_PRG3 3 /* Prologue version three */N#define XAB$C_PRG2 2 /* Prologue version two */N#define XAB$C_PRG1 1 /* Prologue versoin one */N#define XAB$K_KEYLEN_V4 76 /* xabkey length until V5 */N#define XAB$C_KEYLEN_V4 76 /* xabkey length until V5 */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) (3 /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabkeydef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabkeydef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */)3N/* */N/* the field layout of the key xab is such that it matchs as */N/* closely as possible the layout of a key decriptor in the */N/* index file prologue. this is so the contents may be moved */N/* between the two structures as efficiently as possible. */N/* */N unsigned char xab$b_*3ian; /* index level area number */N unsigned char xab$b_lan; /* lowest index level area number */N unsigned char xab$b_dan; /* data level area number */N unsigned char xab$b_lvl; /* level of root bucket */U unsigned char xab$b_ibs; /* size of index buckets in virtual blocks */T unsigned char xab$b_dbs; /* size of data buckets in virtual blocks */N unsigned int xab$l_rvb; +3 /* root bucket start vbn */ __union {N unsigned char xab$b_flg; /* key option flags */ __struct {N unsigned xab$v_dup : 1; /* duplicate key values allowed */[ unsigned xab$v_chg : 1; /* alt key only --key field may change on update */R unsigned xab$v_nul : 1; /* alt key only --null key value enable */g unsigned xab$v_idx_ncmpr : 1; /* indicate index records for given key are ,3not compressed */N unsigned xabkeydef$$_fill_5 : 2; /* spare */^ unsigned xab$v_key_ncmpr : 1; /* indicates key is not compressed in data record */( unsigned xab$v_fill_14_ : 1; } xab$r_flg_bits0; __struct {N unsigned xabkeydef$$_fill_6 : 1; /* space over dup */N unsigned xabkeydef$$_fill_7 : 2; /* spare */N unsigned xabkeydef$$_fill_8 : 1; /* space -3over idx_ncmpr */N unsigned xabkeydef$$_fill_9 : 2; /* spare */N unsigned xabkeydef$$_fill_10 : 1; /* space over key_ncmpr */N unsigned xab$v_dat_ncmpr : 1; /* data record is not compressed */ } xab$r_flg_bits1; } xab$r_flg_overlay;N unsigned char xab$b_dtp; /* key field data type */N unsigned char xab$b_nsg; /* number of key segments */N unsigned char .3xab$b_nul; /* nul key character */N unsigned char xab$b_tks; /* total key field size (bytes) */N unsigned char xab$b_ref; /* key of reference (0=prim key, */N/* 1-254 = alternate keys) */X unsigned short int xab$w_mrl; /* minimun record length to contain key field */N unsigned short int xab$w_ifl; /* index bucket fill size (bytes) */N unsigned short int xab$w_dfl; /3 /* data bucket fil size (bytes) */ __union {Q unsigned short int xab$w_pos [8]; /* key field record offset positions */ __struct {N unsigned short int xab$w_pos0; /* segment 0 */N unsigned short int xab$w_pos1; /* segment 1 */N unsigned short int xab$w_pos2; /* segment 2 */N unsigned short int xab$w_pos3; /* segment 3 */N unsign 03ed short int xab$w_pos4; /* segment 4 */N unsigned short int xab$w_pos5; /* segment 5 */N unsigned short int xab$w_pos6; /* segment 6 */N unsigned short int xab$w_pos7; /* segment 7 */ } xab$r_pos_fields; } xab$r_pos_overlay; __union {N unsigned char xab$b_siz [8]; /* key field segment sizes */ __struct {N unsigned c13har xab$b_siz0; /* segment 0 */N unsigned char xab$b_siz1; /* segment 1 */N unsigned char xab$b_siz2; /* segment 2 */N unsigned char xab$b_siz3; /* segment 3 */N unsigned char xab$b_siz4; /* segment 4 */N unsigned char xab$b_siz5; /* segment 5 */N unsigned char xab$b_siz6; /* segme 23nt 6 */N unsigned char xab$b_siz7; /* segment 7 */ } xab$r_siz_fields; } xab$r_siz_overlay;N short int xabkeydef$$_fill_11; /* spare */N/* */N/* the positions of the above fields are dictated by the key descriptor */N/* record layout in the index file prologue. */N/* 33 */U char *xab$l_knm; /* pointer to 32 character key name buffer */N unsigned int xab$l_dvb; /* first data bucket start vbn */N/* Additions for prologue 3 files */N/* */ __union {N unsigned char xab$b_typ [8]; /* key field segment types */ __st43ruct {N unsigned char xab$b_typ0; /* segment 0 */N unsigned char xab$b_typ1; /* segment 1 */N unsigned char xab$b_typ2; /* segment 2 */N unsigned char xab$b_typ3; /* segment 3 */N unsigned char xab$b_typ4; /* segment 4 */N unsigned char xab$b_typ5; /* segment 5 */N unsi53gned char xab$b_typ6; /* segment 6 */N unsigned char xab$b_typ7; /* segment 7 */ } xab$r_typ_fields; } xab$r_typ_overlay;b unsigned char xab$b_prolog; /* indicate prologue version desired (primary key only) */N char xabkeydef$$_fill_12; /* spare */N short int xabkeydef$$_fill_13; /* spare */N void *xab$l_coltbl; 63 /* address of collate table */N unsigned int xab$l_colsiz; /* size of collate table */N char *xab$l_colnam; /* name of collate table */N unsigned int xabkeydef$$_fill_14; /* spare */N unsigned int xabkeydef$$_fill_15; /* spare */N unsigned int xabkeydef$$_fill_16; /* spare */N/*-- 73 */N/*++ */ } XABKEYDEF; #if !defined(__VAXC)-#define xab$b_flg xab$r_flg_overlay.xab$b_flg9#define xab$r_flg_bits0 xab$r_flg_overlay.xab$r_flg_bits0+#define xab$v_dup xab$r_flg_bits0.xab$v_dup+#define xab$v_chg xab$r_flg_bits0.xab$v_chg+#define xab$v_nul xab$r_flg_bits0.xab$v_nul7#define xab$v_idx_ncmpr xab$r_flg_bits0.xab$v_idx_ncmpr7#define xab$v_key_ncmpr xab$r_flg_bits0.xab$v_key_ncmpr9#def 83ine xab$r_flg_bits1 xab$r_flg_overlay.xab$r_flg_bits17#define xab$v_dat_ncmpr xab$r_flg_bits1.xab$v_dat_ncmpr-#define xab$w_pos xab$r_pos_overlay.xab$w_pos;#define xab$r_pos_fields xab$r_pos_overlay.xab$r_pos_fields.#define xab$w_pos0 xab$r_pos_fields.xab$w_pos0.#define xab$w_pos1 xab$r_pos_fields.xab$w_pos1.#define xab$w_pos2 xab$r_pos_fields.xab$w_pos2.#define xab$w_pos3 xab$r_pos_fields.xab$w_pos3.#define xab$w_pos4 xab$r_pos_fields.xab$w_pos4.#define xab$w_pos5 xab$r_pos_fields.xab$w_ 93pos5.#define xab$w_pos6 xab$r_pos_fields.xab$w_pos6.#define xab$w_pos7 xab$r_pos_fields.xab$w_pos7-#define xab$b_siz xab$r_siz_overlay.xab$b_siz;#define xab$r_siz_fields xab$r_siz_overlay.xab$r_siz_fields.#define xab$b_siz0 xab$r_siz_fields.xab$b_siz0.#define xab$b_siz1 xab$r_siz_fields.xab$b_siz1.#define xab$b_siz2 xab$r_siz_fields.xab$b_siz2.#define xab$b_siz3 xab$r_siz_fields.xab$b_siz3.#define xab$b_siz4 xab$r_siz_fields.xab$b_siz4.#define xab$b_siz5 xab$r_siz_fields.xab$b_siz5.#defin :3e xab$b_siz6 xab$r_siz_fields.xab$b_siz6.#define xab$b_siz7 xab$r_siz_fields.xab$b_siz7-#define xab$b_typ xab$r_typ_overlay.xab$b_typ;#define xab$r_typ_fields xab$r_typ_overlay.xab$r_typ_fields.#define xab$b_typ0 xab$r_typ_fields.xab$b_typ0.#define xab$b_typ1 xab$r_typ_fields.xab$b_typ1.#define xab$b_typ2 xab$r_typ_fields.xab$b_typ2.#define xab$b_typ3 xab$r_typ_fields.xab$b_typ3.#define xab$b_typ4 xab$r_typ_fields.xab$b_typ4.#define xab$b_typ5 xab$r_typ_fields.xab$b_typ5.#define xab$b_typ6;3 xab$r_typ_fields.xab$b_typ6.#define xab$b_typ7 xab$r_typ_fields.xab$b_typ7"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct xabkeydef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; <3 /* block length */N short int xabkeydef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */N/* */N/* the field layout of the key xab is such that it matchs as */N/* closely as possible the layout of a key decriptor in the */N/* index file prologue. this is so the contents may be moved =3 */N/* between the two structures as efficiently as possible. */N/* */N unsigned char xab$b_ian; /* index level area number */N unsigned char xab$b_lan; /* lowest index level area number */N unsigned char xab$b_dan; /* data level area number */N unsigned char xab$b_lvl; /* level of root bucket */U unsi>3gned char xab$b_ibs; /* size of index buckets in virtual blocks */T unsigned char xab$b_dbs; /* size of data buckets in virtual blocks */N unsigned int xab$l_rvb; /* root bucket start vbn */ __union {N unsigned char xab$b_flg; /* key option flags */ __struct {N unsigned xab$v_dup : 1; /* duplicate key values allowed */[ unsigned xab$v_chg : 1; /* alt key only --key ?3field may change on update */R unsigned xab$v_nul : 1; /* alt key only --null key value enable */g unsigned xab$v_idx_ncmpr : 1; /* indicate index records for given key are not compressed */N unsigned xabkeydef$$_fill_5 : 2; /* spare */^ unsigned xab$v_key_ncmpr : 1; /* indicates key is not compressed in data record */( unsigned xab$v_fill_14_ : 1; } xab$r_flg_bits0; __struct {N @3unsigned xabkeydef$$_fill_6 : 1; /* space over dup */N unsigned xabkeydef$$_fill_7 : 2; /* spare */N unsigned xabkeydef$$_fill_8 : 1; /* space over idx_ncmpr */N unsigned xabkeydef$$_fill_9 : 2; /* spare */N unsigned xabkeydef$$_fill_10 : 1; /* space over key_ncmpr */N unsigned xab$v_dat_ncmpr : 1; /* data record is not compressed */ } xab$r_flg_bits1; A3 } xab$r_flg_overlay;N unsigned char xab$b_dtp; /* key field data type */N unsigned char xab$b_nsg; /* number of key segments */N unsigned char xab$b_nul; /* nul key character */N unsigned char xab$b_tks; /* total key field size (bytes) */N unsigned char xab$b_ref; /* key of reference (0=prim key, */N/* 1-254 = alternate keys) */X B3 unsigned short int xab$w_mrl; /* minimun record length to contain key field */N unsigned short int xab$w_ifl; /* index bucket fill size (bytes) */N unsigned short int xab$w_dfl; /* data bucket fil size (bytes) */ __union {Q unsigned short int xab$w_pos [8]; /* key field record offset positions */ __struct {N unsigned short int xab$w_pos0; /* segment 0 */N unsigned short int xab$w_pos1; /* segment 1 C3 */N unsigned short int xab$w_pos2; /* segment 2 */N unsigned short int xab$w_pos3; /* segment 3 */N unsigned short int xab$w_pos4; /* segment 4 */N unsigned short int xab$w_pos5; /* segment 5 */N unsigned short int xab$w_pos6; /* segment 6 */N unsigned short int xab$w_pos7; /* segment 7 */ D3 } xab$r_pos_fields; } xab$r_pos_overlay; __union {N unsigned char xab$b_siz [8]; /* key field segment sizes */ __struct {N unsigned char xab$b_siz0; /* segment 0 */N unsigned char xab$b_siz1; /* segment 1 */N unsigned char xab$b_siz2; /* segment 2 */N unsigned char xab$b_siz3; /* segment 3 */N E3 unsigned char xab$b_siz4; /* segment 4 */N unsigned char xab$b_siz5; /* segment 5 */N unsigned char xab$b_siz6; /* segment 6 */N unsigned char xab$b_siz7; /* segment 7 */ } xab$r_siz_fields; } xab$r_siz_overlay;N short int xabkeydef$$_fill_11; /* spare */N/* F3 */N/* the positions of the above fields are dictated by the key descriptor */N/* record layout in the index file prologue. */N/* */U char *xab$l_knm; /* pointer to 32 character key name buffer */N unsigned int xab$l_dvb; /* first data bucket start vbn */N/* Additions for prologue 3 files G3 */N/* */ __union {N unsigned char xab$b_typ [8]; /* key field segment types */ __struct {N unsigned char xab$b_typ0; /* segment 0 */N unsigned char xab$b_typ1; /* segment 1 */N unsigned char xab$b_typ2; /* segment 2 */N unsigned char xab$b_typ3; /* segment 3 H3 */N unsigned char xab$b_typ4; /* segment 4 */N unsigned char xab$b_typ5; /* segment 5 */N unsigned char xab$b_typ6; /* segment 6 */N unsigned char xab$b_typ7; /* segment 7 */ } xab$r_typ_fields; } xab$r_typ_overlay;b unsigned char xab$b_prolog; /* indicate prologue version desired (primary key only) I3*/N char xabkeydef$$_fill_12; /* spare */N short int xabkeydef$$_fill_13; /* spare */N void *xab$l_coltbl; /* address of collate table */N unsigned int xab$l_colsiz; /* size of collate table */N char *xab$l_colnam; /* name of collate table */N unsigned int xabkeydef$$_fill_14; /* spare */N unsigned int xabke J3ydef$$_fill_15; /* spare */N unsigned int xabkeydef$$_fill_16; /* spare */N/*-- */N/*++ */ } ; #if !defined(__VAXC)-#define xab$b_flg xab$r_flg_overlay.xab$b_flg=#define xab$v_dup xab$r_flg_overlay.xab$r_flg_bits0.xab$v_dup=#define xab$v_chg xab$r_flg_overlay.xab$r_flg_bits0.xab$v_ch K3g=#define xab$v_nul xab$r_flg_overlay.xab$r_flg_bits0.xab$v_nulI#define xab$v_idx_ncmpr xab$r_flg_overlay.xab$r_flg_bits0.xab$v_idx_ncmprI#define xab$v_key_ncmpr xab$r_flg_overlay.xab$r_flg_bits0.xab$v_key_ncmprI#define xab$v_dat_ncmpr xab$r_flg_overlay.xab$r_flg_bits1.xab$v_dat_ncmpr-#define xab$w_pos xab$r_pos_overlay.xab$w_pos@#define xab$w_pos0 xab$r_pos_overlay.xab$r_pos_fields.xab$w_pos0@#define xab$w_pos1 xab$r_pos_overlay.xab$r_pos_fields.xab$w_pos1@#define xab$w_pos2 xab$r_pos_o L3verlay.xab$r_pos_fields.xab$w_pos2@#define xab$w_pos3 xab$r_pos_overlay.xab$r_pos_fields.xab$w_pos3@#define xab$w_pos4 xab$r_pos_overlay.xab$r_pos_fields.xab$w_pos4@#define xab$w_pos5 xab$r_pos_overlay.xab$r_pos_fields.xab$w_pos5@#define xab$w_pos6 xab$r_pos_overlay.xab$r_pos_fields.xab$w_pos6@#define xab$w_pos7 xab$r_pos_overlay.xab$r_pos_fields.xab$w_pos7-#define xab$b_siz xab$r_siz_overlay.xab$b_siz@#define xab$b_siz0 xab$r_siz_overlay.xab$r_siz_fields.xab$b_siz0@#define xab$b_siz1 xab$r_s M3iz_overlay.xab$r_siz_fields.xab$b_siz1@#define xab$b_siz2 xab$r_siz_overlay.xab$r_siz_fields.xab$b_siz2@#define xab$b_siz3 xab$r_siz_overlay.xab$r_siz_fields.xab$b_siz3@#define xab$b_siz4 xab$r_siz_overlay.xab$r_siz_fields.xab$b_siz4@#define xab$b_siz5 xab$r_siz_overlay.xab$r_siz_fields.xab$b_siz5@#define xab$b_siz6 xab$r_siz_overlay.xab$r_siz_fields.xab$b_siz6@#define xab$b_siz7 xab$r_siz_overlay.xab$r_siz_fields.xab$b_siz7-#define xab$b_typ xab$r_typ_overlay.xab$b_typ@#define xab$b_typ0 xab N3$r_typ_overlay.xab$r_typ_fields.xab$b_typ0@#define xab$b_typ1 xab$r_typ_overlay.xab$r_typ_fields.xab$b_typ1@#define xab$b_typ2 xab$r_typ_overlay.xab$r_typ_fields.xab$b_typ2@#define xab$b_typ3 xab$r_typ_overlay.xab$r_typ_fields.xab$b_typ3@#define xab$b_typ4 xab$r_typ_overlay.xab$r_typ_fields.xab$b_typ4@#define xab$b_typ5 xab$r_typ_overlay.xab$r_typ_fields.xab$b_typ5@#define xab$b_typ6 xab$r_typ_overlay.xab$r_typ_fields.xab$b_typ6@#define xab$b_typ7 xab$r_typ_overlay.xab$r_typ_fields.xab$b_typ7" O3#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABKEYDEF operates after aggregate end */N#define XAB$K_KEYLEN 100 /* xabkey length for V5 */N#define XAB$C_KEYLEN 100 /* xabkey length for V5 */ T /* These are traditional macros that should be hand-maintained for compatibility */W/* Do not have to add new ones, but do have to maintain those that are here already. */6#definP3e XAB$V_DUP 0 /* duplicate key value allowed */E#define XAB$V_CHG 1 /* may change on update (alternate keys only) */F#define XAB$V_NUL 2 /* null key value enable (alternate keys only) */K#define XAB$V_IDX_NCMPR 3 /* indicates index records are not compressed */H#define XAB$V_KEY_NCMPR 6 /* indicates primary key is not compressed */H#define XAB$V_DAT_NCMPR 7 /* indicated data record is not compressed */D/* Note: if you wish to access these field as defined in the struct,& * #undef these Q3macros in your code */#ifndef __cplusplus#undef xab$w_pos#define xab$w_pos xab$w_pos0#undef xab$b_siz#define xab$b_siz xab$b_siz0#undef xab$b_typ#define xab$b_typ xab$b_typ0#endif#ifdef __NEW_STARLET#define XABKEY _xabkeydef#else#define XABKEY xabkeydef#endif+#define cc$rms_xabkey (*decc$ga_rms_xabkey)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdef[ extern struct XABKEY cc$rms_xabkey; /* Declare iR3nitialized prototype data structures */# pragma extern_model __restore#else] globalref struct XABKEY cc$rms_xabkey; /* Declare initialized prototype data structures */#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XABKEYDE S3F_LOADED */ ww{%p/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $XABPRODEF ***/#ifndef __XABPRODEF_LOADED#d T3efine __XABPRODEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 __unU3known_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 N/* */N/* protection xab field definitions V3 */N/* $xabprodef */N/* */N/* */N#define XAB$C_PRO 19 /* xabpro id code */#define XAB$M_NOREAD 0x1#define XAB$M_NOWRITE 0x2#define XAB$M_NOEXE 0x4#define XAB$M_NODEL 0x8 #ifdef __NEW_STARLETtypedef union _xabpr W3odef { __struct {N unsigned xab$v_noread : 1; /* deny read access */N unsigned xab$v_nowrite : 1; /* deny write access */N unsigned xab$v_noexe : 1; /* deny execution access */N unsigned xab$v_nodel : 1; /* deny delete access */$ unsigned xab$v_fill_12_ : 4; } xab$r_xabprodef_bits; } XABPRODEF; #if !defined(__VAXC)6#define xab$v_noread xab$r_xabprodef_bits.xa X3b$v_noread8#define xab$v_nowrite xab$r_xabprodef_bits.xab$v_nowrite4#define xab$v_noexe xab$r_xabprodef_bits.xab$v_noexe4#define xab$v_nodel xab$r_xabprodef_bits.xab$v_nodel"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */union xabprodef { __struct {N unsigned xab$v_noread : 1; /* deny read access */N unsigned xab$v_nowrite : 1; /* deny write access */N unsigned xab$v_noexe : 1; /* deny execution Y3access */N unsigned xab$v_nodel : 1; /* deny delete access */$ unsigned xab$v_fill_12_ : 4; } xab$r_xabprodef_bits; } ; #if !defined(__VAXC)6#define xab$v_noread xab$r_xabprodef_bits.xab$v_noread8#define xab$v_nowrite xab$r_xabprodef_bits.xab$v_nowrite4#define xab$v_noexe xab$r_xabprodef_bits.xab$v_noexe4#define xab$v_nodel xab$r_xabprodef_bits.xab$v_nodel"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLETZ3 */#define XAB$M_PROPAGATE 0x1N#define XAB$K_PROLEN_V3 16 /* V3a xabpro length */N#define XAB$C_PROLEN_V3 16 /* V3a xabpro length */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabprodef1 {#pragma __nomember_alignmentN unsigned char xab$b_cod; [3 /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabprodef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */ __union {N unsigned short int xab$w_pro; /* protection mask */ __struct {N unsigned xab$v_sys : 4; /* system */N unsigned x \3ab$v_own : 4; /* owner */N unsigned xab$v_grp : 4; /* group */N unsigned xab$v_wld : 4; /* world */ } xab$r_pro_bits; } xab$r_pro_overlay;N unsigned char xab$b_mtacc; /* Magtape access control char. */ __union {N unsigned char xab$b_prot_opt; /* XABPRO options field */ __struct {c unsigned xab$v_p ]3ropagate : 1; /* Propagate security attributes on $ENTER and $RENAME */( unsigned xab$v_fill_13_ : 7;$ } xab$r_prot_opt_fields;! } xab$r_prot_opt_overlay; __union {N unsigned int xab$l_uic; /* uic code */ __struct {N unsigned short int xab$w_mbm; /* member code */N unsigned short int xab$w_grp; /* group code */ } xab$r_uic_fields; ^3 } xab$r_uic_overlay;N __union { /* RWED/mode protection for file */ __int64 xab$q_prot_mode; __struct {N unsigned char xab$b_prot_mode; /* but currently only a byte */% } xab$r_prot_mode_fields;" } xab$r_prot_mode_overlay;N char *xab$l_aclbuf; /* address of user's ACL buffer */N unsigned short int xab$w_aclsiz; /* size of user's ACL buffer */N unsigned short int xab$w_3_acllen; /* return length of entire ACL */N unsigned int xab$l_aclctx; /* ACL context field */N unsigned int xab$l_aclsts; /* ACL return err status */N unsigned int xabprodef$$_fill_10; /* spare */N unsigned int xabprodef$$_fill_11; /* spare */N unsigned int xabprodef$$_fill_12; /* spare */N unsigned int xabprodef$$_fill_13; /* spare `3 */N unsigned int xabprodef$$_fill_14; /* spare */N unsigned int xabprodef$$_fill_15; /* spare */N unsigned int xabprodef$$_fill_16; /* spare */N unsigned int xabprodef$$_fill_17; /* spare */N unsigned int xabprodef$$_fill_18; /* spare */N unsigned int xabprodef$$_fill_19; /* spare */N a3 unsigned int xabprodef$$_fill_20; /* spare */N unsigned int xabprodef$$_fill_21; /* spare */ } XABPRODEF1; #if !defined(__VAXC)-#define xab$w_pro xab$r_pro_overlay.xab$w_pro7#define xab$r_pro_bits xab$r_pro_overlay.xab$r_pro_bits*#define xab$v_sys xab$r_pro_bits.xab$v_sys*#define xab$v_own xab$r_pro_bits.xab$v_own*#define xab$v_grp xab$r_pro_bits.xab$v_grp*#define xab$v_wld xab$r_pro_bits.xab$v_wld<#define xab$b_prot b3_opt xab$r_prot_opt_overlay.xab$b_prot_optJ#define xab$r_prot_opt_fields xab$r_prot_opt_overlay.xab$r_prot_opt_fields=#define xab$v_propagate xab$r_prot_opt_fields.xab$v_propagate-#define xab$l_uic xab$r_uic_overlay.xab$l_uic;#define xab$r_uic_fields xab$r_uic_overlay.xab$r_uic_fields,#define xab$w_mbm xab$r_uic_fields.xab$w_mbm,#define xab$w_grp xab$r_uic_fields.xab$w_grp?#define xab$q_prot_mode xab$r_prot_mode_overlay.xab$q_prot_modeM#define xab$r_prot_mode_fields xab$r_prot_mode_overlayc3.xab$r_prot_mode_fields>#define xab$b_prot_mode xab$r_prot_mode_fields.xab$b_prot_mode"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct xabprodef1 {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$ d3b_bln; /* block length */N short int xabprodef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */ __union {N unsigned short int xab$w_pro; /* protection mask */ __struct {N unsigned xab$v_sys : 4; /* system */N unsigned xab$v_own : 4; /* owner */N e3 unsigned xab$v_grp : 4; /* group */N unsigned xab$v_wld : 4; /* world */ } xab$r_pro_bits; } xab$r_pro_overlay;N unsigned char xab$b_mtacc; /* Magtape access control char. */ __union {N unsigned char xab$b_prot_opt; /* XABPRO options field */ __struct {c unsigned xab$v_propagate : 1; /* Propagate security attributes on $ENTER and $RENAME f3 */( unsigned xab$v_fill_13_ : 7;$ } xab$r_prot_opt_fields;! } xab$r_prot_opt_overlay; __union {N unsigned int xab$l_uic; /* uic code */ __struct {N unsigned short int xab$w_mbm; /* member code */N unsigned short int xab$w_grp; /* group code */ } xab$r_uic_fields; } xab$r_uic_overlay;N __union { /* g3 RWED/mode protection for file */ __int64 xab$q_prot_mode; __struct {N unsigned char xab$b_prot_mode; /* but currently only a byte */% } xab$r_prot_mode_fields;" } xab$r_prot_mode_overlay;N char *xab$l_aclbuf; /* address of user's ACL buffer */N unsigned short int xab$w_aclsiz; /* size of user's ACL buffer */N unsigned short int xab$w_acllen; /* return length of entire ACL */N unsigned inth3 xab$l_aclctx; /* ACL context field */N unsigned int xab$l_aclsts; /* ACL return err status */N unsigned int xabprodef$$_fill_10; /* spare */N unsigned int xabprodef$$_fill_11; /* spare */N unsigned int xabprodef$$_fill_12; /* spare */N unsigned int xabprodef$$_fill_13; /* spare */N unsigned int xabprodef$$_fill_14; /*i3 spare */N unsigned int xabprodef$$_fill_15; /* spare */N unsigned int xabprodef$$_fill_16; /* spare */N unsigned int xabprodef$$_fill_17; /* spare */N unsigned int xabprodef$$_fill_18; /* spare */N unsigned int xabprodef$$_fill_19; /* spare */N unsigned int xabprodef$$_fill_20; /* spare j3 */N unsigned int xabprodef$$_fill_21; /* spare */ } ; #if !defined(__VAXC)-#define xab$w_pro xab$r_pro_overlay.xab$w_pro<#define xab$v_sys xab$r_pro_overlay.xab$r_pro_bits.xab$v_sys<#define xab$v_own xab$r_pro_overlay.xab$r_pro_bits.xab$v_own<#define xab$v_grp xab$r_pro_overlay.xab$r_pro_bits.xab$v_grp<#define xab$v_wld xab$r_pro_overlay.xab$r_pro_bits.xab$v_wld<#define xab$b_prot_opt xab$r_prot_opt_overlay.xab$b_prot_optT#define xab$v_propag k3ate xab$r_prot_opt_overlay.xab$r_prot_opt_fields.xab$v_propagate-#define xab$l_uic xab$r_uic_overlay.xab$l_uic>#define xab$w_mbm xab$r_uic_overlay.xab$r_uic_fields.xab$w_mbm>#define xab$w_grp xab$r_uic_overlay.xab$r_uic_fields.xab$w_grp?#define xab$q_prot_mode xab$r_prot_mode_overlay.xab$q_prot_modeV#define xab$b_prot_mode xab$r_prot_mode_overlay.xab$r_prot_mode_fields.xab$b_prot_mode"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABP l3RODEF1 operates after aggregate end */N#define XAB$K_PROLEN 88 /* xabpro length */N#define XAB$C_PROLEN 88 /* xabpro length */ S/* These are traditional macros that should be hand-maintained for compatibility */W/* Do not have to add new ones, but do have to maintain those that are here already. */!#define XAB$V_SYS 0 /* system */#define XAB$S_SYS 4 #define XAB$V_OWN 4 /* owner */#define XAB$S_OWN 4 #d m3efine XAB$V_GRP 8 /* group */#define XAB$S_GRP 4!#define XAB$V_WLD 12 /* world */#define XAB$S_WLD 4.#define XAB$V_NOREAD 0 /* deny read access */0#define XAB$V_NOWRITE 1 /* deny write access */2#define XAB$V_NOEXE 2 /* deny execution access *//#define XAB$V_NODEL 3 /* deny delete access */T#define XAB$V_PROPAGATE 0 /* propagate security attributes on $ENTER and $RENAME */L#define XAB$V_PROPOGATE 0 /* continue mis-spelled name for compatibility */.#define XAB$M_PROPOGATE (1 << n3XAB$V_PROPOGATE)#ifdef __NEW_STARLET#define XABPRO _xabprodef1#else#define XABPRO xabprodef1#endif+#define cc$rms_xabpro (*decc$ga_rms_xabpro)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdef[ extern struct XABPRO cc$rms_xabpro; /* Declare initialized prototype data structures */# pragma extern_model __restore#else] globalref struct XABPRO cc$rms_xabpro; /* Declare initialized prototype data structures */#endifo3  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XABPRODEF_LOADED */ wwp/********************************************************************************************************************************/=/* Created: p3 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** MODULE $XABRDTDEF ***/#ifndef __XABRDTDEF_LOADED#define __XABRDTDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIq3AL_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 sr3truct#else#define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/* */N/* revision date/time xab definitions */N/* $xabrdtdef */N/* s3 */N#define XAB$C_RDT 30 /* xabrdt id code */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabrdtdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length t3 */N short int xabrdtdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */! unsigned short int xab$w_rvn;! short int xabrdtdef$$_fill_2; __int64 xab$q_rdt; } XABRDTDEF;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment u3#endifstruct xabrdtdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabrdtdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */! unsigned short int xab$w_rvn;! short int xabrdtdef$$_fill_2; __int64 xab$q_rdt; } ;%#endif /* #ifdef _v3_NEW_STARLET */N/* basealign on aggregate XABRDTDEF operates after aggregate end */N#define XAB$K_RDTLEN 20 /* length of rdt xab */N#define XAB$C_RDTLEN 20 /* length of rdt xab */ #ifdef __NEW_STARLET#define XABRDT _xabrdtdef#else#define XABRDT xabrdtdef#endif+#define cc$rms_xabrdt (*decc$ga_rms_xabrdt)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdew3f[ extern struct XABRDT cc$rms_xabrdt; /* Declare initialized prototype data structures */# pragma extern_model __restore#else] globalref struct XABRDT cc$rms_xabrdt; /* Declare initialized prototype data structures */#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus x3}#endif#pragma __standard #endif /* __XABRDTDEF_LOADED */ wwq/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//********************************************************************************************************************************//*** y3 MODULE $XABRUDEF ***/#ifndef __XABRUDEF_LOADED#define __XABRUDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 */#endifz3 #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 N/* {3 */N/* Recovery Unit XAB definitions */N/* $xabrudef */N/* */N#define XAB$C_RU 35 /* xabru id code */#define XAB$M_NOJOIN 0x1 #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_align |3ment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabrudef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabrudef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */ __union {N unsigned short int xab$w_ru_flags; /* Fl }3ags */ __struct {N unsigned xab$v_nojoin : 1; /* Do not join any recovery unit */( unsigned xab$v_fill_22_ : 7;" } xab$r_ru_flags_bits;! } xab$r_ru_flags_overlay; short int xabrudef$$_fill_5;N unsigned int xab$l_ru_handle; /* RU handle to join (input field) */N unsigned int xab$l_ru_handle_joined; /* RU handle joined (output field) */# unsigned int xabrudef$$_fill_7;# unsigned int xabrudef$~3$_fill_8;# unsigned int xabrudef$$_fill_9;$ unsigned int xabrudef$$_fill_10;$ unsigned int xabrudef$$_fill_11;$ unsigned int xabrudef$$_fill_12;$ unsigned int xabrudef$$_fill_13; } XABRUDEF; #if !defined(__VAXC)<#define xab$w_ru_flags xab$r_ru_flags_overlay.xab$w_ru_flagsF#define xab$r_ru_flags_bits xab$r_ru_flags_overlay.xab$r_ru_flags_bits5#define xab$v_nojoin xab$r_ru_flags_bits.xab$v_nojoin"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ 3c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct xabrudef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabrudef$$_fill_1; /* (spare) */N void *xab$l_nxt; 3 /* xab chain link */ __union {N unsigned short int xab$w_ru_flags; /* Flags */ __struct {N unsigned xab$v_nojoin : 1; /* Do not join any recovery unit */( unsigned xab$v_fill_22_ : 7;" } xab$r_ru_flags_bits;! } xab$r_ru_flags_overlay; short int xabrudef$$_fill_5;N unsigned int xab$l_ru_handle; /* RU handle to join (input field) */N unsigned int xab$l_r3u_handle_joined; /* RU handle joined (output field) */# unsigned int xabrudef$$_fill_7;# unsigned int xabrudef$$_fill_8;# unsigned int xabrudef$$_fill_9;$ unsigned int xabrudef$$_fill_10;$ unsigned int xabrudef$$_fill_11;$ unsigned int xabrudef$$_fill_12;$ unsigned int xabrudef$$_fill_13; } ; #if !defined(__VAXC)<#define xab$w_ru_flags xab$r_ru_flags_overlay.xab$w_ru_flagsL#define xab$v_nojoin xab$r_ru_flags_overlay.xab$r_ru_flags_bits.xab$v_nojoin"#endif 3/* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABRUDEF operates after aggregate end */#define XAB$K_RULEN 48#define XAB$C_RULEN 48 #ifdef __NEW_STARLET#define XABRU _xabrudef#else#define XABRU xabrudef#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined requir3ed ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XABRUDEF_LOADED */ ww]q/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//***************************************************************************************** 3***************************************//*** MODULE $XABSUMDEF ***/#ifndef __XABSUMDEF_LOADED#define __XABSUMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 p3tr 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 N/* 3 */N/* summary xab field definitions */N/* $xabsumdef */N/* */N#define XAB$C_SUM 22 /* xabsum id code */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#p 3ragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabsumdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabsumdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */T unsigned char xab$b_noa; 3/* number of defined areas for index file */S unsigned char xab$b_nok; /* number of defined keys for index file */` unsigned short int xab$w_pvn; /* prologue version number (relative and index files) */ } XABSUMDEF;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct xabsumdef {#pragma __nomemb3er_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabsumdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */T unsigned char xab$b_noa; /* number of defined areas for index file */S unsigned char xab$b_nok; /* number of defined keys for index file */` 3 unsigned short int xab$w_pvn; /* prologue version number (relative and index files) */ } ;%#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABSUMDEF operates after aggregate end */N#define XAB$K_SUMLEN 12 /* xabsum length */N#define XAB$C_SUMLEN 12 /* xabsum length */ #ifdef __NEW_STARLET#define XABSUM _xabsumdef#else#define XABSUM xabsumdef#endif+#define cc$rms_xabsum 3(*decc$ga_rms_xabsum)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save## pragma extern_model strict_refdef[ extern struct XABSUM cc$rms_xabsum; /* Declare initialized prototype data structures */# pragma extern_model __restore#else] globalref struct XABSUM cc$rms_xabsum; /* Declare initialized prototype data structures */#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#p3ragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XABSUMDEF_LOADED */ wwq/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:46 by OpenVMS SDL EV3-3 */J/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]RMSUSR.SDI;1 *//***** 3***************************************************************************************************************************//*** MODULE $XABTRMDEF ***/#ifndef __XABTRMDEF_LOADED#define __XABTRMDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-3defined 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 3#else#define __union variant_union#endif#endif N/* */N/* terminal control xab field definitions */N/* $xabtrmdef */N/* */N/* */N#define XAB$C_TRM 31 /*XABT 3RM ID CODE */ #ifdef __NEW_STARLETc#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endiftypedef struct _xabtrmdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabtrmdef$$_fill_1; 3 /* (spare) */N void *xab$l_nxt; /* xab chain link */N void *xab$l_itmlst; /* item list address */N unsigned short int xab$w_itmlst_len; /* item list length */N short int xabtrmdef$$_fill_5; /* spare */N unsigned int xabtrmdef$$_fill_6; /* spare */N unsigned int xabtrmdef$$_fill_7; /* spare 3 */N unsigned int xabtrmdef$$_fill_8; /* spare */N unsigned int xabtrmdef$$_fill_9; /* spare */N unsigned int xabtrmdef$$_fill_10; /* spare */ } XABTRMDEF;#else /* __OLD_STARLET */c#if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */'#pragma __nomember_alignment __longword#else#pragma __nomember_alignment#endifstruct x3abtrmdef {#pragma __nomember_alignmentN unsigned char xab$b_cod; /* xab id code */N unsigned char xab$b_bln; /* block length */N short int xabtrmdef$$_fill_1; /* (spare) */N void *xab$l_nxt; /* xab chain link */N void *xab$l_itmlst; /* item list address */N unsigned short int xab$w_itmlst_len; /* item list length 3 */N short int xabtrmdef$$_fill_5; /* spare */N unsigned int xabtrmdef$$_fill_6; /* spare */N unsigned int xabtrmdef$$_fill_7; /* spare */N unsigned int xabtrmdef$$_fill_8; /* spare */N unsigned int xabtrmdef$$_fill_9; /* spare */N unsigned int xabtrmdef$$_fill_10; /* spare */ } ;%3#endif /* #ifdef __NEW_STARLET */N/* basealign on aggregate XABTRMDEF operates after aggregate end */T#define XAB$K_TRMLEN 36 /* length of xab of type terminal control */T#define XAB$C_TRMLEN 36 /* length of xab of type terminal control */ #ifdef __NEW_STARLET#define XABTRM _xabtrmdef#else#define XABTRM xabtrmdef#endif+#define cc$rms_xabtrm (*decc$ga_rms_xabtrm)(#if defined(__DECC) || defined(__DECCXX)# pragma extern_model __save# 3# pragma extern_model strict_refdef[ extern struct XABTRM cc$rms_xabtrm; /* Declare initialized prototype data structures */# pragma extern_model __restore#else] globalref struct XABTRM cc$rms_xabtrm; /* Declare initialized prototype data structures */#endif  $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */3#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XABTRMDEF_LOADED */ ww;q/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//************************************************************************************************* 3*******************************//*** MODULE $XADEF ***/#ifndef __XADEF_LOADED#define __XADEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 332-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 N/*+ 3 */N/* DR11-W DEFINITIONS FOR DEVICE SPECIFIC CHARACTERISTICS */N/*- */#define XA$M_DATAPATH 0x1#define XA$M_LINK 0x2 #ifdef __NEW_STARLETtypedef union _xadef { __struct {N unsigned xa$v_datapath : 1; /* USE BUFFERED DATAPATH */N unsigned xa$v_link : 1; /* INTERPROCESSOR LINK MODE */# unsigned xa$v_fill_79_3 : 6; } xa$r_xadef_bits; } XADEF; #if !defined(__VAXC)3#define xa$v_datapath xa$r_xadef_bits.xa$v_datapath+#define xa$v_link xa$r_xadef_bits.xa$v_link"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ union xadef { __struct {N unsigned xa$v_datapath : 1; /* USE BUFFERED DATAPATH */N unsigned xa$v_link : 1; /* INTERPROCESSOR LINK MODE */# unsigned xa$v_fill_79_ : 6; } xa$r_xadef_bits;3 } ; #if !defined(__VAXC)3#define xa$v_datapath xa$r_xadef_bits.xa$v_datapath+#define xa$v_link xa$r_xadef_bits.xa$v_link"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard 3 #endif /* __XADEF_LOADED */ ww[Hr/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $XKDEVDEF ***/#ifnde 3f __XKDEVDEF_LOADED#define __XKDEVDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 ex3tern "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 N/* */N/* 3271 DEVICE STATUS 3BLOCK */N/* */O/* THE DRIVER RETURNS N COPIES OF THIS BLOCK FOLLOWING THE LINE STATUS BLOCK */P/* IN THE USER'S BUFFER, WHERE N IS THE NUMBER OF ACTIVE DEVICES ON THE LINE. */N/* */N#define XKDEV$K_SIZE 15 /* SIZE OF THE DEVICE STATUS BLOCK */N#define XKDEV$C_SIZE 15 /* S 3IZE OF THE DEVICE STATUS BLOCK */ #ifdef __NEW_STARLETtypedef struct _xkdevdef {O unsigned char xkdev$b_dueb; /* DEVICE ADDRESS (DU - HEX EBCDIC) */S unsigned int xkdev$l_dpid; /* PROCESS ID OF PROCESS OWNING THIS DU */N unsigned short int xkdev$w_tblk; /* NUMBER OF BLOCKS TRANSMITTED */N unsigned short int xkdev$w_rblk; /* NUMBER OF BLOCKS RECEIVED */P unsigned short int xkdev$w_spol; /* NUMBER OF SPECIFIC POLLS RECEIVED */Q un 3signed short int xkdev$w_asel; /* NUMBER OF ADDRESS SELECTS RECEIVED */N unsigned short int xkdev$w_crej; /* NUMBER OF COMMAND REJECTS SENT */ } XKDEVDEF;#else /* __OLD_STARLET */struct xkdevdef {O unsigned char xkdev$b_dueb; /* DEVICE ADDRESS (DU - HEX EBCDIC) */S unsigned int xkdev$l_dpid; /* PROCESS ID OF PROCESS OWNING THIS DU */N unsigned short int xkdev$w_tblk; /* NUMBER OF BLOCKS TRANSMITTED */N unsigned short int xkdev$w 3_rblk; /* NUMBER OF BLOCKS RECEIVED */P unsigned short int xkdev$w_spol; /* NUMBER OF SPECIFIC POLLS RECEIVED */Q unsigned short int xkdev$w_asel; /* NUMBER OF ADDRESS SELECTS RECEIVED */N unsigned short int xkdev$w_crej; /* NUMBER OF COMMAND REJECTS SENT */ } ;%#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __3restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XKDEVDEF_LOADED */ ww{r/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//*********************************** 3*********************************************************************************************//*** MODULE $XKSTSDEF ***/#ifndef __XKSTSDEF_LOADED#define __XKSTSDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */\#pragma __required_pointer_size __save /* Save the previously-defined required ptr size */[#p3ragma __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_ 3union#endif#endif N/* */N/* DEFINITIONS FOR 3271 LINE STATUS BLOCK (RETURNED BY IO$_RDSTATS) */N/* */O#define XKSTS$K_LSTR 0 /* OFFSET OF BEGINNING OF DATA AREA */O#define XKSTS$C_LSTR 0 /* OFFSET OF BEGINNING OF DATA AREA */#define XKSTS$M_ACT 0x1#define XKSTS$M_DGN 0x2N#define XKSTS$K_DSTR 4 35 /* LENGTH OF THE LINE STATUS BLOCK */N#define XKSTS$C_DSTR 45 /* LENGTH OF THE LINE STATUS BLOCK */ #ifdef __NEW_STARLETtypedef struct _xkstsdef {P unsigned char xksts$b_cuad; /* CONTROL UNIT ADDRESS (HEX EBCDIC) */ __union {N unsigned short int xksts$w_lsts; /* LINE STATUS */ __struct {Y unsigned xksts$v_act : 1; /* IF SET, LINE IS 'ON' (ACTIVE IN 3271 MODE) */Y unsigned x3ksts$v_dgn : 1; /* IF SET, LINE IS EXECUTING A DIAGNOSTIC QIO */* unsigned xksts$v_fill_80_ : 6; } xksts$r_lsts_bits; } xksts$r_lsts_overlay;N unsigned char xksts$b_plsz; /* POOL SIZE */T unsigned short int xksts$w_bsiz; /* MAXIMUM BLOCK TO BE RECEIVED FROM IBM */N unsigned char xksts$b_ecnt; /* ENQ THRESHOLD */N unsigned short int xksts$w_tnak; /* NUMBER OF NAKS TRANSMITTED */3N unsigned short int xksts$w_rnak; /* NUMBER OF NAKS RECEIVED */N unsigned short int xksts$w_tenq; /* NUMBER OF ENQS SENT */N unsigned short int xksts$w_renq; /* NUMBER OF ENQS RECEIVED */N unsigned short int xksts$w_trvi; /* NUMBER OF RVIS TRANSMITTED */N unsigned short int xksts$w_rrvi; /* NUMBER OF RVIS RECEIVED */V unsigned short int xksts$w_rcnv; /* NUMBER OF CONVERSATIONAL MODE RESPONSES */N/* RECEIVED 3 */P unsigned short int xksts$w_chai; /* NUMBER OF CHAINED WRITES RECEIVED */O unsigned short int xksts$w_gpol; /* NUMBER OF GENERAL POLLS RECEIVED */N unsigned short int xksts$w_xack; /* NUMBER OF INVALID ACKS RECEIVED */P unsigned short int xksts$w_habo; /* NUMBER OF HOST ABORTS ENCOUNTERED */R unsigned short int xksts$w_dabo; /* NUMBER OF DRIVER ABORTS ENCOUNTERED */N unsigned short int xksts$w_r3tim; /* NUMBER OF ACK RESPONSE TIMEOUTS */P unsigned short int xksts$w_disc; /* NUMBER OF DISCONNECTS ENCOUNTERED */U unsigned short int xksts$w_hard; /* NUMBER OF HARDWARE FAILURES (INCLUDING */N/* DISCONNECTS) ENCOUNTERED */N unsigned short int xksts$w_tblk; /* NUMBER OF BLOCKS TRANSMITTED */N unsigned short int xksts$w_rblk; /* NUMBER OF BLOCKS RECEIVED */N unsigned short int xksts$w_habx; /* NUMBE 3R OF DUBIOUS ACK OUTS */N unsigned short int xksts$w_ieot; /* NUMBER OF EOTS IMPLYING ACK */ } XKSTSDEF; #if !defined(__VAXC)6#define xksts$w_lsts xksts$r_lsts_overlay.xksts$w_lstsF#define xksts$v_act xksts$r_lsts_overlay.xksts$r_lsts_bits.xksts$v_actF#define xksts$v_dgn xksts$r_lsts_overlay.xksts$r_lsts_bits.xksts$v_dgn"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */struct xkstsdef {P unsigned char xksts$b_cuad; /* CONTROL UNIT AD 3DRESS (HEX EBCDIC) */ __union {N unsigned short int xksts$w_lsts; /* LINE STATUS */ __struct {Y unsigned xksts$v_act : 1; /* IF SET, LINE IS 'ON' (ACTIVE IN 3271 MODE) */Y unsigned xksts$v_dgn : 1; /* IF SET, LINE IS EXECUTING A DIAGNOSTIC QIO */* unsigned xksts$v_fill_80_ : 6; } xksts$r_lsts_bits; } xksts$r_lsts_overlay;N unsigned char xksts$b_plsz; /* POOL SIZE 3 */T unsigned short int xksts$w_bsiz; /* MAXIMUM BLOCK TO BE RECEIVED FROM IBM */N unsigned char xksts$b_ecnt; /* ENQ THRESHOLD */N unsigned short int xksts$w_tnak; /* NUMBER OF NAKS TRANSMITTED */N unsigned short int xksts$w_rnak; /* NUMBER OF NAKS RECEIVED */N unsigned short int xksts$w_tenq; /* NUMBER OF ENQS SENT */N unsigned short int xksts$w_renq; /* NUMBER OF ENQS RECEIVED */N unsi3gned short int xksts$w_trvi; /* NUMBER OF RVIS TRANSMITTED */N unsigned short int xksts$w_rrvi; /* NUMBER OF RVIS RECEIVED */V unsigned short int xksts$w_rcnv; /* NUMBER OF CONVERSATIONAL MODE RESPONSES */N/* RECEIVED */P unsigned short int xksts$w_chai; /* NUMBER OF CHAINED WRITES RECEIVED */O unsigned short int xksts$w_gpol; /* NUMBER OF GENERAL POLLS RECEIVED */N unsigned short int3 xksts$w_xack; /* NUMBER OF INVALID ACKS RECEIVED */P unsigned short int xksts$w_habo; /* NUMBER OF HOST ABORTS ENCOUNTERED */R unsigned short int xksts$w_dabo; /* NUMBER OF DRIVER ABORTS ENCOUNTERED */N unsigned short int xksts$w_rtim; /* NUMBER OF ACK RESPONSE TIMEOUTS */P unsigned short int xksts$w_disc; /* NUMBER OF DISCONNECTS ENCOUNTERED */U unsigned short int xksts$w_hard; /* NUMBER OF HARDWARE FAILURES (INCLUDING */N/* DISCONNECTS) ENCOUNTERED 3 */N unsigned short int xksts$w_tblk; /* NUMBER OF BLOCKS TRANSMITTED */N unsigned short int xksts$w_rblk; /* NUMBER OF BLOCKS RECEIVED */N unsigned short int xksts$w_habx; /* NUMBER OF DUBIOUS ACK OUTS */N unsigned short int xksts$w_ieot; /* NUMBER OF EOTS IMPLYING ACK */ } ; #if !defined(__VAXC)6#define xksts$w_lsts xksts$r_lsts_overlay.xksts$w_lstsF#define xksts$v_act xksts$r_lsts_overlay.xksts3$r_lsts_bits.xksts$v_actF#define xksts$v_dgn xksts$r_lsts_overlay.xksts$r_lsts_bits.xksts$v_dgn"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XKSTSDEF_LOADED */ 3wwr/********************************************************************************************************************************/=/* Created: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $XMDEF ***/#ifndef __XMDEF_LOADED#define __XMDEF_LOADED3 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#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 ...#defin3e __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 N/* */Q/* DEFINITIONS FOR STATUS, CHARACTERISTICS AND ERRORS FOR DMC-11/DMR-1 31/DMP-11 */N/* */ #ifdef __NEW_STARLETtypedef struct _xmdev {N unsigned char xmdev$b_p1_class; /* Device Class */N unsigned char xmdev$b_p1_type; /* Device type */N unsigned short int xmdev$w_p1_mms; /* Maximum message size */N unsigned char xmdev$b_p1_char; /* Unit characteristics */N unsigned char xmdev$b_p1_sts; 3/* Unit Status */N unsigned char xmdev$b_p1_esum; /* Error Summary */N unsigned char xmdev$b_p1_tpi; /* Transmit Pipeline no. */ } XMDEV;#else /* __OLD_STARLET */struct xmdev {N unsigned char xmdev$b_p1_class; /* Device Class */N unsigned char xmdev$b_p1_type; /* Device type */N unsigned short int xmdev$w_p1_mms; /* Maximum message size */N 3unsigned char xmdev$b_p1_char; /* Unit characteristics */N unsigned char xmdev$b_p1_sts; /* Unit Status */N unsigned char xmdev$b_p1_esum; /* Error Summary */N unsigned char xmdev$b_p1_tpi; /* Transmit Pipeline no. */ } ;%#endif /* #ifdef __NEW_STARLET */#define XM$M_CHR_MOP 0x1#define XM$M_CHR_LOOPB 0x2#define XM$M_CHR_HDPLX 0x4#define XM$M_CHR_SLAVE 0x8#define XM$M_CHR_MBX 0x10#d3efine XM$M_CHR_DMC 0x20#define XM$M_CHR_CTRL 0x40#define XM$M_CHR_TRIB 0x80#define XM$M_STS_DCHK 0x100#define XM$M_STS_TIMO 0x200#define XM$M_STS_ORUN 0x400#define XM$M_STS_ACTIVE 0x800#define XM$M_STS_BUFFAIL 0x1000#define XM$M_STS_RUNNING 0x2000#define XM$M_STS_DISC 0x4000#define XM$M_ERR_FATAL 0x10000#define XM$M_ERR_MAINT 0x80000#define XM$M_ERR_LOST 0x100000 #define XM$M_ERR_THRESH 0x200000#define XM$M_ERR_TRIB 0x400000#define XM$M_ERR_START 0x800000#define 3XM$M_MDM_RTSHLD 0x1#define XM$M_MDM_STNDBY 0x2#define XM$M_MDM_MAINT2 0x4#define XM$M_MDM_MAINT1 0x8#define XM$M_MDM_FREQ 0x20#define XM$M_MDM_RDY 0x40#define XM$M_MDM_POLL 0x80#define XM$M_MDM_SELM 0x100#define XM$M_MDM_INT 0x800#define XM$M_MDM_V35 0x1000#define XM$M_MDM_RS232 0x4000#define XM$M_MDM_RS422 0x8000#define XM$M_MDM_CARRDET 0x1#define XM$M_MDM_MSTNDBY 0x2#define XM$M_MDM_CTS 0x4#define XM$M_MDM_DSR 0x8#define XM$M_MDM_HDX 0x10#define XM$M_MDM_R3TS 0x20#define XM$M_MDM_DTR 0x40#define XM$M_MDM_RING 0x80#define XM$M_MDM_CHRMOD 0x100#define XM$M_MDM_MCLOCK 0x200#define XM$M_MDM_MODTEST 0x400#define XM$M_MDM_SIGQUAL 0x4000#define XM$M_MDM_SIGRATE 0x8000 #ifdef __NEW_STARLETtypedef union _xmdef { __struct {N unsigned xm$v_chr_mop : 1; /* MOP MODE */N unsigned xm$v_chr_loopb : 1; /* LOOP BACK */N unsigned xm$v_chr_hdplx : 1; /* HALF 3DUPLEX */N unsigned xm$v_chr_slave : 1; /* HALF DUPLEX SLAVE STATION */N unsigned xm$v_chr_mbx : 1; /* MAILBOX IS ENABLED */N unsigned xm$v_chr_dmc : 1; /* DMC-11 COMPATABILITY MODE */N unsigned xm$v_chr_ctrl : 1; /* CONTROL STATION */N unsigned xm$v_chr_trib : 1; /* TRIBUTARY STATION */N unsigned xm$v_sts_dchk : 1; /* DATA CHECK OCCURED 3 */N unsigned xm$v_sts_timo : 1; /* TIMEOUT OCCURED */N unsigned xm$v_sts_orun : 1; /* DATA OVER RUN OCCURED */N unsigned xm$v_sts_active : 1; /* ACTIVE UNIT */P unsigned xm$v_sts_buffail : 1; /* BUFFER ALLOCATION FAILURE OCCURED */N unsigned xm$v_sts_running : 1; /* PROTOCOL RUNNING */N unsigned xm$v_sts_disc : 1; /* LINE DISCONNECT OCCURED */N unsigned x3mdef$$_fill_1 : 1; /* SPARE */N unsigned xm$v_err_fatal : 1; /* HARDWARE ERROR */$ unsigned xmdef$$_fill_2 : 2;N unsigned xm$v_err_maint : 1; /* DDCMP MAINT MESSAGE RECEIVED */X unsigned xm$v_err_lost : 1; /* DATA LOST BECAUSE OF BUFFER SIZE MISMATCH */N unsigned xm$v_err_thresh : 1; /* THRESHOLD ERRORS */N unsigned xm$v_err_trib : 1; /* TRIBUTARY MALFUNCTIONING 3*/N unsigned xm$v_err_start : 1; /* DDCMP START MESSAGE RECEIVED */ } xm$r_xmdef_bits0; __struct {N unsigned xm$v_mdm_rtshld : 1; /* RTS HOLD */N unsigned xm$v_mdm_stndby : 1; /* SELECT STANDBY */N unsigned xm$v_mdm_maint2 : 1; /* MAINTENANCE MODE 2 */N unsigned xm$v_mdm_maint1 : 1; /* MAINTENANCE MODE 1 */N unsigned xmdef$$_fill_3 : 1; /* HALF-DUPLEX3 */N unsigned xm$v_mdm_freq : 1; /* SELECT FREQUENCY */N unsigned xm$v_mdm_rdy : 1; /* DATA TERMINAL READY */N unsigned xm$v_mdm_poll : 1; /* SELECT POLLING MODEM MODE */O unsigned xm$v_mdm_selm : 1; /* MODEM INTERFACE PROGRAM SELECTED */N unsigned xmdef$$_fill_4 : 2; /* UNUSED */N unsigned xm$v_mdm_int : 1; /* INTEGRAL MODEM */3N unsigned xm$v_mdm_v35 : 1; /* V.35 */N unsigned xmdef$$_fill_5 : 1; /* UNUSED */N unsigned xm$v_mdm_rs232 : 1; /* RS-232-C OR RS423 */N unsigned xm$v_mdm_rs422 : 1; /* RS-422 */ } xm$r_xmdef_bits1; __struct {N unsigned xm$v_mdm_carrdet : 1; /* CARRIER DETECT */N unsigned xm$v_mdm_mstndby : 1; /* MODEM STANDBY3 */N unsigned xm$v_mdm_cts : 1; /* CLEAR TO SEND */N unsigned xm$v_mdm_dsr : 1; /* DATA SET READY */N unsigned xm$v_mdm_hdx : 1; /* HALF-DUPLEX */N unsigned xm$v_mdm_rts : 1; /* REQUEST TO SEND */N unsigned xm$v_mdm_dtr : 1; /* DATA TERMINAL READY */N unsigned xm$v_mdm_ring : 1; /* RING */N 3 unsigned xm$v_mdm_chrmod : 1; /* CHARACTER OR BIT PROTOCOL MODE */N unsigned xm$v_mdm_mclock : 1; /* MAINTENANCE CLOCK */N unsigned xm$v_mdm_modtest : 1; /* MODEM TEST MODE */N unsigned xmdef$$_fill_6 : 3; /* UNUSED */N unsigned xm$v_mdm_sigqual : 1; /* SIGNAL QUALITY */N unsigned xm$v_mdm_sigrate : 1; /* SIGNAL RATE */ } xm$r_xmdef_bits2; 3 } XMDEF; #if !defined(__VAXC)2#define xm$v_chr_mop xm$r_xmdef_bits0.xm$v_chr_mop6#define xm$v_chr_loopb xm$r_xmdef_bits0.xm$v_chr_loopb6#define xm$v_chr_hdplx xm$r_xmdef_bits0.xm$v_chr_hdplx6#define xm$v_chr_slave xm$r_xmdef_bits0.xm$v_chr_slave2#define xm$v_chr_mbx xm$r_xmdef_bits0.xm$v_chr_mbx2#define xm$v_chr_dmc xm$r_xmdef_bits0.xm$v_chr_dmc4#define xm$v_chr_ctrl xm$r_xmdef_bits0.xm$v_chr_ctrl4#define xm$v_chr_trib xm$r_xmdef_bits0.xm$v_chr_trib4#define xm$v_sts_dchk xm$r_xmdef 3_bits0.xm$v_sts_dchk4#define xm$v_sts_timo xm$r_xmdef_bits0.xm$v_sts_timo4#define xm$v_sts_orun xm$r_xmdef_bits0.xm$v_sts_orun8#define xm$v_sts_active xm$r_xmdef_bits0.xm$v_sts_active:#define xm$v_sts_buffail xm$r_xmdef_bits0.xm$v_sts_buffail:#define xm$v_sts_running xm$r_xmdef_bits0.xm$v_sts_running4#define xm$v_sts_disc xm$r_xmdef_bits0.xm$v_sts_disc6#define xm$v_err_fatal xm$r_xmdef_bits0.xm$v_err_fatal6#define xm$v_err_maint xm$r_xmdef_bits0.xm$v_err_maint4#define xm$v_err_lost xm$r_xmdef 3_bits0.xm$v_err_lost8#define xm$v_err_thresh xm$r_xmdef_bits0.xm$v_err_thresh4#define xm$v_err_trib xm$r_xmdef_bits0.xm$v_err_trib6#define xm$v_err_start xm$r_xmdef_bits0.xm$v_err_start8#define xm$v_mdm_rtshld xm$r_xmdef_bits1.xm$v_mdm_rtshld8#define xm$v_mdm_stndby xm$r_xmdef_bits1.xm$v_mdm_stndby8#define xm$v_mdm_maint2 xm$r_xmdef_bits1.xm$v_mdm_maint28#define xm$v_mdm_maint1 xm$r_xmdef_bits1.xm$v_mdm_maint14#define xm$v_mdm_freq xm$r_xmdef_bits1.xm$v_mdm_freq2#define xm$v_mdm_rdy xm$r_xmde 3f_bits1.xm$v_mdm_rdy4#define xm$v_mdm_poll xm$r_xmdef_bits1.xm$v_mdm_poll4#define xm$v_mdm_selm xm$r_xmdef_bits1.xm$v_mdm_selm2#define xm$v_mdm_int xm$r_xmdef_bits1.xm$v_mdm_int2#define xm$v_mdm_v35 xm$r_xmdef_bits1.xm$v_mdm_v356#define xm$v_mdm_rs232 xm$r_xmdef_bits1.xm$v_mdm_rs2326#define xm$v_mdm_rs422 xm$r_xmdef_bits1.xm$v_mdm_rs422:#define xm$v_mdm_carrdet xm$r_xmdef_bits2.xm$v_mdm_carrdet:#define xm$v_mdm_mstndby xm$r_xmdef_bits2.xm$v_mdm_mstndby2#define xm$v_mdm_cts xm$r_xmdef_bits2.xm 3$v_mdm_cts2#define xm$v_mdm_dsr xm$r_xmdef_bits2.xm$v_mdm_dsr2#define xm$v_mdm_hdx xm$r_xmdef_bits2.xm$v_mdm_hdx2#define xm$v_mdm_rts xm$r_xmdef_bits2.xm$v_mdm_rts2#define xm$v_mdm_dtr xm$r_xmdef_bits2.xm$v_mdm_dtr4#define xm$v_mdm_ring xm$r_xmdef_bits2.xm$v_mdm_ring8#define xm$v_mdm_chrmod xm$r_xmdef_bits2.xm$v_mdm_chrmod8#define xm$v_mdm_mclock xm$r_xmdef_bits2.xm$v_mdm_mclock:#define xm$v_mdm_modtest xm$r_xmdef_bits2.xm$v_mdm_modtest:#define xm$v_mdm_sigqual xm$r_xmdef_bits2.xm$v_mdm_sigqu 3al:#define xm$v_mdm_sigrate xm$r_xmdef_bits2.xm$v_mdm_sigrate"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ union xmdef { __struct {N unsigned xm$v_chr_mop : 1; /* MOP MODE */N unsigned xm$v_chr_loopb : 1; /* LOOP BACK */N unsigned xm$v_chr_hdplx : 1; /* HALF DUPLEX */N unsigned xm$v_chr_slave : 1; /* HALF DUPLEX SLAVE STATION */N unsigned3 xm$v_chr_mbx : 1; /* MAILBOX IS ENABLED */N unsigned xm$v_chr_dmc : 1; /* DMC-11 COMPATABILITY MODE */N unsigned xm$v_chr_ctrl : 1; /* CONTROL STATION */N unsigned xm$v_chr_trib : 1; /* TRIBUTARY STATION */N unsigned xm$v_sts_dchk : 1; /* DATA CHECK OCCURED */N unsigned xm$v_sts_timo : 1; /* TIMEOUT OCCURED */N unsigned xm$v_sts_orun : 1; /*3 DATA OVER RUN OCCURED */N unsigned xm$v_sts_active : 1; /* ACTIVE UNIT */P unsigned xm$v_sts_buffail : 1; /* BUFFER ALLOCATION FAILURE OCCURED */N unsigned xm$v_sts_running : 1; /* PROTOCOL RUNNING */N unsigned xm$v_sts_disc : 1; /* LINE DISCONNECT OCCURED */N unsigned xmdef$$_fill_1 : 1; /* SPARE */N unsigned xm$v_err_fatal : 1; /* HARDWARE ERROR 3 */$ unsigned xmdef$$_fill_2 : 2;N unsigned xm$v_err_maint : 1; /* DDCMP MAINT MESSAGE RECEIVED */X unsigned xm$v_err_lost : 1; /* DATA LOST BECAUSE OF BUFFER SIZE MISMATCH */N unsigned xm$v_err_thresh : 1; /* THRESHOLD ERRORS */N unsigned xm$v_err_trib : 1; /* TRIBUTARY MALFUNCTIONING */N unsigned xm$v_err_start : 1; /* DDCMP START MESSAGE RECEIVED */ } xm$r_xmdef_bits0; __struct 3{N unsigned xm$v_mdm_rtshld : 1; /* RTS HOLD */N unsigned xm$v_mdm_stndby : 1; /* SELECT STANDBY */N unsigned xm$v_mdm_maint2 : 1; /* MAINTENANCE MODE 2 */N unsigned xm$v_mdm_maint1 : 1; /* MAINTENANCE MODE 1 */N unsigned xmdef$$_fill_3 : 1; /* HALF-DUPLEX */N unsigned xm$v_mdm_freq : 1; /* SELECT FREQUENCY */N unsigned xm$v_3mdm_rdy : 1; /* DATA TERMINAL READY */N unsigned xm$v_mdm_poll : 1; /* SELECT POLLING MODEM MODE */O unsigned xm$v_mdm_selm : 1; /* MODEM INTERFACE PROGRAM SELECTED */N unsigned xmdef$$_fill_4 : 2; /* UNUSED */N unsigned xm$v_mdm_int : 1; /* INTEGRAL MODEM */N unsigned xm$v_mdm_v35 : 1; /* V.35 */N unsigned xmdef$$_fill_5 : 1; /* UNU 3SED */N unsigned xm$v_mdm_rs232 : 1; /* RS-232-C OR RS423 */N unsigned xm$v_mdm_rs422 : 1; /* RS-422 */ } xm$r_xmdef_bits1; __struct {N unsigned xm$v_mdm_carrdet : 1; /* CARRIER DETECT */N unsigned xm$v_mdm_mstndby : 1; /* MODEM STANDBY */N unsigned xm$v_mdm_cts : 1; /* CLEAR TO SEND */N unsigned xm$v_md3m_dsr : 1; /* DATA SET READY */N unsigned xm$v_mdm_hdx : 1; /* HALF-DUPLEX */N unsigned xm$v_mdm_rts : 1; /* REQUEST TO SEND */N unsigned xm$v_mdm_dtr : 1; /* DATA TERMINAL READY */N unsigned xm$v_mdm_ring : 1; /* RING */N unsigned xm$v_mdm_chrmod : 1; /* CHARACTER OR BIT PROTOCOL MODE */N unsigned xm$v_mdm_mclock : 1; /* MAINTEN 3ANCE CLOCK */N unsigned xm$v_mdm_modtest : 1; /* MODEM TEST MODE */N unsigned xmdef$$_fill_6 : 3; /* UNUSED */N unsigned xm$v_mdm_sigqual : 1; /* SIGNAL QUALITY */N unsigned xm$v_mdm_sigrate : 1; /* SIGNAL RATE */ } xm$r_xmdef_bits2; } ; #if !defined(__VAXC)2#define xm$v_chr_mop xm$r_xmdef_bits0.xm$v_chr_mop6#define xm$v_chr_loopb xm$r_xmdef_bits 30.xm$v_chr_loopb6#define xm$v_chr_hdplx xm$r_xmdef_bits0.xm$v_chr_hdplx6#define xm$v_chr_slave xm$r_xmdef_bits0.xm$v_chr_slave2#define xm$v_chr_mbx xm$r_xmdef_bits0.xm$v_chr_mbx2#define xm$v_chr_dmc xm$r_xmdef_bits0.xm$v_chr_dmc4#define xm$v_chr_ctrl xm$r_xmdef_bits0.xm$v_chr_ctrl4#define xm$v_chr_trib xm$r_xmdef_bits0.xm$v_chr_trib4#define xm$v_sts_dchk xm$r_xmdef_bits0.xm$v_sts_dchk4#define xm$v_sts_timo xm$r_xmdef_bits0.xm$v_sts_timo4#define xm$v_sts_orun xm$r_xmdef_bits0.xm$v_sts_orun8#d 3efine xm$v_sts_active xm$r_xmdef_bits0.xm$v_sts_active:#define xm$v_sts_buffail xm$r_xmdef_bits0.xm$v_sts_buffail:#define xm$v_sts_running xm$r_xmdef_bits0.xm$v_sts_running4#define xm$v_sts_disc xm$r_xmdef_bits0.xm$v_sts_disc6#define xm$v_err_fatal xm$r_xmdef_bits0.xm$v_err_fatal6#define xm$v_err_maint xm$r_xmdef_bits0.xm$v_err_maint4#define xm$v_err_lost xm$r_xmdef_bits0.xm$v_err_lost8#define xm$v_err_thresh xm$r_xmdef_bits0.xm$v_err_thresh4#define xm$v_err_trib xm$r_xmdef_bits0.xm$v_err_trib 36#define xm$v_err_start xm$r_xmdef_bits0.xm$v_err_start8#define xm$v_mdm_rtshld xm$r_xmdef_bits1.xm$v_mdm_rtshld8#define xm$v_mdm_stndby xm$r_xmdef_bits1.xm$v_mdm_stndby8#define xm$v_mdm_maint2 xm$r_xmdef_bits1.xm$v_mdm_maint28#define xm$v_mdm_maint1 xm$r_xmdef_bits1.xm$v_mdm_maint14#define xm$v_mdm_freq xm$r_xmdef_bits1.xm$v_mdm_freq2#define xm$v_mdm_rdy xm$r_xmdef_bits1.xm$v_mdm_rdy4#define xm$v_mdm_poll xm$r_xmdef_bits1.xm$v_mdm_poll4#define xm$v_mdm_selm xm$r_xmdef_bits1.xm$v_mdm_selm2#d 3efine xm$v_mdm_int xm$r_xmdef_bits1.xm$v_mdm_int2#define xm$v_mdm_v35 xm$r_xmdef_bits1.xm$v_mdm_v356#define xm$v_mdm_rs232 xm$r_xmdef_bits1.xm$v_mdm_rs2326#define xm$v_mdm_rs422 xm$r_xmdef_bits1.xm$v_mdm_rs422:#define xm$v_mdm_carrdet xm$r_xmdef_bits2.xm$v_mdm_carrdet:#define xm$v_mdm_mstndby xm$r_xmdef_bits2.xm$v_mdm_mstndby2#define xm$v_mdm_cts xm$r_xmdef_bits2.xm$v_mdm_cts2#define xm$v_mdm_dsr xm$r_xmdef_bits2.xm$v_mdm_dsr2#define xm$v_mdm_hdx xm$r_xmdef_bits2.xm$v_mdm_hdx2#define xm$v_mdm 3_rts xm$r_xmdef_bits2.xm$v_mdm_rts2#define xm$v_mdm_dtr xm$r_xmdef_bits2.xm$v_mdm_dtr4#define xm$v_mdm_ring xm$r_xmdef_bits2.xm$v_mdm_ring8#define xm$v_mdm_chrmod xm$r_xmdef_bits2.xm$v_mdm_chrmod8#define xm$v_mdm_mclock xm$r_xmdef_bits2.xm$v_mdm_mclock:#define xm$v_mdm_modtest xm$r_xmdef_bits2.xm$v_mdm_modtest:#define xm$v_mdm_sigqual xm$r_xmdef_bits2.xm$v_mdm_sigqual:#define xm$v_mdm_sigrate xm$r_xmdef_bits2.xm$v_mdm_sigrate"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_S3TARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XMDEF_LOADED */ wwYs/********************************************************************************************************************************/=/* Created 3: 5-Apr-2012 13:00:50 by OpenVMS SDL EV3-3 */M/* Source: 05-APR-2012 13:00:42 $1$DGA7304:[STARLET_H.SRC]STARDEFQZ.SDI;1 *//********************************************************************************************************************************//*** MODULE $XWDEF ***/#ifndef __XWDEF_LOADED#define __XWDEF_LOADED 1 G#pragma __nostandard /* This file uses non-ANSI-Standard features */!#pragma __member_alignment __save#pragma __nomember_alignmentR#ifdef __INITIAL_POI3NTER_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 struct3#else#define __struct variant_struct#endif#endif #ifndef __union#if !defined(__VAXC)#define __union union#else#define __union variant_union#endif#endif N/*++ */N/* */N/* XWDEF - System definitions for software DDCMP */N/* */3N/*-- */#define XW$M_CHA_FDX 0x1#define XW$M_CHA_XPR 0x2#define XW$M_CHA_DSR 0x4#define XW$M_FAT_STAT 0x3FF#define XW$M_INFO_STAT 0xFC00#define XW$M_EOT 0x1#define XW$M_DATACK 0x2#define XW$M_NODSR 0x4#define XW$M_DISCON 0x8#define XW$M_TRABINTMO 0x10#define XW$M_PIPE_MARK 0x20#define XW$M_BADCHAIN 0x40#define XW$M_ILLMOD 0x80#define XW$M_RVI 0x400#define XW$M_CONACK 0x800#define XW$M_XPR 0x13000#define XW$M_ETXEND 0x2000#define XW$M_PUNCH 0x10000#define XW$M_HOR_FOR 0x20000#define XW$M_IOMOD 0xE000 #ifdef __NEW_STARLETtypedef union _xwdef { __struct {N unsigned xw$v_cha_fdx : 1; /* Full duplex line */N unsigned xw$v_cha_xpr : 1; /* Transparency */N unsigned xw$v_cha_dsr : 1; /* Data Set Ready set */# unsigned xw$v_fill_81_ : 5; } xw$r_xwdef_bits0;N/* 3 */N/* Device dependent status */N/* */ __struct {N unsigned xw$v_fat_stat : 10; /* Beginning of fatal stat flags */N unsigned xw$v_info_stat : 6; /* Start of informational status */ } xw$r_xwdef_bits1;N/* 3 */N/* Bit definitions for fatal and informational status fields */N/* */ __struct {N unsigned xw$v_eot : 1; /* EOT received */N unsigned xw$v_datack : 1; /* Retry threshold exceeded */N unsigned xw$v_nodsr : 1; /* Line not connected */N unsigned xw$v_discon : 1; /* Disconnect (DLE, EOT) rcvd 3*/N unsigned xw$v_trabintmo : 1; /* Binary transmit timeout */N unsigned xw$v_pipe_mark : 1; /* Aborted because of pipe mark */N unsigned xw$v_badchain : 1; /* Bad record list */N unsigned xw$v_illmod : 1; /* Illegal QIO modifier */$ unsigned xwdef$$_fill_1 : 2;N unsigned xw$v_rvi : 1; /* Buffer ACKed with RVI */N unsigned xw$v_conack : 1; /* Buffer ACKed with con 3ver resp */N unsigned xw$v_xpr : 1; /* Buffer rcvd with transparency */N unsigned xw$v_etxend : 1; /* Rcvd block ended with ETX */$ unsigned xwdef$$_fill_2 : 2;N unsigned xw$v_punch : 1; /* Punch select found */N unsigned xw$v_hor_for : 1; /* Horizontal forms record rcvd */# unsigned xw$v_fill_82_ : 6; } xw$r_xwdef_bits2;N/* 3 */N/* Read/Write function modifier definition */N/* */ __struct {% unsigned xwdef$$_fill_3 : 13;N unsigned xw$v_iomod : 3; /* I/O modifier field start */ } xw$r_xwdef_bits3; } XWDEF; #if !defined(__VAXC)2#define xw$v_cha_fdx xw$r_xwdef_bits0.xw$v_cha_fdx2#define xw$v_cha_xpr xw$r_xwdef_bits0.xw$v_cha_xpr2#define xw$v_cha_d 3sr xw$r_xwdef_bits0.xw$v_cha_dsr4#define xw$v_fat_stat xw$r_xwdef_bits1.xw$v_fat_stat6#define xw$v_info_stat xw$r_xwdef_bits1.xw$v_info_stat*#define xw$v_eot xw$r_xwdef_bits2.xw$v_eot0#define xw$v_datack xw$r_xwdef_bits2.xw$v_datack.#define xw$v_nodsr xw$r_xwdef_bits2.xw$v_nodsr0#define xw$v_discon xw$r_xwdef_bits2.xw$v_discon6#define xw$v_trabintmo xw$r_xwdef_bits2.xw$v_trabintmo6#define xw$v_pipe_mark xw$r_xwdef_bits2.xw$v_pipe_mark4#define xw$v_badchain xw$r_xwdef_bits2.xw$v_badchain0#def3ine xw$v_illmod xw$r_xwdef_bits2.xw$v_illmod*#define xw$v_rvi xw$r_xwdef_bits2.xw$v_rvi0#define xw$v_conack xw$r_xwdef_bits2.xw$v_conack*#define xw$v_xpr xw$r_xwdef_bits2.xw$v_xpr0#define xw$v_etxend xw$r_xwdef_bits2.xw$v_etxend.#define xw$v_punch xw$r_xwdef_bits2.xw$v_punch2#define xw$v_hor_for xw$r_xwdef_bits2.xw$v_hor_for.#define xw$v_iomod xw$r_xwdef_bits3.xw$v_iomod"#endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ union xwdef { __struct {N unsigned x3w$v_cha_fdx : 1; /* Full duplex line */N unsigned xw$v_cha_xpr : 1; /* Transparency */N unsigned xw$v_cha_dsr : 1; /* Data Set Ready set */# unsigned xw$v_fill_81_ : 5; } xw$r_xwdef_bits0;N/* */N/* Device dependent status */N/* 3 */ __struct {N unsigned xw$v_fat_stat : 10; /* Beginning of fatal stat flags */N unsigned xw$v_info_stat : 6; /* Start of informational status */ } xw$r_xwdef_bits1;N/* */N/* Bit definitions for fatal and informational status fields */N/* */ __struct {N unsigned3 xw$v_eot : 1; /* EOT received */N unsigned xw$v_datack : 1; /* Retry threshold exceeded */N unsigned xw$v_nodsr : 1; /* Line not connected */N unsigned xw$v_discon : 1; /* Disconnect (DLE, EOT) rcvd */N unsigned xw$v_trabintmo : 1; /* Binary transmit timeout */N unsigned xw$v_pipe_mark : 1; /* Aborted because of pipe mark */N unsigned xw$v_badchain : 1; /*3 Bad record list */N unsigned xw$v_illmod : 1; /* Illegal QIO modifier */$ unsigned xwdef$$_fill_1 : 2;N unsigned xw$v_rvi : 1; /* Buffer ACKed with RVI */N unsigned xw$v_conack : 1; /* Buffer ACKed with conver resp */N unsigned xw$v_xpr : 1; /* Buffer rcvd with transparency */N unsigned xw$v_etxend : 1; /* Rcvd block ended with ETX */$ unsigned xwdef$$_fill_ 32 : 2;N unsigned xw$v_punch : 1; /* Punch select found */N unsigned xw$v_hor_for : 1; /* Horizontal forms record rcvd */# unsigned xw$v_fill_82_ : 6; } xw$r_xwdef_bits2;N/* */N/* Read/Write function modifier definition */N/* */ __struct {% unsi 3gned xwdef$$_fill_3 : 13;N unsigned xw$v_iomod : 3; /* I/O modifier field start */ } xw$r_xwdef_bits3; } ; #if !defined(__VAXC)2#define xw$v_cha_fdx xw$r_xwdef_bits0.xw$v_cha_fdx2#define xw$v_cha_xpr xw$r_xwdef_bits0.xw$v_cha_xpr2#define xw$v_cha_dsr xw$r_xwdef_bits0.xw$v_cha_dsr4#define xw$v_fat_stat xw$r_xwdef_bits1.xw$v_fat_stat6#define xw$v_info_stat xw$r_xwdef_bits1.xw$v_info_stat*#define xw$v_eot xw$r_xwdef_bits2.xw$v_eot0#define xw$v_datack xw 3$r_xwdef_bits2.xw$v_datack.#define xw$v_nodsr xw$r_xwdef_bits2.xw$v_nodsr0#define xw$v_discon xw$r_xwdef_bits2.xw$v_discon6#define xw$v_trabintmo xw$r_xwdef_bits2.xw$v_trabintmo6#define xw$v_pipe_mark xw$r_xwdef_bits2.xw$v_pipe_mark4#define xw$v_badchain xw$r_xwdef_bits2.xw$v_badchain0#define xw$v_illmod xw$r_xwdef_bits2.xw$v_illmod*#define xw$v_rvi xw$r_xwdef_bits2.xw$v_rvi0#define xw$v_conack xw$r_xwdef_bits2.xw$v_conack*#define xw$v_xpr xw$r_xwdef_bits2.xw$v_xpr0#define xw$v_etxend xw$r_x3wdef_bits2.xw$v_etxend.#define xw$v_punch xw$r_xwdef_bits2.xw$v_punch2#define xw$v_hor_for xw$r_xwdef_bits2.xw$v_hor_for.#define xw$v_iomod xw$r_xwdef_bits3.xw$v_iomod"#endif /* #if !defined(__VAXC) */ %#endif /* #ifdef __NEW_STARLET */ $#pragma __member_alignment __restoreR#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */b#pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */#endif#ifdef __cplusplus }#endif#pragma __standard #endif /* __XWDEF_LOADED */ ww 3\/*J *************************************************************************J * *J * Copyright 1988, 2007 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * 3 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *J3 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * 3 *J ************************************************************************* *//*[ * @(#)$RCSfile: cma.template.h,v $ $Revision: 1.1.6.9 $ (DEC) $Date: 2007/02/06 00:00:00 $ *//* * FACILITY: *6 * Digital's Proprietary Interface to DECthreads (cma) *H * This interface is OBSOLETE. Although it will continue to be supportedA * in the future, no new features will be added (including 64-bitF * pointer support for OpenVMS Alpha). In the future, documentation 3ofG * this interface will be moved to an "obsolete features" appendix thatD * may eventually be dropped from the distributed documentation set. *G * New development should not use this interface. Instead, refer to the< * Guide to DECthreads for information on the standard POSIXB * 1003.1c-1995 interface, which uses the header file . *A * In addition, it is usually relatively easy to migrate from theI * proprietary cma interface to the open standard 1003.1c-1995 "pthread"/ *!3 interface -- the semantics are very similar. * * ABSTRACT: *= * External definitions for the OBSOLETE cma interface to the * DECthreads "core" services. * * AUTHORS: * * Dave Butenhof * * CREATION DATE: * * 2 November 1988 * * MODIFIED BY: * * Dave Butenhof * Paul Clark * Bob Conti * Paul Curtin * Steve Johnson * Brian Keane * Hans Oser * Peter Portante * Webb Scales * Ravi Chamarti * Tom Dahl * */ #ifndef CMA_INCLUDE#defin3e CMA_INCLUDE#ifdef __cplusplus extern "C" {#endif#ifndef _DECTHREADS_/*F * Define a symbol which client code can test to determine the current * version of DECthreads. *M * The DECthreads version is encoded in the numeric value of this symbol. TheH * version is normally in the form "Vvv.bb-ll" where "vv" represents theM * major version, "bb" represents the baselevel (which increases continuouslyK * regardless of version), and "ll" is a build level that increases in each3/ * DECthreads project build within a baselevel. *I * Higher numeric values are always more recent versions. So to check forH * support of a feature that appeared in DECthreads V2.12-100, you could( * check whether the symbol is > 212100. */#define _DECTHREADS_ 322016#endif/*L * The implementation makes these basic decisions. On VMS, save and adjustH * the extern_model (standard for VAXC) prior to including cma_config.h.+ * Also enforce the use of 32-bit pointers. */]#i 3f defined (vms) || defined (__vms) || defined (VMS) || defined (__VMS) || defined (__vms__)Z# if defined (__decc) || defined (__DECC) || (defined (__cplusplus) && defined (__DECCXX))# pragma __extern_model __save(# pragma __extern_model __strict_refdef(# pragma __required_pointer_size __save)# pragma __required_pointer_size __shortO# elif defined (vaxc) || defined (VAXC) || defined (__vaxc) || defined (__VAXC)# pragma nostandard# endif5# include /* configuration s3ymbols */# include #else# include # include #endif #if _CMA_OSIMPL_ == _CMA__OS_OSF/*M * The Digital UNIX standards.h defines POSIX and OSF programming environmentM * symbols if none of the recognized symbols are already defined, but definesK * no more if any are already defined. To retain as much as possible of theI * application's desired environment, we'll include unistd.h first to getM * whatever it thinks we need -- a3nd then define what we really do need if it * didn't. */# include # include #endif#if _CMA_OS_ == _CMA__UNIX# include # include #endif#if _CMA_OS_ == _CMA__VMS# include #endif/*I * Make sure we are included with _REENTRANT defined. This helps to catch= * cases where the wrong per-thread errno value will be used. */:#if (_CMA_OSIMPL_ == _CMA__OS_OSF) && _CMA_REENTRANT_CLIB_# ifndef _REENTRANTB# error "3Please compile the module including cma.h with -threads"# endif#endif/* * Basic types */typedef long cma_t_integer;$typedef unsigned long cma_t_natural;$typedef cma_t_natural cma_t_boolean;typedef float cma_t_interval;typedef int cma_t_errno;#if _CMA_VOID_typedef void *cma_t_address;#elsetypedef char *cma_t_address;#endif$#define cma_c_false (cma_t_boolean)0##define cma_c_true (cma_t_boolean)1'#define cma_c_null_ptr (cma_t_address)0/*M * If we'r3e on a system with POSIX 1003.4 support, use the system symbols for * scheduling policy. */#if _CMA_RT4_KTHREAD_$# define cma_c_sched_fifo SCHED_FIFO!# define cma_c_sched_rr SCHED_RR+# define cma_c_sched_throughput SCHED_FG_NP+# define cma_c_sched_background SCHED_BG_NP# define cma_c_sched_ada_low 5# define cma_c_sched_ada_rtb 6/* * NOTE: *M * On Digital UNIX, this header file retains the binary value of cma priorityK * symbols used prior to Digital UNIX 4.0. However, 3on earlier versions theK * cma priorities mapped directly to kernel realtime priorities. In the newJ * version of DECthreads, all cma threads are "multiplexed" onto arbitraryL * kernel threads in user mode, and cma priority has no real relationship toI * the kernel priority at which the thread runs -- it controls only whichJ * user thread the DECthreads core will select to run when a kernel thread * becomes available. */# define cma_c_prio_fifo_max 21# define cma_c_prio_fifo_mid 183# define cma_c_prio_fifo_min 14# define cma_c_prio_rr_max 22# define cma_c_prio_rr_mid 19# define cma_c_prio_rr_min 15"# define cma_c_prio_through_max 22"# define cma_c_prio_through_mid 19"# define cma_c_prio_through_min 15# define cma_c_prio_back_max 13# define cma_c_prio_back_mid 8# define cma_c_prio_back_min 0"# define cma_c_prio_ada_low_max 13!# define cma_c_prio_ada_low_mid 8!# define cma_c_prio_ada_low_min 0"# define cma_c_prio_ada_rtb_max 13!# define cma_c_prio_ada_3rtb_mid 8!# define cma_c_prio_ada_rtb_min 0#else# define cma_c_sched_fifo 0# define cma_c_sched_rr 1!# define cma_c_sched_throughput 2!# define cma_c_sched_background 3# define cma_c_sched_ada_low 4# define cma_c_sched_ada_rtb 5# define cma_c_prio_fifo_max 31(# define cma_c_prio_fifo_mid ((31+16)/2)# define cma_c_prio_fifo_min 16.# define cma_c_prio_rr_max cma_c_prio_fifo_max.# define cma_c_prio_rr_mid cma_c_prio_fifo_mid.# define cma_c_prio_rr_min cma_c_prio_fifo_min" 3# define cma_c_prio_through_max 15*# define cma_c_prio_through_mid ((15+8)/2)!# define cma_c_prio_through_min 8# define cma_c_prio_back_max 7&# define cma_c_prio_back_mid ((7+0)/2)# define cma_c_prio_back_min 03# define cma_c_prio_ada_low_max cma_c_prio_back_max3# define cma_c_prio_ada_low_mid cma_c_prio_back_mid3# define cma_c_prio_ada_low_min cma_c_prio_back_min6# define cma_c_prio_ada_rtb_max cma_c_prio_ada_low_max6# define cma_c_prio_ada_rtb_mid cma_c_prio_ada_low_mid6# define cma3_c_prio_ada_rtb_min cma_c_prio_ada_low_min#endif2#define cma_c_sched_default cma_c_sched_throughput-#define cma_c_sched_other cma_c_sched_default/*# * Contention scope possible values */#if _CMA_OS_ == _CMA__UNIX#define cma_c_scope_process 0#define cma_c_scope_system 1#endif/*J * The implementation of the cma_t_date_time type should match the "nativeM * time" of the platform: that allows clients to use the full set of platformI * time operations, rather than ju4st "cma_get_expiration", to compute and * test timed waits. *K * This section assumes the platform is either "VMS" or "UNIX-ish". Others * will require changes. */#if _CMA_OS_ == _CMA__VMS typedef struct CMA_T_DATE_TIME { unsigned long int low; unsigned long int high; } cma_t_date_time;#else(typedef struct timeval cma_t_date_time;#endif/* * Handle type */typedef struct CMA_T_HANDLE { cma_t_natural field1; cma_t_natural field2; 4} cma_t_handle;?#if (_CMA_COMPILER_ == _CMA__CFRONT) && (_CMA_OS_ == _CMA__VMS)/*L * The following declaration is a hack to support CFRONT (C++ preprocessor);G * without an actual instance, the struct definition isn't written out.= * Creates problems for VAX C when it compiles CFRONT output. */.static struct CMA_T_HANDLE cxxl_unused_handle;#endif.#define cma_c_handle_size sizeof(cma_t_handle)/* * Predefined null handle */ #ifndef _CMA_SUPPRESS_EXTERNALS_%_CMA_IMPORT_ c4ma_t_handle cma_c_null;#endif/*F * One-time initialization control block and its initialization macro. *6 * Declare a one time initialization control block as: *+ * static cma_t_once block = cma_once_init; */typedef struct CMA_T_ONCE { cma_t_integer field1; cma_t_integer field2; cma_t_integer field3; } cma_t_once;#define cma_once_init {0, 0, 0}/* * Alert state structure */"typedef struct CMA_T_ALERT_STATE { cma_t_integer state1; 4cma_t_integer state2; } cma_t_alert_state;/* * Operations on Handles */extern void _CMA_CALL_7cma_handle_assign ( /* Assign one handle to another */* cma_t_handle *handle1, /* Input handle */, cma_t_handle *handle2); /* Output handle */extern cma_t_boolean _CMA_CALL_,cma_handle_equal ( /* Compare two handles */ cma_t_handle *handle1, cma_t_handle *handle2);/*# * Operations on attributes objects */ typedef cma_t_handle cma_t_attr;/*I * An attribut4es object is created to specify the attributes of other CMA * objects that will be created. */extern void _CMA_CALL_cma_attr_create ( cma_t_attr *new_attr, cma_t_attr *attr);/*C * An attributes object can be deleted when it is no longer needed. */extern void _CMA_CALL_cma_attr_delete ( cma_t_attr *attr);/* * Operations on threads */"typedef cma_t_handle cma_t_thread;Atypedef cma_t_address (*cma_t_start_routine) (cma_t_address arg); typedef enum CMA4_T_EXIT_STATUS { cma_c_term_error = 0, cma_c_term_normal = 1, cma_c_term_alert = 2 } cma_t_exit_status;"typedef enum CMA_T_SCHED_INHERIT { cma_c_sched_inherit = 0, cma_c_sched_use_default = 1 } cma_t_sched_inherit;!typedef enum CMA_T_DETACH_STATE { cma_c_create_joinable = 0, cma_c_create_detached = 1 } cma_t_detach_state;/*C * The following procedures can be used to control thread creation, * termination and deletion. */ 4/*M * To create a thread object and runnable thread, a routine must be specifiedH * as the new thread's start routine. An argument may be passed to thisM * routine, as an untyped address; an untyped address may also be returned asL * the routine's value. An attributes object may be used to specify details* * about the kind of thread being created. */extern void _CMA_CALL_cma_thread_create ( cma_t_thread *new_thread, cma_t_attr *attr,# cma_t_start_routine start_routine, cma4_t_address arg);/*I * A thread object may be "detached" to specify that the return value and+ * completion status will not be requested. */extern void _CMA_CALL_cma_thread_detach ( cma_t_thread *thread);/*- * A thread may terminate it's own execution. */extern void _CMA_CALL_cma_thread_exit_error (void);extern void _CMA_CALL_cma_thread_exit_normal ( cma_t_address result);/*K * A thread can await termination of another thread and retrieve the return- *4 value and completion status of the thread. */extern void _CMA_CALL_cma_thread_join ( cma_t_thread *thread, cma_t_exit_status *exit_status, cma_t_address *result);/*2 * Operations to define thread creation attributes */&typedef cma_t_integer cma_t_priority;*typedef cma_t_integer cma_t_sched_policy;#if _CMA_OS_ == _CMA__UNIX#typedef cma_t_integer cma_t_scope;#endif/*- * Set or obtain the default thread priority. */extern void _CMA_CALL_cma_attr_set_p 4riority ( cma_t_attr *attr, cma_t_priority pri);extern void _CMA_CALL_cma_attr_get_priority ( cma_t_attr *attr, cma_t_priority *pri);/*1 * Set or obtain the default scheduling algorithm */extern void _CMA_CALL_cma_attr_set_sched ( cma_t_attr *attr, cma_t_sched_policy policy, cma_t_priority priority);extern void _CMA_CALL_cma_attr_get_sched ( cma_t_attr *attr, cma_t_sched_policy *policy);/*K * Set or obtain whether a thread will use the schedul 4ing attributes set inI * the attributes object or inherit them from the creating thread. Note, * inheritance is the default. */extern void _CMA_CALL_cma_attr_set_inherit_sched ( cma_t_attr *attr, cma_t_sched_inherit setting);extern void _CMA_CALL_cma_attr_get_inherit_sched ( cma_t_attr *attr, cma_t_sched_inherit *setting);/*' * Set or obtain the default stack size */extern void _CMA_CALL_cma_attr_set_stacksize ( cma_t_attr *attr, cma_t_natural stacksize 4);extern void _CMA_CALL_cma_attr_get_stacksize ( cma_t_attr *attr, cma_t_natural *stacksize);/*' * Set or obtain the default guard size */extern void _CMA_CALL_cma_attr_set_guardsize ( cma_t_attr *attr, cma_t_natural guardsize);extern void _CMA_CALL_cma_attr_get_guardsize ( cma_t_attr *attr, cma_t_natural *guardsize);/*- * Set or obtain the default contention scope */#if _CMA_OS_ == _CMA__UNIXextern void _CMA_CALL_cma_attr_set_scope ( cma_t_attr  4*attr, cma_t_scope scope);extern void _CMA_CALL_cma_attr_get_scope ( cma_t_attr *attr, cma_t_scope *scope);#endif/*6 * Set or obtain the create-already-detached attribute */extern void _CMA_CALL_cma_attr_get_detachstate ( cma_t_attr *att, cma_t_detach_state *setting);extern void _CMA_CALL_cma_attr_set_detachstate ( cma_t_attr *att, cma_t_detach_state setting);/* * Thread Scheduling Operations *//** * Set or obtain the priority of a thread. */ 4extern void _CMA_CALL_cma_thread_get_priority ( cma_t_thread *thread, cma_t_priority *priority);extern void _CMA_CALL_cma_thread_set_priority ( cma_t_thread *thread, cma_t_priority priority);/*6 * Set or obtain the scheduling algorithm of a thread. */extern void _CMA_CALL_cma_thread_get_sched ( cma_t_thread *thread, cma_t_sched_policy *policy);extern void _CMA_CALL_cma_thread_set_sched ( cma_t_thread *thread, cma_t_sched_policy policy, cma_t_prior4ity priority);/*L * A thread may tell the scheduler that its processor can be made available. */extern void _CMA_CALL_cma_yield (void);/*B * A thread may enter a wait state for a specified period of time.K * The interval parameter is a floating point number. This must be suppliedK * as a VAX-format float. Attempt to detect compilations which pass an IEEEF * format float. The underscores lengthen the identifier and trigger aE * compiler message, to alert the user at compile-ti4me. Otherwise the8 * notification is delayed to a linker undefined symbol. */4#if ((_CMA_OS_ == _CMA__VMS) && (__IEEE_FLOAT == 0))# define cma_delay CMA_DELAY#else4# define cma_delay cma_delay_needs_VAX_float________#endifextern void _CMA_CALL_ cma_delay ( cma_t_interval interval);/*@ * Bind a thread to a particular CPU on a multiprocessor system. */extern void _CMA_CALL_cma_thread_bind_to_cpu ( cma_t_thread *thread, long cpu_mask);/* * Thread Information 4Operations *//*7 * A thread may obtain a copy of its own thread handle. */extern void _CMA_CALL_cma_thread_get_self ( cma_t_thread *thread);/*' * Get the sequence number of a thread. */extern cma_t_natural _CMA_CALL_cma_thread_get_unique ( cma_t_thread *thread);/* * Operations on Mutexes */!typedef cma_t_handle cma_t_mutex;typedef enum CMA_T_MUTEX_KIND { cma_c_mutex_fast = 0, cma_c_mutex_recursive = 1, cma_c_mutex_nonrecursive = 24 } cma_t_mutex_kind;/*1 * Operations to define mutex creation attributes *//*. * Set or obtain whether mutex locks can nest. */extern void _CMA_CALL_cma_attr_set_mutex_kind ( cma_t_attr *attr, cma_t_mutex_kind nest);extern void _CMA_CALL_cma_attr_get_mutex_kind ( cma_t_attr *attr, cma_t_mutex_kind *nest);/** * A thread can create and delete mutexes. */extern void _CMA_CALL_cma_mutex_create ( cma_t_mutex *new_mutex, cma_t_attr *attr);4extern void _CMA_CALL_cma_mutex_delete ( cma_t_mutex *mutex);/*' * A thread can lock or unlock a mutex. */extern void _CMA_CALL_cma_mutex_lock ( cma_t_mutex *mutex);extern cma_t_boolean _CMA_CALL_cma_mutex_try_lock ( cma_t_mutex *mutex);extern void _CMA_CALL_cma_mutex_unlock ( cma_t_mutex *mutex);/*L * A thread may synchronize access to external non-thread-safe code or data,M * preventing conflict with threads created by other facilities, by using the4 * DECthreads "Global Lock". */extern void _CMA_CALL_cma_lock_global (void);extern void _CMA_CALL_cma_unlock_global (void);/*$ * Operations on condition variables */ typedef cma_t_handle cma_t_cond;/*6 * A thread can create and delete condition variables. */extern void _CMA_CALL_cma_cond_create ( cma_t_cond *new_condition, cma_t_attr *attr);extern void _CMA_CALL_cma_cond_delete ( cma_t_cond *condition);/*@ * A thread can signal to and broadcas4t on a condition variable. */extern void _CMA_CALL_cma_cond_broadcast ( cma_t_cond *condition);extern void _CMA_CALL_cma_cond_signal ( cma_t_cond *condition);extern void _CMA_CALL_cma_cond_signal_int ( cma_t_cond *condition);extern void _CMA_CALL_cma_cond_signal_preempt_int (#if _CMA_OS_ == _CMA__UNIX cma_t_cond *condition, cma_t_address scp#else cma_t_cond *condition#endif );/*K * A thread can wait for a condition variable to be signalled or bro4adcast. */extern void _CMA_CALL_cma_cond_wait ( cma_t_cond *condition, cma_t_mutex *mutex);/* * Operations for timed waiting */$typedef cma_t_integer cma_t_status;/*= * A thread can perform a timed wait on a condition variable. */extern cma_t_status _CMA_CALL_cma_cond_timed_wait ( cma_t_cond *condition, cma_t_mutex *mutex, cma_t_date_time *expiration);/*L * A thread may perform some operations on absolute date-time and intervals.M * The expiratio 4n parameter is a floating point number. This must be suppliedK * as a VAX-format float. Attempt tp detect compilations which pass an IEEEF * format float. The underscores lengthen the identifier and trigger aE * compiler message, to alert the user at compile-time. Otherwise the8 * notification is delayed to a linker undefined symbol. */4#if ((_CMA_OS_ == _CMA__VMS) && (__IEEE_FLOAT == 0))8# define cma_time_get_expiration CMA_TIME_GET_EXPIRATION#elseB# define cma_time_get_expiration cma4_time_get_ex_needs_VAX_float__#endifextern void _CMA_CALL_cma_time_get_expiration ( cma_t_date_time *expiration, cma_t_interval interval);/*7 * Operations for DECthreads and client initialization. *//*K * Initialize the DECthreads facility. (Use of this routine is not required+ * on OpenVMS, Digital UNIX or Windows NT.) */extern void _CMA_CALL_cma_init (void);/*J * A thread can declare a one-time initialization routine. The address of7 * the init block and 4routine are passed as parameters. */7typedef void (*cma_t_init_routine) (cma_t_address arg);extern void _CMA_CALL_ cma_once ( cma_t_once *init_block,! cma_t_init_routine init_routine, cma_t_address arg);/*$ * Operations for per-thread context */ typedef cma_t_natural cma_t_key;<typedef void (*cma_t_destructor) (cma_t_address ctx_value);/*B * A unique per-thread context key can be obtained for the process */extern void _CMA_CALL_cma_key_create ( cma_t4_key *key, cma_t_attr *attr, cma_t_destructor destructor);/*C * A thread can set a per-thread context value identified by a key. */extern void _CMA_CALL_cma_key_set_context ( cma_t_key key, cma_t_address context_value);/*H * A thread can retrieve a per-thread context value identified by a key. */extern void _CMA_CALL_cma_key_get_context ( cma_t_key key, cma_t_address *context_value);/* * Operations for alerts. *//*: * The current thread can 4request that a thread terminate. */extern void _CMA_CALL_cma_thread_alert ( cma_t_thread *thread);/*2 * The current thread can poll for alert delivery. */extern void _CMA_CALL_cma_alert_test (void);/*J * The current thread can disable asynchronous alert delivery, restore theH * previous state of asynchronous alert delivery, or enable asynchronous * alert delivery. */extern void _CMA_CALL_cma_alert_disable_asynch ( cma_t_alert_state *prior);extern void _CMA4_CALL_cma_alert_disable_general ( cma_t_alert_state *prior);extern void _CMA_CALL_cma_alert_enable_asynch (void);extern void _CMA_CALL_cma_alert_enable_general ( cma_t_alert_state *prior);extern void _CMA_CALL_cma_alert_restore ( cma_t_alert_state *prior);/*N * A thread may check to see if there is sufficient space on its current stack */extern cma_t_boolean _CMA_CALL_cma_stack_check_limit_np ( cma_t_integer size);/* * Debug threads */extern v 4oid _CMA_CALL_cma_debug (void);/*H * The cma_debug_cmd() function returns the status of the last specified# * operation in the command string. */typedef enum CMA_T_DBG_STATUS {8 cma_s_dbg_success = 0, /* Command was successful */A cma_s_dbg_quit = 1, /* Last command was 'quit' or 'exit' */J cma_s_dbg_nonesel = 2, /* No objects selected (e.g., "thread -br") */7 cma_s_dbg_successpend = 3, /* Alternate success */: cma_s_dbg_nopriv = -1, /* No privilege for comm 4and */@ cma_s_dbg_invparam = -2, /* Invalid parameter on command */F cma_s_dbg_invseq = -3, /* Invalid object sequence number given */F cma_s_dbg_inconstate = -4, /* Inconsistent state for operation */J cma_s_dbg_corrupt = -5, /* Unable to complete; internal corruption */< cma_s_dbg_invoption = -6, /* Invalid command options */9 cma_s_dbg_noarg = -7, /* Missing command argument */2 cma_s_dbg_invaddr = -8, /* Invalid address */1 cma_s_dbg_invcmd = -9, /* Invalid4 command */4 cma_s_dbg_nullcmd = -10, /* No command given */8 cma_s_dbg_conflict = -11, /* Conflicting options */7 cma_s_dbg_unimpl = -12 /* Unimplemented feature */ } cma_t_dbg_status;/*D * Pass a command string to DECthreads debug for interpretation. The) * argument is a "char *" command string. */"extern cma_t_dbg_status _CMA_CALL_cma_debug_cmd (char *cmd);/*B * Restore extern_model or standard environment, adjusted prior to1 * inclusion of cma_config.h. Ditto pointer size. */#if _CMA_OS_ == _CMA__VMSK# if ((_CMA_COMPILER_ == _CMA__DECC) || (_CMA_COMPILER_ == _CMA__DECCPLUS))"# pragma __extern_model __restore+# pragma __required_pointer_size __restore## elif _CMA_COMPILER_ == _CMA__VAXC# pragma standard# endif#endif#ifdef __cplusplus }#endif#endifww EVMSBUILD CMA#+T EVMSBUILD CMA_CONFIG$ EVMSBUILD CMA_LIBRARY ˼ EVMSBUILD CMA_TIS% ʤ EVMSBUILD EXC_HANDLING  EVMSBUILD PTHREAD#+k EVMSBUILD PTHREAD_D4&;t EVMSBUILD PTHREAD_DEBUG$;V EVMSBUILD PTHREAD_EXC*{c EVMSBUILD PTHREAD_EXCEPTION&۾ EVMSBUILD PTHREAD_TRACE۠ EVMSBUILD TIS !4 /*J *************************************************************************J * *J * Copyright 1990, 2004 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * "4 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *J#4 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * $4 *J ************************************************************************* *//*Z * @(#)$RCSfile: cma_config.h,v $ $Revision: 1.1.26.5 $ (DEC) $Date: 2003/04/11 18:25:29 $ *//* * FACILITY: * * DECthreads core * * ABSTRACT: *7 * Configuration header file to set up control symbols. * * AUTHORS: * * Dave Butenhof * * CREATION DATE: * * 26 January 1990 * * MODIFIED BY: * * Dave Butenhof * Bob Conti * Paul Curtin * Webb %4Scales * Brian Keane * Brian Silver * RaeLyn Crowell * * LAST MODIFIED: * * 11 February 2003 */ #ifndef CMA_CONFIG#define CMA_CONFIG/* * INCLUDE FILES *//* * CONFIGURATION SYMBOLS *//*J * Quick reference guide to the external DECthreads configuration symbols: *0 * _CMA_COMPILER_ (CC, VAXC, DECC, CFRONT, GCC, * DECCPLUS, GCPLUS)5 * Each compiler has its own quirks, and DECthreads3 * tries to do as much with each as possible. For7 * &4 example, it instantiates function prototypes where7 * possible, even if the compiler is not fully ANSI C * compliant.+ * _CMA_HARDWARE_ (MIPS, VAX, ALPHA, IA64)/ * The computer on which DECthreads will run. * _CMA_OS_ (UNIX, VMS)7 * The operating system on which DECthreads will run;7 * generally, all UNIX-descended systems have certain9 * similarities which need to be considered as a group.= * _CMA_PLATFORM_ (MIPS/UNIX, VAX/VMS, VAX/UNIX, ALPHA/UNIX, * ALPHA '4/VMS, IA64/VMS) 8 * This is a convenience to test both hardware and O/S * variants together. * _CMA_PROTO_ (1 or undefined)2 * This is set if the compiler supports function4 * prototypes (if __STDC__ is true, or if any of a7 * number of specific compilers is being used). Note:& * this must be tested by an #ifdef.! * _CMA_OSIMPL_ (OSF, BSD, SYSV)7 * The closest ancestor of the UNIX operating system,6 * since each family inherits common characteristics( * (particular (4ly in signal behaviors). * _CMA_VOID_ (0, 1)9 * This is TRUE (1) if the compiler supports the use of7 * "void *" types. Most __STDC__ compilers do (except: * that a version of MIPS C had a bug that prevented its: * use). If _CMA_VOID_ is FALSE (0), DECthreads will use * "char *" instead.% * _CMA_VOLATILE_ ("volatile" or "")4 * DECthreads requires "volatile" storage class in8 * several places, including exception handling. Since9 * some compilers do not support "volati )4le", DECthreads9 * uses this symbol in place of the "volatile" keyword.7 * Note that DECthreads runtimes built with compilers4 * that do not support volatile may show incorrect7 * behavior under certain circumstances (particularly2 * during delivery of exceptions). Because these3 * situations tend to occur only when errors have6 * already occurred, it is hoped that the absence of0 * volatile will not prevent normal DECthreads * operation. * _CMA_REENTRANT_CLIB_ (0, *41)8 * If TRUE (1) then the C library functions are thread * reentrant. * _CMA_IMPORT_, _CMA_EXPORT_8 * Specifies the keywords used for EXPORTing variables5 * from DECthreads, or IMPORTing those variables to4 * client code. For normal UNIX systems, IMPORT is9 * usually "extern" and EXPORT is usually null. Because7 * of oddities in the VAX C implementation of extern,/ * DECthreads uses "globaldef" for EXPORT and * "globalref" for IMPORT.$ * _CMA_NOWRAPPERS_ (1 or un +4defined)6 * If defined, DECthreads will not use its I/O and C9 * library wrapper functions. Generally, this is set to: * 1 for building DECthreads, and undefined for building; * client code. [There is no default definition provided; * for this symbol in this file, since the default is for * it to be undefined.] * _CMA_VSSCANF_ (0, 1)4 * If set to 1, the DECthreads stdio wrappers will5 * include the scanf family. The wrappers cannot be< * built without the real "v*s ,4canf" functions, which don't6 * exist on most platforms; but we're prepared if we; * ever find a platform that does support them. Note that7 * we assume that using one symbol implicitly assumes7 * that if one of the v*scanf family is present, they * all will be. * _CMA_CONST_ ("const" or ""); * Similar to _CMA_VOID_ and _CMA_VOLATILE_; used for the: * I/O wrappers to make compliant with POSIX and ANSI C. * _CMA_RT4_KTHREAD_ (0, 1)5 * Set if O/S supports POSIX schedul-4ing policies on * kernel threads. * _CMA_POSIX_SCHED_ (0, 1)6 * Set if DECthreads should support POSIX scheduling7 * policy & priorities. Set for all user-mode builds;: * clear for kernel-thread builds unless O/S threads can * handle it.! * _CMA_CALL_ ("__stdcall" or "")< * Denotes the calling convention for an external routine., * Only significant on Windows NT systems. * *//*C * NOTE: all configuration symbols are set up such that they can beH * overridden .4by a -D switch on the command line if desired (but be sure$ * that you know what you're doing). */ /*" * Name of the platform C compiler */#define _CMA__CC 1#define _CMA__VAXC 2#define _CMA__DECC 3#define _CMA__CFRONT 4#define _CMA__GCC 5#define _CMA__DECCPLUS 6#define _CMA__GCPLUS 7/*J * Test for C++ compilers before C compilers because Glockenspiel C++ alsoH * defines symbols for the VAX C compiler and this could be the case for$ * other C++/C compiler combinations/4 */#ifndef _CMA_COMPILER_# if defined (__cplusplus)# if defined (__DECCXX)(# define _CMA_COMPILER_ _CMA__DECCPLUS# else&# define _CMA_COMPILER_ _CMA__CFRONT# endif+# elif defined (__decc) || defined (__DECC)## define _CMA_COMPILER_ _CMA__DECCO# elif defined (vaxc) || defined (VAXC) || defined (__vaxc) || defined (__VAXC)## define _CMA_COMPILER_ _CMA__VAXCA# elif defined (__GNUC__) || defined (__GNUC) || defined (__gnuc)"# define _CMA_COMPILER_ _CMA__GCC# else!# 04 define _CMA_COMPILER_ _CMA__CC# endif#endif/* * Name of the hardware platform */#define _CMA__MIPS 1#define _CMA__VAX 2#define _CMA__ALPHA 3#define _CMA__IA64 4#ifndef _CMA_HARDWARE_I# if defined (vax) || defined (VAX) || defined (__vax) || defined (__VAX)"# define _CMA_HARDWARE_ _CMA__VAXO# elif defined (mips) || defined (MIPS) || defined (__mips) || defined (__MIPS)## define _CMA_HARDWARE_ _CMA__MIPS-# elif defined (__ALPHA) || defined (__alpha)$# define _C14MA_HARDWARE_ _CMA__ALPHA-# elif defined (__ia64) || defined (__ia64__)## define _CMA_HARDWARE_ _CMA__IA64# else! error _CMA_HARDWARE_ not set# endif#endif/*/ * Name of the software platform (i.e., the OS) */#define _CMA__UNIX 1#define _CMA__VMS 2#ifndef _CMA_OS_Q# if defined (unix) || defined (__unix) || defined (__OSF__) || defined (__osf__)# define _CMA_OS_ _CMA__UNIXK# elif defined (vms) || defined (__vms) || defined (VMS) || defined (__VMS)# define _CMA24_OS_ _CMA__VMS# else! error _CMA_OS_ not set# endif#endif/*$ * Combined platform (OS + hardware) */#define _CMA__MIPS_UNIX 1#define _CMA__VAX_VMS 2#define _CMA__VAX_UNIX 3#define _CMA__ALPHA_UNIX 4#define _CMA__ALPHA_VMS 5#define _CMA__IA64_VMS 6#ifndef _CMA_PLATFORM_# if _CMA_OS_ == _CMA__UNIX"# if _CMA_HARDWARE_ == _CMA__MIPS)# define _CMA_PLATFORM_ _CMA__MIPS_UNIX## elif _CMA_HARDWARE_ == _CMA__VAX(# define _CMA_PLATFORM_ _CMA__VAX_UNIX%# e34lif _CMA_HARDWARE_ == _CMA__ALPHA*# define _CMA_PLATFORM_ _CMA__ALPHA_UNIX# else*! error Undefined Unix hardware platform# endif# elif _CMA_OS_ == _CMA__VMS!# if _CMA_HARDWARE_ == _CMA__VAX'# define _CMA_PLATFORM_ _CMA__VAX_VMS%# elif _CMA_HARDWARE_ == _CMA__ALPHA)# define _CMA_PLATFORM_ _CMA__ALPHA_VMS$# elif _CMA_HARDWARE_ == _CMA__IA64(# define _CMA_PLATFORM_ _CMA__IA64_VMS# else)! error Undefined VMS hardware platform# endif# else! error _CMA_PLAT44FORM_ not set# endif#endif/*# * Unix derivative (default to BSD) */#define _CMA__OS_OSF 1#define _CMA__OS_BSD 2#define _CMA__OS_SYSV 3#ifndef _CMA_OSIMPL_# if _CMA_OS_ == _CMA__UNIX# ifdef __osf__$# define _CMA_OSIMPL_ _CMA__OS_OSF # elif 0%# define _CMA_OSIMPL_ _CMA__OS_SYSV# else$# define _CMA_OSIMPL_ _CMA__OS_BSD# endif# else<# define _CMA_OSIMPL_ 0 /* Not an implementation of Unix */# endif#endif/*D * This controls whether ANSI C fu54nction prototypes are used for CMA * interfaces. */#ifndef _CMA_PROTO_J# if !((_CMA_PLATFORM_ == _CMA__VAX_UNIX) && (_CMA_COMPILER_ == _CMA__CC))# define _CMA_PROTO_ 1# endif#else# if _CMA_PROTO_ == 0# undef _CMA_PROTO_F /* _CMA_PROTO_ is undefined, which means do not use prototypes. */# endif#endif#ifdef _CMA_PROTO_!# define _CMA_PROTOTYPE_(arg) arg#else # define _CMA_PROTOTYPE_(arg) ()#endif/*E * Define a macro to control calling convention. Only s64ignificant on * Windows NT. */#ifndef _CMA_CALL_# define _CMA_CALL_#endif/*L * Define whether to use "void *" or "char *" pointers, based on whether the * compiler can support them. */#ifndef _CMA_VOID_G# if (_CMA_PLATFORM_ == _CMA__VAX_UNIX) && (_CMA_COMPILER_ == _CMA__CC)# define _CMA_VOID_ 0# else# define _CMA_VOID_ 1# endif#endif/*< * Set this to "volatile" unless using a deficient compiler. */#ifndef _CMA_VOLATILE_G# if (_CMA_PLATFORM_ == _CMA74__VAX_UNIX) && (_CMA_COMPILER_ == _CMA__CC)# define _CMA_VOLATILE_%# elif _CMA_COMPILER_ == _CMA__CFRONT# define _CMA_VOLATILE_# else!# define _CMA_VOLATILE_ volatile# endif#endif/* * Kernel-threads type.> * (These are values used to define _CMA_KTHREADS_in cma_os.h) */#define _CMA__NONE 0#define _CMA__MACH 1#define _CMA__NTTHREADS 2/*J * _CMA_REENTRANT_CLIB_ is true IFF the platform's C library is reentrant. */#ifndef _CMA_REENTRANT_CLIB_!# if _CMA_OSIM84PL_ == _CMA__OS_OSF # define _CMA_REENTRANT_CLIB_ 1K# elif (_CMA_COMPILER_ == _CMA__DECC) || (_CMA_COMPILER_ == _CMA__DECCPLUS) # define _CMA_REENTRANT_CLIB_ 1# else # define _CMA_REENTRANT_CLIB_ 0# endif#endif/*J * Define the symbols used to "import" and "export" symbols for the clientH * interface. Note that these shouldn't be used for symbols shared onlyJ * between CMA modules; it's for those symbols which are "imported" in the9 * cma.h (or pthread.h) header files, such as 94cma_c_null,1 * pthread_attr_default, and the exception names. */#if _CMA_OS_ == _CMA__VMSK# if ((_CMA_COMPILER_ == _CMA__DECC) || (_CMA_COMPILER_ == _CMA__DECCPLUS))# define _CMA_IMPORT_ extern# define _CMA_EXPORT_## elif _CMA_COMPILER_ == _CMA__VAXC # define _CMA_IMPORT_ globalref # define _CMA_EXPORT_ globaldef# endif#else# define _CMA_IMPORT_ extern# define _CMA_EXPORT_#endif/*5 * True if the system supplies the vsscanf() function */#ifndef _CMA_VSSCA:4NF_# define _CMA_VSSCANF_ 0#endif/*J * ANSI C defines some parameters using the const modifier. Use this macroI * to make the function signatures ANSI and POSIX compliant for STDIO andH * thread I/O. wrappers. Size_t is defined by including stdio.h which is* * included in cma_stdio.h and cma_stdio.c */#if defined (__STDC__)# define _CMA_CONST_ const# define _CMA_SIZE_T size_t#else# define _CMA_CONST_!# define _CMA_SIZE_T unsigned int#endif/*J * Set a symbol if we';4re building a kernel thread version on a system that< * supports POSIX.4 scheduling semantics for kernel threads. */#ifndef _CMA_RT4_KTHREAD_!# if _CMA_OSIMPL_ == _CMA__OS_OSF# define _CMA_RT4_KTHREAD_ 1# else# define _CMA_RT4_KTHREAD_ 0# endif#endif/*I * _CMA_POSIX_SCHED_ is true if not kernel threads, or if it's a specific9 * type of kernel threads that supports POSIX scheduling. */#ifndef _CMA_POSIX_SCHED_# define _CMA_POSIX_SCHED_ 1#endif#endif /* CMA_CONFIG */ww =4 w/*J *************************************************************************J * *J * Copyright 1990, 2004 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * >4 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *J?4 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * @4 *J ************************************************************************* *//*[ * @(#)$RCSfile: cma_library.h,v $ $Revision: 1.1.26.5 $ (DEC) $Date: 2003/04/11 18:08:46 $ *//* *//* * FACILITY: * * DECthreads Library services * * ABSTRACT: *7 * External definitions for DECthreads Library services * * AUTHORS: * * Webb Scales * * CREATION DATE: * * 7 August 1990 * * MODIFIED BY: * * Webb Scales * Dave ButenhofA4 * Peter Portante * */ #ifndef CMA_LIB_INCLUDE#define CMA_LIB_INCLUDE#include #ifdef __cplusplus extern "C" {#endif/*D * The following are the portable CMA High-Level Library definitions *//*# * Operations on attributes objects */$typedef cma_t_handle cma_lib_t_attr;/*I * An attributes object is created to specify the attributes of other CMA * objects that will be created. */ extern void&cma_lib_attr_create _CMA_PROTOTYPE_ (( cB4ma_lib_t_attr *new_attr, cma_lib_t_attr *attr));/*C * An attributes object can be deleted when it is no longer needed. */ extern void&cma_lib_attr_delete _CMA_PROTOTYPE_ (( cma_lib_t_attr *attr));/* * Operations on queues */%typedef cma_t_handle cma_lib_t_queue; extern void'cma_lib_queue_create _CMA_PROTOTYPE_ (( cma_lib_t_queue *new_queue, cma_lib_t_attr *att)); extern void'cma_lib_queue_delete _CMA_PROTOTYPE_ (( cma_lib_t_queue *queue)); extern voiC4d(cma_lib_queue_dequeue _CMA_PROTOTYPE_ (( cma_lib_t_queue *queue, cma_t_address *element)); extern void(cma_lib_queue_enqueue _CMA_PROTOTYPE_ (( cma_lib_t_queue *queue, cma_t_address element));extern cma_t_boolean0cma_lib_queue_try_enqueue_int _CMA_PROTOTYPE_ (( cma_lib_t_queue *queue, cma_t_address element)); extern void(cma_lib_queue_requeue _CMA_PROTOTYPE_ (( cma_lib_t_queue *queue, cma_t_address element));extern cma_t_boolean,cma_lib_queue_try_dequD4eue _CMA_PROTOTYPE_ (( cma_lib_t_queue *queue, cma_t_address *element));extern cma_t_boolean,cma_lib_queue_try_enqueue _CMA_PROTOTYPE_ (( cma_lib_t_queue *queue, cma_t_address element));extern cma_t_boolean,cma_lib_queue_try_requeue _CMA_PROTOTYPE_ (( cma_lib_t_queue *queue, cma_t_address element));/*' * Set or obtain the default queue size */ extern void-cma_lib_attr_get_queuesize _CMA_PROTOTYPE_ (( cma_lib_t_attr *attr, cma_t_natural *queuesize)); ex tern void-cma_lib_attr_set_queuesize _CMA_PROTOTYPE_ (( cma_lib_t_attr *attr, cma_t_natural queuesize));#ifdef __cplusplus }#endif#endifww F4n/*J *************************************************************************J * *J * Copyright 1992, 2004 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * G4 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *JH4 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * I4 *J ************************************************************************* *//*W * @(#)$RCSfile: cma_tis.h,v $ $Revision: 1.1.16.7 $ (DEC) $Date: 2003/04/11 18:08:02 $ *//* * FACILITY: *A * Thread-Independent Synchronization, a subsidiary of DECthreads * * ABSTRACT: *F * This header defines OBSOLETE interfaces. While programs using theseH * interfaces will continue to be supported, Digital recommends that you4 * use the improved interfaces des"J4cribed in . * * AUTHORS: * * Webb Scales * * CREATION DATE: * * 29 April 1992 * * MODIFIED BY: * * Dave Butenhof * Peter Portante * Webb Scales * Mary Sullivan * * LAST MODIFIED: * * 13 May 1998 */#ifndef _CMA_TIS_#define _CMA_TIS_/* * CMA_TIS configuration symbols */#define _CMA_TIS__OSF 1#define _CMA_TIS__VMS 2#ifndef _CMA_TIS_OS_+# if defined (__OSF__) || defined (__osf__)$# define _CMA_TIS_OS_ _CMA_TIS__OSF:# elif dK4efined (vms) || defined (__vms) || defined (__VMS)$# define _CMA_TIS_OS_ _CMA_TIS__VMS# else"# error _CMA_TIS_OS_ is undefined# endif#endif#define _CMA_TIS__ALPHA 1#define _CMA_TIS__IA64 2#ifndef _CMA_TIS_HARDWARE_+# if defined (__alpha) || defined (__ALPHA),# define _CMA_TIS_HARDWARE_ _CMA_TIS__ALPHA-# elif defined (__ia64) || defined (__ia64__)+# define _CMA_TIS_HARDWARE_ _CMA_TIS__IA64# else(# error _CMA_TIS_HARDWARE_ is undefined# endif#endif#ifdef __cL4plusplus extern "C" {#endif/*I * On OpenVMS, both Alpha and IA64, make sure that all the "obsolete" TISB * interfaces treat client values as strictly 32-bit addresses forG * compatibility. If you need 64 bit pointers, you must upgrade to the * "native" TIS interfaces. */E#if (_CMA_TIS_OS_ == _CMA_TIS__VMS) && (__INITIAL_POINTER_SIZE == 64)'# pragma __required_pointer_size __save(# pragma __required_pointer_size __short#endif/* * General address type */typedef voidM4 *cma_tis_addr_t;/*P * TIS condition variable: the address of an internal condition variable object. */&typedef cma_tis_addr_t cma_tis_cond_t;/*6 * TIS mutex: the address of an internal mutex object. */'typedef cma_tis_addr_t cma_tis_mutex_t;E#if (_CMA_TIS_OS_ == _CMA_TIS__VMS) && (__INITIAL_POINTER_SIZE == 64)*# pragma __required_pointer_size __restore#endif/*J * TIS one-time initialization control block and its initialization macro. *6 * Declare a one time initialiN4zation control block as: *8 * static cma_tis_once_t block = cma_tis_once_init; */!typedef struct cma_tis_once_tag { long field1; long field2; long field3; } cma_tis_once_t;##define cma_tis_once_init {0, 0, 0}/* * Per-thread context types */typedef long cma_tis_key_t;<typedef void (*cma_tis_destructor_t) (cma_tis_addr_t value);/*: * TIS thread-ID: the address of a internal thread object. */(typedef cma_tis_addr_t cma_tis_thread_t; !#i O4f _CMA_TIS_OS_ == _CMA_TIS__VMS /*G * On VMS, these routines must begin with "CMA$" not "cma_", so use a+ * macro to translate on those platforms. */# pragma nostandard7# define cma_tis_errno_get_addr CMA$TIS_ERRNO_GET_ADDR8# define cma_tis_errno_set_value CMA$TIS_ERRNO_SET_VALUE<# define cma_tis_vmserrno_get_addr CMA$TIS_VMSERRNO_GET_ADDR># define cma_tis_vmserrno_set_value CMA$TIS_VMSERRNO_SET_VALUE1# define cma_tis_cond_create CMA$TIS_COND_CREATE1# define cma_tis_cond_ P4delete CMA$TIS_COND_DELETE7# define cma_tis_cond_broadcast CMA$TIS_COND_BROADCAST1# define cma_tis_cond_signal CMA$TIS_COND_SIGNAL-# define cma_tis_cond_wait CMA$TIS_COND_WAIT/# define cma_tis_key_create CMA$TIS_KEY_CREATE8# define cma_tis_key_get_context CMA$TIS_KEY_GET_CONTEXT8# define cma_tis_key_set_context CMA$TIS_KEY_SET_CONTEXT1# define cma_tis_lock_global CMA$TIS_LOCK_GLOBAL3# define cma_tis_mutex_create CMA$TIS_MUTEX_CREATE3# define cma_tis_mutex_delete CMA$TIS_MUTEX_DQ4ELETE/# define cma_tis_mutex_lock CMA$TIS_MUTEX_LOCK5# define cma_tis_mutex_trylock CMA$TIS_MUTEX_TRYLOCK3# define cma_tis_mutex_unlock CMA$TIS_MUTEX_UNLOCK$# define cma_tis_once CMA$TIS_ONCE8# define cma_tis_thread_get_self CMA$TIS_THREAD_GET_SELF5# define cma_tis_unlock_global CMA$TIS_UNLOCK_GLOBAL# pragma standard#endif/* * TIS functions. */E#if (_CMA_TIS_OS_ == _CMA_TIS__VMS) && (__INITIAL_POINTER_SIZE == 64)'# pragma __required_pointer_size __save(# pragma _R4_required_pointer_size __short#endif/* * Get the address of errno */ extern int *cma_tis_errno_get_addr (void);/*2 * Set all known errno cells to a particular value */ extern voidcma_tis_errno_set_value ( int value);!#if _CMA_TIS_OS_ == _CMA_TIS__VMS/*, * Get the address of the VMS-specific errno */ extern int *!cma_tis_vmserrno_get_addr (void);/*? * Set all known VMS-specific errno cells to a particular value */ extern voidcma_tis_vmserrno_set_vS4alue ( int value);#endif/*# * Create a TIS condition variable. *N * "cond" is a pointer to an abstract condition variable, passed by reference,C * which receives the address of the new condition variable object. */ extern intcma_tis_cond_create ( cma_tis_cond_t *cond);/*" * Delete a TIS condition variable *F * "cond" is the address of the abstract condition variable, passed by% * reference, which is to be deleted. */ extern intcma_tis_cond_delete ( cma_tisT4_cond_t *cond);/*( * Broadcast on a TIS condition variable *F * "cond" is the address of the abstract condition variable, passed by$ * reference, on which to broadcast. */ extern intcma_tis_cond_broadcast ( cma_tis_cond_t *cond);/*" * Signal a TIS condition variable *F * "cond" is the address of the abstract condition variable, passed by! * reference, on which to signal. */ extern intcma_tis_cond_signal ( cma_tis_cond_t *cond);/*# * Wait on a TIS condition vU4ariable *F * "cond" is the address of the abstract condition variable, passed byN * reference, on which to wait. "mutex" is the address of the abstract mutex,8 * passed by reference, which is associated with "cond". */ extern intcma_tis_cond_wait ( cma_tis_cond_t *cond, cma_tis_mutex_t *mutex);/*; * Lock and unlock the DECthreads global lock (if present). */ extern intcma_tis_lock_global (void); extern intcma_tis_unlock_global (void);/*M * Create a per-thread V4 context (also known as "thread-specific storage" key). *H * "Key" is the address of a cell which will receive the key value; this: * value is used in calls to cma_tis_key_set_context() andM * cma_tis_key_get_context() to get and set the per-thread context associatedK * with this key. The same key value is used in each thread to access that * thread's context.F * "Destructor" is the address of a routine which is called to destroyN * (e.g., deallocate) the per-thread context value when thW4e thread terminates. */ extern intcma_tis_key_create ( cma_tis_key_t *key," cma_tis_destructor_t destructor);/*E * Get the per-thread context value associated with a particular key. *C * "Key" is a key value returned by a call to cma_tis_key_create().M * "Value" is the address of a cell which will receive the per-thread contextJ * value associated with this key. The value returned is dependent on theI * value of the key specified, but unaffected by the actions of any other X4 * threads. */ extern intcma_tis_key_get_context ( cma_tis_key_t key, cma_tis_addr_t *value);/*E * Set the per-thread context value associated with a particular key. *C * "Key" is a key value returned by a call to cma_tis_key_create().I * "Value" is value to be associated with this key. Once set, this valueB * can be retrieved in this thread using the same key in a call toK * cma_tis_key_get_context(); however, other threads' use of this key value * is unaffected. */Y4 extern intcma_tis_key_set_context ( cma_tis_key_t key, cma_tis_addr_t value);/* * Create a TIS mutex *H * "mutex" is a pointer to an abstract mutex, passed by reference, which0 * receives the address of the new mutex object. */ extern intcma_tis_mutex_create ( cma_tis_mutex_t *mutex);/* * Delete a TIS mutex *N * "mutex" is the address of the abstract mutex, passed by reference, which is * to be deleted. */ extern intcma_tis_mutex_delete ( cma_tis_mutZ4ex_t *mutex);/* * Lock a TIS mutex *N * "mutex" is the address of the abstract mutex, passed by reference, which is * to be locked. */ extern intcma_tis_mutex_lock ( cma_tis_mutex_t *mutex);/* * Non-blocking TIS mutex lock *N * "mutex" is the address of the abstract mutex, passed by reference, which is * to be locked. *C * The function returns a boolean value indicating if the mutex was * successfully locked. */ extern intcma_tis_mutex_trylock ( cma_tis[4_mutex_t *mutex);/* * Unlock a TIS mutex *N * "mutex" is the address of the abstract mutex, passed by reference, which is * to be unlocked. */ extern intcma_tis_mutex_unlock ( cma_tis_mutex_t *mutex);/*- * Execute a one-time initialization routine. *M * The specified routine is called exactly once during a program's execution,H * even if multiple threads call cma_tis_once() simultaneously. This isL * useful for performing one-time initialization tasks (e.g., for a fa \4cility> * API), such as creating mutexes and per-thread-context keys. *P * "init_block" is the address of a one-time initialization control block. ThisH * should be in static storage and unique to the initialization routine.G * "init_routine" is the address of the initialization routine to call.J * "arg" is a user argument which is passed to the initialization routine. */ extern intcma_tis_once ( cma_tis_once_t *init_block,( void (*init_rtn) (cma_tis_addr_t arg), cma_tis_addr_t init_arg);/*D * Get current thread "ID". (Returns zero if there are no threads.) */extern cma_tis_thread_tcma_tis_thread_get_self (void);E#if (_CMA_TIS_OS_ == _CMA_TIS__VMS) && (__INITIAL_POINTER_SIZE == 64)*# pragma __required_pointer_size __restore#endif#ifdef __cplusplus}#endif#endif /* _CMA_TIS_ */ww ^4{/*J *************************************************************************J * *J * Copyright 1989, 2004 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * _4 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *J`4 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * a4 *J ************************************************************************* *//*\ * @(#)$RCSfile: exc_handling.h,v $ $Revision: 1.1.27.4 $ (DEC) $Date: 2003/04/11 18:26:09 $ *//* * FACILITY: * * DECthreads core * * FILENAME: * * EXC_HANDLING.H * * ABSTRACT: ** * Header file for exception handling in C * * AUTHORS: * * Eric Roberts * Bob Conti * Dave Butenhof * * CREATION DATE: * * 15 March 1989 * * * LAST MODb4IFICATION DATE: * * 16 September 1998 */ #ifndef EXC_HANDLING#define EXC_HANDLING 1#ifdef __cplusplus extern "C" {#endif/* * INCLUDE FILES */#include /*L * On VMS, we need to ensure that any extern_model adjustment (or nostandard= * setting for VAXC) is done before cma_config.h is included. */]#if defined (vms) || defined (__vms) || defined (VMS) || defined (__VMS) || defined (__vms__)Z# if defined (__decc) || defined (__DECCc4) || (defined (__cplusplus) && defined (__DECCXX))# pragma __nostandard# pragma __extern_model __save(# pragma __extern_model __strict_refdefO# elif defined (vaxc) || defined (VAXC) || defined (__vaxc) || defined (__VAXC)# pragma nostandard# endif#endif#ifndef CMA_CONFIGZ# if defined(vms) || defined(__vms) || defined (VMS) || defined(__VMS) || defined(__vms__)# include # else# include # endif#endif/*D * Many of the type names d4in this source are derived from type namesC * in PTHREAD_EXCEPTION.H, so let's do the derivation here. Or, ifC * the nearly equivalent type in PTHREAD_EXCEPTION.H is not exactlyB * what "it" used to be in EXC_HANDLING.H (old CORE version), just * define it here. */*typedef __pthreadExcAddr_t exc_address_t;'typedef __pthreadExcKind_t exc_kind_t;%typedef __pthreadExcExt_t exc_ext_t;3typedef __pthreadExcKindV1Addr_t exc_kind_v1addr_t;7typedef __pthreadExcKindV1Status_t exc_kind_v1e4status_t;3typedef __pthreadExcKindAddr_t exc_kind_address_t;3typedef __pthreadExcKindStatus_t exc_kind_status_t;)typedef __pthreadExcState_t exc_state_t;0#define exc_kind_none_c _PTHREAD_EXC_KIND_NONE2#define exc_kind_address_c _PTHREAD_EXC_KIND_ADDR3#define exc_kind_status_c _PTHREAD_EXC_KIND_STATUS)typedef __pthreadExcCtx_t exc_context_t;,#define exc_newexc_c _PTHREAD_EXC_NEWMAGIC)#define exc_v2exc_c _PTHREAD_EXC_VER_V2)#define exc_v3exc_c _PTHREAD_EXC_VER_V3)f4#define exc_curr_c _PTHREAD_EXC_VER_CUR/*H * Use the most efficient code available to determine the address of theI * current procedure frame on VAX VMS systems (which we need to integrate0 * well with native VAX VMS condition handling). *J * - VAX C under VAX VMS supports instruction "builtins" to access general * registers. *I * - GCC supports an "asm" statement that generates inline assembly code. *H * - Otherwise, declare an extern function (part of DECthreads' assembly&g4 * code) that will return the value. */#if _CMA_OS_ == _CMA__VMS/# define exc_fetch_fp pthread_exc_fetch_fp_np#endif /*5 * Define all of the status codes used by DECthreads. *H * These values cannot be altered, since they have shipped to customers! *//* * EXC facility messages *//#define exc_s_exception _PTHREAD_STATUS_(1, 4),#define exc_s_exccop _PTHREAD_STATUS_(2, 4)/#define exc_s_uninitexc _PTHREAD_STATUS_(3, 4)1#define exc_s_unkstatus _PTHREAD_STATUS_(h4128, 4)1#define exc_s_exccoplos _PTHREAD_STATUS_(129, 4)/*I * These should be set to match with underlying system exception codes onA * platforms where that is appropriate (e.g., ss$_ codes on VMS). */#if defined (_PTHREAD_EXC_VMS)/*I * A few of these codes are somewhat imaginary, since VMS doesn't supportG * condition codes that very closely approximate the sense of some UNIXK * signals. SIGTRAP, SIGABRT (SIGIOT), and SIGEMT have no clear parallels,M * and the values chos i4en are fairly arbitrary. For two others, we chose whatN * seemed close equivalents: SIGPIPE becomes "no mailbox", and SIGXFSZ becomes * "disk quota exceeded". */+# define exc_s_illaddr 12 /* ss$_accvio */,# define exc_s_exquota 28 /* ss$_exquota */-# define exc_s_insfmem 292 /* ss$_insfmem */*# define exc_s_nopriv 36 /* ss$_nopriv */)# define exc_s_normal 1 /* ss$_normal */.# define exc_s_illinstr 1084 /* ss$_opcdec */.# define exc_s_resaddr 1100 /* ss$_radrmod */.# define e j4xc_s_privinst 1084 /* ss$_opcdec */.# define exc_s_resoper 1108 /* ss$_roprand */,# define exc_s_SIGTRAP 1044 /* ss$_break */*# define exc_s_SIGABRT 44 /* ss$_abort */,# define exc_s_SIGEMT 1068 /* ss$_compat */.# define exc_s_aritherr 1164 /* ss$_fltovf */,# define exc_s_SIGSYS 20 /* ss$_badparam */+# define exc_s_SIGPIPE 628 /* ss$_nombx */-# define exc_s_excpu 8364 /* ss$_excputim */3# define exc_s_exfilsiz 1004 /* ss$_exdiskquota */,# define exc_s_intovf 1148 /* ss$_intovf k4*/,# define exc_s_intdiv 1156 /* ss$_intdiv */,# define exc_s_fltovf 1164 /* ss$_fltovf */,# define exc_s_fltdiv 1172 /* ss$_fltdiv */,# define exc_s_fltund 1180 /* ss$_fltund */,# define exc_s_decovf 1188 /* ss$_decovf */,# define exc_s_subrng 1196 /* ss$_subrng */#else.# define exc_s_illaddr _PTHREAD_STATUS_(5, 4).# define exc_s_exquota _PTHREAD_STATUS_(6, 4).# define exc_s_insfmem _PTHREAD_STATUS_(7, 4)-# define exc_s_nopriv _PTHREAD_STATUS_(8, 4)-# define exc_s_normal _PT l4HREAD_STATUS_(9, 1)0# define exc_s_illinstr _PTHREAD_STATUS_(10, 4)/# define exc_s_resaddr _PTHREAD_STATUS_(11, 4)0# define exc_s_privinst _PTHREAD_STATUS_(12, 4)/# define exc_s_resoper _PTHREAD_STATUS_(13, 4)/# define exc_s_SIGTRAP _PTHREAD_STATUS_(14, 4)/# define exc_s_SIGABRT _PTHREAD_STATUS_(15, 4).# define exc_s_SIGEMT _PTHREAD_STATUS_(16, 4)0# define exc_s_aritherr _PTHREAD_STATUS_(17, 4).# define exc_s_SIGSYS _PTHREAD_STATUS_(18, 4)/# define exc_s_SIGPIPE _PTHREAD_STATUm4S_(19, 4)-# define exc_s_excpu _PTHREAD_STATUS_(20, 4)0# define exc_s_exfilsiz _PTHREAD_STATUS_(21, 4).# define exc_s_intovf _PTHREAD_STATUS_(22, 4).# define exc_s_intdiv _PTHREAD_STATUS_(23, 4).# define exc_s_fltovf _PTHREAD_STATUS_(24, 4).# define exc_s_fltdiv _PTHREAD_STATUS_(25, 4).# define exc_s_fltund _PTHREAD_STATUS_(26, 4).# define exc_s_decovf _PTHREAD_STATUS_(27, 4).# define exc_s_subrng _PTHREAD_STATUS_(28, 4)#endif/* * Define alias names */##define exc_s_acn4cvio exc_s_illaddr$#define exc_s_SIGILL exc_s_illinstr$#define exc_s_SIGFPE exc_s_aritherr##define exc_s_SIGBUS exc_s_illaddr$#define exc_s_SIGSEGV exc_s_illaddr"#define exc_s_SIGXCPU exc_s_excpu%#define exc_s_SIGXFSZ exc_s_exfilsiz##define exc_s_SIGIOT exc_s_SIGABRT/* * Synonyms for convenience */"#define cma_s_normal exc_s_normal'#define cma_s_alerted pthread_cancel_s(#define cma_s_exit_thread pthread_exit_s*#define cma_s_stackovf pthread_stackovf_s%#define cmo4a_s_unimp _PTHREAD_UNIMP_S/* * CMA-specific status codes */0#define cma_s_assertion _PTHREAD_STATUS_(49, 4)/#define cma_s_badparam _PTHREAD_STATUS_(50, 4)/#define cma_s_bugcheck _PTHREAD_STATUS_(51, 4)0#define cma_s_existence _PTHREAD_STATUS_(53, 4)-#define cma_s_in_use _PTHREAD_STATUS_(54, 4)0#define cma_s_use_error _PTHREAD_STATUS_(55, 4)0#define cma_s_wrongmutex _PTHREAD_STATUS_(56, 4)0#define cma_s_nostackmem _PTHREAD_STATUS_(58, 4)1#define cma_s_notcmastack _PTHREAD_Sp4TATUS_(59, 4)0#define cma_s_timed_out _PTHREAD_STATUS_(60, 4)0#define cma_s_inialrpro _PTHREAD_STATUS_(62, 4)2#define cma_s_defer_q_full _PTHREAD_STATUS_(63, 4)3#define cma_s_signal_q_full _PTHREAD_STATUS_(64, 4)3#define cma_s_alert_nesting _PTHREAD_STATUS_(65, 4)/* * TYPEDEFS *//*C * Most of the interface typedefs are in PTHREAD_EXCEPTION.H, but a# * few stragglers must appear here. *//*, * Internal contents of an exception object. */typedef long int exc_int_tq4;/* * GLOBAL DATA */D#if !defined(_CMA_SUPPRESS_EXTERNALS_) && !defined(_CMA_CORE_BUILD_).# define exc_push_ctx pthread_exc_push_ctx_np6# define exc_pop_ctx pthread_exc_pop_ctx_np4# define exc_raise pthread_exc_raise_np;# define exc_raise_status pthread_exc_raise_status_np5# define exc_report pthread_exc_report_np:# define exc_get_message pthread_exc_get_message_np#endif#if _CMA_OS_ == _CMA__VMS/*J * On OpenVMS, we r4use the native condition handling mechanism to implement; * DECthreads exceptions; thus we need a condition handler. */+# define exc_handler pthread_exc_handler_np#endif/*! * Define the exception variables *H * NOTE: it does not make sense to turn all DECthreads status codes into3 * exceptions as some are never raised. Those are: *" * cma_s_normal -- never signalledB * cma_s_exception -- internal to the implementation of exceptions? * cma_s_exccop -- internal to the implements4ation of exceptionsH * cma_s_timed_out -- returned as status value from timed condition wait */:#if (_CMA_OS_ == _CMA__VMS) && !defined (_CMA_CORE_BUILD_);# if defined (__STDC__) || _CMA_COMPILER_ == _CMA__DECCPLUS)# define _CMA_EXCNAME(name) cma$e_##name)# define _CMA_CMANAME(name) cma$e_##name# else+# define _CMA_EXCNAME(name) cma$e_/**/name+# define _CMA_CMANAME(name) cma$e_/**/name# endif#else^# if defined (__STDC__) || (_CMA_COMPILER_ == _CMA__DECCPLUS) || (_CMA_COMt4PILER_ == _CMA__MSC))# define _CMA_EXCNAME(name) exc_e_##name)# define _CMA_CMANAME(name) cma_e_##name# else+# define _CMA_EXCNAME(name) exc_e_/**/name+# define _CMA_CMANAME(name) cma_e_/**/name# endif#endif7#if _CMA_OS_ == _CMA__VMS && !defined(_CMA_CORE_BUILD_)/*H * Define exc_e_ or cma_e_ aliases for the cma$e_ names. The purpose of@ * all this is to use the "VMS calling standard" names (cma$rtl)A * regardless of whether the client code uses the VMS or portableF * DECu4threads interfaces, so that use of exceptions never requires the * cma$open_rtl image. */(# define exc_e_uninitexc cma$e_uninitexc%# define exc_e_illaddr cma$e_illaddr%# define exc_e_exquota cma$e_exquota%# define exc_e_insfmem cma$e_insfmem## define exc_e_nopriv cma$e_nopriv'# define exc_e_illinstr cma$e_illinstr%# define exc_e_resaddr cma$e_resaddr'# define exc_e_privinst cma$e_privinst%# define exc_e_resoper cma$e_resoper%# define exc_e_SIGTRAP cma$e_SIGTRAP## defiv4ne exc_e_SIGIOT cma$e_SIGIOT## define exc_e_SIGEMT cma$e_SIGEMT'# define exc_e_aritherr cma$e_aritherr## define exc_e_SIGSYS cma$e_SIGSYS%# define exc_e_SIGPIPE cma$e_SIGPIPE!# define exc_e_excpu cma$e_excpu'# define exc_e_exfilsiz cma$e_exfilsiz## define exc_e_intovf cma$e_intovf## define exc_e_intdiv cma$e_intdiv## define exc_e_fltovf cma$e_fltovf## define exc_e_fltdiv cma$e_fltdiv## define exc_e_fltund cma$e_fltund## define exc_e_decovf cma$e_decovf## define ew4xc_e_subrng cma$e_subrng %# define cma_e_alerted cma$e_alerted(# define cma_e_assertion cma$e_assertion'# define cma_e_badparam cma$e_badparam'# define cma_e_bugcheck cma$e_bugcheck,# define cma_e_exit_thread cma$e_exit_thread(# define cma_e_existence cma$e_existence## define cma_e_in_use cma$e_in_use(# define cma_e_use_error cma$e_use_error*# define cma_e_wrongmutex cma$e_wrongmutex'# define cma_e_stackovf cma$e_stackovf*# define cma_e_nostackmem cma$e_nostackmem,# define cx4ma_e_notcmastack cma$e_notcmastack!# define cma_e_unimp cma$e_unimp(# define cma_e_inialrpro cma$e_inialrpro.# define cma_e_defer_q_full cma$e_defer_q_full0# define cma_e_signal_q_full cma$e_signal_q_full0# define cma_e_alert_nesting cma$e_alert_nesting#endifI#if !defined (_EXC_NO_EXCEPTIONS_) && !defined (_CMA_SUPPRESS_EXTERNALS_)_CMA_IMPORT_ EXCEPTION _CMA_EXCNAME (uninitexc), _CMA_EXCNAME (illaddr), _CMA_EXCNAME (exquota), _CMA_EXCNAME (insfmem), _CMA_EXCy4NAME (nopriv), _CMA_EXCNAME (illinstr), _CMA_EXCNAME (resaddr), _CMA_EXCNAME (privinst), _CMA_EXCNAME (resoper), _CMA_EXCNAME (SIGTRAP), _CMA_EXCNAME (SIGIOT), _CMA_EXCNAME (SIGEMT), _CMA_EXCNAME (aritherr), _CMA_EXCNAME (SIGSYS), _CMA_EXCNAME (SIGPIPE), _CMA_EXCNAME (excpu), _CMA_EXCNAME (exfilsiz), _CMA_EXCNAME (intovf), _CMA_EXCNAME (intdiv), _CMA_EXCNAME (fltovf), _CMA_EXCNAME (fltdiv), _CMA_EXCNAME (fltund),z4 _CMA_EXCNAME (decovf), _CMA_EXCNAME (subrng), _CMA_CMANAME (alerted), _CMA_CMANAME (assertion), _CMA_CMANAME (badparam), _CMA_CMANAME (bugcheck), _CMA_CMANAME (exit_thread), _CMA_CMANAME (existence), _CMA_CMANAME (in_use), _CMA_CMANAME (use_error), _CMA_CMANAME (wrongmutex), _CMA_CMANAME (stackovf), _CMA_CMANAME (nostackmem), _CMA_CMANAME (notcmastack), _CMA_CMANAME (unimp), _CMA_CMANAME (inialrpro), _CMA_C{4MANAME (defer_q_full),! _CMA_CMANAME (signal_q_full),! _CMA_CMANAME (alert_nesting);#endif/* * Define aliased exceptions */,#define exc_e_accvio _CMA_EXCNAME (illaddr),#define exc_accvio_e _CMA_EXCNAME (illaddr)-#define exc_e_SIGILL _CMA_EXCNAME (illinstr)-#define exc_SIGILL_e _CMA_EXCNAME (illinstr)-#define exc_e_SIGFPE _CMA_EXCNAME (aritherr)-#define exc_SIGFPE_e _CMA_EXCNAME (aritherr),#define exc_e_SIGBUS _CMA_EXCNAME (illaddr),#define exc_SIGBUS_e _CMA_E|4XCNAME (illaddr)-#define exc_e_SIGSEGV _CMA_EXCNAME (illaddr)-#define exc_SIGSEGV_e _CMA_EXCNAME (illaddr)+#define exc_e_SIGXCPU _CMA_EXCNAME (excpu)+#define exc_SIGXCPU_e _CMA_EXCNAME (excpu).#define exc_e_SIGXFSZ _CMA_EXCNAME (exfilsiz).#define exc_SIGXFSZ_e _CMA_EXCNAME (exfilsiz),#define exc_e_SIGABRT _CMA_EXCNAME (SIGIOT)/*- * The following are pthread exception names. */1#define exc_uninitexc_e _CMA_EXCNAME (uninitexc)-#define exc_illaddr_e _CMA_EXCNAME (illaddr }4)-#define exc_exquota_e _CMA_EXCNAME (exquota)-#define exc_insfmem_e _CMA_EXCNAME (insfmem)+#define exc_nopriv_e _CMA_EXCNAME (nopriv)/#define exc_illinstr_e _CMA_EXCNAME (illinstr)-#define exc_resaddr_e _CMA_EXCNAME (resaddr)/#define exc_privinst_e _CMA_EXCNAME (privinst)-#define exc_resoper_e _CMA_EXCNAME (resoper)-#define exc_SIGTRAP_e _CMA_EXCNAME (SIGTRAP),#define exc_SIGABRT_e _CMA_EXCNAME (SIGIOT)+#define exc_SIGIOT_e _CMA_EXCNAME (SIGIOT)+#define exc_SIGEMT_e _C ~4MA_EXCNAME (SIGEMT)/#define exc_aritherr_e _CMA_EXCNAME (aritherr)+#define exc_SIGSYS_e _CMA_EXCNAME (SIGSYS)-#define exc_SIGPIPE_e _CMA_EXCNAME (SIGPIPE))#define exc_excpu_e _CMA_EXCNAME (excpu)/#define exc_exfilsiz_e _CMA_EXCNAME (exfilsiz)+#define exc_intovf_e _CMA_EXCNAME (intovf)+#define exc_intdiv_e _CMA_EXCNAME (intdiv)+#define exc_fltovf_e _CMA_EXCNAME (fltovf)+#define exc_fltdiv_e _CMA_EXCNAME (fltdiv)+#define exc_fltund_e _CMA_EXCNAME (fltund)+#define exc_deco 4vf_e _CMA_EXCNAME (decovf)+#define exc_subrng_e _CMA_EXCNAME (subrng)4#define pthread_assertion_e _CMA_CMANAME (assertion)2#define pthread_badparam_e _CMA_CMANAME (badparam)2#define pthread_bugcheck_e _CMA_CMANAME (bugcheck)8#define pthread_exit_thread_e _CMA_CMANAME (exit_thread)4#define pthread_existence_e _CMA_CMANAME (existence).#define pthread_in_use_e _CMA_CMANAME (in_use)4#define pthread_use_error_e _CMA_CMANAME (use_error)6#define pthread_wrongmutex_e _CMA_CMANAME (wrongmutex)64#define pthread_nostackmem_e _CMA_CMANAME (nostackmem)5#define pthread_notstack_e _CMA_CMANAME (notcmastack)-#define pthread_unimp_e _CMA_CMANAME (unimp)4#define pthread_inialrpro_e _CMA_CMANAME (inialrpro):#define pthread_defer_q_full_e _CMA_CMANAME (defer_q_full)<#define pthread_signal_q_full_e _CMA_CMANAME (signal_q_full)/* * CONSTANTS AND MACROS *//*= * Define "routine" to equivalence an exception to an integer- * (typically a system-defined status value). */F#define 4exc_set_status(_e_,_s_) pthread_exc_set_status_np((_e_),(_s_))/*M * Define "routine" to return the status of an exception. Returns 0 if status> * kind (and value of status in *s), or -1 if not status kind. */F#define exc_get_status(_e_,_s_) pthread_exc_get_status_np((_e_),(_s_))/*9 * Define "routine" to determine if two exceptions match. */E#define exc_matches(_e1_,_e2_) pthread_exc_matches_np((_e1_),(_e2_))#if _CMA_OS_ == _CMA__VMS/*A * For VMS, try to integrate peace4fully with native VMS condition * handling. */M# define exc_establish(_exc_ctx_) pthread_exc_establish_np((_exc_ctx_))O# define exc_unestablish(_exc_ctx_) pthread_exc_unestablish_np((_exc_ctx_))#else!# define exc_establish(_exc_ctx_)## define exc_unestablish(_exc_ctx_)#endif#if _CMA_OS_ == _CMA__VMSK# if ((_CMA_COMPILER_ == _CMA__DECC) || (_CMA_COMPILER_ == _CMA__DECCPLUS))"# pragma __extern_model __restore# pragma __standard## elif _CMA_COMPILER_ == _CMA__VAX C# pragma standard# endif#endif#ifdef __cplusplus }#endif#endifww 4 ;/*J *************************************************************************J * *J * Copyright 1995, 2008 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * 4 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *J4 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * 4 *J ************************************************************************* *//*a * @(#)$RCSfile: pthread.template.h,v $ $Revision: 1.1.10.27 $ (DEC) $Date: 2006/11/14 00:00:00 $ *//* * FACILITY: * * DECthreads POSIX 1003.1c * * ABSTRACT: *4 * External definitions for POSIX 1003.1c interfaces *H * General notice: some of the types defined and used in this header areF * not standard POSIX 1003.1c types. The DECthreads specific types areC * gen4erally used instead of "void *" and "long" where pointer sizeF * #pragma declarations are necessary to support the OpenVMS Alpha andH * IA64 64-bit programming environments. (And in a few other cases whereC * it's convenient.) These types should not present any obstacle toA * programs coded using the standard types. The "addon" types areH * distinguished by naming convention -- they begin with "__pthread" andH * the remainder appears in mixed-case without punctuation. For example,C * "__pthr4eadLongAddr_t" for "void *" and "__pthreadLongUint_t" for * "unsigned long". *H * This header file contains extensive comments regarding the structuresB * and options. Please read them carefully before relying upon anyF * undocumented features -- they're undocumented for a reason! We wantF * you to be able to take advantage of them where appropriate, but you3 * must also understand the restrictions and risks. * * AUTHORS: * * Dave Butenhof * * CREATION DATE: * * January 14995 * * MODIFIED BY: * * Dave Butenhof * Paul Clark * Steve Johnson * Richard Love * Peter Portante * Webb Scales * Brian Silver * Mark Simons * Tom Dahl * Greg Jordan * */ #ifndef _PTHREAD_HEADER# define _PTHREAD_HEADER#pragma __nostandardO/****************************************************************************** *; * NOTICE: Temporary support for POSIX 1003.4a/D4 migration; * -------------------------------------------------------- *G 4 * Support 1003.4a/D4 ("DCE threads") source migration mode by allowingN * programmer to cause #include to define the old interfaces (withN * modified names) if the _PTHREAD_USE_D4 macro is defined. This is equivalentI * to #include -- the remainder of this header file is not * processed. *K * In practice, the easiest way to do this is to continue to build threadedG * code using the "-threads" switch, which will define _PTHREAD_USE_D4: * * cc -threads foo.c4 *I * Or, you can invoke the source migration mode by the following sequence * within your .c or .h files: * * #define _PTHREAD_USE_D4 * #include  *L * Or, finally, by modifying your Makefile (or manual build sequence) to useH * the -D compiler option. (Note: you must ALWAYS define _REENTRANT whenL * compiling threaded or thread-safe code on Tru64 UNIX. Using "cc -threads"- * or "cc -pthread" does this automatically.) ** * cc -D_PTHREAD_USE_D4 -D_REENTRANT foo.c *M 4 * On OpenVMS, use the #define solution, or the following DECC command (it is2 * not necessary to define _REENTRANT on OpenVMS): *# * cc /define=_PTHREAD_USE_D4 foo.c *M * The POSIX 1003.4a/D4 migration support may be retired (this clause will beN * removed from pthread.h!) in the next major release of each operating systemK * (OpenVMS and Tru64 UNIX) that occurs at least one year after the initialM * release of the POSIX 1003.1c interfaces in Tru64 UNIX 4.0 and OpenVMS 7.0. *O *****4************************************************************************/9#if defined (_PTHREAD_USE_D4) || defined (PTHREAD_USE_D4)=# if defined (__unix__) || defined (__unix) || defined (unix)# include # else# include # endif#else/*F * Define a symbol which client code can test to determine whether theF * underlying threads package is DECthreads or not. This is especiallyJ * important to clients of the POSIX 1003.1c interface who may want 4to useH * DECthreads extensions, such as the TEB, global lock and non-real-timeC * scheduling policies while maintaining portability to a "vanilla" * 1003.1c-1995 implementation. *L * The DECthreads version is encoded in this number. The version is normallyI * in the form "Vvv.bb-lll" where "vv" represents the major version, "bb"G * represents the baselevel (which increases continuously regardless ofI * version), and "lll" is a build level that increases in each DECthreads$ * project b4uild within a baselevel. *I * Higher numeric values are always more recent versions. So to check forN * support of a feature that appeared in DECthreads V3.13-100, you could check# * whether the symbol is > 212100L. */#ifdef _DECTHREADS_VERSION# undef _DECTHREADS_VERSION#endif"#define _DECTHREADS_VERSION 322095#ifndef _DECTHREADS_)# define _DECTHREADS_ _DECTHREADS_VERSION#endifO/****************************************************************************** *? * NOT 4ICE: inline function performance vs. binary compatibility? * ------------------------------------------------------------ *J * This version of pthread.h supports the capability of generating inlinedN * code on OpenVMS (Alpha and IA64) and Tru64 UNIX for improved performance onK * some critical operations -- especially mutex synchronization and reading * thread specific data. *N * There is a balance between performance and maintainability, however. InlineE * code sequences cannot be tran 4sparently fixed by future versions ofK * DECthreads. Thus, if a bug is found in the inlined code and later fixed,N * programs using the inlined sequences must be recompiled to acquire the fix.C * Additionally changes may be made to inlined sequences to improveN * reliability or performance in the future. Digital cannot guarantee that theF * new sequences will be binary compatible with the old sequences, and= * therefore any such changes may also require recompilation. *I * By default, thi4s version of pthread.h will generate calls to carefullyJ * tuned assembly code functions within DECthreads that implement the sameL * algorithm as the inline asm() code sequences. This provides safety at theC * expense of performance by adding the overhead of a call and someL * unavoidable procedure prolog and epilog code. If you need the performanceM * advantage of avoiding those calls, AND ARE WILLING TO ACCEPT THE RISK THATC * YOU WILL NEED TO RECOMPILE LATER, define the preprocessor symbo4lM * _PTHREAD_USE_INLINE before including this header file; either by compiling * with * * cc -D_PTHREAD_USE_INLINE *; * or by using "#define" before including this header file: * * #define _PTHREAD_USE_INLINE * #include  *I * Although _PTHREAD_USE_INLINE is made available for experimentation andN * where the need for performance is extreme, Digital STRONGLY RECOMMENDS that! * use of this option be avoided. *O ************************************************* 4****************************/O/****************************************************************************** *= * NOTICE: DECthreads tracing and static mutex initializationL * ------------------------------------------------------------------------- *N * When a mutex is statically initialized using PTHREAD_MUTEX_INITIALIZER thatN * mutex is normally set up so that the first attempt to lock the mutex can be7 * recorded for Visual Threads or another trace client. *J * If the preproce 4ssor symbol _PTHREAD_NOMETER_STATIC is defined when thisL * header file is included, statically initialized mutexes will be set up soJ * that this extra overhead will occur only if the calling thread needs toI * wait for the mutex. That is, statically initialized mutex operations H * will not be recorded for Visual Threads until a thread blocks on that * mutex. *M * Normally the minor overhead of this single "extra" call on the first mutexM * access is acceptable in exchange for tracing 4support. For rare cases whereK * that overhead is not acceptable, compile with -D_PTHREAD_NOMETER_STATIC. *O *****************************************************************************/O/****************************************************************************** * * NOTICE: POSIX 1003.1c support * ----------------------------- *I * The POSIX 1003.1c-1995 standard was formally approved at the June 1995L * meeting of the IEEE Standards Board. The correct configuration test mac 4ro= * for strictly conforming POSIX 1003.1c-1995 applications is *" * #define _POSIX_C_SOURCE 199506L *J * The POSIX standard requires that, for portability, the application mustG * define _POSIX_C_SOURCE within each compilation unit, for example, by, * compiling with -D_POSIX_C_SOURCE=199506L. *K * As of Tru64 UNIX V5.1A, this header also supports full compatiblity withF * The Single UNIX Specification, Version 2, also known as UNIX 98, asK * specified by CAE Specification Version 5 4(XSH5). Application conformanceL * with this specification is designated by defining the preprocessor symbolJ * _XOPEN_SOURCE to a value of 500, preferably via -D_XOPEN_SOURCE=500. In> * this case, defining _POSIX_C_SOURCE to 199506L is optional. *J * The Tru64 UNIX will default _POSIX_C_SOURCE to the latestE * POSIX 1003.1 revision supported by the operating system (currentlyG * 1003.1c-1995) if no other confining standard definitions are alreadyE * defined, and will allow a 4ll XSH5 extensions. Unless the programmerK * specifies a specific restriction, the programmer will have access to all1 * standards that aren't inherently incompatible. *L * Compiling with some other standards modes will disable POSIX 1003.1c-1995F * and XSH5 support, as the thread interfaces violate name space rulesH * required by those standards. For example, defining any of the symbolsG * _POSIX_SOURCE (1003.1-1990), _POSIX_C_SOURCE=199309L (1003.1b-1993),B * _XOPEN_SOURCE (with no valu 4e or with a value less than 500), orB * _XOPEN_SOURCE_EXTENDED (UNIX95, which requires 1003.1-1990), orL * _ANSI_C_SOURCE (ANSI C) will disable thread support. A program built withL * any of these options that includes will not compile properly,E * as will fail to define types and symbols required by * pthread.h. *L * Note that The Single UNIX Specification, Version 2 provides that definingE * _XOPEN_SOURCE=500 (XSH5) overrides any "inappropriate" settings of5 *4 _POSIX_C_SOURCE, _POSIX_SOURCE, or _ANSI_C_SOURCE. *L * The header always defines _POSIX_VERSION to the latest POSIX.1L * revision supported by the system -- 199506L (1003.1c-1995) for Tru64 UNIXN * 4.0. A portable program can use this symbol (or specific POSIX feature testJ * macros such as _POSIX_THREADS, also defined in ) to determineH * whether the system supports POSIX 1003.1c-1995. (However, beware thatK * implementations of early drafts of 1003.1c, such as "DCE th4reads", whichL * supported 1003.4a/D4, may also define _POSIX_THREADS, but will not define * _POSIX_VERSION to 199506L.) *O *****************************************************************************/#if defined (__DECCXX)# define _PTHREAD_ENV_CXX# define _PTHREAD_ENV_DECCXX#elif defined (__cplusplus)# define _PTHREAD_ENV_CXX*#elif defined (__DECC) || defined (__decc)# define _PTHREAD_ENV_DECC #elif defined (__INTEL_COMPILER)# define _PTHREAD_ENV_INTELC#endifH#if de4fined (VMS) || defined (__VMS) || defined (__vms) || defined (vms)# define _PTHREAD_ENV_VMSB# define _POSIX_THREAD_PROCESS_SHARED /* Typically in unistd.h */>#elif defined (__unix__) || defined (__unix) || defined (unix)# define _PTHREAD_ENV_UNIX#endif*#if defined (__alpha) || defined (__ALPHA)# define _PTHREAD_ENV_ALPHA,#elif defined (__ia64) || defined (__ia64__)# define _PTHREAD_ENV_IA64#else7# error : unsupported hardware architecture.#endif/*A * Protect l4ibpthread.so against preemption of libc entry points. */A#if defined (_PTHREAD_ENV_UNIX) && defined (_PTHREAD_CORE_BUILD_)# include #endif#ifdef _PTHREAD_ENV_CXX extern "C" {#endif/*I * Make sure we are included with _REENTRANT defined. This helps to catch= * cases where the wrong per-thread errno value will be used. *L * You should always define _REENTRANT on the command line, usually by usingL * "cc -pthread" or "cxx -pthread", to be sure that it4 will be available for * all header files. */#ifdef _PTHREAD_ENV_UNIX# ifndef _REENTRANTF# error "Please compile the module including pthread.h with -pthread"# endif#endif#ifdef _PTHREAD_ENV_UNIX# include # include #endif#include B#if defined (_PTHREAD_ENV_UNIX) && !defined (_PTHREAD_CORE_BUILD_) # define _PTHREAD_EXC_INCL_CLEAN#endif#include #ifdef _PTHREAD_EXC_INCL_CLEAN# undef _PTHREAD_EXC_INCL_CLEAN4#endif#if defined (_PTHREAD_ENV_UNIX):# if defined (_OSF_SOURCE) && defined (_PTHREAD_ENV_ALPHA)B# if defined (_PTHREAD_ENV_DECC) || defined (_PTHREAD_ENV_DECCXX)# include # define _PTHREAD_USE_ASM_ 1# endif# endif&# define _PTHREAD_USE_MANGLED_NAMES_ 18# ifndef _PTHREAD_LEGACY_NP /* libpthreads wrappers */# ifdef _PTHREAD_ENV_DECC# define _PTHREAD_USE_PTDNAM_# endif# endif# define _PTDNAM(name) __##name# include # include # include # include #else# include ;# if defined (_PTHREAD_ENV_DECC) && (__CRTL_VER > 70311000)# include # else# include # endif# ifndef _SCHEDPARAM_T_# define _SCHEDPARAM_T_typedef struct sched_param { int sched_priority; } sched_param_t;# endif# ifndef sched_yield&# define sched_yield pthread_yield_np# endif#endif#if defined (_PTHREAD_ENV_DECC)"# define _PTHREAD_INLINE_ __inline##elif de4fined (_PTHREAD_ENV_DECCXX) # define _PTHREAD_INLINE_ inline#else# define _PTHREAD_INLINE_#endif#ifndef _PTDNAM# define _PTDNAM(name) name#endif#if defined (_PTHREAD_ENV_VMS)1# if defined (__DECC) && (__DECC_VER >= 50000000)# define _PTHREAD_USE_ASM_ 1# if __DECC_VER < 50230004%# define _PTHREAD_SKIP_LOOPY_ASM_ 1# endif# include # endif'# define _PTHREAD_ALLOW_MIXED_PROTOS_ 1/*C * Make sure builtins.h is included for VMS/IA64 for definition4 of * _IA64_REG_TP and __getReg(). */ # if defined (_PTHREAD_ENV_IA64)# include # endif#endif #if !defined (_PTHREAD_ENV_UNIX)/*K * If we are not a UNIX system, then the field names for the POSIX standard/ * types don't have to be name space protected. */# define _Pfield(_arg_) _arg_#endifO/****************************************************************************** *) * NOTICE: Tru64 UNIX and "name mangling") * --------------------------------- 4----- *M * On Tru64 UNIX, maintaining binary compatibility for call_shared code usingJ * the old 1003.4a/D4 interfaces (many of which have the same names as theM * 1003.1c functions) requires that the compatibility interfaces retain theirL * names. Since the 1003.4a/D4 and 1003.1c functions must be able to coexistN * within a process, this inevitably leads to the conclusion that we must giveI * the 1003.1c functions "mangled" names during the 1003.4a/D4 retirement * period. *I * To th4at end, we map the 1003.1c standard names into "mangled" internalN * names. When 1003.4a/D4 is retired these macros will be removed; the 1003.1cL * functions will then be given their proper names. Binary compatibility forK * images compiled during the retirement period will be retained by aliasesJ * for the transition names. Note that we "mangle" only the names that areL * identical to 1003.4a/D4 names. New functions (such as pthread_key_delete)N * and functions with changed names (such as pth4read_key_create, contrasted to3 * 1003.4a/D4's pthread_keycreate) are not mangled. *% * The following names are "mangled": * * pthread_attr_getguardsize_np * pthread_attr_getinheritsched * pthread_attr_getstacksize * pthread_attr_setguardsize_np * pthread_attr_setinheritsched * pthread_attr_setstacksize * pthread_cancel * pthread_cond_broadcast * pthread_cond_destroy * pthread_cond_init" * pthread_cond_sig_preempt_int_np * pthread_cond_signal * pthread_cond_sign4al_int_np * pthread_cond_timedwait * pthread_cond_wait * pthread_create * pthread_delay_np * pthread_detach * pthread_equal * pthread_exit * pthread_get_expiration_np * pthread_getspecific * pthread_join * pthread_lock_global_np * pthread_mutex_destroy * pthread_mutex_init * pthread_mutex_lock * pthread_mutex_trylock * pthread_mutex_unlock * pthread_once * pthread_self * pthread_setspecific * pthread_testcancel * pthread_unlock_global_np *M * 4 On OpenVMS this is irrelevant since name binding occurs at link time: whenK * images are activated they bind to a known offset within the image symbolN * vector. The binary compatibility interface names have been changed, but theM * arrangement of the transfer vector and symbol vector remain the same. ThusM * old code linked against the old shareable images will call the correct new * routine. *O *****************************************************************************//*6 * N 4OTICE: OpenVMS Alpha & IA64 64-bit pointer support6 * --------------------------------------------------- *K * On OpenVMS Alpha and IA64, DECthreads generally supports both the 64 bitN * and 32 bit programming environments. Some external data structures (such asJ * the TEB and attributes objects) cannot vary between interfaces, and areJ * defined to contain 64 bit values regardless of programming environment.N * Only one 1003.1c routine varies between the interfaces: pthread_join, whichN * w4rites a "void *" to a caller-provided address. For pthread_join32 only theL * low 32 bits of the thread return value is written. For pthread_join64 allL * 64 bits are written (this will corrupt caller data if the allocated "voidM * *" is 32 bits wide). The default definition of "pthread_join" depends uponI * the programming environment specified by compiler switches -- in other7 * words, the value of the _INITIAL_POINTER_SIZE macro. *I * The following typedefs allow fields with required siz 4es to be declaredF * without needing a lot of #pragma __required_pointer_size statementsL * scattered through the header. On Tru64 UNIX these types always correspondN * unambiguously to a single type. On OpenVMS (Alpha or IA64) the types selectJ * the appropriate size to maintain datastructure layout regardless of the * default pointer size. *M * Per the convention the 64-bit task force has established, a compilation onN * OpenVMS (Alpha or IA64) that occurs without any /pointer_size switc 4h shouldJ * yield only a 32-bit interface. But, if compilation on OpenVMS (Alpha orN * IA64) occurs with an explicit /pointer_size switch, then (a) all prototypesJ * should accept long [64] bit pointers as arguments and (b) all functionsI * which return pointer values should return [32] bit pointers unless the. * function is a variant with _64 in the name. *C * The DECthreads team has no intention of supporting short pointer6 * compilation environments (cc -xtaso) on Tru64 UNIX. *D * NOT4E: _PTHREAD_ALLOW_MIXED_PROTOS_ should be defined only for the$ * OpenVMS Alpha and IA64 platforms. */##ifdef _PTHREAD_ALLOW_MIXED_PROTOS_# ifdef __INITIAL_POINTER_SIZE /*: * This is a DECC compiler with 64-bit pointer support. */# ifdef _PTHREAD_CORE_BUILD_!# define _PTHREAD_MIXED_PROTOS_# else!# if __INITIAL_POINTER_SIZE > 0 /*6 * The compilation has an explicit /pointer_size. */"# define _PTHREAD_MIXED_PROTOS_ # endif# endif# el4se /*H * This is some compiler on OpenVMS that does not have 64-bit pointer * support. */# ifdef _PTHREAD_CORE_BUILD_F# error : OpenVMS compiler without 64-bit pointer support# endif# endif#endif/*N * On OpenVMS Alpha or IA64, some of the fields in DECthreads structures (TEB,L * pthread_mutex_t, pthread_cond_t) need to be 64-bit pointers regardless ofJ * the default pointer size in use by the compiler. They need to be 64 bitM * fields even on older 4versions of DEC C (prior to V5.0) which don't support * 64 bit pointers at all. *M * If the compiler supports long pointers, we use the __required_pointer_sizeH * pragma to force the proper interpretation of these pointers. On older. * compilers, we use unsigned __int64 instead. */O#if defined (_PTHREAD_ALLOW_MIXED_PROTOS_) && !defined (__INITIAL_POINTER_SIZE)-typedef unsigned __int64 __pthreadLongAddr_p;-typedef unsigned __int64 __pthreadLongAddr_t;2typedef unsigned __int64 __pthre 4adLongConstAddr_t;4typedef unsigned __int64 __pthreadLongConstString_t;/typedef unsigned __int64 __pthreadLongString_t;#elseO# if defined (_PTHREAD_ALLOW_MIXED_PROTOS_) && defined (__INITIAL_POINTER_SIZE)(# pragma __required_pointer_size __save(# pragma __required_pointer_size __long# endif$typedef void *__pthreadLongAddr_t;1typedef __pthreadLongAddr_t *__pthreadLongAddr_p;.typedef const void *__pthreadLongConstAddr_t;0typedef const char *__pthreadLongConstString_t;&typedef ch4ar *__pthreadLongString_t;O# if defined (_PTHREAD_ALLOW_MIXED_PROTOS_) && defined (__INITIAL_POINTER_SIZE)+# pragma __required_pointer_size __restore# endif#endif/*N * On OpenVMS Alpha or IA64, we force these pointers to be short pointers when' * any initial pointer size is defined. */N#if defined (_PTHREAD_ALLOW_MIXED_PROTOS_) && defined (__INITIAL_POINTER_SIZE)'# pragma __required_pointer_size __save(# pragma __required_pointer_size __short#endif%typedef void *__pthrea4dShortAddr_t;3typedef __pthreadShortAddr_t *__pthreadShortAddr_p;/typedef const void *__pthreadShortConstAddr_t;1typedef const char *__pthreadShortConstString_t;'typedef char *__pthreadShortString_t;N#if defined (_PTHREAD_ALLOW_MIXED_PROTOS_) && defined (__INITIAL_POINTER_SIZE)*# pragma __required_pointer_size __restore#endif/*D * For any OpenVMS platform, these types need to be 64 bits in size. */#if defined (_PTHREAD_ENV_VMS)%typedef __int64 __pthreadLongInt_t;-typede4f unsigned __int64 __pthreadLongUint_t;#else"typedef long __pthreadLongInt_t;+typedef unsigned long __pthreadLongUint_t;#endif/*I * Define a type to help cope with C++ compilers who don't support 64-bitL * pointers, and who issue warnings when a single typecast changes both sizeD * and type. This type can be used to perform conversions in stages. */C#if defined (_PTHREAD_ENV_VMS) && !defined (__INITIAL_POINTER_SIZE)#typedef int __pthreadPointerSize;#else0typedef __pthr4eadLongInt_t __pthreadPointerSize;#endif+typedef __pthreadLongAddr_p __pthreadTsd_t;#ifndef PTHREAD_KEYS_MAX# define PTHREAD_KEYS_MAX 255#endif#ifndef _PTHREAD_ENV_UNIX&# ifndef PTHREAD_DESTRUCTOR_ITERATIONS)# define PTHREAD_DESTRUCTOR_ITERATIONS 4# endif#endif#ifndef PTHREAD_STACK_MIN# ifdef _PTHREAD_ENV_IA64"# define PTHREAD_STACK_MIN 16384# else!# define PTHREAD_STACK_MIN 8192# endif#endif!#define PTHREAD_CANCEL_DISABLE 0 #define PTHREAD_CANCEL_E4NABLE 1"#define PTHREAD_CANCEL_DEFERRED 0%#define PTHREAD_CANCEL_ASYNCHRONOUS 1$#define PTHREAD_CANCELED (void *)-1 #define PTHREAD_SCOPE_PROCESS 0#define PTHREAD_SCOPE_SYSTEM 1#define PTHREAD_MUTEX_NORMAL 0"#define PTHREAD_MUTEX_RECURSIVE 1"#define PTHREAD_MUTEX_ERRORCHECK 23#define PTHREAD_MUTEX_DEFAULT PTHREAD_MUTEX_NORMAL"#define PTHREAD_PROCESS_PRIVATE 0!#define PTHREAD_PROCESS_SHARED 1#define PTHREAD_PRIO_NONE 0#define PTHREAD_PRIO_PROTECT 1#defin 4e PTHREAD_PRIO_INHERIT 2/*G * The following are internal, private flags used by the thread libraryL * implementation. Any application or library code depending on the value orI * meaning of these flags (except in the initialization of static objectsJ * using the precise bit patterns constructed by the PTHREAD_*_INITIALIZERD * family of macros) is unsupported and may break on future releases * (including patches). *J * I.e., your code may not dynamically write these bits, nor can you 4r codeM * read or interpret these bits from a thread synchronization object that mayM * have been used. (For example, the thread library may choose to replace the@ * initial bit patterns completely on the first use of a mutex.) */?#define _PTHREAD_MSTATE_CONFIG 0x00200000 /* Configure mutex */8#define _PTHREAD_MSTATE_TYPE 0x0f000000 /* Mutex type */H#define _PTHREAD_MTYPE_NORMAL 0x00000000 /* Normal (fast or metered) */9#define _PTHREAD_MTYPE_RECURS 0x01000000 /* Recursive */C#define 4_PTHREAD_MTYPE_ERRCHK 0x02000000 /* Detect usage errors */C#define _PTHREAD_CSTATE_SLOW 0x00200000 /* Slow signal/broadcast *//*K * Validation of caller-allocated structures is minimal, but to allow basicK * consistency checking each structure comes with a "validation" field thatK * helps to determine whether it's likely to be the correct type. FollowingM * are the constants. Note that with the exception of the mutex and conditionN * variable, these constants are stored into memory pa 4ssed into DECthreads, soK * we're trusting what the caller says. Mutexes and condition variables, if9 * statically initialized using PTHREAD_COND_INITIALIZER,E * PTHREAD_MUTEX_INITIALIZER, or their relatives, are loaded with the( * validation constants at compile time. */?#define _PTHREAD_CVALID (0x06facbd1L) /* Condition variable */2#define _PTHREAD_MVALID (0x05bcafe1L) /* Mutex */4#define _PTHREAD_PVALID (0xdeadbeefL) /* Paddock */<#define _PTHREAD_RWVALID (0x02bacab1L) /* Read/Wri 4te lock */A#define _PTHREAD_CAVALID (0xaceface1L) /* Condition attributes */=#define _PTHREAD_MAVALID (0xecafeca1L) /* Mutex attributes */>#define _PTHREAD_TAVALID (0xbeefeed1L) /* Thread attributes */%#define _PTHREAD_RWVF_STA 0x08000000L%#define _PTHREAD_RWVF_INT 0x10000000L%#define _PTHREAD_RWVF_PRE 0x20000000L%#define _PTHREAD_RWVF_INL 0x40000000L%#define _PTHREAD_RWVF_NAM 0x80000000L$#define _PTHREAD_MVF_STA 0x08000000L$#define _PTHREAD_MVF_INT 0x10000000L$#define _PTHREAD_MVF_P 4RE 0x20000000L$#define _PTHREAD_MVF_INL 0x40000000L$#define _PTHREAD_MVF_NAM 0x80000000L$#define _PTHREAD_CVF_STA 0x08000000L#ifndef _PTHREAD_NOMETER_STATIC$# define PTHREAD_MUTEX_INITIALIZER \@ {_PTHREAD_MSTATE_CONFIG, _PTHREAD_MVALID | _PTHREAD_MVF_STA}## define PTHREAD_COND_INITIALIZER \> {_PTHREAD_CSTATE_SLOW, _PTHREAD_CVALID | _PTHREAD_CVF_STA}1# define PTHREAD_MUTEX_INITWITHNAME_NP(_n_,_a_) \J {_PTHREAD_MSTATE_CONFIG, _PTHREAD_MVALID | _PTHREAD_MVF_STA, _n_, _a_}0# defi 4ne PTHREAD_COND_INITWITHNAME_NP(_n_,_a_) \H {_PTHREAD_CSTATE_SLOW, _PTHREAD_CVALID | _PTHREAD_CVF_STA, _n_, _a_}#elseJ# define PTHREAD_MUTEX_INITIALIZER {0, _PTHREAD_MVALID | _PTHREAD_MVF_STA}J# define PTHREAD_COND_INITIALIZER {0, _PTHREAD_CVALID | _PTHREAD_CVF_STA}1# define PTHREAD_MUTEX_INITWITHNAME_NP(_n_,_a_) \5 {0, _PTHREAD_MVALID | _PTHREAD_MVF_STA, _n_, _a_}0# define PTHREAD_COND_INITWITHNAME_NP(_n_,_a_) \5 {0, _PTHREAD_CVALID | _PTHREAD_CVF_STA, _n_, _a_}#endifI#def 4ine PTHREAD_RWLOCK_INITIALIZER {_PTHREAD_RWVALID | _PTHREAD_RWVF_STA}1#define PTHREAD_RWLOCK_INITWITHNAME_NP(_n_,_a_) \4 {_PTHREAD_RWVALID | _PTHREAD_RWVF_STA, 0, _n_, _a_}I#define PTHREAD_MUTEX_INITFAST_NP {0, _PTHREAD_MVALID | _PTHREAD_MVF_STA}4#define PTHREAD_MUTEX_INITFASTWITHNAME_NP(_n_,_a_) \5 {0, _PTHREAD_MVALID | _PTHREAD_MVF_STA, _n_, _a_}(#define PTHREAD_MUTEX_INITRECURSIVE_NP \6 {_PTHREAD_MTYPE_RECURS | _PTHREAD_MSTATE_CONFIG, \' _PTHREAD_MVALID | _PTHREAD_MVF_STA}94#define PTHREAD_MUTEX_INITRECURSIVEWITHNAME_NP(_n_,_a_) \6 {_PTHREAD_MTYPE_RECURS | _PTHREAD_MSTATE_CONFIG, \1 _PTHREAD_MVALID | _PTHREAD_MVF_STA, _n_, _a_}%#define PTHREAD_MUTEX_INITERRCHK_NP \6 {_PTHREAD_MTYPE_ERRCHK | _PTHREAD_MSTATE_CONFIG, \' _PTHREAD_MVALID | _PTHREAD_MVF_STA}6#define PTHREAD_MUTEX_INITERRCHKWITHNAME_NP(_n_,_a_) \6 {_PTHREAD_MTYPE_ERRCHK | _PTHREAD_MSTATE_CONFIG, \1 _PTHREAD_MVALID | _PTHREAD_MVF_STA, _n_, _a_}/* * OBSOLETE: *M * These mac 4ros are special variants of the PTHREAD_MUTEX_INITIALIZER macros. *I * They represent an early attempt to support applications that needed toM * preempt the C runtime malloc/free package of functions, and avoid problems= * when the thread library needed to allocate or free memory. *O * The extended documentation of the use of these macros has been removed, and 7 * these functions will be retired in a future release. *G * On Tru64 UNIX, use the tis_allocator_mutex_init() function, ins 4tead. *I * On OpenVMS, use LIB$VM_MALLOC/LIB$VM_FREE for raw allocation and free.M * These don't use mutexes for thread-safety, and they're fully reentrant. No * special support is required. */ #define _PTHREAD_MUTEX_INITPRE \O {_PTHREAD_MSTATE_CONFIG, _PTHREAD_MVALID|_PTHREAD_MVF_STA|_PTHREAD_MVF_PRE}1#define _PTHREAD_MUTEX_INITPREWITHNAME(_n_,_a_) \ {_PTHREAD_MSTATE_CONFIG, \8 _PTHREAD_MVALID|_PTHREAD_MVF_STA|_PTHREAD_MVF_PRE, \ _n_, _a_}%#define _PTHREAD_MUTEX_I 4NITPRERECUR \6 {_PTHREAD_MTYPE_RECURS | _PTHREAD_MSTATE_CONFIG, \: _PTHREAD_MVALID | _PTHREAD_MVF_STA | _PTHREAD_MVF_PRE}6#define _PTHREAD_MUTEX_INITPRERECURWITHNAME(_n_,_a_) \6 {_PTHREAD_MTYPE_RECURS | _PTHREAD_MSTATE_CONFIG, \D _PTHREAD_MVALID | _PTHREAD_MVF_STA | _PTHREAD_MVF_PRE, _n_, _a_}&#define _PTHREAD_MUTEX_INITPREERRCHK \6 {_PTHREAD_MTYPE_ERRCHK | _PTHREAD_MSTATE_CONFIG, \: _PTHREAD_MVALID | _PTHREAD_MVF_STA | _PTHREAD_MVF_PRE}7#define _PTHREAD_MUTEX_INITPREERRCHK 4WITHNAME(_n_,_a_) \6 {_PTHREAD_MTYPE_ERRCHK | _PTHREAD_MSTATE_CONFIG, \D _PTHREAD_MVALID | _PTHREAD_MVF_STA | _PTHREAD_MVF_PRE, _n_, _a_}/*K * NOTE: "Constructor keys" are currently supported only for limited use byH * the dynamic loader to implement the C language "__declspec(__thread)"C * allocation class. Use for any other purpose at all is completely: * unsupported. (This may be changed in a future release.) *//*I * "Constructor keys" (keys created using pthread_key_crea4te_new_np) mustF * be statically initialized using this macro prior to creation, e.g., *2 * pthread_key_t key = PTHREAD_KEY_INITIALIZER_NP; */$#define PTHREAD_KEY_INITIALIZER_NP 0/*% * Flags for pthread_key_construct_np */G#define PTHREAD_KEY_ALLTHREAD_NP 0x1 /* Constr/Destr in all threads */#ifndef _PTHREAD_ENV_UNIX/*K * All references to "individual attributes" fields within these attributesL * object structures MUST be made through the defined function calls in thisL 4 * header file. Not all fields in these structures mean what you might inferK * from the field type. Not all of the fields are implemented at this time.L * The name and order of fields may change without notice, although the size& * of the structure will never change. */!typedef struct __pthread_attr_t {( __pthreadLongUint_t _Pfield(valid);( __pthreadLongString_t _Pfield(name);& __pthreadLongUint_t _Pfield(arg);/ __pthreadLongUint_t _Pfield(reserved)[19]; } pthread_at 4tr_t;#endif#ifndef _PTHREAD_ENV_UNIX/*K * All references to "individual attributes" fields within these attributesL * object structures MUST be made through the defined function calls in thisL * header file. Not all fields in these structures mean what you might inferK * from the field type. Not all of the fields are implemented at this time.L * The name and order of fields may change without notice, although the size& * of the structure will never change. */&typedef struct __pth 4read_mutexattr_t {' __pthreadLongUint_t _Pfield(valid);. __pthreadLongUint_t _Pfield(reserved)[15]; } pthread_mutexattr_t;#endif#ifndef _PTHREAD_ENV_UNIX/*K * All references to "individual attributes" fields within these attributesL * object structures MUST be made through the defined function calls in thisL * header file. Not all fields in these structures mean what you might inferK * from the field type. Not all of the fields are implemented at this time.L * The name an4d order of fields may change without notice, although the size& * of the structure will never change. */%typedef struct __pthread_condattr_t {' __pthreadLongUint_t _Pfield(valid);. __pthreadLongUint_t _Pfield(reserved)[13]; } pthread_condattr_t;#endif#ifndef _PTHREAD_ENV_UNIX/*K * All references to "individual attributes" fields within these attributesL * object structures MUST be made through the defined function calls in thisL * header file. Not all fields in these 4structures mean what you might inferK * from the field type. Not all of the fields are implemented at this time.L * The name and order of fields may change without notice, although the size& * of the structure will never change. */'typedef struct __pthread_rwlockattr_t {> __pthreadLongUint_t _Pfield(valid); /* Validation flag */. __pthreadLongUint_t _Pfield(reserved)[15]; } pthread_rwlockattr_t;#endif/*K * All references to "individual attributes" fields within these att 4ributesL * object structures MUST be made through the defined function calls in thisL * header file. Not all fields in these structures mean what you might inferK * from the field type. Not all of the fields are implemented at this time.L * The name and order of fields may change without notice, although the size& * of the structure will never change. */#ifndef _PTHREAD_ENV_UNIX/*J * DECthreads maintains a substantial amount of internal information aboutM * each thread in a "Thread 4Control Block" that is not directly accessible toC * the programmer. However, some of this information is required byK * application, library, or debug/profile code in performance critical codeM * paths. Thus, DECthreads provides an architected "Thread Environment Block"J * that makes a subset of the TCB information available directly. On AlphaM * hardware systems the address of the TEB is available by using the CALL_PALK * RDUNIQ instruction. DECthreads also provides both a macro and a cal4lableG * function to return the TEB address, for convenience and portability. */O# if defined (_PTHREAD_ALLOW_MIXED_PROTOS_) && defined (__INITIAL_POINTER_SIZE)(# pragma __required_pointer_size __save(# pragma __required_pointer_size __long# endif/* * Define the TEB's version. *, * Version 0: Tru64 UNIX 4.0 and OpenVMS 7.0- * Version 1: Tru64 UNIX 4.0D and OpenVMS 7.2 * Version 2: Tru64 UNIX V5.1A * Version 3: OpenVMS V8.0 IA-64 */ # if defined (_PTHREAD_ENV_IA64)6# 4 define PTHREAD_TEB_VERSION 3 /* Current version */# define PTHREAD_TEB_SIZE \L (((size_t)((char *)&((__pthreadTeb_p)0L)->_Pfield(reg_stack_hiwater) \ - (char *)0L)) \B + sizeof (((__pthreadTeb_p)0L)->_Pfield(reg_stack_hiwater)))# else6# define PTHREAD_TEB_VERSION 2 /* Current version */# define PTHREAD_TEB_SIZE \C (((size_t)((char *)&((__pthreadTeb_p)0L)->_Pfield(home_rad) \H - (char *)0L)) + sizeof (((__pthreadTeb_p)0L)->_Pfield(home_rad)))# endif6# de 4fine PTHREAD_TEB_EFLG_USER 0x01 /* User thread */C# define PTHREAD_TEB_EFLG_INITIAL 0x02 /* Process initial thread */E# define PTHREAD_TEB_CREATOR_PTHREAD 1 /* Created by 1003.1c API */=# define PTHREAD_TEB_CREATOR_CMA 2 /* Created by CMA API */A# define PTHREAD_TEB_CREATOR_D4 3 /* Created by Draft 4 API */H# define PTHREAD_TEB_CREATOR_D4EXC 4 /* Created by D4-Exception API *//*M * Thread Environment Block (TEB). (On UNIX, this definition is duplicated in" * the header file.) *M * NOTE: Modification of any field in a thread's TEB structure will result inB * undefined behavior. Fields that are commented as "RESERVED" areN * undocumented and unsupported, and the contents or meaning may change at anyK * time. The "per_kt_area" field is reserved entirely for use by DECthreadsH * and the operating system kernel: it contains undefined, undocumented,6 * unsupported, and volatile data of unspecified type. *J * Each public field is documented with a co 4mment that begins with the TEBM * version in which the field was created or documented. If the TEB "version"N * has a value lower than version in which the field became accessible, do not' * depend upon the value of that field. *N * NOTE: The fact that pthread_t is currently the same as __pthreadTeb_p is anF * artifact of the current IMPLEMENTATION, and is not intended to be aM * documented or supported relationship. In the future, they may be separate.L * In general, direct TEB access sho 4uld be avoided. It is NOT supported (andF * never will be supported) except on Alpha or IA64 hardware. On AlphaL * hardware, TEB access should be done only using the RDUNIQ PAL call, whileI * on IA64 TEB access should be done using the thread register, either ofL * which can be implemented directly or through C using the pthread_teb_np() * call. */!typedef struct __pthreadTeb_tag {H __pthreadLongAddr_p _Pfield(reserved1); /* Reserved to DECthreads */H __pthreadLongAddr_p _Pfield( 4reserved2); /* Reserved to DECthreads */8 unsigned short _Pfield(size); /* V1: Size of TEB */5 unsigned char _Pfield(version); /* TEB version */B unsigned char _Pfield(reserved3); /* Reserved to DECthreads */E unsigned char _Pfield(external); /* V1: PTHREAD_TEB_EFLG_ flgs */7 unsigned char _Pfield(reserved4)[2]; /* RESERVED */C unsigned char _Pfield(creator); /* V1: PTHREAD_TEB_CREATOR_* */D __pthreadLongUint_t _Pfield(sequence); /* V0: Thread sequence */K __pthrea4dLongUint_t _Pfield(reserved5)[2]; /* Reserved to DECthreads */@ __pthreadLongAddr_t _Pfield(per_kt_area); /* V0: Reserved */A __pthreadLongAddr_t _Pfield(stack_base); /* V0: Initial SP */H __pthreadLongAddr_t _Pfield(stack_reserve); /* V0: reserved stack */D __pthreadLongAddr_t _Pfield(stack_yellow); /* V0: yellow zone */H __pthreadLongAddr_t _Pfield(stack_guard); /* V0: guard (red) zone */G __pthreadLongUint_t _Pfield(stack_size); /* V0: total stack size */D __pthreadT4sd_t _Pfield(tsd_values); /* V0: TSD array (void *) */> unsigned long _Pfield(tsd_count); /* V0: TSD array size */A unsigned int _Pfield(reserved6); /* Reserved to DECthreads */A unsigned int _Pfield(reserved7); /* Reserved to DECthreads */D unsigned int _Pfield(thread_flags); /* Reserved to DECthreads */6 int _Pfield(thd_errno); /* V1: thread's errno */I __pthreadLongAddr_t _Pfield(stack_hiwater); /* V1: lowest known SP */F __pthreadLongUint_t _Pfield(home_rad); /* V2 4: thread's home RAD */ # if defined (_PTHREAD_ENV_IA64)I __pthreadLongAddr_t _Pfield(reg_stack_base); /* V3: Initial bsp */K __pthreadLongAddr_t _Pfield(reg_stack_yellow); /* V3: regstk y zone */K __pthreadLongAddr_t _Pfield(reg_stack_guard); /* V3: regstk r zone */N __pthreadLongUint_t _Pfield(reg_stack_size); /* V3: total regstk siz */O __pthreadLongAddr_t _Pfield(reg_stack_hiwater); /* V3: highest known bsp */# endif& } __pthreadTeb_t, *__pthreadTeb_p;$ty 4pedef __pthreadTeb_t pthreadTeb_t;$typedef __pthreadTeb_p pthreadTeb_p;/*N * The only official or supported mechanism to find the TEB of a thread is forL * code within that thread to execute the "rduniq" call_pal instruction. TheK * following typedef of pthread_t, as a pointer to a TEB, is an unsupportedM * artifact of the current implementation, and will be changed in the future.A * No correct code may reference a TEB through a pthread_t value. */O# if defined (_PTHREAD_ALLOW_MIXED_P 4ROTOS_) && defined (__INITIAL_POINTER_SIZE)@typedef __pthreadTeb_p pthread_t; /* Long pointer if possible */+# pragma __required_pointer_size __restore!# elif defined (_PTHREAD_ENV_VMS)>typedef unsigned __int64 pthread_t; /* Force 64 bits anyway */# else=typedef __pthreadTeb_p pthread_t; /* Pointers is pointers */# endif #elif !defined(_PTHREAD_NEW_TEB)/*A * For compilation on versions of Tru64 UNIX prior to 5.1A, whereJ * doesn't yet define the namespace-safe varia4nts of the TEBG * types, declare them here for the benefit of the rest of this header. */$typedef pthreadTeb_t __pthreadTeb_t;%typedef pthreadTeb_t *__pthreadTeb_p;#endif#ifndef _PTHREAD_ENV_UNIX#typedef unsigned int pthread_key_t;#endif,typedef void* __pthreadStartFunc_t (void *);/typedef void __pthreadDestructorFunc_t (void*);Dtypedef void* __pthreadConstructorFunc_t (pthread_key_t, pthread_t);Ltypedef void __pthreadExtDestructorFunc_t (void*, pthread_t, pthread_key_t);(ty 4pedef void __pthreadOnceFunc_t (void);0typedef __pthreadStartFunc_t* __pthreadStart_t;9typedef __pthreadDestructorFunc_t* __pthreadDestructor_t;;typedef __pthreadConstructorFunc_t* __pthreadConstructor_t;?typedef __pthreadExtDestructorFunc_t* __pthreadExtDestructor_t;.typedef __pthreadOnceFunc_t* __pthreadOnce_t;/*K * Macros to utilize the TEB directly for maximum efficiency. With hardwareK * and a compiler that supports it, this header uses inline instructions toK * get access to 4 the thread's TEB... otherwise this will result in a simple * call into DECthreads. *M * It is perfectly reasonable for code to freely access any defined TEB fieldM * on any DECthreads platform, as long as you meet all of the following rules! * (read this section carefully!) *D * You must not depend in any way upon the content or meaning of anyK * "reserved" fields (reserved1, reserved2, reserved3, etc.). These are forI * DECthreads internal use only and are subject to change without 4notice. *K * You may not write directly to any field of the TEB. Any modification mayL * result in undefined and possibly severe errors that may show up only much * later in the program. *N * Don't make any assumptions about the nature of the sequence number returnedJ * by pthread_getsequence_np or pthread_getselfseq_np, except that it is aE * unique integer among all threads created within the current image.N * Consecutively created threads may not necessarily have consecutive sequence4I * numbers, nor are all possible sequence numbers necessarily assigned byL * DECthreads. A thread created "later" does not necessarily have a sequence9 * number higher than that of a thread created "earlier". *M * A thread may read or write thread-specific data values directly to its ownL * tsd_values array. Writing a value to any array element of tsd_values thatL * does not correspond to the value of a thread-specific data key "owned" byE * the calling subsystem (returned by a call to pt 4hread_key_create orL * pthread_key_create_new) is erroneous. If you choose to code inline accessE * to the TSD array, do so very cautiously! Write to another thread'sL * tsd_values array only if your code provides sufficient synchronization toE * ensure that this is "safe" -- in general, this is not a good idea. *N * Only DECthreads and the O/S may use the value of the "per_kt_area" pointer;6 * for other code this is unpredictable and undefined. */"#ifdef _PTHREAD_USE_MANGLED_NAMES_# 4ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else%# define pthread_self __pthread_self# endif#endif%extern pthread_t pthread_self (void);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif/*J * Return the address of the calling thread's Thread Environment BLock. IfI * inlining is allowed and the platform supports asm(), hide the function- * behind a macro that inlines the operation. */,extern __pthreadTeb_p pthread_teb_np (void);@#if defined (_PTHR4EAD_USE_ASM_) && defined (_PTHREAD_USE_INLINE) # if defined (_PTHREAD_ENV_IA64)D# define pthread_teb_np() ((__pthreadTeb_p)__getReg (_IA64_REG_TP))# elseB# define pthread_teb_np() ((__pthreadTeb_p)asm ("call_pal 0x9e"))# endif#endif1#define pthread_unchecked_getspecific_np(_key_) \3 (pthread_teb_np ()->_Pfield(tsd_values)[_key_])9#define pthread_unchecked_setspecific_np(_key_,_value_) \? (pthread_teb_np ()->_Pfield(tsd_values)[_key_] = (_value_))#ifndef _PTHREAD_ENV_UNI 4X/*H * This is the primary structure controlling the identity and state of aF * mutex. The "lock" field contains the primary mutex lock bit, a flagJ * indicating whether lock/unlock protocols are "fast" or "slow", the fullJ * type of the mutex, and an internal reference count. The reference countG * assures atomicity of unlock/wake sequences with respect to deletion. *F * The "sequence" field gives each mutex a unique identifier, which isL * primarily used for debugging. A new static mute 4x has a sequence number ofM * zero; DECthreads assigns a real sequence number when a thread first blocksN * on the mutex. (A mutex created by calling pthread_mutex_init has a sequence * number assigned at creation.) *F * Beware that the name and order of these fields are undocumented andL * unsupported. Directly accessing any in your program may result in serious; * difficulties in future releases of the operating system. */"typedef struct __pthread_mutex_t {A unsigned int _Pfield(l 4ock); /* LOCK, CONFIG, TYPE, REFCNT */7 unsigned int _Pfield(valid); /* Validation info */< __pthreadLongString_t _Pfield(name); /* Name of mutex */> unsigned int _Pfield(arg); /* printf argument for name */< unsigned int _Pfield(depth); /* Recursive lock depth */@ unsigned long _Pfield(sequence); /* Mutex sequence number */A unsigned long _Pfield(owner); /* Current owner (if known) */I __pthreadLongAddr_p _Pfield(block); /* Pointer to blocking struct */ } pt4hread_mutex_t;#endif#ifndef _PTHREAD_ENV_UNIX/*< * Similar to pthread_mutex_t, but for a condition variable. */!typedef struct __pthread_cond_t {A unsigned int _Pfield(state); /* EVENT, SLOW, REFCNT, etc. */7 unsigned int _Pfield(valid); /* Validation info */I __pthreadLongString_t _Pfield(name); /* Name of condition variable */> unsigned int _Pfield(arg); /* printf argument for name */C unsigned long _Pfield(sequence); /* Condition variable seq # */I __pt4hreadLongAddr_p _Pfield(block); /* Pointer to blocking struct */ } pthread_cond_t;#endif/*@ * Ensure that an initialization routine is called exactly once. */#define PTHREAD_ONCE_UNINIT 0#define PTHREAD_ONCE_INITING 1#define PTHREAD_ONCE_INITED 2/#define PTHREAD_ONCE_INIT {PTHREAD_ONCE_UNINIT}#ifndef _PTHREAD_ENV_UNIX*typedef volatile struct __pthread_once_t { long _Pfield(state); long _Pfield(reserved)[10]; } pthread_once_t;#endif#ifndef _PTHREAD 4_ENV_UNIX/* * Readers-Writers Locks */#typedef struct __pthread_rwlock_t {7 unsigned int _Pfield(valid); /* Validation flag */6 unsigned int _Pfield(flags); /* Internal flags */= __pthreadLongString_t _Pfield(name); /* Name of rwlock */> unsigned int _Pfield(arg); /* printf argument for name */: unsigned int _Pfield(readers); /* Number of readers */7 unsigned int _Pfield(rwaits); /* Waiting readers */7 unsigned int _Pfield(wwaits); /* Waiting writers */F 4 __pthreadLongUint_t _Pfield(sequence); /* rwlock variable seq # */; unsigned long _Pfield(wrid); /* Current write owner */I __pthreadLongAddr_p _Pfield(block); /* Pointer to blocking struct */H __pthreadLongUint_t _Pfield(reserved1); /* Reserved to DECthreads */ } pthread_rwlock_t;#endif #define PTHREAD_INHERIT_SCHED 0!#define PTHREAD_EXPLICIT_SCHED 1"#define PTHREAD_CREATE_JOINABLE 0"#define PTHREAD_CREATE_DETACHED 1#ifndef _PTHREAD_ENV_UNIX7# define SCHED 4_FIFO 1 /* Tru64 UNIX sched.h defines */2# define SCHED_RR 2 /* these constants already */# define SCHED_OTHER 3?# define SCHED_FG_NP SCHED_OTHER /* "Foreground" (Timeshare) */7# define SCHED_BG_NP (SCHED_OTHER+1) /* "Background" */H# define SCHED_LFI_NP (SCHED_OTHER+2) /* "Low FIFO" (background FIFO) */D# define SCHED_LRR_NP (SCHED_OTHER+3) /* "Low RR" (background RR) */#endif8#if (defined _PTHREAD_ENV_UNIX) && (defined _OSF_SOURCE)# define PRI_FIFO_MIN 14'# define PRI_FIFO_MAX SC4HED_PRIO_RT_MAX# define PRI_RR_MIN 14%# define PRI_RR_MAX SCHED_PRIO_RT_MAX# define PRI_OTHER_MIN 14(# define PRI_OTHER_MAX SCHED_PRIO_RT_MAX# define PRI_FG_MIN_NP 14# define PRI_FG_MAX_NP 63# define PRI_BG_MIN_NP 0# define PRI_BG_MAX_NP 13# define PRI_LFI_MIN_NP 0# define PRI_LFI_MAX_NP 13# define PRI_LRR_MIN_NP 0# define PRI_LRR_MAX_NP 13 #elif defined (_PTHREAD_ENV_VMS)# define PRI_FIFO_MIN 16# define PRI_FIFO_MAX 31# define PRI_RR_MIN 16# define PRI_RR_MAX 314$# define PRI_OTHER_MIN PRI_FG_MIN_NP$# define PRI_OTHER_MAX PRI_FG_MAX_NP# define PRI_FG_MIN_NP 8# define PRI_FG_MAX_NP 15# define PRI_BG_MIN_NP 0# define PRI_BG_MAX_NP 7# define PRI_LFI_MIN_NP 0# define PRI_LFI_MAX_NP 7# define PRI_LRR_MIN_NP 0# define PRI_LRR_MAX_NP 7(# define sched_get_priority_max(_pol_) \8 (_pol_ == SCHED_OTHER ? PRI_FG_MAX_NP : PRI_FIFO_MAX)(# define sched_get_priority_min(_pol_) \8 (_pol_ == SCHED_OTHER ? PRI_FG_MIN_NP : PRI_FIFO_MIN)#endif4#ifdef _PTHREAD_ENV_UNIX8# if !defined (_XOPEN_SOURCE) || (_XOPEN_SOURCE+0 < 400)=extern int pthread_sigmask (int, const sigset_t*, sigset_t*);)extern int pthread_kill (pthread_t, int);# endif#endif/*L * DECthreads provides three distinct types of mutex. The default (normal orJ * "fast" mutex), which can lock and unlock with completely inline code onL * Alpha processors, but does no consistency checking; the "recursive" mutexF * which allows a given thread to lock a mutex it alre 4ady owns withoutL * deadlock (it remains locked until all nested locks are released); and theL * "errorcheck" mutex, which behaves much like a normal mutex but checks forM * self deadlock and for releasing a mutex that is either unowned or is ownedI * by another thread. The recursive and errorcheck mutexes require a call9 * into the DECthreads library for every lock and unlock. *J * When synchronization metering is enabled, all mutex types monitor every8 * lock and unlock. A mutex statical4ly initialized usingM * PTHREAD_MUTEX_INITIALIZER is "normal", but is set up so that the first useJ * of the mutex will result in a call into DECthreads (as if the mutex wasJ * already locked). If synchronization metering is not enabled, DECthreadsM * will disable this extra state so that future references (in the absence ofM * normal mutex contention) will not cause unnecessary calls. Should you wishL * to avoid this initial call, you can compile with _PTHREAD_NOMETER_STATIC;K * normal mute4xes statically initialized using this option are not metered. */9extern int pthread_mutexattr_init (pthread_mutexattr_t*);#ifdef _PTHREAD_ENV_UNIXOextern int pthread_mutexattr_getprioceiling (const pthread_mutexattr_t*, int*);Hextern int pthread_mutexattr_setprioceiling (pthread_mutexattr_t*, int);Lextern int pthread_mutexattr_getprotocol (const pthread_mutexattr_t*, int*);Eextern int pthread_mutexattr_setprotocol (pthread_mutexattr_t*, int);#endifKextern int pthread_mutexat4tr_getpshared (const pthread_mutexattr_t*, int*);Dextern int pthread_mutexattr_setpshared (pthread_mutexattr_t*, int);Hextern int pthread_mutexattr_gettype (const pthread_mutexattr_t*, int*);Aextern int pthread_mutexattr_settype (pthread_mutexattr_t*, int);<extern int pthread_mutexattr_destroy (pthread_mutexattr_t*);"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else1# define pthread_mutex_init __pthread_mutex_init# endif#end4ifMextern int pthread_mutex_init (pthread_mutex_t*, const pthread_mutexattr_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else7# define pthread_mutex_destroy __pthread_mutex_destroy# endif#endif4extern int pthread_mutex_destroy (pthread_mutex_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD4_USE_PTDNAM_# pragma extern_prefix "__"# else1# define pthread_mutex_lock __pthread_mutex_lock# endif#endif1extern int pthread_mutex_lock (pthread_mutex_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif#ifdef _PTHREAD_ENV_UNIXGextern int pthread_mutex_getprioceiling (const pthread_mutex_t*, int*);Fextern int pthread_mutex_setprioceiling (pthread_mutex_t*, int, int*);#endif#if defined (_PTHREAD_ENV_VMS)=extern int pthread_mutex_tryforcedlock_np (pthre4ad_mutex_t*);#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else7# define pthread_mutex_trylock __pthread_mutex_trylock# endif#endif4extern int pthread_mutex_trylock (pthread_mutex_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else5# define pthread_mutex_unlock __pthread_mutex_unlock# endif#endif34extern int pthread_mutex_unlock (pthread_mutex_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif7extern int pthread_condattr_init (pthread_condattr_t*);:extern int pthread_condattr_destroy (pthread_condattr_t*);Bextern int pthread_condattr_setpshared (pthread_condattr_t*, int);Iextern int pthread_condattr_getpshared (const pthread_condattr_t*, int*);"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else/# define 4pthread_cond_init __pthread_cond_init# endif#endifextern int pthread_cond_init ( pthread_cond_t*, const pthread_condattr_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else5# define pthread_cond_destroy __pthread_cond_destroy# endif#endif2extern int pthread_cond_destroy (pthread_cond_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"4#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else3# define pthread_cond_signal __pthread_cond_signal# endif#endif1extern int pthread_cond_signal (pthread_cond_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else9# define pthread_cond_broadcast __pthread_cond_broadcast# endif#endif4extern int pthread_cond_broa4dcast (pthread_cond_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else/# define pthread_cond_wait __pthread_cond_wait# endif#endifAextern int pthread_cond_wait (pthread_cond_t*, pthread_mutex_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else94# define pthread_cond_timedwait __pthread_cond_timedwait# endif#endif#extern int pthread_cond_timedwait ( pthread_cond_t*, pthread_mutex_t*, const struct timespec*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif;extern int pthread_rwlockattr_init (pthread_rwlockattr_t*);>extern int pthread_rwlockattr_destroy (pthread_rwlockattr_t*);Mextern int pthread_rwlockattr_getpshared (const pthread_rwlockattr_t*, int*);Fextern int pthread_rwlockattr_setpshared (4pthread_rwlockattr_t*, int);Pextern int pthread_rwlock_init (pthread_rwlock_t*, const pthread_rwlockattr_t*);6extern int pthread_rwlock_destroy (pthread_rwlock_t*);5extern int pthread_rwlock_rdlock (pthread_rwlock_t*);8extern int pthread_rwlock_tryrdlock (pthread_rwlock_t*);5extern int pthread_rwlock_wrlock (pthread_rwlock_t*);8extern int pthread_rwlock_trywrlock (pthread_rwlock_t*);5extern int pthread_rwlock_unlock (pthread_rwlock_t*);/*M * Routines to get/set the content 4ion scope for a thread that will be created * using the attributes object. */?extern int pthread_attr_getscope (const pthread_attr_t*, int*);8extern int pthread_attr_setscope (pthread_attr_t*, int);/*K * Extended versions of set/get stackaddr routines that allow the caller toJ * specify the stack using a low address and size. The implementation willN * compute the proper "stack base" using this information. E.g. you might mmapK * space, add the size to the returned pointer, and th 4en pass the result toF * pthread_attr_setstackaddr on a machine with a pre-decremented stackM * pointer; but on a machine with a post-incremented stack you would pass theL * pointer returned by mmap. Using pthread_attr_setstack instead, you always< * pass the pointer returned by mmap and the requested size. */Bextern int pthread_attr_setstack (pthread_attr_t*, void*, size_t);:#define pthread_attr_setstackaddr_np pthread_attr_setstackJextern int pthread_attr_getstack (const pthread_attr_t 4*, void**, size_t*);:#define pthread_attr_getstackaddr_np pthread_attr_getstack/*J * Routines to get/set the stack address for a thread that will be createdI * using the attributes object. Note that "stackaddr" must be the correctH * initial stack BASE for the thread, which is highly machine-dependent.N * (E.g., does the machine increment or decrement the stack, and does it do soM * before or after storing a new value?) Use of these functions is inherentlyA * NON-PORTABLE, and they should 4 be used only with great caution.K * Additionally, they do not provide any way for the implementation to knowN * the size of the stack, so it can neither prevent nor detect stack overflowsK * or the corruption that may be caused by this application error. (See theN * XOPEN and POSIX 1003.1-2001 pthread_attr_setstack and pthread_attr_getstack * routine descriptions.) */>extern int pthread_attr_setstackaddr (pthread_attr_t*, void*);Eextern int pthread_attr_getstackaddr (const pthread_at4tr_t*, void**);"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# elseE# define pthread_attr_setinheritsched __pthread_attr_setinheritsched# endif#endif?extern int pthread_attr_setinheritsched (pthread_attr_t*, int);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# elseE# define pthread_attr_getinheritsched __pthread_attr_4getinheritsched# endif#endifFextern int pthread_attr_getinheritsched (const pthread_attr_t*, int*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif>extern int pthread_attr_setschedpolicy (pthread_attr_t*, int);Eextern int pthread_attr_getschedpolicy (const pthread_attr_t*, int*);'extern int pthread_attr_setschedparam (- pthread_attr_t*, const struct sched_param*);'extern int pthread_attr_getschedparam (- const pthread_attr_t*, struct sched_param*);?extern4 int pthread_getcputime_np (pthread_t, struct timespec*);Hextern int pthread_getschedparam (pthread_t, int*, struct sched_param*);Mextern int pthread_setschedparam (pthread_t, int, const struct sched_param*);)extern int pthread_getconcurrency (void);(extern int pthread_setconcurrency (int);/extern int pthread_attr_init (pthread_attr_t*);2extern int pthread_attr_destroy (pthread_attr_t*);"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix 4"__"# else?# define pthread_attr_setstacksize __pthread_attr_setstacksize# endif#endif?extern int pthread_attr_setstacksize (pthread_attr_t*, size_t);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else?# define pthread_attr_getstacksize __pthread_attr_getstacksize# endif#endif&extern int pthread_attr_getstacksize ( const pthread_attr_t*, size_t*);#ifdef _5PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif>extern int pthread_attr_setdetachstate (pthread_attr_t*, int);Eextern int pthread_attr_getdetachstate (const pthread_attr_t*, int*);"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else)# define pthread_create __pthread_create# endif#endifextern int pthread_create ( pthread_t*, const pthread_attr_t*, void* (*)(void *), void*);#ifdef _PTHREAD_USE_PTDNAM_# pragma5 extern_prefix ""#endif##ifdef _PTHREAD_ALLOW_MIXED_PROTOS_<extern int pthread_join64 (pthread_t, __pthreadLongAddr_t*);=extern int pthread_join32 (pthread_t, __pthreadShortAddr_t*);# ifdef pthread_join# undef pthread_join# endifG# if defined (_PTHREAD_MIXED_PROTOS_) && (__INITIAL_POINTER_SIZE == 64)%# define pthread_join pthread_join64# else%# define pthread_join pthread_join32# endif#else## ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pr5agma extern_prefix "__"# else&# define pthread_join __pthread_join# endif# endif,extern int pthread_join (pthread_t, void**);# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""# endif#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else)# define pthread_detach __pthread_detach# endif#endif&extern int pthread_detach (pthread_t);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHR5EAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else%# define pthread_exit __pthread_exit# endif#endif!extern void pthread_exit (void*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else'# define pthread_equal __pthread_equal# endif#endif0extern int pthread_equal (pthread_t, pthread_t);#ifdef _PTHREAD_USE_PTDNAM_# pragma 5 extern_prefix ""#endif/*I * See the note near the top of this header for the risks and benefits ofG * using inlined operations! They are NOT compiled into your program byD * default, and if you choose to enable them you will be required toI * recompile should DECthreads ever need to change the inline instructionJ * sequences! (While we will not do this arbitrarily, we will not hesitateJ * should it become necessary to substantially improve code performance or! * reliability, or to fi5x a bug!) */#ifdef _PTHREAD_USE_INLINE# ifdef pthread_equal# undef pthread_equal# endif&# define pthread_equal(t1,t2) (t1==t2)#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else%# define pthread_once __pthread_once# endif#endif;extern int pthread_once (pthread_once_t*, __pthreadOnce_t);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endifFextern int pthread_key_create (pthread_key_t*, __pthreadDe5structor_t);.extern int pthread_key_delete (pthread_key_t);&extern int pthread_key_create_new_np ( pthread_key_t*, __pthreadConstructor_t, __pthreadExtDestructor_t, int);/*I * See the note near the top of this header for the risks and benefits ofG * using inlined operations! They are NOT compiled into your program byD * default, and if you choose to enable them you will be required toI * recompile should DECthreads ever need to change the inline instructionJ * sequences! (Whi 5le we will not do this arbitrarily, we will not hesitateJ * should it become necessary to substantially improve code performance or! * reliability, or to fix a bug!) * * Additional note: *M * pthread_getspecific can't be efficiently implemented as a macro in ANSI C,L * since it involves two invocations of pthread_teb_np(), which the compilerK * can't be depended upon to combine. The next best alternative is a staticG * inlined routine; even if the #pragma inline isn't recognized by you 5rK * compiler it's no worse than the real call (and may be better because theN * compiler can use optimized local call sequences); and the routine is small.K * Consider this an experiment -- it can be used for a lot more if it works * well. */@#if defined (_PTHREAD_USE_ASM_) && defined (_PTHREAD_USE_INLINE)_PTHREAD_INLINE_ static void *)pthread_getspecific (pthread_key_t __key) {- __pthreadTeb_p __teb = pthread_teb_np ();6 return (void *)(__key >= __teb->_Pfield(tsd_co 5unt). ? NULL : __teb->_Pfield(tsd_values)[__key]); }#else## ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else4# define pthread_getspecific __pthread_getspecific# endif# endif1extern void* pthread_getspecific (pthread_key_t);# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""# endif#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else3# define pthrea 5d_setspecific __pthread_setspecific# endif#endif<extern int pthread_setspecific (pthread_key_t, const void*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif%#if defined (_PTHREAD_EXC_USE_NATIVE)0# define pthread_cleanup_push(_routine_,_arg_) \ { \A void (*_XXX_proc) (void *) = (void (*)(void *))(_routine_); \' void *_XXX_arg = (void *)(_arg_); \& volatile int _XXX_completed = 0; \ _PTHREAD_NATIVE_TRY {)# define pthread_cleanup_pop(_execute_) \ 5 _XXX_completed = 1;} \ _PTHREAD_NATIVE_FINALLY { \@ if ((! _XXX_completed) || (_execute_)) _XXX_proc (_XXX_arg);} \ }#else0# define pthread_cleanup_push(_routine_,_arg_) \ { \A void (*_XXX_proc) (void *) = (void (*)(void *))(_routine_); \' void *_XXX_arg = (void *)(_arg_); \& volatile int _XXX_completed = 0; \ PTHREAD_TRY_NP {)# define pthread_cleanup_pop(_execute_) \ _XXX_completed = 1;} \ PTHREAD_FINALLY_NP { \@ if ((! _XXX_completed) || 5 (_execute_)) _XXX_proc (_XXX_arg);} \ PTHREAD_ENDTRY_NP}#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else)# define pthread_cancel __pthread_cancel# endif#endif&extern int pthread_cancel (pthread_t);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif.extern int pthread_setcancelstate (int, int*);-extern int pthread_setcanceltype (int, int*);"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_P 5TDNAM_# pragma extern_prefix "__"# else1# define pthread_testcancel __pthread_testcancel# endif#endif&extern void pthread_testcancel (void);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif/*< * DECthreads non-portable extensions to POSIX 1003.1c-1995. *//*D * Get or set a name to be associated with threads created using theL * attributes object. Note that only the thread attributes object includes aJ * name -- for other objects, it is sufficient to set th 5e name immediatelyN * after initializing the object (whereas a thread may run between the call toF * pthread_create and the call to pthread_setname_np, without a name). *J * Note that the "void*" value to which "mbz" points MAY be written by theK * thread library. On Alpha hardware (Tru64 UNIX and OpenVMS) and on IA-64,G * the value to which "mbz" points must be a 64-bit pointer. If you areN * compiling with short pointers, you must take extra steps to ensure that you7 * have allocated a 645-bit value to receive the result. */$extern int pthread_attr_getname_np ( const pthread_attr_t*, char*, size_t, void**);Iextern int pthread_attr_setname_np (pthread_attr_t*, const char*, void*);/*- * Get or set a name on a condition variable. */Dextern int pthread_cond_getname_np (pthread_cond_t*, char*, size_t);Iextern int pthread_cond_setname_np (pthread_cond_t*, const char*, void*);/*2 * Get or set a name on a thread-specific data key */Aextern int pthread5_key_getname_np (pthread_key_t, char*, size_t);Fextern int pthread_key_setname_np (pthread_key_t, const char*, void*);/* * Get or set a name on a mutex */Fextern int pthread_mutex_getname_np (pthread_mutex_t*, char*, size_t);Kextern int pthread_mutex_setname_np (pthread_mutex_t*, const char*, void*);/* * Get or set a name on a rwlock */Hextern int pthread_rwlock_getname_np (pthread_rwlock_t*, char*, size_t);Mextern int pthread_rwlock_setname_np (pthread_rwlock_t*, const5 char*, void*);/* * Get or set a name on a thread */9extern int pthread_getname_np (pthread_t, char*, size_t);>extern int pthread_setname_np (pthread_t, const char*, void*);"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# elseK# define pthread_cond_sig_preempt_int_np __pthread_cond_sig_preempt_int_np# endif#endif=extern int pthread_cond_sig_preempt_int_np (pthread_cond_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_pref5ix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# elseA# define pthread_cond_signal_int_np __pthread_cond_signal_int_np# endif#endif8extern int pthread_cond_signal_int_np (pthread_cond_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else?# define pthread_get_expiration_np __pthread_get_expiration_np# 5endif#endifPextern int pthread_get_expiration_np (const struct timespec*, struct timespec*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else-# define pthread_delay_np __pthread_delay_np# endif#endif5extern int pthread_delay_np (const struct timespec*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _P5THREAD_USE_PTDNAM_# pragma extern_prefix "__"# else9# define pthread_lock_global_np __pthread_lock_global_np# endif#endif)extern int pthread_lock_global_np (void);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# else=# define pthread_unlock_global_np __pthread_unlock_global_np# endif#endif+extern int pthread_unlock_global_np (void);#ifdef _PTHREAD_USE_PTDNAM5_# pragma extern_prefix ""#endif?extern int pthread_attr_setguardsize (pthread_attr_t*, size_t);Fextern int pthread_attr_getguardsize (const pthread_attr_t*, size_t*);8extern unsigned long pthread_getsequence_np (pthread_t);2extern unsigned long pthread_getselfseq_np (void);/*@ * By default (unless #undef-ed) use an inlined macro version of. * pthread_getsequence_np, since it's trivial. */%#define pthread_getsequence_np(_t_) \C (((__pthreadTeb_p)(__pthreadPointerSize)(_t 5_))->_Pfield(sequence))F#define pthread_getselfseq_np() (pthread_teb_np ()->_Pfield(sequence))/*F * The POSIX 1003.1c pthread_getspecific() function doesn't report anyM * errors. If the key value is illegal, or if the thread has no value for theK * key, it returns NULL without any error indication. Normally that's not aJ * problem. However if you really want to know whether a key is valid, youM * can use this function. It will return EINVAL if the key is invalid, ENOENTI * if the key ex5ists but the thread has no value for the key (or value is? * NULL), and 0 if the key is valid and the thread has a value. */3extern int pthread_key_validate_np (pthread_key_t);#extern int pthread_yield_np (void);/*< * OBSOLETE functions will be moved here before destruction. *//*J * The "DCE thread" heritage _np mutex type attribute operations have beenK * superceded by the Single UNIX Specification, Version 2 operations. (SameL * name but without the _np suffix.) The _np v5ariations will be removed in a * future release. */5#define PTHREAD_MUTEX_NORMAL_NP PTHREAD_MUTEX_NORMAL:#define PTHREAD_MUTEX_RECURSIVE_NP PTHREAD_MUTEX_RECURSIVE<#define PTHREAD_MUTEX_ERRORCHECK_NP PTHREAD_MUTEX_ERRORCHECKKextern int pthread_mutexattr_gettype_np (const pthread_mutexattr_t*, int*);Dextern int pthread_mutexattr_settype_np (pthread_mutexattr_t*, int);/*I * The "DCE thread" heritage _np guardsize attribute operations have beenK * superceded by the Single UNIX S5pecification, Version 2 operations. (SameL * name but without the _np suffix.) The _np variations will be removed in a * future release. */"#ifdef _PTHREAD_USE_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# elseE# define pthread_attr_getguardsize_np __pthread_attr_getguardsize_np# endif#endifIextern int pthread_attr_getguardsize_np (const pthread_attr_t*, size_t*);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif"#ifdef _PTHREAD_US5E_MANGLED_NAMES_# ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix "__"# elseE# define pthread_attr_setguardsize_np __pthread_attr_setguardsize_np# endif#endif)extern int pthread_attr_setguardsize_np ( pthread_attr_t*, size_t);#ifdef _PTHREAD_USE_PTDNAM_# pragma extern_prefix ""#endif/*M * OBSOLETE: The function pthread_debug() is no longer implemented. The entryM * point remains for source/binary compatibility for now, but will be removed * in a future relea5se. */!extern void pthread_debug (void);/*D * OBSOLETE: This type is no longer used. The definition remains forG * source/binary compatibility for now, but will be removed in a future * release. */!typedef enum pthreadDbgStatus_t { PTHREAD_DBG_SUCCESS = 0, PTHREAD_DBG_QUIT = 1, PTHREAD_DBG_NONESEL = 2, PTHREAD_DBG_SUCCESSPEND = 3, PTHREAD_DBG_NOPRIV = -1, PTHREAD_DBG_INVPARAM = -2, PTHREAD_DBG_INVSEQ = -3, PTHREAD_DBG_INCONSTATE = -4, 5PTHREAD_DBG_CORRUPT = -5, PTHREAD_DBG_INVOPTION = -6, PTHREAD_DBG_NOARG = -7, PTHREAD_DBG_INVADDR = -8, PTHREAD_DBG_INVCMD = -9, PTHREAD_DBG_NULLCMD = -10, PTHREAD_DBG_CONFLICT = -11, PTHREAD_DBG_UNIMPL = -12 } pthreadDbgStatus_t;/*K * OBSOLETE: The function pthread_debug_cmd() is no longer implemented. TheK * entry point remains for source/binary compatibility for now, but will be% * removed in a future major release. */5extern pthreadDbgSta tus_t pthread_debug_cmd (char *);#ifdef _PTHREAD_ENV_CXX } /* End of extern "C" { */#endif #endif /* _PTHREAD_USE_D4 */#pragma __standard#endifww 5/*J *************************************************************************J * *J * Copyright 1990, 2004 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * 5 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *J 5 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * !5 *J ************************************************************************* *//*Z * @(#)$RCSfile: pthread_d4.h,v $ $Revision: 1.1.24.5 $ (DEC) $Date: 2003/04/24 13:15:18 $ *//* * FACILITY: * * DECthreads core * * ABSTRACT: *@ * External definitions for DECthreads POSIX 1003.4a/D4 services * * AUTHORS: * * Dave Butenhof * * CREATION DATE: *  * 20 February 1990 * * MODIFIED BY: * * J.L. Berg * Dave Butenhof * Paul Clar"5k * Paul Curtin * Steve Johnson * Brian Keane * Peter Portante * Webb Scales * * LAST MODIFIED: * * 16 September 1998 */ #ifndef _PTHREAD_D4_# define _PTHREAD_D4_#ifdef __cplusplus extern "C" {#endifD#if defined(vms) || defined(__vms) || defined(VMS) || defined(__VMS)# include # ifndef _TIMESPEC_T_# define _TIMESPEC_T_# ifndef __TIMESPEC# define __TIMESPECstruct timespec {( unsigned long tv_sec; /* seconds */$ long tv_n#5sec; /* nanoseconds */ };# endif# ifndef __TIMESPEC_T# define __TIMESPEC_T#typedef struct timespec timespec_t;# endif# endif#else# include # include #endif/*L * We define the following macro to change the actual name of the routine toN * have the _d4 appended to it. It is only used on routines which have a name0 * conflict with the new POSIX 1003.1c standard. */#if _CMA_OS_ == _CMA__VMS!# if _CMA_COMPILER_ == _CMA__VAXC%# define $5_Draft4(_arg_) _arg_/**/_d4# else## define _Draft4(_arg_) _arg_##_d4# endif#else# define _Draft4(_arg_) _arg_#endif/*1 * The implementation makes these basic decisions */#ifndef _POSIX_THREADS# define _POSIX_THREADS 1#endif$#ifndef _POSIX_THREAD_ATTR_STACKSIZE(# define _POSIX_THREAD_ATTR_STACKSIZE 1#endif#if _CMA_POSIX_SCHED_-# define _POSIX_THREADS_REALTIME_SCHEDULING 11#elif defined(_POSIX_THREADS_REALTIME_SCHEDULING)*# undef _POSIX_THREADS_REALTIME_%5SCHEDULING#endif,#ifndef _POSIX_THREADS_PER_PROCESS_SIGNALS_1/# define _POSIX_THREADS_PER_PROCESS_SIGNALS_1 1#endifD#if ((_CMA_COMPILER_ != _CMA__DECCPLUS) && (_CMS_OS_ == _CMA__UNIX))/*I * Implement push and pop for cancellation handlers, using the compiler's! * native try/finally constructs. */0# define pthread_cleanup_push(_routine_,_arg_) \ { \C pthread_cleanup_t _XXX_proc = (pthread_cleanup_t)(_routine_); \8 pthread_addr_t _XXX_arg = (pthread_addr_t)(_arg_); \&5 int _XXX_completed = 0; \ try {)# define pthread_cleanup_pop(_execute_) \ _XXX_completed = 1;} \ finally { \@ if ((! _XXX_completed) || (_execute_)) _XXX_proc (_XXX_arg);} \ }#else/*I * Implement push and pop for cancellation handlers, using TRY and ENDTRY */0# define pthread_cleanup_push(_routine_,_arg_) \ { \C pthread_cleanup_t _XXX_proc = (pthread_cleanup_t)(_routine_); \8 pthread_addr_t _XXX_arg = (pthread_addr_t)(_arg_); \ int _XXX_c'5ompleted = 0; \ TRY {)# define pthread_cleanup_pop(_execute_) \ _XXX_completed = 1;} \ FINALLY { \@ if ((! _XXX_completed) || (_execute_)) _XXX_proc (_XXX_arg);} \ ENDTRY}#endif<#define pthread_equal_np(__t1,__t2) pthread_equal(__t1,__t2)/*- * Sample decisions for the environment types */!typedef cma_t_key pthread_key_t;&typedef cma_t_address pthread_addr_t;typedef pthread_addr_t any_t;'typedef cma_t_handle pthread_handle_t;7typedef void (*pth(5read_cleanup_t) (pthread_addr_t arg);/*F * Sample decision for a one-time initialization control block and its * initialization macro. *6 * Declare a one time initialization control block as: *3 * static pthread_once_t block = pthread_once_init; */"typedef cma_t_once pthread_once_t;'#define pthread_once_init cma_once_init#define CANCEL_ON 1#define CANCEL_OFF 0/*5 * The following are the portable pthread definitions *//*# * Operations on attributes object)5s */"typedef cma_t_attr pthread_attr_t;/*I * An attributes object is created to specify the attributes of other CMA * objects that will be created. */int _CMA_CALL_pthread_attr_create ( pthread_attr_t *attr);/*C * An attributes object can be deleted when it is no longer needed. */int _CMA_CALL_pthread_attr_delete ( pthread_attr_t *attr);/* * Operations on threads */3typedef cma_t_start_routine pthread_startroutine_t; typedef cma_t_thread pt*5hread_t;.typedef pthread_startroutine_t pthread_func_t;6#define PTHREAD_INHERIT_SCHED (int)cma_c_sched_inherit:#define PTHREAD_DEFAULT_SCHED (int)cma_c_sched_use_default:#define PTHREAD_CREATE_JOINABLE (int)cma_c_create_joinable:#define PTHREAD_CREATE_DETACHED (int)cma_c_create_detached#if !_CMA_RT4_KTHREAD_%# define SCHED_FIFO cma_c_sched_fifo!# define SCHED_RR cma_c_sched_rr,# define SCHED_OTHER cma_c_sched_throughput,# define SCHED_FG_NP cma_c_sched_throughput,# define SCHED+5_BG_NP cma_c_sched_background#endif)#define PRI_FIFO_MIN cma_c_prio_fifo_min)#define PRI_FIFO_MAX cma_c_prio_fifo_max%#define PRI_RR_MIN cma_c_prio_rr_min%#define PRI_RR_MAX cma_c_prio_rr_max-#define PRI_FG_MIN_NP cma_c_prio_through_min-#define PRI_FG_MAX_NP cma_c_prio_through_max*#define PRI_BG_MIN_NP cma_c_prio_back_min*#define PRI_BG_MAX_NP cma_c_prio_back_max-#define PRI_OTHER_MIN cma_c_prio_through_min-#define PRI_OTHER_MAX cma_c_prio_through_maxint _CMA_CAL,5L_2_Draft4(pthread_equal) ( /* Compare two handles */ pthread_t handle1, pthread_t handle2);/*E * This must come after the routine prototype declaration so that theE * right name mangling can happen for the prototype on VMS platforms. */#ifdef pthread_equal# undef pthread_equal#endif"#define pthread_equal(_t1_,_t2_) \' (((_t1_).field1 == (_t2_).field1) \( && ((_t1_).field2 == (_t2_).field2))/*2 * Operations to define thread creation attributes *//*- * Set-5 or obtain the default thread priority. */int _CMA_CALL_pthread_attr_setprio ( pthread_attr_t *attr, int priority);int _CMA_CALL_pthread_attr_getprio ( pthread_attr_t attr);/*1 * Set or obtain the default scheduling algorithm */int _CMA_CALL_pthread_attr_setsched ( pthread_attr_t *attr, int scheduler);int _CMA_CALL_pthread_attr_getsched ( pthread_attr_t attr);/*M * Set or obtain whether a thread will use the default scheduling attributes,, * or .5inherit them from the creating thread. */int _CMA_CALL_'_Draft4(pthread_attr_setinheritsched) ( pthread_attr_t *attr, int inherit);int _CMA_CALL_'_Draft4(pthread_attr_getinheritsched) ( pthread_attr_t attr);/*' * Set or obtain the default stack size */int _CMA_CALL_$_Draft4(pthread_attr_setstacksize) ( pthread_attr_t *attr, long stacksize);unsigned long _CMA_CALL_$_Draft4(pthread_attr_getstacksize) ( pthread_attr_t attr);/*' * Set or obtain the default/5 guard size */int _CMA_CALL_'_Draft4(pthread_attr_setguardsize_np) ( pthread_attr_t *attr, long guardsize);unsigned long _CMA_CALL_'_Draft4(pthread_attr_getguardsize_np) ( pthread_attr_t attr);/*! * Set or obtain the detach state */int _CMA_CALL_pthread_attr_setdetach_np ( pthread_attr_t *attr, int detachstate);int _CMA_CALL_pthread_attr_getdetach_np ( pthread_attr_t attr);/*C * The following procedures can be used to control thread creation, *05 termination and deletion. *//*M * To create a thread object and runnable thread, a routine must be specifiedH * as the new thread's start routine. An argument may be passed to thisM * routine, as an untyped address; an untyped address may also be returned asL * the routine's value. An attributes object may be used to specify details* * about the kind of thread being created. */int _CMA_CALL__Draft4(pthread_create) ( pthread_t *thread, pthread_attr_t attr,& pthread_start15routine_t start_routine, pthread_addr_t arg);/*I * A thread object may be "detached" to specify that the return value and+ * completion status will not be requested. */int _CMA_CALL__Draft4(pthread_detach) ( pthread_t *thread);/* - * A thread may terminate it's own execution. */void _CMA_CALL__Draft4(pthread_exit) ( pthread_addr_t status);/* K * A thread can await termination of another thread and retrieve the return * value of the thread. */in25t _CMA_CALL__Draft4(pthread_join) ( pthread_t thread, pthread_addr_t *status);/* * Thread Scheduling Operations *//*A * The current user_assigned priority of a thread can be changed. */int _CMA_CALL_pthread_setprio ( pthread_t thread, int priority);/*L * The current user_assigned scheduler algorithm of a thread can be changed. */int _CMA_CALL_pthread_setscheduler ( pthread_t thread, int scheduler, int priority);/*L * A thread may tell the35 scheduler that its processor can be made available. */void _CMA_CALL_pthread_yield (void);/*@ * Bind a thread to a particular CPU on a multiprocessor system. */int _CMA_CALL_pthread_bind_to_cpu_np ( pthread_t thread, long cpu_mask);/* * Thread Information Operations *//*7 * A thread may obtain a copy of its own thread handle. */pthread_t _CMA_CALL__Draft4(pthread_self) (void);/*K * Obtain a thread's sequence number. This will usually be a unique 45integerK * across all threads within a process (until a large number of threads has * been created). */long _CMA_CALL_pthread_getunique_np ( pthread_t *thread);/*> * The current user_assigned priority of a thread can be read. */int _CMA_CALL_pthread_getprio ( pthread_t thread);/*I * The current user_assigned scheduler algorithm of a thread can be read. */int _CMA_CALL_pthread_getscheduler ( pthread_t thread);/* * Operations on Mutexes */,#def55ine MUTEX_FAST_NP (int)cma_c_mutex_fast5#define MUTEX_RECURSIVE_NP (int)cma_c_mutex_recursive;#define MUTEX_NONRECURSIVE_NP (int)cma_c_mutex_nonrecursive'typedef cma_t_attr pthread_mutexattr_t;$typedef cma_t_mutex pthread_mutex_t;int _CMA_CALL_pthread_mutexattr_create ( pthread_mutexattr_t *attr);int _CMA_CALL_pthread_mutexattr_delete ( pthread_mutexattr_t *attr);int _CMA_CALL_pthread_mutexattr_setkind_np ( pthread_mutexattr_t *attr, int kind);int _CMA_CALL_65pthread_mutexattr_getkind_np ( pthread_mutexattr_t attr);int _CMA_CALL_!pthread_mutexattr_setmetered_np ( pthread_mutexattr_t *attr, int meter);int _CMA_CALL_!pthread_mutexattr_getmetered_np ( pthread_mutexattr_t attr);/* B * The following routines create, delete, lock and unlock mutexes. */int _CMA_CALL__Draft4(pthread_mutex_init) ( pthread_mutex_t *mutex, pthread_mutexattr_t attr);int _CMA_CALL_ _Draft4(pthread_mutex_destroy) ( pthread_mutex_t 75*mutex);int _CMA_CALL__Draft4(pthread_mutex_lock) ( pthread_mutex_t *mutex);int _CMA_CALL_ _Draft4(pthread_mutex_trylock) ( pthread_mutex_t *mutex);int _CMA_CALL__Draft4(pthread_mutex_unlock) ( pthread_mutex_t *mutex);/*$ * Operations on condition variables */&typedef cma_t_attr pthread_condattr_t;"typedef cma_t_cond pthread_cond_t;int _CMA_CALL_pthread_condattr_create ( pthread_condattr_t *attr);int _CMA_CALL_pthread_condattr_delete ( pthread85_condattr_t *attr);/*6 * A thread can create and delete condition variables. */int _CMA_CALL__Draft4(pthread_cond_init) ( pthread_cond_t *cond, pthread_condattr_t attr);int _CMA_CALL__Draft4(pthread_cond_destroy) ( pthread_cond_t *cond);/*@ * A thread can signal to and broadcast on a condition variable. */int _CMA_CALL_!_Draft4(pthread_cond_broadcast) ( pthread_cond_t *cond);int _CMA_CALL__Draft4(pthread_cond_signal) ( pthread_cond_t *cond);int 95_CMA_CALL_%_Draft4(pthread_cond_signal_int_np) ( pthread_cond_t *cond);#if _CMA_OS_ == _CMA__UNIXint _CMA_CALL_!pthread_cond_sig_preempt_int_np ( pthread_cond_t *condition, pthread_addr_t scp);#else# if _CMA_OS_ == _CMA__VMSint _CMA_CALL_!pthread_cond_sigprmpt_int_np_d4 ( pthread_cond_t *condition);# elseint _CMA_CALL_!pthread_cond_sig_preempt_int_np ( pthread_cond_t *condition);# endif#endif/*K * A thread can wait for a condition variable to be sign:5alled or broadcast. */int _CMA_CALL__Draft4(pthread_cond_wait) ( pthread_cond_t *cond, pthread_mutex_t *mutex);/* * Operations for timed waiting *//*= * A thread can perform a timed wait on a condition variable. */int _CMA_CALL_!_Draft4(pthread_cond_timedwait) ( pthread_cond_t *cond, pthread_mutex_t *mutex, struct timespec *abstime);/*( * Operations for client initialization. */-typedef void (*pthread_initroutine_t) (void);int _CMA_CALL_;5_Draft4(pthread_once) ( pthread_once_t *once_block,% pthread_initroutine_t init_routine);/*$ * Operations for per-thread context */.typedef cma_t_destructor pthread_destructor_t;/*B * A unique per-thread context key can be obtained for the process */int _CMA_CALL_pthread_keycreate ( pthread_key_t *key," pthread_destructor_t destructor);/*C * A thread can set a per-thread context value identified by a key. */int _CMA_CALL__Draft4(pthread_setspecific) (<5 pthread_key_t key, pthread_addr_t value);/*H * A thread can retrieve a per-thread context value identified by a key. */int _CMA_CALL__Draft4(pthread_getspecific) ( pthread_key_t key, pthread_addr_t *value);/* * Operations for alerts. *//*I * The current thread can request that a thread terminate it's execution. */int _CMA_CALL__Draft4(pthread_cancel) ( pthread_t thread);/*2 * The current thread can poll for alert delivery. */void _CMA_CALL=5_#_Draft4(pthread_testcancel) (void);/*C * The current thread can enable or disable alert delivery (PTHREADF * "cancels"); it can control "general cancelability" (CMA "defer") or< * just "asynchronous cancelability" (CMA "asynch disable"). */int _CMA_CALL_pthread_setasynccancel ( int state);int _CMA_CALL_pthread_setcancel ( int state); #ifndef _CMA_SUPPRESS_EXTERNALS_2_CMA_IMPORT_ pthread_attr_t pthread_attr_default;;_CMA_IMPORT_ pthread_mutexattr_t pthread_mutexattr>5_default;:_CMA_IMPORT_ pthread_condattr_t pthread_condattr_default;#endif/* * Define nonportable extensions */extern int _CMA_CALL_$_Draft4(pthread_get_expiration_np) ( struct timespec *delta, struct timespec *abstime);extern int _CMA_CALL__Draft4(pthread_delay_np) ( struct timespec *interval);extern int _CMA_CALL_'_Draft4(pthread_lock_global_np) (void);extern int _CMA_CALL_)_Draft4(pthread_unlock_global_np) (void);#if _CMA_OS_ != _CMA__VMSextern?5 int _CMA_CALL_pthread_sig_to_can_thread_np ( sigset_t *sigset, pthread_t *target, pthread_t *thread);extern int _CMA_CALL_pthread_signal_to_cancel_np ( sigset_t *sigset, pthread_t *target);#endif/*K * Now, since we are providing source migration capability, we need to makeF * sure old code, which was built against the POSIX 1003.4a interface,> * references the new routine names which have _d4 on the end. */#if _CMA_OS_ == _CMA__VMS/# define pthread_attr_getguard@5size_np(__attr) \, pthread_attr_getguardsize_np_d4 (__attr)/# define pthread_attr_getinheritsched(__attr) \, pthread_attr_getinheritsched_d4 (__attr),# define pthread_attr_getstacksize(__attr) \) pthread_attr_getstacksize_d4 (__attr);# define pthread_attr_setguardsize_np(__attr,__guardsize) \8 pthread_attr_setguardsize_np_d4 (__attr,__guardsize)9# define pthread_attr_setinheritsched(__attr,__inherit) \6 pthread_attr_setinheritsched_d4 (__attr,__inherit)8# defineA5 pthread_attr_setstacksize(__attr,__stacksize) \5 pthread_attr_setstacksize_d4 (__attr,__stacksize)## define pthread_cancel(__thread) \ pthread_cancel_d4 (__thread))# define pthread_cond_broadcast(__cond) \& pthread_cond_broadcast_d4 (__cond)'# define pthread_cond_destroy(__cond) \$ pthread_cond_destroy_d4 (__cond)+# define pthread_cond_init(__cond,__attr) \( pthread_cond_init_d4 (__cond,__attr)2# define pthread_cond_sig_preempt_int_np(__cond) \, pthread_coB5nd_sigprmpt_int_np_d4 (__cond)&# define pthread_cond_signal(__cond) \# pthread_cond_signal_d4 (__cond)-# define pthread_cond_signal_int_np(__cond) \* pthread_cond_signal_int_np_d4 (__cond);# define pthread_cond_timedwait(__cond,__mutex,__abstime) \8 pthread_cond_timedwait_d4 (__cond,__mutex,__abstime),# define pthread_cond_wait(__cond,__mutex) \) pthread_cond_wait_d4 (__cond,__mutex)@# define pthread_create(__thread,__attr,__start_routine,__arg) \= pthread_createC5_d4 (__thread,__attr,__start_routine,__arg)'# define pthread_delay_np(__interval) \$ pthread_delay_np_d4 (__interval)## define pthread_detach(__thread) \ pthread_detach_d4 (__thread)!# define pthread_exit(__status) \ pthread_exit_d4 (__status)7# define pthread_get_expiration_np(__delta,__abstime) \4 pthread_get_expiration_np_d4 (__delta,__abstime)-# define pthread_getspecific(__key,__value) \* pthread_getspecific_d4 (__key,__value)*# define pthread_join(__D5thread,__status) \' pthread_join_d4 (__thread,__status)## define pthread_lock_global_np() \ pthread_lock_global_np_d4 ())# define pthread_mutex_destroy(__mutex) \& pthread_mutex_destroy_d4 (__mutex)-# define pthread_mutex_init(__mutex,__attr) \* pthread_mutex_init_d4 (__mutex,__attr)&# define pthread_mutex_lock(__mutex) \# pthread_mutex_lock_d4 (__mutex))# define pthread_mutex_trylock(__mutex) \& pthread_mutex_trylock_d4 (__mutex)(# define pthread_mutexE5_unlock(__mutex) \% pthread_mutex_unlock_d4 (__mutex)4# define pthread_once(__once_block,__init_routine) \1 pthread_once_d4 (__once_block,__init_routine)# define pthread_self() \ pthread_self_d4 ()-# define pthread_setspecific(__key,__value) \* pthread_setspecific_d4 (__key,__value)# define pthread_testcancel() \ pthread_testcancel_d4 ()%# define pthread_unlock_global_np() \" pthread_unlock_global_np_d4 ()#endif#ifdef __cplusplus }#endif#endifww G5/*J *************************************************************************J * *J * Copyright 1995, 2004 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * H5 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *JI5 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * J5 *J ************************************************************************* *//*^ * @(#)$RCSfile: pthread_debug.h,v $ $Revision: 1.1.39.13 $ (DEC) $Date: 2004/10/07 15:41:57 $ *//* * FACILITY: * * DECthreads POSIX 1003.1c * * ABSTRACT: *D * External definitions for the DECthreads "debug assistant" library@ * (libpthreaddebug.so on Digital UNIX, or PTHREAD$DBGSHR.EXE on * OpenVMS) * * IMPORTANT: * ---------- *G * The interfaces defineK5d in this header file are intended for use onlyF * by debuggers or libraries that need to support generalized debuggerE * access with assistance from DECthreads, such as Ada or C++ tasking * packages. * * AUTHORS: * * Dave Butenhof * Peter Portante * * CREATION DATE: * * 16 October 1995 * * MODIFIED BY: * * Dave Butenhof * Richard Love * Peter Portante * Tim Rice * Brian Silver * Mark Simons * Mary Sullivan * Tom Dahl * RaeLyn Crowell */L5#ifndef _PTHREAD_DEBUG_H_# define _PTHREAD_DEBUG_H_#ifdef __cplusplus extern "C" {#endif#include #include #include /#if defined (__cplusplus) || defined (__DECCXX)# define _PTHREAD_DEBUG_ENV_CXX*#elif defined (__DECC) || defined (__decc) # define _PTHREAD_DEBUG_ENV_DECC#endifH#if defined (VMS) || defined (__VMS) || defined (__vms) || defined (vms)# define _PTHREAD_DEBUG_ENV_VMS>#elif defined (__unix__) || defined (__unix)M5 || defined (unix) # define _PTHREAD_DEBUG_ENV_UNIX#endif/*J * A cross platform SDA IXVMS build looks more like an IA-64 build than anL * Alpha build (the code is intended to process IA-64 contexts), even though * the code will run on Alpha. */=#if defined (__ia64) || defined (__ia64__) || defined (IXVMS) # define _PTHREAD_DEBUG_ENV_IA64,#elif defined (__alpha) || defined (__ALPHA)!# define _PTHREAD_DEBUG_ENV_ALPHA#else<# error : unsupported hardware architectuN5re#endif?#define PTHREAD_DEBUG_VERSION 4 /* Current interface version *//*' * GENERAL NOTES ON USING THIS HEADER *K * The header describes the functional interface and dataL * structures used to communicate with the DECthreads debug assistant (we'll- * generally refer to it as "the assistant"). *L * To use the debug assistant, a debugger will compile (one or more modules)M * with this header file, and link with the assistant library. The facilitiesM * in th O5is debugging system are designed to work with a mechanism such as theN * Digital UNIX "proc" filesystem, or analysis of a saved core file, where theN * multithreaded process being debugged (the "debuggee", or "target") lives inL * a separate address space, not directly accessible by the assistant. Thus,N * all memory references are made through "callbacks" supplied by the "client": * debugger (or any analysis tool utilizing this library). *+ * *** DECthreads "core" symbol table hook: *N *P5 In order to navigate within the address space of the multithreaded process,N * the assistant relies on a special "symbol table" linked into the DECthreadsI * library (that is, libpthread.so on Digital UNIX, or PTHREAD$RTL.EXE on? * OpenVMS). This symbol table, identified by the symbolic nameM * __pthread_dbg_symtable, tells the assistant how to find the various "root"N * data structures necessary to identify threads, synchronization objects, andL * other data. The assistant has no direct acc Q5ess to the symbol table of theM * process being debugged, so it relies on the debugger to supply the addressH * of __pthread_dbg_symtable. The address is one of the arguments to theM * pthreadDebugContextInit entry point, which must be called before using any# * other debug assistant functions. *M * It may also be noted that the debugger may look for __pthread_dbg_symtableN * symbol to determine whether the target process may be multithreaded, beforeN * attempting to initialize a debug as R5sistant context for that process. At theF * very least, be aware that the assistant currently cannot initializeK * (pthreadDebugContextInit will fail) for any process that does not have aL * visible __pthread_dbg_symtable symbol. In the future, we will try to workJ * with the kernel and debuggers to devise a better way to "hook" into the7 * target process, and we'd like to remove the need for * __pthread_dbg_symtable. *3 * *** Object caching and SUSPEND/RESUME callbacks: *K * For efficS5iency, the assistant caches "objects" that it references in theK * target process. However, because the target process is asynchronous, andM * may be running simultaneously in many cases, the assistant cannot count onG * the data remaining static. Therefore, it generally uses the cache toL * efficiently LOCATE the remote object, and reads the actual target processN * memory to "validate" the object. This validation can be avoided if and onlyN * if the assistant can know that the process has T5been unable to run since theL * object was last validated. It knows this, for example, while the debuggerM * traverses the list of threads, because pthreadDebugThdSeqInit suspends theJ * target process, which is resumed only when pthreadDebugThdSeqDestroy isG * called. There are several important consequences to this assumption: *L * * Operation in contexts where the assistant has not itself suspended theF * process do not assume that the debugger has suspended the targetN * process. U5 If the debugger wishes to take full advantage of caching in allJ * contexts, the debugger should always use the pthreadDebugSuspend andK * pthreadDebugResume functions -- even though all they do is invoke theK * debugger callback. The functions allow the assistant to know when the/ * debugger has suspended process execution. *H * * If you supply a SUSPEND callback, it must actually ensure that theF * process is suspended before it returns. If it cannot suspend theF * pr V5ocess, it must return an error status. If the SUSPEND callbackH * returns with success status (0), while the process is not actuallyJ * suspended, the debug assistant's cache may become inconsistent. ThisK * will result in confusion of the debug client and the users. (You may,5 * for example, see objects that no longer exist.) *8 * *** A few words about kernel threads and user threads *M * In general, the debugger should endeavor to ignore kernel threads. It may,M * however, W5sometimes be useful to have a mode that works with kernel threadsM * and ignores user threads. You should rarely attempt to deal with both userO * and kernel threads simultaneously. For example, don't try to hold all other J * kernel threads while single stepping a user thread -- instead, hold all * other user threads. *J * Beware that procfs may sometimes show a large number of kernel threads.G * Generally, a DECthreads process will have one kernel thread for eachI * physical processor X5available to the process, plus one for the internalL * "manager thread". Threads created in "system contention scope" (SCS) willJ * each have a private kernel thread. There may also be a number of kernelN * threads that were previously used, and later destroyed. These are cached byC * the kernel against future need. The kernel cache will be trimmedN * approximately every 20 seconds by a routine that runs in the context of theM * DECthreads "manager thread". (Note: the manager thread is used bo Y5th by theI * DECthreads library, in user mode context, and by the kernel, in kernel * context.) *; * *** Identification of user thread ID from kernel thread: *M * When a debugger takes a trap, it must usually determine the current threadH * ID. When using the proc filesystem, the debugger can acquire a structL * prstatus structure for the current kernel thread, read the pr_teb member,J * fetch from that address in the target process a block of memory of sizeG * "sizeof(struct pthreadTZ5eb_t)", and read the sequence member from theG * resulting structure. However, there are special cases during processL * initialization when this method will not work, because the TEB pointer isG * only set when execution reaches the libc initialization (and is thenN * changed to a "true TEB" when DECthreads is initialized). (Note that in thisI * case, the correct thread ID is always "1".) Instead, you might want toM * consider using pthreadDebugKidToId, which converts a kernel thread ID to [5aM * user thread ID, and let the assistant do all the "grunt work" (even thoughN * most of the work is done via the KTHDINFO and GETMEM callbacks). (You couldK * also supply the SPECKTHD callback and use pthreadDebugGetSpecialThread.) * * *** The SPECKTHD callback: *H * For the most part, SPECKTHD is required only if the debugger plans toL * utilize the pthreadDebugGetSpecialThread function. However, the assistantN * will also use SPECKTHD (if available) to enhance the output of the "t \5hread"N * command (pthreadDebugCmd parser). Specifically, it will display ">" for theI * current thread and "*" for the trap thread in the "thread -1" columnarH * output format. It may be used in additional places (if available) forL * various reasons, but we do not currently expect to require implementation * of the SPECKTHD callback. *) * *** Interactions with proc filesystem: *N * When you PRRUN, or PRSTEP, a process, after changing the HOLD state of userK * mode threads, (especially ]5 after HOLDing them), you should always use theJ * additional flag PRRESCHED. This causes the kernel to generate a specialM * upcall for each kernel thread allowing the DECthreads scheduler to preemptK * the HELD user thread before it can continue executing user instructions.N * Without PRRESCHED, some HELD threads may continue to run. Also, beware thatI * HOLDing user threads does not work reliably prior to Digital UNIX 4.0D( * patch kit 3 (released January, 1999). *- * *** Something app ^5roximating release notes: * * *** V0 interface *H * The V0 interface was the originally released Debug Assistant, part ofI * DECthreads version 3.13, and shipped with Digital UNIX 4.0 and OpenVMSI * 7.0. There was no public header for this interface, though the private< * header was usually known (and distributed) as . *I * The V0 PTHREAD_DEBUG_VERSION value was 0x0313c001, rather than 0. ThisB * scheme was scrapped for V1, setting PTHREAD_DEBUG_VERSION to 1. *G * Man_5y V0 interfaces had substantially different names than the V1 and * later. * * *** V1 interface *G * Released with DECthreads version 3.14, on Digital UNIX 4.0D, OpenVMSF * 7.2. The header is shipped with the O/S kit. (But0 * read the warnings carefully before using it!) *H * Many function names were changed for greater consistency, putting allD * the "object" designations towards the front. All of the old entry* * points remain for binary compatibility. *E * `5 New callbacks were added: KTHDINFO and SPECKTHD. (Actually, V0 hadE * defined the KTHDINFO, but hadn't defined the information structure * associated with it.) *C * Most of the informational structures were changed substantially,; * and register info was changed from arrays to structures. *F * When V0 clients attach to the debug assistant, all input and output6 * structures are translated to/from V1 internal form. *H * Porting from V0 to V1 may be a substantial amount of effort, bu a5t will$ * gain significant new information. *> * *** Digital UNIX 4.0D, patch kit 3 (DECthreads 3.14-131) *I * Substantial changes to repair HOLD and UNHOLD, particularly of threadsH * that may be concurrently executing on another processor. (Though someF * race conditions were observed even on a uniprocessor.) As a result,G * the behavior of, in particular, the pthreadDebugThdHold function wasI * substantially changed in many cases. The ESRCH error was introduced toG * indicate a TE b5RMINATED thread, which cannot be held. (The ESRCH errorC * was arguably a bad idea, since it could retroactively change theF * behavior of existing V0 and V1 clients. A later release will remedyF * this by silently ignoring the TERMINATED thread and returning 0 for * V0 and V1 clients.) *8 * *** Digital UNIX 4.0D, patch kit 3, and OpenVMS 7.2 *D * The SUSPEND and RESUME callbacks, and the WRITE callback, are nowA * optional, regardless of client interface version. These may beF * omi c5tted, for example, when the source of data is a core file, whereC * those functions have no meaning. (OpenVMS SDA always omits them,F * because it supports only an asynchronous read-only connection.) ButH * beware that some results are unreliable if SUSPEND and RESUME are notG * made available for a "live" process, since many operations cannot beD * completed "atomically". If you supply SUSPEND or RESUME, you must * supply both. *H * You need not supply MALLOC or FREE callbacks; malloc an d5d free will be= * used directly. If you supply either, you must supply both. * * *** V2 interface *D * Part of DECthreads version 3.15. Released with Digital UNIX 4.0D,; * patch kit 4, Compaq Tru64 UNIX 4.0F, and Tru64 UNIX 5.0. *F * When you connect to a session with pthreadDebugContextInit, you may@ * set some flags in the high end of the "version" member in theD * pthreadDebugCallbacks_t structure. These flags are defined in theE * pthreadDebugInitFlag_t enum, and are documented e5 at the top of this * header file. *F * New fields were added to the TSD (key address), RWL (writer ID, andF * reader count), and THREAD (creator interface) structures. Also, theD * THREAD info structure was substantially rearranged to give betterF * and less ambiguous information about a thread's blocking state. AllC * blocking state is now segregated into a "block" union containingE * appropriate information for each type of blocking state. Note thatB * the blocking information is nowf5 filled in for READY and RUNNINGH * threads as well as BLOCK threads. When a thread is readied, its priorF * blocking state remains until it begins to run, and that informationD * can sometimes be useful in debugging. (E.g., the ready thread wasD * previously blocked on condition variable 3.) In some cases when aD * thread is interrupted (e.g., by a ^C under ladebug), the blockingG * state also remains intact while the thread processes the signal; youG * can now see that the current thread wasg5 previously blocked, and why.G * Also, the kernel blocking state for UNIX, in addition to the habitatE * and syscall numbers (which are hard to translate without access toE * the OS source code), is now represented as strings. (Note that theA * habitat string will be empty if the habitat is 0, the "normal"F * habitat; others are named.) The syscall names don't always directlyE * correspond to the user-visible libc stub names, but most are closeC * enough to determine what's going on. Also h5 note that the "processD * shared" synchronization object blocking functions are reported asG * kernel blocking states, but do not have habitat and syscall numbers. *G * Sequence traversal routines were added for TSD keys. (These routinesG * can be used by version 0 and version 1 clients, but the entry pointsE * didn't exist on earlier versions of the Debug Assistant and aren't4 * declared in earlier versions of the header file.) *E * There are some rudimentary and preliminary routines i5 to process andE * format a DECthreads trace stream. Some are currently nonfunctionalA * (and will fail with ENOSYS). The others are not intended to be@ * self-evident, and are not well documented. (Even by the loose" * standards of this header file.) *E * There is a new event, TOOLREPORT, which will be used by the VisualI * Threads tool to invoke a debugger breakpoint if a debugger is attachedI * that cares. The first argument is a string to be printed for the user.F * The second is a j5 command string. The syntax of the command string isI * "undefined", but probably would be based on the ladebug command syntaxI * and likely ignored by any other debugger. (Note that this event can beI * used by version 0 or version 1 clients, but the event will be acceptedF * only when running with a version 2 Debug Assistant. Some unreleasedD * version 1 Debug Assistants, such as the one in "Digital UNIX X5.0% * EFT1", also recognize this event.) *C * Correct 4.0D-3's regression in addi k5ng ESRCH errors for version 0I * clients that attempt to HOLD/UNHOLD terminated threads. Version 0 (andG * 1) clients will receive the status 0. Version 2 clients will receive * EINVAL. *A * Version 0 and version 1 interfaces silently ignore HOLD/UNHOLDC * requests for internal DECthreads threads. (Those with "negative"B * sequence numbers.) Version 2 clients will receive EPERM errors. * * *** V3 interface *B * Part of DECthreads version 3.16. Released with Tru64 UNIX 5.0A,F * l5 and 4.0G (?). The code is also available with the "bl15" patch kits * for 4.0D, 4.0E, and 4.0F. *E * The use of time structures has been changed for consistency and toA * reduce ambiguity across various time_t models. (Tru64 UNIX nowF * supports both a 32-bit time_t and a 64-bit time_t.) The new type is * pthreadDebugTimespec_t. *F * The pthreadDebugMutInfo_t structure contains a new "depth" field toF * record the "recursion depth" of a recursive lock. The existing flagE * PTHREAD_DEB m5UG_MUT_PSHARED is now set when appropriate, though fullA * support for pshared synchronization objects will be in a laterC * version. A new flag, PTHREAD_DEBUG_MUT_TRACED, tells whether theD * mutex is marked for tracing. The flags will be set for clients of * old versions, as well. *G * A new flag, PTHREAD_DEBUG_THD_DETACH, records that the target threadB * of a pthreadDebugThdGetInfo call is detached. The layout of theF * structure has not changed, and the new flag will be set for clin5ents" * connected using older versions. *A * The _PSHARED flags are also set now for condition variable andH * read-write lock info. Again, full support for pshared synchronizationF * requires additional client and operating system support and will be * in a future version. * * *** V4 interface *' * Part of DECthreads version 3.18-108. *I * Adds new pthreadDebugThreadInfo_t fields to show the thread's currentE * VP association. This can be used to determine where the thread o5 isG * currently running. New flags specify whether the thread is BOUND or * ATTACHED to the VP's RAD. *6 * *** DECthreads V3.19 (extension to V4 interface) *E * Added pthreadDebugThdHoldOthers and pthreadDebugThdUnholdOthers toI * make life (or at least using threads) just a bit simpler for debuggersH * by simplifying a few steps of "the breakpoint dance". With these, allG * threads but the breakpoint (target) thread can be held (to allow theD * target to be stepped over a brep5akpoint) and later resumed withoutC * needing to traverse the list of all threads itself. Currently, I? * expect relatively little (if any) performance advantage overF * traversing the thread sequence and holding/unholding each, but thisD * new interface allows future performance optimizations between the& * thread library and debug assistant. *//* * MACROS *//*K * The following error numbers (as defined by ) may be returned asH * the value of any debug assistant in q5terface to indicate status. ClientI * callback routines are also expected to report the outcome by returningL * error numbers. The following are the error numbers used by the assistant,G * and their usual meaning. Callbacks should follow these guidelines if * possible. *% * ESUCCESS (0) Successful completion. * ENOENT End of traversal sequence (no more); * ENOTSUP Function not supported (usually callback error)A * EINVAL Invalid parameter (sometimes, "thread in wrong state")( * ESR r5CH ID does not represent a thread * ENOMEM Insufficient memory7 * EPERM Unable to perform operation (priv, ownership)> * EAGAIN Operation cannot be performed right now (try again) * ENOSYS Not supported7 * EBUSY Operation cannot be performed: object is busy; * ECHILD Broken association between parts of sync. object$ * EFAULT Internal addressing error+ * EVERSION Incompatible trace file version$ * ESHUTDOWN pthreadDebugCmd("exit") *L * Note that, in most cases, errors returned s5 by a callback routine cause theL * debug assistant to immediately abort the current operation and return theN * callback's error status to the client. There are some cases where the debugM * assistant may be able to continue operation, or attempt an alternative. WeC * recognize that simply passing through the callback status is notL * necessarily useful or informative to the client, and may cause confusion.C * This situation, though, is unlikely to change at this late date. *//*F * T t5hese flags can be logically OR-ed into PTHREAD_DEBUG_VERSION (whenN * connecting with the v1 interface or higher) to affect how the connection is * made. * * PTHREAD_DEBUG_FLAG_PASSIVE: *E * Normally, when a debugger connects, pthreadDebugContextInit writesG * into the debuggee process to register the connection. (Tracing toolsB * can ask about the connection.) Only one debugger (we think) canF * usefully attach to a given process: for example, they would need to> * coordinate interpre u5tation of the event breakpoints, and any& * modifications to the process state. *H * PTHREAD_DEBUG_FLAG_PASSIVE allows a tool (e.g., VT) to attach without * registering the connection. * * PTHREAD_DEBUG_FLAG_NOUPDATE: *C * Normally, when certain queries are made, the debug assistant mayD * update information in the target process. For example, one of theG * thread information fields is a stack highwater mark; this data, partC * of the thread control block, is updated by the assistan v5t so thatD * repeated queries will return more useful information. Setting theH * PTHREAD_DEBUG_FLAG_NOUPDATE on connection will prevent these updates. *H * Note that setting both PASSIVE and NOUPDATE is not the same as makingE * a connection "read-only" by omitting the WRITE callback. The flagsE * just prevent the debug assistant from writing data on its own; theD * client is still allowed to make calls that request modifications. *B * Note also that the debug assistant will continue to w5 rely on theH * SUSPEND and RESUME callbacks, which allow "atomic" access to data inD * the threaded process. The "passivity" of such a connection can beH * debated, but, if the client desires truly a truly passive connection,G * and is prepared to deal with the data inconsistencies, it's possibleC * to omit the SUSPEND and RESUME callbacks. (As OpenVMS SDA does.) * * PTHREAD_DEBUG_FLAG_UPCALLS: *E * Digital UNIX two-level scheduling involves a special communicationC * path from the kx5ernel out into the user-mode scheduler, called anI * upcall. Although similar in some ways to signal delivery, an upcall isD * something different. While the standard exc_remote_virtual_unwindH * routine in libc can be used to "walk" a stack containing upcalls, anyI * debugger that doesn't use this routine, or have similar private logic,G * will be unable to find the user program state "underneath" an upcallA * frame. Because most existing debuggers do not use the standard@ * routine, nor y5have similar logic, programmers may be unable toF * determine what a thread is actually doing (the stack traceback will * appear to end at the upcall). *I * In order to avoid this confusion, the debug assistant, by default (andH * unconditionally for debuggers using the original "v0" interface) willF * "hide" upcall frames when returning (or setting) registers. BecauseD * the debugger won't see the upcall frames, the programmer won't beF * confused. There are complications involved, however z5, and a debugger= * that can support upcall frames may wish to avoid the extraI * indirection. (Also, thread library developers are extremely limited byD * upcall hiding, because the debugger cannot "see" a large chunk of * thread library code.) *I * An "upcall-saavy" debugger that won't be confused by upcall frames mayF * set PTHREAD_DEBUG_FLAG_UPCALLS to prevent the assistant from hiding * upcalls. */'typedef enum pthreadDebugInitFlag_tag {G PTHREAD_DEBUG_FLAG_PASSIVE = 0x010{500000, /* Limited modification */= PTHREAD_DEBUG_FLAG_NOUPDATE = 0x02000000, /* Read-only */H PTHREAD_DEBUG_FLAG_UPCALLS = 0x04000000 /* Debugger Knows Upcalls */ } pthreadDebugInitFlag_t;/* * TYPEDEFS *//*M * On OpenVMS Alpha, we specify long pointer sizes for all pointers. To makeK * things simple, we just compile the entire header inside an explicit longM * pointer region. Since this is a private (or at least semi-private) header,K * it's reasonable to require |5that it be compiled using a recent version of * DEC C. */#ifdef _PTHREAD_DEBUG_ENV_VMS# ifndef __INITIAL_POINTER_SIZE# ifdef __cplusplus^# error " requires pointer size support and cannot be used under DEC C++"# else^# error " requires DEC C version 5.0 or later, with pointer size support" # endif# endif'# pragma __required_pointer_size __save'# pragma __required_pointer_size __long#endif/*E * Some "semi architecturall}5y neutral" base types that need different) * definitions on Tru64 UNIX and OpenVMS. *O * This is based on the equivalent types in , but has been slightly O * simplified because we're not supporting VAX or use by old compilers without  * 64-bit pointer support. */#ifdef _PTHREAD_DEBUG_ENV_VMS%typedef __int64 pthreadDebugLong_t;-typedef unsigned __int64 pthreadDebugUlong_t;#else"typedef long pthreadDebugLong_t;+typedef unsigned long pthreadDebugUlong_t;#endif ~5#typedef void *pthreadDebugAddr_t;1typedef const void *pthreadDebugLongConstAddr_t;/typedef const char *pthreadDebugConstString_t;1typedef void (*pthreadDebugDestructor_t) (void*);Ftypedef void *(*pthreadDebugConstructor_t) (pthread_key_t, pthread_t);-typedef void (*pthreadDebugExtDestructor_t) (" void*, pthread_t, pthread_key_t);/*I * User thread IDs, mutex IDs and condition variable IDs are all sequenceM * numbers assigned by the DECthreads library. Each object can be accessed5 byM * this number. The IDs for each object are maintained on a per-object basis.F * So no two objects of the same type will share an ID, but objects of * different types may. */typedef long pthreadDebugId_t;/*H * We have this type here to distinguish between IDs which describe user1 * threads and IDs which describe kernel threads. */ typedef void *pthreadDebugKId_t;/*N * This type designates an untyped pointer (void*) that will be interpreted asM * an address in the multi5threaded process ("target") that is being debugged,? * not within the debugger (and debug assistant) address space. *M * Note, these are always 64 bit pointers on OpenVMS Alpha, and the latter is( * a 64-bit pointer to a 64-bit pointer. */Ctypedef void *pthreadDebugTargetAddr_t, **pthreadDebugTargetAddr_p;2typedef const void *pthreadDebugTargetConstAddr_t;/*6 * Type defining floating point and general registers. */&#if defined (_PTHREAD_DEBUG_ENV_ALPHA)&typedef struct pthreadD 5ebugRegs_tag {9 pthreadDebugUlong_t r0; /* return value (v0) */; pthreadDebugUlong_t r1; /* callee saved 0 (t0) */; pthreadDebugUlong_t r2; /* callee saved 1 (t1) */; pthreadDebugUlong_t r3; /* callee saved 2 (t2) */; pthreadDebugUlong_t r4; /* callee saved 3 (t3) */; pthreadDebugUlong_t r5; /* callee saved 4 (t4) */; pthreadDebugUlong_t r6; /* callee saved 5 (t5) */; pthreadDebugUlong_t r7; /* callee saved 6 (t6) * 5/; pthreadDebugUlong_t r8; /* callee saved 7 (t7) */; pthreadDebugUlong_t r9; /* caller saved 0 (s0) */; pthreadDebugUlong_t r10; /* caller saved 1 (s1) */; pthreadDebugUlong_t r11; /* caller saved 2 (s2) */; pthreadDebugUlong_t r12; /* caller saved 3 (s3) */; pthreadDebugUlong_t r13; /* caller saved 4 (s4) */; pthreadDebugUlong_t r14; /* caller saved 5 (s5) */; pthreadDebugUlong_t r15; /* caller saved 6 (fp) */@ pt5hreadDebugUlong_t r16; /* argument register 0 (a0) */@ pthreadDebugUlong_t r17; /* argument register 1 (a1) */@ pthreadDebugUlong_t r18; /* argument register 2 (a2) */@ pthreadDebugUlong_t r19; /* argument register 3 (a3) */@ pthreadDebugUlong_t r20; /* argument register 4 (a4) */@ pthreadDebugUlong_t r21; /* argument register 5 (a5) */; pthreadDebugUlong_t r22; /* callee saved 8 (t8) */; pthreadDebugUlong_t r23; /* callee saved 9 (t 59) */= pthreadDebugUlong_t r24; /* callee saved 10 (t10) */= pthreadDebugUlong_t r25; /* callee saved 11 (t11) */; pthreadDebugUlong_t r26; /* return address (ra) */= pthreadDebugUlong_t r27; /* callee saved 12 (t12) */; pthreadDebugUlong_t r28; /* assembler temp (at) */; pthreadDebugUlong_t r29; /* global pointer (gp) */: pthreadDebugUlong_t r30; /* stack pointer (sp) */4 pthreadDebugUlong_t pc; /* user-mode PC */8 pt 5hreadDebugUlong_t ps; /* processor status */. } pthreadDebugRegs_t, *pthreadDebugRegs_p;Ltypedef pthreadDebugUlong_t pthreadDebugRegsArray_t[33]; /* Array version */'typedef struct pthreadDebugFregs_tag {7 pthreadDebugUlong_t f0; /* f0 return value */A pthreadDebugUlong_t f1; /* f1 return value (complex) */6 pthreadDebugUlong_t f2; /* callee saved 1 */6 pthreadDebugUlong_t f3; /* callee saved 2 */6 pthreadDebugUlong_t f4; /* callee 5saved 3 */6 pthreadDebugUlong_t f5; /* callee saved 4 */6 pthreadDebugUlong_t f6; /* callee saved 5 */6 pthreadDebugUlong_t f7; /* callee saved 6 */6 pthreadDebugUlong_t f8; /* callee saved 7 */6 pthreadDebugUlong_t f9; /* caller saved 8 */6 pthreadDebugUlong_t f10; /* caller saved 0 */6 pthreadDebugUlong_t f11; /* caller saved 1 */6 pthreadDebugUlong_t f12; /* caller saved 2 */6 pthreadDebugUlong_t f13; /* caller sa 5ved 3 */6 pthreadDebugUlong_t f14; /* caller saved 4 */6 pthreadDebugUlong_t f15; /* caller saved 5 */; pthreadDebugUlong_t f16; /* argument register 0 */; pthreadDebugUlong_t f17; /* argument register 1 */; pthreadDebugUlong_t f18; /* argument register 2 */; pthreadDebugUlong_t f19; /* argument register 3 */; pthreadDebugUlong_t f20; /* argument register 4 */; pthreadDebugUlong_t f21; /* argument register 5 */6 pthreadD 5ebugUlong_t f22; /* caller saved 6 */6 pthreadDebugUlong_t f23; /* caller saved 7 */6 pthreadDebugUlong_t f24; /* caller saved 8 */6 pthreadDebugUlong_t f25; /* caller saved 9 */7 pthreadDebugUlong_t f26; /* caller saved 10 */7 pthreadDebugUlong_t f27; /* caller saved 11 */7 pthreadDebugUlong_t f28; /* caller saved 12 */7 pthreadDebugUlong_t f29; /* caller saved 13 */7 pthreadDebugUlong_t f30; /* caller saved 14 */; 5pthreadDebugUlong_t fpcr; /* FP status register */D pthreadDebugUlong_t fp_control; /* IEEE fp control state */0 } pthreadDebugFregs_t, *pthreadDebugFregs_p;Mtypedef pthreadDebugUlong_t pthreadDebugFregsArray_t[33]; /* Array version */'#elif defined (_PTHREAD_DEBUG_ENV_IA64)&typedef struct pthreadDebugRegs_tag {= pthreadDebugUlong_t rsc; /* Register stack config reg */? pthreadDebugUlong_t pfs; /* Previous function state reg */3 pthreadDebugUlong_t cunat; 5/* Caller's unat */= pthreadDebugUlong_t bspstore; /* Backing store pointer */; pthreadDebugUlong_t rnat; /* RSE Nat collection reg *// pthreadDebugUlong_t lc; /* loop counter */< pthreadDebugUlong_t pr; /* single-bit predicate regs */5 pthreadDebugUlong_t rp; /* b0: return address */- pthreadDebugUlong_t b1; /* Branch reg */- pthreadDebugUlong_t b2; /* Branch reg */- pthreadDebugUlong_t b3; /* Branch reg */- pthreadDebugUlong_t b4; /* Branch reg */ 5- pthreadDebugUlong_t b5; /* Branch reg */1 pthreadDebugUlong_t gp; /* global pointer */2 pthreadDebugUlong_t r4; /* caller saved r4 */2 pthreadDebugUlong_t r5; /* caller saved r5 */2 pthreadDebugUlong_t r6; /* caller saved r6 */2 pthreadDebugUlong_t r7; /* caller saved r7 */C pthreadDebugUlong_t unat; /* NaT collection bit after context-) * switch spill of preserved regs */6 pthreadDebugUlong_t user_mask; /* PSR user mask */0 pthreadDebugUlong_t sp 5; /* Stack pointer */6 pthreadDebugUlong_t ip; /* Instruction pointer */. } pthreadDebugRegs_t, *pthreadDebugRegs_p;'typedef struct pthreadDebugFregs_tag {2 long double f2; /* caller saved f2 */2 long double f3; /* caller saved f3 */2 long double f4; /* caller saved f4 */2 long double f5; /* caller saved f5 */4 long double f16; /* caller saved f16 */4 long double f17; /* caller saved f17 */4 long double 5 f18; /* caller saved f18 */4 long double f19; /* caller saved f19 */4 long double f20; /* caller saved f20 */4 long double f21; /* caller saved f21 */4 long double f22; /* caller saved f22 */4 long double f23; /* caller saved f23 */4 long double f24; /* caller saved f24 */4 long double f25; /* caller saved f25 */4 long double f26; /* caller saved f26 */4 long double f27; /* calle 5r saved f27 */4 long double f28; /* caller saved f28 */4 long double f29; /* caller saved f29 */4 long double f30; /* caller saved f30 */4 long double f31; /* caller saved f31 */> pthreadDebugUlong_t fpsr; /* Floating point status reg */J pthreadDebugUlong_t fp_control; /* fpcr: floating point control reg */0 } pthreadDebugFregs_t, *pthreadDebugFregs_p;#endif/*E * Debug assistant context type. This opaque value is returned by the5% * pthreadDebugContextInit() routine. */$typedef void* pthreadDebugContext_t;%typedef void** pthreadDebugContext_p;/*G * Debug assistant time type. This structure is actually the same sizeC * as a struct timespec but it has 64 bits for the seconds when theK * timespec structure has only 32 under Tru64 Unix Alpha. For OpenVMS, both( * fields remain as two 32 bit entities. */)typedef struct pthreadDebugTimespec_tag { long tv_sec; unsigned long tv_nsec;6 } pthrea5dDebugTimespec_t, *pthreadDebugTimespec_p;/*M * "Caller context" argument. A value of this type is specified when creatingI * a new debug context with pthreadDebugContextInit, and is passed by the- * assistant to each client callback routine. */#typedef void* pthreadDebugClient_t;/*; * Type defining "special thread" codes (SPECKTHD callback) *> * CURRENT The thread being observed. (Debuggers usually have8 * commands to switch between threads, for example, to5 * see the s5tack and registers of various threads.)9 * TRAP The thread that caused the most recent debugging. * event -- breakpoint, hardware fault, etc. */*typedef enum pthreadDebugSpecialType_tag {G PTHREAD_DEBUG_SPECIAL_TYPE_CURRENT = 1, /* Thread being observed */A PTHREAD_DEBUG_SPECIAL_TYPE_TRAP = 2 /* Thread that trapped */ } pthreadDebugSpecialType_t;/* * Type defining thread state. *= * UNKNOWN The state can't be determined. (This should never * happen.)< * RUNNI 5NG Thread is currently executing on some processor.= * READY Thread is not currently running, but is eligible to, * run when a processor becomes available.A * BLOCKED Thread is waiting for some event (beyond its control)6 * to occur before it can run. The SUBSTATE provides% * details about why it is waiting.; * NEW A transitional state -- a newly created thread that * hasn't yet been made READY.? * SORTING Another transitional -- the thread has been removed1 * from a read 5y queue briefly for some internal: * bookkeeping operation, and will shortly be made READY * again.> * TERMINATED The thread is no longer running, but has not yet * been DETACHED.A * ZOMBIE A transitional state -- the thread has terminated, and6 * been detached, but all resources haven't yet been * disposed. */$typedef enum pthreadDebugState_tag {? PTHREAD_DEBUG_STATE_UNKNOWN = 0, /* Unknown (bad) state */D PTHREAD_DEBUG_STATE_RUNNING = 1, /* Running on kernel t 5hread */6 PTHREAD_DEBUG_STATE_READY = 2, /* Ready to run */B PTHREAD_DEBUG_STATE_BLOCKED = 3, /* Blocked on some object */@ PTHREAD_DEBUG_STATE_NEW = 4, /* Just created not readied */C PTHREAD_DEBUG_STATE_SORTING = 5, /* Sort scheduler database */A PTHREAD_DEBUG_STATE_TERMINATED = 6, /* Not eligible to run */A PTHREAD_DEBUG_STATE_ZOMBIE = 7 /* Waiting to be reclaimed */ } pthreadDebugState_t;/*H * Type defining thread substate. For example, if the state is bl 5ocked,F * substate gives additional information about current state or recent * transition. */'typedef enum pthreadDebugSubstate_tag {D PTHREAD_DEBUG_SUBSTATE_UNKNOWN = 0, /* Unknown (bad) substate */F PTHREAD_DEBUG_SUBSTATE_NORMAL = 1, /* No additional information */I PTHREAD_DEBUG_SUBSTATE_UNBLOCK_PEND = 2, /* Kernel unblock pending */B PTHREAD_DEBUG_SUBSTATE_KERNEL = 3, /* Blocked in the kernel */> PTHREAD_DEBUG_SUBSTATE_MUTEX = 4, /* Blocked on a mutex */9 PTHREAD_5DEBUG_SUBSTATE_CV = 5, /* Blocked on a cv */D PTHREAD_DEBUG_SUBSTATE_TIMED_CV = 6, /* Blocked on a timed cv */K PTHREAD_DEBUG_SUBSTATE_TERM_CANCEL = 7, /* Terminating from a cancel */D PTHREAD_DEBUG_SUBSTATE_TERM_EXIT = 8, /* Terminating normally */? PTHREAD_DEBUG_SUBSTATE_DELAY = 9, /* Blocked for a delay */? PTHREAD_DEBUG_SUBSTATE_JOIN = 10, /* Blocked for a join */@ PTHREAD_DEBUG_SUBSTATE_START = 11, /* Thread just started */C PTHREAD_DEBUG_SUBSTATE_SYNCSUSP = 12, 5/* Waiting for suspend */J PTHREAD_DEBUG_SUBSTATE_READLOCK = 13, /* Thread is wating on rdlock */J PTHREAD_DEBUG_SUBSTATE_WRITELOCK = 14 /* Thread is wating on wrlock */ } pthreadDebugSubstate_t;/*I * Type defining thread "kinds". All threads created by a program throughK * DECthreads interfaces are of kind NORMAL. A debugger should usually showK * threads of other kinds only when a special switch or mode is used (e.g., * pthread_debug's "thread -a".) */)typedef enum pth 5readDebugThreadKind_tag {< PTHREAD_DEBUG_THD_KIND_INITIAL = 1, /* Initial thread */: PTHREAD_DEBUG_THD_KIND_NORMAL = 2, /* Normal thread */B PTHREAD_DEBUG_THD_KIND_NULL = 3, /* DECthreads null thread */D PTHREAD_DEBUG_THD_KIND_MGR = 4, /* DECthreads manager thread */H PTHREAD_DEBUG_THD_KIND_FOREIGN = 5, /* A non-DECthreads NT thread */E PTHREAD_DEBUG_THD_KIND_EXITHAND = 6 /* The exit handler thread */ } pthreadDebugThreadKind_t;/*O * Type defining the possible th5read creators. You can use this information to M * determine whether the thread was created using the POSIX interface, one ofH * the (retired) DCE thread interfaces, or the (obsolete) CMA interface. */,typedef enum pthreadDebugThreadCreator_tag {( PTHREAD_DEBUG_THD_CREATOR_POSIX = 1,& PTHREAD_DEBUG_THD_CREATOR_CMA = 2,& PTHREAD_DEBUG_THD_CREATOR_DCE = 3,) PTHREAD_DEBUG_THD_CREATOR_DCEEXC = 4,% PTHREAD_DEBUG_THD_CREATOR_TIS = 5" } pthreadDebugThreadCreator_t;/*B * 5 Definitions for user mode and kernel mode blocking information. */)typedef enum pthreadDebugThdBlkType_tag {9 PTHREAD_DEBUG_THDBLK_BADVALUE = 0, /* Unknown, N/A */; PTHREAD_DEBUG_THDBLK_NONE = 1, /* No blocking state */7 PTHREAD_DEBUG_THDBLK_MUTEX = 2, /* Mutex blocks */C PTHREAD_DEBUG_THDBLK_COND = 3, /* Condition variable blocks */; PTHREAD_DEBUG_THDBLK_DELAY = 4, /* pthread_delay_np */C PTHREAD_DEBUG_THDBLK_RWL = 5, /* Readers/Writer lock blocks */4 PTHR 5EAD_DEBUG_THDBLK_JOIN = 6, /* Join waits */: PTHREAD_DEBUG_THDBLK_SUSPSYNC = 7, /* Suspend waits */7 PTHREAD_DEBUG_THDBLK_KERNEL = 8 /* Kernel block */ } pthreadDebugThdBlkType_t;#ifdef _PTHREAD_DEBUG_ENV_UNIX?# define PTHREAD_DEBUG_KRNBFLG_FAULT 0x00000001 /* Pagefault */?# define PTHREAD_DEBUG_KRNBFLG_SYSCALL 0x00000002 /* Syscall */*typedef struct pthreadDebugThdKrnBlk_tag {= pthreadDebugThdBlkType_t type; /* Union descriminator */' long flags; /* Blocking f 5lags */. long habitat; /* Habitat (if SYSCALL) */. long syscall; /* Syscall (if SYSCALL) */? pthreadDebugTargetAddr_t va; /* Pagefault VA (if FAULT) */8 char habitat_nm[8]; /* Habitat name (not hab 0) */: char syscall_nm[24]; /* Syscall name (if SYSCALL) */8 } pthreadDebugThdKrnBlk_t, *pthreadDebugThdKrnBlk_p;&#elif defined (_PTHREAD_DEBUG_ENV_VMS)A# define PTHREAD_DEBUG_KRNBFLG_WFLAND 0x00000001 /* SYS$WFLAND */E# define PTHREAD_DEBUG_KRNBFLG_COLLIDED 0x00000002 5 /* PFW collided */)typedef enum pthreadDebugKrnBlkType_tag {9 PTHREAD_DEBUG_KRNBLKTYPE_UNKNOWN = 0, /* Undefined */? PTHREAD_DEBUG_KRNBLKTYPE_NONE = 1, /* No blocking state */3 PTHREAD_DEBUG_KRNBLKTYPE_SYNC = 2, /* $SYNC */< PTHREAD_DEBUG_KRNBLKTYPE_WFL = 3, /* Event flag wait */5 PTHREAD_DEBUG_KRNBLKTYPE_HIBER = 4, /* $HIBER */A PTHREAD_DEBUG_KRNBLKTYPE_IMS = 5, /* Inner-mode semaphore */: PTHREAD_DEBUG_KRNBLKTYPE_PFW = 6 /* Pagefault wait */ } pthrea5dDebugKrnBlkType_t;*typedef struct pthreadDebugThdKrnBlk_tag {= pthreadDebugThdBlkType_t type; /* Union descriminator */ long flags; /* Flags */? pthreadDebugKrnBlkType_t ktype; /* Type of kernel block */ union { struct {2 unsigned short *iosb; /* IOSB (SYNC only) */- int efn; /* Event flag (SYNC only) */ } sync;2 unsigned int mask[2]; /* Wait mask (WFL only) */1 unsigned long seq; /* Sequence # (IMS only) */2 pthreadDebugUlong_t va; /* Add5ress (PFW only) */ } detail;8 } pthreadDebugThdKrnBlk_t, *pthreadDebugThdKrnBlk_p;#else*typedef struct pthreadDebugThdKrnBlk_tag {= pthreadDebugThdBlkType_t type; /* Union descriminator */' long flags; /* Blocking flags */8 } pthreadDebugThdKrnBlk_t, *pthreadDebugThdKrnBlk_p;#endif/*4 * Information about the blocking state of a thread. */*typedef union pthreadDebugThdBlkInfo_tag {< pthreadDebugThdBlkType_t type; /* Union descriminator */ struct {9 pthre5adDebugThdBlkType_t type; /* Union descriminator */$ pthreadDebugId_t mutex; /* Mutex */ } mutex; struct {9 pthreadDebugThdBlkType_t type; /* Union descriminator */0 pthreadDebugId_t cond; /* Condition variable *// pthreadDebugId_t mutex; /* Associated mutex */- pthreadDebugTimespec_t timeout;/* Timeout */ } cond; struct {9 pthreadDebugThdBlkType_t type; /* Union descriminator */- pthreadDebugTimespec_t timeout;/* Timeout */ } delay; struct {9 pthreadDebugThdBlkTyp 5e_t type; /* Union descriminator *// pthreadDebugId_t rwlock; /* read-write lock */ } rwlock; struct {9 pthreadDebugThdBlkType_t type; /* Union descriminator */+ pthreadDebugId_t thread; /* Join thread */ } join; struct {9 pthreadDebugThdBlkType_t type; /* Union descriminator */1 pthreadDebugId_t thread; /* suspending thread */ } suspsync;K pthreadDebugThdKrnBlk_t kernel; /* O/S-specific kernel blocking info */: } pthreadDebugThdBlkInfo_t, *pthreadDebugThdBlkInfo_p; 5/*5 * Type defining information returned about a thread. * * NOTES: *L * 1) The "sequence" field is traditionally reported as a signed number whenJ * the PTHREAD_DEBUG_THD_INTERNAL flag is set, even though the sequence * number is unsigned.I * 2) Even when the state is "RUNNING", the thread may have a substate ofJ * "MUTEX", "CV", "TIMED_CV", etc. In such case, the "condition" and/orM * "mutex" fields (Id of the synchronization object on which the thread isH * wa5iting) MAY or MAY NOT be non-zero. This situation means that the> * thread is "about to wait" or "in the process of waking".N * 3) The "locks" field can count only the non-default mutex types held by theN * thread -- recursive or errorcheck mutexes, pshared mutexes, and priorityJ * inheritance or priority ceiling mutexes. The thread may additionally2 * hold any number of default (NORMAL) mutexes.G * 4) If the stack was created with a user specified stack ("stackaddr"K * attribut5e), the PTHREAD_DEBUG_THD_STACKADDR flag will be set. In thisK * case, all of the thread's stack information fields, except stack_baseM * and stack_hiwater, are guesses, and probably inaccurate. You shouldn't,K * for example, compare stack_hiwater against stack_reserve to check forK * stack overflows. If the stacksize attribute has also been modified inL * the attributes object, DECthreads will guess that the creator intendedG * that as the size of the user stack. Because 5the standard does notG * specify any such relationship, this is still an unreliable guess.L * (There's no specific indication that both stackaddr and stacksize wereL * set. However, if DECthreads must guess, we guess PTHREAD_STACK_MIN. SoM * it's reasonable for you to guess that, if the stacksize of a user stackD * isn't PTHREAD_STACK_MIN, the user also specified a stacksize.) *M * However, if the flag PTHREAD_DEBUG_THD_ESTACKADDR is also set, then theN * "extended st5ackaddr" interface, pthread_setstackaddr_np, was used, whichK * allows the caller to specify the size and base address. In this case,4 * all stack information may be considered valid.G * 5) There may be times during which a thread's signal state cannot beF * determined. The PTHREAD_DEBUG_THD_SIGNAL flag will be set if theK * thread's blocked and pending signal masks are valid. Otherwise, those. * fields will be 0, and should be ignored.I * 6) There may be times when a thread's 5 VP cannot be determined. At suchO * time the "vp" field will have the value 0. No actual VP has the ID value  * 0. */@#define PTHREAD_DEBUG_THD_CANCEL 0x00000001 /* Cancel pending */E#define PTHREAD_DEBUG_THD_CAN_ENABLED 0x00000002 /* Cancel enabled */I#define PTHREAD_DEBUG_THD_CAN_ASYNC 0x00000004 /* Async cancel enabled */K#define PTHREAD_DEBUG_THD_CAN_SYSTEM 0x00000008 /* System cancel enabled */F#define PTHREAD_DEBUG_THD_NAME 0x00000010 /* Name != "" */L#define 5PTHREAD_DEBUG_THD_SYS_SCOPE 0x00000020 /* System contention scope */G#define PTHREAD_DEBUG_THD_INTERNAL 0x00000040 /* DECthreads internal */?#define PTHREAD_DEBUG_THD_HOLD 0x00000080 /* Thread is HELD */F#define PTHREAD_DEBUG_THD_SUSPEND 0x00000100 /* Thread is SUSPENDED */E#define PTHREAD_DEBUG_THD_JOINER 0x00000200 /* A thread is joining */?#define PTHREAD_DEBUG_THD_STACKADDR 0x00000400 /* User stack */J#define PTHREAD_DEBUG_THD_ESTACKADDR 0x00000800 /* User stack with size */D#define PT 5HREAD_DEBUG_THD_DETACH 0x00001000 /* Thread is detached */E#define PTHREAD_DEBUG_THD_ATTACH_RAD 0x00002000 /* Attached to RAD */@#define PTHREAD_DEBUG_THD_BIND_RAD 0x00004000 /* Bound to RAD */D#define PTHREAD_DEBUG_THD_SIGNAL 0x00008000 /* Valid signal state */+typedef struct pthreadDebugThreadInfo_tag {8 unsigned long flags; /* PTHREAD_DEBUG_THD_ flags */= pthreadDebugState_t state; /* Current scheduler state */E pthreadDebugSubstate_t substate; /* Current scheduler substate * 5/7 pthreadDebugThreadKind_t kind; /* Kind of thread */D pthreadDebugThreadCreator_t creator;/* The creating interface */8 int sched_policy; /* Thread's scheduling policy */7 int base_priority; /* Thread's (base) priority */9 int cur_priority; /* Thread's (current) priority */4 pthreadDebugId_t sequence; /* Sequence number */2 pthread_t teb; /* Pointer to thread's TEB */9 pthread_t *handle; /* "Handle" (where pthread_create" stored the TEB pointer) 5*/D pthreadDebugTargetAddr_t stack_base;/* Base of thread's stack */L pthreadDebugTargetAddr_t stack_reserve;/* First byte of reserved zone */I pthreadDebugTargetAddr_t stack_yellow;/* First byte of yellow zone */G pthreadDebugTargetAddr_t stack_guard;/* First byte of guard zone */I pthreadDebugTargetAddr_t stack_hiwater;/* Stack's "highwater mark" */7 unsigned long stack_size; /* Total size of stack */@ pthreadDebugThdBlkInfo_t block; /* Detailed blocking info */7 5void *(*start)(void*); /* Thread start rtn */> pthreadDebugTargetAddr_t start_arg; /* Thread start arg */D pthreadDebugTargetAddr_t result; /* TERMINATED: Thread result */E pthreadDebugTimespec_t cpu_time; /* Accumulated CPU time (nyi) */B unsigned long sig_block; /* Blocked signal mask (UNIX only) */A unsigned long sig_pend; /* Pending signal mask (UNIX only) */3 pthreadDebugId_t vp; /* ID of VP (PCS only) */8 int locks; /* Number of owned locks (if known) */ 5+ int thd_errno; /* Last known errno */3 int rad; /* ID of current (execution) RAD */1 int home_rad; /* ID of thread's home RAD */' char name[32]; /* Thread's name */: } pthreadDebugThreadInfo_t, *pthreadDebugThreadInfo_p;/*F * Type defining information returned about a kernel thread. The flagsJ * are set by the callback to specify which fields are valid, in case someK * information is unavailable (e.g., from a core file). Note that STATE and * TEB are always 5required. */D#define PTHREAD_DEBUG_KTD_POLICY 0x00000001 /* sched_policy valid */E#define PTHREAD_DEBUG_KTD_BPRIO 0x00000002 /* base_priority valid */D#define PTHREAD_DEBUG_KTD_CPRIO 0x00000004 /* cur_priority valid */F#define PTHREAD_DEBUG_KTD_SUSPCNT 0x00000008 /* suspend_count valid */A#define PTHREAD_DEBUG_KTD_SIGBLK 0x00000010 /* sig_block valid */@#define PTHREAD_DEBUG_KTD_SIGPND 0x00000020 /* sig_pend valid */B#define PTHREAD_DEBUG_KTD_SLEEP 0x00000040 /* sleep_time valid */A 5#define PTHREAD_DEBUG_KTD_WAIT 0x00000080 /* wait_event valid */@#define PTHREAD_DEBUG_KTD_USER 0x00000100 /* user_time valid */C#define PTHREAD_DEBUG_KTD_SYSTEM 0x00000200 /* system_time valid */C#define PTHREAD_DEBUG_KTD_SCHCLS 0x00000400 /* sched_class valid */#ifdef _PTHREAD_DEBUG_ENV_UNIX%typedef enum pthreadDebugKState_tag {? PTHREAD_DEBUG_KSTATE_UNKNOWN = 0, /* Unknown (bad) state */3 PTHREAD_DEBUG_KSTATE_RUNNING = 1, /* Running */3 PTHREAD_DEBUG_KSTATE_STOPPED = 2, 5/* Stopped */< PTHREAD_DEBUG_KSTATE_WAITING = 3, /* Waiting normally */E PTHREAD_DEBUG_KSTATE_UINT_WAITING = 4, /* Uninterruptible wait */9 PTHREAD_DEBUG_KSTATE_HALTED = 5 /* Halted cleanly */ } pthreadDebugKState_t;,typedef struct pthreadDebugKThreadInfo_tag {3 unsigned long flags; /* Miscellaneous flags */> pthreadDebugKState_t state; /* Current scheduler state */2 pthread_t teb; /* Current user thread TEB */6 int sched_policy; /* Thread scheduling pol 5icy */3 int base_priority; /* Thread base priority */5 int cur_priority; /* Thread current priority */1 int suspend_count; /* Mach suspend count */6 sigset_t sig_block; /* Current blocked signals */5 sigset_t sig_pend; /* Current pending signals */; long sleep_time; /* Second thread has been sleeping */< long wait_event; /* Event on which thread is waiting */E pthreadDebugTimespec_t user_time; /* Accumulated user CPU time */I pthreadDebugTimespec_t s 5ystem_time; /* Accumulated system CPU time */5 char sched_class[8]; /* Scheduling class name */- long reserved[10]; /* Expansion space */< } pthreadDebugKThreadInfo_t, *pthreadDebugKThreadInfo_p;#else/*- * FIX-ME: Don't take this too literally yet. */%typedef enum pthreadDebugKState_tag {3 PTHREAD_DEBUG_KSTATE_RUNNING = 1, /* Running */3 PTHREAD_DEBUG_KSTATE_STOPPED = 2, /* Stopped */; PTHREAD_DEBUG_KSTATE_WAITING = 3 /* Waiting normally */ } pthreadDeb 5ugKState_t;,typedef struct pthreadDebugKThreadInfo_tag {3 unsigned long flags; /* Miscellaneous flags */> pthreadDebugKState_t state; /* Current scheduler state */6 int sched_policy; /* Thread scheduling policy */3 int base_priority; /* Thread base priority */5 int cur_priority; /* Thread current priority */< long wait_event; /* Event on which thread is waiting */2 pthread_t teb; /* Current user thread TEB */E pthreadDebugTimespec_t user_time; /* Accum 5ulated user CPU time */I pthreadDebugTimespec_t system_time; /* Accumulated system CPU time */5 char sched_class[8]; /* Scheduling class name */- long reserved[10]; /* Expansion space */' char name[32]; /* Thread's name */< } pthreadDebugKThreadInfo_t, *pthreadDebugKThreadInfo_p;#endif(typedef enum pthreadDebugMutexType_tag {9 PTHREAD_DEBUG_MUT_TYPE_NORMAL = 1, /* Normal mutex */? PTHREAD_DEBUG_MUT_TYPE_RECURSIVE = 2, /* Recursive mutex */A PTHREAD_DEBUG_5MUT_TYPE_ERRORCHECK = 3 /* Error-check mutex */ } pthreadDebugMutexType_t;,typedef enum pthreadDebugMutexProtocol_tag {2 PTHREAD_DEBUG_MUT_PROTO_NONE = 1, /* Normal */? PTHREAD_DEBUG_MUT_PROTO_PROTECT = 2, /* Priority ceiling */B PTHREAD_DEBUG_MUT_PROTO_INHERIT = 3 /* Priority inheritance */" } pthreadDebugMutexProtocol_t;/*4 * Type defining information returned about a mutex. * * NOTES: *L * 1) When a mutex is STATICALLY initialized using PTHREAD_MUTEX_INITIALIZ5ERL * (or equivalent) and has not yet been used to BLOCK a thread, the mutex= * does not have a sequence number. It is not visible in aJ * pthreadDebugMutSeq* traversal, or to pthreadDebugMutGetInfo, and itsH * name cannot be set using pthreadDebugMutSetName. In this case, theN * "sequence" member of the pthreadDebugMutexInfo_t structure will have theK * value 0. The value 0 is never a valid sequence number, so there is noF * ambiguity. You can only examine the state of t 5hese mutexes using! * pthreadDebugMutGetInfoAddr. */G#define PTHREAD_DEBUG_MUT_NAME 0x00000001 /* Name != "" */C#define PTHREAD_DEBUG_MUT_LOCKED 0x00000002 /* Currently locked */E#define PTHREAD_DEBUG_MUT_WAITERS 0x00000004 /* There are waiters */H#define PTHREAD_DEBUG_MUT_METERED 0x00000008 /* Mutex has meter info */H#define PTHREAD_DEBUG_MUT_INTERNAL 0x00000010 /* DECthreads internal */D#define PTHREAD_DEBUG_MUT_PSHARED 0x00000020 /* "Process shared" */B#define 5PTHREAD_DEBUG_MUT_TRACED 0x00000040 /* Mutex is traced */*typedef struct pthreadDebugMutexInfo_tag {4 unsigned long flags; /* Miscellaneous flags */3 pthreadDebugMutexType_t type; /* Mutex type */< pthreadDebugId_t owner; /* Current owner (if known) */5 pthreadDebugId_t sequence; /* Sequence number */2 pthread_mutex_t *address; /* Mutex address */4 unsigned int depth; /* Recursive lock depth */D pthreadDebugMutexProtocol_t protocol; /* Mutex protocol (nyi) */ 54 int prioceiling; /* Priority ceiling (nyi) */1 int priority; /* Current priority (nyi) */% char name[32]; /* Mutex name */8 } pthreadDebugMutexInfo_t, *pthreadDebugMutexInfo_p;/*5 * Type defining information returned about a rwlock. * * NOTES: *N * 1) When a rwlock is STATICALLY initialized using PTHREAD_RWLOCK_INITIALIZERM * (or equivalent) and has not yet been used to BLOCK a thread, the rwlock= * does not have a sequence number. It is not visible i 5n aH * pthreadDebugRwSeq* traversal, or to pthreadDebugRwGetInfo, and itsG * name cannot be set using pthreadDebugRwSetName. In this case, theO * "sequence" member of the pthreadDebugRwlockInfo_t structure will have theK * value 0. The value 0 is never a valid sequence number, so there is noG * ambiguity. You can only examine the state of these rwlockes using * pthreadDebugRwGetInfoAddr. */F#define PTHREAD_DEBUG_RW_NAME 0x00000001 /* Name != "" */F#def 5ine PTHREAD_DEBUG_RW_RDLOCKED 0x00000002 /* Currently rdlocked */F#define PTHREAD_DEBUG_RW_WRLOCKED 0x00000004 /* Currently wrlocked */C#define PTHREAD_DEBUG_RW_RWAITERS 0x00000008 /* Waiting readers */C#define PTHREAD_DEBUG_RW_WWAITERS 0x00000010 /* Waiting writers */G#define PTHREAD_DEBUG_RW_INTERNAL 0x00000020 /* DECthreads internal */C#define PTHREAD_DEBUG_RW_PSHARED 0x00000040 /* "Process shared" */+typedef struct pthreadDebugRwlockInfo_tag {4 unsigned long flags; /* Misc5ellaneous flags */5 pthreadDebugId_t sequence; /* Sequence number */4 pthread_rwlock_t *address; /* Rwlock address */7 pthreadDebugId_t wrid; /* Write owner (if any) */. unsigned long rcount; /* Reader count */& char name[32]; /* Rwlock name */: } pthreadDebugRwlockInfo_t, *pthreadDebugRwlockInfo_p;/*A * Type defining information returned about a condition variable. * * NOTES: *? * 1) When a condition variable is STATICALLY initialized usingK * PTHR5EAD_COND_INITIALIZER (or equivalent) and has not yet been used toE * BLOCK a thread, the condition variable does not have a sequenceJ * number. It is not visible in a pthreadDebugCondSeq* traversal, or to? * pthreadDebugCondGetInfo, and its name cannot be set usingI * pthreadDebugCondSetName. In this case, the "sequence" member of theL * pthreadDebugCondInfo_t structure will have the value 0. The value 0 isK * never a valid sequence number, so there is no ambiguity. You can 5 onlyK * examine the state of these mutexes using pthreadDebugCondGetInfoAddr. */H#define PTHREAD_DEBUG_COND_NAME 0x00000001 /* Name != "" */I#define PTHREAD_DEBUG_COND_PEND 0x00000002 /* Pending wake (sig_int) */F#define PTHREAD_DEBUG_COND_WAITERS 0x00000004 /* There are waiters */F#define PTHREAD_DEBUG_COND_METERED 0x00000008 /* CV has meter info */I#define PTHREAD_DEBUG_COND_INTERNAL 0x00000010 /* DECthreads internal */E#define PTHREAD_DEBUG_COND_PSHARED 0x00000 5020 /* "Process shared" */@#define PTHREAD_DEBUG_COND_TRACED 0x00000040 /* CV is traced */)typedef struct pthreadDebugCondInfo_tag {4 unsigned long flags; /* Miscellaneous flags */5 pthreadDebugId_t sequence; /* Sequence number */5 pthread_cond_t *address; /* Condition address */E pthreadDebugId_t mutex; /* Associated mutex (if waiters) */. long reserved[10]; /* Expansion space */) char name[32]; /* Condition name */6 } pthreadDebugCondInfo_t, *pth 5readDebugCondInfo_p;/*G * Type defining information returned about a thread specific data key. * * NOTES: *J * 1) EXTENDED tsd keys have additional semantics. In particular, they mayH * have a constructor routine (called at thread startup) as well as a8 * destructor routine (called at thread termination).E * 2) EXTENDED tsd key destructor routines are called with additionalL * arguments: as well as the current value of the tsd key in that thread,D * they receive the thr5ead ID (pthread_t) and the tsd key itself.H * 3) EXTENDED tsd keys can be created with the PTHREAD_KEY_ALLTHREAD_NPL * flag. The constructor (if any) will immediately be run for each threadE * that currently exists. Similarly, when the key is destroyed theG * destructor will immediately be run for each thread. Note that theK * constructor and destructor are, in these cases, run in the context ofJ * the thread creating or destroying the key, NOT in the context of theN * vari 5ous threads -- thus the constructor and destructor must be carefully; * constructed (which is why the behavior is an option). *N * NOTE: Currently, EXTENDED tsd keys are reserved for use by the Digital UNIXK * loader, in implementing THREAD LOCAL STORAGE. (cc's __declspec(thread).) */F#define PTHREAD_DEBUG_TSD_NAME 0x00000001 /* Name != "" */G#define PTHREAD_DEBUG_TSD_RESERVED 0x00000002 /* DECthreads reserved */K#define PTHREAD_DEBUG_TSD_ALLTHREAD 0x00000004 /* Const/Dest 5 in all thds */F#define PTHREAD_DEBUG_TSD_EXTENDED 0x00000008 /* Extended (TLS) key */(typedef struct pthreadDebugTsdInfo_tag {3 unsigned long flags; /* Miscellaneous flags */' pthread_key_t key; /* Key value */: pthread_key_t *address; /* Where the key was stored */D pthreadDebugConstructor_t constructor; /* Constructor routine */' union { /* Destructor routine */& pthreadDebugDestructor_t standard;& pthreadDebugExtDestructor_t extended; } destructor;$ ch5ar name[32]; /* key's name */4 } pthreadDebugTsdInfo_t, *pthreadDebugTsdInfo_p; /* * CALLBACK PROTOTYPES *M * Typedefs for "callback routines" that the debug client must provide to the? * debug assistant library. The set of callbacks is provided toE * pthreadDebugContextInit via the pthreadDebugCallbacks_t structure. *//*M * GETMEM: Typedef for routine to read a block of memory from target process. * * Arguments: */ * caller_context The caller's context argumen5t$ * address Address of target memory( * buffer Local address to write memory * size Size of buffer * * Return value: * * 0 succeeded * EINVAL invalid address */(typedef int (*pthreadDebugGetMemRtn_t) ( pthreadDebugClient_t, pthreadDebugTargetAddr_t, pthreadDebugAddr_t, size_t);/*K * SETMEM: Typedef for routine to write a block of memory to target process * * Arguments: */ * caller_context The caller's context argument$ * address Addres5s of target memory' * buffer Local address to read memory * size Size of buffer * * Return value: * * 0 success * EINVAL invalid address * ENOSYS Not supported. */(typedef int (*pthreadDebugSetMemRtn_t) ( pthreadDebugClient_t, pthreadDebugTargetAddr_t, pthreadDebugLongConstAddr_t, size_t);/*M * SUSPEND: Typedef for routine to suspend all threads in the target process. *L * Suspension should be "counted" -- that is, when multiple calls to suspe5ndM * are made, the process should not be resumed until an equal number of callsL * to resume have been made. If the underlying suspend/resume mechanism doesK * not have this property, the callback should implement a count and employH * the underlying mechanism only when the first suspend or last matching * resume request is made. * * Arguments: */ * caller_context The caller's context argument * * Return value: * * 0 success * ENOSYS Not supported. */?typedef int (* 5pthreadDebugSuspendRtn_t) (pthreadDebugClient_t);/*K * RESUME: Typedef for routine to resume all threads in the target process. *L * Suspension should be "counted" -- that is, when multiple calls to suspendM * are made, the process should not be resumed until an equal number of callsL * to resume have been made. If the underlying suspend/resume mechanism doesK * not have this property, the callback should implement a count and employH * the underlying mechanism only when the first susp5end or last matching * resume request is made. * * Arguments: */ * caller_context The caller's context argument * * Return value: * * 0 Success * ENOSYS Not supported. */>typedef int (*pthreadDebugResumeRtn_t) (pthreadDebugClient_t);/*M * KTHDINFO: Typedef for routine to get state information on a kernel thread. * * Arguments: */ * caller_context The caller's context argument$ * thread_id Kernel thread (port) ID( * thread_info Kernel thread info struct *5 * Return value: * * 0 Success * ESRCH ID is invalid * ENOSYS Not supported. */*typedef int (*pthreadDebugKthdInfoRtn_t) ( pthreadDebugClient_t, pthreadDebugKId_t, pthreadDebugKThreadInfo_p);/*L * HOLD: Typedef for routine to prevent the kernel thread from running until * further notice. * * Arguments: */ * caller_context The caller's context argument * thread_id Kernel thread ID * * Return value: * * 0 Success * ESRCH ID is invali5d * ENOSYS Not supported. */&typedef int (*pthreadDebugHoldRtn_t) ( pthreadDebugClient_t, pthreadDebugKId_t);/*F * UNHOLD: Typedef for routine to release a kernel thread that is held * * Arguments: */ * caller_context The caller's context argument * thread_id kernel thread ID * * Return value: * * 0 success * ESRCH invalid thread_id * ENOSYS Not supported. */(typedef int (*pthreadDebugUnholdRtn_t) ( pthreadDebugClient_t, pthreadDebugKId_5t);/*G * GETFREG: Typedef for routine to get floating point register contents * * Arguments: */ * caller_context The caller's context argument( * fp_registers register value structure * thread_id kernel thread ID * * Return value: * * 0 success * ESRCH invalid thread_id * ENOSYS Not supported. */)typedef int (*pthreadDebugGetFregRtn_t) ( pthreadDebugClient_t, pthreadDebugFregs_p, pthreadDebugKId_t);/*G * SETFREG: Typedef for routine to set flo5ating point register contents * * Arguments: */ * caller_context The caller's context argument( * fp_registers register value structure * thread_id kernel thread ID * * Return value: * * 0 success * ESRCH invalid thread_id * ENOSYS Not supported. */)typedef int (*pthreadDebugSetFregRtn_t) ( pthreadDebugClient_t, const pthreadDebugFregs_t*, pthreadDebugKId_t);/*? * GETREG: Typedef for routine to get general register contents * * Arguments: *5/ * caller_context The caller's context argument% * registers register value structure * thread_id kernel thread ID * * Return value: * * 0 success * ESRCH invalid thread_id */(typedef int (*pthreadDebugGetRegRtn_t) ( pthreadDebugClient_t, pthreadDebugRegs_p, pthreadDebugKId_t);/*? * SETREG: Typedef for routine to set general register contents * * Arguments: */ * caller_context The caller's context argument% * registers register value structure5 * thread_id kernel thread ID * * Return value: * * 0 success * ESRCH invalid thread_id * ENOSYS Not supported. */(typedef int (*pthreadDebugSetRegRtn_t) ( pthreadDebugClient_t, const pthreadDebugRegs_t*, pthreadDebugKId_t);/*8 * OUTPUT: Typedef for routine to write a line of output * * Arguments: *0 * caller_context The caller's context argument' * line A line of output (no newline) * * Return value: * * 0 Success * ENOSYS Not supported5. */(typedef int (*pthreadDebugOutputRtn_t) ( pthreadDebugClient_t, pthreadDebugConstString_t);/*= * ERROR: Typedef for routine to write a line of error output * * Arguments: *0 * caller_context The caller's context argument' * line A line of output (no newline) * * Return value: * * 0 Success * ENOSYS Not supported. */'typedef int (*pthreadDebugErrorRtn_t) ( pthreadDebugClient_t, pthreadDebugConstString_t);/*1 * MALLOC: Typedef f5or routine to allocate memory * * Arguments: *0 * caller_context The caller's context argument * size size of allocation * * Return value: * * pointer to memory * NULL for error */7typedef pthreadDebugAddr_t (*pthreadDebugMallocRtn_t) ( pthreadDebugClient_t, size_t);/*1 * FREE: Typedef for routine to deallocate memory * * Arguments: *0 * caller_context The caller's context argument' * address address of allocated space * * Return value:5 * * none */'typedef void (*pthreadDebugFreeRtn_t) ( pthreadDebugClient_t, pthreadDebugAddr_t);/*F * SPECIAL: Typedef for routine to determine the kernel thread ID of aN * "special" thread in the debug target process. "Special" threads include theK * current thread (which may be changed by a debugger command, for example,N * ladebug's "thread" command), and the trap thread (the thread that generated7 * a trap (breakpoint, etc.) currently being processed. * * Arguments5: */ * caller_context The caller's context argument( * type Which special thread to return.7 * thread_id Pointer to return current kernel thread ID * * Return value: * * 0 success * ENOSYS Not supported. * ESRCH no current thread */*typedef int (*pthreadDebugSpecKthdRtn_t) ( pthreadDebugClient_t, pthreadDebugSpecialType_t, pthreadDebugKId_t *);/*G * The callback definition structure must be initialized by setting theL * version field to the value PTHREA 5D_DEBUG_VERSION, and setting the addressN * of each callback routine, before calling pthreadDebugContextInit. Note thatH * DECthreads supports limited upwards compatibility for clients of thisK * interface specifying older versions (for example, clients compiled using2 * the original version will work with version 1). *J * Callbacks that are not supported by the client must be set to NULL. TheN * client should clear the callback structure (e.g., with bzero or memset) andI * then set the call 5backs it understands and supports, to ensure that all# * other callbacks are set to NULL. *H * pthreadDebugContextInit will fail (with EINVAL) if the READ or GETREGL * callbacks are not specified. It will also fail with EINVAL if you specifyI * either MALLOC or FREE (or SUSPEND and RESUME) without specifying both.H * Other callbacks are optional, but may be required for some functions.F * You'll get an error (ENOSYS or ENOTSUP) if you call a function thatG * requires an unimplemented callb 5ack. We may also want to call variousK * callbacks for other reasons (e.g., we use WRITE, if available, to updateL * some thread information when it's shown, for clients connected with V1 orH * higher interface, but we'll ignore that feature if the callback isn't* * present (or returns ENOSYS or ENOTSUP). *M * Note in particular, however, that debug information is NOT RELIABLE if youN * do not specify the SUSPEND and RESUME callbacks. Access to some informationI * is not atomic, and the co 5nsequences of accessing a running process mayK * range from bad data to (debugger) SEGV/ACCVIO errors. (This is OK if theN * debugger knows that the target process is always suspended, but beware thatL * our access to remote process data will be substantially more efficient ifN * we know when the process is suspended, and we can know that only when we've * used SUSPEND/RESUME.) */*typedef struct pthreadDebugCallbacks_tag { unsigned long version;9 pthreadDebugGetMemRtn_t read_cal 5lback; /* REQUIRED */+ pthreadDebugSetMemRtn_t write_callback;. pthreadDebugSuspendRtn_t suspend_callback;, pthreadDebugResumeRtn_t resume_callback;0 pthreadDebugKthdInfoRtn_t kthdinfo_callback;( pthreadDebugHoldRtn_t hold_callback;, pthreadDebugUnholdRtn_t unhold_callback;. pthreadDebugGetFregRtn_t getfreg_callback;. pthreadDebugSetFregRtn_t setfreg_callback;; pthreadDebugGetRegRtn_t getreg_callback; /* REQUIRED */, pthreadDebugSetRegRtn_t setreg_callback;,5 pthreadDebugOutputRtn_t output_callback;+ pthreadDebugOutputRtn_t error_callback;, pthreadDebugMallocRtn_t malloc_callback;( pthreadDebugFreeRtn_t free_callback;0 pthreadDebugSpecKthdRtn_t speckthd_callback;8 } pthreadDebugCallbacks_t, *pthreadDebugCallbacks_p; /* * ROUTINES *//* * pthreadDebugContextInit *F * Initialize the DECthreads debug interface and stores the context inI * the given debug context structure. This allows the caller to setup theI * p 5rocess to be debugged and register all the callbacks once so that theE * other routines only need to take one parameter, this debug contextI * structure. If the debugger wishes, it can register different callbacks< * based on procfs, ptrace core file, remote debugging, etc. * * Arguments: *@ * caller_context Uninterpreted value, passed to each callback.9 * callbacks Array of client callbacks, plus API version= * symbol_handle Address of __pthread_dbg_symtable in target4 * debug_c5ontext Returns a handle to debug context. * * Callbacks: * * GETMEM, SETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion: * EINVAL Unsupported debug client (debug library cannot# * support debugger API version)2 * ENOTSUP Unsupported target (no DECthreads, or& * incompatible DECthreads version)9 * ENOMEM Unable to allocate internal context structure */ extern intpthreadDebugContextInit ( pthreadDebugClient_t, pthreadDebugCallback5s_p, pthreadDebugTargetAddr_t, pthreadDebugContext_p);/* * pthreadDebugContextDestroy *E * Destroy the given debug context and free any associated resources. * * Arguments: *. * debug_context The debug context to destroy * * Callbacks: * * FREE, GETMEM, SETMEM * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid */ extern int3pthreadDebugContextDestroy (pthreadDebugContext_t);/* * pthreadDebugCondGetInfo5 *: * Get the DECthreads state of a given condition variable. *6 * The process must be suspended for proper operation. * * Arguments: ** * debug_context The debug context to use" * cond_id condition variable id# * info pointer to info structure * * Callbacks: * * GETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid' * ESRCH condition variable not found4 * ECHILD condition variable has lost "child" part5 */ extern intpthreadDebugCondGetInfo ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugCondInfo_p);/* * pthreadDebugCondGetInfoAddr *> * Get information about a condition variable from its address * * Arguments: *& * debug_context debug context to use3 * cond_addr Address of cond var in target process$ * cond_info Address of info buffer * * Callbacks: * * GETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion9 * EINVA5L debug context isn't valid, or not a cond var.4 * ECHILD condition variable has lost "child" part */ extern intpthreadDebugCondGetInfoAddr ( pthreadDebugContext_t, pthread_cond_t *, pthreadDebugCondInfo_t *);/* * pthreadDebugCondSeqInit *B * Return the first condition variable in the current list of user2 * condition variables. If the call succeeds, thenI * pthreadDebugCvSeqNext() can be called to retrieve subsequent condition * variables. *F * Note, this call w5ill suspend the process. The corresponding destroy * will resume the process. * * Arguments: ** * debug_context The debug context to use4 * cond Pointer to return first condition variable * * Callbacks: * * GETMEM, MALLOC, SUSPEND, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid" * ENOENT no condition variables5 * EBUSY debug context's thread traversal is active0 * ENOMEM unable to allocate traversal context */ 5extern intpthreadDebugCondSeqInit ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugCondSeqNext *A * Return the next condition variable in the current list of user * condition variables. * * Arguments: ** * debug_context The debug context to use3 * cond Pointer to return next condition variable * * Callbacks: * * GETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid5 * ESRCH t5he previously returned condition variable+ * context no longer exists (process not * suspended?)' * ENOENT no more condition variables */ extern intpthreadDebugCondSeqNext ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugCondSeqDestroy *C * Terminates the iterative condition variable queries started with * pthreadDebugCvSeqInit(). *= * Note, this call will resume the process suspended with the * corresponding init operation. * * Arg5uments: ** * debug_context The debug context to use * * Callbacks: * * FREE, RESUME * * Return value: * * 0 Successful completion5 * EINVAL debug context isn't valid, or no traversal( * EBUSY Active traversal of wrong type */ extern int3pthreadDebugCondSeqDestroy (pthreadDebugContext_t);/* * pthreadDebugCondSetName *G * Set the name of a condition variable for the debug session. (Setting$ * to "" removes any existing name.) *F * Note that this name app5lies only within the Debug Assistant sessionB * specified by debug_context. It cannot be seen within the targetF * process (e.g., by tracing, or pthread_cond_getname_np), or by otherH * Debug Assistant sessions. It will be forgotten when the debug context * is destroyed. * * Arguments: *& * debug_context debug context to use * id condition variable ID/ * name Pointer to name (up to 31 characters) * * Callbacks: * * MALLOC, FREE * * Return value: * * 0 Success5ful completion9 * EINVAL debug context isn't valid, or not a cond var.. * ENOMEM insufficient memory to create name */ extern intpthreadDebugCondSetName ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugConstString_t);/* * pthreadDebugCblkSeqInit *F * Return the first thread in the current list of threads blocked on a1 * condition variable. If the call succeeds, thenA * pthreadDebugCblkSeqNext() can be called to retrieve subsequent * threads. *F * Note, thi5s call will suspend the process. The corresponding destroy * will resume the process. * * Arguments: ** * debug_context The debug context to use+ * cond The condition variable to examine6 * thread Pointer to return the first blocked thread * * Callbacks: * * GETMEM, MALLOC, SUSPEND, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid' * ESRCH Condition variable not found6 * ENOENT no threads blocked on a condition vari5able5 * EBUSY debug context's thread traversal is active0 * ENOMEM unable to allocate traversal context */ extern intpthreadDebugCblkSeqInit ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugId_t *);/* * pthreadDebugCblkSeqNext *E * Return the next thread in the current list of threads blocked on a * condition variable. * * Arguments: ** * debug_context The debug context to use+ * cond The condition variable to examine5 * thread Pointer to5 return the next blocked thread * * Callbacks: * * GETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ENOENT no more threads */ extern intpthreadDebugCblkSeqNext ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugCblkSeqDestroy *? * Terminates the iterative blocked thread queries started with * pthreadDebugCblkSeqInit(). *= * Note, this call will resume the process suspended5 with the * corresponding init operation. * * Arguments: ** * debug_context The debug context to use * * Callbacks: * * FREE, RESUME * * Return value: * * 0 Successful completion5 * EINVAL debug context isn't valid, or no traversal( * EBUSY Active traversal of wrong type */ extern int3pthreadDebugCblkSeqDestroy (pthreadDebugContext_t);/* * pthreadDebugMutGetInfo *- * Get the DECthreads state of a given mutex. *< * Note, the process must be suspe5nded for proper operation. * * Arguments: ** * debug_context The debug context to use * mutex_id mutex id# * info pointer to info structure * * Callbacks: * * GETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ESRCH mutex not found' * ECHILD mutex has lost "child" part */ extern intpthreadDebugMutGetInfo ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugMutexInfo_p);/*5 * pthreadDebugMutGetInfoAddr *1 * Get information about a mutex from its address * * Arguments: *& * debug_context debug context to use1 * mutex_addr Address of mutex in target process% * mutex_info Address of info buffer * * Callbacks: * * GETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion5 * EINVAL debug context isn't valid, or not a mutex' * ECHILD mutex has lost "child" part */ extern intpthreadDebugMutGetInfoAddr ( pthread5DebugContext_t, pthread_mutex_t *, pthreadDebugMutexInfo_t *);/* * pthreadDebugMutSeqInit *E * Return the first mutex in the current list of user mutexes. If theI * call succeeds, then pthreadDebugMutSeqNext() can be called to retrieve * subsequent mutexes. *F * Note, this call will suspend the process. The corresponding destroy * will resume the process. * * Arguments: ** * debug_context The debug context to use+ * mutex Pointer to return first mutex ID * *5 Callbacks: * * GETMEM, MALLOC, SUSPEND, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ENOENT no mutexes5 * EBUSY debug context's thread traversal is active0 * ENOMEM unable to allocate traversal context */ extern intpthreadDebugMutSeqInit ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugMutSeqNext *= * Return the next mutex in the current list of user mutexes. * * Arguments: ** * d5ebug_context The debug context to use* * mutex Pointer to return next mutex ID * * Callbacks: * * GETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ENOENT no more mutexes */ extern intpthreadDebugMutSeqNext ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugMutSeqDestroy *6 * Terminates the iterative mutex queries started with * pthreadDebugMutSeqInit(). *= * Note, this call5 will resume the process suspended with the * corresponding init operation. * * Arguments: ** * debug_context The debug context to use * * Callbacks: * * FREE, RESUME * * Return value: * * 0 Successful completion6 * EINVAL debug context isn't valid, or no traversal) * EBUSY Active traversal of wrong type */ extern int2pthreadDebugMutSeqDestroy (pthreadDebugContext_t);/* * pthreadDebugMutSetName *3 * Set the name of a mutex for the debug session.5 *F * Note that this name applies only within the Debug Assistant sessionB * specified by debug_context. It cannot be seen within the targetG * process (e.g., by tracing, or pthread_mutex_getname_np), or by otherH * Debug Assistant sessions. It will be forgotten when the debug context * is destroyed. * * Arguments: *& * debug_context debug context to use * id mutex ID/ * name Pointer to name (up to 31 characters) * * Callbacks: * * MALLOC, FREE * * Return value:5 * * 0 Successful completion9 * EINVAL debug context isn't valid, or not a cond var.. * ENOMEM insufficient memory to create name */ extern intpthreadDebugMutSetName ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugConstString_t);/* * pthreadDebugMblkSeqInit *F * Return the first thread in the current list of threads blocked on aE * mutex. If the call succeeds, then pthreadDebugMblkSeqNext() can be) * called to retrieve subsequent threads. *F * Note, thi5s call will suspend the process. The corresponding destroy * will resume the process. * * Arguments: ** * debug_context The debug context to use * mutex The mutex to examine6 * thread Pointer to return the first blocked thread * * Callbacks: *( * GETMEM, MALLOC, SUSPEND, FREE, RESUME * * Return value: * * 0 Successful completion * ESRCH Mutex not found% * EINVAL debug context isn't valid' * ENOENT no threads blocked on mutex5 * EBUSY debug context's5 thread traversal is active0 * ENOMEM unable to allocate traversal context */ extern intpthreadDebugMblkSeqInit ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugId_t *);/* * pthreadDebugMblkSeqNext *E * Return the next thread in the current list of threads blocked on a * mutex. * * Arguments: ** * debug_context The debug context to use * mutex The mutex to examine5 * thread Pointer to return the next blocked thread * * Callbacks: *5 * GETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ENOENT no more threads */ extern intpthreadDebugMblkSeqNext ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugMblkSeqDestroy *? * Terminates the iterative blocked thread queries started with * pthreadDebugMblkSeqInit(). *= * Note, this call will resume the process suspended with the * corresponding init operation. * * Arg5uments: ** * debug_context The debug context to use * * Callbacks: * * FREE, RESUME * * Return value: * * 0 Successful completion6 * EINVAL debug context isn't valid, or no traversal) * EBUSY Active traversal of wrong type */ extern int3pthreadDebugMblkSeqDestroy (pthreadDebugContext_t);/* * pthreadDebugRwGetInfoAddr *, * Retrieve the state of a rwlock by address * * Arguments: ** * debug_context DECthreads debug context1 * rwlock_addr Rwlock a5ddress (pthread_rwlock_t) * info Return rwlock info * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * EINVAL Not a rwlock( * ECHILD Rwlock has lost "child" part */intpthreadDebugRwGetInfoAddr ( pthreadDebugContext_t, pthread_rwlock_t *, pthreadDebugRwlockInfo_p);/* * pthreadDebugRwGetInfo *! * Retrieve the state of a rwlock * * Arguments: ** * debug_context DECthreads debug context$ * rwlock_id Rwlock seq5uence number * info Return rwlock info * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ESRCH rwlock not found( * ECHILD Rwlock has lost "child" part */intpthreadDebugRwGetInfo ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugRwlockInfo_p);/* * pthreadDebugRwblkRdSeqDestroy *F * Destroy the active blocked thread traversal context for the list of. * threads waiting on a rwlock for a read lock * * Arguments5: ** * debug_context DECthreads debug context * * Return value: * * 0 Successful completion6 * EINVAL debug context isn't valid, or no traversal) * EBUSY Active traversal of wrong type */int6pthreadDebugRwblkRdSeqDestroy (pthreadDebugContext_t);/* * pthreadDebugRwblkRdSeqInit *1 * Initialize a blocked thread traversal context. * * Arguments: ** * debug_context DECthreads debug context% * rwl_id Read-write lock to search" * thread_id Returns first 5thread * * Return value: * * 0 Successful completion$ * ESRCH Read-write lock not found% * EINVAL debug context isn't valid6 * EBUSY debug context's blocked traversal is active0 * ENOMEM unable to allocate traversal context * ENOENT no threads */intpthreadDebugRwblkRdSeqInit ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugId_t *);/* * pthreadDebugRwblkRdSeqNext *7 * Return the next entry in a thread traversal context. * * Arguments: *5* * debug_context DECthreads debug context" * thread_id Returns first thread * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ENOENT no more threads4 * EBUSY traversal in use by different object type */intpthreadDebugRwblkRdSeqNext ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugRwblkWrSeqDestroy *F * Destroy the active blocked thread traversal context for the list of/ * threads waiting on a rwlock for a5 write lock * * Arguments: ** * debug_context DECthreads debug context * * Return value: * * 0 Successful completion6 * EINVAL debug context isn't valid, or no traversal) * EBUSY Active traversal of wrong type */int6pthreadDebugRwblkWrSeqDestroy (pthreadDebugContext_t);/* * pthreadDebugRwblkWrSeqInit *1 * Initialize a blocked thread traversal context. * * Arguments: ** * debug_context DECthreads debug context% * rwl_id Read-write lock to search5" * thread_id Returns first thread * * Return value: * * 0 Successful completion$ * ESRCH Read-write lock not found% * EINVAL debug context isn't valid6 * EBUSY debug context's blocked traversal is active0 * ENOMEM unable to allocate traversal context * ENOENT no threads */intpthreadDebugRwblkWrSeqInit ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugId_t *);/* * pthreadDebugRwblkWrSeqNext *7 * Return the next entry in a thread traversal con5text. * * Arguments: ** * debug_context DECthreads debug context" * thread_id Returns first thread * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ENOENT no more threads4 * EBUSY traversal in use by different object type */intpthreadDebugRwblkWrSeqNext ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugRwSeqDestroy */ * Destroy the active rwlock traversal context. * * Arguments: ** * debug5_context DECthreads debug context * * Return value: * * 0 Successful completion6 * EINVAL debug context isn't valid, or no traversal) * EBUSY Active traversal of wrong type */int1pthreadDebugRwSeqDestroy (pthreadDebugContext_t);/* * pthreadDebugRwSeqInit *) * Initialize a rwlock traversal context. * * Arguments: ** * debug_context DECthreads debug context" * rwlock_id Returns first rwlock * * Return value: * * 0 Successful completion% * EINVAL 5 debug context isn't valid. * EBUSY debug context's traversal is active0 * ENOMEM unable to allocate traversal context * ENOENT no rwlockes */intpthreadDebugRwSeqInit ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugRwSeqNext *7 * Return the next entry in a rwlock traversal context. * * Arguments: ** * debug_context DECthreads debug context! * rwlock_id Returns next rwlock * * Return value: * * 0 Successful completion% * EINVAL 6 debug context isn't valid * ENOENT no more rwlockes4 * EBUSY traversal in use by different object type */intpthreadDebugRwSeqNext ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugRwSetName *G * Set the name of a read-write lock for the debug session. (Setting to! * "" removes any existing name.) *F * Note that this name applies only within the Debug Assistant sessionB * specified by debug_context. It cannot be seen within the targetF * process (e.6g., by tracing, or pthread_cond_getname_np), or by otherH * Debug Assistant sessions. It will be forgotten when the debug context * is destroyed. * * Arguments: ** * debug_context DECthreads debug context * id ID * name pointer to name string * * Return value: * * 0 Successful completion5 * EINVAL debug context isn't valid or name is NULL * ENOMEM can't store new name */intpthreadDebugRwSetName ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebu6gConstString_t);/* * pthreadDebugThdGetInfo *. * Get the DECthreads state of a given thread. *< * Note, the process must be suspended for proper operation. * * Arguments: ** * debug_context The debug context to use * thread_id thread id# * info pointer to info structure * * Callbacks: *! * GETMEM, MALLOC, [SETMEM, FREE] * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ESRCH thread not found */ extern int6pthreadDebugThdGetInfo ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugThreadInfo_p);/* * pthreadDebugThdGetInfoAddr *> * Get information about a thread from its address (pthread_t) * * Arguments: *& * debug_context debug context to use0 * thd_addr Address of thread in target process# * thd_info Address of info buffer * * Callbacks: *! * GETMEM, MALLOC, [SETMEM, FREE] * * Return value: * * 0 Successful completion6 * EINVAL debug cont6ext isn't valid, or not a thread */ extern intpthreadDebugThdGetInfoAddr ( pthreadDebugContext_t, pthread_t, pthreadDebugThreadInfo_t *);/* * pthreadDebugThdSeqInit *F * Return the first thread in the current list of user threads. If theI * call succeeds, then pthreadDebugThdSeqNext() can be called to retrieve * subsequent threads. *F * Note, this call will suspend the process. The corresponding destroy * will resume the process. * * Arguments: ** * debug_con6text The debug context to use- * thread Pointer to return first thread ID * * Callbacks: * * GETMEM, MALLOC, SUSPEND, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ENOENT no threads5 * EBUSY debug context's thread traversal is active0 * ENOMEM unable to allocate traversal context */ extern intpthreadDebugThdSeqInit ( pthreadDebugContext_t, pthreadDebugId_t *);/* * pthreadDebugThdSeqNext *> * Ret6urn the next thread in the current list of user threads. * * Arguments: ** * debug_context The debug context to use, * thread Pointer to return next thread ID * * Callbacks: * * GETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid6 * ESRCH the previously returned thread (context) no, * longer exists [process not suspended?] * ENOENT no more threads */ extern intpthreadDebugThdSeqNext ( pthreadD6ebugContext_t, pthreadDebugId_t *);/* * pthreadDebugThdSeqDestroy *7 * Terminates the iterative thread queries started with * pthreadDebugThdSeqInit(). *= * Note, this call will resume the process suspended with the * corresponding init operation. * * Arguments: ** * debug_context The debug context to use * * Callbacks: * * FREE, RESUME, [ERROR, OUTPUT] * * Return value: * * 0 Successful completion6 * EINVAL debug context isn't valid, or no travers6al) * EBUSY Active traversal of wrong type */ extern int2pthreadDebugThdSeqDestroy (pthreadDebugContext_t);/* * pthreadDebugThdSetName *I * Set the name of a thread for the debug session. (Setting to "" removes * any existing name.) *F * Note that this name applies only within the Debug Assistant sessionB * specified by debug_context. It cannot be seen within the targetG * process (e.g., by tracing, or pthread_getname_np), or by other DebugE * Assistant sessions. It will b 6e forgotten when the debug context is * destroyed. * * Arguments: *& * debug_context debug context to use * id thread ID/ * name Pointer to name (up to 31 characters) * * Callbacks: * * MALLOC, FREE * * Return value: * * 0 Successful completion9 * EINVAL debug context isn't valid, or not a cond var.. * ENOMEM insufficient memory to create name */ extern intpthreadDebugThdSetName ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugConstSt 6ring_t);/* * pthreadDebugTsdCreate *. * Create a new TSD key in the target process. *H * (Note that this is pointless unless the client is also adding code to1 * the target process that will use the new key.) *F * This call has a potentially dangerous race condition if code in theE * target process may also be creating a TSD key. This race cannot beG * resolved from the Debug Assistant, so, if the condition is detected,H * this function will return EAGAIN. The client should allow 6 the processE * to run and try again later. (This will never occur if the debuggerD * creates a new TSD key before starting the process, and that's the * best time to use it anyway.) * * Arguments: ** * debug_context The debug context to use% * key Pointer (return the TSD key)5 * destructor Address (in target process) of routine * * Callbacks: *0 * MALLOC, SUSPEND, RESUME, GETMEM, SETMEM, FREE * * Return value: * * 0 Successful completion, * EINVAL debug cont 6ext or key isn't valid * ENOMEM can't create key5 * EAGAIN Synchronization conflict: try again later */ extern intpthreadDebugTsdCreate ( pthreadDebugContext_t, pthread_key_t *, pthreadDebugDestructor_t);/* * pthreadDebugTsdGetInfo *7 * Get information on a Thread Specific Data (TSD) Key. * * Arguments: ** * debug_context The debug context to use * key The TSD key# * info pointer to info structure * * Callbacks: * * MALLOC, GETMEM, FREE * 6 * Return value: * * 0 Successful completion, * EINVAL debug context or key isn't valid */ extern intpthreadDebugTsdGetInfo ( pthreadDebugContext_t, pthread_key_t, pthreadDebugTsdInfo_p);/* * pthreadDebugTsdGetSpecific *F * Return the value of a thread-specific data (TSD) key for a specific * thread. *F * NOTE: There is no interface to return a 32-bit value for a TSD key.A * The pointer "value" must point to a 64-bit "void*" on an Alpha * (Digital UNIX or Op6enVMS). * * Arguments: ** * debug_context The debug context to use * thread_id The thread's ID * key The TSD key. * value Pointer where TSD value is returned * * Callbacks: * * MALLOC, GETMEM, FREE * * Return value: * * 0 Successful completion, * EINVAL debug context or key isn't valid * ESRCH thread not found */ extern intpthreadDebugTsdGetSpecific ( pthreadDebugContext_t, pthreadDebugId_t, pthread_key_t, pthreadDebugTargetAddr_p);6/* * pthreadDebugTsdSetSpecific *C * Set the value of a thread-specific data (TSD) key for a specific * thread. * * Arguments: ** * debug_context The debug context to use * thread_id The thread's ID * key The TSD key * value New TSD value * * Callbacks: *0 * SUSPEND, RESUME, MALLOC, GETMEM, SETMEM, FREE * * Return value: * * 0 Successful completion, * EINVAL debug context or key isn't valid * ESRCH thread not found4 * ENOTSUP can't set key (th6read has no TSD array) */ extern intpthreadDebugTsdSetSpecific ( pthreadDebugContext_t, pthreadDebugId_t, pthread_key_t, pthreadDebugTargetConstAddr_t);/* * pthreadDebugTsdSetName *B * Set the name of a TSD key for the debug session. (Setting to "" * removes any existing name.) *F * Note that this name applies only within the Debug Assistant sessionB * specified by debug_context. It cannot be seen within the targetE * process (e.g., by tracing, or pthread_key_getname_n6p), or by otherH * Debug Assistant sessions. It will be forgotten when the debug context * is destroyed. * * Arguments: *& * debug_context debug context to use * key TSD key/ * name Pointer to name (up to 31 characters) * * Callbacks: * * MALLOC, FREE * * Return value: * * 0 Successful completion- * EINVAL debug context or key isn't valid.. * ENOMEM insufficient memory to create name */ extern intpthreadDebugTsdSetName ( pthreadDebugContext_t,6 pthread_key_t, pthreadDebugConstString_t);/* * pthreadDebugTsdSeqDestroy *" * Destroy a TSD traversal context * * Arguments: *& * debug_context debug context to use * * Callbacks: * * RESUME, MALLOC, FREE * * Return value: * * 0 Successful completion6 * EINVAL debug context isn't valid, or no traversal) * EBUSY Active traversal of wrong type */ extern intpthreadDebugTsdSeqDestroy (& pthreadDebugContext_t debug_context);/* * pthreadDebugTsd6SeqInit *& * Initialize a TSD traversal context. * * Arguments: *& * debug_context debug context to use' * key_id pointer to return first key * * Callbacks: ** * SUSPEND, GETMEM, MALLOC, [FREE, RESUME] * * Return value: * * 0 Successful completion- * EINVAL debug context or key isn't valid.2 * EBUSY debug context's key traversal is active0 * ENOMEM unable to allocate traversal context * ENOENT no keys */ extern intpthreadDebugTsdSeqInit (% pthre6adDebugContext_t debug_context, pthreadDebugId_t *key_id);/* * pthreadDebugTsdSeqInit * * Return the next TSD key. * * Arguments: *& * debug_context debug context to use& * key_id pointer to return next key * * Callbacks: * * GETMEM, MALLOC, FREE * * Return value: * * 0 Successful completion- * EINVAL debug context or key isn't valid.2 * EBUSY debug context's key traversal is active0 * ENOMEM unable to allocate traversal context * ENOENT no6 keys */ extern intpthreadDebugTsdSeqNext (% pthreadDebugContext_t debug_context, pthreadDebugId_t *key_id);/* * pthreadDebugThdGetFreg *5 * Get the thread's current floating point registers. * * Arguments: ** * debug_context The debug context to use * thread_id thread id * regs register values * * Callbacks: *9 * SUSPEND, RESUME, GETMEM, GETREG, MALLOC, GETFREG, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context is6n't valid * ESRCH thread not found * any callback errors */ extern intpthreadDebugThdGetFreg ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugFregs_p);/* * pthreadDebugThdSetFreg *5 * Set the thread's current floating point registers. * * Arguments: ** * debug_context The debug context to use * thread_id thread id * regs register values * * Callbacks: *9 * SUSPEND, RESUME, GETMEM, GETREG, MALLOC, SETFREG, FREE * * Return va6lue: * * 0 Successful completion% * EINVAL debug context isn't valid * ESRCH thread not found * any callback errors */ extern intpthreadDebugThdSetFreg ( pthreadDebugContext_t, pthreadDebugId_t, const pthreadDebugFregs_t*);/* * pthreadDebugThdGetReg *. * Get the thread's current general registers. * * Arguments: ** * debug_context The debug context to use * thread_id thread id * regs register values * * Callbacks: *0 * SUSPEND, 6RESUME, GETMEM, MALLOC, GETREG, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ESRCH thread not found * any callback errors */ extern intpthreadDebugThdGetReg ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugRegs_p);/* * pthreadDebugThdSetReg *. * Set the thread's current general registers. * * Arguments: ** * debug_context The debug context to use * thread_id thread id * regs register6 values * * Callbacks: *: * SUSPEND, RESUME, GETMEM, MALLOC, SETREG, [GETREG, FREE] * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ESRCH thread not found * any callback errors */ extern intpthreadDebugThdSetReg ( pthreadDebugContext_t, pthreadDebugId_t, const pthreadDebugRegs_t*);/* * pthreadDebugThdHold *2 * Make the user thread ineligible for scheduling. * * Arguments: ** * debug_context The 6debug context to use * thread_id thread to hold * * Callbacks: *> * SUSPEND, RESUME, GETMEM, MALLOC, SETMEM, HOLD, UNHOLD, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid: * EPERM (V2) internal DECthreads thread (can't be held).$ * EINVAL (V2) thread is terminated * any callback errors */ extern intpthreadDebugThdHold ( pthreadDebugContext_t, pthreadDebugId_t);/* * pthreadDebugThdUnhold *0 * Make the user t6hread eligible for scheduling. * * Arguments: ** * debug_context The debug context to use * thread_id thread to release * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid: * EPERM (V2) internal DECthreads thread (can't be held).$ * EINVAL (V2) thread is terminated */ extern intpthreadDebugThdUnhold ( pthreadDebugContext_t, pthreadDebugId_t);/* * pthreadDebugThdHoldOthers *D * Make all but the specified user thread 6ineligible for scheduling. * * Arguments: ** * debug_context The debug context to use3 * thread_id Hold all user threads except this one * * Callbacks: *> * SUSPEND, RESUME, GETMEM, MALLOC, SETMEM, HOLD, UNHOLD, FREE * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ESRCH Thread ID not valid */ extern intpthreadDebugThdHoldOthers ( pthreadDebugContext_t, pthreadDebugId_t);/* * pthreadDebugThdUnholdOthers *6J * Reverse the action of pthreadDebugThdUnholdOthers. While the thread_id @ * is technically redundant (we could just say "make all threadsE * unheld"), this form makes the complementary function more obvious. * * Arguments: ** * debug_context The debug context to use< * thread_id The target thread of pthreadDebugThdHoldOthers * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ESRCH thread ID not valid */ extern intpthreadDebugTh6dUnholdOthers ( pthreadDebugContext_t, pthreadDebugId_t);/* * pthreadDebugThdKidToId *F * Convert a kernel thread ID into a user thread ID (sequence number). * * Arguments: *& * debug_context debug context to use * kid Kernel thread ID. * thread_id Thread ID. * * Callbacks: * * KTHDINFO, GETMEM * * Return value: * * 0 Successful completion6 * EINVAL debug context isn't valid, or not a thread */ extern intpthreadDebugThdKidToId ( pthre6adDebugContext_t, pthreadDebugKId_t, pthreadDebugId_t *);/* * pthreadDebugSuspend *A * Invoke the SUSPEND callback to suspend the target process. TheG * advantage of using this interface rather than "doing it directly" isI * that, when debug assistant knows that the target process is suspended,8 * it can make more efficient use of its internal cache. * * Arguments: *& * debug_context debug context to use * * Callbacks: * * SUSPEND * * Return value: * * 0 6 Successful completion% * EINVAL debug context isn't valid+ * ENOTSUP SUSPEND callback not supported */ extern int,pthreadDebugSuspend (pthreadDebugContext_t);/* * pthreadDebugResume *@ * Invoke the RESUME callback to suspend the target process. TheG * advantage of using this interface rather than "doing it directly" isG * that, when the assistant knows that the target process is suspended,8 * it can make more efficient use of its internal cache. * * Arguments: *&!6 * debug_context debug context to use * * Callbacks: * * RESUME * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid* * ENOTSUP RESUME callback not supported */ extern int+pthreadDebugResume (pthreadDebugContext_t);/* * pthreadDebugGetSpecialThread *H * Return the thread Id for a specific "special" kernel thread (if any).E * Depends upon the debug client's response to the SPECKTHD callback,G * essentially just converting that "6kernel thread ID into a user thread * ID. * * Arguments: *& * debug_context debug context to use * type Type of special thread" * thread_id Thread ID (returned) * * Callbacks: * * SPECKTHD, KTHDINFO, GETMEM * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid, * ENOTSUP SPECKTHD callback not supported */ extern intpthreadDebugGetSpecialThread ( pthreadDebugContext_t, pthreadDebugSpecialType_t, pthreadDebugId_t *);#6/* * pthreadDebugCmd *B * This routine implements the commands previously provided by theB * pthread_debug_cmd() routine which was run in the context of theG * target. These commands operate from the context of the debugger now. *> * Note, the process must be suspended for reliable operation. * * Arguments: ** * debug_context The debug context to use1 * command Pointer to an ASCII character string0 * representing a sequence of pthread_debug()& * commands, each separ$6ated by ";". * * Callbacks: *8 * OUTPUT (Potentially all, depending upon the command.) * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid * ENOTSUP invalid command1 * ESHUTDOWN command string terminated by "exit" */ extern intpthreadDebugCmd( pthreadDebugContext_t, pthreadDebugConstString_t);/* * pthreadDebugSetErrorWidth *E * This routine modifies the output width of the error stream used byG * pthreadDebugCmd (an%6d general error tracing output when enabled). The$ * default if not set is 80 columns. * * Arguments: ** * debug_context The debug context to use, * width New width for error stream width. * * Callbacks: * * none * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid */ extern intpthreadDebugSetErrorWidth ( pthreadDebugContext_t, int);/* * pthreadDebugSetOutputWidth *F * This routine modifies the output width &6of the output stream used byF * pthreadDebugCmd (and tracing output if enabled). The default if not * set is 80 columns. * * Arguments: ** * debug_context The debug context to use- * width New width for output stream width. * * Callbacks: * * none * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid */ extern intpthreadDebugSetOutputWidth ( pthreadDebugContext_t, int);/* * EVENTS *N * The DECthreads ev'6ent mechanism allows a debugger to determine when "things"H * happen within the DECthreads scheduler. For example, when a thread is@ * created, when it first starts to run, and when it terminates. *L * Ultimately the debugger learns of an event by receiving a breakpoint trapM * that it has set within the "target" process. It can ask for the address ofI * a "hook" routine at which to set the breakpoint by calling the routineD * pthreadDebugEventGetAddress. However, for performance reasons the (6M * DECthreads scheduler does not normally call these hook routines. The hooksC * must be enabled by setting events. Each hook point consists of aJ * single "non-operative" instruction followed by a return. A debugger mayO * REPLACE the initial instruction (a "bis r31,r31,v0") with a breakpoint, and L * need not replace or execute the original instruction when continuing from * the breakpoint. *K * In principle, the debugger could begin by setting globally all events inN * which it "may)6 have" interest, and simply ignoring the resulting breakpointsG * when an event isn't interesting at the moment. However, debugging ofM * asynchronous programs can be difficult enough without the timing impact ofF * dealing with extra breakpoints. It is strongly recommended that theN * debugger enable only the events in which it is specifically interested, and5 * then disable them when it no longer needs to know. *M * Additionally, when per-thread events are desired the debugger could simpl *6yJ * globally enable and disable any events, and check the current thread IDH * during breakpoint processing. But to minimize the impact of events onN * application behavior, it would be better to enable events only for specificM * threads so that the breakpoint overhead occurs only where its likely to be * of use. */ /*+ * Event definitions and "stub" prototypes *D * Any of these events can be enabled either for specific threads orI * "globally", for all threads in the target p +6rocess. Note that disablingM * (clearing) an event for a specific thread doesn't override a global enableH * (or vice versa) -- events are reported if the event is enabled either& * globally or for the current thread. *J * Events are reported in either or both of two mechanisms, when the event * occurs while enabled. *J * For the convenience of debuggers running in another process, DECthreadsH * calls a "breakpoint stub" in the target process -- a debugger may setL * breakpoints at thes ,6e calls to detect the event. Stub routine pointers areH * returned by calling pthreadDebugEventGetAddress. Stubs are enabled byF * getting a stub address, or by calling pthreadDebugEventSetGlobal or * pthreadDebugEventSetThread. *M * For the convenience of code running within the threaded process, such as aL * performance analyzer, DECthreads can be configured to call a hook routineB * provided by the analyzer. You can set a hook address by callingI * __pthread_debug_set_hook. (Note that al -6though the "hook routine" eventL * interface is documented & prototyped in this header, the __pthread_debug_N * routines are in libpthread.so [PTHREAD$RTL.EXE], not in the debug assistant * library. *J * Each hook routine is called with arguments that identify the event, theN * thread, and additional parameters giving specific information. Refer to theN * pthreadDebugEventActivating_t routine prototype for the arguments passed to, * the "Activating" event hook, for example. *; * ACTIVAT .6ING Report the initial execution of a new thread2 * (Setting this event for a specific thread is1 * of minimal use, but is allowed: one example. * would be to enable it for the new thread0 * reported in a Creating event, to determine, * when the new thread starts executing.)( * BLOCKING Report when a thread blocks, * CREATING Report when a thread is created9 * RUNNING Report when a thread runs (after blocking or * preemption)8 * TERMINATING Report when a thread t /6erminates (after a. * return from its start routine, a call to0 * pthread_exit, or cancellation). NOTE that0 * the thread is not yet completely run down.8 * INITIALIZED Report when the DECthreads core has been * initialized.7 * FREEING Report when a thread is going to be freed.2 * This means a thread is completely run down.2 * UNBLOCK Report when a thread is readied after * having been blocked.6 * BUGCHECK Report when DECthreads bugchecks (panics)4 * LASTCHANCE 06 Report when the last chance exception * handler is invoked.4 * TOOLTEXT Report when a tool library detects some1 * condition worth of debugger/user attention. */$typedef enum pthreadDebugEvent_tag {" PTHREAD_DEBUG_EVENT_NONE = 0,' PTHREAD_DEBUG_EVENT_ACTIVATING = 1,% PTHREAD_DEBUG_EVENT_BLOCKING = 2,% PTHREAD_DEBUG_EVENT_CREATING = 3,% PTHREAD_DEBUG_EVENT_RUNNING = 4,( PTHREAD_DEBUG_EVENT_TERMINATING = 5,( PTHREAD_DEBUG_EVENT_INITIALIZED = 6,% PT16HREAD_DEBUG_EVENT_FREEING = 7,% PTHREAD_DEBUG_EVENT_UNBLOCK = 8,% PTHREAD_DEBUG_EVENT_BUGCHECK = 9,( PTHREAD_DEBUG_EVENT_LASTCHANCE = 10,' PTHREAD_DEBUG_EVENT_TOOLREPORT = 11 } pthreadDebugEvent_t;>#define PTHREAD_DEBUG_EVENT_MIN PTHREAD_DEBUG_EVENT_ACTIVATING>#define PTHREAD_DEBUG_EVENT_MAX PTHREAD_DEBUG_EVENT_TOOLREPORT=#define PTHREAD_DEBUG_EVENT_COUNT (PTHREAD_DEBUG_EVENT_MAX+1)Gtypedef unsigned int pthreadDebugEventMask_t, *pthreadDebugEventMask_p;/*C * F26lags passed to various event routines by DECthreads to indicate * certain states. *//* * RUN event:+ * PREEMPTED: Outgoing thread was preempted. * KERNEL: Outgoing thread blocking in kernel */J#define PTHREAD_DEBUG_EVTRUN_PREEMPTED 0x00000001 /* Outgoing preempted */J#define PTHREAD_DEBUG_EVTRUN_KERNEL 0x00000002 /* Outgoing kernel block *//* * TERMINATE event:% * LOCKS: Terminated with locks held */-#define PTHREAD_DEBUG_EVTTRM_LOCKS 0x00000001/* * UNBLOCK e36vent:0 * PEND: Unblocked before BLOCK event was seen. */,#define PTHREAD_DEBUG_EVTUBL_PEND 0x00000001/*C * Prototypes showing the arguments passed to the BPT stub routines- * (returned by pthreadDebugEventGetAddress). *H * A debugger receiving a breakpoint on one of these events can read theH * arguments to determine what happened, and then use normal information, * interfaces to format and report the data. *//*4 * Thread is activating (running for the first time) * * A46rguments: *( * event PTHREAD_DEBUG_EVENT_ACTIVATING+ * thread The new thread's sequence number- * start_routine Address of the start routine: * start_argument The argument passed to the start routine * spare Unused( * flags Flags (none currently defined) * * Return value: * * none *//typedef void (*pthreadDebugEventActivating_t) ( pthreadDebugEvent_t, pthreadDebugId_t, void *(*) (void *), void *, void *, unsigned long);/* * Thread is blocking * * A56rguments: *& * event PTHREAD_DEBUG_EVENT_BLOCKING' * thread The thread's sequence number. * substate One of KERNEL, MUTEX, CV, TIMED_CV? * object Sequence number of mutex or condition variable (or 0 * if none) * spare Unused( * flags Flags (none currently defined) * * Return value: * * none */-typedef void (*pthreadDebugEventBlocking_t) ( pthreadDebugEvent_t, pthreadDebugId_t, pthreadDebugSubstate_t, pthreadDebugId_t, void *, unsigned long);/* * T66hread is being created * * Arguments: *& * event PTHREAD_DEBUG_EVENT_CREATING0 * thread The creating thread's sequence number. * new_thread The new thread's sequence number- * start_routine Address of the start routine2 * start_argument Argument passed to start routine( * flags Flags (none currently defined) * * Return value: * * none */-typedef void (*pthreadDebugEventCreating_t) ( pthreadDebugEvent_t, pthreadDebugId_t, pthreadDebugId_t, void *(*) (void *), v76oid *, unsigned long);/*= * Thread is running (after having blocked or been preempted) * * Arguments: *% * event PTHREAD_DEBUG_EVENT_RUNNING' * thread The thread's sequence number& * substate Thread's previous substate. * previous Sequence number of previous thread * spare Unused# * flags Flags (preempted, kernel) * * Return value: * * none */,typedef void (*pthreadDebugEventRunning_t) ( pthreadDebugEvent_t, pthreadDebugId_t, pthreadDebugSubstate_t, p86threadDebugId_t, void *, unsigned long);/* * Thread is terminating * * Arguments: *) * event PTHREAD_DEBUG_EVENT_TERMINATING' * thread The thread's sequence number7 * substate Reason for termination: normal, term_cancel, * (cancelled) or term_exit (pthread_exit) * result Thread's result value * spare Unused * flags Flags (locks) * * Return value: * * none */0typedef void (*pthreadDebugEventTerminating_t) ( pthreadDebugEvent_t, pthreadDebugId_t,96 pthreadDebugSubstate_t, void *, void *, unsigned long);/*, * The DECthreads code has been initialized. *I * NOTE: This is OBSOLETE. It was a hack to allow clients to avoid askingI * about state that wasn't available until after initialization. This bugF * was long since fixed correctly; a process that hasn't yet completed3 * DECthreads initialization simply has one thread. * * Arguments: *) * event PTHREAD_DEBUG_EVENT_INITIALIZED' * thread The thread's sequence number:6 * spare Unused * spare Unused * spare Unused( * flags Flags (none currently defined) * * Return value: * * none */0typedef void (*pthreadDebugEventInitialized_t) ( pthreadDebugEvent_t, pthreadDebugId_t, void *, void *, void *, unsigned long);/*! * Thread is freeing a zombie TCB * * Arguments: *% * event PTHREAD_DEBUG_EVENT_FREEING# * thread Thread's sequence number( * freed Freed thread's sequence number * spare Unused * spare Unused( *;6 flags Flags (none currently defined) * * Return value: * * none */,typedef void (*pthreadDebugEventFreeing_t) ( pthreadDebugEvent_t, pthreadDebugId_t, pthreadDebugId_t, void *, void *, unsigned long);/*4 * Thread is unblocked from a wait (CV, Mutex, etc.) * * Arguments: *% * event PTHREAD_DEBUG_EVENT_UNBLOCK. * thread Unblocking thread's sequence number- * substate Reason for block: mutex, cv, etc.. * unblock Unblocked thread's sequence number * spare<6 Unused( * flags Flags (none currently defined) * * Return value: * * none */,typedef void (*pthreadDebugEventUnblock_t) ( pthreadDebugEvent_t, pthreadDebugId_t, pthreadDebugSubstate_t, pthreadDebugId_t, void *, unsigned long);/*4 * DECthreads bugcheck (unrecoverable inconsistency) * * Arguments: *& * event PTHREAD_DEBUG_EVENT_BUGCHECK/ * thread Bugchecking thread's sequence number# * reason String describing reason * spare Unused argument * spare=6 Unused argument( * flags Flags (none currently defined) * * Return value: * * none */-typedef void (*pthreadDebugEventBugcheck_t) ( pthreadDebugEvent_t, pthreadDebugId_t, char *, void *, void *, unsigned long);/*C * DECthreads last-chance handler (exception not handled by thread) * * Arguments: *( * event PTHREAD_DEBUG_EVENT_LASTCHANCE# * thread Thread's sequence number * spare1 Unused argument * spare2 Unused argument * spare3 Unused argument>6( * flags Flags (none currently defined) * * Return value: * * none *//typedef void (*pthreadDebugEventLastchance_t) ( pthreadDebugEvent_t, pthreadDebugId_t, void *, void *, void *, unsigned long);/* * TOOL reported condition * * Arguments: *& * event PTHREAD_DEBUG_EVENT_BUGCHECK- * thread Reporting thread's sequence number& * reason String describing condition@ * command ladebug commands (may be ignored by other debuggers) * spare Unused argument(?6 * flags Flags (none currently defined) * * Return value: * * none *//typedef void (*pthreadDebugEventToolReport_t) ( pthreadDebugEvent_t, pthreadDebugId_t, char *, char *, void *, unsigned long); /* * pthreadDebugEventGetAddress *H * Get the address of a function in which the debugger can place a break@ * point in order to know that the specified event has occurred. * * Arguments: ** * debug_context The debug context to use- * event Event number (p@6threadDebugEvent_t)6 * address pointer to "void*" to receive bpt address * * Callbacks: * * GETMEM * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid% * ENOTSUP event code not supported */ extern intpthreadDebugEventGetAddress ( pthreadDebugContext_t, pthreadDebugEvent_t, pthreadDebugTargetAddr_p);/* * pthreadDebugEventGetGlobal *A * Get a bitmask representing the global events currently enabled * * ArgA6uments: ** * debug_context The debug context to use. * mask Event mask (pthreadDebugEventMask_t) * * Callbacks: * * GETMEM * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid */ extern intpthreadDebugEventGetGlobal ( pthreadDebugContext_t, pthreadDebugEventMask_p);/* * pthreadDebugEventGetThread *A * Get a bitmask representing the thread events currently enabled * * Arguments: ** * debug_context The debuB6g context to use4 * thread_id The thread for which to get event mask. * mask Event mask (pthreadDebugEventMask_t) * * Callbacks: * * GETMEM * * Return value: * * 0 Successful completion% * EINVAL debug context isn't valid */ extern intpthreadDebugEventGetThread ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugEventMask_p);/* * pthreadDebugEventClearGlobal *= * This routine disables global event reporting for an event. * * ArgumenC6ts: ** * debug_context The debug context to use- * event Event number (pthreadDebugEvent_t) * * Callbacks: *" * GETMEM, SETMEM, SUSPEND, RESUME * * Return value: * * 0 Successful completion. * EINVAL debug context or event isn't valid */ extern intpthreadDebugEventClearGlobal ( pthreadDebugContext_t, pthreadDebugEvent_t);/* * pthreadDebugEventSetGlobal *< * This routine enables global event reporting for an event. * * Arguments: ** * debD6ug_context The debug context to use- * event Event number (pthreadDebugEvent_t) * * Callbacks: *" * GETMEM, SETMEM, SUSPEND, RESUME * * Return value: * * 0 Successful completion. * EINVAL debug context or event isn't valid */ extern intpthreadDebugEventSetGlobal ( pthreadDebugContext_t, pthreadDebugEvent_t);/* * pthreadDebugEventClearThread *> * This routine disables event reporting for a specific thread * * Arguments: ** * debug_context ThE6e debug context to use5 * thread_id The thread for which to clear the event- * event Event number (pthreadDebugEvent_t) * * Callbacks: *" * GETMEM, SETMEM, SUSPEND, RESUME * * Return value: * * 0 Successful completion * ESRCH thread not found. * EINVAL debug context or event isn't valid */ extern intpthreadDebugEventClearThread ( pthreadDebugContext_t, pthreadDebugId_t, pthreadDebugEvent_t);/* * pthreadDebugEventSetThread *= * This routF6ine enables event reporting for a specific thread * * Arguments: ** * debug_context The debug context to use3 * thread_id The thread for which to set the event- * event Event number (pthreadDebugEvent_t) * * Callbacks: *" * GETMEM, SETMEM, SUSPEND, RESUME * * Return value: * * 0 Successful completion * ESRCH thread not found. * EINVAL debug context or event isn't valid */ extern intpthreadDebugEventSetThread ( pthreadDebugContext_t, pthreadDebG6ugId_t, pthreadDebugEvent_t);/* * TRACE STREAM SUPPORT *K * Following is a set of interfaces to access a DECthreads log engine traceI * stream. This trace stream may be specified as a file, or you may use aL * pthreadDebugContext_t to access the in-memory trace buffers of a threaded * process. */(typedef enum _pthreadDebugTraceFmt_tag {F PTHREAD_DEBUG_TRACE_FMT_TIME = 0x01, /* Show record's timestamp */C PTHREAD_DEBUG_TRACE_FMT_CYCLE = 0x02, /* Show machine cycl H6es */H PTHREAD_DEBUG_TRACE_FMT_SIZE = 0x04, /* Show record position/size */? PTHREAD_DEBUG_TRACE_FMT_STACK = 0x08, /* Show call stack */K PTHREAD_DEBUG_TRACE_FMT_ABSTIME = 0x10 /* Show timestamp as absolute */ } pthreadDebugTraceFmt_t;+typedef enum _pthreadDebugTraceDetail_tag {7 PTHREAD_DEBUG_TRACE_DETAIL_NONE, /* event names */@ PTHREAD_DEBUG_TRACE_DETAIL_BRIEF, /* scalar args, seq #s */@ PTHREAD_DEBUG_TRACE_DETAIL_MID, /* Add names, some state */; PTHREA I6D_DEBUG_TRACE_DETAIL_NORMAL, /* Normal detail */5 PTHREAD_DEBUG_TRACE_DETAIL_FULL /* All detail */ } pthreadDebugTraceDetail_t;+typedef enum _pthreadDebugTraceSetHow_tag {C PTHREAD_DEBUG_TRACE_SETHOW_REPLACE, /* Replace current mask */; PTHREAD_DEBUG_TRACE_SETHOW_SET, /* Add bits to mask */@ PTHREAD_DEBUG_TRACE_SETHOW_CLEAR /* Clear bits from mask */ } pthreadDebugTraceSetHow_t;(typedef void *pthreadDebugTraceHandle_t;)typedef void **pthreadDebugTraceHandle_pJ6;/*4 * The common header of a log engine's trace record. * * NOTES:? * flags OR-ed enum values from pthreadTraceLogHeadFlags_t type: * argp Pointer to "raw" event args (usually use iterator): * pc Pointer to array of PC values (stack trace)8 * name The event name specified at event point (if any)F * evtname Formatted "canonical" name for event ("mutex.lock.request") */*typedef struct pthreadDebugTraceHead_tag {= pthreadTraceEvent_t event; /* Trace point identifier * K6/= pthreadTraceId_t thread; /* Thread that logged event */? pthreadDebugUlong_t sequence; /* Record sequence number */; pthreadTraceTimestamp_t timestamp; /* Timestamp data */; unsigned char flags; /* pthreadTraceLogHeadFlags_t */; unsigned char frames; /* Number of frames in trace */3 unsigned char argc; /* Number of arguments */@ const unsigned char *argt; /* Address of arg type array */8 const void *argp; /* Address of first argument */7 consL6t void * const *pc; /* Pointer to PC array */% char name[32]; /* Event name */. char evtname[32]; /* Event point name */8 } pthreadDebugTraceHead_t, *pthreadDebugTraceHead_p;/* * pthreadDebugTraceClose *I * This routine closes a trace stream opened with pthreadDebugTraceOpen() * * Arguments: *+ * trace_handle Pointer to returned handle * * Callbacks: * * FREE * * Return value: * * 0 Successful completion" * EINVAL trace handle not validM6 */ extern int3pthreadDebugTraceClose (pthreadDebugTraceHandle_t);/* * pthreadDebugTraceOpen *I * This routine opens a trace file for analysis. When you specify a traceB * file, you can access all data in the trace stream, from processH * creation. The callback structure must contain a valid version; it may@ * also contain malloc, free, output, and error callbacks. Other * callbacks are ignored. * * Arguments: *; * caller_context Uninterpreted data returned to callbacks.N6 * callbacks Structure of version & callbacks/ * trace_file Name of trace file (may be NULL)+ * trace_handle Pointer to returned handle * * Callbacks: * * MALLOC, FREE * * Return value: * * 0 Successful completion' * ENOMEM Can't allocate context info * ENOENT File not found * EVERSION Unsupported version" * (others from callbacks, if any) */ extern intpthreadDebugTraceOpen ( void *, pthreadDebugCallbacks_p, char *, pthreadDebugTraceHO6andle_p);/* * pthreadDebugTraceDestroy *8 * This routine destroys a trace stream initialized with * pthreadDebugTraceInit * * Arguments: ** * debug_context The debug context to use * * Callbacks: * * SUSPEND, FREE, GETMEM, RESUME * * Return value: * * 0 Successful completion# * EINVAL debug context not valid */ extern int1pthreadDebugTraceDestroy (pthreadDebugContext_t);/* * pthreadDebugTraceInit *H * Initializes a debug context for access toP6 the active log engine traceB * buffers (if any) in the process connected to the debug_context. * * Arguments: *# * trace_context New trace context* * debug_context The debug context to use * * Callbacks: *" * MALLOC, GETMEM, SUSPEND, RESUME * * Return value: * * 0 Successful completion' * ENOMEM Can't allocate context info! * EINVAL debug context invalid' * ESRCH target process isn't tracing" * (others from callbacks, if any) */ extern intpthreadDebugQ6TraceInit ( pthreadDebugTraceHandle_p, pthreadDebugContext_t);/* * pthreadDebugTraceSeqDestroy *F * This routine destroys a trace sequence iterator, after processing a * set of trace records. * * Arguments: *0 * trace_handle Pointer to trace context handle * * Callbacks: * * RESUME * * Return value: * * 0 Successful completion) * EBUSY Active traversal of wrong type1 * EINVAL trace context invalid, or no iterator */ extern int8pthreadDeb R6ugTraceSeqDestroy (pthreadDebugTraceHandle_t);/* * pthreadDebugTraceSeqInit *I * This routine creates a trace sequence iterator, to allow the caller toH * process the trace records in the active stream. Note that, unless theF * active trace stream is a file, the iterator may be unable to returnE * all records, as it can access only records currently in the target1 * process' address space (active trace buffers). *D * This routine will search the available trace stream for the first S6H * record with a sequence number greater than or equal to the "sequence"D * argument. If none can be found, ENOENT is returned; otherwise the? * first record is copied to the output buffer ("first_trace"). *H * The information returned (particularly the stack trace and arguments,F * to which the buffer contains only pointers) is valid only until the@ * iterator is advanced (by calling pthreadDebugTraceSeqNext) orD * destroyed (by calling pthreadDebugTraceSeqDestroy). To save traceF * inforT6mation for later use, the caller must copy the stack trace and * argument data elsewhere. *G * The caller must not modify the stack trace or argument data to which" * the trace record buffer points. * * Arguments: *0 * trace_handle Pointer to trace context handle. * sequence First sequence number (usually 0). * first_trace Pointer to trace record buffer * * Callbacks: * * SUSPEND, RESUME, GETMEM * * Return value: * * 0 Successful completion1 * EINVAL trace coU6ntext invalid, or no iterator1 * ENOMEM Unable to allocate internal resources& * ENOENT No trace records available */ extern intpthreadDebugTraceSeqInit ( pthreadDebugTraceHandle_t, unsigned long, pthreadDebugTraceHead_p);/* * pthreadDebugTraceSeqNext *D * This routine returns the next record (if any) of the trace stream3 * initialized by calling pthreadDebugTraceSeqInit. *H * The information returned (particularly the stack trace and arguments,F * to whic V6h the buffer contains only pointers) is valid only until the@ * iterator is advanced (by calling pthreadDebugTraceSeqNext) orD * destroyed (by calling pthreadDebugTraceSeqDestroy). To save traceF * information for later use, the caller must copy the stack trace and * argument data elsewhere. *G * The caller must not modify the stack trace or argument data to which" * the trace record buffer points. * * Arguments: *0 * trace_handle Pointer to trace context handle) * trace PointerW6 to trace record buffer * * Callbacks: * * none * * Return value: * * 0 Successful completion1 * EINVAL trace context invalid, or no iterator+ * ENOENT No more trace records available */ extern intpthreadDebugTraceSeqNext ( pthreadDebugTraceHandle_t, pthreadDebugTraceHead_p);/* * pthreadDebugTraceFormat *D * This routine creates an ASCII representation of the current trace@ * record, and writes it using the output callback (specified on@ * pthreX6adDebugTraceOpen either directly or through the use of a * debug_context). * * Arguments: *0 * trace_handle Pointer to trace context handle# * detail Level of detail desired * flags Formatting flags * * Callbacks: * * none * * Return value: * * 0 Successful completion7 * EINVAL Trace context invalid, or no current record( * ENOSYS No output callback available */ extern intpthreadDebugTraceFormat ( pthreadDebugTraceHandle_t, pthreadDebugTrY6aceDetail_t, pthreadDebugTraceFmt_t);/*! * pthreadDebugTraceArgSeqDestroy *: * This routine destroys a trace record argument iterator. * * Arguments: *0 * trace_handle Pointer to trace context handle) * trace Pointer to trace record buffer * * Callbacks: * * none * * Return value: * * 0 Successful completion1 * EINVAL trace context invalid, or no iterator */ extern int;pthreadDebugTraceArgSeqDestroy (pthreadDebugTraceHandle_t);/* * pthreadZ6DebugTraceArgSeqInit *F * This routine creates a trace record argument iterator, by which theA * caller may iterate through the current trace record arguments.A * (Instead of parsing the argument array directly from the trace * record.) * * Arguments: *0 * trace_handle Pointer to trace context handle8 * type Return PTHREAD_TRACE_TYPE_* value for argument) * size Return the size of the argument$ * data Return pointer to the data * * Callbacks: * * none * * Ret[6urn value: * * 0 Successful completion1 * EINVAL trace context invalid, or no iterator# * ENOENT No current trace record */ extern intpthreadDebugTraceArgSeqInit ( pthreadDebugTraceHandle_t, pthreadTraceType_p, size_t *, void * const *);/* * pthreadDebugTraceArgSeqNext *F * This routine returns the next argument in the current trace record. * * Arguments: *0 * trace_handle Pointer to trace context handle8 * type Return PTHREAD_TRACE_TYPE_\6* value for argument) * size Return the size of the argument$ * data Return pointer to the data * * Callbacks: * * none * * Return value: * * 0 Successful completion1 * EINVAL trace context invalid, or no iterator * ENOENT No more arguments */ extern intpthreadDebugTraceArgSeqNext ( pthreadDebugTraceHandle_t, pthreadTraceType_p, size_t *, void * const *);/* * pthreadDebugTraceClassGet *C * This routine returns the trace class ma]6sk enabled for the target * process. * * Arguments: ** * debug_context The debug context to use * classes Pointer to mask * * Callbacks: * * GETMEM * * Return value: * * 0 Successful completion! * EINVAL debug context invalid */ extern intpthreadDebugTraceClassGet ( pthreadDebugContext_t, unsigned long *);/* * pthreadDebugTraceClassSet *H * This routine sets the trace class mask enabled for the target process * * Arguments: **^6 * debug_context The debug context to use * how set, clear, replace * classes new class mask * * Callbacks: *" * SUSPEND, RESUME, GETMEM, SETMEM * * Return value: * * 0 Successful completion( * ENOSYS Target process isn't tracing8 * EINVAL debug context invalid, or invalid class bits */ extern intpthreadDebugTraceClassSet ( pthreadDebugContext_t, pthreadDebugTraceSetHow_t, unsigned long);/* * pthreadDebugTraceLoad *C * This routine requ_6ests that the target process load a (new) trace * engine, and initialize it. * * Arguments: ** * debug_context The debug context to use! * library Name of trace engine$ * argc Count of arguments in argv/ * argv Pointer to array of argument pointers * * Callbacks: *" * SETMEM, GETMEM, SUSPEND, RESUME * * Return value: * * 0 Successful completion( * ENOSYS Target process isn't tracing8 * EINVAL debug context invalid, or invalid class bits */ extern int`6pthreadDebugTraceLoad ( pthreadDebugContext_t, char *, int, char *[]);/* * End of TRACE STREAM SUPPORT *//* * PROFILING HOOKS *L * The following section deserves a separate header, but I'm crunching it inL * here for now because the interfaces share some symbols and types with the * other debug interfaces. *K * The earlier part of this header was dedicated to interfaces supported byM * the debug assistant library, for use by debugger code that runs a6 in anotherJ * process. The following interfaces are for profilers that run within theF * DECthreads process. They are minimal and preliminary at this point. *F * BEWARE: the in-process hook routines are called in places where theM * DECthreads scheduling database may be LOCKED. You CANNOT make any calls toN * the thread library, or to libc, within the hook routine. (This should be OK? * for ATOM tools, but probably not for much of anything else.) *//*G * Prototypes showing the argub6ments passed to the hook routines (set by * __pthread_debug_set_hook). *//*4 * Thread is activating (running for the first time) *( * event PTHREAD_DEBUG_EVENT_ACTIVATING' * thread The new thread's TEB pointer- * start_routine Address of the start routine6 * start_argument The argument passed to start_routine * spare Unused( * flags Flags (none currently defined) */.typedef void (*pthreadDebugHookActivating_t) ( pthreadDebugEvent_t, pthread_t, void *(*) (void *),c6 void *, void *, unsigned long);/* * Thread is blocking *& * event PTHREAD_DEBUG_EVENT_BLOCKING# * thread The thread's TEB pointer. * substate One of KERNEL, MUTEX, CV, TIMED_CV. * object Address of blocking object, or NULL * spare Unused( * flags Flags (none currently defined) */,typedef void (*pthreadDebugHookBlocking_t) ( pthreadDebugEvent_t, pthread_t, pthreadDebugSubstate_t, void *, void *, unsigned long);/* * Thread is being created *& * eved6nt PTHREAD_DEBUG_EVENT_CREATING, * thread The creating thread's TEB pointer* * new_thread The new thread's TEB pointer- * start_routine Address of the start routine2 * start_argument Argument passed to start routine( * flags Flags (none currently defined) */,typedef void (*pthreadDebugHookCreating_t) ( pthreadDebugEvent_t, pthread_t, pthread_t, void *(*) (void *), void *, unsigned long);/*= * Thread is running (after having blocked or been preempted) *% * event PTe6HREAD_DEBUG_EVENT_RUNNING# * thread The thread's TEB pointer& * substate Thread's previous substate+ * previous TEB pointer for previous thread * spare Unused# * flags Flags (preempted, kernel) */+typedef void (*pthreadDebugHookRunning_t) ( pthreadDebugEvent_t, pthread_t, pthreadDebugSubstate_t, pthread_t, void *, unsigned long);/* * Thread is terminating *) * event PTHREAD_DEBUG_EVENT_TERMINATING# * thread The thread's TEB pointer7 * substate Reason forf6 termination: normal, term_cancel, * (cancelled) or term_exit (pthread_exit) * result Thread's result value * spare Unused * flags Flags (locks) *//typedef void (*pthreadDebugHookTerminating_t) ( pthreadDebugEvent_t, pthread_t, pthreadDebugSubstate_t, void *, void *, unsigned long);/*+ * The DECthreads code has been initialized *) * event PTHREAD_DEBUG_EVENT_INITIALIZED- * thread TEB pointer of initializing thread * spare Unused * spare Unused * sg6pare Unused( * flags Flags (none currently defined) *//typedef void (*pthreadDebugHookInitialized_t) ( pthreadDebugEvent_t, pthread_t, void *, void *, void *, unsigned long);/*! * Thread is freeing a zombie TCB * * Arguments: *% * event PTHREAD_DEBUG_EVENT_FREEING * thread Thread's TEB pointer# * freed TEB of thread being freed * spare Unused * spare Unused( * flags Flags (none currently defined) * * Return value: * * none */+typedef voh6id (*pthreadDebugHookFreeing_t) ( pthreadDebugEvent_t, pthread_t, pthread_t, void *, void *, unsigned long);/*4 * Thread is unblocked from a wait (CV, Mutex, etc.) * * Arguments: *% * event PTHREAD_DEBUG_EVENT_UNBLOCK* * thread Unblocking thread's TEB pointer. * substate One of KERNEL, MUTEX, CV, TIMED_CV. * unblock Unblocked thread's sequence number * spare Unused( * flags Flags (none currently defined) * * Return value: * * none */+typedef void (i6*pthreadDebugHookUnblock_t) ( pthreadDebugEvent_t, pthread_t, pthreadDebugSubstate_t, pthread_t, void *, unsigned long);/*4 * DECthreads bugcheck (unrecoverable inconsistency) * * Arguments: *& * event PTHREAD_DEBUG_EVENT_BUGCHECK+ * thread Bugchecking thread's TEB pointer# * reason String describing reason * spare Unused argument * spare Unused argument( * flags Flags (none currently defined) * * Return value: * * none */,typedef void (*pthrej6adDebugHookBugcheck_t) ( pthreadDebugEvent_t, pthread_t, char *, void *, void *, unsigned long);/*C * DECthreads last-chance handler (exception not handled by thread) * * Arguments: *( * event PTHREAD_DEBUG_EVENT_LASTCHANCE * thread Thread's TEB pointer * spare1 Unused argument * spare2 Unused argument * spare3 Unused argument( * flags Flags (none currently defined) * * Return value: * * none */.typedef void (*pthreadDebugHookLastchance_t) ( pk6threadDebugEvent_t, pthread_t, void *, void *, void *, unsigned long); extern int2__pthread_debug_clear_event (pthreadDebugEvent_t); extern int__pthread_debug_set_hook ( pthreadDebugEvent_t, void *); extern int0__pthread_debug_set_event (pthreadDebugEvent_t);/*/ * Restore the pointer size environment for VMS */#ifdef _PTHREAD_DEBUG_ENV_VMS*# pragma __required_pointer_size __restore#endif#ifdef __cplusplus }#endif#endif /* _PTHREAD_DEBUG_H_ */ww m6/*J *************************************************************************J * *J * Copyright 1990, 2004 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * n6 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *Jo6 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * p6 *J ************************************************************************* *//*[ * @(#)$RCSfile: pthread_exc.h,v $ $Revision: 1.1.23.5 $ (DEC) $Date: 2003/04/24 13:15:20 $ *//* * FACILITY: * * DECthreads core * * ABSTRACT: *A * External definitions for DECthreads POSIX 1003.4a/D4 exception? * services (ALL are non-standard, in that while resembling theG * 1003.4a/D4 interfaces they report error by raising exceptions rather( * than returning #q6-1 and setting errno). * * AUTHORS: * * Paul Curtin * Dave Butenhof * * CREATION DATE: * * 27 August 1990 * * MODIFIED BY: * * Dave Butenhof * Paul Clark * Paul Curtin * Steve Johnson * Brian Keane * Peter Portante * Webb Scales * * LAST MODIFIED: * * 16 September 1998 */ #ifndef PTHREAD_EXC#define PTHREAD_EXC#ifdef __cplusplus extern "C" {#endifE#if defined(vms) || defined(__vms) || defined(VMS) || defined(__VMS) # inclr6ude # ifndef _TIMESPEC_T_# define _TIMESPEC_T_# ifndef __TIMESPEC# define __TIMESPECstruct timespec {( unsigned long tv_sec; /* seconds */$ long tv_nsec; /* nanoseconds */ };# endif# ifndef __TIMESPEC_T# define __TIMESPEC_T#typedef struct timespec timespec_t;# endif# endif#else# include # include #endif/*1 * The implementation makes these basic decisions */#ifndef _POSIX_THREADS# define _POSIX_THREs6ADS 1#endif$#ifndef _POSIX_THREAD_ATTR_STACKSIZE(# define _POSIX_THREAD_ATTR_STACKSIZE 1#endif#if _CMA_POSIX_SCHED_-# define _POSIX_THREADS_REALTIME_SCHEDULING 11#elif defined(_POSIX_THREADS_REALTIME_SCHEDULING)*# undef _POSIX_THREADS_REALTIME_SCHEDULING#endif,#ifndef _POSIX_THREADS_PER_PROCESS_SIGNALS_1/# define _POSIX_THREADS_PER_PROCESS_SIGNALS_1 1#endifD#if ((_CMA_COMPILER_ != _CMA__DECCPLUS) && (_CMS_OS_ == _CMA__UNIX))/*I * Implement push and pop for cancellationt6 handlers, using the compiler's! * native try/finally constructs. */0# define pthread_cleanup_push(_routine_,_arg_) \ { \C pthread_cleanup_t _XXX_proc = (pthread_cleanup_t)(_routine_); \8 pthread_addr_t _XXX_arg = (pthread_addr_t)(_arg_); \ int _XXX_completed = 0; \ try {)# define pthread_cleanup_pop(_execute_) \ _XXX_completed = 1;} \ finally { \@ if ((! _XXX_completed) || (_execute_)) _XXX_proc (_XXX_arg);} \ }#else/*I * Implement push anu6d pop for cancellation handlers, using TRY and ENDTRY */0# define pthread_cleanup_push(_routine_,_arg_) \ { \C pthread_cleanup_t _XXX_proc = (pthread_cleanup_t)(_routine_); \8 pthread_addr_t _XXX_arg = (pthread_addr_t)(_arg_); \ int _XXX_completed = 0; \ TRY {)# define pthread_cleanup_pop(_execute_) \ _XXX_completed = 1;} \ FINALLY { \@ if ((! _XXX_completed) || (_execute_)) _XXX_proc (_XXX_arg);} \ ENDTRY}#endif/*E * Macros used to convertv6 normal pthread routine calls to exception L * returning routines. This is done by including this file, pthread_exc.h, * in the place of pthread.h. */%#define pthread_equal_np(__t1,__t2) \ ptdexc_equal (__t1,__t2)"#define pthread_equal(__t1,__t2) \ ptdexc_equal (__t1,__t2)%#define pthread_attr_create(__attr) \ ptdexc_attr_create (__attr)%#define pthread_attr_delete(__attr) \ ptdexc_attr_delete (__attr)9#define pthread_attr_setdetach_np(__attr,__detachsw6tate) \3 ptdexc_attr_setdetach_np (__attr,__detachstate)+#define pthread_attr_getdetach_np(__attr) \% ptdexc_attr_getdetach_np (__attr)1#define pthread_attr_setprio(__attr,__priority) \+ ptdexc_attr_setprio (__attr,__priority)&#define pthread_attr_getprio(__attr) \ ptdexc_attr_getprio (__attr)3#define pthread_attr_setsched(__attr,__scheduler) \- ptdexc_attr_setsched (__attr,__scheduler)'#define pthread_attr_getsched(__attr) \! ptdexc_attr_getsched (__atx6tr)8#define pthread_attr_setinheritsched(__attr,__inherit) \2 ptdexc_attr_setinheritsched (__attr,__inherit).#define pthread_attr_getinheritsched(__attr) \( ptdexc_attr_getinheritsched (__attr)7#define pthread_attr_setstacksize(__attr,__stacksize) \1 ptdexc_attr_setstacksize (__attr,__stacksize)+#define pthread_attr_getstacksize(__attr) \% ptdexc_attr_getstacksize (__attr):#define pthread_attr_setguardsize_np(__attr,__guardsize) \4 ptdexc_attr_setguardsize_np (_y6_attr,__guardsize).#define pthread_attr_getguardsize_np(__attr) \( ptdexc_attr_getguardsize_np (__attr)1#define pthread_bind_to_cpu_np(__thread,__mask) \+ ptdexc_bind_to_cpu_np (__thread,__mask)?#define pthread_create(__thread,__attr,__start_routine,__arg) \9 ptdexc_create (__thread,__attr,__start_routine,__arg)"#define pthread_detach(__thread) \ ptdexc_detach (__thread) #define pthread_exit(__status) \ ptdexc_exit (__status)6#define pthread_get_expiration_nz6p(__delta,__abstime) \0 ptdexc_get_expiration_np (__delta,__abstime))#define pthread_join(__thread,__status) \# ptdexc_join (__thread,__status).#define pthread_setprio(__thread,__priority) \( ptdexc_setprio (__thread,__priority)?#define pthread_setscheduler(__thread,__scheduler,__priority) \9 ptdexc_setscheduler (__thread,__scheduler,__priority)#define pthread_yield() \ ptdexc_yield ()#define pthread_self() \ ptdexc_self ()(#define pthread_getunique_{6np(__thread) \" ptdexc_getunique_np (__thread)##define pthread_getprio(__thread) \ ptdexc_getprio (__thread)(#define pthread_getscheduler(__thread) \" ptdexc_getscheduler (__thread)*#define pthread_mutexattr_create(__attr) \$ ptdexc_mutexattr_create (__attr)*#define pthread_mutexattr_delete(__attr) \$ ptdexc_mutexattr_delete (__attr)5#define pthread_mutexattr_setkind_np(__attr,__kind) \/ ptdexc_mutexattr_setkind_np (__attr,__kind).#define pthread_mutexatt|6r_getkind_np(__attr) \( ptdexc_mutexattr_getkind_np (__attr)9#define pthread_mutexattr_setmetered_np(__attr,__meter) \3 ptdexc_mutexattr_setmetered_np (__attr,__meter)1#define pthread_mutexattr_getmetered_np(__attr) \+ ptdexc_mutexattr_getmetered_np (__attr),#define pthread_mutex_init(__mutex,__attr) \& ptdexc_mutex_init (__mutex,__attr)(#define pthread_mutex_destroy(__mutex) \" ptdexc_mutex_destroy (__mutex)%#define pthread_mutex_lock(__mutex) \ ptdexc_mut}6ex_lock (__mutex)(#define pthread_mutex_trylock(__mutex) \" ptdexc_mutex_trylock (__mutex)'#define pthread_mutex_unlock(__mutex) \! ptdexc_mutex_unlock (__mutex))#define pthread_condattr_create(__attr) \# ptdexc_condattr_create (__attr))#define pthread_condattr_delete(__attr) \# ptdexc_condattr_delete (__attr)*#define pthread_cond_init(__cond,__attr) \$ ptdexc_cond_init (__cond,__attr)&#define pthread_cond_destroy(__cond) \ ptdexc_cond_destroy (__cond)~6(#define pthread_cond_broadcast(__cond) \" ptdexc_cond_broadcast (__cond)%#define pthread_cond_signal(__cond) \ ptdexc_cond_signal (__cond),#define pthread_cond_signal_int_np(__cond) \& ptdexc_cond_signal_int_np (__cond)#if _CMA_OS_ == _CMA__UNIX8# define pthread_cond_sig_preempt_int_np(__cond,__arg) \. ptdexc_cond_sigprmpt_int_np (__cond,__arg)#else2# define pthread_cond_sig_preempt_int_np(__cond) \( ptdexc_cond_sigprmpt_int_np (__cond)#endif+#define pthr6ead_cond_wait(__cond,__mutex) \% ptdexc_cond_wait (__cond,__mutex):#define pthread_cond_timedwait(__cond,__mutex,__abstime) \4 ptdexc_cond_timedwait (__cond,__mutex,__abstime)3#define pthread_once(__once_block,__init_routine) \- ptdexc_once (__once_block,__init_routine)/#define pthread_keycreate(__key,__destructor) \) ptdexc_keycreate (__key,__destructor),#define pthread_setspecific(__key,__value) \& ptdexc_setspecific (__key,__value),#define pthread_getspecifi6c(__key,__value) \& ptdexc_getspecific (__key,__value)"#define pthread_cancel(__thread) \ ptdexc_cancel (__thread)#define pthread_testcancel() \ ptdexc_testcancel ())#define pthread_setasynccancel(__state) \# ptdexc_setasynccancel (__state)$#define pthread_setcancel(__state) \ ptdexc_setcancel (__state)&#define pthread_delay_np(__interval) \ ptdexc_delay_np (__interval)"#define pthread_lock_global_np() \ ptdexc_lock_global_np ()$#define pthread_6unlock_global_np() \ ptdexc_unlock_global_np ()# if _CMA_OS_ != _CMA__VMSD# define pthread_sig_to_can_thread_np(__sigset,__target,__thread) \< ptdexc_sig_to_can_thread_np (__sigset,__target,__thread):# define pthread_signal_to_cancel_np(__sigset,__target) \2 ptdexc_signal_to_cancel_np (__sigset,__target)# endif/*- * Sample decisions for the environment types */!typedef cma_t_key pthread_key_t;&typedef cma_t_address pthread_addr_t;/*( * For compatibility6 with OSF/1 pthreads */typedef pthread_addr_t any_t;7typedef void (*pthread_cleanup_t) (pthread_addr_t arg);/*F * Sample decision for a one-time initialization control block and its * initialization macro. *6 * Declare a one time initialization control block as: *3 * static pthread_once_t block = pthread_once_init; */"typedef cma_t_once pthread_once_t;'#define pthread_once_init cma_once_init#define CANCEL_ON 1#define CANCEL_OFF 0/*5 * The following are the p6ortable pthread definitions *//* * Operations on Handles *//*# * Operations on attributes objects */"typedef cma_t_attr pthread_attr_t;/*I * An attributes object is created to specify the attributes of other CMA * objects that will be created. */void _CMA_CALL_*ptdexc_attr_create (pthread_attr_t *attr);/*C * An attributes object can be deleted when it is no longer needed. */void _CMA_CALL_*ptdexc_attr_delete (pthread_attr_t *attr);/* * O6perations on threads */ typedef cma_t_thread pthread_t;3typedef cma_t_start_routine pthread_startroutine_t;.typedef pthread_startroutine_t pthread_func_t;6#define PTHREAD_INHERIT_SCHED (int)cma_c_sched_inherit:#define PTHREAD_DEFAULT_SCHED (int)cma_c_sched_use_default:#define PTHREAD_CREATE_JOINABLE (int)cma_c_create_joinable:#define PTHREAD_CREATE_DETACHED (int)cma_c_create_detached#if !_CMA_RT4_KTHREAD_%# define SCHED_FIFO cma_c_sched_fifo!# define SCHED_RR cma_c_sched_rr6,# define SCHED_OTHER cma_c_sched_throughput,# define SCHED_FG_NP cma_c_sched_throughput,# define SCHED_BG_NP cma_c_sched_background#endif)#define PRI_FIFO_MIN cma_c_prio_fifo_min)#define PRI_FIFO_MAX cma_c_prio_fifo_max%#define PRI_RR_MIN cma_c_prio_rr_min%#define PRI_RR_MAX cma_c_prio_rr_max-#define PRI_FG_MIN_NP cma_c_prio_through_min-#define PRI_FG_MAX_NP cma_c_prio_through_max*#define PRI_BG_MIN_NP cma_c_prio_back_min*#define PRI_BG_MAX_NP cma_c_prio_back_max-#def6ine PRI_OTHER_MIN cma_c_prio_through_min-#define PRI_OTHER_MAX cma_c_prio_through_maxint _CMA_CALL_+ptdexc_equal ( /* Compare two handles */ pthread_t handle1, pthread_t handle2);/*2 * Operations to define thread creation attributes *//*- * Set or obtain the default thread priority. */void _CMA_CALL_ptdexc_attr_setprio ( pthread_attr_t *attr, int priority);int _CMA_CALL_*ptdexc_attr_getprio (pthread_attr_t attr);/*1 * Set or obtain the default6 scheduling algorithm */void _CMA_CALL_ptdexc_attr_setsched ( pthread_attr_t *attr, int scheduler);int _CMA_CALL_ptdexc_attr_getsched ( pthread_attr_t attr);/*M * Set or obtain whether a thread will use the default scheduling attributes,, * or inherit them from the creating thread. */void _CMA_CALL_ptdexc_attr_setinheritsched ( pthread_attr_t *attr, int inherit);int _CMA_CALL_2ptdexc_attr_getinheritsched (pthread_attr_t attr);/*' * Set or obtain t6he default stack size */void _CMA_CALL_ptdexc_attr_setstacksize ( pthread_attr_t *attr, long stacksize);unsigned long _CMA_CALL_/ptdexc_attr_getstacksize (pthread_attr_t attr);/*' * Set or obtain the default guard size */void _CMA_CALL_ptdexc_attr_setguardsize_np ( pthread_attr_t *attr, long guardsize);unsigned long _CMA_CALL_2ptdexc_attr_getguardsize_np (pthread_attr_t attr);/*! * Set or obtain the detach state */void _CMA_CALL_ptdexc_attr_se6tdetach_np ( pthread_attr_t *attr, int detachstate);int _CMA_CALL_/ptdexc_attr_getdetach_np (pthread_attr_t attr);/*C * The following procedures can be used to control thread creation, * termination and deletion. *//*M * To create a thread object and runnable thread, a routine must be specifiedH * as the new thread's start routine. An argument may be passed to thisM * routine, as an untyped address; an untyped address may also be returned asL * the routine's value. A6n attributes object may be used to specify details* * about the kind of thread being created. */void _CMA_CALL_ptdexc_create ( pthread_t *thread, pthread_attr_t attr,& pthread_startroutine_t start_routine, pthread_addr_t arg);/*I * A thread object may be "detached" to specify that the return value and+ * completion status will not be requested. */void _CMA_CALL_"ptdexc_detach (pthread_t *thread);/* - * A thread may terminate it's own execution. */void _CM6A_CALL_$ptdexc_exit (pthread_addr_t status);/* K * A thread can await termination of another thread and retrieve the return * value of the thread. */void _CMA_CALL_ ptdexc_join ( pthread_t thread, pthread_addr_t *status);/* * Thread Scheduling Operations *//*A * The current user_assigned priority of a thread can be changed. */int _CMA_CALL_ptdexc_setprio ( pthread_t thread, int priority);/*L * The current user_assigned scheduler algorithm of a 6thread can be changed. */int _CMA_CALL_ptdexc_setscheduler ( pthread_t thread, int scheduler, int priority);/*L * A thread may tell the scheduler that its processor can be made available. */void _CMA_CALL_ptdexc_yield (void);/*@ * Bind a thread to a particular CPU on a multiprocessor system. */void _CMA_CALL_ptdexc_bind_to_cpu_np ( pthread_t thread, long cpu_mask);/* * Thread Information Operations *//*7 * A thread may obtain a copy of its6 own thread handle. */pthread_t _CMA_CALL_ptdexc_self (void);/*K * Obtain a thread's sequence number. This will usually be a unique integerK * across all threads within a process (until a large number of threads has * been created). */long _CMA_CALL_(ptdexc_getunique_np (pthread_t *thread);/*> * The current user_assigned priority of a thread can be read. */int _CMA_CALL_"ptdexc_getprio (pthread_t thread);/*I * The current user_assigned scheduler algorithm of 6a thread can be read. */int _CMA_CALL_'ptdexc_getscheduler (pthread_t thread);/* * Operations on Mutexes */,#define MUTEX_FAST_NP (int)cma_c_mutex_fast5#define MUTEX_RECURSIVE_NP (int)cma_c_mutex_recursive;#define MUTEX_NONRECURSIVE_NP (int)cma_c_mutex_nonrecursive'typedef cma_t_attr pthread_mutexattr_t;$typedef cma_t_mutex pthread_mutex_t;void _CMA_CALL_4ptdexc_mutexattr_create (pthread_mutexattr_t *attr);void _CMA_CALL_4ptdexc_mutexattr_delete (pthread_mutexat6tr_t *attr);void _CMA_CALL_ptdexc_mutexattr_setkind_np ( pthread_mutexattr_t *attr, int kind);int _CMA_CALL_7ptdexc_mutexattr_getkind_np (pthread_mutexattr_t attr);void _CMA_CALL_ ptdexc_mutexattr_setmetered_np ( pthread_mutexattr_t *attr, int meter);int _CMA_CALL_:ptdexc_mutexattr_getmetered_np (pthread_mutexattr_t attr);/* B * The following routines create, delete, lock and unlock mutexes. */void _CMA_CALL_ptdexc_mutex_init ( pthread_mutex_t 6*mutex, pthread_mutexattr_t attr);void _CMA_CALL_.ptdexc_mutex_destroy (pthread_mutex_t *mutex);void _CMA_CALL_+ptdexc_mutex_lock (pthread_mutex_t *mutex);int _CMA_CALL_.ptdexc_mutex_trylock (pthread_mutex_t *mutex);void _CMA_CALL_-ptdexc_mutex_unlock (pthread_mutex_t *mutex);/*$ * Operations on condition variables */&typedef cma_t_attr pthread_condattr_t;"typedef cma_t_cond pthread_cond_t;void _CMA_CALL_2ptdexc_condattr_create (pthread_condattr_t *attr);6void _CMA_CALL_2ptdexc_condattr_delete (pthread_condattr_t *attr);/*6 * A thread can create and delete condition variables. */void _CMA_CALL_ptdexc_cond_init ( pthread_cond_t *cond, pthread_condattr_t attr);void _CMA_CALL_+ptdexc_cond_destroy (pthread_cond_t *cond);/*@ * A thread can signal to and broadcast on a condition variable. */void _CMA_CALL_-ptdexc_cond_broadcast (pthread_cond_t *cond);void _CMA_CALL_*ptdexc_cond_signal (pthread_cond_t *cond);6void _CMA_CALL_1ptdexc_cond_signal_int_np (pthread_cond_t *cond);void _CMA_CALL_ptdexc_cond_sigprmpt_int_np (#if _CMA_OS_ == _CMA__UNIX pthread_cond_t *condition, pthread_addr_t scp);#else pthread_cond_t *condition);#endif/*K * A thread can wait for a condition variable to be signalled or broadcast. */void _CMA_CALL_ptdexc_cond_wait ( pthread_cond_t *cond, pthread_mutex_t *mutex);/* * Operations for timed waiting *//*= * A thread can perfor6m a timed wait on a condition variable. */int _CMA_CALL_ptdexc_cond_timedwait ( pthread_cond_t *cond, pthread_mutex_t *mutex, struct timespec *abstime);/*( * Operations for client initialization. */-typedef void (*pthread_initroutine_t) (void);void _CMA_CALL_ ptdexc_once ( pthread_once_t *once_block,% pthread_initroutine_t init_routine);/*$ * Operations for per-thread context */.typedef cma_t_destructor pthread_destructor_t;/*B * A unique per-thread6 context key can be obtained for the process */void _CMA_CALL_ptdexc_keycreate ( pthread_key_t *key," pthread_destructor_t destructor);/*C * A thread can set a per-thread context value identified by a key. */void _CMA_CALL_ptdexc_setspecific ( pthread_key_t key, pthread_addr_t value);/*H * A thread can retrieve a per-thread context value identified by a key. */void _CMA_CALL_ptdexc_getspecific ( pthread_key_t key, pthread_addr_t *value);/* * Ope6rations for alerts. *//*I * The current thread can request that a thread terminate it's execution. */void _CMA_CALL_!ptdexc_cancel (pthread_t thread);/*2 * The current thread can poll for alert delivery. */void _CMA_CALL_ptdexc_testcancel (void);/*C * The current thread can enable or disable alert delivery (PTHREADF * "cancels"); it can control "general cancelability" (CMA "defer") or< * just "asynchronous cancelability" (CMA "asynch disable"). */int _CMA6_CALL_"ptdexc_setasynccancel (int state);int _CMA_CALL_ptdexc_setcancel (int state); #ifndef _CMA_SUPPRESS_EXTERNALS_2_CMA_IMPORT_ pthread_attr_t pthread_attr_default;;_CMA_IMPORT_ pthread_mutexattr_t pthread_mutexattr_default;:_CMA_IMPORT_ pthread_condattr_t pthread_condattr_default;#endif/* * Define nonportable extensions */extern void _CMA_CALL_ptdexc_get_expiration_np ( struct timespec *delta, struct timespec *abstime);extern void _CMA_CALL_,ptdexc_delay_np (struct timespec *interval);extern void _CMA_CALL_ptdexc_lock_global_np (void);extern void _CMA_CALL_ptdexc_unlock_global_np (void);#if _CMA_OS_ != _CMA__VMSextern void _CMA_CALL_ptdexc_sig_to_can_thread_np ( sigset_t *sigset, pthread_t *target, pthread_t *thread);extern void _CMA_CALL_ptdexc_signal_to_cancel_np ( sigset_t *sigset, pthread_t *target);#endif#ifdef __cplusplus }#endif#endifww 6+/*J *************************************************************************J * *J * Copyright 1989, 2008 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * 6 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *J6 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * 6 *J ************************************************************************* *//*b * @(#)$RCSfile: pthread_exception.h,v $ $Revision: 1.1.37.17 $ (DEC) $Date: 2004/08/25 15:43:07 $ *//* * FACILITY: * * DECthreads core * * FILENAME: * * pthread_exception.h * * ABSTRACT: ** * Header file for exception handling in C * * AUTHORS: * * Eric Roberts * Bob Conti * Dave Butenhof * * CREATION DATE: * * 15 March 1989 * * MO6DIFIED BY: * * Dave Butenhof * Bob Conti * Paul Curtin * Webb Scales * Peter Portante * Brian Silver * Mark Simons * Richard Love * Tom Dahl * * LAST MODIFICATION DATE: * * 21 October 1999 */ /*E * This header file consists of two sections. The first is ANSI/POSIXM * "clean", with no names disallowed by the standards (all names either beginM * with "_" and a capital letter, or "__" and a lower case letter, or use theG * POSIX 1003.1c-1995 "extension" 6namespace "PTHREAD" prefix with "_NP"I * suffix or "pthread" prefix with "_np" suffix). The second contains theL * "namespace-polluting" (non-standard) definitions that we've traditionallyK * documented for client use -- TRY, ENDTRY, and so forth. The two sectionsI * each have separate "ifndef" tests, which allows this header file to beM * included twice by the same module (once for the clean definitions and onceK * for the polluting definitions) and have everything work out nicely. NoteI6 * that always includes this header, so a separate include ofJ * after will automatically activate theN * "unclean" definitions. (A strictly conforming standard application must notH * do this, since is not defined by any standard.) *E * Note that on Tru64 UNIX you cannot, currently, use this header ANDK * (for native compiler try/except/finally handling) unless youG * compile with _OSF_SOURCE defined. This is b6ecause is notJ * "namespace clean" for POSIX or XOPEN, and (because this header requiresM * definitions from ) in strict standards mode we need to "fake" a> * definition that will conflict with the actual definition inN * . This is OK, since, by default, all programs will be built withG * _OSF_SOURCE defined (by ), and a POSIX/XOPEN conformingM * program (defining _XOPEN_SOURCE=500 or _POSIX_C_SOURCE=199506L) should notJ * be including non-stan6dard headers like . If you must compileM * with c89, which automatically defines _XOPEN_SOURCE, but really don't wishN * to require a strict XOPEN namespace, you can add "-D_OSF_SOURCE" to the c89! * command to avoid this problem. */ #ifndef _PTHREAD_EXCEPTION_CLEAN!# define _PTHREAD_EXCEPTION_CLEAN# ifdef __cplusplus extern "C" {# endif/* * INCLUDE FILES */# if defined (__DECCXX)# define _PTHREAD_EXC_CXX# define _PTHREAD_EXC_DECCXX# elif def6ined (__cplusplus)# define _PTHREAD_EXC_CXX+# elif defined (__DECC) || defined (__decc)# define _PTHREAD_EXC_DECC!# elif defined (__INTEL_COMPILER)# define _PTHREAD_EXC_INTELC# endifI# if defined (VMS) || defined (__VMS) || defined (__vms) || defined (vms)# define _PTHREAD_EXC_VMS?# elif defined (__unix__) || defined (__unix) || defined (unix)# define _PTHREAD_EXC_UNIX# endif+# if defined (__alpha) || defined (__ALPHA)# define _PTHREAD_EXC_ALPHA# elif defined6 (__ia64__)# define _PTHREAD_EXC_IA64# endif># if defined (_PTHREAD_EXC_DECC) && defined (_PTHREAD_EXC_VMS)# pragma __extern_model __save(# pragma __extern_model __strict_refdef%# define _PTHREAD_EXC_IMPORT_ extern# include # else%# define _PTHREAD_EXC_IMPORT_ extern# endif/*L * Include the appropriate header files for the different operating systems. */# if defined (_PTHREAD_EXC_VMS)# include # include # endif# in6clude # include ?# if defined (_PTHREAD_EXC_UNIX) && defined (_PTHREAD_EXC_DECC)# ifdef _OSF_SOURCE<# include /* Must be after setjmp.h */# else%extern void *__exception_info (void);# endif!# define _PTHREAD_EXC_USE_NATIVE,# define _PTHREAD_NATIVE_TRY __builtin_try1# define _PTHREAD_NATIVE_EXCEPT __builtin_except3# define _PTHREAD_NATIVE_FINALLY __builtin_finally3# define _PTHREAD_NATIVE_INFO __exception_info ():# define _P6THREAD_NATIVE_HANDLE EXCEPTION_EXECUTE_HANDLER# endif/*L * This constant helps to identify a context block or exception created withI * DECthreads BL9 or later; the new structures include a version field to * better manage future changes. */O# define _PTHREAD_EXC_NEWMAGIC 0x45586732 /* Identify ctx block with version */<# define _PTHREAD_EXC_THDBASE (_PTHREAD_EXC_NEWMAGIC | 0x01)/*@ * Define version constants to be put into exception structures. *E * o V2 is for OpenVMS and 6non-native Tru64 UNIX exception handling.K * o V3 is for native Tru64 UNIX exception handling (as defined before the3 * __flags field was added to _pthreadExcExt_t).L * o V4 is for native Tru64 UNIX exception handling with the __flags field. *< * This code checks the version to see how it should behave. */# define _PTHREAD_EXC_VER_V2 2# define _PTHREAD_EXC_VER_V3 3# define _PTHREAD_EXC_VER_V4 4?# if defined (_PTHREAD_EXC_UNIX) && defined (_PTHREAD_EXC_DECC)2# define _PTHREAD6_EXC_VER_CUR _PTHREAD_EXC_VER_V4# else2# define _PTHREAD_EXC_VER_CUR _PTHREAD_EXC_VER_V2# endif/*L * NOTE: on UNIX systems, these status codes must be kept unique. We do thisM * arbitrarily by setting some high order bits which happen to be the same as * we use on VMS. */# if defined (_PTHREAD_EXC_VMS)+# define _PTHREAD_EXC_FACILITY 00020100000*# define _PTHREAD_STATUS_(_val_, _sev_) \K ((__pthreadStatus_t)(_PTHREAD_EXC_FACILITY | ((_val_) << 3) | (_sev_)))# else*# 6 define _PTHREAD_EXC_FACILITY 0x177db000*# define _PTHREAD_STATUS_(_val_, _sev_) \: ((__pthreadStatus_t)(_PTHREAD_EXC_FACILITY | (_val_)))# endif/*5 * Define all of the status codes used by DECthreads. *M * For VMS, these must remain in synch with the CMA_MESSAGE.MSG message file. *E * These values cannot be altered, as they have already been shipped! *//** * Messages directly related to exceptions */7# define __pthread_exception_s _PTHREAD_STATUS_ (1, 4)4# define6 __pthread_exccop_s _PTHREAD_STATUS_ (2, 4)7# define __pthread_uninitexc_s _PTHREAD_STATUS_ (3, 4)9# define __pthread_unkstatus_s _PTHREAD_STATUS_ (128, 4)9# define __pthread_exccoplos_s _PTHREAD_STATUS_ (129, 4)8# define __pthread_noexcmem_s _PTHREAD_STATUS_ (131, 4)/*I * These should be set to match with underlying system exception codes onA * platforms where that is appropriate (e.g., ss$_ codes on VMS). */# if defined (_PTHREAD_EXC_VMS)# pragma nostandard/*I * A few 6 of these codes are somewhat imaginary, since VMS doesn't supportG * condition codes that very closely approximate the sense of some UNIXI * signals. SIGTRAP, SIGABRT, and SIGEMT have no clear parallels, and theK * values chosen are fairly arbitrary. For two others, we chose what seemedM * close equivalents: SIGPIPE becomes "no mailbox", and SIGXFSZ becomes "disk * quota exceeded". */)# define __pthread_illaddr_s SS$_ACCVIO*# define __pthread_exquota_s SS$_EXQUOTA*# define __pt 6hread_insfmem_s SS$_INSFMEM(# define __pthread_nopriv_s SS$_NOPRIV(# define __pthread_normal_s SS$_NORMAL*# define __pthread_illinstr_s SS$_OPCDEC*# define __pthread_resaddr_s SS$_RADRMOD*# define __pthread_privinst_s SS$_OPCDEC*# define __pthread_resoper_s SS$_ROPRAND(# define __pthread_SIGTRAP_s SS$_BREAK(# define __pthread_SIGABRT_s SS$_ABORT(# define __pthread_SIGEMT_s SS$_COMPAT*# define __pthread_aritherr_s SS$_FLTOVF*# define __pthread_SIGSYS_s SS$_BADPARAM(# 6 define __pthread_SIGPIPE_s SS$_NOMBX)# define __pthread_excpu_s SS$_EXCPUTIM/# define __pthread_exfilsiz_s SS$_EXDISKQUOTA(# define __pthread_intovf_s SS$_INTOVF(# define __pthread_intdiv_s SS$_INTDIV(# define __pthread_fltovf_s SS$_FLTOVF(# define __pthread_fltdiv_s SS$_FLTDIV(# define __pthread_fltund_s SS$_FLTUND(# define __pthread_decovf_s SS$_DECOVF(# define __pthread_subrng_s SS$_SUBRNG*# define __pthread_stackovf_s SS$_STKOVF# pragma standard# else6# def 6ine __pthread_illaddr_s _PTHREAD_STATUS_ (5, 4)6# define __pthread_exquota_s _PTHREAD_STATUS_ (6, 4)6# define __pthread_insfmem_s _PTHREAD_STATUS_ (7, 4)5# define __pthread_nopriv_s _PTHREAD_STATUS_ (8, 4)5# define __pthread_normal_s _PTHREAD_STATUS_ (9, 1)8# define __pthread_illinstr_s _PTHREAD_STATUS_ (10, 4)7# define __pthread_resaddr_s _PTHREAD_STATUS_ (11, 4)8# define __pthread_privinst_s _PTHREAD_STATUS_ (12, 4)7# define __pthread_resoper_s _PTHREAD_STATUS_ (13, 4)7 6# define __pthread_SIGTRAP_s _PTHREAD_STATUS_ (14, 4)7# define __pthread_SIGABRT_s _PTHREAD_STATUS_ (15, 4)6# define __pthread_SIGEMT_s _PTHREAD_STATUS_ (16, 4)8# define __pthread_aritherr_s _PTHREAD_STATUS_ (17, 4)6# define __pthread_SIGSYS_s _PTHREAD_STATUS_ (18, 4)7# define __pthread_SIGPIPE_s _PTHREAD_STATUS_ (19, 4)5# define __pthread_excpu_s _PTHREAD_STATUS_ (20, 4)8# define __pthread_exfilsiz_s _PTHREAD_STATUS_ (21, 4)6# define __pthread_intovf_s _PTHREAD_STATUS_ (622, 4)6# define __pthread_intdiv_s _PTHREAD_STATUS_ (23, 4)6# define __pthread_fltovf_s _PTHREAD_STATUS_ (24, 4)6# define __pthread_fltdiv_s _PTHREAD_STATUS_ (25, 4)6# define __pthread_fltund_s _PTHREAD_STATUS_ (26, 4)6# define __pthread_decovf_s _PTHREAD_STATUS_ (27, 4)6# define __pthread_subrng_s _PTHREAD_STATUS_ (28, 4)8# define __pthread_stackovf_s _PTHREAD_STATUS_ (57, 4)# endif/*0 * Synonyms for signal-based exception statuses. */0# define __pthread_SIGIOT_s __p6thread_SIGABRT_s1# define __pthread_SIGSEGV_s __pthread_illaddr_s0# define __pthread_SIGBUS_s __pthread_resaddr_s1# define __pthread_SIGFPE_s __pthread_aritherr_s/** * Internal DECthreads exception statuses. */5# define __pthread_cancel_s _PTHREAD_STATUS_ (48, 4)3# define __pthread_exit_s _PTHREAD_STATUS_ (52, 4)/* ( * The DECthreads "uniplemented" status. */3# define _PTHREAD_UNIMP_S _PTHREAD_STATUS_ (61, 4) /* * TYPEDEFS */# if defined (_PTHREAD_EXC_V6MS)# ifdef __INITIAL_POINTER_SIZE)# pragma __required_pointer_size __save*# pragma __required_pointer_size __short# endif# endif8typedef void *__pthreadExcAddr_t, **__pthreadExcAddr_p;6typedef long __pthreadExcLong_t, *__pthreadExcLong_p;9typedef short __pthreadExcShort_t, *__pthreadExcShort_p;<typedef unsigned long __pthreadExcUns_t, *__pthreadExcUns_p;(typedef unsigned long __pthreadStatus_t;/*1 * Constants for the kind of an exception object. *K * There are *cu 6rrently* only two kinds. In the address-kind, the identity@ * of an exception object is its address; in the value-kind, the< * identity of an exception object is an integer, typically,8 * a system-defined-status-value. These coded kinds also> * serve as sentinels to help detect uninitialized exceptions. */!typedef enum __pthreadExcKind_t { _PTHREAD_EXC_KIND_NONE = 0,( _PTHREAD_EXC_KIND_ADDR = 0x02130455,) _PTHREAD_EXC_KIND_STATUS = 0x02130456 } __pthreadExcKind_t;# 6if defined (_PTHREAD_EXC_VMS)9typedef unsigned __int64 __pthreadExcJumpBuf_t[(14+8+3)];!# if defined (_PTHREAD_EXC_IA64)4typedef long double __pthreadExcJumpBufExt_t[(20)];# endif# else*typedef sigjmp_buf __pthreadExcJumpBuf_t;# endif# if defined (_PTHREAD_EXC_VMS)6typedef __int64 __pthreadExcArg_t, *__pthreadExcArg_p;# else3typedef long __pthreadExcArg_t, *__pthreadExcArg_p;# endif/*5 * Flags which are stored in the __flags field below. */D# define _PTHREAD_EX6C_FLG_NATEXC 0x1 /* __args pts to native exc */E# define _PTHREAD_EXC_FLG_HEAPARG 0x2 /* __args points to heap mem */ typedef struct __pthreadExcExt {" __pthreadExcLong_t __sentinel;" __pthreadExcShort_t __version; __pthreadExcShort_t __flags; # if defined (_PTHREAD_EXC_UNIX)5 unsigned int __reserved0; /* Alignment padding */# endif __pthreadExcAddr_t __extend; __pthreadExcArg_p __args; } __pthreadExcExt_t;'typedef struct __pthreadExcKindV1Addr { __6pthreadExcKind_t __kind; # if defined (_PTHREAD_EXC_UNIX)5 unsigned int __reserved0; /* Alignment padding */# endif! __pthreadExcAddr_t __address;" __pthreadExcUns_t __filler[6]; } __pthreadExcKindV1Addr_t;)typedef struct __pthreadExcKindV1Status { __pthreadExcKind_t __kind; # if defined (_PTHREAD_EXC_UNIX)5 unsigned int __reserved0; /* Alignment padding */# endif __pthreadExcUns_t __status;" __pthreadExcUns_t __filler[6];! } __pthreadExcKindV1St6atus_t;%typedef struct __pthreadExcKindAddr { __pthreadExcKind_t __kind; # if defined (_PTHREAD_EXC_UNIX)5 unsigned int __reserved0; /* Alignment padding */# endif! __pthreadExcAddr_t __address; __pthreadExcExt_t __ext; } __pthreadExcKindAddr_t;'typedef struct __pthreadExcKindStatus { __pthreadExcKind_t __kind; # if defined (_PTHREAD_EXC_UNIX)5 unsigned int __reserved0; /* Alignment padding */# endif __pthreadStatus_t __status; __pthreadE6xcExt_t __ext; } __pthreadExcKindStatus_t;%typedef union __pthreadExceptionObj { __pthreadExcKind_t __kind;* __pthreadExcKindV1Status_t __v1status;) __pthreadExcKindV1Addr_t __v1address;& __pthreadExcKindStatus_t __status;% __pthreadExcKindAddr_t __address;8 } __pthreadExceptionObj_t, *__pthreadExceptionObj_p;/*A * Constants for the state of handling in the current TRY clause. *K * The implementations of TRY/ENDTRY use the "NONE", "ACTIVE" and "HANDLED" 6M * states. The state variable defined by the TRY macro is set to "NONE" whenN * no exception has been raised, "ACTIVE" when one has been raised but has notL * been caught by a CATCH clause, and "HANDLED" after the exception has been+ * caught and handled by some CATCH clause. */"typedef enum __pthreadExcState_t {N _PTHREAD_EXC_STATE_ACTIVE = 0, /* This must be the 0 state, see pop_ctx */ _PTHREAD_EXC_STATE_NONE = 1,# _PTHREAD_EXC_STATE_HANDLED = 2,! _PTHREAD_EXC_STATE_POP6PED = 3 } __pthreadExcState_t;/* * Structure of a context block. *C * A context block is allocated in the current stack frame for eachB * TRY clause. These context blocks are linked to form a stack ofD * all current TRY blocks in the current thread. Each context blockC * contains a jump buffer for use by setjmp and longjmp. Note thatC * for binary compatibility reasonse the jump buffer must be at the * beginning. */# if defined (_PTHREAD_EXC_VMS)<# define _PTHREAD_E6XC_ARGS 160 / sizeof (__pthreadExcArg_t)# endif # if defined (_PTHREAD_EXC_UNIX)/*I * Define the maximum number of parameters we will save in the DECthreadsI * exception block. Also used to define the cut-off between the fast pathJ * storing of a native exception and the slow path (exceptions larger than0 * this number of arguments take the slow path). */# define _PTHREAD_EXC_ARGS 5/*K * Definition of a native Tru64 UNIX exception; a copy of system_exrec_typeD * from excpt. 6h (but that master definition is not included here for * namespace reasons). */#typedef struct __pthreadExcNative {5 long __exceptionCode; /* reason for exception */F __pthreadExcUns_t __exceptionFlags; /* in progress, e.g. unwind */> void *__exceptionRecord; /* rec chain, e.g.nested info */9 void *__exceptionAddress; /* where error occurred */J __pthreadExcUns_t __numberParameters; /* # of ExceptionInformation's*/@ __pthreadExcUns_t __exceptionInformation[_PTHREAD_ 6EXC_ARGS]; } __pthreadExcNative_t;# endif typedef struct __pthreadExcCtx {3 __pthreadExcJumpBuf_t __jmp; /* Jump buffer */J volatile struct __pthreadExcCtx *__link; /* Link to ctx block stack */M volatile __pthreadExceptionObj_t __cur_exception; /* Copy of exception */M volatile __pthreadExcState_t __exc_state; /* State of handling for TRY */# if defined (_PTHREAD_EXC_VMS)G __pthreadExcAddr_t __current_frame; /* Addr of curr stack frame */# endif # if defin 6ed (_PTHREAD_EXC_UNIX)6 unsigned int __reserved0; /* Alignment padding */# endif< __pthreadExcLong_t __sentinel; /* Identify ctx block */? __pthreadExcLong_t __version; /* Client context version */ # if defined (_PTHREAD_EXC_UNIX)F __pthreadExcNative_t __exrec_copy; /* Copy of small foreign exc */# endif# if defined (_PTHREAD_EXC_VMS)6 unsigned int __reserved1; /* Alignment padding */5 __pthreadExcArg_t __exc_args[_PTHREAD_EXC_ARGS];!# if defined (_PTHREAD_EX6C_IA64)G __pthreadExcJumpBufExt_t __jmpExt; /* IA-64 overflow jump buffer */C unsigned __int64 __current_invo; /* Estab's invo ctx handle */+ unsigned __int64 __spare0; /* Spare */+ unsigned __int64 __spare1; /* Spare */+ unsigned __int64 __spare2; /* Spare */+ unsigned __int64 __spare3; /* Spare */# endif# endif, } __pthreadExcCtx_t, *__pthreadExcCtx_p;/*J * On VMS IA-64, the exception context object allocated within a TRY blockJ * must be octaword 6(16 byte) aligned. This ensures that the extended jumpM * buffer within the context object is octaword aligned (so that the floating8 * point register spill locations are octaword aligned). */?# if defined (_PTHREAD_EXC_IA64) && defined (_PTHREAD_EXC_DECC)1# define __pthreadExcCtxAlign __align (octaword)# else# define __pthreadExcCtxAlign# endif# if defined (_PTHREAD_EXC_VMS)# ifdef __INITIAL_POINTER_SIZE,# pragma __required_pointer_size __restore# endif# endif6/* * EXTERNAL ROUTINES */A# if defined (_PTHREAD_EXC_VMS) && defined (_PTHREAD_CORE_BUILD_)1# define __pthread_exc_handler_np excCoreHandler# else9# define __pthread_exc_handler_np pthread_exc_handler_np# endif# if defined (_PTHREAD_EXC_VMS)@# if defined (_PTHREAD_EXC_IA64) && defined (_PTHREAD_EXC_DECC)B# define pthread_exc_savecontext_np __pthread_exc_savecontext_np# endifDextern int pthread_exc_savecontext_np (volatile unsigned __int64 *);# else!# if defined 6(_PTHREAD_EXC_UNIX)/*C * Tru64 UNIX already provides prototypes for setjmp and longjmp inJ * /usr/include/setjmp.h; the prototypes here must be compatible, so we'llM * just cast the volatile jump buffer inside the macro instead of defining an, * appropriate prototype as we do elsewhere. */C# define pthread_exc_savecontext_np(__env) sigsetjmp ((__env), 1)# else=# define pthread_exc_savecontext_np(__env) setjmp ((__env))# endif# endif/*/ * On VMS, use an extern functio6n to get the FP */# if defined (_PTHREAD_EXC_VMS)!# if defined (_PTHREAD_EXC_IA64)7extern unsigned __int64 pthread_exc_fetch_fp_np (void);# else9extern __pthreadExcAddr_t pthread_exc_fetch_fp_np (void);# endif# endif&# if defined (_PTHREAD_EXC_USE_NATIVE)"extern int pthread_exc_filter_np (7 __pthreadExcState_t, void *, __pthreadExceptionObj_p);# endifNextern void pthread_exc_get_message_np (__pthreadExceptionObj_p, int, char *);#extern int pthread_exc_matches_np (3 _ 6_pthreadExceptionObj_p, __pthreadExceptionObj_p);7extern void pthread_exc_pop_ctx_np (__pthreadExcCtx_p);8extern void pthread_exc_push_ctx_np (__pthreadExcCtx_p);;extern void pthread_exc_raise_np (__pthreadExceptionObj_p);<extern void pthread_exc_raise_status_np (__pthreadStatus_t);<extern void pthread_exc_report_np (__pthreadExceptionObj_p);J# if defined (_PTHREAD_EXC_VMS) && !defined (_PTHREAD_SUPPRESS_EXTERNALS_)/* * System condition handler *G * The declaration below is conditio 6nalized to allow for compilation onC * V7.1 systems. On OpenVMS V7.1, for the __NEW_STARLET case only,F * chf$mech_array equates to a type (CHFDEF2), whereas for the defaultD * (__OLD_STARLET) case, it equates to a structure tag. As of V7.2,F * chfdef.h was modified to equate chf$mech_array to the structure tag) * regardless of the __NEW_STARLET value. */# pragma nostandard extern int7# if (__VMS_VER < 70200000) && defined (__NEW_STARLET);__pthread_exc_handler_np (unsigned int[], 6chf$mech_array*);# elseB__pthread_exc_handler_np (unsigned int[], struct chf$mech_array*);# endif# pragma standard# endif/* * CONSTANTS AND MACROS *//*K * Define exception initializer macro. All exceptions *must* be initialized * using this macro. */ # if defined (_PTHREAD_EXC_UNIX).# define PTHREAD_EXCEPTION_INIT_NP(_e_) ( \= (_e_).__address.__address = (__pthreadExcAddr_t)&(_e_), \6 (_e_).__address.__kind = _PTHREAD_EXC_KIND_ADDR, \? (_e_).__addr 6ess.__ext.__sentinel = _PTHREAD_EXC_NEWMAGIC, \= (_e_).__address.__ext.__version = _PTHREAD_EXC_VER_CUR, \( (_e_).__address.__ext.__flags = 0, \, (_e_).__address.__ext.__reserved0 = 0, \> (_e_).__address.__ext.__extend = (__pthreadExcAddr_t)0L, \9 (_e_).__address.__ext.__args = (__pthreadExcArg_p)0L)# else.# define PTHREAD_EXCEPTION_INIT_NP(_e_) ( \= (_e_).__address.__address = (__pthreadExcAddr_t)&(_e_), \6 (_e_).__address.__kind = _PTHREAD_EXC_KIND_ADDR, \? 6(_e_).__address.__ext.__sentinel = _PTHREAD_EXC_NEWMAGIC, \= (_e_).__address.__ext.__version = _PTHREAD_EXC_VER_CUR, \( (_e_).__address.__ext.__flags = 0, \> (_e_).__address.__ext.__extend = (__pthreadExcAddr_t)0L, \9 (_e_).__address.__ext.__args = (__pthreadExcArg_p)0L)# endif/*J * Define a function to convert a portable address exception to a platform * specific status exception. */# if defined (_PTHREAD_EXC_VMS)0# define pthread_exc_set_status_np(_e_,_s_) ( \86 (_e_)->__status.__kind = _PTHREAD_EXC_KIND_STATUS, \0 (_e_)->__status.__status = ((_s_) & ~7) | 4)# else0# define pthread_exc_set_status_np(_e_,_s_) ( \8 (_e_)->__status.__kind = _PTHREAD_EXC_KIND_STATUS, \% (_e_)->__status.__status = (_s_))# endif/*M * Define "routine" to return the status of an exception. Returns 0 if statusB * kind (and value of status in *s), or EINVAL if not status kind. *//# define pthread_exc_get_status_np(_e_,_s_) ( \: (_e_)->__status.__6kind == _PTHREAD_EXC_KIND_STATUS ? \+ (*(_s_) = (_e_)->__status.__status, 0) : \ EINVAL)/*? * Define "statement" for clients to use to raise an exception. */<# define PTHREAD_RAISE_NP(_e_) pthread_exc_raise_np (&(_e_))# if defined (_PTHREAD_EXC_VMS)# pragma nostandard"# if defined (_PTHREAD_EXC_IA64)2# define pthread_exc_estab_field __current_invo# else3# define pthread_exc_estab_field __current_frame # endif0# define pthread_exc_establish_np(_exc_ctx_) \6E (_exc_ctx_)->pthread_exc_estab_field = pthread_exc_fetch_fp_np (); \* lib$establish (__pthread_exc_handler_np);# pragma standard0# define pthread_exc_unestablish_np(_exc_ctx_)# else-# define pthread_exc_establish_np(_exc_ctx_)/# define pthread_exc_unestablish_np(_exc_ctx_)# endif/*H * Define version constants to be put into exception context structures. *K * o V2 is for OpenVMS Alpha and non-native Tru64 UNIX exception handling.5 * o V3 is for native Tru64 UNIX exce 6ption handling.D * o V4 was added in Tru64 UNIX V4.0D (with the __reserved0 field).N * o V5 is for support of UNIX foreign exceptions (space added to hold a copy2 * of a small native exception with arguments).N * o V6 is for support of IA-64 under OpenVMS V8.0 and V8.1, which requires a * larger jump buffer.K * o V7 is for support of IA-64 under OpenVMS V8.2, which adds the current * invo field. *< * This code checks the version to see how it should behave. */# define6 _PTHREAD_EXC_CTX_V2 2# define _PTHREAD_EXC_CTX_V3 3# define _PTHREAD_EXC_CTX_V4 4# define _PTHREAD_EXC_CTX_V5 5# define _PTHREAD_EXC_CTX_V6 6# define _PTHREAD_EXC_CTX_V7 7&# if defined (_PTHREAD_EXC_USE_NATIVE)2# define _PTHREAD_EXC_CTX_CUR _PTHREAD_EXC_CTX_V5# else!# if defined (_PTHREAD_EXC_IA64)3# define _PTHREAD_EXC_CTX_CUR _PTHREAD_EXC_CTX_V7# else3# define _PTHREAD_EXC_CTX_CUR _PTHREAD_EXC_CTX_V2# endif# endif/*? * Start a new TRY block, which may cont 6ain exception handlers. * * For Tru64 UNIX: *E * Set up a native C "try {} except() {}" block. Note that previousG * implementations of TRY/ENDTRY on Tru64 UNIX used setjmp/longjmp asG * described below. We still have to use a context block to make sureG * pthread_exc_raise_np() will know how to raise the exception. So weM * allocate a context block on the stack to remember the current exception.I * Push it on the context block stack. Initialize this context block toG * 6 indicate that no exception is active. Then we enter the while loopF * surrounding the native try block. The try block guards a block ofG * statements ended by one of the following macros: CATCH, CATCH_ALL, * FINALLY or ENDTRY. * * For all other platforms: *M * Allocate a context block on the stack to remember the current exception.I * Push it on the context block stack. Initialize this context block toG * indicate that no exception is active. Do a SETJMP to snapshot t 6hisK * environment (or return to it). Then, start a block of statements to beF * guarded by the TRY clause. This block will be ended by one of the; * following macros: CATCH, CATCH_ALL, FINALLY or ENDTRY. */# if defined (_PTHREAD_EXC_VMS)$# define _PTHREAD_INIT_CTX(_ctx_) \5 PTHREAD_EXCEPTION_INIT_NP (_ctx_.__cur_exception); \; _ctx_.__cur_exception.__kind = _PTHREAD_EXC_KIND_STATUS; \/ _ctx_.__exc_state = _PTHREAD_EXC_STATE_NONE; \, _ctx_.__sentinel = _PTHREAD_EXC_NEWMAGIC;6 \* _ctx_.__version = _PTHREAD_EXC_CTX_CUR; \+ _ctx_.__exc_args[0] = (__pthreadExcArg_t)0# else$# define _PTHREAD_INIT_CTX(_ctx_) \5 PTHREAD_EXCEPTION_INIT_NP (_ctx_.__cur_exception); \; _ctx_.__cur_exception.__kind = _PTHREAD_EXC_KIND_STATUS; \/ _ctx_.__exc_state = _PTHREAD_EXC_STATE_NONE; \, _ctx_.__sentinel = _PTHREAD_EXC_NEWMAGIC; \' _ctx_.__version = _PTHREAD_EXC_CTX_CUR# endif&# if defined (_PTHREAD_EXC_USE_NATIVE)# define PTHREAD_TRY_NP \ { \$ __pthreadExcCtx_t 6__exc_ctx__; \& _PTHREAD_INIT_CTX (__exc_ctx__); \- pthread_exc_push_ctx_np (&__exc_ctx__); \E while (__exc_ctx__.__exc_state != _PTHREAD_EXC_STATE_HANDLED) { \ _PTHREAD_NATIVE_TRY { \> if (__exc_ctx__.__exc_state == _PTHREAD_EXC_STATE_NONE) {) /* user's block of code goes here */# else# define PTHREAD_TRY_NP \ { \9 __pthreadExcCtx_t __pthreadExcCtxAlign __exc_ctx__; \& _PTHREAD_INIT_CTX (__exc_ctx__); \- pthread_exc_push_ctx_np (&__exc_ctx__); \. 6 pthread_exc_establish_np (&__exc_ctx__); \: if (!pthread_exc_savecontext_np (__exc_ctx__.__jmp)) {% /* user's block of code goes here */# endif/*A * Define an PTHREAD_CATCH_NP(_e_) clause (or exception handler). * * For all platforms: *M * First, end the prior block. Then, check if the current exception matchesJ * what the user is trying to catch with the CATCH clause. If there is a@ * match, a variable is declared to support lexical nesting ofM * PTHREAD_RERAISE_N6P statements, and the state of the current exception is * changed to "handled". * * For Tru64 UNIX:L * Note we have to make sure we are in the correct state to deal with with * the exception at all. */&# if defined (_PTHREAD_EXC_USE_NATIVE)!# define PTHREAD_CATCH_NP(_e_) \ } \@ if ((__exc_ctx__.__exc_state == _PTHREAD_EXC_STATE_ACTIVE) \# && (pthread_exc_matches_np ( \> (__pthreadExceptionObj_p)&__exc_ctx__.__cur_exception, \ &(_e_)))) { \2 __pthre 6adExceptionObj_p PTHREAD_THIS_CATCH_NP = \= (__pthreadExceptionObj_p)&__exc_ctx__.__cur_exception; \6 __exc_ctx__.__exc_state = _PTHREAD_EXC_STATE_HANDLED;% /* user's block of code goes here */# else!# define PTHREAD_CATCH_NP(_e_) \ } \' else if (pthread_exc_matches_np ( \H (__pthreadExceptionObj_p)&__exc_ctx__.__cur_exception, &(_e_))) { \2 __pthreadExceptionObj_p PTHREAD_THIS_CATCH_NP = \: (__pthreadExceptionObj_p)&__exc_ctx__.__cur_exception; \6 __exc_ctx__.__exc_state6 = _PTHREAD_EXC_STATE_HANDLED;% /* user's block of code goes here */# endif/*A * Define an PTHREAD_CATCH_ALL_NP clause (or "catchall" handler). * * For all other platforms: *K * First, end the prior block. Then, unconditionally, let execution enterK * into the catchall code. As with a normal catch, a variable is declaredI * to support lexical nesting of PTHREAD_RERAISE_NP statements, and the< * state of the current exception is changed to "handled". * * For Tru64 U6NIX:L * Note we have to make sure we are in the correct state to deal with with * the exception at all. */&# if defined (_PTHREAD_EXC_USE_NATIVE) # define PTHREAD_CATCH_ALL_NP \ } \B if (__exc_ctx__.__exc_state == _PTHREAD_EXC_STATE_ACTIVE) { \3 __pthreadExceptionObj_p PTHREAD_THIS_CATCH_NP = \; (__pthreadExceptionObj_p)&__exc_ctx__.__cur_exception; \7 __exc_ctx__.__exc_state = _PTHREAD_EXC_STATE_HANDLED;& /* user's block of code goes here */# else # define PTHREA6D_CATCH_ALL_NP \ } \ else { \2 __pthreadExceptionObj_p PTHREAD_THIS_CATCH_NP = \: (__pthreadExceptionObj_p)&__exc_ctx__.__cur_exception; \6 __exc_ctx__.__exc_state = _PTHREAD_EXC_STATE_HANDLED;% /* user's block of code goes here */# endif/*) * Define a PTHREAD_RERAISE_NP statement. *C * This "statement" is valid only if lexically nested in a CATCH orF * CATCH_ALL clause. Reraise the current lexically visible exception. */H# define PTHREAD_RERAISE_NP pthread_exc_raise_np6 (PTHREAD_THIS_CATCH_NP)/*% * Define a PTHREAD_FINALLY_NP clause * * For all platforms: *N * This "keyword" starts a PTHREAD_FINALLY_NP clause. It must appear beforeN * an ENDTRY. A PTHREAD_FINALLY_NP clause will be entered after normal exitF * of the TRY block, or if an unhandled exception tries to propagate * out of the TRY block. *F * Unlike Modula 3's TRY clause, we do not expend overhead trying toO * enforce that FINALLY be mutually exclusive with CATCH clauses 6. Currently,L * if they are used together, then control will drop into a FINALLY clause$ * under the following conditions: * o normal exit from TRY,G * o an exception is raised and no CATCH is present (recommended usage)8 * o CATCH's are present but none matches the exception.> * o CATCH's are present and one matches the exception, but it. * does not raise or reraise any exceptions.N * That is, FINALLY is always entered after TRY unless a CATCH clause raises! * (or re-raises) an 6 exception. * * ** WARNING **I * You should *avoid* using FINALLY with CATCH clauses, that is, use itI * only as TRY {} FINALLY {} ENDTRY. Source code that combines CATCHesD * with FINALLY in the same TRY clause is considered "unsupported"D * -- that is, such code may be broken by a future version of this * package. *= * There are several reasons this restriction is necessary:? * o FINALLY may be added to C++ and its combination with CATCHK * clauses may have diff 6erent semantics than implemented by these macros.H * o The restriction is consistant with the same restriction in Modula 3C * o It allows the use of the 2-phase or "debugging" implementationB * technique of the SRC exception package for these same macros. */&# if defined (_PTHREAD_EXC_USE_NATIVE)# define PTHREAD_FINALLY_NP \ } \@ if (__exc_ctx__.__exc_state == _PTHREAD_EXC_STATE_NONE) { \* pthread_exc_pop_ctx_np (&__exc_ctx__); \9 __exc_ctx__.__exc_state = _PTHREAD_EXC_STATE6_HANDLED; \ } \ { \6 __pthreadExceptionObj_p PTHREAD_THIS_CATCH_NP = \< (__pthreadExceptionObj_p)&__exc_ctx__.__cur_exception;) /* user's block of code goes here */# else# define PTHREAD_FINALLY_NP \ } \= if (__exc_ctx__.__exc_state == _PTHREAD_EXC_STATE_NONE) \) pthread_exc_pop_ctx_np (&__exc_ctx__); \ { \2 __pthreadExceptionObj_p PTHREAD_THIS_CATCH_NP = \8 (__pthreadExceptionObj_p)&__exc_ctx__.__cur_exception;% /* user's block of code goes here */# 6endif/* * End the whole TRY clause * * For Tru64 UNIX:M * There are two main parts to the operation to this macro. The first thingK * we do is close of the previous block. Then we define the except clauseJ * for the native try/except block and then we close out the while loop.J * The while loop is used to drive the state machine which the TRY macroL * began to setup. If we have reached this point in the loop and the stateF * of the exception is "ACTIVE" we will raise th 6e exception to allowF * another frame to handle it. Note that we don't have to remove theK * context block from the stack since the process of raising an exceptionM * already does. If the state is "NONE" when we reach this point, we removeL * the context block and change our state to "HANDLED" so that we can exit * TRY block normally. *L * The except clause is what causes the state to be changed from "NONE" toM * "ACTIVE". When a native exception is raised, the except clause 6calls theL * filter routine to decide if the exception should be handled. The filterK * is called with the current state of our TRY block, the exception whichK * is being raised and the __pthreadExceptionObj_t structure to be filledF * in should we want to handle the exception. The filter asks if theH * exception is a native DECthreads exception being raised. If so, theL * exception structure is filled in and then exception facility called theL * exception block defined after t 6he except statement. The exception blockJ * simply changes the state of our TRY block from "NONE" to "ACTIVE". WeL * have now "caught" the exception and we loop back up to beginning of theK * TRY block and look for any CATCH blocks or a FINALLY block to execute. * * For all other platforms:I * We close off the block for the previous block and then tear down theE * context we established in the opening TRY. If an exception neverJ * occurred or we did not handle the exception, 6we pop the context blockM * off the context stack. Note that popping the context block off the stackK * will cause an exception to be raised if the context block describes an * unhandled exception. */&# if defined (_PTHREAD_EXC_USE_NATIVE)# define PTHREAD_ENDTRY_NP \ } \? if ((__exc_ctx__.__exc_state == _PTHREAD_EXC_STATE_NONE) \B || (__exc_ctx__.__exc_state == _PTHREAD_EXC_STATE_ACTIVE)) \* pthread_exc_pop_ctx_np (&__exc_ctx__); \9 __exc_ctx__.__exc_state = 6_PTHREAD_EXC_STATE_HANDLED; \ } \2 _PTHREAD_NATIVE_EXCEPT (pthread_exc_filter_np ( \ __exc_ctx__.__exc_state, \% (void *)_PTHREAD_NATIVE_INFO, \A (__pthreadExceptionObj_p)&__exc_ctx__.__cur_exception)) { \; __exc_ctx__.__exc_state = _PTHREAD_EXC_STATE_ACTIVE; \ } \ } \ }# else# define PTHREAD_ENDTRY_NP \ } \0 pthread_exc_unestablish_np (&__exc_ctx__); \> if ((__exc_ctx__.__exc_state == _PTHREAD_EXC_STATE_NONE) \A || (__exc_ctx__.__e6xc_state == _PTHREAD_EXC_STATE_ACTIVE)) \) pthread_exc_pop_ctx_np (&__exc_ctx__); \ }# endif/*! * Define the exception variables */T# if defined (__STDC__) || defined (_PTHREAD_EXC_DECC) || defined (_PTHREAD_EXC_CXX)7# define _PTHREAD_EXCNAME(name) pthread_exc_##name##_e3# define _PTHREAD_PTDNAME(name) pthread_##name##_e# else;# define _PTHREAD_EXCNAME(name) pthread_exc_/**/name/**/_e7# define _PTHREAD_PTDNAME(name) pthread_/**/name/**/_e# endifF# if !defined 6(_EXC_NO_EXCEPTIONS_) && !defined (_PTHREAD_CORE_BUILD_),_PTHREAD_EXC_IMPORT_ __pthreadExceptionObj_t! _PTHREAD_EXCNAME (uninitexc), _PTHREAD_EXCNAME (illaddr), _PTHREAD_EXCNAME (exquota), _PTHREAD_EXCNAME (insfmem), _PTHREAD_EXCNAME (nopriv), _PTHREAD_EXCNAME (illinstr), _PTHREAD_EXCNAME (resaddr), _PTHREAD_EXCNAME (privinst), _PTHREAD_EXCNAME (resoper), _PTHREAD_EXCNAME (SIGTRAP), _PTHREAD_EXCNAME (SIGABRT), _PTHREAD_EXCNAME (SIGEMT6), _PTHREAD_EXCNAME (aritherr), _PTHREAD_EXCNAME (SIGSYS), _PTHREAD_EXCNAME (SIGPIPE), _PTHREAD_EXCNAME (excpu), _PTHREAD_EXCNAME (exfilsiz), _PTHREAD_EXCNAME (intovf), _PTHREAD_EXCNAME (intdiv), _PTHREAD_EXCNAME (fltovf), _PTHREAD_EXCNAME (fltdiv), _PTHREAD_EXCNAME (fltund), _PTHREAD_EXCNAME (decovf), _PTHREAD_EXCNAME (subrng), _PTHREAD_PTDNAME (cancel), _PTHREAD_PTDNAME (exit), _PTHREAD_PTDNAME (stackovf), _PTHREAD_EXC6NAME (noexcmem);4# define pthread_exc_SIGIOT_e pthread_exc_SIGABRT_e5# define pthread_exc_SIGSEGV_e pthread_exc_illaddr_e4# define pthread_exc_SIGBUS_e pthread_exc_resaddr_e5# define pthread_exc_SIGFPE_e pthread_exc_aritherr_e5# define pthread_exc_SIGILL_e pthread_exc_illinstr_e# endif># if defined (_PTHREAD_EXC_DECC) && defined (_PTHREAD_EXC_VMS)"# pragma __extern_model __restore# endif# ifdef __cplusplus }# endif)#endif /* _PTHREAD_EXCEPTION_CLEAN */6 /*K * The following section of this file contains definitions which are not in' * the protected part of the namespace. */Q#if !defined (_PTHREAD_EXCEPTION_POLLUTING) && !defined (_PTHREAD_EXC_INCL_CLEAN)%# define _PTHREAD_EXCEPTION_POLLUTING# ifdef __cplusplus extern "C" {# endif/** * Define external version of status codes */3# define pthread_exception_s __pthread_exception_s-# define pthread_exccop_s __pthread_exccop_s3# define pthread_uninitexc_s __pthr 6ead_uninitexc_s3# define pthread_unkstatus_s __pthread_unkstatus_s3# define pthread_exccoplos_s __pthread_exccoplos_s1# define pthread_noexcmem_s __pthread_noexcmem_s/# define pthread_illaddr_s __pthread_illaddr_s/# define pthread_exquota_s __pthread_exquota_s-# define pthread_nopriv_s __pthread_nopriv_s/# define pthread_insfmem_s __pthread_insfmem_s-# define pthread_normal_s __pthread_normal_s1# define pthread_illinstr_s __pthread_illinstr_s/# define pthread_resaddr_s 6__pthread_resaddr_s1# define pthread_privinst_s __pthread_privinst_s/# define pthread_resoper_s __pthread_resoper_s/# define pthread_SIGTRAP_s __pthread_SIGTRAP_s/# define pthread_SIGABRT_s __pthread_SIGABRT_s-# define pthread_SIGEMT_s __pthread_SIGEMT_s1# define pthread_aritherr_s __pthread_aritherr_s-# define pthread_SIGSYS_s __pthread_SIGSYS_s/# define pthread_SIGPIPE_s __pthread_SIGPIPE_s+# define pthread_excpu_s __pthread_excpu_s1# define pthread_exfilsiz_s __pthread 6_exfilsiz_s-# define pthread_intovf_s __pthread_intovf_s-# define pthread_intdiv_s __pthread_intdiv_s-# define pthread_fltovf_s __pthread_fltovf_s-# define pthread_fltdiv_s __pthread_fltdiv_s-# define pthread_fltund_s __pthread_fltund_s-# define pthread_decovf_s __pthread_decovf_s-# define pthread_subrng_s __pthread_subrng_s1# define pthread_stackovf_s __pthread_stackovf_s.# define pthread_SIGIOT_s __pthread_SIGABRT_s/# define pthread_SIGSEGV_s __pthread_illaddr_s.# de6fine pthread_SIGBUS_s __pthread_resaddr_s/# define pthread_SIGFPE_s __pthread_aritherr_s-# define pthread_cancel_s __pthread_cancel_s*# define pthread_exit_s __pthread_exit_s*typedef __pthreadExceptionObj_t EXCEPTION;/*F * Define the documented ("polluted") external names for the exception * macros. */<# define EXCEPTION_INIT(__e) PTHREAD_EXCEPTION_INIT_NP (__e)+# define RAISE(__e) PTHREAD_RAISE_NP (__e)# define TRY PTHREAD_TRY_NP## define ENDTRY PTHREAD_ENDTRY_N P$# define FINALLY PTHREAD_FINALLY_NP(# define CATCH_ALL PTHREAD_CATCH_ALL_NP$# define RERAISE PTHREAD_RERAISE_NP*# define THIS_CATCH PTHREAD_THIS_CATCH_NP+# define CATCH(__e) PTHREAD_CATCH_NP (__e)# ifdef __cplusplus }# endif#endifww 6{Ի/*J *************************************************************************J * *J * Copyright 1997, 2004 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * 6 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *J6 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * 6 *J ************************************************************************* *//*^ * @(#)$RCSfile: pthread_trace.h,v $ $Revision: 1.1.41.13 $ (DEC) $Date: 2004/02/27 15:43:30 $ *//* * FACILITY: * * DECthreads POSIX 1003.1c * * ABSTRACT: *9 * External definitions for DECthreads tracing functions. * * IMPORTANT: * ---------- *G * The interfaces defined in this header file are intended for use only> * by debuggers and analysis tools. 6The interfaces WILL changeF * incompatibly when such changes are necessary to fix problems, or toC * improve the exchange of information between debuggers and thread * library. *: * ***************************************************9 * Do not use the interfaces described in this header: * unless you are prepared to rebuild (and potentially7 * recode) on each release of the operating system.: * *************************************************** * * AUTHORS: *6 * Dave Butenhof * * CREATION DATE: * * 9 June 1997 * * MODIFIED BY: * * Dave Butenhof * Richard Love * Peter Portante * Webb Scales * Mark Simons * Tom Dahl * */ #ifndef _PTHREAD_TRACE_H_# define _PTHREAD_TRACE_H_#ifdef __cplusplus extern "C" {#endif#include #include #include /#if defined (__cplusplus) || defined (__DECCXX)# define _PTHREAD_TRACE_ENV_CXX*#elif defined (__DECC) || defined (__d6ecc) # define _PTHREAD_TRACE_ENV_DECC#endifH#if defined (VMS) || defined (__VMS) || defined (__vms) || defined (vms)# define _PTHREAD_TRACE_ENV_VMS>#elif defined (__unix__) || defined (__unix) || defined (unix) # define _PTHREAD_TRACE_ENV_UNIX#endif*#if defined (__alpha) || defined (__ALPHA)!# define _PTHREAD_TRACE_ENV_ALPHA,#elif defined (__ia64) || defined (__ia64__) # define _PTHREAD_TRACE_ENV_IA64#else=# error : unsupported hardware architecture.#endif6#ifdef _PTHREAD_TRACE_ENV_VMS/*N * The standard POSIX types of pthread_t etc. are needed by this trace header.I * On UNIX systems these types are defined in types.h. On VMS they are in" * pthread.h, so include that now. */# include #endif/*G * The trace version number combines a major and minor version into oneN * number. Conceptually, the version number is of the form "V##.##", where theG * number before the decimal point is the major version, and the numberJ * f 6ollowing the decimal point is the minor version. The minor version can$ * range between 0 and 99 inclusive. *I * Trace engines that support the "handshake" protocol will be allowed toL * initialize as long as the engine's proposed major version is equal to theN * thread library's major version, and the proposed minor version is less thanJ * or equal to the thread library's version. The assumption is that it canM * handle the minor variations in trace stream. Incompatible changes (such asL * 6 a change in an object init structure, or the trace record header) will beO * marked by changes in the major version. Currently there is no compatibility / * for clients using a different major version. * * **** Version 101 *J * Added support for NUMA architectures. There are new events, types, and G * operations, but it's assumed these don't warrant a version bump. TheA * version bump is actually so that the Visual Threads engine can= * recognize that NUMA events will occur before it 6 sees them. */A#define PTHREAD_TRACE_VERSION 101 /* Current interface version *//*' * GENERAL NOTES ON USING THIS HEADER *K * The header describes the functional interface and dataL * structures used to communicate with the DECthreads tracing facility. ThisM * facility is designed to support the collection of realtime "event" data onI * the operation of multithreaded programs. Note that, like any method ofK * observation applied to any phenomenon, use of this 6facility will perturbN * the execution of the application being observed. This being the case, thereJ * can be no guarantee that information abstracted from such analysis willN * accurately reflect the behavior of the "real" application. Nevertheless, inN * most cases the information will approximate the real application's behavior$ * closely enough to be of some use. *//* * MACROS *//* * TYPEDEFS *//*L * On OpenVMS Alpha, we specify long pointer sizes for all pointer6s. To makeK * things simple, we just compile the entire header inside an explicit longK * pointer region. Since this header is used only to build certain types ofI * DEVELOPMENT TOOLS, and is never needed for any end user programs, it'sM * reasonable to require that it be compiled using a recent version of DEC C.N * (Unfortunately, DEC C++ does not yet support long pointer access on OpenVMSN * Alpha, and is therefore not supported. DEC C++, or other C++ compilers, may# * be used on UNIX or 6OpenVMS VAX.) */#ifdef _PTHREAD_TRACE_ENV_VMS# ifndef __INITIAL_POINTER_SIZE# ifdef __cplusplus^# error " requires pointer size support and cannot be used under DEC C++"# else^# error " requires DEC C version 5.0 or later, with pointer size support" # endif# endif'# pragma __required_pointer_size __save'# pragma __required_pointer_size __long#endif/*K * Define the maximum number of arguments allowed in a single trace reco6rd.A * This is arbitrary, but having a limit makes processing easier. */ #define PTHREAD_TRACE_MAXARGS 64/*E * Some "semi architecturally neutral" base types that need different) * definitions on Tru64 UNIX and OpenVMS. *O * This is based on the equivalent types in , but has been slightly O * simplified because we're not supporting VAX or use by old compilers without  * 64-bit pointer support. */#ifdef _PTHREAD_TRACE_ENV_VMS%typedef __int64 pthreadTraceLong_t6;-typedef unsigned __int64 pthreadTraceUlong_t;#else"typedef long pthreadTraceLong_t;+typedef unsigned long pthreadTraceUlong_t;#endif%typedef char *pthreadTraceString_t;/typedef const char *pthreadTraceConstString_t;1typedef void (*pthreadTraceDestructor_t) (void*);Ftypedef void *(*pthreadTraceConstructor_t) (pthread_key_t, pthread_t);-typedef void (*pthreadTraceExtDestructor_t) (" void*, pthread_t, pthread_key_t);/*L * Trace event identifier. This can be viewed as eit 6her an integer ID, or as* * a structure consisting of three fields: *J * 1) "object": a byte (8 bits) describing the type of object to which theJ * event applies. May be taken as an integer code, or as a single ASCII * character.J * 2) "operation": A word (16 bits) describing the operation applied to anJ * object. May be taken as an integer code, or as two ASCII characters., * 3) "flags": a binary field of 8 flag bits *L * The integer type pthreadTraceEvent_t is the usual represe6ntation, but youM * can use pthreadTraceEventStruct_t to easily extract or view the individual * fields. */ typedef int pthreadTraceEvent_t;,typedef struct pthreadTraceEventStruct_tag {3 unsigned int object : 8; /* The object code */: unsigned int operation : 16; /* The operation code */3 unsigned int flags : 8; /* The status flags */ } pthreadTraceEventStruct_t;*typedef union pthreadTraceEventUnion_tag { pthreadTraceEvent_t mask;% pthreadTraceEventStruct_6t fields; } pthreadTraceEventUnion_t;/* K * Standard event ID object values. Lowercase letters are reserved for userN * events. A name for these events may be provided by writing an event.setnameJ * event with arguments of type OBJECT and NAME. (For example, OBJECT='s', * NAME='server'). */%typedef enum pthreadTraceObject_tag {> PTHREAD_TRACE_OBJ_ANALYZE = 'A', /* Event analysis tool */O PTHREAD_TRACE_OBJ_INTERRUPT = 'B', /* Software interrupts (ASTs/Signals) */: 6PTHREAD_TRACE_OBJ_COND = 'C', /* Condition variable */? PTHREAD_TRACE_OBJ_KERNEL = 'D', /* DECthreads dispatcher */9 PTHREAD_TRACE_OBJ_EVENT = 'E', /* The event stream */8 PTHREAD_TRACE_OBJ_EF = 'F', /* Event flag upcalls */D PTHREAD_TRACE_OBJ_DEBUG = 'G', /* "Gofer"? Debug-related work */= PTHREAD_TRACE_OBJ_HIBER = 'H', /* $HIBER/$WAKE upcalls */C PTHREAD_TRACE_OBJ_IMS = 'I', /* Inner mode semaphore upcalls */0 PTHREAD_TRACE_OBJ_CPU = 'J', /* Processor */? PTHREAD_ 7TRACE_OBJ_KEY = 'K', /* Thread-specific data key */7 PTHREAD_TRACE_OBJ_LOCK = 'L', /* Read-write lock */. PTHREAD_TRACE_OBJ_MUTEX = 'M', /* Mutex */= PTHREAD_TRACE_OBJ_ONCE = 'O', /* One-time init routine */E PTHREAD_TRACE_OBJ_PRIVATE = 'P', /* DECthreads library generic */F PTHREAD_TRACE_OBJ_RAD = 'R', /* NUMA Resource Allocation Domain */A PTHREAD_TRACE_OBJ_SYSTEM = 'S', /* Used to block in system */0 PTHREAD_TRACE_OBJ_THREAD = 'T', /* Thread */: PTHREAD_TRACE_OB 7J_USER = 'U', /* Generic user event */B PTHREAD_TRACE_OBJ_VP = 'V', /* DECthreads virtual processor */; PTHREAD_TRACE_OBJ_CTX = 'W', /* Context wait upcalls */= PTHREAD_TRACE_OBJ_EXIT = 'X', /* $EXIT/$FORCEX upcalls */: PTHREAD_TRACE_OBJ_PGFLT = 'Y', /* Pagefault upcalls */B PTHREAD_TRACE_OBJ_notused = '\0' /* End of list placeholder */ } pthreadTraceObject_t;/*H * Standard event ID operation values. Codes that begin with a lowercaseF * letter are reserved for user ev 7ents. A name for these events may beN * provided by writing an event.setname event with arguments of type OPERATIONL * and NAME. (For example, OPERATION='t', NAME='tune'). User events may alsoL * use the standard operation types. (Note: in this list, the indented codesN * represent convenience aliases to a "base code" -- for example, CREATE is an * alias to INIT.) */#pragma message save!#pragma message disable multichar(typedef enum pthreadTraceOperation_tag {? PTHREAD_TRACE_OP_APPLI 7CATION= 'IA', /* Application info */: PTHREAD_TRACE_OP_ASSERT = 'AS', /* Assertion check */8 PTHREAD_TRACE_OP_ATTACH = 'AT', /* Attach thread */4 PTHREAD_TRACE_OP_BIND = 'BI', /* Bind thread */@ PTHREAD_TRACE_OP_BLOCK = 'BL', /* Thread blocking itself */9 PTHREAD_TRACE_OP_CANCEL = 'CA', /* pthread_cancel */D PTHREAD_TRACE_OP_CATCH = 'CE', /* Catch DECthreads exception */B PTHREAD_TRACE_OP_CREATE = 'IN', /* Create (alias for INIT) */: PTHREAD_TRACE_OP_DESTROY = 7 'DE', /* Destroy/Delete */: PTHREAD_TRACE_OP_DETACH = 'DT', /* Detach a thread */B PTHREAD_TRACE_OP_DEQUEUE = 'DQ', /* Remove from queue head */2 PTHREAD_TRACE_OP_ENTER = 'NT', /* vp.enter */A PTHREAD_TRACE_OP_EXCEPT = 'EX', /* Raise thread exception */= PTHREAD_TRACE_OP_EXIT = 'XT', /* vp.exit/pthread_exit */E PTHREAD_TRACE_OP_GETPROP = 'GP', /* Get object property (TSD) */E PTHREAD_TRACE_OP_HEADER = 'HD', /* event.header (special fmt) */= PTHREAD_TRACE_OP 7_HOLD = 'HO', /* Debug Assistant HOLD */; PTHREAD_TRACE_OP_IMAGE = 'II', /* Binary image info */: PTHREAD_TRACE_OP_INIT = 'IN', /* Initialize/Create */: PTHREAD_TRACE_OP_INSERT = 'IQ', /* Insert in queue */9 PTHREAD_TRACE_OP_JOIN = 'JN', /* Join with thread */5 PTHREAD_TRACE_OP_KILL = 'KI', /* pthread_kill */8 PTHREAD_TRACE_OP_LOCK = 'LK', /* Lock mutex, rwl */D PTHREAD_TRACE_OP_MIGRATE = 'MI', /* Change thread's home RAD */B PTHREAD_TRACE_OP_NULL = 'NL', / 7* No (or generic) operation */= PTHREAD_TRACE_OP_ONCE = 'ON', /* Call to pthread_once */= PTHREAD_TRACE_OP_PREEMPT = 'PR', /* Thread preemption */8 PTHREAD_TRACE_OP_PROCESS = 'IP', /* Process info */B PTHREAD_TRACE_OP_READY = 'RD', /* Thread is readied to run */< PTHREAD_TRACE_OP_REMOVE = 'RQ', /* Remove from queue */: PTHREAD_TRACE_OP_RESUME = 'RE', /* Resume a thread */9 PTHREAD_TRACE_OP_RUN = 'RN', /* Thread is running */A PTHREAD_TRACE_OP_SETCAN = 'SC', / 7* Set thread cancelation */A PTHREAD_TRACE_OP_SETNAME = 'NA', /* Change name of object */? PTHREAD_TRACE_OP_SETPROP = 'SP', /* Set object property */; PTHREAD_TRACE_OP_SETSCHED = 'SD', /* Set scheduling */@ PTHREAD_TRACE_OP_SIGINT = 'SI', /* Signal from interrupt */B PTHREAD_TRACE_OP_SIGNAL = 'SG', /* Signal/broadcast a cond */3 PTHREAD_TRACE_OP_SIGWAIT = 'SW', /* sigwait */E PTHREAD_TRACE_OP_SEARCH = 'SE', /* Snoop other VP's ready q's */G PTHREAD_TRACE_OP 7_STACKHIGH = 'SH', /* Change in stack highwater */6 PTHREAD_TRACE_OP_START = 'ST', /* Thread start */< PTHREAD_TRACE_OP_SUSPEND = 'SU', /* Suspend a thread */6 PTHREAD_TRACE_OP_SYSTEM = 'IS', /* System info */9 PTHREAD_TRACE_OP_TERM = 'TR', /* Thread terminate */B PTHREAD_TRACE_OP_TEST = 'TE', /* Testing of some obj state */B PTHREAD_TRACE_OP_UNBLOCK = 'UB', /* Thread being unblocked */A PTHREAD_TRACE_OP_UNHOLD = 'UH', /* Debug Assistant UNHOLD */@ PTHREAD_TR 7ACE_OP_UNLOCK = 'UL', /* Unlock a mutex or rwl */A PTHREAD_TRACE_OP_WAIT = 'WA', /* Wait for a condition var */C PTHREAD_TRACE_OP_WRITE = 'WR', /* Write (e.g. trace buffer) */5 PTHREAD_TRACE_OP_YIELD = 'YE' /* Thread yield */ } pthreadTraceOperation_t;#pragma message restore/* * Event ID status flags: */%typedef enum pthreadTraceStatus_tag {; PTHREAD_TRACE_STAT_FAIL = 0x01, /* Operation failed */? PTHREAD_TRACE_STAT_MULTIPLE = 0x02, /* Multiple targe 7ts */D PTHREAD_TRACE_STAT_NONBLOCK = 0x04, /* Nonblocking (trylock) */; PTHREAD_TRACE_STAT_TIMED = 0x08, /* Timed operation */A PTHREAD_TRACE_STAT_USER = 0x10, /* pthread_trace_write_np */D PTHREAD_TRACE_STAT_PRIVATE = 0x20, /* DECthreads debug event */@ PTHREAD_TRACE_STAT_CANCEL = 0x40, /* Operation cancelled */C PTHREAD_TRACE_STAT_REQUEST = 0x80 /* Requesting (part 1) op */ } pthreadTraceStatus_t;/*6 * Help in constructing (or deconstructing) event IDs: 7 */@#define PTHREAD_TRACE_ID_OBJ_M 0x000000ff /* Mask for OBJECT */B#define PTHREAD_TRACE_ID_OP_M 0x00ffff00 /* Mask for OPERATION */@#define PTHREAD_TRACE_ID_STS_M 0xff000000 /* Mask for STATUS */>#define PTHREAD_TRACE_ID_OBJ_B 0 /* Initial bit for OBJECT */@#define PTHREAD_TRACE_ID_OP_B 8 /* Initial bit for OPERATION */?#define PTHREAD_TRACE_ID_STS_B 24 /* Initial bit for STATUS *//*J * This macro constructs an event ID from an object, operation, and status * set. */F#d 7efine pthreadTraceMakeId(_ob,_op,_st) ((((_st<<16)|(_op))<<8)|(_ob))/*J * These are the "trace classes" that can be selected for recording and/or * analysis. */$typedef enum pthreadTraceClass_tag {> PTHREAD_TRACE_CLASS_COND = 0x0001, /* Condition var ops */4 PTHREAD_TRACE_CLASS_ERROR = 0x0002, /* Errors */3 PTHREAD_TRACE_CLASS_KEY = 0x0004, /* TSD ops */9 PTHREAD_TRACE_CLASS_LOCK = 0x0008, /* R/W lock ops */7 PTHREAD_TRACE_CLASS_MUTEX = 0x0010, /* Mutex ops */; 7PTHREAD_TRACE_CLASS_ONCE = 0x0020, /* Once time init */< PTHREAD_TRACE_CLASS_SCHED = 0x0040, /* Scheduling ops */9 PTHREAD_TRACE_CLASS_THREAD = 0x0080, /* Thread ops */= PTHREAD_TRACE_CLASS_USER = 0x0100, /* User tracepoints */@ PTHREAD_TRACE_CLASS_TOPOLOGY= 0x0200, /* Topology changes */ /*I * Following are INTERNAL to DECthreads, and will result in data thatH * cannot be analyzed by external tools. (Some will not occur except: * in internal debug builds, for 7 performance reasons.) */D PTHREAD_TRACE_CLASS_ICOND = 0x00010000, /* Internal condition */A PTHREAD_TRACE_CLASS_ILOCK = 0x00020000, /* Internal rwlock */A PTHREAD_TRACE_CLASS_IMUTEX = 0x00040000, /* Internal mutex */C PTHREAD_TRACE_CLASS_ITHREAD = 0x00080000, /* Internal thread */F PTHREAD_TRACE_CLASS_ISCHED = 0x00100000, /* Internal scheduling */D PTHREAD_TRACE_CLASS_IUPCALL = 0x00200000, /* Internal upcalls */? PTHREAD_TRACE_CLASS_IVP = 0x00400000, /* Internal 7vp ops */G PTHREAD_TRACE_CLASS_IKERNEL = 0x00800000, /* Internal kernel ops */E PTHREAD_TRACE_CLASS_IVPC = 0x01000000, /* Internal VP critical */E PTHREAD_TRACE_CLASS_IDEBUG = 0x02000000, /* Debug interactions */7 PTHREAD_TRACE_CLASS_IMISC = 0x40000000 /* Others */ } pthreadTraceClass_t;'#define PTHREAD_TRACE_CLASS_EXTERNALS \: (PTHREAD_TRACE_CLASS_COND|PTHREAD_TRACE_CLASS_ERROR| \8 PTHREAD_TRACE_CLASS_KEY|PTHREAD_TRACE_CLASS_LOCK| \: PTHREAD_TRACE_CLASS_MUT 7EX|PTHREAD_TRACE_CLASS_ONCE| \< PTHREAD_TRACE_CLASS_THREAD|PTHREAD_TRACE_CLASS_SCHED| \; PTHREAD_TRACE_CLASS_USER|PTHREAD_TRACE_CLASS_TOPOLOGY)'#define PTHREAD_TRACE_CLASS_INTERNALS \; (PTHREAD_TRACE_CLASS_ICOND|PTHREAD_TRACE_CLASS_ILOCK| \> PTHREAD_TRACE_CLASS_IMUTEX|PTHREAD_TRACE_CLASS_ITHREAD| \> PTHREAD_TRACE_CLASS_ISCHED|PTHREAD_TRACE_CLASS_IUPCALL| \; PTHREAD_TRACE_CLASS_IVP|PTHREAD_TRACE_CLASS_IKERNEL| \8 PTHREAD_TRACE_CLASS_IVPC|PTHREAD_TRACE_CLASS_IMISC) 7!#define PTHREAD_TRACE_CLASS_ALL \> (PTHREAD_TRACE_CLASS_EXTERNALS|PTHREAD_TRACE_CLASS_INTERNALS)/*J * These symbols are logical-OR-ed into a type code to suggest a characterI * string representation of the binary value for formatting code (such asL * pthread_trace). They can be used only with the CHAR, SHORT, INT, and LONGM * data types. Note that use of non-default representation is disabled insideO * the thread library for production (NDEBUG) builds to avoid problems for the - * Vis7ual Threads trace engine and formatter. */"typedef enum pthreadTraceRep_tag {. PTHREAD_TRACE_REP_SIGNED = 0x00, /* %d */+ PTHREAD_TRACE_REP_HEX = 0x40, /* %x */0 PTHREAD_TRACE_REP_UNSIGNED = 0x80, /* %u */; PTHREAD_TRACE_REP_RESERVED = 0xc0, /* unimplemented */9 PTHREAD_TRACE_REP_MASK = 0xc0 /* To extract field */ } pthreadTraceRep_t;/*G * These represent the TYPES of data that may appear in a trace record. */#typedef enum pthreadTraceType_tag { 7 /* INPUT OUTPUT FORMAT */" PTHREAD_TRACE_TYPE_UNUSED = 0,- PTHREAD_TRACE_TYPE_CHAR, /* char %c */6 PTHREAD_TRACE_TYPE_BOOL, /* char TRUE, FALSE *// PTHREAD_TRACE_TYPE_SHORT, /* short %hd */+ PTHREAD_TRACE_TYPE_INT, /* int %d */. PTHREAD_TRACE_TYPE_LONG, /* long %ld */9 PTHREAD_TRACE_TYPE_THREADID,/* long * thread %ld */8 PTHREAD_TRACE_TYPE_MUTEXID, /* long * mutex %ld */8 PTHREAD_TRACE_TYPE_LOCKID, /* long * rwlock %ld */6 PTHREAD_TRAC 7E_TYPE_CONDID, /* long * cond %ld */0 PTHREAD_TRACE_TYPE_POINTER, /* void* %p */8 PTHREAD_TRACE_TYPE_ERRNO, /* int strerror (%d) */0 PTHREAD_TRACE_TYPE_EXCADDR, /* void* %p */2 PTHREAD_TRACE_TYPE_EXCSTAT, /* long %#lx */1 PTHREAD_TRACE_TYPE_THDARG, /* void* %#lx *// PTHREAD_TRACE_TYPE_STRING, /* char* %s */- PTHREAD_TRACE_TYPE_NAME, /* char* %s */; PTHREAD_TRACE_TYPE_BINARY, /* (void*,long) %#lx... */C PTHREAD_TRACE_TYPE_MUTEX, /* pthread_mut 7ex_t* long mutex %ld */@ PTHREAD_TRACE_TYPE_COND, /* pthread_cond_t* long cond %ld */? PTHREAD_TRACE_TYPE_THREAD, /* pthread_t long thread %ld */< PTHREAD_TRACE_TYPE_KEY, /* pthread_key_t long key %ld */D PTHREAD_TRACE_TYPE_LOCK, /* pthread_rwlock_t* long rwlock %ld */F PTHREAD_TRACE_TYPE_TIME, /* pthreadTraceTimespec_t* */< PTHREAD_TRACE_TYPE_SCHED, /* (int, int) %s, prio %d */E PTHREAD_TRACE_TYPE_MINIT, /* pthreadTraceMutexInit_t* */D PTHREA7D_TRACE_TYPE_CINIT, /* pthreadTraceCondInit_t* */F PTHREAD_TRACE_TYPE_TINIT, /* pthreadTraceThreadInit_t* */C PTHREAD_TRACE_TYPE_KINIT, /* pthreadTraceKeyInit_t* */F PTHREAD_TRACE_TYPE_LINIT, /* pthreadTraceRwlockInit_t* */A PTHREAD_TRACE_TYPE_CANCEL, /* pthreadTraceCancel_t */7 PTHREAD_TRACE_TYPE_OBJECT, /* char object %1s */4 PTHREAD_TRACE_TYPE_OPERATION, /* int op %2s */D PTHREAD_TRACE_TYPE_BLOCK_REASON, /* pthreadTrace 7BlockReason_t */C PTHREAD_TRACE_TYPE_ENVIRONMENT, /* pthreadTraceEnvironment_t *// PTHREAD_TRACE_TYPE_LABEL, /* char* %s: */3 PTHREAD_TRACE_TYPE_JAVA_STACK, /* char* %s */3 PTHREAD_TRACE_TYPE_VP, /* (vp*) long vp %ld */3 PTHREAD_TRACE_TYPE_EXCNATIVE, /* char* %s */1 PTHREAD_TRACE_TYPE_CPU, /* long cpu %ld */1 PTHREAD_TRACE_TYPE_RAD, /* long rad %ld */ /*J * (*) The MUTEXID, CONDID, LOCKID, and THREADID type codes exist onlyK * within th 7e thread library and trace engine. In the output stream (atN * least for the log engine) they are identical to a MUTEX, COND, LOCK, orN * THREAD type specified with the address of an object containing the sameN * sequence number. The ID variants are used when no actual object is * available. */ /*3 * The following are types for VT-internal use. */2 PTHREAD_TRACE_TYPE_AID = 48, /* Analysis ID */8 PTHREAD_TRACE_TYPE_MAX /* Maximum value ( 7unused) */. } pthreadTraceType_t, *pthreadTraceType_p;/*I * Representation brings a risk of breaking VT interpretation of existingM * trace events, because it can't deal with the unexpected high bits. At thisN * point, I'm not convinced it's worth even asking if they can adapt; yet I'veL * always wanted to add representation, and now that I finally figured out aM * way to do it easily, and found it useful in debugging, I don't really wantJ * to delete the code. As a compromise, to avo 7id breaking VT but leave theK * representation field available for internal debugging, I'm setting theseL * convenience macros (extensions of the old HEX defs) to use representationH * only under a special build option. Otherwise, as in earlier code, theL * "HEXLONG" type becomes "POINTER" to force %p (hex) formatting; the othersF * will simply ignore the implicit representation and use the default. */ #if defined (_PTHREAD_TRACE_REP)%# define PTHREAD_TRACE_TYPE_HEXCHAR \3 (PTHREAD_TRA 7CE_TYPE_CHAR|PTHREAD_TRACE_REP_HEX)&# define PTHREAD_TRACE_TYPE_HEXSHORT \4 (PTHREAD_TRACE_TYPE_SHORT|PTHREAD_TRACE_REP_HEX)$# define PTHREAD_TRACE_TYPE_HEXINT \2 (PTHREAD_TRACE_TYPE_INT|PTHREAD_TRACE_REP_HEX)%# define PTHREAD_TRACE_TYPE_HEXLONG \3 (PTHREAD_TRACE_TYPE_LONG|PTHREAD_TRACE_REP_HEX)## define PTHREAD_TRACE_TYPE_UCHAR \8 (PTHREAD_TRACE_TYPE_CHAR|PTHREAD_TRACE_REP_UNSIGNED)$# define PTHREAD_TRACE_TYPE_USHORT \9 (PTHREAD_TRACE_TYPE_SHORT|PTHREAD_TRACE_REP_UNSIGNED 7)"# define PTHREAD_TRACE_TYPE_UINT \7 (PTHREAD_TRACE_TYPE_INT|PTHREAD_TRACE_REP_UNSIGNED)## define PTHREAD_TRACE_TYPE_ULONG \8 (PTHREAD_TRACE_TYPE_LONG|PTHREAD_TRACE_REP_UNSIGNED)#else;# define PTHREAD_TRACE_TYPE_HEXCHAR PTHREAD_TRACE_TYPE_CHAR=# define PTHREAD_TRACE_TYPE_HEXSHORT PTHREAD_TRACE_TYPE_SHORT9# define PTHREAD_TRACE_TYPE_HEXINT PTHREAD_TRACE_TYPE_INT># define PTHREAD_TRACE_TYPE_HEXLONG PTHREAD_TRACE_TYPE_POINTER9# define PTHREAD_TRACE_TYPE_UCHAR PTHREAD_TRACE_TYPE_C7HAR;# define PTHREAD_TRACE_TYPE_USHORT PTHREAD_TRACE_TYPE_SHORT7# define PTHREAD_TRACE_TYPE_UINT PTHREAD_TRACE_TYPE_INT9# define PTHREAD_TRACE_TYPE_ULONG PTHREAD_TRACE_TYPE_LONG#endif/*I * This code is passed to the reinit routine of the active tracing engineA * (also known as an "event library") so it can deal with a fork. */'typedef enum pthreadTraceForkCode_tag {; PTHREAD_TRACE_REINIT_PREPARE, /* PREfork, in parent */; PTHREAD_TRACE_REINIT_PARENT, /* POSTfork, in 7parent */9 PTHREAD_TRACE_REINIT_CHILD /* POSTfork, in child */ } pthreadTraceForkCode_t;/*E * These values are flags to the event.image (E.II) event. There are C * 11 arguments to the event: file path, three triplets of data for= * each of 3 image regions (image base address, mapped memoryE * address, and size, for each of "program text" [code], "data", and . * "bss" [UNIX initialized data]), then flags. */)typedef enum pthreadTraceImageFlags_tag {; PTHREAD_TRACE_IM 7AGE_MAIN = 0x00000001, /* Main image */F PTHREAD_TRACE_IMAGE_UPCALLS = 0x00000002, /* Upcalls (VMS only) */F PTHREAD_TRACE_IMAGE_KTHREAD = 0x00000004 /* Kthreads (VMS only) */ } pthreadTraceImageFlags_t;/*M * This code is passed to the fini routine of the active tracing engine (alsoG * known as an "event library") so it can deal with a flush or shutdown * request. *M * PTHREAD_TRACE_FINI_FLUSH is a request to flush volatile data (generally to$ * protect against a process 7 crash). *J * PTHREAD_TRACE_FINI_DESIST is a request to shut down the tracing engine,J * possibly because another tracing engine has been selected. Usually, theL * process will continue running, (and this engine may not be called again),* * so all resources should be deallocated. *L * PTHREAD_TRACE_FINI_TERMINATE is much like DESIST, except that the processJ * is about to terminate. It's not necessary, therefore, to deallocate allM * resources, since the system will generally handle that an !7yway. (It's OK to9 * treat TERMINATE and DESIST as the same thing, though.) */'typedef enum pthreadTraceFiniCode_tag {= PTHREAD_TRACE_FINI_FLUSH, /* Flush buffers, continue */: PTHREAD_TRACE_FINI_DESIST, /* Flush and shut down */; PTHREAD_TRACE_FINI_TERMINATE /* Process termination */ } pthreadTraceFiniCode_t;(typedef enum pthreadTraceLockState_tag {2 PTHREAD_TRACE_LOCK_ALL = 0x1, /* Full lock */< PTHREAD_TRACE_LOCK_CANCEL = 0x2, /* Lock cancel only */A "7 PTHREAD_TRACE_LOCK_RESTORE = 0x10, /* (internal use only) */= PTHREAD_TRACE_LOCK_NEST = 0x20 /* (internal use only) */ } pthreadTraceLockState_t;/*J * This describes the reason why a thread has blocked. (Used by scheduling * events.) */+typedef enum pthreadTraceBlockVariant_tag {A PTHREAD_TRACE_BLKVAR_OTHER = 0, /* Old: for compatibility */@ PTHREAD_TRACE_BLKVAR_UNIX = 1, /* Old: for compatibility */C PTHREAD_TRACE_BLKVAR_OPENVMS = 2, /* Old: for compatibili #7ty */; PTHREAD_TRACE_BLKVAR_NONE = 3, /* No blocking state *// PTHREAD_TRACE_BLKVAR_SYNC = 4, /* $SYNC */8 PTHREAD_TRACE_BLKVAR_WFL = 5, /* Event flag wait */1 PTHREAD_TRACE_BLKVAR_HIBER = 6, /* $HIBER */= PTHREAD_TRACE_BLKVAR_IMS = 7, /* Inner-mode semaphore */7 PTHREAD_TRACE_BLKVAR_PFW = 8, /* Pagefault wait */? PTHREAD_TRACE_BLKVAR_WAIT = 9, /* Generic internal wait */9 PTHREAD_TRACE_BLKVAR_SETAST = 10, /* $SETAST wait */= PTHREAD_TRACE_BLKVAR_SYS$7CALL = 11 /* System call wait */! } pthreadTraceBlockVariant_t;+typedef union pthreadTraceBlockReason_tag {9 pthreadTraceBlockVariant_t variant; /* Which type */ struct {6 pthreadTraceBlockVariant_t type; /* Type of block */ int efn; /* Event flag */0 unsigned short *iosb; /* IOSB (SYNC only) */1 unsigned short status; /* (Generally zero) */ } sync; struct {6 pthreadTraceBlockVariant_t type; /* Type of block */& int and; /* "logical and" wait */( u%7nsigned int efm[2]; /* Wait mask */ } wfl; struct {6 pthreadTraceBlockVariant_t type; /* Type of block */ int padding;, pthreadTraceUlong_t seq; /* Sequence # */ } ims; struct {6 pthreadTraceBlockVariant_t type; /* Type of block */& int collided; /* Collided fault */ void *va; /* Address */ } pfw; struct {6 pthreadTraceBlockVariant_t type; /* Type of block */0 unsigned char fault; /* Fault occured too */' unsigned char habitat; /* Habitat *//&7 unsigned short number; /* Syscall number */' void *va; /* Page fault address */ } syscall;& pthreadTraceUlong_t reserved[9];< } pthreadTraceBlockReason_t, *pthreadTraceBlockReason_p;/*J * Identifier of an object -- thread, condition variable, mutex, etc. This0 * is the debug "sequence number" of the object. */,typedef pthreadTraceLong_t pthreadTraceId_t;/*N * This is essentially a POSIX "struct timespec", except that it uses a 64-bitL * value for the number of s'7econds. It is also the same size on both OpenVMSL * Alpha and UNIX Alpha. Use of this type allows trace log files to be moved * between the two platforms. */)typedef struct pthreadTraceTimespec_tag { pthreadTraceLong_t tv_sec; pthreadTraceUlong_t tv_nsec;6 } pthreadTraceTimespec_t, *pthreadTraceTimespec_p;/*- * The Timestamp structure contains 3 fields: *: * time standard system time (seconds & nanoseconds since * UNIX Epoch).B * toffset user-mode analogy to the (7 high 32-bits returned by RPCC< * on UNIX and OpenVMS. (An adjustment factor for the time1 * this thread has not been running on the VP.)@ * cycles adjusted cycles the VP had run, computed by combining: * the two halves of RPCC. (This may be inaccurate on an0 * SMP, if the kernel thread has moved between * processors.) */*typedef struct pthreadTraceTimestamp_tag {: pthreadTraceTimespec_t time; /* current clock time */- int toffset; /* Thread cycle offset */; un )7signed int cycles; /* Adjusted CPU cycle counter */8 } pthreadTraceTimestamp_t, *pthreadTraceTimestamp_p;/*< * The Debugger info structure currently contains two fields *+ * flags Info flags (PTHREAD_TRACE_INFO_*)? * events The events in which debugger has expressed interest. */-typedef enum pthreadTraceDebugInfoFlags_tag {E PTHREAD_TRACE_INFO_DEBUGGER = 0x00000001, /* Debugger attached */E PTHREAD_TRACE_INFO_MULTIPLE = 0x00000002 /* Multiple debuggers */# } pthr*7eadTraceDebugInfoFlags_t;*typedef struct pthreadTraceDebugInfo_tag {; pthreadTraceUlong_t flags; /* PTHREAD_TRACE_INFO_* */B pthreadTraceUlong_t events; /* as pthreadDebugEventMask_t */8 } pthreadTraceDebugInfo_t, *pthreadTraceDebugInfo_p;/*I * Environment block passed to pthread_trace__init and event.system * event. */,typedef struct pthreadTraceEnvironment_tag {E pthreadTraceUlong_t bin_version; /* Binary DECthreads version */< char thread_version[3 +72]; /* ASCII DECthreads version */, char os_name[32]; /* ASCII O/S name */2 char os_release[32]; /* ASCII O/S release */2 char os_version[32]; /* ASCII O/S version */1 char hw_name[32]; /* ASCII hardware name *// char chip_name[32]; /* ASCII chip name */3 int cpu_speed; /* chip speed (cycles/sec) */) int cpus_online; /* CPUs in box */4 int cpus_active; /* CPUs in running system */ int padding;3 pthreadTraceUlong_t memory; /* Memory (M,7b) */< } pthreadTraceEnvironment_t, *pthreadTraceEnvironment_p;/*< * Types describing the information reported about a thread. */%typedef enum pthreadTraceCancel_tag {B PTHREAD_TRACE_CANCEL_PENDING = 0x0001, /* Cancel is pending */? PTHREAD_TRACE_CANCEL_STATE = 0x0002, /* Cancel enabled */F PTHREAD_TRACE_CANCEL_SYSTEM = 0x0004, /* System cancel enabled */< PTHREAD_TRACE_CANCEL_TYPE = 0x0008 /* Cancel async */ } pthreadTraceCancel_t;/*I * Type defining -7 thread "kinds". All threads created by a program throughK * DECthreads interfaces are of kind NORMAL. A debugger should usually showK * threads of other kinds only when a special switch or mode is used (e.g., * pthread_trace's "thread -a".) */)typedef enum pthreadTraceThreadKind_tag {< PTHREAD_TRACE_THD_KIND_INITIAL = 1, /* Initial thread */: PTHREAD_TRACE_THD_KIND_NORMAL = 2, /* Normal thread */B PTHREAD_TRACE_THD_KIND_NULL = 3, /* DECthreads null thread */D PTHREAD_TRAC .7E_THD_KIND_MGR = 4, /* DECthreads manager thread */H PTHREAD_TRACE_THD_KIND_FOREIGN = 5, /* A non-DECthreads NT thread */E PTHREAD_TRACE_THD_KIND_EXITHAND = 6 /* The exit handler thread */ } pthreadTraceThreadKind_t;/*J * Creator codes to show whether an thread was created by POSIX, CMA, etc. */&typedef enum pthreadTraceCreator_tag {2 PTHREAD_TRACE_CREATOR_NONE = 0, /* Unknown */; PTHREAD_TRACE_CREATOR_POSIX = 1, /* POSIX interface */7 PTHREAD_TRACE_CREATOR_CMA /7 = 2, /* CMA interface */< PTHREAD_TRACE_CREATOR_DCE = 3, /* vanilla DCE thread */@ PTHREAD_TRACE_CREATOR_DCEEXC = 4, /* exception DCE thread */: PTHREAD_TRACE_CREATOR_TIS = 5 /* Prototype TIS TEB */ } pthreadTraceCreator_t;/*@ * Type defining information reported about a thread's creation. * * NOTES: *L * 1) The "sequence" field is traditionally reported as a signed number whenJ * the PTHREAD_TRACE_THD_INTERNAL flag is set, even though the sequence( * is techn07ically an unsigned number.G * 2) If the stack was created with a user specified stack ("stackaddr"K * attribute), the PTHREAD_TRACE_THD_STACKADDR flag will be set. In thisL * case, all of the thread's stack information fields, except stack_base,G * are guesses, and probably inaccurate. You shouldn't, for example,M * compare a later stack highwater mark against stack_reserve to check forK * stack overflows. If the stacksize attribute has also been modified inL * the attrib17utes object, DECthreads will guess that the creator intendedG * that as the size of the user stack. Because the standard does notG * specify any such relationship, this is still an unreliable guess.L * (There's no specific indication that both stackaddr and stacksize wereL * set. However, if DECthreads must guess, we guess PTHREAD_STACK_MIN. SoM * it's reasonable for you to guess that, if the stacksize of a user stackD * isn't PTHREAD_STACK_MIN, the user also specified a sta 27cksize.) *M * However, if the flag PTHREAD_TRACE_THD_ESTACKADDR is also set, then theN * "extended stackaddr" interface, pthread_setstackaddr_np, was used, whichK * allows the caller to specify the size and base address. In this case,4 * all stack information may be considered valid. */F#define PTHREAD_TRACE_THD_NAME 0x00000001 /* Name != "" */L#define PTHREAD_TRACE_THD_SYS_SCOPE 0x00000002 /* System contention scope */G#define PTHREAD_TRACE_THD_INTERNAL 0x00000 37004 /* DECthreads internal */=#define PTHREAD_TRACE_THD_ERROR 0x00000008 /* Init failed */F#define PTHREAD_TRACE_THD_INVATTR 0x00000010 /* ERROR was bad attr. */B#define PTHREAD_TRACE_THD_DETACH 0x00000020 /* Created detached */?#define PTHREAD_TRACE_THD_STACKADDR 0x00000040 /* User stack */L#define PTHREAD_TRACE_THD_ESTACKADDR 0x00000080 /* .. Base and size known *//*J * (*) NOSIG and NOSYSCAN will be set for threads created using the LEGACYL * interfaces (CMA, DCE threads), for binary47 compatibility with the originalI * implementation that delivered async signals to the initial thread, and> * that did not support cancellation of syscalls. [UNIX only]. *//*G * NOTE: if the ERROR bit is set in flags, the following fields will beI * initialized to 0 (NULL): teb, stack_base, stack_reserve, stack_yellow, * stack_guard. *K * If the INVATTR flag is also set, the following additional fields will be4 * set to 0: kind, policy, priority, and stack_size. */+typedef st 57ruct pthreadTraceThreadInit_tag {7 unsigned int flags; /* PTHREAD_TRACE_THD_ flags */7 pthreadTraceThreadKind_t kind; /* Kind of thread */2 pthread_t teb; /* Pointer to thread's TEB */9 pthread_t *handle; /* "Handle" (where pthread_create" stored the TEB pointer) */? pthread_attr_t *attributes; /* Attributes object pointer */3 int policy; /* Thread's scheduling policy */2 int priority; /* Thread's (base) priority */3 void *stack_base; /* Base of 67thread's stack */; void *stack_reserve; /* First byte of reserved zone */8 void *stack_yellow; /* First byte of yellow zone */6 void *stack_guard; /* First byte of guard zone */D pthreadTraceUlong_t stack_size; /* Total usable stack (bytes) */7 void *(*start)(void*); /* Thread start rtn */, void *start_arg; /* Thread start arg */> pthreadTraceUlong_t cpu_mask; /* (TBD: some binding ID) */; pthreadTraceCreator_t creator; /* Creating interface */4 unsign77ed int cancel; /* Initial cancel state */: } pthreadTraceThreadInit_t, *pthreadTraceThreadInit_p;/*; * Types describing the information reported about a mutex. */(typedef enum pthreadTraceMutexType_tag {9 PTHREAD_TRACE_MUT_TYPE_NORMAL = 1, /* Normal mutex */? PTHREAD_TRACE_MUT_TYPE_RECURSIVE = 2, /* Recursive mutex */A PTHREAD_TRACE_MUT_TYPE_ERRORCHECK = 3 /* Error-check mutex */ } pthreadTraceMutexType_t;,typedef enum pthreadTraceMutexProtocol_tag {2 PTHREA 87D_TRACE_MUT_PROTO_NONE = 1, /* Normal */? PTHREAD_TRACE_MUT_PROTO_PROTECT = 2, /* Priority ceiling */B PTHREAD_TRACE_MUT_PROTO_INHERIT = 3 /* Priority inheritance */" } pthreadTraceMutexProtocol_t;G#define PTHREAD_TRACE_MUT_NAME 0x00000001 /* Name != "" */H#define PTHREAD_TRACE_MUT_INTERNAL 0x00000002 /* DECthreads internal */D#define PTHREAD_TRACE_MUT_PSHARED 0x00000004 /* "Process shared" */>#define PTHREAD_TRACE_MUT_ERROR 0x00000008 /* Init failed */G#define PT 97HREAD_TRACE_MUT_INVATTR 0x00000010 /* ERROR was bad attr. *//*G * NOTE: if the ERROR bit is set in flags, the following fields will be! * initialized to 0 (NULL): (n/a) *K * If the INVATTR flag is also set, the following additional fields will be3 * set to 0: type, protocol, prioceiling, priority. */*typedef struct pthreadTraceMutexInit_tag {3 unsigned int flags; /* Miscellaneous flags */3 pthreadTraceMutexType_t type; /* Mutex type */2 pthread_mutex_t *address; / :7* Mutex address */E pthread_mutexattr_t *attributes; /* Attributes object pointer */D pthreadTraceMutexProtocol_t protocol; /* Mutex protocol (nyi) */4 int prioceiling; /* Priority ceiling (nyi) */1 int priority; /* Current priority (nyi) */8 } pthreadTraceMutexInit_t, *pthreadTraceMutexInit_p;/*L * Structure defining information reported about a rwlock initialization, or4 * the first use of a statically initialized rwlock. */F#define PTHREAD_TRACE_RW_NAME 0x0 ;70000001 /* Name != "" */G#define PTHREAD_TRACE_RW_INTERNAL 0x00000002 /* DECthreads internal */C#define PTHREAD_TRACE_RW_PSHARED 0x00000004 /* "Process shared" */=#define PTHREAD_TRACE_RW_ERROR 0x00000008 /* Init failed */F#define PTHREAD_TRACE_RW_INVATTR 0x00000010 /* ERROR was bad attr. */+typedef struct pthreadTraceRwlockInit_tag {3 unsigned int flags; /* Miscellaneous flags */ int padding;4 pthread_rwlock_t *address; /* Rwlock address */E pthrea <7d_rwlockattr_t *attributes; /* Attributes object pointer */: } pthreadTraceRwlockInit_t, *pthreadTraceRwlockInit_p;/*E * Structure defining information recorded about a condition variableI * initialization, or the first use of a statically initialized condition * variable. */H#define PTHREAD_TRACE_COND_NAME 0x00000001 /* Name != "" */I#define PTHREAD_TRACE_COND_INTERNAL 0x00000002 /* DECthreads internal */E#define PTHREAD_TRACE_COND_PSHARED 0x00000004 /* "Process =7 shared" */>#define PTHREAD_TRACE_COND_ERROR 0x00000008 /* Init failed */H#define PTHREAD_TRACE_COND_INVATTR 0x00000010 /* ERROR was bad attr. */)typedef struct pthreadTraceCondInit_tag {3 unsigned int flags; /* Miscellaneous flags */ int padding;5 pthread_cond_t *address; /* Condition address */D pthread_condattr_t *attributes; /* Attributes object pointer */6 } pthreadTraceCondInit_t, *pthreadTraceCondInit_p;/*K * Structure defining information recorded a >7bout a thread specific data key * creation. * * NOTES: *J * 1) EXTENDED tsd keys have additional semantics. In particular, they mayH * have a constructor routine (called at thread startup) as well as a8 * destructor routine (called at thread termination).E * 2) EXTENDED tsd key destructor routines are called with additionalL * arguments: as well as the current value of the tsd key in that thread,D * they receive the thread ID (pthread_t) and the tsd key itself.H * 3) EXTE?7NDED tsd keys can be created with the PTHREAD_KEY_ALLTHREAD_NPL * flag. The constructor (if any) will immediately be run for each threadE * that currently exists. Similarly, when the key is destroyed theG * destructor will immediately be run for each thread. Note that theK * constructor and destructor are, in these cases, run in the context ofJ * the thread creating or destroying the key, NOT in the context of theN * various threads -- thus the constructor and destructor mus @7t be carefully; * constructed (which is why the behavior is an option).G * 4) While trace points are defined for changing the value of a threadN * specific data key, it is legal and supported for applications to get andF * set thread specific data values directly, without calls -- theseF * operations cannot be traced by DECthreads, and therefore may not * appear in the trace log. */F#define PTHREAD_TRACE_KEY_NAME 0x00000001 /* Name != "" */G#define PTHREAD_TRAC A7E_KEY_RESERVED 0x00000002 /* DECthreads reserved */K#define PTHREAD_TRACE_KEY_ALLTHREAD 0x00000004 /* Const/Dest in all thds */F#define PTHREAD_TRACE_KEY_EXTENDED 0x00000008 /* Extended (TLS) key */=#define PTHREAD_TRACE_KEY_ERROR 0x00000010 /* Init failed *//*G * NOTE: if the ERROR bit is set in flags, the following fields will be * initialized to 0 (NULL): key. */(typedef struct pthreadTraceKeyInit_tag {2 unsigned int flags; /* Miscellaneous flags */ int padding;> B7pthread_key_t *address; /* Address where key was stored */D pthreadTraceConstructor_t constructor; /* Constructor routine */' union { /* Destructor routine */& pthreadTraceDestructor_t standard;& pthreadTraceExtDestructor_t extended; } destructor;4 } pthreadTraceKeyInit_t, *pthreadTraceKeyInit_p;/*A * This describes a native exception buffer as captured in a log. */,typedef enum pthreadTraceNatExcVariant_tag {/ PTHREAD_TRACE_NATEXC_OTHER, /* Unknown */1 PTC7HREAD_TRACE_NATEXC_UNIX, /* Tru64 UNIX *// PTHREAD_TRACE_NATEXC_OPENVMS /* OpenVMS */" } pthreadTraceNatExcVariant_t;6#define PTHREAD_TRACE_NATEXC_SIZE_MAX 256 /* Bytes */'typedef struct pthreadTraceNatExc_tag {6 int size; /* Of os member used, in bytes */; pthreadTraceNatExcVariant_t variant; /* Which OS? */8 char os[PTHREAD_TRACE_NATEXC_SIZE_MAX]; /* Data */2 } pthreadTraceNatExc_t, *pthreadTraceNatExc_p;/*N * The pthread_trace_write_np() functi D7on can be called by any application codeN * to generate a trace point. Use pthreadTraceMakeId() to create the ID, using= * the PTHREAD_TRACE_OP_ and PTHREAD_TRACE_STAT_ codes above.L * PTHREAD_TRACE_OBJ_ codes other than PTHREAD_TRACE_OBJ_USER cannot be usedM * by this interface. Also, you cannot specify the PTHREAD_TRACE_STAT_PRIVATEG * flag, and PTHREAD_TRACE_STAT_USER will be added to all trace points. *( * event event code (pthreadTraceMakeId)D * name optional name string for trace poi E7nt: uninterpreted, and may * be NULL0 * count the number of argument pairs following.6 * ... each argument consists of two or more values: a? * PTHREAD_TRACE_TYPE_ code followed by the arguments for that5 * type; usually either a scalar value or a pointer. *M * The return value will be ENOSYS if no event engine is loaded. Some engines" * might report additional errors. *L * NOTE: pthread_trace_write_np is the only function in this header intendedK * for use by application code, raF7ther than by trace engines. The prototypeJ * is here, rather than in , due to the dependency on the event0 * definition and object/operation/status types. */ extern intpthread_trace_write_np ( pthreadTraceEvent_t, const char *, int, ...);/*% * Define the programming interfaces. *I * These functions are intended for use by tracing tools, and are not forM * general use. (They will not be documented outside of this header, and will * have limited support.) * G7//*L * These typedefs describe the trace engine "hooks", which are called by the * DECthreads tracing code. *K * A trace engine has a "name", which is used to construct the actual entryC * points. The engine is packaged as a shared library with the nameL * libpthreadevent_%s.so, (UNIX), or %s_TRACE_ENGINE, (OpenVMS), where %s isN * replaced by the engine name. E.g., libpthreadevent_vt.so or VT_TRACE_ENGINEI * for the Visual Threads engine. (On OpenVMS, LIB$FIND_IMAGE_SYMBOL willM * H7 provide the default file type of ".EXE".) Each of the defined entry pointsD * is resolved using dlsym (or LIB$FIND_IMAGE_SYMBOL) for names alsoN * constructed using the engine name, which will be called using the following * typedef prototypes: *1 * pthreadTraceEngineInit_t pthread_trace_%s_init3 * pthreadTraceEngineWrite_t pthread_trace_%s_write9 * pthreadTraceEngineSetClass_t pthread_trace_%s_setclass1 * pthreadTraceEngineFini_t pthread_trace_%s_fini5 * pthreadTraceEngineReinit_t ptI7hread_trace_%s_reinit7 * pthreadTraceEngineVersion_t pthread_trace_%s_version; * pthreadTraceEngineHandshake_t pthread_trace_%s_handshake *M * The environment in which most of these functions are called is "delicate".K * They must avoid any thread library calls, in addition to any other callsJ * (such as libc stdio) that might involve synchronization. These are only * some of the restrictions.  *//* * Finalize the trace stream. * * Arguments: * * reason PTHREAD_TRACEJ7_FINI_ * * Return: *6 * status value (may be logged, but otherwise ignored) */Atypedef int (*pthreadTraceEngineFini_t) (pthreadTraceFiniCode_t);/*K * Agree on protocol version (which currently means that a client could, at1 * least in theory, support old trace protocols). * * Arguments: *1 * version Current thread trace protocol version * * Return: *9 * version to use (currently must match version argument) */>typedef pthreadTraceUlong_t (*pthreadTraceEngineHaK7ndshake_t) ( pthreadTraceUlong_t);/* * Initialize the trace engine * * Arguments: *1 * environment Thread library's environment block' * argc The number of engine arguments+ * argv Pointer to array of argc arguments * * Return: *0 * if not 0 (success), tracing won't initialize. */)typedef int (*pthreadTraceEngineInit_t) (9 pthreadTraceEnvironment_p, int, pthreadTraceString_t[]);/*J * Re-initialize the trace engine around fork. Called before the fork, andK * aL7fter the fork in both parent and child. Distinguish by the value of the * "why" arguments. * * Arguments: * * why PTHREAD_TRACE_REINIT_ * * Return: * * currently ignored. */Ctypedef int (*pthreadTraceEngineReinit_t) (pthreadTraceForkCode_t);/*J * Inform engine of changes to trace class mask. It may choose to write an' * event, for example, "event.setprop". * * Arguments: * * class New class mask * * Return: * * currently ignored. */2typedef inM7t (*pthreadTraceEngineSetClass_t) (int);/*L * Obsolete variant of pthreadTraceEngineHandshake. This version expects theM * engine to return the trace protocol version against which it was compiled,O * with no input from the trace facility. (In other words, if the engine knows F * how to handle versions 0 and 1, it has no idea which value to use.) * * Arguments: * * none * * Return: *" * trace protocol version required */2typedef int (*pthreadTraceEngineVersion_t) (void);N7/*I * Write a trace record. The engine routine needs to sequence through theM * tuples of (type, value) argument descriptors, and "do whatever it needs to# * do" to capture the trace record. * * Arguments: *6 * event The event ID of the record (e.g., mutex.init) * name The event "name" string! * thread The calling thread's ID * count Count of argument pairs4 * ap stdargs descriptor of the first argument type. * * Return: *" * trace protocol version required */*typeO7def int (*pthreadTraceEngineWrite_t) ( pthreadTraceEvent_t, pthreadTraceConstString_t, pthread_t, int, va_list);<extern int __pthread_trace_getclass (pthreadTraceUlong_t *);)extern int __pthread_trace_gettimestamp ( pthread_t, pthreadTraceTimestamp_p); extern int__pthread_trace_getdebugger ( int, pthreadTraceDebugInfo_p);/*E * Lock out scheduling for the duration of a function that might be aM * cancellation point, or which might invoke 2-level scheduling. FP7or example,L * any I/O operation within a tracing engine or ATOM analysis routine shouldC * use this function. To restore, call again with the return value: * * int lockState;< * lockState = _pthread_trace_lock (PTHREAD_TRACE_LOCK_ALL); * [...]# * _pthread_trace_lock (lockState); *8 * The value of "which" may be PTHREAD_TRACE_LOCK_ALL orM * PTHREAD_TRACE_LOCK_CANCEL. ("ALL" includes "CANCEL", so there's no need to * specify both.) */&extern int __pthread_trace_lock (int);'Q7extern int __pthread_trace_toolreport ( const char *, const char *);:extern int __pthread_trace_setclass (pthreadTraceUlong_t);/*M *+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++D * Information specific to the "log" trace engine that is built into * the POSIX thread library.M *+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */:#define PTHREAD_TRACE_LOG_VERSION 7 /* Current version */#ifdef _PTHREAD_TRACE_ENV_VMSAR7# define PTHREAD_TRACE_LOG_BUFSIZE (1<<15) /* (RMS limitation) */#else@# define PTHREAD_TRACE_LOG_BUFSIZE (1024*1024) /* 1Mb buffers */#endif/*H * This is stored at the beginning of a log file: the "magic number". It* * includes the version of the log engine. */*typedef struct pthreadTraceLogFilHdr_tag {% char traceMagic[4]; /* "ThTr" */% char engine[8]; /* "LOG " */, char version[2]; /* version, "%0.2d" */ char reserved[2];8 } pthreadTraceLogFilHdr_t,S7 *pthreadTraceLogFilHdr_p;*typedef enum pthreadTraceLogCompress_tag {( PTHREAD_TRACE_LOG_COMPRESS_NONE = 0,' PTHREAD_TRACE_LOG_COMPRESS_ZIP = 1 } pthreadTraceLogCompress_t;+typedef enum pthreadTraceLogHeadFlags_tag {@ PTHREAD_TRACE_HEAD_SYNC = 0x01, /* Synch trace (vt only) */< PTHREAD_TRACE_HEAD_NAME = 0x02, /* Record has a name */F PTHREAD_TRACE_HEAD_MOREFRAMES = 0x04 /* Exceeds MAX frame depth */! } pthreadTraceLogHeadFlags_t;/*M * Special case of pthre T7adTraceLogHead_t. This will always be the first eventL * in a trace buffer. It is uncompressed in a compressed buffer. "Event" andM * "size" are as in a standard event, but the rest is specialized. The "size"D * field includes the event itself and the buffer data. That is, forN * decompression (or processing), you must subtract the size of the event. TheN * "fullsize" field, however, is the size of the uncompressed data, which does * not include a header. *N * This is stored at the beginni U7ng of each trace buffer written by the builtinJ * "log" trace engine, and is written to the output stream. Buffers may beN * written out of order. The analyzer must sort them into the proper order (by? * sequence number) to correctly follow the sequence of events. */*typedef struct pthreadTraceLogBufEvt_tag {< pthreadTraceEvent_t event; /* EHD<0> (event.header) */3 unsigned int size; /* Size of buffer data. */< pthreadTraceUlong_t sequence; /* Buffer's sequence # */G pthr V7eadTraceLogCompress_t compression; /* Compression for buffer */3 unsigned int fullsize; /* Uncompressed size */8 } pthreadTraceLogBufEvt_t, *pthreadTraceLogBufEvt_p;/*' * The common header of a trace record. */(typedef struct pthreadTraceLogHead_tag {= pthreadTraceEvent_t event; /* Trace point identifier */5 unsigned int size; /* Size of packet (bytes) */= pthreadTraceId_t thread; /* Thread that logged event */> pthreadTraceUlong_t sequence; /* Event sequ W7ence number */@ pthreadTraceTimestamp_t timestamp; /* Timestamp data */* unsigned char flags; /* Flag bits */; unsigned char frames; /* Number of frames in trace */3 unsigned char argc; /* Number of arguments */9 unsigned char argt[1]; /* Array of argument types */'#ifdef THESE_ARE_FOR_DOCUMENTATION_ONLY /*N * Fields beyond this point cannot be referenced directly. The definitions> * provide (minimal) documentation of the record's layout. * X7M * 1) If the PTHREAD_TRACE_HEAD_NAME flag is set, the event's name stringJ * comes next, in the form of a PTHREAD_TRACE_TYPE_STRING argument. *" * 2) Pad to 8 byte alignment. *H * 3) The arguments begin here, one for each element in the argtypesJ * array. The maximum number of arguments is PTHREAD_TRACE_MAXARGS.: * Each argument is naturally aligned for its type. *K * 4) After the final argument, pad to 8-byte alignment for the list ofHY7 * stack trace PCs. The count of frames is in the "frames" field. */= pthreadLongAddr_t trace[frames]; /* Stack trace (end) */#endif4 } pthreadTraceLogHead_t, *pthreadTraceLogHead_p;/*M *---------------------------------------------------------------------------K * End of information specific to the "log" trace engine that is built into * the POSIX thread library.M *--------------------------------------------------------------------------- *//*/ * Resto re the pointer size environment for VMS */#ifdef _PTHREAD_TRACE_ENV_VMS*# pragma __required_pointer_size __restore#endif#ifdef __cplusplus }#endif#endif /* _PTHREAD_TRACE_H_ */ww [7+/*J *************************************************************************J * *J * Copyright 1992, 2005 Hewlett-Packard Development Company, L.P. *J * *J * Confidential computer software. Valid license from HP and/or *J * its subsidiaries required for possession, use, or copying. *J * \7 *J * Consistent with FAR 12.211 and 12.212, Commercial Computer Software, *J * Computer Software Documentation, and Technical Data for Commercial *J * Items are licensed to the U.S. Government under vendor's standard *J * commercial license. *J * *J * Neither HP nor any of its subsidiaries shall be liable for technical *J]7 * or editorial errors or omissions contained herein. The information *J * in this document is provided "as is" without warranty of any kind and *J * is subject to change without notice. The warranties for HP products *J * are set forth in the express limited warranty statements accompanying *J * such products. Nothing herein should be construed as constituting an *J * additional warranty. *J * ^7 *J ************************************************************************* *//*\ * @(#)$RCSfile: tis.template.h,v $ $Revision: 1.1.6.11 $ (DEC) $Date: 2004/02/11 15:45:36 $ *//* * FACILITY: *A * Thread-Independent Synchronization, a subsidiary of DECthreads * * ABSTRACT: *A * TIS provides synchronization (and other miscellaneous "thread"E * services, such as thread-specific data) in a manner that is highlyC * efficient when DECthreads is not ac _7tive within the process. When> * DECthreads is present these functions are automatically and@ * transparently remapped into DECthreads, providing multithread * safety. *A * These interfaces are not intended to be used for threaded codeH * (i.e., libraries or main programs that create threads). Instead, theyG * are intended to allow creation of "thread safe" code, which operatesG * correctly when threads are present, but without the overhead imposed- * by thread-safety when run without t`7hreads. * * AUTHORS: * * Webb Scales * * CREATION DATE: * * 29 April 1992 * * MODIFIED BY: * * Dave Butenhof * Paul Clark * Peter Portante * Webb Scales * Mark Simons * * LAST MODIFIED: * * 7 December 1999 */ #ifndef _TIS_INCLUDE#define _TIS_INCLUDE/*L * will include in order to implement someM * of its required functionality. The exception header file will cause a fewN * references to be made to the a7threads library. If the including module asksJ * for inline routines, will also cause a few references to beH * made to the threads library. We do not want to reference the threads@ * library if the caller is only include tis.h, so we define theN * _EXC_NO_EXCEPTIONS_ macro to omit the exception handling funcitionality andL * we define the _TIS_INCLUDE_ENV macro to prevent any other threads library * references. */#define _TIS_INCLUDE_ENV#define _EXC_NO_EXCEPTIONS_#inclub7de #undef _EXC_NO_EXCEPTIONS_#undef _TIS_INCLUDE_ENV#if defined (_PTHREAD_ENV_DECC)# if defined (_PTHREAD_ENV_VMS)# if __DECC_VER >= 50200000# pragma __environment __save# else # pragma __extern_model __save# endif# else# pragma __environment __save# endif# pragma member_alignment#endif#ifdef __cplusplus extern "C" {#endif/*E * The following routines comprise the DECthreads "Thread IndependentB * Synchronization" Services. These rout c7ines provide the indicatedK * functionality when used in a program or application in which threads areE * present. In the absence of threads, these functions impose minimal * overhead on their caller. *K * TIS objects created using this (new) interface are fully interchangeableM * with DECthreads core (POSIX 1003.1c-1995) objects. That means that you canH * create a mutex using static initialization or tis_mutex_init, lock itB * before initialization of DECthreads, and then unlock the mud7tex. *L * Other assorted TIS "state", such as thread-specific data keys and values,@ * and cancelation state, are also propagated into DECthreads atK * initialization. Thread-Specific data values appear in the default (main)) * thread, as does the cancelation state. */#define _TIS_VERSION 322015 /* * TIS configuration symbols */#define _TIS__OSF 1#define _TIS__VMS 2#ifndef _TIS_OS_+# if defined (__OSF__) || defined (__osf__)# define _TIS_OS_ _TIS__OSF:# elife7 defined (vms) || defined (__vms) || defined (__VMS)# define _TIS_OS_ _TIS__VMS# else# error _TIS_OS_ is undefined# endif#endif#define _TIS__ALPHA 1#define _TIS__IA64 2#ifndef _TIS_HARDWARE_+# if defined (__alpha) || defined (__ALPHA)$# define _TIS_HARDWARE_ _TIS__ALPHA-# elif defined (__ia64) || defined (__ia64__)## define _TIS_HARDWARE_ _TIS__IA64# else$# error _TIS_HARDWARE_ is undefined# endif#endif /* * TIS structure declarations */typedef f7struct tis_rwlock {' int valid; /* Validation flag */* int readers; /* Number of readers */( int rwaits; /* Waiting readers */& int writer; /* Writer active */( int wwaits; /* Waiting writers */2 pthread_mutex_t mutex; /* The mutex itself */7 pthread_cond_t Wreaders; /* Wait for read access */8 pthread_cond_t Wwriters; /* Wait for write access */" } tis_rwlock_t, *tis_rwlock_p;##define TIS_RWLOCK_VALID 0xbeebeac1?#define TIS_RWLOCK_INITIALIZ g7ER {TIS_RWLOCK_VALID, 0, 0, 0, 0, \ PTHREAD_MUTEX_INITIALIZER, \7 PTHREAD_COND_INITIALIZER, PTHREAD_COND_INITIALIZER}D#define TIS_RWLOCK_INITWITHNAME(_nm_,_am_,_nc1_,_ac1_,_nc2_,_ac2_) \$ {TIS_RWLOCK_VALID, 0, 0, 0, 0, \/ PTHREAD_MUTEX_INITWITHNAME_NP(_nm_,_am_), \0 PTHREAD_COND_INITWITHNAME_NP(_nc1_,_ac1_), \. PTHREAD_COND_INITWITHNAME_NP(_nc2_,_ac2_)}/*J * And a simplified form that uses ANSI C string concatination to form the/ * various object names from a singlh7e argument: */-#define TIS_RWLOCK_INITWITHNAME1(_nm_,_am_) \$ {TIS_RWLOCK_VALID, 0, 0, 0, 0, \/ PTHREAD_MUTEX_INITWITHNAME_NP(_nm_,_am_), \8 PTHREAD_COND_INITWITHNAME_NP("read-" _nc1_,_ac1_), \7 PTHREAD_COND_INITWITHNAME_NP("write-" _nc2_,_ac2_)}/*( * Flags used for tis_mutex_initwithname */typedef enum tis_mflags_tag {$ TIS_MINIT_RECURSIVE = 0x00000001 } tis_mflags_t;/** * Flags used for tis_allocator_mutex_init */#typedef enum tis_alloc_mflags_tai7g {) TIS_ALLOC_MUTEX_PSHARED = 0x00000001,) TIS_ALLOC_MUTEX_NOALLOC = 0x00000002,* TIS_ALLOC_MUTEX_RECURSIVE = 0x00000004 } tis_alloc_mflags_t; #if _TIS_OS_ == _TIS__VMS /*F * On VMS, these routines must begin with "tis$" not "tis_", so use a* * macro to translate on those platforms. */# pragma nostandard /* * TIS ERRNO Routines *//# define tis_errno_get_addr tis$errno_get_addr1# define tis_errno_set_value tis$errno_set_value5# define tis_vmsj7errno_get_addr tis$vmserrno_get_addr7# define tis_vmserrno_set_value tis$vmserrno_set_value /* * TIS Pthread Routines *//# define tis_cond_broadcast tis$cond_broadcast+# define tis_cond_destroy tis$cond_destroy&# define tis_cond_init tis$cond_init)# define tis_cond_signal tis$cond_signal/# define tis_cond_timedwait tis$cond_timedwait&# define tis_cond_wait tis$cond_wait/# define tis_get_expiration tis$get_expiration)# define tis_getspecific tis$getspecific(# de k7fine tis_key_create tis$key_create/# define tis_key_create_new tis$key_create_new(# define tis_key_delete tis$key_delete)# define tis_lock_global tis$lock_global-# define tis_mutex_destroy tis$mutex_destroy(# define tis_mutex_init tis$mutex_init1# define tis_mutex_init_type tis$mutex_init_type(# define tis_mutex_lock tis$mutex_lock-# define tis_mutex_trylock tis$mutex_trylock+# define tis_mutex_unlock tis$mutex_unlock-# define tis_mutex_unblock tis$mutex_unblock# defil7ne tis_once tis$once# define tis_raise tis$raise# define tis_self tis$self/# define tis_setcancelstate tis$setcancelstate)# define tis_setspecific tis$setspecific(# define tis_testcancel tis$testcancel-# define tis_unlock_global tis$unlock_global# define tis_yield tis$yield /*% * TIS Readers/Writer Locks Routines */&# define tis_read_lock tis$read_lock+# define tis_read_trylock tis$read_trylock)# define tis_read_unlock tis$read_unlock/# define tis_rwlock_m7destroy tis$rwlock_destroy)# define tis_rwlock_init tis$rwlock_init(# define tis_write_lock tis$write_lock-# define tis_write_trylock tis$write_trylock+# define tis_write_unlock tis$write_unlock /*! * TIS Asynchronous I/O Routines */)# define tis_io_complete tis$io_complete# define tis_synch tis$synch# pragma standard#endif /* * TIS functions. */=#if (_TIS_OS_ == _TIS__VMS) && (__INITIAL_POINTER_SIZE == 64)'# pragma __required_pointer_size __saven7(# pragma __required_pointer_size __short#endif/* * Get the address of errno */&extern int *tis_errno_get_addr (void);/*2 * Set all known errno cells to a particular value */&extern void tis_errno_set_value (int);#if _TIS_OS_ == _TIS__VMS/*, * Get the address of the VMS-specific errno */)extern int *tis_vmserrno_get_addr (void);/*? * Set all known VMS-specific errno cells to a particular value */)extern void tis_vmserrno_set_value (int);#endif=#if (_ o7TIS_OS_ == _TIS__VMS) && (__INITIAL_POINTER_SIZE == 64)*# pragma __required_pointer_size __restore#endif#if _TIS_OS_ == _TIS__OSF/*M * Allocate and/or initialize a TIS mutex, and allocate a blocking structure.M * This function can be used by a malloc-replacement so that it can safely beM * used by libpthread to allocate blocking structures. (Otherwise, a deadlock< * may occur when contention occurs on the allocator mutex.) *H * handle Pointer to a pthread_mutex_t*, in which addres p7s of a new mutex? * is returned; or, if TIS_ALLOC_MUTEX_NOALLOC is specified, a7 * pointer to a pthread_mutex_t, which is initialized.J * allocator An allocation routine that will be used to allocate the mutex * and blocking structure.C * arg A value passed to the allocator. This is not interpreted by * TIS.C * name A character string representing the name of the mutex. For@ * example, "myMalloc". This will show up in Visual Threads and? * debugger output when mutexes are displ q7ayed (e.g., ladebug's * "show mutex").D * name_arg An undocumented and unsupported name argument, which you * should specify as 0.B * flags One or more of the values in the tis_alloc_mflags_t enum.> * (Yes, they're really flags.) TIS_ALLOC_MUTEX_NOALLOC means< * that you have already allocated a pthread_mutex_t beforeA * making the call, and "handle" is a pointer to that structure. */ extern inttis_allocator_mutex_init ( void *, /* handle */* void *(*)(size_t, void *), /* cr7allback */$ void *, /* allocator argument */# const char *, /* (mutex name) */, unsigned int, /* (mutex name argument) */- unsigned long); /* (tis_alloc_mflags_t) */#endif/*( * Broadcast on a TIS condition variable *K * "cond" is the address of the condition variable, passed by reference, on * which to broadcast. */1extern int tis_cond_broadcast (pthread_cond_t *);/*$ * Destroys a TIS condition variable *H * "cond" is the address of the condition variable, passs7ed by reference,/ * which is to be destroyed or "uninitialized". *//extern int tis_cond_destroy (pthread_cond_t *);/*' * Initialize a TIS condition variable. *K * "cond" is a pointer to an condition variable, passed by reference, which * is initialized. */,extern int tis_cond_init (pthread_cond_t *);/*" * Signal a TIS condition variable *F * "cond" is the address of the abstract condition variable, passed by! * reference, on which to signal. */.extern int tis_cond_t7signal (pthread_cond_t *);/*# * Wait on a TIS condition variable *K * "cond" is the address of the condition variable, passed by reference, onK * which to wait. "mutex" is the address of the mutex, passed by reference,# * which is associated with "cond". */?extern int tis_cond_wait (pthread_cond_t *, pthread_mutex_t *);/*) * Timed Wait on a TIS condition variable *K * "cond" is the address of the condition variable, passed by reference, onK * which to wait. "mutex" is theu7 address of the mutex, passed by reference,M * which is associated with "cond". "abstime" is the address of the timespec: * containing the absolute time in which the wait expires. */extern int tis_cond_timedwait ( pthread_cond_t *, pthread_mutex_t *, const struct timespec *);/*J * Get an expiration time, in preparation for calling tis_cond_timedwait() *I * "delta" is the address of the timespec structure that is the number of= * seconds and nanoseconds to add to the currentv7 system time.D * "abstime" is the address of the timespec structure of the result M * representing the absolute expiration time computed from the current system * time plus the given "delta". */Kextern int tis_get_expiration (const struct timespec *, struct timespec *);/* * Lock the TIS global lock */"extern int tis_lock_global (void);/*+ * Create a thread specific data (tsd) key. *L * "key" is the address of a variable which will receive the key value; thisK * value i w7s used in calls to tis_setspecific() and tis_getspecific() to getL * and set the value associated with this key. The same key value is used inI * each thread to access that thread's context, when and if DECthreads is * initialized in the process. *M * "Destructor" is the address of a routine which is called to destroy (e.g.,M * deallocate) the thread-specific data value when a thread terminates with aK * non-NULL value for the key. If DECthreads is initialized after a TIS tsdG * key is x7created, the key (and destructor) is taken over by DECthreads * transparently. */Cextern int tis_key_create (pthread_key_t *, __pthreadDestructor_t);/*9 * Create a thread specific data (tsd) "constructor" key. *@ * "key" is the address of a variable which will receive the key> * value; this value is used in calls to tis_setspecific() andB * tis_getspecific() to get and set the value associated with this@ * key. The same key value is used in each thread to access thatA * thread's y7context, when and if DECthreads is initialized in the * process. *F * "Constructor" is the address of a routine which is called to createA * a value when a new thread is created. Constructor will also be@ * called with appropriate arguments for each CURRENTLY EXISTINGB * THREAD when the key is created, if the PTHREAD_KEY_ALLTHREAD_NPD * flag is specified. The call, in this case, it made in the contextD * of the thread that creates the key, and thus cannot call anything( * else that relie z7s upon thread context. *F * "Destructor" is the address of a routine which is called to destroyB * (e.g., deallocate) the thread-specific data value when a thread> * terminates with a non-NULL value for the key. Note that theF * prototype for constructor key destructor routines is different thanA * that of the destructor for normal keys. When a constructor key? * created with the PTHREAD_KEY_ALLTHREAD_NP flag is deleted byB * calling tis_key_delete or pthread_key_delete, the destructor isE{7 * called for all currently existing threads -- again, in the context" * of the thread deleting the key. *C * If DECthreads is initialized after a TIS tsd key is created, theB * key (and destructor) is taken over by DECthreads transparently. */extern int tis_key_create_new ( pthread_key_t *, __pthreadConstructor_t, __pthreadExtDestructor_t, int);/*+ * Delete a thread specific data (tsd) key. *< * Deletes a thread specific data key previously returned byL * tis_key_creat |7e(). The application must free any storage or do any cleanupJ * on the data structures associated with the key. The cleanup may be done, * before or after tis_key_delete is called. */*extern int tis_key_delete (pthread_key_t);/*M * Get the thread specific data (tsd) value associated with a particular key. *J * "Key" is a key value returned by a call to tis_key_create(). The threadJ * specific data value associated with this key is returned by the call to * the tis_getspecific(). *}7/-extern void *tis_getspecific (pthread_key_t);/* * Initialize a TIS mutex *> * "mutex" is a pointer to a mutex, which will be initialized. */.extern int tis_mutex_init (pthread_mutex_t *);#if defined (_PTHREAD_ENV_UNIX)/*4 * Initialize a TIS mutex with additional parameters *N * "mutex" is a pointer to a mutex, which will be initialized. You may specifyH * a name for the mutex, and you may set the mutex "recursive" or "errorN * check". The "arg" parameter is officially u ~7ndefined, and you should specifyM * 0. Also, the name string should be a string literal, or other storage thatI * will remain for the life of the mutex -- the library will not copy the * string. *M * This is not exported in the VMS symbol vector, and so the definition isn'tM * useful on VMS. tis_mutex_init_type provides similar capability in a better * "package". */Nextern int tis_mutex_initwithname (pthread_mutex_t *, const char *, int, int);#endif#if defined (_PTHREAD_ENV_VM 7S)/*G * Initialize a "typed" TIS mutex. While this would normally be used toN * initialize a recursive or errorcheck mutex, it can also be used to create aB * "normal" with a name. This replaces the archaic and more arcaneE * tis_mutex_initwithname(), and is available on VMS as well as UNIX. *I * The name string should be a string literal, or other storage that willL * remain for the life of the mutex -- the library will not copy the string. */Eextern int tis_mutex_init_type (pthread_7mutex_t*, int, const char *);#endif/* * Destroy a TIS mutex *J * "mutex" is the address of the mutex which is to be destroyed. The mutex" * object becomes "uninitialized". */1extern int tis_mutex_destroy (pthread_mutex_t *);/* * Lock a TIS mutex *= * "mutex" is the address of the mutex which is to be locked. */.extern int tis_mutex_lock (pthread_mutex_t *);/* * Non-blocking TIS mutex lock *= * "mutex" is the address of the mutex which is to be locked. *C *7 The function returns a boolean value indicating if the mutex was * successfully locked. */1extern int tis_mutex_trylock (pthread_mutex_t *);/* * Unlock a TIS mutex *? * "mutex" is the address of the mutex which is to be unlocked. */0extern int tis_mutex_unlock (pthread_mutex_t *);/* * Unblock from a TIS mutex *K * "mutex" is the address of the mutex from which threads may be unblocked. */1extern int tis_mutex_unblock (pthread_mutex_t *);/*- * Execute a one 7-time initialization routine. *M * The specified routine is called exactly once during a program's execution,J * even if multiple threads call tis_once() simultaneously. This is usefulK * for performing one-time initialization tasks (e.g., for a facility API),I * such as creating mutexes and thread specific data keys. (Although noteJ * that with statically initialized mutexes, it's rarely necessary to call * tis_once.) *L * "once_control" is the address of a one-time initialization co7ntrol block.M * This should be in static storage and unique to the initialization routine.G * "init_routine" is the address of the initialization routine to call. */8extern int tis_once (pthread_once_t *, void (*) (void));/*= * Raise (send) the signal to the current thread or process. */extern int tis_raise (int);/*D * Get current thread "ID". NOTE: without DECthreads, this returns aI * "prototype" TEB which is not used by DECthreads. The value returned byK * tis_self with7in the main thread will change when DECthreads initializes! */!extern pthread_t tis_self (void);/*C * Set the caller's cancelability to state, and return the previous> * cancelability state to the location referenced by oldstate. */1extern int tis_setcancelstate (int state, int *);/*M * Set the thread specific data (tsd) value associated with a particular key. *J * "Key" is a key value returned by a call to tis_key_create(). "Value" isD * value to be associated with this ke7y. Once set, this value can be; * retrieved in this thread using the same key in a call to * tis_getspecific(). */9extern int tis_setspecific (pthread_key_t, const void *);/*G * Creates a cancellation point in the calling thread. Has no effect if> * cancelability is disabled or DECthreads is not initialized. */"extern void tis_testcancel (void);/* * Unlock the TIS global lock */$extern int tis_unlock_global (void);/*! * Yield this thread to another. */extern7 void tis_yield (void);/*( * Locks a readers/writer lock for read. */*extern int tis_read_lock (tis_rwlock_t *);/*) * Locks a readers/writer lock for write. */+extern int tis_write_lock (tis_rwlock_t *);/*I * Tries to lock a readers/writer lock for read. Does not wait if lock is * unavailable. */-extern int tis_read_trylock (tis_rwlock_t *);/*! * Destroy a readers/writer lock. *//extern int tis_rwlock_destroy (tis_rwlock_t *);/*$ * Initialize a reader7s/writer lock. */,extern int tis_rwlock_init (tis_rwlock_t *);/*J * Tries to lock a readers/writer lock for write. Does not wait if lock is * unavailable. */.extern int tis_write_trylock (tis_rwlock_t *);/*4 * Unlocks the readers/writer lock from read access. */,extern int tis_read_unlock (tis_rwlock_t *);/*5 * Unlocks the readers/writer lock from write access. */-extern int tis_write_unlock (tis_rwlock_t *);#if _TIS_OS_ == _TIS__VMS/*4 * Declare completion 7of Asynchronous I/O operation. *3 * Note: this routine can be called from AST level. */#extern void tis_io_complete (void);/*) * Wait for Asynchronous I/O to complete. */7extern unsigned long tis_synch (unsigned long, void *);#endif#if defined (_PTHREAD_ENV_DECC)# if defined (_PTHREAD_ENV_VMS)# if __DECC_VER >= 50200000"# pragma __environment __restore# else## pragma __extern_model __restore# endif# else!# pragma __environment __restore# endif#endif#ifdef __cplusplus}#endif#endif /* _TIS_INCLUDE */ww