--******************************************************************************************************************** -- Created: 30-Mar-2010 17:35:21 by OpenVMS SDL EV3-3 -- Source: 15-JUN-2005 11:31:28 $1$DGA7274:[LIB_ADA.LIS]NETUSR.SDL;1 --******************************************************************************************************************** with SYSTEM; use SYSTEM; with STARLET; use STARLET; with CONDITION_HANDLING; use CONDITION_HANDLING; package NETUSR is -- module $NFBDEF -- -- The following generic field identifiers are defined for all databases. -- NFB_C_ENDOFLIST : constant := 0; -- Used to terminate the field i.d. NFB_C_WILDCARD : constant := 1; -- Field i.d. used for "match all" database searches NFB_C_CTX_SIZE : constant := 64; -- Length of context area in P2 buffer -- -- The following codes are passed in the second IOSB longword to qualify -- as SS$_ILLCNTRFUNC error. -- -- The high order word of these error codes must be 0 -- so that they won't be confused with field i.d.s NFB_ERR_FCT : constant := 1; -- Unrecognized NFB$B_FCT value. NFB_ERR_DB : constant := 2; -- Unrecognized NFB$B_DATABASE value. NFB_ERR_P1 : constant := 3; -- The P1 buffer is invalid. NFB_ERR_P2 : constant := 4; -- The P2 buffer is invalid. NFB_ERR_P3 : constant := 5; -- The P3 buffer is invalid. NFB_ERR_P4 : constant := 6; -- The P4 buffer is invalid. NFB_ERR_P5 : constant := 7; -- The P5 buffer should not have been specified. NFB_ERR_P6 : constant := 8; -- The P6 buffer should not have been specified. NFB_ERR_CELL : constant := 9; -- Unrecognized NFB$B_CELL value. NFB_ERR_OPER : constant := 10; -- Unrecognized NFB$B_OPER value. NFB_ERR_SRCH : constant := 11; -- Unrecognized NFB$L_SRCH_KEY field ID NFB_ERR_SRCH2 : constant := 12; -- Unrecognized NFB$L_SRCH2_KEY field ID NFB_ERR_OPER2 : constant := 13; -- Unrecognized NFB$B_OPER2 value. NFB_ERR_FLAGS : constant := 14; -- Undefined bits in NFB$B_FLAGS were not zero. NFB_ERR_LOCK : constant := 15; -- Lock was not granted -- -- Define the P1 buffer format -- NFB_C_DECLNAME : constant := 21; -- Declare name NFB_C_DECLOBJ : constant := 22; -- Declare object NFB_C_DECLSERV : constant := 23; -- Declare server process available -- Resume defining function codes NFB_C_LOGEVENT : constant := 28; -- Log a network event NFB_C_READEVENT : constant := 29; -- Read current raw event queue (used by EVL only) -- Resume defining function codes NFB_C_FC_DELETE : constant := 33; -- Remove an entry from the data base. NFB_C_FC_SHOW : constant := 34; -- Return specified field values. NFB_C_FC_SET : constant := 35; -- Set/modify the field values. NFB_C_FC_CLEAR : constant := 36; -- Clear specified field values. NFB_C_FC_ZERCOU : constant := 37; -- Zero (and optionally read) counters NFB_C_FC_LOOP : constant := 38; -- Loop (used only to PSI to loop an X.25 line) NFB_C_REBUILD_PROXY : constant := 39; -- Rebuild the proxy data base NFB_C_ADD_PROXY : constant := 40; -- Add/Modify proxy DB entry NFB_C_DELETE_PROXY : constant := 41; -- Remove/Delete proxy access -- Maximum FCT value NFB_C_FC_MAX : constant := 41; -- Maximum FCT value NFB_M_ERRUPD : constant := 16#00000001#; NFB_M_MULT : constant := 16#00000002#; NFB_M_NOCTX : constant := 16#00000004#; NFB_M_LOCAL : constant := 16#00000008#; NFB_C_DB_LNI : constant := 1; -- Local node NFB_C_DB_NDI : constant := 2; -- Common nodes NFB_C_DB_OBI : constant := 3; -- Network objects NFB_C_DB_CRI : constant := 4; -- Circuits NFB_C_DB_PLI : constant := 5; -- Lines NFB_C_DB_EFI : constant := 6; -- Event logging filters NFB_C_DB_ESI : constant := 7; -- Event logging sinks NFB_C_DB_LLI : constant := 8; -- Logical-links NFB_C_DB_XNI : constant := 9; -- X.25 networks NFB_C_DB_XGI : constant := 10; -- X.25 groups NFB_C_DB_XDI : constant := 11; -- X.25 DTEs NFB_C_DB_XS5 : constant := 12; -- X.25 server NFB_C_DB_XD5 : constant := 13; -- X.25 destinations NFB_C_DB_XS9 : constant := 14; -- X.29 server NFB_C_DB_XD9 : constant := 15; -- X.29 destinations NFB_C_DB_XTI : constant := 16; -- X.25 trace facility NFB_C_DB_XTT : constant := 17; -- X.25 tracepoints NFB_C_DB_SPI : constant := 18; -- Server Process NFB_C_DB_AJI : constant := 19; -- Adjacency information NFB_C_DB_ARI : constant := 20; -- Area information -- (The following codes are reserved for future PSIACP -- databases. These codes should only be used in the -- event PSIACP needs a database code before a new -- new NETACP can be supplied to support it). NFB_C_DB_XDTE : constant := 21; -- PSI reserved database NFB_C_DB_PSI2 : constant := 22; -- PSI reserved database NFB_C_DB_PSI3 : constant := 23; -- PSI reserved database NFB_C_DB_PSI4 : constant := 24; -- PSI reserved database NFB_C_DB_PSI5 : constant := 25; -- PSI reserved database NFB_C_DB_SDI : constant := 26; -- Service (DLE) information NFB_C_DB_XAI : constant := 27; -- X.25 access database NFB_C_DB_PROXY : constant := 28; -- Proxy data base NFB_C_DB_XXX : constant := 29; -- Last database definition for NFB$C_DB_MAX calc. -- Maximum DATABASE value NFB_C_DB_MAX : constant := 28; -- Maximum DATABASE value NFB_C_OP_EQL : constant := 0; -- Match if SEARCH_KEY value EQL database entry field NFB_C_OP_GTRU : constant := 1; -- Match if SEARCH_KEY value GTRU database entry field NFB_C_OP_LSSU : constant := 2; -- Match if SEARCH_KEY value LSSU database entry field NFB_C_OP_NEQ : constant := 3; -- Match if SEARCH_KEY value NEQ database entry field -- The following may only be used internally by NETACP NFB_C_OP_FNDMIN : constant := 4; -- Find entry with minimum key value NFB_C_OP_FNDMAX : constant := 5; -- Find entry with maximum key value NFB_C_OP_FNDPOS : constant := 6; -- Find entry position in database -- Maximum operator function NFB_C_OP_MAXFCT : constant := 3; -- Maximum operator function NFB_C_OP_MAXINT : constant := 6; -- Maximum internal function NFB_K_LENGTH : constant := 16; -- Minimum structure size. NFB_C_LENGTH : constant := 16; -- Minimum structure size. -- counted strings. If the "cell size" is non-zero, it NFB_S_NFBDEF : constant := 20; -- Old size name - synonym type NFB_FLAGS_TYPE is -- Miscellaneous control flags record ERRUPD : BOOLEAN; -- Update position context, even on error MULT : BOOLEAN; -- Process as many entries as can be fit into P4 NOCTX : BOOLEAN; -- Don't update position context, even if successful -- (used to stay on an entry for a while). This -- flag Overrides the ERRUPD flag. LOCAL : BOOLEAN; -- Signal that REBUILD_PROXY should only be -- performed locally FILLER_1 : UNSIGNED_4; end record; for NFB_FLAGS_TYPE use record ERRUPD at 0 range 0 .. 0; MULT at 0 range 1 .. 1; NOCTX at 0 range 2 .. 2; LOCAL at 0 range 3 .. 3; FILLER_1 at 0 range 4 .. 7; end record; for NFB_FLAGS_TYPE'SIZE use 8; NFB_FLAGS_TYPE_INIT : constant NFB_FLAGS_TYPE := (ERRUPD => FALSE, MULT => FALSE, NOCTX => FALSE, LOCAL => FALSE, FILLER_1 => 0); type NFB_TYPE is record FCT : UNSIGNED_BYTE; -- A function code as follows: -- Function codes for the NFB -- (leaving room for 20 obsolete function codes) -- (leave room for 4 obsolete function codes) -- (leave room for 3 obsolete function codes) FLAGS : NFB_FLAGS_TYPE; -- Miscellaneous control flags DATABASE : UNSIGNED_BYTE; -- A code identifying the database as follows: -- ZERO is an illegal value for this field OPER : UNSIGNED_BYTE; -- Specifies the sense of the search (e.g. EQL, GEQU) -- when comparing against the SRCH_KEY field. SRCH_KEY : UNSIGNED_LONGWORD; -- Search key field identifier specifying the key used -- to locate the entry in the database. This search is -- controlled by the sense of the NFB$B_OPER field. -- -- If this field has the value "NFB$C_WILDCARD", then -- the very next entry in the list is assumed to be the -- target of the search. -- -- If this field is not specified (zero), then it -- is assumed to be NFB$C_WILDCARD (no search key). -- SRCH2_KEY : UNSIGNED_LONGWORD; -- Secondary search key field ID specifying the key used -- to locate the entry in the database. This search is -- controlled by the sense of the NFB$B_OPER2 field. -- -- If both SRCH_KEY and SRCH2_KEY are specified, then -- only those database entries matching both search keys -- will be processed. -- -- If this field is not specified (zero), then it -- is assumed to be NFB$C_WILDCARD (no search key). -- OPER2 : UNSIGNED_BYTE; -- Specifies the sense of the search (e.g. EQL, GEQU) -- when comparing against the SRCH2_KEY field. MBZ1 : UNSIGNED_BYTE; -- Reserved. MBZ. CELL_SIZE : UNSIGNED_WORD; -- Some of the field values found in the P4 buffer are -- indicates the number of bytes which each string in -- the P4 buffer occupies. If it is zero then strings -- fields are stored as variable lengthed strings. FLDID : UNSIGNED_LONGWORD; -- Cell containing the first field ID -- the list -- of field IDs begins here and continues to the -- end of the structure. -- -- The list may be terminated before the end of the -- structure by placing the value NFB$C_ENDOFLIST -- in the longword following the last field ID. -- -- -- Define the "field i.d." format. -- end record; for NFB_TYPE use record FCT at 0 range 0 .. 7; FLAGS at 1 range 0 .. 7; DATABASE at 2 range 0 .. 7; OPER at 3 range 0 .. 7; SRCH_KEY at 4 range 0 .. 31; SRCH2_KEY at 8 range 0 .. 31; OPER2 at 12 range 0 .. 7; MBZ1 at 13 range 0 .. 7; CELL_SIZE at 14 range 0 .. 15; FLDID at 16 range 0 .. 31; end record; for NFB_TYPE'SIZE use 160; NFB_TYPE_INIT : constant NFB_TYPE := (FCT => 0, FLAGS => NFB_FLAGS_TYPE_INIT, DATABASE => 0, OPER => 0, SRCH_KEY => 0, SRCH2_KEY => 0, OPER2 => 0, MBZ1 => 0, CELL_SIZE => 0, FLDID => 0); NFB_M_INX : constant := 16#0000FFFF#; NFB_M_TYP : constant := 16#00030000#; NFB_M_SPARE : constant := 16#00FC0000#; NFB_M_DB : constant := 16#FF000000#; NFB_C_TYP_BIT : constant := 0; -- Field type for bits NFB_C_TYP_V : constant := 0; -- Field type for bits NFB_C_TYP_LNG : constant := 1; -- Field type for longwords NFB_C_TYP_L : constant := 1; -- Field type for longwords NFB_C_TYP_STR : constant := 2; -- Field type for strings NFB_C_TYP_S : constant := 2; -- Field type for strings -- NFB_S_NFBDEF1 : constant := 4; -- Old size name - synonym type NFB_PARAM_ID_TYPE is -- Define parameter ID longword record INX : UNSIGNED_16; -- Index into semantic table TYP : UNSIGNED_2; -- Field type (string, bit, etc.) SPARE : UNSIGNED_6; -- Reserved, MBZ DB : UNSIGNED_8; -- Data-base i.d. end record; for NFB_PARAM_ID_TYPE use record INX at 0 range 0 .. 15; TYP at 2 range 0 .. 1; SPARE at 2 range 2 .. 7; DB at 3 range 0 .. 7; end record; for NFB_PARAM_ID_TYPE'SIZE use 32; NFB_PARAM_ID_TYPE_INIT : constant NFB_PARAM_ID_TYPE := (INX => 0, TYP => 0, SPARE => 0, DB => 0); type NFB1_TYPE is record PARAM_ID : NFB_PARAM_ID_TYPE; -- Define parameter ID longword end record; for NFB1_TYPE use record PARAM_ID at 0 range 0 .. 31; end record; for NFB1_TYPE'SIZE use 32; NFB1_TYPE_INIT : constant NFB1_TYPE := ( PARAM_ID => NFB_PARAM_ID_TYPE_INIT ); NFB_S_NFBDEF2 : constant := 4; -- old size name - synonym type NFB2_TYPE is record LNG_VALUE : UNSIGNED_LONGWORD; -- Longword value end record; for NFB2_TYPE use record LNG_VALUE at 0 range 0 .. 31; end record; for NFB2_TYPE'SIZE use 32; NFB2_TYPE_INIT : constant NFB2_TYPE := (LNG_VALUE => 0); NFB_S_NFBDEF3 : constant := 4; -- old size name - synonym type NFB3_TYPE is record BIT_VALUE : UNSIGNED_LONGWORD; -- Boolean value end record; for NFB3_TYPE use record BIT_VALUE at 0 range 0 .. 31; end record; for NFB3_TYPE'SIZE use 32; NFB3_TYPE_INIT : constant NFB3_TYPE := (BIT_VALUE => 0); NFB_C_NDI_LCK : constant := 33554433; -- Set if conditionally writable fields are not writable NFB_C_NDI_LOO : constant := 33554434; -- Set if CNF is for a "loopback" node NFB_C_NDI_REA : constant := 33554435; -- Set if node is reachable -- NFB_C_NDI_TAD : constant := 33619984; -- "transformed address" - uses local node address -- for the local NDI (instead of zero as does ADD) NFB_C_NDI_CTA : constant := 33619985; -- Absolute due time for logging counters NFB_C_NDI_ADD : constant := 33619986; -- Address NFB_C_NDI_CTI : constant := 33619987; -- Counter timer NFB_C_NDI_ACL : constant := 33619988; -- Active links NFB_C_NDI_DEL : constant := 33619989; -- Delay NFB_C_NDI_DTY : constant := 33619990; -- Destination Type NFB_C_NDI_DCO : constant := 33619991; -- Destination Cost NFB_C_NDI_DHO : constant := 33619992; -- Destination Hops NFB_C_NDI_SDV : constant := 33619993; -- Service Device NFB_C_NDI_CPU : constant := 33619994; -- CPU type NFB_C_NDI_STY : constant := 33619995; -- Software type NFB_C_NDI_DAD : constant := 33619996; -- Dump address NFB_C_NDI_DCT : constant := 33619997; -- Dump count NFB_C_NDI_OHO : constant := 33619998; -- Host NFB_C_NDI_IHO : constant := 33619999; -- Host NFB_C_NDI_ACC : constant := 33620000; -- Access switch (inbound, outbound, etc) NFB_C_NDI_PRX : constant := 33620001; -- ** obsolete ** (Node proxy parameter) NFB_C_NDI_NND : constant := 33620002; -- Next node address NFB_C_NDI_SNV : constant := 33620003; -- Service Node Version NFB_C_NDI_INB : constant := 33620004; -- Async Line - Inbound node type -- NFB_C_NDI_COL : constant := 33685568; -- Collating field NFB_C_NDI_HAC : constant := 33685569; -- Node address/loop linename combination NFB_C_NDI_CNT : constant := 33685570; -- Counters NFB_C_NDI_NNA : constant := 33685571; -- Name NFB_C_NDI_SLI : constant := 33685572; -- Service line NFB_C_NDI_SPA : constant := 33685573; -- Service password NFB_C_NDI_LOA : constant := 33685574; -- Load file NFB_C_NDI_SLO : constant := 33685575; -- Secondary loader NFB_C_NDI_TLO : constant := 33685576; -- Tertiary loader NFB_C_NDI_SID : constant := 33685577; -- Software ID NFB_C_NDI_DUM : constant := 33685578; -- Dump file NFB_C_NDI_SDU : constant := 33685579; -- Secondary dumper NFB_C_NDI_NLI : constant := 33685580; -- Loopback Line NFB_C_NDI_DLI : constant := 33685581; -- Destination Line NFB_C_NDI_PUS : constant := 33685582; -- Privileged user id NFB_C_NDI_PAC : constant := 33685583; -- Privileged account NFB_C_NDI_PPW : constant := 33685584; -- Privileged password NFB_C_NDI_NUS : constant := 33685585; -- Non-privileged user id NFB_C_NDI_NAC : constant := 33685586; -- Non-privileged account NFB_C_NDI_NPW : constant := 33685587; -- Non-privileged password NFB_C_NDI_RPA : constant := 33685588; -- Receive password NFB_C_NDI_TPA : constant := 33685589; -- Transmit password NFB_C_NDI_DFL : constant := 33685590; -- Diagnostic load file NFB_C_NDI_HWA : constant := 33685591; -- Hardware NI address (ROM address) NFB_C_NDI_LPA : constant := 33685592; -- Loop assistant NI address NFB_C_NDI_NNN : constant := 33685593; -- Next node name to destination (goes with NND) NFB_C_NDI_LAA : constant := 33685594; -- Load Assist Agent NFB_C_NDI_LAP : constant := 33685595; -- Load Assist Parameter NFB_C_NDI_MFL : constant := 33685596; -- Management File -- NFB_C_LNI_LCK : constant := 16777217; -- Set if conditionally writable fields are not writable NFB_C_LNI_ALI : constant := 16777218; -- Set if ALIAS INBOUND has been enabled NFB_C_LNI_IPR : constant := 16777219; -- Incoming proxy enabled/disabled NFB_C_LNI_OPR : constant := 16777220; -- Outgoing proxy enabled/disabled NFB_C_LNI_DNS : constant := 16777221; -- DNS interface enabled/disabled -- NFB_C_LNI_ADD : constant := 16842768; -- Address NFB_C_LNI_ACL : constant := 16842769; -- Total number of active links NFB_C_LNI_ITI : constant := 16842770; -- Incoming timer NFB_C_LNI_OTI : constant := 16842771; -- Outgoing timer NFB_C_LNI_STA : constant := 16842772; -- State NFB_C_LNI_MLK : constant := 16842773; -- Maximum links NFB_C_LNI_DFA : constant := 16842774; -- Delay factor NFB_C_LNI_DWE : constant := 16842775; -- Delay weight NFB_C_LNI_IAT : constant := 16842776; -- Inactivity timer NFB_C_LNI_RFA : constant := 16842777; -- Retransmit factor NFB_C_LNI_ETY : constant := 16842778; -- Executor Type NFB_C_LNI_RTI : constant := 16842779; -- Routing timer NFB_C_LNI_RSI : constant := 16842780; -- Routing suppression timer NFB_C_LNI_SAD : constant := 16842781; -- Subaddress -- (lower word = lower limit, upper word = upper limit) NFB_C_LNI_MAD : constant := 16842782; -- Maximum address NFB_C_LNI_MLN : constant := 16842783; -- Maximum lines NFB_C_LNI_MCO : constant := 16842784; -- Maximum cost NFB_C_LNI_MHO : constant := 16842785; -- Maximum hops NFB_C_LNI_MVI : constant := 16842786; -- Maximum visits NFB_C_LNI_MBU : constant := 16842787; -- Maximum buffers NFB_C_LNI_BUS : constant := 16842788; -- Forwarding buffer size NFB_C_LNI_LPC : constant := 16842789; -- Loop count NFB_C_LNI_LPL : constant := 16842790; -- Loop length NFB_C_LNI_LPD : constant := 16842791; -- Loop Data type NFB_C_LNI_DAC : constant := 16842792; -- Default access switch (inbound, outbound, etc) NFB_C_LNI_FILL1 : constant := 16842793; -- Place holder, used to be Default proxy access (inbound, outbound, etc NFB_C_LNI_PIQ : constant := 16842794; -- Pipeline quota NFB_C_LNI_LPH : constant := 16842795; -- Loop help type of assistance given to loop requestors NFB_C_LNI_BRT : constant := 16842796; -- Broadcast routing timer NFB_C_LNI_MAR : constant := 16842797; -- Maximum areas NFB_C_LNI_MBE : constant := 16842798; -- Maximum nonrouters on NI NFB_C_LNI_MBR : constant := 16842799; -- Maximum routers on NI NFB_C_LNI_AMC : constant := 16842800; -- Area maximum cost NFB_C_LNI_AMH : constant := 16842801; -- Area maximum hops NFB_C_LNI_SBS : constant := 16842802; -- Segment buffer size NFB_C_LNI_ALA : constant := 16842803; -- Alias local node address (cluster address) NFB_C_LNI_ALM : constant := 16842804; -- Alias maximum links NFB_C_LNI_PSP : constant := 16842805; -- Path split policy normal/interim NFB_C_LNI_MPS : constant := 16842806; -- Maximum path split NFB_C_LNI_MDO : constant := 16842807; -- Maximum Declared Object -- NFB_C_LNI_COL : constant := 16908352; -- Collating field NFB_C_LNI_NAM : constant := 16908353; -- Local node name NFB_C_LNI_CNT : constant := 16908354; -- Counters NFB_C_LNI_IDE : constant := 16908355; -- Identification NFB_C_LNI_MVE : constant := 16908356; -- Management version NFB_C_LNI_NVE : constant := 16908357; -- Nsp version NFB_C_LNI_RVE : constant := 16908358; -- Routing version NFB_C_LNI_PHA : constant := 16908359; -- Physical NI address (current address) NFB_C_LNI_IDP : constant := 16908360; -- IDP of ISO address NFB_C_LNI_DNM : constant := 16908361; -- DNS namespace -- NFB_C_OBI_LCK : constant := 50331649; -- Set if conditionally writable fields are not writable NFB_C_OBI_SET : constant := 50331650; -- Set if a "set" QIO has ever modified the CNF. If -- not then the CNF was due to a "declare name/obect" -- only and may be deleted when the declaring process -- breaks the channel over which the object was declared NFB_C_OBI_ALO : constant := 50331651; -- Alias Outgoing enabled/disabled NFB_C_OBI_ALI : constant := 50331652; -- Alias Incoming enabled/disabled -- NFB_C_OBI_LPR : constant := 50397200; -- Low order privileges NFB_C_OBI_HPR : constant := 50397201; -- High order privileges NFB_C_OBI_DOV : constant := 50397202; -- Point to Owners UCB NFB_C_OBI_CHN : constant := 50397203; -- Owner's channel NFB_C_OBI_NUM : constant := 50397204; -- Number NFB_C_OBI_PID : constant := 50397205; -- Process id NFB_C_OBI_PRX : constant := 50397206; -- Proxy login switch (inbound, outbound, etc) -- NFB_C_OBI_COL : constant := 50462784; -- Collating field NFB_C_OBI_ZNA : constant := 50462785; -- Zero obj+name identifier NFB_C_OBI_SFI : constant := 50462786; -- Parsed file i.d. NFB_C_OBI_IAC : constant := 50462787; -- Default inbound combined access control string NFB_C_OBI_NAM : constant := 50462788; -- Name NFB_C_OBI_FID : constant := 50462789; -- File id NFB_C_OBI_USR : constant := 50462790; -- User id NFB_C_OBI_ACC : constant := 50462791; -- Account NFB_C_OBI_PSW : constant := 50462792; -- Password NFB_C_OBI_OCPRV : constant := 50462793; -- Outgoing Connect Privileges -- NFB_C_CRI_LCK : constant := 67108865; -- D Set if conditionally writable fields are -- not writable NFB_C_CRI_SER : constant := 67108866; -- D Set if Service functions not allowed NFB_C_CRI_BLK_FILL : constant := 67108867; -- Filler (BLK retired) NFB_C_CRI_VER_FILL : constant := 67108868; -- Filler (VER retired) NFB_C_CRI_DLM : constant := 67108869; -- E Circuit to be used as X.25 datalink, if set -- If clear, circuit is for X.25 native use NFB_C_CRI_OWPID : constant := 67174416; -- D PID of temp owner of line in service state NFB_C_CRI_CTA : constant := 67174417; -- D Absolute due time for counter logging NFB_C_CRI_SRV : constant := 67174418; -- D Service substate qualifier NFB_C_CRI_STA : constant := 67174419; -- C State NFB_C_CRI_SUB : constant := 67174420; -- C Substate NFB_C_CRI_LCT : constant := 67174421; -- C Counter timer NFB_C_CRI_PNA : constant := 67174422; -- E Adjacent node address NFB_C_CRI_BLO : constant := 67174423; -- E Partner's receive block size NFB_C_CRI_COS : constant := 67174424; -- E Cost NFB_C_CRI_HET : constant := 67174425; -- E Hello timer NFB_C_CRI_LIT : constant := 67174426; -- E Listen timer NFB_C_CRI_MRC : constant := 67174427; -- E Maximum recalls NFB_C_CRI_RCT : constant := 67174428; -- E Recall timer NFB_C_CRI_POL : constant := 67174429; -- D Polling state NFB_C_CRI_PLS : constant := 67174430; -- D Polling substate NFB_C_CRI_USE : constant := 67174431; -- X Usage NFB_C_CRI_TYP : constant := 67174432; -- C Type NFB_C_CRI_CHN : constant := 67174433; -- X X.25 Channel NFB_C_CRI_MBL : constant := 67174434; -- X Maximum block NFB_C_CRI_MWI : constant := 67174435; -- X Maximum window NFB_C_CRI_TRI : constant := 67174436; -- D Tributary NFB_C_CRI_BBT : constant := 67174437; -- D Babble timer NFB_C_CRI_TRT : constant := 67174438; -- D Transmit timer NFB_C_CRI_MRB : constant := 67174439; -- D Maximum receive buffers NFB_C_CRI_MTR : constant := 67174440; -- D Maximum transmits NFB_C_CRI_ACB : constant := 67174441; -- D Active base NFB_C_CRI_ACI : constant := 67174442; -- D Active increment NFB_C_CRI_IAB : constant := 67174443; -- D Inactive base NFB_C_CRI_IAI : constant := 67174444; -- D Inactive increment NFB_C_CRI_IAT : constant := 67174445; -- D Inactive threshold NFB_C_CRI_DYB : constant := 67174446; -- D Dying base NFB_C_CRI_DYI : constant := 67174447; -- D Dying increment NFB_C_CRI_DYT : constant := 67174448; -- D Dying threshold NFB_C_CRI_DTH : constant := 67174449; -- D Dead threshold NFB_C_CRI_MST : constant := 67174450; -- D Maintenance mode state (0 => On, 1 => Off> NFB_C_CRI_XPT : constant := 67174451; -- E Transport protocol to use NFB_C_CRI_MRT : constant := 67174452; -- E Maximum routers on this NI NFB_C_CRI_RPR : constant := 67174453; -- E Router priority NFB_C_CRI_DRT : constant := 67174454; -- E Designated router on NI (node address) NFB_C_CRI_VER : constant := 67174455; -- D Verification Enabled/Disabled/Inbound on circuit -- NFB_C_CRI_COL : constant := 67240000; -- D Collating field NFB_C_CRI_NAM : constant := 67240001; -- C Circuit name NFB_C_CRI_VMSNAM : constant := 67240002; -- D Device name in VMS format NFB_C_CRI_CHR : constant := 67240003; -- D Characteristics buffer for startup control QIO NFB_C_CRI_CNT : constant := 67240004; -- C Counters NFB_C_CRI_P2P : constant := 67240005; -- D Line's PhaseII partner name (for loopback) NFB_C_CRI_LOO : constant := 67240006; -- E Loopback name NFB_C_CRI_PNN : constant := 67240007; -- E Adjacent node name NFB_C_CRI_NUM : constant := 67240008; -- X Call Number NFB_C_CRI_DTE : constant := 67240009; -- X DTE NFB_C_CRI_DEVNAM : constant := 67240010; -- D Device name in VMS format, with unit included NFB_C_CRI_NET : constant := 67240011; -- XD Network name -- NFB_C_PLI_LCK : constant := 83886081; -- D Set if conditionally writable fields are -- not writable NFB_C_PLI_SER : constant := 83886082; -- D Service NFB_C_PLI_DUP : constant := 83886083; -- C Duplex (set if half) NFB_C_PLI_CON : constant := 83886084; -- C Controller (set if loopback) NFB_C_PLI_CLO : constant := 83886085; -- C Clock mode (set if internal) NFB_C_PLI_SWI : constant := 83886086; -- D Async Line - Switch NFB_C_PLI_HNG : constant := 83886087; -- D Async Line - Hangup -- NFB_C_PLI_CTA : constant := 83951632; -- D Absolute time for counter read and clear NFB_C_PLI_STA : constant := 83951633; -- C State NFB_C_PLI_SUB : constant := 83951634; -- C Substate NFB_C_PLI_LCT : constant := 83951635; -- D Counter timer NFB_C_PLI_PRO : constant := 83951636; -- C Protocol NFB_C_PLI_STI : constant := 83951637; -- D Service timer NFB_C_PLI_HTI : constant := 83951638; -- L Holdback timer NFB_C_PLI_MBL : constant := 83951639; -- L Maximum block NFB_C_PLI_MRT : constant := 83951640; -- L Maximum retransmits NFB_C_PLI_MWI : constant := 83951641; -- L Maximum window NFB_C_PLI_SLT : constant := 83951642; -- D Scheduling timer NFB_C_PLI_DDT : constant := 83951643; -- D Dead timer NFB_C_PLI_DLT : constant := 83951644; -- D Delay timer NFB_C_PLI_SRT : constant := 83951645; -- D Stream timer NFB_C_PLI_BFN : constant := 83951646; -- D Receive buffers NFB_C_PLI_BUS : constant := 83951647; -- D Action routine returns bufsiz used for line NFB_C_PLI_PLVEC : constant := 83951648; -- D PLVEC i.d. NFB_C_PLI_RTT : constant := 83951649; -- D Retransmit timer NFB_C_PLI_MOD : constant := 83951650; -- L X.25 mode (DCE, DTE, etc). NFB_C_PLI_LPC : constant := 83951651; -- L Loop count NFB_C_PLI_LPL : constant := 83951652; -- L Loop length NFB_C_PLI_LPD : constant := 83951653; -- L Loop Data type NFB_C_PLI_EPT : constant := 83951654; -- E Ethernet protocol type for datalink NFB_C_PLI_LNS : constant := 83951655; -- D Async Line - Line speed NFB_C_PLI_BFS : constant := 83951656; -- C Line buffer size (overrides executor bufsiz) NFB_C_PLI_TPI : constant := 83951657; -- D Transmit Pipeline NFB_C_PLI_TREQ : constant := 83951658; -- F Requested TRT NFB_C_PLI_TVX : constant := 83951659; -- F Valid transmission time NFB_C_PLI_REST_TTO : constant := 83951660; -- F Restricted token timeout NFB_C_PLI_RPE : constant := 83951661; -- F Ring purger enable NFB_C_PLI_ECHO_DAT : constant := 83951662; -- F Echo data NFB_C_PLI_ECHO_LEN : constant := 83951663; -- F Echo length NFB_C_PLI_T_NEG : constant := 83951664; -- F Negotiated TRT NFB_C_PLI_DAT : constant := 83951665; -- F Duplicate address flag NFB_C_PLI_UN_DAT : constant := 83951666; -- F Upstream neighbor DA flag NFB_C_PLI_RPS : constant := 83951667; -- F Ring purger state NFB_C_PLI_RER : constant := 83951668; -- F Ring error reason NFB_C_PLI_NBR_PHY : constant := 83951669; -- F Neighbor PHY type NFB_C_PLI_LEE : constant := 83951670; -- F Link error estimate NFB_C_PLI_RJR : constant := 83951671; -- F Reject reason -- NFB_C_PLI_COL : constant := 84017216; -- D Collating field NFB_C_PLI_NAM : constant := 84017217; -- C Line name NFB_C_PLI_VMSNAM : constant := 84017218; -- D Device name in VMS format NFB_C_PLI_CHR : constant := 84017219; -- D Set-mode $QIO line Characteristics buffer NFB_C_PLI_CNT : constant := 84017220; -- C Counters NFB_C_PLI_MCD : constant := 84017221; -- L Filespec for microcode dump (initiates dump) NFB_C_PLI_HWA : constant := 84017222; -- D NI hardware address (ROM address) NFB_C_PLI_DEVNAM : constant := 84017223; -- D Device name in VMS format, with unit included NFB_C_PLI_NET : constant := 84017224; -- L Network name NFB_C_PLI_NIF_TARG : constant := 84017225; -- F NIF target NFB_C_PLI_SIF_CONF_TARG : constant := 84017226; -- F SIF configuration target NFB_C_PLI_SIF_OP_TARG : constant := 84017227; -- F SIF operation target NFB_C_PLI_ECHO_TARG : constant := 84017228; -- F Echo target NFB_C_PLI_MAC_CHR : constant := 84017229; -- F Set-mode $QIO MAC line characteristics buffer NFB_C_PLI_UNA : constant := 84017230; -- F Upstream neighbor NFB_C_PLI_OLD_UNA : constant := 84017231; -- F Old upstream neighbor NFB_C_PLI_DNA : constant := 84017232; -- F Downstream neighbor NFB_C_PLI_OLD_DNA : constant := 84017233; -- F Old downstream neighbor -- NFB_C_EFI_LCK : constant := 100663297; -- Set if conditionally writable fields are not writable -- NFB_C_EFI_SIN : constant := 100728848; NFB_C_EFI_SP1 : constant := 100728849; NFB_C_EFI_B1 : constant := 100728850; NFB_C_EFI_B2 : constant := 100728851; -- NFB_C_EFI_COL : constant := 100794432; -- Collating field NFB_C_EFI_EVE : constant := 100794433; NFB_C_EFI_SB1 : constant := 100794434; NFB_C_EFI_SB2 : constant := 100794435; NFB_C_EFI_SB3 : constant := 100794436; -- NFB_C_ESI_LCK : constant := 117440513; -- Set if conditionally writable fields are not writable -- NFB_C_ESI_SNK : constant := 117506064; NFB_C_ESI_STA : constant := 117506065; NFB_C_ESI_SP1 : constant := 117506066; NFB_C_ESI_B1 : constant := 117506067; NFB_C_ESI_B2 : constant := 117506068; -- NFB_C_ESI_COL : constant := 117571648; -- Collating field NFB_C_ESI_LNA : constant := 117571649; NFB_C_ESI_SB1 : constant := 117571650; NFB_C_ESI_SB2 : constant := 117571651; NFB_C_ESI_SB3 : constant := 117571652; -- NFB_C_LLI_LCK : constant := 134217729; -- Set if conditionally writable fields are not writable -- NFB_C_LLI_DLY : constant := 134283280; -- Round trip delay time NFB_C_LLI_STA : constant := 134283281; -- State NFB_C_LLI_LLN : constant := 134283282; -- Local link number NFB_C_LLI_RLN : constant := 134283283; -- Remote link number NFB_C_LLI_PNA : constant := 134283284; -- Partner's node address NFB_C_LLI_PID : constant := 134283285; -- External Process I.D. NFB_C_LLI_IPID : constant := 134283286; -- Internal Process I.D. NFB_C_LLI_XWB : constant := 134283287; -- Pointer to XWB NFB_C_LLI_CNT : constant := 134283288; -- Counters -- NFB_C_LLI_COL : constant := 134348864; -- Collating field NFB_C_LLI_USR : constant := 134348865; -- User name NFB_C_LLI_PRC : constant := 134348866; -- Process name NFB_C_LLI_PNN : constant := 134348867; -- Partner's node name NFB_C_LLI_RID : constant := 134348868; -- Partner's process i.d. -- NFB_C_XNI_LCK : constant := 150994945; -- Set if conditionally writable fields are not writable NFB_C_XNI_MNS_FILL : constant := 150994946; -- X.25 multi-network support (set if enabled) [No longer used] -- NFB_C_XNI_CAT : constant := 151060496; -- Call timer NFB_C_XNI_CLT : constant := 151060497; -- Clear timer NFB_C_XNI_DBL : constant := 151060498; -- Default data NFB_C_XNI_DWI : constant := 151060499; -- Default window NFB_C_XNI_MBL : constant := 151060500; -- Maximum data NFB_C_XNI_MCL : constant := 151060501; -- Maximum clears NFB_C_XNI_MRS : constant := 151060502; -- Maximum resets NFB_C_XNI_MST : constant := 151060503; -- Maximum restarts NFB_C_XNI_MWI : constant := 151060504; -- Maximum window NFB_C_XNI_RST : constant := 151060505; -- Reset timer NFB_C_XNI_STT : constant := 151060506; -- Restart timer -- NFB_C_XNI_COL : constant := 151126080; -- Collating field NFB_C_XNI_NETENT : constant := 151126081; -- Network NFB_C_XNI_PROF : constant := 151126082; -- Profile name -- NFB_C_XDI_LCK : constant := 184549377; -- Set if conditionally writable fields are not writable -- NFB_C_XDI_ACH : constant := 184614928; -- Active channels NFB_C_XDI_ASW : constant := 184614929; -- Active switched NFB_C_XDI_CTM : constant := 184614930; -- Counter timer NFB_C_XDI_MCH : constant := 184614931; -- Maximum channels NFB_C_XDI_STA : constant := 184614932; -- State NFB_C_XDI_SUB : constant := 184614933; -- Substate NFB_C_XDI_MCI : constant := 184614934; -- Maximum circuits [VMS only] NFB_C_XDI_CAT : constant := 184614935; -- Call timer NFB_C_XDI_CLT : constant := 184614936; -- Clear timer NFB_C_XDI_DBL : constant := 184614937; -- Default data NFB_C_XDI_DWI : constant := 184614938; -- Default window NFB_C_XDI_MBL : constant := 184614939; -- Maximum data NFB_C_XDI_MCL : constant := 184614940; -- Maximum clears NFB_C_XDI_MRS : constant := 184614941; -- Maximum resets NFB_C_XDI_MST : constant := 184614942; -- Maximum restarts NFB_C_XDI_MWI : constant := 184614943; -- Maximum window NFB_C_XDI_RST : constant := 184614944; -- Reset timer NFB_C_XDI_STT : constant := 184614945; -- Restart timer NFB_C_XDI_MODE : constant := 184614946; -- DTE Mode NFB_C_XDI_ITT : constant := 184614947; -- Interrupt timer -- NFB_C_XDI_COL : constant := 184680512; -- Collating field NFB_C_XDI_DTE : constant := 184680513; -- DTE address NFB_C_XDI_CHN : constant := 184680514; -- Channels NFB_C_XDI_LIN : constant := 184680515; -- Line NFB_C_XDI_DNT : constant := 184680516; -- Network NFB_C_XDI_CNT : constant := 184680517; -- Counters -- NFB_C_XGI_LCK : constant := 167772161; -- Set if conditionally writable fields are not writable -- NFB_C_XGI_GNM : constant := 167837712; -- Group number NFB_C_XGI_GTY : constant := 167837713; -- Group type -- NFB_C_XGI_COL : constant := 167903296; -- Collating field. This field must be unique across -- all entries in this database. It consists of the -- group-name string followed by the DTE address. NFB_C_XGI_GRP : constant := 167903297; -- Group name NFB_C_XGI_GDT : constant := 167903298; -- Group DTE address NFB_C_XGI_GNT : constant := 167903299; -- Group Network -- NFB_C_XS5_LCK : constant := 201326593; -- Set if conditionally writable fields are not writable -- NFB_C_XS5_MCI : constant := 201392144; -- Maximum circuits allowed NFB_C_XS5_STA : constant := 201392145; -- State NFB_C_XS5_ACI : constant := 201392146; -- Active circuits NFB_C_XS5_CTM : constant := 201392147; -- Counter timer -- NFB_C_XS5_COL : constant := 201457728; -- Collating field. This field must be unique across -- all entries in this database. NFB_C_XS5_CNT : constant := 201457729; -- Counters -- NFB_C_XD5_LCK : constant := 218103809; -- Set if conditionally writable fields are not writable -- NFB_C_XD5_PRI : constant := 218169360; -- Priority NFB_C_XD5_SAD : constant := 218169361; -- Subaddress range -- (lower word = lower limit, upper word = upper limit) NFB_C_XD5_NOD : constant := 218169362; -- Remote node address containing server (gateways only) NFB_C_XD5_RED : constant := 218169363; -- Redirect reason -- NFB_C_XD5_COL : constant := 218234944; -- Collating field. This field must be unique across -- all entries in this database. NFB_C_XD5_DST : constant := 218234945; -- Destination DTE address NFB_C_XD5_CMK : constant := 218234946; -- Call mask NFB_C_XD5_CVL : constant := 218234947; -- Call value NFB_C_XD5_GRP : constant := 218234948; -- Group name NFB_C_XD5_SDTE : constant := 218234949; -- Sending DTE address (formally number) NFB_C_XD5_OBJ : constant := 218234950; -- && Object name NFB_C_XD5_FIL : constant := 218234951; -- Command procedure to execute when starting object NFB_C_XD5_USR : constant := 218234952; -- User name NFB_C_XD5_PSW : constant := 218234953; -- Password NFB_C_XD5_ACC : constant := 218234954; -- Account NFB_C_XD5_CDTE : constant := 218234955; -- Called DTE NFB_C_XD5_RDTE : constant := 218234956; -- Receiving DTE NFB_C_XD5_NET : constant := 218234957; -- Network NFB_C_XD5_EMK : constant := 218234958; -- Extension mask NFB_C_XD5_EVL : constant := 218234959; -- Extension value NFB_C_XD5_ACL : constant := 218234960; -- ACL, a list of ACE'structure, parto of ORB NFB_C_XD5_IDTE : constant := 218234961; -- Incoming address -- NFB_C_XS9_LCK : constant := 234881025; -- Set if conditionally writable fields are not writable -- NFB_C_XS9_MCI : constant := 234946576; -- Maximum circuits allowed NFB_C_XS9_STA : constant := 234946577; -- State NFB_C_XS9_ACI : constant := 234946578; -- Active circuits NFB_C_XS9_CTM : constant := 234946579; -- Counter timer -- NFB_C_XS9_COL : constant := 235012160; -- Collating field. This field must be unique across -- all entries in this database. NFB_C_XS9_CNT : constant := 235012161; -- Counters -- NFB_C_XD9_LCK : constant := 251658241; -- Set if conditionally writable fields are not writable -- NFB_C_XD9_PRI : constant := 251723792; -- Priority NFB_C_XD9_SAD : constant := 251723793; -- Subaddress range -- (lower word = lower limit, upper word = upper limit) NFB_C_XD9_NOD : constant := 251723794; -- Remote node address containing server (gateways only) NFB_C_XD9_RED : constant := 251723795; -- Redirect reason -- NFB_C_XD9_COL : constant := 251789376; -- Collating field. This field must be unique across -- all entries in this database. NFB_C_XD9_DST : constant := 251789377; -- Destination DTE address NFB_C_XD9_CMK : constant := 251789378; -- Call mask NFB_C_XD9_CVL : constant := 251789379; -- Call value NFB_C_XD9_GRP : constant := 251789380; -- Group name NFB_C_XD9_SDTE : constant := 251789381; -- Sending DTE NFB_C_XD9_OBJ : constant := 251789382; -- && Object name NFB_C_XD9_FIL : constant := 251789383; -- Command procedure to execute when starting object NFB_C_XD9_USR : constant := 251789384; -- User name NFB_C_XD9_PSW : constant := 251789385; -- Password NFB_C_XD9_ACC : constant := 251789386; -- Account NFB_C_XD9_CDTE : constant := 251789387; -- Caller DTE NFB_C_XD9_RDTE : constant := 251789388; -- Receiving DTE NFB_C_XD9_NET : constant := 251789389; -- Network NFB_C_XD9_EMK : constant := 251789390; -- Extension mask NFB_C_XD9_EVL : constant := 251789391; -- Extension value NFB_C_XD9_ACL : constant := 251789392; -- ACL, a list of ACE'structure, parto of ORB NFB_C_XD9_IDTE : constant := 251789393; -- Incoming address -- NFB_C_XTI_LCK : constant := 268435457; -- Set if conditionally writable fields are not writable -- NFB_C_XTI_STA : constant := 268501008; -- State NFB_C_XTI_BFZ : constant := 268501009; -- Buffer size NFB_C_XTI_CPL : constant := 268501010; -- Capture limit NFB_C_XTI_MBK : constant := 268501011; -- Maximum blocks/file NFB_C_XTI_MBF : constant := 268501012; -- Maximum number of buffers NFB_C_XTI_MVR : constant := 268501013; -- Maximum trace file version number -- NFB_C_XTI_COL : constant := 268566592; -- Collating field. This field must be unique across -- all entries in this database. NFB_C_XTI_FNM : constant := 268566593; -- Trace file name -- NFB_C_XTT_LCK : constant := 285212673; -- Set if conditionally writable fields are not writable -- NFB_C_XTT_TST : constant := 285278224; -- State NFB_C_XTT_CPS : constant := 285278225; -- Capture size -- NFB_C_XTT_COL : constant := 285343808; -- Collating field. This field must be unique across -- all entries in this database. NFB_C_XTT_TPT : constant := 285343809; -- Tracepoint name -- NFB_C_XAI_LCK : constant := 452984833; -- Set if conditionally writable fields are not writable -- NFB_C_XAI_NDA : constant := 453050384; -- Node address -- NFB_C_XAI_COL : constant := 453115968; -- Collating field NFB_C_XAI_NET : constant := 453115969; -- Network NFB_C_XAI_USR : constant := 453115970; -- User id NFB_C_XAI_PSW : constant := 453115971; -- Password NFB_C_XAI_ACC : constant := 453115972; -- Account NFB_C_XAI_NOD : constant := 453115973; -- Node id -- NFB_C_XDTE_LCK : constant := 352321537; -- Set if conditionally writable fields are not writable -- C(,$C_XDTE_,(((NFB$C_DB_XDTE@24)+(NFB$C_TYP_LNG@16)+16)),1 NFB_C_XDTE_COL : constant := 352452672; -- Collating field NFB_C_XDTE_NET : constant := 352452673; -- Network NFB_C_XDTE_DTE : constant := 352452674; -- DTE address NFB_C_XDTE_ID : constant := 352452675; -- ID list, ARB rights list NFB_C_XDTE_ACL : constant := 352452676; -- ACL, a list of ACE's, part of ORB -- NFB_C_SPI_LCK : constant := 301989889; -- Set if conditionally writable fields are not writable NFB_C_SPI_PRL : constant := 301989890; -- Proxy flag which initially started server process -- NFB_C_SPI_PID : constant := 302055440; -- Server PID NFB_C_SPI_IRP : constant := 302055441; -- IRP of waiting DECLSERV QIO (0 if process active) NFB_C_SPI_CHN : constant := 302055442; -- Channel associated with DECLSERV IRP NFB_C_SPI_RNA : constant := 302055443; -- Remote node address which initially started server -- NFB_C_SPI_COL : constant := 302121024; -- Collating field NFB_C_SPI_ACS : constant := 302121025; -- ACS used to initally start server process NFB_C_SPI_RID : constant := 302121026; -- Remote user ID which initially started server NFB_C_SPI_SFI : constant := 302121027; -- Last (current) SFI given to server process NFB_C_SPI_NCB : constant := 302121028; -- Last (current) NCB given to server process NFB_C_SPI_PNM : constant := 302121029; -- Last (current) process name given to server -- NFB_C_AJI_LCK : constant := 318767105; -- Set if conditionally writable fields are not writable NFB_C_AJI_REA : constant := 318767106; -- Reachable (set if two-way communication established) NFB_C_AJI_RRA : constant := 318767107; -- Reachable Routing Adjacency -- NFB_C_AJI_ADD : constant := 318832656; -- Node address NFB_C_AJI_TYP : constant := 318832657; -- Node type NFB_C_AJI_LIT : constant := 318832658; -- Listen timer for this adjacency NFB_C_AJI_BLO : constant := 318832659; -- Partner's block size NFB_C_AJI_RPR : constant := 318832660; -- Partner's router priority (on NI) -- NFB_C_AJI_COL : constant := 318898240; -- Collating field NFB_C_AJI_NNA : constant := 318898241; -- Node name NFB_C_AJI_CIR : constant := 318898242; -- Circuit name -- NFB_C_SDI_LCK : constant := 436207617; -- Set if conditionally writable fields are not writable -- NFB_C_SDI_SUB : constant := 436273168; -- Service substate NFB_C_SDI_PID : constant := 436273169; -- PID of process owning this DLE link -- NFB_C_SDI_COL : constant := 436338752; -- Collating field NFB_C_SDI_CIR : constant := 436338753; -- Circuit name NFB_C_SDI_PHA : constant := 436338754; -- Service physical address (BC only) NFB_C_SDI_PRC : constant := 436338755; -- Name of process owning this DLE link -- NFB_C_ARI_LCK : constant := 335544321; -- Set if conditionally writable fields are not writable NFB_C_ARI_REA : constant := 335544322; -- Set if node is reachable -- NFB_C_ARI_ADD : constant := 335609872; -- Address NFB_C_ARI_DCO : constant := 335609873; -- Destination Cost NFB_C_ARI_DHO : constant := 335609874; -- Destination Hops NFB_C_ARI_NND : constant := 335609875; -- Next node address -- NFB_C_ARI_COL : constant := 335675456; -- Collating field NFB_C_ARI_DLI : constant := 335675457; -- Circuit used for normal traffic to area -- NFB_C_PROXY_LCK : constant := 469762049; -- Set if conditionally writable fields are not writable -- NFB_C_PROXY_RUIC : constant := 469827600; -- Remote UIC -- NFB_C_PROXY_RNODE : constant := 469893184; -- Remote node NFB_C_PROXY_RNAME : constant := 469893185; -- Remote user name NFB_C_PROXY_DEFACCOUNT : constant := 469893186; -- Default local proxy account NFB_C_PROXY_ACCOUNT1 : constant := 469893187; -- Local proxy account NFB_C_PROXY_ACCOUNT2 : constant := 469893188; -- Local proxy account NFB_C_PROXY_ACCOUNT3 : constant := 469893189; -- Local proxy account NFB_C_PROXY_ACCOUNT4 : constant := 469893190; -- Local proxy account NFB_C_PROXY_ACCOUNT5 : constant := 469893191; -- Local proxy account NFB_C_PROXY_ACCOUNT6 : constant := 469893192; -- Local proxy account NFB_C_PROXY_ACCOUNT7 : constant := 469893193; -- Local proxy account NFB_C_PROXY_ACCOUNT8 : constant := 469893194; -- Local proxy account NFB_C_PROXY_ACCOUNT9 : constant := 469893195; -- Local proxy account NFB_C_PROXY_ACCOUNT10 : constant := 469893196; -- Local proxy account NFB_C_PROXY_ACCOUNT11 : constant := 469893197; -- Local proxy account NFB_C_PROXY_ACCOUNT12 : constant := 469893198; -- Local proxy account NFB_C_PROXY_ACCOUNT13 : constant := 469893199; -- Local proxy account NFB_C_PROXY_ACCOUNT14 : constant := 469893200; -- Local proxy account NFB_C_PROXY_ACCOUNT15 : constant := 469893201; -- Local proxy account NFB_C_PROXY_HASHKEY : constant := 469893202; -- Hash key lookup string NFB_C_PROXY_COL : constant := 469893184; -- Collating field NFB_C_PROXY_MAXACC : constant := 15; -- Maximum numver of local proxy accounts -- including the default NFB_S_NFBDEF4 : constant := 2; -- old size name - synonym type NFB_STR_COUNT_TYPE is -- String count field record FILLER_1 : UNSIGNED_BYTE_ARRAY (1 .. 2); STR_TEXT : STRING(1 .. 0); -- Start of string data -- -- Define identifiers for each parameter in all database -- -- ** The low order 16 bits for each parameter must be unique ** -- *** with respect to all other parameters in its particular *** -- ** database. ** -- -- Define a field identifier index for each parameter in the NDI database. -- -- -- Boolean parameters -- -- "Longword" Parameters -- -- String parameters -- -- Define a field identifier index for each parameter in the LNI database. -- -- -- Boolean parameters -- -- "Longword parameters -- -- String parameters -- -- Define a field identifier index for each parameter in the OBI database. -- -- -- Boolean Parameters -- -- Longword Parameters -- -- String Parameters -- -- Define a field identifier index for each parameter in the CRI database. -- -- -- /* Use -- /* ---- -- C = common -- E = Executor (used by Transport) -- X = Native X.25 network management -- D = DECnet (not X.25) -- -- -- Boolean Parameters -- -- -- "Longword" parameters -- -- String Parameters -- -- Define a field identifier index for each parameter in the PLI database. -- -- C = common -- L = LAPB (X.25) -- D = DDCMP (not X.25) -- E = Ethernet -- F = FDDI -- T = Token Ring -- -- /* Use -- ---- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- Define a field identifier index for each parameter in the EFI database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- Define a field identifier index for each parameter in the ESI database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- Define a field identifier index for each parameter in the LLI database. -- -- -- Boolean Parameters -- -- Longword Parameters -- -- String Parameters -- -- X.25 network parameters (part of MODULE X25-PROTOCOL) -- -- Define a field identifier index for each parameter in the XNI database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- X.25 DTE parameters (qualified by a given network) -- -- Define a field identifier index for each parameter in the XDI database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- X.25 group parameters (qualified by a given DTE) -- -- Define a field identifier index for each parameter in the XGI database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- X.25 server parameters (global parameters for all destinations) -- -- Define a field identifier index for each parameter in the XS5 database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- X.25 destination parameters (part of MODULE X25-SERVER) -- -- Define a field identifier index for each parameter in the XD5 database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- X.29 server parameters (global parameters for all destinations) -- -- Define a field identifier index for each parameter in the XS9 database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- X.29 destination parameters (part of MODULE X29-SERVER) -- -- Define a field identifier index for each parameter in the XD9 database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- X.25 tracing facility (global) parameters. -- -- Define a field identifier index for each parameter in the XTI database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- X.25 tracpoint (local) parameters. -- -- Define a field identifier index for each parameter in the XTT database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- X.25 Access (qualified by a given network) -- -- Define a field identifier index for each parameter in the XAI database. -- -- -- Boolean Parameters -- -- "Longword" Parameters -- -- String Parameters -- -- X.25 Security (qualified by a given network) -- -- Define a field identifier index for each parameter in the XDTE database. -- -- -- Boolean Parameters -- -- -- "Longword" Parameters -- -- ) -- -- String Parameters -- -- Define SPI (Server Process) parameters -- -- -- Boolean Parameters -- -- Longword Parameters -- -- String Parameters -- -- Define AJI (Adjacency) parameters -- -- -- Boolean Parameters -- -- Longword Parameters -- -- String Parameters -- -- Define SDI (Service DLE) parameters -- -- -- Boolean Parameters -- -- Longword Parameters -- -- String Parameters -- -- Define the AREA database (read only) for level 2 Phase IV routers only. -- -- -- Boolean parameters -- -- "Longword" Parameters -- -- String parameters -- -- Define the PROXY database -- -- -- Boolean parameters -- -- "Longword" Parameters -- -- String parameters -- end record; for NFB_STR_COUNT_TYPE use record FILLER_1 at 0 range 0 .. 15; STR_TEXT at 2 range 0 .. -1; end record; for NFB_STR_COUNT_TYPE'SIZE use 16; NFB_STR_COUNT_TYPE_INIT : constant NFB_STR_COUNT_TYPE := (FILLER_1 => (others => 0), STR_TEXT => (others => ASCII.NUL)); type NFB4_TYPE is record STR_COUNT : NFB_STR_COUNT_TYPE; -- String count field end record; for NFB4_TYPE use record STR_COUNT at 0 range 0 .. 15; end record; for NFB4_TYPE'SIZE use 16; NFB4_TYPE_INIT : constant NFB4_TYPE := ( STR_COUNT => NFB_STR_COUNT_TYPE_INIT ); -- module $DRDEF -- -- DISCONNECT REASONS -- NET_C_DR_NORMAL : constant := 0; -- NO ERROR (SYNCH DISCONNECT) NET_C_DR_RSU : constant := 1; -- COULDN'T ALLOCATE UCB ADDRESS NET_C_DR_NONODE : constant := 2; -- Unrecognized node name NET_C_DR_SHUT : constant := 3; -- NODE OR LINE SHUTTING DOWN NET_C_DR_NOBJ : constant := 4; -- UNKNOWN OBJECT TYPE OR PROCESS NET_C_DR_FMT : constant := 5; -- ILLEGAL PROCESS NAME FIELD NET_C_DR_BUSY : constant := 6; -- Object too busy NET_C_DR_PROTCL : constant := 7; -- GENERAL PROTOCOL ERROR NET_C_DR_THIRD : constant := 8; -- THIRD PARTY DISCONNECT NET_C_DR_ABORT : constant := 9; -- DISCONNECT ABORT NET_C_DR_IVNODE : constant := 2; -- Invalid node name format NET_C_DR_NONZ : constant := 21; -- NON-ZERO DST ADDRESS NET_C_DR_BADLNK : constant := 22; -- INCONSISTENT DSTLNK NET_C_DR_ZERO : constant := 23; -- ZERO SOURCE ADDRESS NET_C_DR_BADFC : constant := 24; -- FCVAL ILLEGAL NET_C_DR_NOCON : constant := 32; -- NO CONNECT SLOTS AVAILABLE NET_C_DR_ACCESS : constant := 34; -- INVALID ACCESS CONTROL NET_C_DR_BADSRV : constant := 35; -- LOGICAL LINK SERVICES MISMATCH NET_C_DR_ACCNT : constant := 36; -- INVALID ACCOUNT INFORMATION NET_C_DR_SEGSIZ : constant := 37; -- SEGSIZE TOO SMALL NET_C_DR_EXIT : constant := 38; -- USER EXIT OR TIMEOUT NET_C_DR_NOPATH : constant := 39; -- NO PATH TO DESTINATION NODE NET_C_DR_LOSS : constant := 40; -- LOSS OF DATA HAS OCCURRED NET_C_DR_NOLINK : constant := 41; -- ILLEGAL MSG FOR LINK NOLINK STATE NET_C_DR_CONF : constant := 42; -- REAL DISCONNECT CONFIRM NET_C_DR_IMLONG : constant := 43; -- IMAGE DATA FIELD TOO LONG NET_C_DR_MISLSCV : constant := 50; -- MISSING CRYPTOGRAPHIC KEY NET_C_DR_EXPSCV : constant := 51; -- EXPIRED CRYPTOGRAPHIC KEY NET_C_DR_MACFAIL : constant := 53; -- INTEGRITY CHECK FAILED NET_C_DR_SRVMMAT : constant := 54; -- CRYPTOGRAPHIC SERVICE MISMATCH NET_C_DR_VERFAIL : constant := 55; -- CRYPTOGRAPHIC CONNECT VERIFICATION FAILURE NET_C_DR_CSWRAP : constant := 56; -- CRYPTOGRAPHIC SEQUENCE SPACE EXHAUSED -- The following two are NOT valid disconnect reason codes. They are -- used locally. These were previously hardcoded in NETDRVSES. NET_C_DR_INVALID : constant := 100; -- Link is IO$_DEACCESS'ed NET_C_DR_DEACC : constant := 102; -- Reason field never setup end NETUSR;