/**/ /***************************************************************************/ /** **/ /** © Copyright 2010, Hewlett-Packard Development Company, L.P. **/ /** **/ /** Confidential computer software. Valid license from HP and/or **/ /** its subsidiaries required for possession, use, or copying. **/ /** **/ /** Consistent with FAR 12.211 and 12.212, Commercial Computer Software, **/ /** Computer Software Documentation, and Technical Data for Commercial **/ /** Items are licensed to the U.S. Government under vendor's standard **/ /** commercial license. **/ /** **/ /** Neither HP nor any of its subsidiaries shall be liable for technical **/ /** or editorial errors or omissions contained herein. The information **/ /** in this document is provided "as is" without warranty of any kind and **/ /** is subject to change without notice. The warranties for HP products **/ /** are set forth in the express limited warranty statements accompanying **/ /** such products. Nothing herein should be construed as constituting an **/ /** additional warranty. **/ /** **/ /***************************************************************************/ /********************************************************************************************************************************/ /* Created: 22-Mar-2010 04:19:40 by OpenVMS SDL EV3-3 */ /* Source: FINITIONS.LIS; */ /********************************************************************************************************************************/ /*** MODULE NETEXTERNALS IDENT X-7 ***/ /*+ */ /* binabstimedef - DEC Binary Absolute Time. */ /* */ /*- */ %replace babst$m_tdf by '11111111111100000000000000000000'b; %replace babst$m_version by '00000000000011110000000000000000'b; %replace net$c_binabstime_len by 16; %replace babst$S_NET$binabstime by 16; dcl 1 NET$binabstime based, 2 babst$q_time bit(64) aligned, /* Scalar time value */ 2 babst$g_inacc (1:6) bit(8) aligned, /* Inaccuracy associated with this time */ 2 babst$g_tdfs , /* The Time Differential Factors value (TDF) */ 3 babst$v_tdf bit(12), /* Time Zone */ 3 babst$v_version bit(4); /* Version Number */ /*+ */ /* binreltime - DEC Binary Relative Time. */ /* */ /*- */ %replace brelt$m_reserved by '11111111111100000000000000000000'b; %replace brelt$m_version by '00000000000011110000000000000000'b; %replace net$c_binreltime_len by 16; %replace brelt$S_NET$binreltime by 16; dcl 1 NET$binreltime based, 2 brelt$q_time bit(64) aligned, /* Scalar time value */ 2 brelt$g_inacc (1:6) bit(8) aligned, /* Inaccuracy associated with this time */ 2 brelt$g_tdfs , /* The TDF value = 0 */ 3 brelt$v_reserved bit(12), /* Reserved */ 3 brelt$v_version bit(4); /* Version number */ /* Time service external data sme %replace eid$S_NET$entityiddef by 2; dcl 1 NET$entityiddef based, 2 eid$w_id bit(16) aligned; %replace evtid$S_NET$eventtypeiddef by 4; dcl 1 NET$eventtypeiddef based, 2 evtid$l_evtid bit(32) aligned; %replace evtinfo$S_NET$eventinfodef by 4; dcl 1 NET$eventinfodef based, 2 evtinfo$l_event_information bit(32) aligned; /* Entity external data structures */ %replace net$c_nid_len by 6; %replace naddr$S_NET$nodei3eaddr by 6; dcl 1 NET$nodei3eaddr based, 2 naddr$g_addr (1:6) bit(8) aligned; /* Node Address external data structures */ /* read UID symbols */ /*+ */ /* General constant values for the phase IV relay */ /*- */ %replace EVD$K_MBX_MESSAGE_SZ by 128; /*Size of mailbox buffer */ %replace EVD$K_MBX_QUOTA by 128; /*Mailbox quota */ %replace EVD$K_NET_MESSAGE_SZ by 1024; /*Size of network buffer */ %replace EVD$K_RELAY_OBJ_NUM by 26; /*Relay object number */ %replace EVD$K_SINK_OBJ_NUM by 60; /*Sink object number */ /*+ */ /* Definition of the QIO buffer's header */ /*- */ %replace EVD$S_NET$RELAY_QIO_BUF by 17; dcl 1 NET$RELAY_QIO_BUF based, 2 EVD$L_CHANNEL fixed binary(31), /*Network channel number */ 2 EVD$W_IOSB fixed binary(15), /*First word of the IOSB (Condition) */ 2 EVD$W_TRANS_CNT fixed binary(15), /*Second word of the IOSB (Transfer count) */ 2 EVD$L_INFO fixed binary(31), /*Second long od the IOSB (Information) */ 2 EVD$L_MBX_CHANNEL fixed binary(31), /*Mailbox channel number */ 2 EVD$B_BUF fixed binary(7); /*First byte of data */ /*+ */ /* Definition of the Mailbox messages */ /*- */ %replace EVD$S_NET$RELAY_MBX_BUF by 10; dcl 1 NET$RELAY_MBX_BUF based, 2 EVD$W_MSGTYPE fixed binary(15), /*Mailbox message type */ 2 EVD$W_UNIT fixed binary(15), /*Mailbox unit number */ 2 EVD$L_NAME fixed binary(31), /*Device name */ 2 EVD$B_INFO_SZ fixed binary(7), /*NCB size */ 2 EVD$B_INFO fixed binary(7); /*First byte of the NCB */ /*+ */ /* LEVTDEF - Local Event Record data structure */ /* */ /* Definition of the data structure used to record local event */ /* information. */ /*- */ %replace LEVT$K_LENGTH by 74; /* Size of Event */ %replace LEVT$S_NET$localeventreport by 74; dcl 1 NET$localeventreport based, 2 LEVT$W_EVENTTYPELEN bit(16) aligned, 2 LEVT$W_EVENTTYPETAG bit(16) aligned, 2 LEVT$L_EVENTTYPE bit(32) aligned, 2 LEVT$W_ENTITYUIDLEN bit(16) aligned, 2 LEVT$W_ENTITYUIDTAG bit(16) aligned, 2 LEVT$O_ENTITYUID bit(128) aligned, 2 LEVT$W_EVENTTIMELEN bit(16) aligned, 2 LEVT$W_EVENTTIMETAG bit(16) aligned, 2 LEVT$O_EVENTTIME bit(128) aligned, 2 LEVT$W_EVENTUIDLEN bit(16) aligned, 2 LEVT$W_EVENTUIDTAG bit(16) aligned, 2 LEVT$O_EVENTUID bit(128) aligned, 2 LEVT$W_ENTITYNAMELEN bit(16) aligned, 2 LEVT$W_ENTITYNAMETAG bit(16) aligned, 2 LEVT$W_ENTITYNAME bit(16) aligned; /*+ */ /* EVTDEF - Event Record data structure */ /* */ /* Definition of the data structure used to record local event */ /* information. */ /*- */ %replace EVT$M_DEALLOCATE by '10000000000000000000000000000000'b; %replace EVT$K_EVENTREPORTHDR by 24; /* Size of Event Report Header */ %replace EVT$K_GLOBALEVENTREPORTHDR by 44; /* Size of Event Report Header */ %replace EVT$K_LENGTH by 116; /* Size of fixed event portion Event */ %replace EVT$S_NET$eventreport by 118; dcl 1 NET$eventreport based, 2 EVT$L_FLINK bit(32) aligned, /* forward link */ 2 EVT$L_BLINK bit(32) aligned, /* backward link */ 2 EVT$W_LENGTH bit(16) aligned, /* structure length */ 2 EVT$B_TYPE bit(8) aligned, /* DYN$C_DECNET */ 2 EVT$B_SUBTYPE bit(8) aligned, /* DYN$C_EVD_EVT */ 2 EVT$W_ACCESS_COUNT bit(16) aligned, /* Access Count (Interlocked) */ 2 EVT$R_Flagsrsved union, 3 EVT$W_FLAGWORD bit(16) aligned, 3 EVT$R_BITS , 4 EVT$V_DEALLOCATE bit(1), 4 EVT$V_REST bit(15), 2 EVT$W_EBCNT bit(16) aligned, /* Block Count Charged */ 2 EVT$W_RESERVED bit(16) aligned, /* Reserved for future use */ 2 EVT$W_EVENTLENGTH bit(16) aligned, /* Total Size of Event */ 2 EVT$W_USERPROTOCOL bit(16) aligned, /* User Protocol Header */ 2 EVT$T_EVENTREPORT , /* Start of Event Report */ 3 EVT$W_STREAMUIDLEN bit(16) aligned, 3 EVT$W_STREAMUIDTAG bit(16) aligned, 3 EVT$G_STREAMUID character(16), /* Outbound Stream Uid */ 2 EVT$T_GLOBALEVENTREPORT , /* Copy LEVT to here. */ 3 EVT$W_EVENTTYPELEN bit(16) aligned, 3 EVT$W_EVENTTYPETAG bit(16) aligned, 3 EVT$L_EVENTTYPE bit(32) aligned, 3 EVT$W_ENTITYUIDLEN bit(16) aligned, 3 EVT$W_ENTITYUIDTAG bit(16) aligned, 3 EVT$G_ENTITYUID character(16), 3 EVT$W_EVENTTIMELEN bit(16) aligned, 3 EVT$W_EVENTTIMETAG bit(16) aligned, 3 EVT$G_EVENTTIME character(16), 3 EVT$W_EVENTUIDLEN bit(16) aligned, 3 EVT$W_EVENTUIDTAG bit(16) aligned, 3 EVT$G_EVENTUID character(16), 3 EVT$W_ENTITYNAMELEN bit(16) aligned, 3 EVT$W_ENTITYNAMETAG bit(16) aligned, 2 EVT$W_ENTITYNAME bit(16) aligned; /* */ /* Event structure for an EVD lost events message. */ /* */ %replace PELE$M_DEALLOCATE by '10000000000000000000000000000000'b; %replace PELE$K_EVENTREPORTHDR by 24; /* Size of Event Report Header */ %replace PELE$K_GLOBALEVENTREPORTHDR by 44; /* Size of Event Report Header */ %replace PELE$K_LENGTH by 140; /* Size of Event */ %replace PELE$S_NET$PELost by 140; dcl 1 NET$PELost based, 2 PELE$L_FLINK bit(32) aligned, /* forward link */ 2 PELE$L_BLINK bit(32) aligned, /* backward link */ 2 PELE$W_LENGTH bit(16) aligned, /* structure length */ 2 PELE$B_TYPE bit(8) aligned, /* DYN$C_NET */ 2 PELE$B_SUBTYPE bit(8) aligned, /* DYN$C_EVD_EVT */ 2 PELE$W_ACCESS_COUNT bit(16) aligned, /* Access Count (Interlocked) */ 2 PELE$R_FLAGSRSVED union, 3 PELE$W_FLAGWORD bit(16) aligned, 3 PELE$r_bits , 4 PELE$V_DEALLOCATE bit(1), 4 PELE$v_rest bit(15), 2 PELE$W_EBCNT bit(16) aligned, /* Block Count Charged */ 2 PELE$W_RESERVED bit(16) aligned, /* Reserved for future use */ 2 PELE$W_EVENTLENGTH bit(16) aligned, /* Total Size of Event */ 2 PELE$W_USERPROTOCOL bit(16) aligned, /* User Protocol Header */ 2 PELE$T_EVENTREPORT , /* Start of Event Report */ 3 PELE$W_STREAMUIDLEN bit(16) aligned, 3 PELE$W_STREAMUIDTAG bit(16) aligned, 3 PELE$G_STREAMUID character(16), /* Outbound Stream Uid */ 2 PELE$W_EVENTTYPELEN bit(16) aligned, 2 PELE$W_EVENTTYPETAG bit(16) aligned, 2 PELE$L_EVENTTYPE bit(32) aligned, 2 PELE$W_ENTITYUIDLEN bit(16) aligned, 2 PELE$W_ENTITYUIDTAG bit(16) aligned, 2 PELE$G_ENTITYUID character(16), 2 PELE$W_EVENTTIMELEN bit(16) aligned, 2 PELE$W_EVENTTIMETAG bit(16) aligned, 2 PELE$G_EVENTTIME character(16), 2 PELE$W_EVENTUIDLEN bit(16) aligned, 2 PELE$W_EVENTUIDTAG bit(16) aligned, 2 PELE$G_EVENTUID character(16), 2 PELE$W_ENTITYNAMELEN bit(16) aligned, 2 PELE$W_ENTITYNAMETAG bit(16) aligned, 2 PELE$W_ENTITYCLASSLEN bit(16) aligned, 2 PELE$W_ENTITYCLASSTAG bit(16) aligned, 2 PELE$L_ENTITYCLASS bit(32) aligned, 2 PELE$W_ENTITYINSTLEN bit(16) aligned, 2 PELE$W_ENTITYINSTTAG bit(16) aligned, 2 PELE$W_EVENTARGLEN bit(16) aligned, 2 PELE$W_EVENTARGTAG bit(16) aligned, 2 PELE$W_NUMBERLEN bit(16) aligned, 2 PELE$W_NUMBERTAG bit(16) aligned, 2 PELE$L_NUMBER bit(32) aligned; /* Task Suspension status codes */ %replace EVD$K_SUSPENSION_NORMAL by 1; /* Normal Task Suspension */ %replace EVD$K_SUSPENSION_NOVM by 2; /* No Virtual Memory Available */ %replace EVD$K_SUSPENSION_NOQENTRY by 3; /* No Queue Entry Available */ /* Task Suspension status */ %replace EVD$K_SIGNAL_DELETETASK by 1; /* Delete Task */ %replace EVD$K_SIGNAL_QUEUEDEVENT by 2; /* Event Queued to Task */ %replace EVENT$K_MAXSEVENT by 10; %replace EVENT$K_MAXGEVENT by 10; %replace SFILTERELEMENT$S_NET$SFiltrElmt by 14; dcl 1 NET$SFiltrElmt based, 2 SFILTERELEMENT$L_TYPETAG bit(32) aligned, /* Element type tag class */ 2 SFILTERELEMENT$B_EVENTS (1:10) fixed binary(7); /* Events associated with this */ /* instance. Pass, Block, */ /* and Ignore are the only */ /* legitimate values for events. */ %replace SFILTER$S_NET$SFilter by 436; dcl 1 NET$SFilter based, 2 SFILTER$A_FCHILD pointer, /* F link to next level of class or instance */ 2 SFILTER$A_BCHILD pointer, /* B link to last level of class or instance */ 2 SFILTER$W_SIZE bit(16) aligned, /* Size of Specific Filter tree element */ 2 SFILTER$B_TYPE bit(8) aligned, /* Type of structure DYN$C_NET */ 2 SFILTER$B_SUBTYPE bit(8) aligned, /* SubType of stucture DYN$C_SPECIFIC_FILTER */ 2 SFILTER$g_ENTITY character(402), 2 SFILTER$g_FITEM character(14), 2 SFILTER$A_FPEERS pointer, /* F link to peer class or instance */ 2 SFILTER$A_BPEERS pointer; /* B link to peer class or instance */ %replace GfilterElement$S_NET$GFiltrElmt by 18; dcl 1 NET$GFiltrElmt based, 2 GfilterElement$L_TypeTag bit(32) aligned, /* Element type tag class */ 2 GfilterElement$L_Entity bit(32) aligned, /* Entity class number */ 2 GfilterElement$B_Events (1:10) fixed binary(7); /* Events associated with this */ /* instance. Pass, Block, */ /* and Ignore are the only */ /* legitimate values for events. */ %replace GFilter$S_NET$GFilter by 38; dcl 1 NET$GFilter based, 2 GFilter$a_fChild pointer, /* F link to next level of class */ 2 GFilter$a_bChild pointer, /* B link to last level of class */ 2 GFilter$W_Size bit(16) aligned, /* Size of Global Filter tree element */ 2 GFilter$B_Type bit(8) aligned, /* Type of structure DYN$C_NET */ 2 GFilter$B_SubType bit(8) aligned, /* SubType of stucture DYN$C_GLOBAL_FILTER */ 2 GFilter$g_Fitem character(18), 2 GFilter$a_fPeers pointer, /* F link to peer class */ 2 GFilter$a_bPeers pointer; /* B link to peer class */ /* Filter Type Codes */ %replace FILTERTYPE$K_SPECIFIC by 1; /* Specific Filter Match */ %replace FILTERTYPE$K_GLOBAL by 2; /* Global Filter Match */ %replace FILTERTYPE$K_CATCHALL by 4; /* CatchAll Filter Match */ /* Filter Action Codes */ %replace FILTERACTION$K_IGNORE by 1; /* Ignore Event */ %replace FILTERACTION$K_PASS by 2; /* Pass Event */ %replace FILTERACTION$K_BLOCK by 3; /* Block Event */ /* Search State Codes */ %replace SEARCHSTATE$K_ANCESTOR by 1; /* Ancestor Matches */ %replace SEARCHSTATE$K_PARENT by 2; /* Parent Matches */ %replace SEARCHSTATE$K_SIBLING by 3; /* Sibling Matches */ %replace SEARCHSTATE$K_SELF by 4; /* Self Match */ %replace EVD$K_READY by 1; /* Able to accept next request Event */ %replace EVD$K_INITIALIZE_USER by 2; /* User Client Initialization */ %replace EVD$K_REQUEST_EVENT by 3; /* User Client is ready for an Event */ %replace EVD$K_PROTOCOL_ERROR by 4; /* Unexpected Packet Type */ %replace EVD$K_EVENT_PACKET by 5; /* Contains Formatted/Unformatted Event Record */ %replace EVD$K_USER_SHUTDOWN by 6; /* User Client Shutdown */ %replace EVD$K_CLIENT_BUSY by 7; /* User Client Cannot process request */ %replace EVD$K_CLIENT_RESERVED by 8; %replace EVD$M_CLIENT_FORMATTED by '00000000100000000000000000000000'b; %replace EVD$M_CLIENT_UID by '00000000010000000000000000000000'b; %replace EVD$M_CLIENT_LASTLINE by '00000000001000000000000000000000'b; %replace EVD$S_NET$UserClientProtocol by 2; dcl 1 NET$UserClientProtocol based, 2 EVD$R_PACKET_TYPE , 3 EVD$V_PACKET_TYPE_LOWBYTE bit(8), /* User Client Protocol Types */ 3 EVD$V_CLIENT_FORMATTED bit(1), 3 EVD$V_CLIENT_UID bit(1), 3 EVD$V_CLIENT_LASTLINE bit(1), 3 EVD$V_FILL_0_ bit(5); /* EVD service external data structure */ /********************************************************************************************************************************/ /* Created: 22-Mar-2010 04:19:43 by OpenVMS SDL EV3-3 */ /* Source: 26-MAY-1994 18:29:48 JEDI_AXP_JEDI_RESD$:[PHASE5COMMON.SRC]NET_IPC_S= */ /********************************************************************************************************************************/ /*** MODULE $IPCBDEF IDENT X-3 ***/ /* */ /* IPC Function code constants. */ /* */ /* NOTE: All new function codes should be added at the end of the */ /* list to insure backward compatibility. */ /* */ %replace IPC$K_FC_NOP by 0; /* Null Operation */ /* Association Services */ %replace IPC$K_FC_OPEN_ASSOCIATION by 1; /* Open Association */ %replace IPC$K_FC_SHUT_ASSOCIATION by 2; /* Shut Association */ %replace IPC$K_FC_CLOSE_ASSOCIATION by 3; /* Close Association */ /* Connection Services */ %replace IPC$K_FC_CONNECT_INITIATE by 4; /* Connect Initiate */ %replace IPC$K_FC_GET_CONNECTION by 5; /* Get Connection */ %replace IPC$K_FC_CONNECT_HANDOFF by 6; /* Connection Handoff */ %replace IPC$K_FC_CONNECT_ACCEPT by 7; /* Accept Connection */ %replace IPC$K_FC_CONNECT_REJECT by 8; /* Reject Connection */ %replace IPC$K_FC_DISCONNECT_CONNECTION by 9; /* Disconnect Connection */ %replace IPC$K_FC_ABORT_CONNECTION by 10; /* Abort Connection */ /* Data Transfer Services */ %replace IPC$K_FC_TRANSMIT by 11; /* Transmit Data */ %replace IPC$K_FC_RECEIVE by 12; /* Receive Data */ /* General Services */ %replace IPC$K_FC_RESOLVE_NAME by 13; /* Resolve Name */ %replace IPC$K_FC_GET_PORT_INFORMATION by 14; /* Get information on current port */ %replace IPC$K_FC_ENUMERATE_LOCAL_TOWERS by 15; /* Get supported local towers */ %replace IPC$K_FC_BACKTRANSLATE_ADDRESS by 16; /* Back Translate address to name */ %replace IPC$K_FC_REGISTER_OBJECT by 17; /* Register Object */ %replace IPC$K_FC_DEREGISTER_OBJECT by 18; /* Deregister Object */ /* CTI only function codes - Return Unsupported in IPC */ %replace IPC$K_FC_TRANSCEIVE by 19; /* Transmit/receive (RR) */ %replace IPC$K_FC_REPLY by 20; /* Reply (RR) */ %replace IPC$K_FC_GET_BUFFER by 21; /* Get Buffer */ %replace IPC$K_FC_FREE_BUFFER by 22; /* Free Buffer */ %replace IPC$K_FC_INCOMING_CONNECT by 23; /* Incoming Connect */ %replace IPC$K_FC_INCOMING_DISCONNECT by 24; /* Incoming Disconnect */ %replace IPC$K_FC_INCOMING_EXPEDITED by 25; /* Incoming Expedited Data */ /* Event Services */ %replace IPC$K_FC_RECEIVE_EVENT by 26; /* Receive Event notification */ /* Verification Services */ %replace IPC$K_FC_VERIFY_NODENAME by 27; /* NodeName Verification */ /* Declare Server Services */ %replace IPC$K_FC_DECLARE_SERVER by 28; /* Declare Server */ /* Backtranslate function */ %replace IPC$K_FC_BACKTRANSLATE by 29; /* Parsenodename function */ %replace IPC$K_FC_PARSE_NODENAME by 30; /* CDI functions */ %replace IPC$K_FC_CDIFlushCache by 31; %replace IPC$K_FC_CDIInitialize by 32; %replace IPC$K_FC_CDISetSearchPath by 33; /* Reserved for future use */ %replace IPC$K_FC_RESERVED6 by 34; /* Reserved for future use */ %replace IPC$K_FC_RESERVED7 by 35; /* Reserved for future use */ %replace IPC$K_FC_RESERVED8 by 36; /* Reserved for future use */ %replace IPC$K_FC_RESERVED9 by 37; /* Reserved for future use */ %replace IPC$K_FC_RESERVED10 by 38; /* Reserved for future use */ %replace IPC$K_FC_RESERVED11 by 39; /* Reserved for future use */ %replace IPC$K_FC_RESERVED12 by 40; /* Reserved for future use */ /* Maximum function implemented */ %replace IPC$K_FC_MAXIMUM by 41; /* */ /* Inter-Process Communication Block (IPCB) */ /* */ %replace IPCB$M_FLAGS_MULT by '10000000000000000000000000000000'b; %replace IPCB$M_FLAGS_EXPEDITED by '01000000000000000000000000000000'b; %replace IPCB$M_FLAGS_SYNC by '00100000000000000000000000000000'b; %replace IPCB$M_FLAGS_NOPROXY by '00010000000000000000000000000000'b; %replace IPCB$M_FLAGS_NOAUTHENTICATE by '00001000000000000000000000000000'b; %replace IPCB$M_FLAGS_AUTODISCONNECT by '00000100000000000000000000000000'b; %replace IPCB$M_FLAGS_NOVERIFY_NODENAME by '00000010000000000000000000000000'b; %replace IPCB$M_FLAGS_NOAUTOTPSELECT by '00000001000000000000000000000000'b; %replace IPCB$M_FLAGS_IPC_RESERVED9 by '00000000100000000000000000000000'b; %replace IPCB$M_FLAGS_IPC_RESERVED10 by '00000000010000000000000000000000'b; %replace IPCB$M_FLAGS_IPC_RESERVED11 by '00000000001000000000000000000000'b; %replace IPCB$M_FLAGS_IPC_RESERVED12 by '00000000000100000000000000000000'b; %replace IPCB$M_FLAGS_IPC_RESERVED13 by '00000000000010000000000000000000'b; %replace IPCB$M_FLAGS_IPC_RESERVED14 by '00000000000001000000000000000000'b; %replace IPCB$M_FLAGS_IPC_RESERVED15 by '00000000000000100000000000000000'b; %replace IPCB$M_FLAGS_IPC_RESERVED16 by '00000000000000010000000000000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED17 by '00000000000000001000000000000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED18 by '00000000000000000100000000000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED19 by '00000000000000000010000000000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED20 by '00000000000000000001000000000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED21 by '00000000000000000000100000000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED22 by '00000000000000000000010000000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED23 by '00000000000000000000001000000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED24 by '00000000000000000000000100000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED25 by '00000000000000000000000010000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED26 by '00000000000000000000000001000000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED27 by '00000000000000000000000000100000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED28 by '00000000000000000000000000010000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED29 by '00000000000000000000000000001000'b; %replace IPCB$M_FLAGS_SSRV_RESERVED30 by '00000000000000000000000000000100'b; %replace IPCB$M_FLAGS_SSRV_RESERVED31 by '00000000000000000000000000000010'b; %replace IPCB$M_FLAGS_SSRV_RESERVED32 by '00000000000000000000000000000001'b; %replace IPCB$K_DTXLENGTH by 56; /* Data Transfer Request Length */ %replace IPCB$K_LENGTH by 102; /* KEEP THIS LAST PLEASE! */ %replace IPCB$S_NET$IPCBDEF by 102; dcl 1 NET$IPCBDEF based, 2 IPCB$L_STATUS bit(32) aligned, /* Completion status of request */ 2 IPCB$L_STATUS1 bit(32) aligned, /* Function specific additional information */ 2 IPCB$R_IPCBFLAGS union, 3 IPCB$L_FLAGS bit(32) aligned, /* Function Flags */ 3 IPCB$R_FLAG_BITS , 4 IPCB$V_FLAGS_MULT bit(1), /* This is a single segment of a larger message */ 4 IPCB$V_FLAGS_EXPEDITED bit(1), /* Send/Receive Expedited Data */ 4 IPCB$V_FLAGS_SYNC bit(1), /* Allow IPC to return a synchronous completion if possible */ 4 IPCB$V_FLAGS_NOPROXY bit(1), /* Override Session outgoing proxy characteristics */ 4 IPCB$V_FLAGS_NOAUTHENTICATE bit(1), /* Bypass all user authentication on incoming connect */ /* and allow anyone to connect to this server. */ 4 IPCB$V_FLAGS_AUTODISCONNECT bit(1), /* Allow transport to automatically disconnect */ /* the connection */ 4 IPCB$V_FLAGS_NOVERIFY_NODENAME bit(1), /* Do not Verify Received Node Name on Incoming Connect */ 4 IPCB$V_FLAGS_NOAUTOTPSELECT bit(1), /* Bypass Session selection of optimum transport */ /* for connection. */ 4 IPCB$V_FLAGS_IPC_RESERVED9 bit(1), /* Reserved for use by $IPC system service */ 4 IPCB$V_FLAGS_IPC_RESERVED10 bit(1), /* Reserved for use by $IPC system service */ 4 IPCB$V_FLAGS_IPC_RESERVED11 bit(1), /* Reserved for use by $IPC system service */ 4 IPCB$V_FLAGS_IPC_RESERVED12 bit(1), /* Reserved for use by $IPC system service */ 4 IPCB$V_FLAGS_IPC_RESERVED13 bit(1), /* Reserved for use by $IPC system service */ 4 IPCB$V_FLAGS_IPC_RESERVED14 bit(1), /* Reserved for use by $IPC system service */ 4 IPCB$V_FLAGS_IPC_RESERVED15 bit(1), /* Reserved for use by $IPC system service */ 4 IPCB$V_FLAGS_IPC_RESERVED16 bit(1), /* Reserved for use by $IPC system service */ /* */ /* The flags below are used and defined by session services. Use of these flags is */ /* prohibited, unless corresponding changes are made in session services. */ /* */ 4 IPCB$V_FLAGS_SSRV_RESERVED17 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED18 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED19 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED20 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED21 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED22 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED23 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED24 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED25 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED26 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED27 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED28 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED29 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED30 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED31 bit(1), /* Reserved for use by session services */ 4 IPCB$V_FLAGS_SSRV_RESERVED32 bit(1), /* Reserved for use by session services */ 2 IPCB$L_ASSOCIATIONID bit(32) aligned, /* Id of the association to which the incoming */ /* connection has been assigned */ 2 IPCB$L_CONNECTIONID bit(32) aligned, /* Id assigned by Session to the incoming connection. */ /* This field is only required if multiple connections */ /* were enabled on the Open Association. */ 2 IPCB$L_RET_BUFFER_LENGTH bit(32) aligned, /* Returned length of received data. */ 2 IPCB$L_BUFFER_LENGTH bit(32) aligned, /* Length of the Transmit/Receive buffer */ 2 IPCB$A_BUFFER pointer, /* Address of the transmit buffer on a Send or the */ /* Receive buffer on a Receive */ 2 IPCB$L_RQSTID bit(32) aligned, /* Request Id., only used for Request/Response Transfers. */ 2 IPCB$L_RET_REPLY_LENGTH bit(32) aligned, /* Returned length of the Reply data. */ 2 IPCB$L_REPLY_LENGTH bit(32) aligned, /* Length of the Reply buffer, only used for */ /* Request/Response Transfers. */ 2 IPCB$A_REPLY_BUFFER pointer, /* Address of the Reply buffer, only used for */ /* Request/Response Transfers. */ 2 IPCB$L_ASSOCIATION_CONTEXT bit(32) aligned, /* User Specified Association Context */ 2 IPCB$L_CONNECTION_CONTEXT bit(32) aligned, /* User Specified Connection Context */ 2 IPCB$T_RESERVED character(16), /* Reserved for future use */ 2 IPCB$L_EVENT_TYPE bit(32) aligned, /* Incoming event function code */ 2 IPCB$R_INPUTLSTDESC union, 3 IPCB$Q_INPUTLST_DESC bit(64) aligned, /* Input Item List Descriptor */ 3 IPCB$R_INPUTLST_DESC_FIELDS , 4 IPCB$W_INPUTLST_LENGTH bit(16) aligned, /* Size of Input Itemlist */ 4 IPCB$W_RESERVED1 bit(16) aligned, /* Reserved */ 4 IPCB$A_INPUTLST_POINTER pointer, /* Address of Input Item List. */ 2 IPCB$R_TEMPLATELSTDESC union, 3 IPCB$Q_TEMPLATELST_DESC bit(64) aligned, /* TEMPLATE Item List Descriptor */ 3 IPCB$R_TEMPLATELST_DESC_FIELDS , 4 IPCB$W_TEMPLATELST_LENGTH bit(16) aligned, /* Size of TEMPLATE Itemlist */ 4 IPCB$W_RESERVED2 bit(16) aligned, /* Reserved */ 4 IPCB$A_TEMPLATELST_POINTER pointer, /* Address of TEMPLATE Item List. */ 2 IPCB$R_OUTPUTLSTDESC union, 3 IPCB$Q_OUTPUTLST_DESC bit(64) aligned, /* OUTPUT Item List Descriptor */ 3 IPCB$R_OUTPUTLST_DESC_FIELDS , 4 IPCB$W_OUTPUTLST_LENGTH bit(16) aligned, /* Size of OUTPUT Itemlist */ 4 IPCB$W_RESERVED3 bit(16) aligned, /* Reserved */ 4 IPCB$A_OUTPUTLST_POINTER pointer, /* Address of OUTPUT Item List. */ 2 IPCB$W_RET_OUTPUTLST_LENGTH bit(16) aligned; /* Length data returned in output itemlist. */ /********************************************************************************************************************************/ /* Created: 22-Mar-2010 04:19:46 by OpenVMS SDL EV3-3 */ /* Source: 09-OCT-2008 16:37:07 JEDI_AXP_JEDI_RESD$:[PHASE5COMMON.SRC]NET_ITEMLG */ /********************************************************************************************************************************/ /*** MODULE $NETITEMDEF IDENT X-8 ***/ /* */ /* Network itemlist tags */ /* */ /* */ /* IPC defined Itemlist codes */ /* */ %replace NET$K_TAG_FIRSTTAG by 1; /* THIS TAG MUST BE FIRST */ %replace NET$K_TAG_ADDRESS by 2; /* Address tower defining complete destination protocol */ /* tower */ %replace NET$K_TAG_AUTODISCONNECT by 3; /* Notify Transport that a disconnect is to be automatically */ /* generated if the remote connection disconnects */ %replace NET$K_TAG_CLIENTNAME by 4; /* Character string client name associated with a connection */ /* for network management purposes */ %replace NET$K_TAG_CONNECTDATA by 5; /* Data to be sent with transport connect message */ %replace NET$K_TAG_CONNECTIONCOUNT by 6; /* Number of simultaneous connections to be accepted (longword) */ %replace NET$K_TAG_CONNECTIONTYPE by 7; /* Types of connections to accept (longword of flags) */ %replace NET$K_TAG_DESTINATIONACCOUNT by 8; /* Destination account, used for access verification (Char string) */ %replace NET$K_TAG_DESTINATIONADDRESS by 9; /* Destination NSAP */ %replace NET$K_TAG_DESTINATIONPASSWORD by 10; /* Access verification password (Char string) */ %replace NET$K_TAG_DESTINATIONUSER by 11; /* Destination User name (Char string) */ %replace NET$K_TAG_DESTTOWERSET by 12; /* Tower structure defining the destination protocol elements mutually */ /* supported at source and destination nodes (DNA$Towers) */ %replace NET$K_TAG_DIRECTION by 13; /* Indicates whether connection is ingoing or outgoing (longword) */ %replace NET$K_TAG_DISCONNECTDATA by 14; /* Disconnect data received or sent by Transport (octet string) */ %replace NET$K_TAG_DNSOBJECTNAME by 15; /* DNS fullname in external format for a DNS application object */ %replace NET$K_TAG_ENDUSERID_NAME by 16; /* DNS Fullname in internal format - id of target application */ %replace NET$K_TAG_ENDUSERID_NUMBER by 17; /* Numeric id of target application (Phase IV object number) (byte) */ %replace NET$K_TAG_ENDUSERID_TASK by 18; /* String id of the target application (Phase IV object task */ /* name. (char string) */ %replace NET$K_TAG_EXPEDITEDDATA by 19; /* Expedited data tag (tranport specific) */ %replace NET$K_TAG_HANDOFFTIMER by 20; /* Longword timer value in units of seconds (longword) */ %replace NET$K_TAG_IV_ADDRESS by 21; /* Phase IV network address (word) */ %replace NET$K_TAG_LOCALTSEL by 22; /* Local node Transport Selector (TSAP) */ %replace NET$K_TAG_NODENAME by 23; /* DECnet Nodename in external format (Phase IV or Phase V) */ %replace NET$K_TAG_NODENAME_IV by 24; /* Phase IV 6 character node alias name (char string) */ %replace NET$K_TAG_PID by 25; /* EPID Of process (longword) */ %replace NET$K_TAG_REASON by 26; /* Disconnect Reason Code (defined in DNA Architecture) */ %replace NET$K_TAG_REMOTETSEL by 27; /* Remote Node Transport Selector (TSAP) */ %replace NET$K_TAG_SCLFLAGS by 28; /* Session VCI port flags */ %replace NET$K_TAG_SERVICE by 29; /* Type of service requested (longword of flags) */ %replace NET$K_TAG_SERVERCOUNT by 30; /* Number of simultaneous server processes to be active (longword) */ %replace NET$K_TAG_SOURCEADDRESS by 31; /* Local Node NSAP */ %replace NET$K_TAG_SOURCETOWER by 32; /* Source Protocol tower specifiying protocol elements of source */ %replace NET$K_TAG_SOURCETOWERSET by 33; /* Tower set describing source protocol elements mutually */ /* supported at source and target nodes (DNA$Towers) */ %replace NET$K_TAG_TEMPLATE by 34; /* Id of OSI management template to be used */ %replace NET$K_TAG_TPAPPLICATION by 35; /* Transport Application (?) */ %replace NET$K_TAG_TPCHARACTERISTICS by 36; /* Transport Specific Characteristics */ %replace NET$K_TAG_UID by 37; /* Name space UID (Hex data - UID format) */ %replace NET$K_TAG_USERDATA by 38; /* User data to be transmitted with connection request (Hex data) */ %replace NET$K_TAG_USERNAME by 39; /* User name to be sent for proxy (not for $IPC user) */ %replace NET$K_TAG_USERTOWER by 40; /* Address tower structure indicating protocol elements to be used */ /* above session */ /*++ */ /* NOTE: */ /* The following tags are not supported in this version of */ /* IPC. */ /* */ %replace NET$K_TAG_EVENTROUTINE by 41; /* Address of event routine to be called */ %replace NET$K_TAG_MAXBUFCOUNT by 42; /* Maximum number of outstanding buffers */ %replace NET$K_TAG_RECBUFSIZE by 43; /* Maximum receive buffer size */ %replace NET$K_TAG_XMTBUFSIZE by 44; /* Maximum transmit buffer size */ %replace NET$K_TAG_EVENTMASK by 45; /* Event mask for use with the event */ /* routine */ %replace NET$K_TAG_TRANSPORT by 46; /* Transport that a connection came in over. */ /* END Unsupported tags. */ /*-- */ %replace NET$K_TAG_REQUESTPROXY by 47; /* Proxy Requested flag */ %replace NET$K_TAG_SERVERDATA by 48; /* Server data */ %replace NET$K_TAG_SERVERDATA_SIZE by 49; /* Server data size */ %replace NET$K_TAG_SOURCENUMBER by 50; /* Source User Application number (byte) */ %replace NET$K_TAG_SOURCENAME by 51; /* Source User Full name (Internal name) */ %replace NET$K_TAG_SOURCEUIC by 52; /* Source UIC (longword) */ %replace NET$K_TAG_DESTINATIONTOWER by 53; /* Destination Protocol Tower specifying protocol elements of destination */ %replace NET$K_TAG_DESTINATIONTOWERSET by 54; /* Don't use this. Session uses DestTowerSet instead. */ %replace NET$K_TAG_MENUVER by 55; /* MenuVer field supplied with connect data */ %replace NET$K_TAG_ADD_INFO by 56; /* Transport Additional info Disconnect */ %replace NET$K_TAG_VOTS_DESTADDR_ASCII by 57; /* VOTS addressing backward compatibility */ %replace NET$K_TAG_VOTS_DESTADDR_HEX by 58; /* VOTS addressing backward compatibility */ %replace NET$K_TAG_LOCALENTITYNAME by 59; /* Local Entity Name (set) */ %replace NET$K_TAG_NODENAME_INT by 60; /* Phase V Nodename in DNS Internal Format (Fullname) */ %replace NET$K_TAG_NODESYNONYM by 61; /* DECnet Node Synonym (6 characters or less) */ %replace NET$K_TAG_SOURCEUSER by 62; /* Source User name (Char string) */ %replace NET$K_TAG_DNSOBJECTNAME_INT by 63; /* DNS Fullname in internal format for a DNS application object */ %replace NET$K_TAG_PORTNAME by 64; /* Character string lower port name associated with a connection */ /* for network management purposes */ %replace NET$K_TAG_ALIASID by 65; /* Alias ID number (byte) */ %replace NET$K_TAG_TEMPLATE_TYPE by 66; /* Transport Template Type */ %replace NET$K_TAG_CONTEXT by 67; /* Context tag. For mapping to */ /* OSIT$K_ITEM_CONTEXT. */ %replace NET$K_TAG_TRANSPORT_REASON by 68; /* Transport Specific Disconnect Reason Code */ %replace NET$K_TAG_COMPRESSEDNAME by 69; /* Compressed node name */ %replace NET$K_TAG_MOSTSIGNIFICANT by 70; /* Most significant part of node name */ %replace NET$K_TAG_NETWORKPRIORITY_OUT by 71; /* Outgoing network priority */ %replace NET$K_TAG_NETWORKPRIORITY_IN by 72; /* Incoming network priority */ %replace NET$K_TAG_VOTS_SrcAddr_ASCII by 73; /* VOTS addressing backward compatibility */ /* Used for inbound */ %replace NET$K_TAG_CACHEITEM by 74; /* */ %replace NET$K_TAG_SEARCHPATH by 75; %replace NET$K_TAG_BACKSEARCHPATH by 76; %replace NET$K_TAG_IP_NODENAME by 77; /* IP Nodename used for RFC1006 */ %replace NET$K_TAG_NAMESERVICE by 78; %replace NET$K_TAG_PORT_FORWARD by 79; /* Port for DECnet/IP port forwarding */ %replace NET$K_TAG_LASTTAG by 80; /* KEEP THIS TAG LAST */ /* */ /* |-----------------| */ /* | Network Service |<--------- CTI$K_CLNS, CTI$K_CONS, CTI$K_ANY, */ /* |-----------------| CTI$K_RFC1006 */ /* */ %replace NET$K_NETWORKSERVICE_CONS by 0; %replace NET$K_NETWORKSERVICE_CLNS by 1; %replace NET$K_NETWORKSERVICE_ANY by 2; %replace NET$K_NETWORKSERVICE_RFC1006 by 3; /* */ /* The items that make up the TPCHARACTERISTICS itemlist set */ /* */ %replace NET$K_TPCHAR_FIRST by 1; %replace NET$K_TPCHAR_KEEPALIVE by 2; %replace NET$K_TPCHAR_REXMTTHRESH by 3; %replace NET$K_TPCHAR_CRTIMEOUT by 4; %replace NET$K_TPCHAR_ERTIMEOUT by 5; %replace NET$K_TPCHAR_NETWORKSERVICE by 6; %replace NET$K_TPCHAR_SECURITY by 7; %replace NET$K_TPCHAR_CLASS by 8; %replace NET$K_TPCHAR_CHECKSUM by 9; %replace NET$K_TPCHAR_MAXNSDU by 10; %replace NET$K_TPCHAR_EXPEDITED by 11; %replace NET$K_TPCHAR_CONSTEMPLATE by 12; %replace NET$K_TPCHAR_INIT_RETRANTIME by 13; %replace NET$K_TPCHAR_LOOPBACK by 14; %replace NET$K_TPCHAR_ACK_DELAY by 15; %replace NET$K_TPCHAR_LOCALNSAP by 16; %replace NET$K_TPCHAR_CLNS_INACT_AREA by 17; %replace NET$K_TPCHAR_INBOUND by 18; %replace NET$K_TPCHAR_CLNS_ERROR_REPORT by 19; %replace NET$K_TPCHAR_EXTENDED_FORMAT by 20; %replace NET$K_TPCHAR_FLOW_CONTROL by 21; %replace NET$K_TPCHAR_SENDIMPLEMENTATION by 22; %replace NET$K_TPCHAR_RFC1006_Port by 23; %replace NET$K_TPCHAR_LAST by 24; /* */ /* NET$K_TAG_TEMPLATE_TYPE values */ /* */ %replace TEMPLATE$K_TYPE_CONS by 0; %replace TEMPLATE$K_TYPE_CLNS by 1; %replace TEMPLATE$K_TYPE_RFC1006 by 3; /* */ /* NET$K_TPCHAR_NETWORKSERVICE values */ /* */ %replace NET$M_NETWORKSERVICECONS by '10000000000000000000000000000000'b; %replace NET$M_NETWORKSERVICECLNS by '01000000000000000000000000000000'b; %replace NET$S_NET$NETSERVICEFLAGS by 4; dcl 1 NET$NETSERVICEFLAGS union based, 2 NET$L_NETSERVICEBITS bit(32) aligned, 2 NET$R_NETSRVBITS , 3 NET$V_NETWORKSERVICECONS bit(1), 3 NET$V_NETWORKSERVICECLNS bit(1), 3 NET$V_FILL_0_ bit(30); /* */ /* NET$K_TPCHAR_CLASS values */ /* */ %replace NET$M_CLASS_0 by '10000000000000000000000000000000'b; %replace NET$M_CLASS_1 by '01000000000000000000000000000000'b; %replace NET$M_CLASS_2 by '00100000000000000000000000000000'b; %replace NET$M_CLASS_3 by '00010000000000000000000000000000'b; %replace NET$M_CLASS_4 by '00001000000000000000000000000000'b; %replace NET$S_NET$CLASSFLAGS by 4; dcl 1 NET$CLASSFLAGS union based, 2 NET$L_CLASSBITS bit(32) aligned, 2 NET$R_CLASSBITSOVERLAY , 3 NET$V_CLASS_0 bit(1), 3 NET$V_CLASS_1 bit(1), 3 NET$V_CLASS_2 bit(1), 3 NET$V_CLASS_3 bit(1), 3 NET$V_CLASS_4 bit(1), 3 NET$V_FILL_1_ bit(27); /* */ /* NET$K_TAG_CONNECTIONTYPE item */ /* */ %replace NET$M_CONNECTIONTYPE_GETALL by '10000000000000000000000000000000'b; %replace NET$M_CONNECTIONTYPE_NOREMOTE by '01000000000000000000000000000000'b; %replace NET$M_CONNECTIONTYPE_NOHANDOFF by '00100000000000000000000000000000'b; %replace NET$S_NET$CONNECTIONTYPEFLAGS by 4; dcl 1 NET$CONNECTIONTYPEFLAGS union based, 2 NET$L_CONNECTIONTYPEBITS bit(32) aligned, 2 NET$R_CTBITS , /* Legal bit definitions for NET$K_TAG_CONNECTIONTYPE */ 3 NET$V_CONNECTIONTYPE_GETALL bit(1), /* All forms of connections are requested (default) */ 3 NET$V_CONNECTIONTYPE_NOREMOTE bit(1), /* Remote Connections not allowed */ 3 NET$V_CONNECTIONTYPE_NOHANDOFF bit(1), /* Handed off connections not allowed */ 3 NET$V_FILL_2_ bit(29); /* */ /* NET$K_TAG_SERVICE item */ /* NOTE: THESE FLAGS MUST REMAIN THE SAME AS THE SCLFLAGS BELOW */ /* */ %replace NET$M_SERVICE_DNASESSION by '10000000000000000000000000000000'b; %replace NET$M_SERVICE_MINIMUM by '01000000000000000000000000000000'b; %replace NET$S_NET$SERVICEFLAGS by 4; dcl 1 NET$SERVICEFLAGS union based, 2 NET$L_SERVICEBITS bit(32) aligned, 2 NET$R_SRVBITS , /* Legal values for NET$K_TAG_SERVICE */ 3 NET$V_SERVICE_DNASESSION bit(1), /* All semantics associated with DNA session should be used */ /* with this association */ 3 NET$V_SERVICE_MINIMUM bit(1), /* DNA session semantics should be ignored. */ 3 NET$V_FILL_3_ bit(30); /* */ /* NET$K_TAG_SCLFLAGS item */ /* NOTE: THESE FLAGS MUST REMAIN THE SAME AS THE SERVICE FLAGS ABOVE */ /* */ %replace NET$M_SCLFLAGS_DNASESSION by '10000000000000000000000000000000'b; %replace NET$M_SCLFLAGS_MINIMUM by '01000000000000000000000000000000'b; %replace NET$S_NET$SCLBITS by 4; dcl 1 NET$SCLBITS union based, 2 NET$L_SCLFLAGBITS bit(32) aligned, 2 NET$R_SCLFLGBITS , /* Legal values for NET$K_TAG_SCLFLAGS */ 3 NET$V_SCLFLAGS_DNASESSION bit(1), /* All semantics associated with DNA session should be used */ /* with this association */ 3 NET$V_SCLFLAGS_MINIMUM bit(1), /* DNA session semantics should be ignored. */ 3 NET$V_FILL_4_ bit(30); /* */ /* NET$K_TAG_EVENTMASK values: */ /* */ %replace NET$M_EVENT_INCOMING by '10000000000000000000000000000000'b; %replace NET$M_EVENT_LINK_MSG by '01000000000000000000000000000000'b; %replace NET$M_EVENT_EXPEDITED by '00100000000000000000000000000000'b; %replace NET$M_EVENT_DATA by '00010000000000000000000000000000'b; %replace NET$M_EVENT_MULT by '00001000000000000000000000000000'b; %replace NET$M_EVENT_DISCONNECTS by '00000100000000000000000000000000'b; %replace NET$S_EVENTBITS by 4; dcl 1 EVENTBITS union based, 2 NET$L_EVENTFLAGBITS bit(32) aligned, 2 NET$R_EVENTFLGBITS , 3 NET$V_EVENT_INCOMING bit(1), /* Set if incoming */ /* connection events are */ /* enabled */ 3 NET$V_EVENT_LINK_MSG bit(1), /* Set if incoming link */ /* events are enabled */ 3 NET$V_EVENT_EXPEDITED bit(1), /* Set if incoming */ /* expedited events are */ /* enabled */ 3 NET$V_EVENT_DATA bit(1), /* Set if data events */ /* are enabled */ 3 NET$V_EVENT_MULT bit(1), /* Set if segmented data */ /* events are enabled */ 3 NET$V_EVENT_DISCONNECTS bit(1), /* Set if incoming */ /* disconnect events are */ /* enabled. */ 3 NET$V_FILL_5_ bit(26); /* */ /* Transport types */ /* */ %replace NET$K_LCL by 0; %replace NET$K_NSP by 1; %replace NET$K_SCS by 2; %replace NET$K_OSI by 3; %replace NET$K_TCP by 4; %replace NET$K_MIN_TRANS by 0; %replace NET$K_MAX_TRANS by 4; /********************************************************************************************************************************/ /* Created: 22-Mar-2010 04:19:48 by OpenVMS SDL EV3-3 */ /* Source: 11-MAY-2001 14:38:08 JEDI_AXP_JEDI_RESD$:[PHASE5COMMON.SRC]NET_MGMT_? */ /********************************************************************************************************************************/ /*** MODULE NCLCMLITEMLIST IDENT X-35 ***/ /* The CML IOSB format: */ %replace CMLSB$S_CMLSTATUS by 12; dcl 1 CMLSTATUS based, 2 CMLSB$L_CALLSTATUS bit(32) aligned, /* CML call completion status */ 2 CMLSB$L_RESPONSESTATUS bit(32) aligned, /* CMIP response code */ 2 CMLSB$L_RESPONSEDETAIL bit(32) aligned; /* CMIP response detail */ /* The function codes supported at the CML$Send interface: */ %replace NET$K_CML_FUNCMINIMUM by 1; /* Minimum function code assigned */ %replace NET$K_CML_FUNCGET by 2; /* Read attribute values */ %replace NET$K_CML_FUNCSET by 3; /* Modify attribute values */ %replace NET$K_CML_FUNCADD by 4; /* Add values to a list */ %replace NET$K_CML_FUNCREMOVE by 5; /* Remove values from a list */ %replace NET$K_CML_FUNCACTION by 6; /* Perform some action directive */ %replace NET$K_CML_FUNCCLEAR by 7; /* Clear values from a list */ %replace NET$K_CML_FUNCMAXIMUM by 8; /* Maximum function code assigned */ /* The following are all the itemlist tags we should be using at the NCL/CML */ /* and CML/EMAA interface. Care should be taken to ensure that the tags don't */ /* overlap at any point: */ /* Some datatypes. When dealing with attributes and their values, the */ /* datatype is usually implied by the attribute number. In other cases, */ /* the type of a datum is specified by using one of the following definitions */ /* in the item's tag field. Some of these cases include: Instance name in an */ /* entity/instance specifier, an attribute who's value type is "CML_DTRecord", */ /* and filter operand. */ %replace NET$K_TAG_CML_BOOLEAN by 1; /* True or false */ %replace NET$K_TAG_CML_UNSIGNEDINT16 by 2; /* Unsigned 16 bit integer */ %replace NET$K_TAG_CML_UNSIGNEDINT32 by 3; /* Unsigned 32 bit integer */ %replace NET$K_TAG_CML_UNSIGNEDINT64 by 4; /* Unsigned 64 bit integer */ %replace NET$K_TAG_CML_SIGNEDINT16 by 5; /* Signed 16 bit integer */ %replace NET$K_TAG_CML_SIGNEDINT32 by 6; /* Signed 32 bit integer */ %replace NET$K_TAG_CML_SIGNEDINT64 by 7; /* Signed 64 bit integer */ %replace NET$K_TAG_CML_OCTET by 8; /* Unsigned 8 bit integer */ %replace NET$K_TAG_CML_OCTETSTRING by 9; /* A string of octets */ %replace NET$K_TAG_CML_ENUMERATION by 10; /* An enumeration */ %replace NET$K_TAG_CML_NULL by 11; /* No value */ %replace NET$K_TAG_CML_NUMERICSTRING by 12; /* A numeric Latin1String */ %replace NET$K_TAG_CML_BITSET by 13; /* A string of bits */ %replace NET$K_TAG_CML_RECORD by 14; /* A sequence of fields */ %replace NET$K_TAG_CML_SEQUENCE by 15; /* A sequence of a single type */ %replace NET$K_TAG_CML_CHARABSOLUTETIME by 16; /* Character absolute time */ %replace NET$K_TAG_CML_BINABSOLUTETIME by 17; /* Binary absolute time */ %replace NET$K_TAG_CML_CHARRELATIVETIME by 18; /* Character relative time */ %replace NET$K_TAG_CML_BINRELATIVETIME by 19; /* Binary relative time */ %replace NET$K_TAG_CML_LATIN1STRING by 20; /* Generic printable strings */ %replace NET$K_TAG_CML_SET by 21; /* Set of some datatype */ %replace NET$K_TAG_CML_UNSIGNEDINT8 by 22; /* Unsigned 8 bit integer */ %replace NET$K_TAG_CML_SIGNEDINT8 by 23; /* Signed 8 bit integer */ %replace NET$K_TAG_CML_SIMPLENAME by 26; /* DNS simple name string */ %replace NET$K_TAG_CML_FULLNAME by 27; /* DNS full name string */ %replace NET$K_TAG_CML_UID by 28; /* Unique identifier */ %replace NET$K_TAG_CML_KNOWN by 29; /* Matches any entity name */ %replace NET$K_TAG_CML_FULLENTITYNAME by 30; /* Full entity name */ %replace NET$K_TAG_CML_LOCALENTITYNAME by 31; /* Local entity name */ %replace NET$K_TAG_CML_DEFAULT by 32; /* Default value */ %replace NET$K_TAG_CML_VERSIONNUMBER by 33; /* Version number */ %replace NET$K_TAG_CML_LANADDRESS by 34; /* 48 bit 802.3 address */ %replace NET$K_TAG_CML_DTEADDRESS by 35; /* X.25 DTE address */ %replace NET$K_TAG_CML_FILESPECIFICATION by 36; /* File specification string */ %replace NET$K_TAG_CML_NSAPADDRESS by 37; /* Complete NSAP address */ %replace NET$K_TAG_CML_NET by 38; /* Network Entity Title: NSAP minus the last octet */ %replace NET$K_TAG_CML_AREAADDRESS by 39; /* NSAP minus the last 7 bytes */ %replace NET$K_TAG_CML_COUNTER16 by 40; /* 16 bit counter */ %replace NET$K_TAG_CML_COUNTER32 by 41; /* 32 bit counter */ %replace NET$K_TAG_CML_COUNTER64 by 42; /* 64 bit counter */ %replace NET$K_TAG_CML_COUNTER by 42; /* Generic counter is a 64 bit counter */ %replace NET$K_TAG_CML_ADDRESSPREFIX by 43; /* Leading substring of an AreaAddress */ %replace NET$K_TAG_CML_TOWERSET by 44; /* A protocol tower set */ %replace NET$K_TAG_CML_ENDUSERSPEC by 45; /* An end user specification */ %replace NET$K_TAG_CML_TRANSPORTSELECTOR by 46; /* Transport selector byte */ %replace NET$K_TAG_CML_PHASE4NAME by 47; /* A Phase IV node name */ %replace NET$K_TAG_CML_PHASE4ADDRESS by 48; /* A Phase IV 16 bit node number */ %replace NET$K_TAG_CML_IMPLEMENTATION by 49; /* Software implementation specification */ %replace NET$K_TAG_CML_VERSIONEDITNUMBER by 50; /* Version number with edit */ %replace NET$K_TAG_CML_COMPONENT by 51; /* Component name */ %replace NET$K_TAG_CML_DNSUID by 52; /* DNS unique identifier */ %replace NET$K_TAG_CML_ENTITYCLASS by 53; /* Identifies the entity's class */ %replace NET$K_TAG_CML_HEXSTRING by 54; /* A string of hexadecimal digits */ %replace NET$K_TAG_CML_EIB by 55; /* Entity Information Block */ %replace NET$K_TAG_CML_EAB by 56; /* Entity Access Block */ %replace NET$K_TAG_CML_ENTITYCLASSEVENT by 57; /* Event filter entity class/event code */ %replace NET$K_TAG_CML_EVENTCLASS by 57; %replace NET$K_TAG_CML_ENTITYINSTEVENT by 58; /* Event filter entity instance/event code */ %replace NET$K_TAG_CML_EVENTINSTANCE by 58; %replace NET$K_TAG_CML_SUBRANGE by 59; /* Subrange descriptor (internal use only) */ %replace NET$K_TAG_CML_RANGE by 60; /* A range of integers */ %replace NET$K_TAG_CML_CMIPMESSAGE by 61; /* CMIP message value */ %replace NET$K_TAG_CML_IPADDRESS by 62; /* An IP Address */ %replace NET$K_TAG_CML_ID802_SNAP by 63; /* sub net access protocol id */ %replace NET$K_TAG_CML_IDENETV2_TYPE by 64; /* V2 ethernet protocol ID */ %replace NET$K_TAG_CML_FDDITIMER by 65; /* FDDI timer */ %replace NET$K_CML_MAXIMUMDATATYPE by 66; /* Maximum datatype */ %replace NET$K_CML_LASTDATATYPE by 200; /* The highest data type tag allowed */ /* Some related constants for dealing with the above datatypes: */ /* (These probably won't be around here for too long. As soon as NCL is */ /* modified to call the Name Server Clerk to encode/decode FullNames and */ /* SimpleNames, it'll be the clerk's responsibility for worrying about this */ /* sort of thing.) */ %replace NET$K_CML_FULLNAMEMAX by 400; /* The maximum length of a FullName string */ %replace NET$K_CML_SIMPLENAMEMAX by 255; /* The maximum length of a SimpleName string */ /* The tag fields for items found in the InputItemlist, OutputTemplate */ /* and OutputItemlist itemlists in a CML$ call. Note that all items in */ /* those itemlists will contain a tag from the following list, but not */ /* necessarily all sub-items in those lists. (This means that things */ /* like attribute numbers come from another numbering space, and quite */ /* possibly another universe.) */ /* First, the service interface input and output itemlist tags: */ %replace NET$K_CML_FIRSTSERVICETAG by 201; %replace NET$K_TAG_CML_ADDRESS by 201; /* Destination node address */ %replace NET$K_TAG_CML_DESTUSER by 202; /* Destination node username */ %replace NET$K_TAG_CML_DESTPASSWORD by 203; /* Destination node password string */ %replace NET$K_TAG_CML_DESTACCOUNT by 204; /* Destination node account string */ %replace NET$K_TAG_CML_LINKID by 205; /* Logical link channel number */ %replace NET$K_TAG_CML_NODENAME by 206; /* Destination node name or alias */ %replace NET$K_TAG_CML_USERDATA by 207; /* User supplied data on connection */ %replace NET$K_TAG_CML_DESTNODE by 208; /* * TEMP * ASCII node name for QIO connect block */ %replace NET$K_TAG_CML_DESTPROXY by 209; /* Request remote proxy ? */ %replace NET$K_TAG_CML_DESTTOWER by 210; /* Destination tower address string */ %replace NET$K_TAG_CML_MAXIMUMSERVICE by 211; /* First free service interface tag */ /* The management directives input and output itemlist tags: */ /* These are for sub item lists tags */ %replace NET$K_CML_FIRSTMANAGEMENTTAG by 221; %replace NET$K_TAG_CML_ACTION by 221; /* Action code longword */ %replace NET$K_TAG_CML_ACTIONARG by 222; /* Action argument sub itemlist */ %replace NET$K_TAG_CML_ACTIONRESPONSEARG by 223; /* List of action response arguments */ %replace NET$K_TAG_CML_ACTIONRESPONSECOD by 224; /* Action response or exception code */ %replace NET$K_TAG_CML_ATTRIBUTEERRORS by 225; /* Attribute error sub-itemlist */ %replace NET$K_TAG_CML_ATTRIBUTES by 226; /* Attribute sub-itemlist */ %replace NET$K_TAG_CML_DNAGROUPS by 227; /* DNA attribute group sub-itemlist */ %replace NET$K_TAG_CML_ENTITYGROUPS by 228; /* Entity attribute group sub-itemlist */ %replace NET$K_TAG_CML_ENTITYINSTANCE by 229; /* Class/instance pairs of the entity being addressed */ %replace NET$K_TAG_CML_FILTER by 230; /* Filter specification */ %replace NET$K_TAG_CML_INVOKEID by 231; /* Per-invokation request handle */ %replace NET$K_TAG_CML_LOCALCONTEXT by 232; /* Context pointer for local node operations */ %replace NET$K_TAG_CML_EVENTARG by 233; %replace NET$K_TAG_CML_EVENTTYPE by 234; %replace NET$K_TAG_CML_EVENTUID by 235; %replace NET$K_TAG_CML_STREAMUID by 236; %replace NET$K_TAG_CML_REASONDETAIL by 237; /* Eg reason for InvalidFilter, action code */ /* for NoSuchAction, reason for InvalidWildCard */ /* Action result Response code to go with Action response */ /* this is misc place holder. */ %replace NET$K_TAG_CML_EVENTCODE by 238; /* Event code */ %replace NET$K_TAG_CML_EVENTDNAGROUP by 239; /* Event DNA group code */ %replace NET$K_TAG_CML_EVENTENTITYGROUP by 240; /* Event entity specific group code */ %replace NET$K_TAG_CML_MAXIMUMMANAGEMENT by 241; /* Highest management tag in use */ /* Management interface tags that overlap data type tags in function (and, */ /* possibly, use): */ %replace NET$K_TAG_CML_TIME by 17; /* Request completion timestamp */ /* Itemlist tags used at the CML/EMAA interface entry points: */ %replace NET$K_CML_FIRSTEMAATAG by 301; %replace NET$K_TAG_CML_FUNCTION by 301; /* Function that needs to be done by EMAA */ %replace NET$K_TAG_CML_COROUTINE by 302; /* Call back Routine for EMAA */ %replace NET$K_TAG_CML_CORTNPARAMETER by 303; /* Parameter to be supplied by EMAA on a callback */ %replace NET$K_TAG_CML_INPIL by 304; /* EMAA - Input parameter subitem list */ %replace NET$K_TAG_CML_OUTIL by 305; /* EMAA - Outputparameter subitem list (value = Descriptor) */ %replace NET$K_TAG_CML_TMPIL by 306; /* EMAA - Template parameter subitem list */ %replace NET$K_TAG_CML_ERRORSTATUS by 307; /* EMAA - CMIP Specified Error status */ %replace NET$K_TAG_CML_CONTEXT by 308; /* EMAA's caller context (type of NET$K_CML_Context_?) */ %replace NET$K_TAG_CML_ENTITY by 309; /* Entity specification for EMAA */ %replace NET$K_TAG_CML_REQUESTSTATUS by 310; /* generic status of results {success, moreentities,failure,overflow} */ %replace NET$K_TAG_CML_EMAAHANDLE by 311; /* EMAA"s handle each request. */ %replace NET$K_TAG_CML_RESULTIL by 312; /* The result itemlist containing all results of the request */ %replace NET$K_TAG_CML_OVERFLOWLEN by 313; /* Specified if the status is overflow. indicates the size of the buffer needed */ %replace NET$K_TAG_CML_REMOTEUSER by 314; /* Source user of the request */ %replace NET$K_TAG_CML_REMOTENODE by 315; /* Source node of the request */ %replace NET$K_TAG_CML_EMAACOMMAND by 316; /* Send a command to EMAA, not an entity */ %replace NET$K_TAG_CML_BYTLIM by 317; /* Byte limit to be used for this request. */ %replace NET$K_TAG_CML_MAXIMUMEMAATAG by 318; /* Highest EMAA tag in use */ /* Duplicate management interface tags: */ %replace NET$K_TAG_CML_ATTRIBUTEVALUES by 226; /* Attribute values sub-itemlist */ %replace NET$K_TAG_CML_EVENTENTITY by 309; %replace NET$K_TAG_CML_ENTITYUID by 28; %replace NET$K_TAG_CML_EVENTTIME by 17; /* */ /* valid values for the NET$K_TAG_CML_EMAACommand TAG */ /* */ %replace NET$K_TAG_CML_EMAACMDABORT by 0; %replace NET$K_TAG_CML_EMAACMDINCRBYTLIM by 1; /* Error returns from EMAA and from CML Calls */ /* FOR CONVENIENCE, these are twice the value of the CMIP code for this error */ %replace NET$K_CMLERR_NOSUCHOBJINS by 2; /* No such object instance (no such entity) */ %replace NET$K_CMLERR_ACCESSDENIED by 4; /* Access denied */ %replace NET$K_CMLERR_INVALIDFILTER by 8; /* Invalid filter */ %replace NET$K_CMLERR_NOSUCHATTRID by 10; /* No such attribute id */ %replace NET$K_CMLERR_INVALIDATTRVAL by 12; /* No such attribute value */ %replace NET$K_CMLERR_GETLIST by 14; /* Get list error */ %replace NET$K_CMLERR_SETLIST by 16; /* Set list error */ %replace NET$K_CMLERR_NOSUCHACTION by 18; /* No such action */ %replace NET$K_CMLERR_PROCESSFAIL by 20; /* Process failure */ %replace NET$K_CMLERR_NORESOURCEAVAIL by 26; /* No resource available */ %replace NET$K_CMLERR_INVALIDARGVALUE by 30; /* Invalid argument value */ %replace NET$K_CMLERR_DIRECTIVENOTSUPP by 64; /* Directive not supported */ %replace NET$K_CMLERR_ENTCLSNOTSUPP by 66; /* Entity class not supported */ %replace NET$K_CMLERR_INVUSEWILDCARD by 68; /* Invalid use of wild card */ %replace NET$K_CMLERR_NOSUCHARG by 70; /* No such argument */ %replace NET$K_CMLERR_CONSTRAINTVIOLAT by 72; /* Constraint violation */ %replace NET$K_CMLERR_WRITEONLYATTR by 74; /* Write only attribute */ %replace NET$K_CMLERR_READONLYATTR by 76; /* Read only attribute */ %replace NET$K_CMLERR_DUPLICATEATTR by 78; /* Duplicate attribute */ %replace NET$K_CMLERR_DUPLICATEARG by 80; /* Duplicate argument */ %replace NET$K_CMLERR_INVALIDOPER by 82; /* Invalid operator */ %replace NET$K_CMLERR_REQARGOMITTED by 84; /* Required argument omitted */ %replace NET$K_CMLERR_FILTERINVACT by 86; /* Filter invalid for action */ %replace NET$K_CMLERR_LASTNOSUCHOBJINS by 88; /* Internal EMAA code, indicating last simple */ /* name has been parsed, but we have not found */ /* our entity. */ %replace NET$K_CMLERR_NOMOREOBJINS by 88; /* Same as LastNoSuchObjIns */ %replace NET$K_CMLERR_ASYNCHNOTCOMPLETE by 90; %replace NET$K_CMLERR_LESSTHAN by 92; /* The comparison was less than */ %replace NET$K_CMLERR_GREATERTHAN by 94; /* The comparison was greater than */ /* Some response detail values. Sort of taken from the same numbering space */ /* as the above CMIP errors, but definitely not reported in the same place. */ /* Those that follow will be reported in the NET$K_Tag_CML_ReasonDetail item: */ /* Response detail for NET$K_CMLerr_InvUseWildCard: */ %replace NET$K_CMLERR_CREATEWITHWILD by 90; /* Create with wildcard */ %replace NET$K_CMLERR_INVALIDDIRECTIVE by 92; /* Invalid directive */ %replace NET$K_CMLERR_NOTUNIVERSALGROUP by 94; /* Not a universal attribute group */ %replace NET$K_CMLERR_WILDCLASS by 96; /* Filter specified with wildcarded class */ %replace NET$K_CMLERR_NOTATLOWESTLEVEL by 98; /* Wildcard specified on other than lowest level entity/instance */ /* */ /* Other error codes that may be returned by EMAA which are NOT CMIP codes (except for Wrong State) */ /* */ %replace NET$K_CMLERR_FAILURE by 100; /* Operation failure */ %replace NET$K_CMLERR_INVALIDITMLST by 102; /* Invalid itemlist format */ %replace NET$K_CMLERR_OVERFLOW by 104; /* Overflow while filling bugffer */ %replace NET$K_CMLERR_WRONGSTATE by 106; /* Wrong State ****NOTE****This *is* a CMIP error message */ %replace NET$K_CMLERR_ENTITYEXISTS by 108; /* The entity exists (bad on create) */ %replace NET$K_CMLERR_INVALIDINVOKEID by 110; /* Invalid invokation identifier */ %replace NET$K_CMLERR_ENTITYHASCHILD by 112; /* Entity has a child */ %replace NET$K_CMLERR_ACCVIO by 114; /* EMAA Can't access the buffers */ %replace NET$K_CMLERR_NORESPONSESREADY by 116; /* EMAA has no responses ready for the user */ %replace NET$K_CMLERR_EXCEEDEDQUOTA by 118; /* The entity needs more quota from the user. */ %replace NET$K_CMLERR_INSUFFBYTLIM by 120; /* The user does not have enough quota */ %replace NET$K_CMLERR_OVERFLOWBYTLIM by 122; /* The user has enough, but emaa has to deallocate some */ /* Following Symbols have CMIP archtected values and are for CML'S use for CMIP encodig/decoding */ /* EMAA or NCL or any other user should never use them. */ /* For every CMIPerr there will be a corresponding CMLerr. */ /* EMAA and NCL/users should only use CMLerr. */ /* CML will do the mapping between the two symbols... */ /* CML will not assume CMLerr to be double of CMIPerr as it origianlly started out to be. */ %replace NET$K_CMIPERR_NOSUCHOBJINS by 1; /* No such object instance (no such entity) */ %replace NET$K_CMIPERR_ACCESSDENIED by 2; /* Access denied */ %replace NET$K_CMIPERR_INVALIDFILTER by 4; /* Invalid filter */ %replace NET$K_CMIPERR_NOSUCHATTRID by 5; /* No such attribute id */ %replace NET$K_CMIPERR_INVALIDATTRVAL by 6; /* No such attribute value */ %replace NET$K_CMIPERR_GETLIST by 7; /* Get list error */ %replace NET$K_CMIPERR_SETLIST by 8; /* Set list error */ %replace NET$K_CMIPERR_NOSUCHACTION by 9; /* No such action */ %replace NET$K_CMIPERR_PROCESSFAIL by 10; /* Process failure */ %replace NET$K_CMIPERR_NORESOURCEAVAIL by 13; /* No resource available */ %replace NET$K_CMIPERR_INVALIDARGVALUE by 15; /* Invalid argument value */ %replace NET$K_CMIPERR_DIRECTIVENOTSUPP by 32; /* Directive not supported */ %replace NET$K_CMIPERR_ENTCLSNOTSUPP by 33; /* Entity class not supported */ %replace NET$K_CMIPERR_INVUSEWILDCARD by 34; /* Invalid use of wild card */ %replace NET$K_CMIPERR_NOSUCHARG by 35; /* No such argument */ %replace NET$K_CMIPERR_CONSTRAINTVIOLAT by 36; /* Constraint violation */ %replace NET$K_CMIPERR_WRITEONLYATTR by 37; /* Write only attribute */ %replace NET$K_CMIPERR_READONLYATTR by 38; /* Read only attribute */ %replace NET$K_CMIPERR_DUPLICATEATTR by 39; /* Duplicate attribute */ %replace NET$K_CMIPERR_DUPLICATEARG by 40; /* Duplicate argument */ %replace NET$K_CMIPERR_INVALIDOPER by 41; /* Invalid operator */ %replace NET$K_CMIPERR_REQARGOMITTED by 42; /* Required argument omitted */ %replace NET$K_CMIPERR_FILTERINVACT by 43; /* Filter invalid for action */ /* Reasons for invalid use of wild cards... */ %replace NET$K_CMIPERR_CREATEWITHWILD by 0; /* Create with wildcard */ %replace NET$K_CMIPERR_INVALIDDIRECTIVE by 1; /* Invalid directive */ %replace NET$K_CMIPERR_NOTUNIVERSALGROUP by 2; /* Not a universal attribute group */ %replace NET$K_CMIPERR_WILDCLASS by 3; /* Filter specified with wildcarded class */ %replace NET$K_CMIPERR_NOTATLOWESTLEVEL by 4; /* Wildcard specified on other than lowest level */ /* */ /* Success codes from EMAA */ /* */ %replace NET$K_CMLRSP_SUCCESS by 101; /* Successful completion */ %replace NET$K_CMLRSP_ALREADYREGISTERED by 103; /* Already registered */ %replace NET$K_CMLRSP_MOREENTITIES by 105; /* More entities coming */ %replace NET$K_CMLRSP_TERMINATERESP by 107; /* Terminate this call, there is no more data. */ %replace NET$K_CMLRSP_NOFILTERMATCH by 109; /* EIB doesn't match filter */ %replace NET$K_CMLRSP_WILDCARDEDSUCCESS by 111; /* The match was successful, but matched with a wildcard */ %replace NET$K_CMLRSP_AsyncMrcpResp by 113; /* ** INTERNAL EMAA CODE ** This code identifies an MRCP */ /* as one requiring an asyncronous response. The entity */ /* will call back when the fnct is completed */ /* Constants which are the legal values for the parameter CONTEXT on input to EMAA. */ %replace NET$K_CML_CONTEXT_SYSTEM by 0; /* In system context */ %replace NET$K_CML_CONTEXT_PROCESS by 1; /* In process context */ /* CML needs EMAA to guess this buffer size .....this is just a guess for now. */ %replace NET$K_CML_MSGBUFFSIZE by 500; /* Item list buffer size to be given to EMAA */ /* CML needs EMAA to guess this BYT LIMIT size .....this is just a guess for now. */ %replace NET$K_CML_DEFAULTBYTLIM by 64000; /* Byte limit size to be given to EMAA */ /* */ /* constant defining the minimum allowed output buffer size for emaa */ /* */ %replace NET$K_CML_MINIMUMOUTIL by 32; /* Some item tags used to request bits of data from the data dictionary */ /* access routines: */ /* Tags used in the input itemlist on calls to NCL$DictLookup. Note that */ /* all items other than those of tag NET$K_Dict_EntityClass will have as their */ /* value the addressed dictionary entity's code value only. This is in */ /* contrast to the CML service interface itemlists, such as NET$K_CML_Attributes */ /* which has a sub-itemlist of attributes as its value. Since only one */ /* dictionary entity can be queried for each call to NCL$DictLookup, it makes */ /* little sense to dictate that the value to NET$K_CML_DictAttributeCodea be an */ /* itemlist containing one item. Thus, we create different itemlist tags to */ /* remind everyone, and keep them honest: */ /* (The argument to NET$K_Dict_EntityClass is of the same format as that of */ /* NET$K_CML_ENTITYINSTANCE, however) */ %replace NET$K_DICT_FIRSTINPUTTAG by 401; %replace NET$K_TAG_DICT_EVENTCODE by 401; /* The event number to be queried */ %replace NET$K_TAG_DICT_EXCEPTIONCODE by 402; /* The action exception number to be queried */ %replace NET$K_TAG_DICT_RESPONSECODE by 403; /* The action response number to be queried */ %replace NET$K_TAG_DICT_MAXIMUMINPUTTAG by 404; /* Last input itemlist tag for the dictionary */ /* Other item tags used in the input itemlist on a call to the dictionary */ /* ACCESS, with tag values duplicated elsewhere: */ %replace NET$K_TAG_DICT_ACTIONCODE by 221; /* The action number to be queried */ %replace NET$K_TAG_DICT_ARGUMENTCODE by 222; /* The action/response/exception/event argument number */ %replace NET$K_TAG_DICT_ATTRIBUTECODE by 226; /* The attribute number to be queried */ %replace NET$K_TAG_DICT_DNAGROUPCODE by 227; /* The DNA attribute group number to be queried */ %replace NET$K_TAG_DICT_ENTITYCLASS by 229; /* The entity class to be queried */ %replace NET$K_TAG_DICT_ENTITYGROUPCODE by 228; /* The entity group number to be queried */ /* Tags for the template and output itemlists, detailing the information */ /* requested or returned on a call to NCL$DictLookup: */ %replace NET$K_DICT_FIRSTOUTPUTTAG by 411; %replace NET$K_TAG_DICT_DATATYPE by 411; /* The attribute or argument's datatype */ %replace NET$K_TAG_DICT_ERRORTEXT by 412; /* The reponse/exception/event text string */ %replace NET$K_TAG_DICT_MEMBERS by 413; /* The attribute group's member list */ %replace NET$K_TAG_DICT_NAME by 414; /* The dictionary entity's name */ %replace NET$K_TAG_DICT_SELECTOR by 415; /* Variant record selector field information */ %replace NET$K_TAG_DICT_FIELDNUMBER by 416; /* Record field number */ %replace NET$K_TAG_DICT_DESCRIPTOR by 417; /* Record desctiptor (one per record) */ %replace NET$K_TAG_DICT_MAXIMUMTAG by 418; /* Highest tag value in use for dictionary output list */ /* THE ATTRIBUTE GROUP CODES, gratuitously hardcoded here so NCL can sort */ /* its SHOW output: */ %replace NET$K_CML_GROUPALL by 0; /* "All Attributes" */ %replace NET$K_CML_GROUPIDENT by 1; /* "All Identifiers" */ %replace NET$K_CML_GROUPSTATUS by 2; /* "All Status" */ %replace NET$K_CML_GROUPCOUNTERS by 3; /* "All Counters" */ %replace NET$K_CML_GROUPCHAR by 4; /* "All Characteristics" */ %replace NET$K_CML_GROUPINTERNAL by 5; /* "All internal characteristics" */ /* Some filter sub-itemlist tag values. The format of a filter is some */ /* (infix) hierarchy of operand-operator-operand. Currently, there's */ /* only one level of this hierarchy allowed in a filter. Furthermore, */ /* the first operator must be an attribute (tag given as the value of */ /* the operand's sub-itemlist entry), and the second operator must be */ /* a literal value. Perhaps this will be expanded upon in the future. */ /* In the case of a literal value operand, the sub-itemlist tag will be */ /* the generic datatype tag (as defined above) for the literal's type. */ /* This implies that the following definitions lie well outside of th */ /* numbering space for datatype tags: */ %replace NET$K_CML_FIRSTFILTERTAG by 501; %replace NET$K_TAG_CML_FILTERATTRIBUTE by 501; /* The item is an attribute operand */ %replace NET$K_TAG_CML_FILTEROPERATOR by 502; /* The item is an operator */ %replace NET$K_TAG_CML_FITERMAXIMUMTAG by 503; /* The highest filter tag */ /* The following are operator values that'll appear in the CML_FilterOperator */ /* sub-item: */ %replace NET$K_CML_FILTEROPMINIMUM by 0; /* The lowest assigned operator number */ %replace NET$K_CML_FILTEROPEQUAL by 1; /* Test for operand equality */ %replace NET$K_CML_FILTEROPNOTEQUAL by 2; /* Test for operand inequality */ %replace NET$K_CML_FILTEROPLESS by 3; /* Test for operand 1 < operand 2 */ %replace NET$K_CML_FILTEROPLESSEQUAL by 4; /* Test for operand 1 <= operand 2 */ %replace NET$K_CML_FILTEROPGREATER by 5; /* Test for operand 1 > operand 2 */ %replace NET$K_CML_FILTEROPGREATEREQUAL by 6; /* Test for operand 1 >= operand 2 */ %replace NET$K_CML_FILTEROPMAXIMUM by 7; /* The highest assigned operator number */ /* Setability flags for an attribute's field from the data dictionary (these */ /* should match the equivalent MCC data dictionary values): */ %replace NET$K_CML_SETTABLE by 0; /* Attribute can be set or read */ %replace NET$K_CML_READONLY by 1; /* Attribute is read only */ %replace NET$K_CML_WRITEONLY by 2; /* Attribute is write only */ /* Error status returned by CML. This may later appear in some message file */ %replace CML$_SUCCESSLAST by 101; /* success return */ %replace CML$_SUCCESSMORE by 105; /* Success, with more responses coming */ /********************************************************************************************************************************/ /* Created: 22-Mar-2010 04:19:50 by OpenVMS SDL EV3-3 */ /* Source: 22-MAR-2010 04:19:32 JEDI_AXP_JEDI_RESD$:[PHASE5COMMON.OBJ]NET_NET_M6 */ /********************************************************************************************************************************/ /*** MODULE $NETDEF ***/ %replace NET$_FACILITY by 501; %replace NET$_NORMAL by 32866305; %replace NET$_ALRDYSTRT by 32866313; %replace NET$_ALRDYSTPPD by 32866321; %replace NET$_CANCELCOMPLETE by 32866329; %replace NET$_CONNACCEPTED by 32866337; %replace NET$_CONNECTED by 32866345; %replace NET$_CONNINIT by 32866353; %replace NET$_DISCCOMPLETE by 32866361; %replace NET$_DISCEVENTLCL by 32866369; %replace NET$_DISCEVENTREM by 32866377; %replace NET$_DISCEVENT3RD by 32866385; %replace NET$_INCCONEVENT by 32866393; %replace NET$_MOREDATA by 32866401; %replace NET$_NOMOREDATA by 32866409; %replace NET$_MOREEVENTS by 32866417; %replace NET$_RCVDATAEVENT by 32866425; %replace NET$_SYNCH by 32867107; %replace NET$_RDBADDMSG by 32867115; %replace NET$_CONTINUE by 32867123; %replace NET$_GRANTMSGU by 32867131; %replace NET$_GRANTMSG by 32867139; %replace NET$_LOADED by 32867147; %replace NET$_DISCDATATRUNC by 32867155; %replace NET$_UNLOADED by 32867163; %replace NET$_ALREADYDISC by 32867904; %replace NET$_ASSOCALREADYCLOSING by 32867912; %replace NET$_ASSOCALREADYSHUTTING by 32867920; %replace NET$_BUFFEROVF by 32867928; %replace NET$_CONDATATRUNC by 32867936; %replace NET$_ENTITYALREADYENAB by 32867944; %replace NET$_ENTITYDISABINITTED by 32867952; %replace NET$_RCVNODATA by 32867960; %replace NET$_USERDATATRUNC by 32867968; %replace NET$_RDBDUPID by 32867976; %replace NET$_RDBIDVAL by 32867984; %replace NET$_RDBREMMSG by 32867992; %replace NET$_ASSOCWRONGSTATE by 32868706; %replace NET$_ASSOCCLOSING by 32868714; %replace NET$_ASSOCSHUTTING by 32868722; %replace NET$_BADASSOCMODE by 32868730; %replace NET$_FUNCREQASSOC by 32868738; %replace NET$_BADCONTEXTVALUE by 32868746; %replace NET$_DUPLICATESERVER by 32868754; %replace NET$_INVASSOCFORMAT by 32868762; %replace NET$_INVASSOCID by 32868770; %replace NET$_MAXASSOCEXCEEDED by 32868778; %replace NET$_NOASSOCIDAVAIL by 32868786; %replace NET$_WRONGASSOC by 32868794; %replace NET$_WRONGPROCESS by 32868802; %replace NET$_CONNREJECTED by 32868810; %replace NET$_CANNOTHANDOFF by 32868818; %replace NET$_CONWRONGSTATE by 32868826; %replace NET$_INVCONNECTFORMAT by 32868834; %replace NET$_INVCONID by 32868842; %replace NET$_MAXCONNECTEXCEEDED by 32868850; %replace NET$_NOCONNECTIDAVAIL by 32868858; %replace NET$_NOREMCONNECTID by 32868866; %replace NET$_NOMATCHINGINCCONNECT by 32868874; %replace NET$_OBSOLETECONNECTID by 32868882; %replace NET$_BADINPLSTITEMFORMAT by 32868890; %replace NET$_BADPARAM by 32868898; %replace NET$_INPLSTITEMNOTALLOWED by 32868906; %replace NET$_INPLSTINCOMPLETE by 32868914; %replace NET$_INPLSTNOMEM by 32868922; %replace NET$_INPLSTCNFLTPARMS by 32868930; %replace NET$_INSFARG by 32868938; %replace NET$_INVEFN by 32868946; %replace NET$_INVINPLST by 32868954; %replace NET$_INVTMPLST by 32868962; %replace NET$_OUTLSTTOOSMALL by 32868970; %replace NET$_CTXALLFAIL by 32868978; %replace NET$_DATAOVERRUN by 32868986; %replace NET$_DCBLOCKED by 32868994; %replace NET$_EXQUOTA by 32869002; %replace NET$_ILLXMTVCRP by 32869010; %replace NET$_INVATBSIZE by 32869018; %replace NET$_INVTCTBSIZE by 32869026; %replace NET$_DUPLVCID by 32869034; %replace NET$_NOVCIPORT by 32869042; %replace NET$_ILLVCIREQ by 32869050; %replace NET$_INVPORTMGMTREQ by 32869058; %replace NET$_INVCTLSYNCHREQ by 32869066; %replace NET$_INVCTLINITREQ by 32869074; %replace NET$_INVTRANSMITREQ by 32869082; %replace NET$_INVRECEIVEREQ by 32869090; %replace NET$_INVREPORTEVENTREQ by 32869098; %replace NET$_ILLREQPORTDISA by 32869106; %replace NET$_ILLREQENTDISA by 32869114; %replace NET$_INVREQFORMAT by 32869122; %replace NET$_ENTITYNOTENABLED by 32869130; %replace NET$_IDOUTOFRANGE by 32869138; %replace NET$_IDDOESNOTMAP by 32869146; %replace NET$_INCOMPATIBLETOWERS by 32869154; %replace NET$_INSFSYSMEM by 32869162; %replace NET$_INSFVIRMEM by 32869170; %replace NET$_INVALIDTOWER by 32869178; %replace NET$_INVFUNCTION by 32869186; %replace NET$_EXPEDITEDUNAVAILABLE by 32869194; %replace NET$_INVNODENAME by 32869202; %replace NET$_NOSUCHOBJ by 32869210; %replace NET$_NOSUCHAPPL by 32869218; %replace NET$_NOPRIV by 32869226; %replace NET$_TIMEOUT by 32869234; %replace NET$_TOWERSNOTFOUND by 32869242; %replace NET$_TRANSPORTNOTFOUND by 32869250; %replace NET$_WRONGSTATE by 32869258; %replace NET$_RDBADDERR by 32869266; %replace NET$_CONNOTPASSED by 32869274; %replace NET$_GRANTERR by 32869282; %replace NET$_RDBREMERR by 32869290; %replace NET$_ABORT by 32869508; %replace NET$_ABORTRCV by 32869516; %replace NET$_ABORTXMIT by 32869524; %replace NET$_AUTODISCONN by 32869532; %replace NET$_BADSTACKPOP by 32869540; %replace NET$_BADSTACKPUSH by 32869548; %replace NET$_CONTIMEOUT by 32869556; %replace NET$_DISCONTIMEOUT by 32869564; %replace NET$_INVALIDDCB by 32869572; %replace NET$_NETINTERR by 32869580; %replace NET$_NOLOCALNSAP by 32869588; %replace NET$_NOREMOTENSAP by 32869596; %replace NET$_PROTOCOLERROR by 32869604; %replace NET$_REMOTEDISCONN by 32869612; %replace NET$_REJECT by 32869620; %replace NET$_THIRDPARTYABORT by 32869628; %replace NET$_TIMEDOUT by 32869636; %replace NET$_TOOMUCHINTDATA by 32869644; %replace NET$_TOOMUCHCONNDATA by 32869652; %replace NET$_TOOMUCHDISCDATA by 32869660; %replace NET$_USERDISCONN by 32869668; %replace NET$_UNREACHABLE by 32869676; %replace NET$_USERABORT by 32869684; %replace NET$_NODISCREASON by 32869692; %replace NET$_LOADFAIL by 32869700; %replace NET$_UNLOADFAIL by 32869708; %replace NET$_TOOMUCHDATA by 32869716; %replace NET$_NODATA by 32869724; %replace NET$_CHECKSUMFAIL by 32869732; %replace NET$_UNKNOWNTSAP by 32869740; %replace NET$_SECURITYFAIL by 32869748; %replace NET$_REMINSFSYSMEM by 32869756; %replace NET$_INVTPDUSIZE by 32869764; %replace NET$_INVTPDUPARAM by 32869772; %replace NET$_INVTPDUFORMAT by 32869780; %replace NET$_INVDATALENGTH by 32869788; %replace NET$_INVTPDU by 32869796; %replace NET$_ILLSPLIT by 32869804; %replace NET$_MISMATCHREF by 32869812; %replace NET$_ILLCLASSNEGOTIATION by 32869820; %replace NET$_ERRECEIVED by 32869828; %replace NET$_ERUNACKED by 32869836; %replace NET$_NETWORKDISC by 32869844; %replace NET$_NETWORKRESET by 32869852; %replace NET$_UNKNOWNTEMPLATE by 32869860; %replace NET$_INVPROTCLASSREQ by 32869868; %replace NET$_INVCHKREQ by 32869876; %replace NET$_INVEXPREQ by 32869884; %replace NET$_INVEXTREQ by 32869892; %replace NET$_INVDATREQ by 32869900; %replace NET$_INVNETREQ by 32869908; %replace NET$_UNSPECIFIED by 32869916; %replace NET$_INVPROTCLASS by 32869924; %replace NET$_ILLC0DATA by 32869932; %replace NET$_ILLNEGOTIATION by 32869940; %replace NET$_NOLINK by 32869948; %replace NET$_NOTRANSPORTRESOURCES by 32869956; %replace NET$_NODEUNKNOWN by 32869964; %replace NET$_REMOTESHUTDOWN by 32869972; %replace NET$_NOAPPLICATION by 32869980; %replace NET$_INVALIDAPPLICATION by 32869988; %replace NET$_APPLICATIONTOOBUSY by 32869996; %replace NET$_NOSCRESOURCES by 32870004; %replace NET$_NOUSERRESOURCES by 32870012; %replace NET$_BADUSER by 32870020; %replace NET$_BADACCOUNT by 32870028; %replace NET$_REFOVERFLOW by 32870036; %replace NET$_UNKNOWNADDR by 32870044; %replace NET$_DUPLICATEREF by 32870052; %replace NET$_NONZERODSTADR by 32870060; %replace NET$_INVDSTLINK by 32870068; %replace NET$_ZEROSRCADR by 32870076; %replace NET$_INVFCVAL by 32870084; %replace NET$_MISMATCHLLSRV by 32870092; %replace NET$_SEGSIZSMALL by 32870100; %replace NET$_LOSTDATA by 32870108; %replace NET$_NOCRYPTKEY by 32870116; %replace NET$_EXPCRYPTKEY by 32870124; %replace NET$_INTEGCHKFAIL by 32870132; %replace NET$_MISMATCHCRYPTSRV by 32870140; %replace NET$_CRYPTVERFAIL by 32870148; %replace NET$_CRYPTSEQSPACE by 32870156; %replace NET$_PATHLOST by 32870164; %replace NET$_CONNECTFAIL by 32870172; %replace NET$_NAMESERVCOMMERR by 32870180; %replace NET$_ACCVIO by 32870188; %replace NET$_NETWORKSHUT by 32870196; %replace NET$_NETWORKRESTRICTED by 32870204; %replace NET$_NETWORKDISABLED by 32870212; %replace NET$_REQNOTCOMPLETE by 32871106; %replace NET$_CDI_SUCCESS by 32871113; %replace NET$_FAILURE by 32871124; %replace NET$_NOTIMPLEMENTED by 32871130; %replace NET$_NOSUCHOBJECT by 32871138; %replace NET$_NOSUCHATTR by 32871146; %replace NET$_VALUETOOLARGE by 32871154; %replace NET$_MEMALLOCFAIL by 32871162; %replace NET$_FILENOTFOUND by 32871170; %replace NET$_BUFFERTOOSMALL by 32871178; %replace NET$_INVALIDNAME by 32871186; %replace NET$_NOTINITIALIZED by 32871194; %replace NET$_NOTAVAILABLE by 32871202; %replace NET$_INVALIDADDR by 32871210; %replace NET$_NOTSUPPORTED by 32871218; %replace NET$_DSERROR by 32871226; %replace NET$_NORESOURCES by 32871236; %replace NET$_INVALIDPATH by 32871242; %replace NET$_CACHETIMEOUT by 32871250; /********************************************************************************************************************************/ /* Created: 22-Mar-2010 04:19:52 by OpenVMS SDL EV3-3 */ /* Source: 22-MAR-2010 04:19:34 JEDI_AXP_JEDI_RESD$:[PHASE5COMMON.OBJ]NET_CML_M: */ /********************************************************************************************************************************/ /*** MODULE $CMLDEF ***/ %replace CML$_FACILITY by 1122; %replace CML$_ALLOCFAILURE by 73564172; %replace CML$_ABORT by 73564180; %replace CML$_MISSINGDATA by 73564186; %replace CML$_EXTRADATA by 73564194; %replace CML$_DUPLICATEDATA by 73564202; %replace CML$_OVERFLOW by 73564210; %replace CML$_NORESOURCES by 73564218; %replace CML$_INVALIDFUNC by 73564226; %replace CML$_EMAAPROB by 73564234; %replace CML$_CMIPPROB by 73564242; %replace CML$_NCLPROB by 73564250; %replace CML$_SESSPROB by 73564258; %replace CML$_FATAL by 73564266; %replace CML$_ILVNOTIMPLYET by 73564274; %replace CML$_ILVIMPLICIT by 73564282; %replace CML$_ILVNOTATVALUE by 73564290; %replace CML$_ILVNOTYPEFOUND by 73564298; %replace CML$_ILVSYNTAXERROR by 73564306; %replace CML$_ILVBUILDORPARSE by 73564314; %replace CML$_ILVNOTINCONS by 73564322; %replace CML$_ILVENCODING by 73564330; %replace CML$_ILVBUFTOOBIG by 73564338; %replace CML$_ILVTNF by 73564346; %replace CML$_ILVEOC by 73564354; %replace CML$_INV_DESC by 73564362; %replace CML$_INSUF_BUF by 73564370; %replace CML$_INVALID_PDU by 73564378; %replace CML$_INVALID_PROB by 73564386; %replace CML$_INVALID_ERROR by 73564394; %replace CML$_ILVNOTCONS by 73564402; %replace CML$_ILVTOOBIG by 73564410; %replace CML$_ILVMISTYPED by 73564418; %replace CML$_ILVTAG by 73564426; %replace CML$_ILVALREADYDONE by 73564434; %replace CML$_ILVNORTSQRBRKT by 73564442; %replace CML$_ILVTOOMNYRPAREN by 73564450; %replace CML$_ILVUNRECTOKEN by 73564458; %replace CML$_ILVWANTEDTAG by 73564466; %replace CML$_ILVWANTEDVALUE by 73564474; %replace CML$_CMIPERROR by 73564480; %replace CML$_CMIPREJECT by 73564488; %replace CML$_NOTYET by 73564496; %replace CML$_VALIDATIONERROR by 73564504; %replace CML$_XLATETOITEM by 73564512; %replace CML$_XLATETOCMIP by 73564520; %replace CML$_DICTDAWN by 73564531; %replace CML$_DICTARUN by 73564539; %replace CML$_NOT_IMPLEMENTED by 73564547; %replace CML$_SUCCESS by 73564553; %replace CML$_CMIPRESPONSE by 73564561; %replace CML$_NORMAL by 73564569; %replace CML$_ILVIMPLDEFAULT by 73564577; %replace CML$_DICTPRIVATE by 73564585; %replace CML$_DICTEMPTY by 73564596; %replace CML$_DICTNOTFOUND by 73564604; %replace CML$_DICTBUFFEROVERFLOW by 73564610; %replace CML$_DICTINVALIDARGUMENTS by 73564618; %replace CML$_DICTINVALIDCOMBINATION by 73564626; %replace CML$_DICTINVALIDCLASS by 73564634; %replace CML$_DICTINVALIDTEMPLATE by 73564642; %replace CML$_DICTNOAFI by 73564650; %replace CML$_DICTNOENTITY by 73564658; %replace CML$_DICTNOPROTOCOL by 73564666; %replace CML$_DICTNOTOPEN by 73564674; %replace CML$_TIMEOUT by 73564682; %replace CML$_NOCONNECTION by 73564690; %replace CML$_UNSUPPORTVER by 73564698; %replace CML$_NODATA by 73564706; /********************************************************************************************************************************/ /* Created: 22-Mar-2010 04:19:54 by OpenVMS SDL EV3-3 */ /* Source: 22-MAR-2010 04:19:35 JEDI_AXP_JEDI_RESD$:[PHASE5COMMON.OBJ]SCL_IPC_M6 */ /********************************************************************************************************************************/ /*** MODULE $IPCDEF ***/ %replace IPC$_FACILITY by 944; %replace IPC$_NORMAL by 61901153; %replace IPC$_MOREDATA by 61901161; %replace IPC$_INCEXPEVENT by 61901169; %replace IPC$_INCCONEVENT by 61901177; %replace IPC$_INCDISCEVENT by 61901185; %replace IPC$_MOREEVENTS by 61901193; %replace IPC$_DATAOVERRUN by 61901952; %replace IPC$_NODECNETACCESS by 61899554; %replace IPC$_NOREGISTERDNSOBJECT by 61899562; %replace IPC$_NODECLAREOBJECT by 61899570; %replace IPC$_BADARGCNT by 61899578; %replace IPC$_NOBIOCNT by 61899586; %replace IPC$_INTRLERROR by 61899594; %replace IPC$_INPLSTACCVIO by 61899602; %replace IPC$_INPLSTNOMEM by 61899610; %replace IPC$_INPLSTNOBYTLIM by 61899618; %replace IPC$_TMPLSTACCVIO by 61899626; %replace IPC$_TMPLSTNOMEM by 61899634; %replace IPC$_TMPLSTNOBYTLIM by 61899642; %replace IPC$_OUTLSTACCVIO by 61899650; %replace IPC$_OUTLSTNOMEM by 61899658; %replace IPC$_OUTLSTNOBYTLIM by 61899666; %replace IPC$_IPCBACCVIO by 61899674; %replace IPC$_IPCBINCOMPLETE by 61899682; %replace IPC$_IPCBMISSING by 61899690; %replace IPC$_ASTNOQUOTA by 61899698; %replace IPC$_INVBUF by 61899706; %replace IPC$_BUFACCVIO by 61899714; %replace IPC$_BUFNOMEM by 61899722; %replace IPC$_BUFNOBYTLIM by 61899730; %replace IPC$_INVREPLYBUF by 61899738; %replace IPC$_REPLYBUFACCVIO by 61899746; %replace IPC$_REPLYBUFNOMEM by 61899754; %replace IPC$_REPLYBUFNOBYTLIM by 61899762; %replace IPC$_NONONPAGPOOL by 61899770; %replace IPC$_INVEFN by 61899778; %replace IPC$_INVFUNCTION by 61899786; %replace IPC$_UNSUPPORTED by 61899794; %replace IPC$_INVINPLST by 61899802; %replace IPC$_INPLSTITEMNOTALLOWED by 61899810; %replace IPC$_BADINPLSTITEMFORMAT by 61899818; %replace IPC$_INPLSTINCOMPLETE by 61899826; %replace IPC$_INPLSTREQSYSNAM by 61899834; %replace IPC$_INPLSTCNFLTPARMS by 61899842; %replace IPC$_INPLSTBLDERR by 61899850; %replace IPC$_INVTMPLST by 61899858; %replace IPC$_TMPLSTITEMNOTALLOWED by 61899866; %replace IPC$_TMPLSTINCOMPLETE by 61899874; %replace IPC$_TMPLSTCNFLTPARMS by 61899882; %replace IPC$_INVIPCBFLAG by 61899890; %replace IPC$_INVASSOCID by 61899898; %replace IPC$_INVCONNID by 61899906; %replace IPC$_BADASSOCMODE by 61899914; %replace IPC$_BCKTRNSFAIL by 61899922; %replace IPC$_CONNINITFAIL by 61899930; %replace IPC$_GETCONNFAIL by 61899938; %replace IPC$_CONNACCFAIL by 61899946; %replace IPC$_CONNREJFAIL by 61899954; %replace IPC$_CONNHNDFAIL by 61899962; %replace IPC$_DISCCONNFAIL by 61899970; %replace IPC$_ABORTCONNFAIL by 61899978; %replace IPC$_CNCLFAIL by 61899986; %replace IPC$_TRANSMITFAIL by 61899994; %replace IPC$_RCVFAIL by 61900002; %replace IPC$_RCVEXPFAIL by 61900010; %replace IPC$_DLVINCMGFAIL by 61900018; %replace IPC$_DEREGOBJFAIL by 61900026; %replace IPC$_ENUMLCLTWRSFAIL by 61900034; %replace IPC$_GETPORTINFOFAIL by 61900042; %replace IPC$_GETVCRPFAIL by 61900050; %replace IPC$_FREEVCRPFAIL by 61900058; %replace IPC$_VALASSOCFAIL by 61900066; %replace IPC$_VALCONNFAIL by 61900074; %replace IPC$_RUNDWNASSOCFAIL by 61900082; %replace IPC$_RCVEVENTFAIL by 61900090; %replace IPC$_REGOBJFAIL by 61900098; %replace IPC$_RSLVNAMEFAIL by 61900106; %replace IPC$_OPENASSOCFAIL by 61900114; %replace IPC$_CLOSEASSOCFAIL by 61900122; %replace IPC$_SHUTASSOCFAIL by 61900130; %replace IPC$_VERNODENAMEFAIL by 61900138; %replace IPC$_USERDISCONNECT by 61900146; %replace IPC$_USERREJECT by 61900154; %replace IPC$_NOTRANSPORTRESOURCES by 61900162; %replace IPC$_NODEUNKNOWN by 61900170; %replace IPC$_REMOTESHUTDOWN by 61900178; %replace IPC$_NOAPPLICATION by 61900186; %replace IPC$_INVALIDAPPLICATION by 61900194; %replace IPC$_APPLICATIONTOOBUSY by 61900202; %replace IPC$_THIRDPARTYABORT by 61900210; %replace IPC$_USERABORT by 61900218; %replace IPC$_INVALIDNODENAME by 61900226; %replace IPC$_NOSCRESOURCES by 61900234; %replace IPC$_NOUSERRESOURCES by 61900242; %replace IPC$_BADUSER by 61900250; %replace IPC$_BADACCOUNT by 61900258; %replace IPC$_TIMEDOUT by 61900266; %replace IPC$_NODEUNREACHABLE by 61900274; %replace IPC$_CONNECTTOOBIG by 61900282; %replace IPC$_NOLINK by 61900290; %replace IPC$_PATHLOST by 61900298; %replace IPC$_CONNECTFAIL by 61900306; %replace IPC$_NONZERODSTADR by 61902754; %replace IPC$_INVDSTLINK by 61902762; %replace IPC$_ZEROSRCADR by 61902770; %replace IPC$_INVFCVAL by 61902778; %replace IPC$_MISMATCHLLSRV by 61902786; %replace IPC$_SEGSIZSMALL by 61902794; %replace IPC$_LOSTDATA by 61902802; %replace IPC$_NOCRYPTKEY by 61902810; %replace IPC$_EXPCRYPTKEY by 61902818; %replace IPC$_INTEGCHKFAIL by 61902826; %replace IPC$_MISMATCHCRYPTSRV by 61902834; %replace IPC$_CRYPTVERFAIL by 61902842; %replace IPC$_CRYPTSEQSPACE by 61902850; %replace IPC$_UNKNOWNENTRY by 61902858; %replace IPC$_PARSENODENAMEFAIL by 61902866; %replace IPC$_CDIFUNCTIONFAIL by 61902874; %replace IPC$_NETWORKSHUT by 61902882; %replace IPC$_NETWORKRESTRICTED by 61902890; %replace IPC$_NETWORKDISABLED by 61902898; %replace IPC$_DCLSRVRFAIL by 61900356;