Trailing-Edge
-
PDP-10 Archives
-
BB-P363B-SM_1985
-
mcb/drivers/dcpdat.lst
There are no other files named dcpdat.lst in the archive.
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 1
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (1)
; 0001 ! [Beginning of DCPDAT]
; 0002 !
; 0003 !
; 0004 ! COPYRIGHT (c) 1980, 1981, 1982
; 0005 ! DIGITAL EQUIPMENT CORPORATION
; 0006 ! Maynard, Massachusetts
; 0007 !
; 0008 ! This software is furnished under a license and may be used
; 0009 ! and copied only in accordance with the terms of such license
; 0010 ! and with the inclusion of the above copyright notice. This
; 0011 ! software or any other copies thereof may not be provided or
; 0012 ! otherwise made available to any other person. No title to
; 0013 ! and ownership of the software is hereby transferred.
; 0014 !
; 0015 ! The information in this software is subject to change
; 0016 ! without notice and should not be construed as a commitment
; 0017 ! by DIGITAL EQUIPMENT CORPORATION.
; 0018 !
; 0019 ! DIGITAL assumes no responsibility for the use or reliability
; 0020 ! of its software on equipment which is not supplied by
; 0021 ! DIGITAL.
; 0022 !
; 0023
; 0024 !++
; 0025 !
; 0026 ! FACILITY: MCB DDCMP Process
; 0027 !
; 0028 ! ABSTRACT:
; 0029 !
; 0030 ! This contains the data structure definitions for the DDCMP processor.
; 0031 !
; 0032 ! ENVIRONMENT: MCB V3.0
; 0033 !
; 0034 ! AUTHOR: Alan D. Peckham CREATION DATE: 5-Apr-81
; 0035 !
; 0036 ! MODIFIED BY:
; 0037 !
; 0038 ! Alan D. Peckham, 5-Apr-81: Version 1
; 0039 ! 01 - Rewrite from MACRO-11 to BLISS.
; 0040 ! 02 - Add cost entry.
; 0041 ! 03 - Add seconds-since-last-zeroed support for lines.
; 0042 !--
; 0043
; 0044 %if not %declared (XPO$K_VERSION) %then library 'XPORT'; %fi
; 0045
; 0046 %if not %declared (MCB$K_VERSION) %then library 'MCBLIB'; %fi
; 0047
; 0048 library 'NMXLIB';
; 0049
; 0050 $SHOW (FIELDS) $SHOW (LITERALS)
; 0051
; 0052 !
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 2
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (1)
; 0053 ! Synonyms for global routine names
; 0054 !
; 0055
; 0056 macro
; 0057 PARAMETER_CIRCUIT_COUNTERS = CKCTRS %,
; 0058 PARAMETER_CIRCUIT_LINE = CP1110 %,
; 0059 PARAMETER_LINE_COUNTERS = LNCTRS %,
; 0060 PARAMETER_LINE_DEVICE = LP1000 %,
; 0061 SET_DEVICE = SETDEV %,
; 0062 SET_LINK = SETLNK %;
; 0063
; 0064 !
; 0065 ! Status Codes:
; 0066 !
; 0067
; 0068 DECLARE_SEVERITY (DCP, INFO, WARNING, SEVERE);
; 0069
; 0070 $DCP_INFO (DCP$_EVT, 'Network Event')
; 0071 $DCP_SEVERE (DCP$_LIB, 'Cannot find library process')
; 0072 $DCP_SEVERE (DCP$_STA, 'No current station')
; 0073 $DCP_SEVERE (DCP$_AST, 'Cannot handle AST from DDM')
; 0074 $DCP_INFO (DCP$_LOG, 'Event logging buffer overflow')
; 0075
; 0076 !
; 0077 !
; 0078 !
; 0079
; 0080 literal
; 0081 DCP_K_LINE_PROVIDER = 0^1,
; 0082 DCP_K_LINE_OWNER = 1^1,
; 0083 DCP_K_CIRCUIT_PROVIDER = 2^1,
; 0084 DCP_K_NMID_HIGH = 2^1;
; 0085
; 0086 !
; 0087 ! Data base creation items
; 0088 !
; 0089
; 0090 macro
; M 0091 $SKIP_FIELD [] =
; 0092 %bliss36 [%bliss32 [%remaining]] %,
; M 0093 $ALIGN_SIGN =
; M 0094 %assign ($xpo$fill_index, $xpo$fill_index + 1)
; M 0095 %assign ($xpo$fill_temp, 7 - ($xpo$bit_index mod 8))
; 0096 %if $xpo$fill_temp neq 0 %then $SKIP_FIELD ($BITS ($xpo$fill_temp)) %fi %,
; M 0097 $SIGN_BIT =
; 0098 $XPO$FIELD (1, 1, 0) %;
; 0099
; 0100 compiletime
; 0101 $xpo$fill_index = 0,
; 0102 $xpo$fill_temp = 0;
; 0103
; 0104 $FIELD
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 3
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (1)
; 0105 !
; 0106 ! List head definition
; 0107 !
; L 0108 LIST_FIRST = [$ADDRESS],
; %PRINT: [0,0,16,0] (+%O'0')
; L 0109 LIST_LAST = [$ADDRESS];
; %PRINT: [1,0,16,0] (+%O'2')
; 0110
; 0111 compiletime
; L 0112 $dcp$length = $FIELD_SET_SIZE;
; %PRINT: 2 fullwords
; 0113
; 0114 macro
; M 0115 $LIST_HEAD =
; 0116 $SUB_BLOCK (%expand %number ($dcp$length)) %;
; 0117
; 0118 $FIELD
; 0119 !
; 0120 ! Physical 18 bit address
; 0121 !
; L 0122 PHYSICAL_HIGH = [$BITS (16)],
; %PRINT: [0,0,16,0] (+%O'0')
; L 0123 PHYSICAL_LOW = [$BITS (16)];
; %PRINT: [1,0,16,0] (+%O'2')
; 0124
; L 0125 %assign ($dcp$length, $FIELD_SET_SIZE)
; %PRINT: 2 fullwords
; 0126
; 0127 macro
; M 0128 $BIAS =
; 0129 $SHORT_INTEGER %,
; M 0130 $PHYSICAL_ADDRESS =
; 0131 $SUB_BLOCK (%expand %number ($dcp$length)) %,
; M 0132 $SYNCH_BLOCK =
; 0133 $SUB_BLOCK (3) %;
; 0134
; 0135 undeclare
; 0136 $dcp$length;
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 4
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (2)
; 0137 !
; 0138 ! DDCMP header definitions
; 0139 !
; 0140 $FIELD
; 0141 HDR_FIELDS =
; 0142 set
; L 0143 H_IDENTIFIER = [$BYTE],
; %PRINT: [0,0,8,0] (+%O'0')
; L 0144 H_COUNT_LOW = [$BYTE],
; %PRINT: [0,8,8,0] (+%O'1')
; L 0145 H_COUNT_HIGH = [$BITS (6)],
; %PRINT: [1,0,6,0] (+%O'2')
; L 0146 H_QSYNC = [$BIT],
; %PRINT: [1,6,1,0] (+%O'2')
; L 0147 H_SELECT = [$BIT],
; %PRINT: [1,7,1,0] (+%O'2')
; L 0148 H_RESP = [$BYTE],
; %PRINT: [1,8,8,0] (+%O'3')
; L 0149 H_NUM = [$BYTE],
; %PRINT: [2,0,8,0] (+%O'4')
; L 0150 H_ADDR = [$BYTE],
; %PRINT: [2,8,8,0] (+%O'5')
; 0151 $OVERLAY (H_COUNT_LOW)
; L 0152 H_TYPE = [$BYTE],
; %PRINT: [0,8,8,0] (+%O'1')
; L 0153 H_SUBTYPE = [$BYTE]
; %PRINT: [1,0,8,0] (+%O'2')
; 0154 $CONTINUE
; 0155 tes;
; 0156
; 0157 literal
; L 0158 H_LENGTH = $FIELD_SET_SIZE;
; %PRINT: 3 fullwords
; 0159
; 0160 literal
; 0161 CM_ENQ = %o'005', ! ENQUIRE (control message)
; 0162 CM_SOH = %o'201', ! START OF HEADER (data message)
; 0163 CM_DLE = %o'220', ! DATA LINK ESCAPE (boot message)
; 0164 CM_SYN = %o'226'; ! SYNCHRONIZE
; 0165 !
; 0166 ! Control message types
; 0167 !
; 0168 literal
; 0169 MT_ACK = 1, ! ACKNOWLEDGE
; 0170 MT_NAK = 2, ! NEGATIVE ACKNOWLEDGE
; 0171 MT_REP = 3, ! REPLY
; 0172 MT_STR = 6, ! START
; 0173 MT_STK = 7, ! START ACKNOWLEDGE
; 0174 MT_LOW = min (MT_ACK, MT_NAK, MT_REP, MT_STR, MT_STK),
; 0175 MT_HIGH = max (MT_ACK, MT_NAK, MT_REP, MT_STR, MT_STK);
; 0176 !
; 0177 ! DDCMP defined NAK reason error codes
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 5
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (2)
; 0178 !
; 0179 literal
; 0180 RN_HBC = %o'1', ! Header block check error
; 0181 RN_DBC = %o'2', ! Data block check error
; 0182 RN_REP = %o'3', ! REP response
; 0183 RN_BUF = %o'10', ! Receive buffer allocation error
; 0184 RN_ROV = %o'11', ! Receiver overrun failure
; 0185 RN_MTL = %o'20', ! Received message too long
; 0186 RN_HFE = %o'21'; ! Received header format error
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 6
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (3)
; 0187 !
; 0188 ! DDCMP data bases
; 0189 !
; 0190
; 0191 literal
; 0192 !
; 0193 ! Line Duplex
; 0194 !
; 0195 DL_FULL = 0, ! FULL DUPLEX
; 0196 DL_HALF = 1, ! HALF DUPLEX
; 0197 !
; 0198 ! Line state
; 0199 !
; 0200 DL_ON = 0, ! Line ON
; 0201 DL_OFF = 1, ! Line OFF
; 0202 !
; 0203 ! Protocol type
; 0204 !
; 0205 DP_POINT = 0, ! DDCMP POINT
; 0206 DP_DMC = 4; ! DDCMP DMC
; 0207
; 0208 $FIELD
; 0209 D_FIELDS =
; 0210 set
; L 0211 D_TIM = [$BYTE], ! Timer byte
; %PRINT: [0,0,8,0] (+%O'0')
; L 0212 S_FLAGS_1 = [$BYTE],
; %PRINT: [0,8,8,0] (+%O'1')
; 0213 $OVERLAY (S_FLAGS_1)
; L 0214 LS_RESYNCH_IN_PROGRESS = [$BIT], ! Set if station is in resync state
; %PRINT: [0,8,1,0] (+%O'1')
; L 0215 SS_START_REP_TIMER = [$BIT], ! Reply timer requested
; %PRINT: [0,9,1,0] (+%O'1')
; L 0216 SS_RETRANSMIT = [$BIT], ! Retransmission requested
; %PRINT: [0,10,1,0] (+%O'1')
; L 0217 SS_TIMING_REP = [$BIT], ! Reply timer active
; %PRINT: [0,11,1,0] (+%O'1')
; L 0218 SS_HALF_DUPLEX = [$BIT],
; %PRINT: [0,12,1,0] (+%O'1')
; L 0219 $ALIGN_SIGN
; %PRINT: [0,13,2,0] (+%O'1')
; L 0220 LS_STATION_ENABLED = [$SIGN_BIT], ! Set if station enabled
; %PRINT: [0,15,1,1] (+%O'1')
; 0221 $CONTINUE
; L 0222 S_PROTOCOL_STATE = [$TINY_INTEGER],
; %PRINT: [1,0,8,1] (+%O'2')
; L 0223 S_FLAGS_2 = [$BYTE],
; %PRINT: [1,8,8,0] (+%O'3')
; 0224 $OVERLAY (S_FLAGS_2)
; L 0225 SS_SEND_STACK = [$BIT], ! Set if send STACK message
; %PRINT: [1,8,1,0] (+%O'3')
; L 0226 SS_SEND_START = [$BIT], ! Set if send START message
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 7
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (3)
; %PRINT: [1,9,1,0] (+%O'3')
; L 0227 SS_SEND_NAK = [$BIT], ! Set if send NAK message
; %PRINT: [1,10,1,0] (+%O'3')
; L 0228 SS_SEND_REP = [$BIT], ! Set if send REP message
; %PRINT: [1,11,1,0] (+%O'3')
; L 0229 SS_SEND_ACK = [$BIT], ! Set if send ACK message
; %PRINT: [1,12,1,0] (+%O'3')
; L 0230 SS_SEND_SELECT = [$BIT], ! Set if send SELECT on this message
; %PRINT: [1,13,1,0] (+%O'3')
; 0231 $CONTINUE
; L 0232 D_REPORTED_STATE = [$TINY_INTEGER],
; %PRINT: [2,0,8,1] (+%O'4')
; L 0233 S_FLAGS_3 = [$BYTE],
; %PRINT: [2,8,8,0] (+%O'5')
; 0234 $OVERLAY (S_FLAGS_3)
; L 0235 SS_NOTIFY_OFF = [$BIT],
; %PRINT: [2,8,1,0] (+%O'5')
; L 0236 SS_NOTIFY_STATE = [$BIT],
; %PRINT: [2,9,1,0] (+%O'5')
; L 0237 SS_ACTIVE = [$BIT], ! Station has been started
; %PRINT: [2,10,1,0] (+%O'5')
; L 0238 SS_DEVICE_BEING_SET = [$BIT],
; %PRINT: [2,11,1,0] (+%O'5')
; L 0239 $ALIGN_SIGN
; %PRINT: [2,12,3,0] (+%O'5')
; L 0240 SS_DEVICE_RUNNING = [$SIGN_BIT],
; %PRINT: [2,15,1,1] (+%O'5')
; 0241 $CONTINUE
; L 0242 S_REQUESTED_STATE = [$TINY_INTEGER],
; %PRINT: [3,0,8,1] (+%O'6')
; L 0243 D_CONTROL_FLAGS = [$TINY_INTEGER],
; %PRINT: [3,8,8,1] (+%O'7')
; 0244 $OVERLAY (D_CONTROL_FLAGS)
; L 0245 DC_SHUT_DOWN = [$BIT], ! Station being shut down
; %PRINT: [3,8,1,0] (+%O'7')
; L 0246 DC_STOP_DEVICE = [$BIT],
; %PRINT: [3,9,1,0] (+%O'7')
; L 0247 DC_START_DEVICE = [$BIT],
; %PRINT: [3,10,1,0] (+%O'7')
; L 0248 DC_SET_REQUESTED_STATE = [$BIT],
; %PRINT: [3,11,1,0] (+%O'7')
; 0249 $CONTINUE
; L 0250 L_PROTOCOL = [$BYTE],
; %PRINT: [4,0,8,0] (+%O'10')
; 0251 ! Line parameter 1001:
; 0252 ! 0 = DDCMP POINT
; 0253 ! 1 = DDCMP CONTROL
; 0254 ! 2 = DDCMP TRIBUTARY
; 0255 ! 4 = DDCMP DMC
; L 0256 L_CONTROLLER = [$BYTE],
; %PRINT: [4,8,8,0] (+%O'11')
; 0257 ! Line parameter 1110:
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 8
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (3)
; 0258 ! 0 = NORMAL
; 0259 ! 1 = LOOPBACK
; L 0260 L_DUPLEX = [$BYTE],
; %PRINT: [5,0,8,0] (+%O'12')
; 0261 ! Line parameter 1005:
; 0262 ! 0 = FULL
; 0263 ! 1 = HALF
; L 0264 L_CLOCK = [$BYTE],
; %PRINT: [5,8,8,0] (+%O'13')
; 0265 ! Line parameter 1111:
; 0266 ! 0 = EXTERNAL
; 0267 ! 1 = INTERNAL
; L 0268 L_LINE_STATE = [$TINY_INTEGER], ! Line parameter 0:
; %PRINT: [6,0,8,1] (+%O'14')
; 0269 ! 0 = ON
; 0270 ! 1 = OFF
; 0271
; 0272 !
; 0273 ! Threshold counters
; 0274 !
; 0275
; L 0276 S_RECEIVE_THRESHOLD = [$TINY_INTEGER],
; %PRINT: [6,8,8,1] (+%O'15')
; L 0277 S_TRANSMIT_THRESHOLD = [$TINY_INTEGER],
; %PRINT: [7,0,8,1] (+%O'16')
; L 0278 S_SELECT_THRESHOLD = [$TINY_INTEGER],
; %PRINT: [7,8,8,1] (+%O'17')
; 0279
; 0280 !
; 0281 ! Data link counters
; 0282 !
; 0283
; L 0284 S_BYTES_RECEIVED = [$COUNTER (32)],
; %PRINT: [8,0,0,1] (+%O'20')
; 0285 ! Multipoint circuit counter 1000
; L 0286 S_BYTES_TRANSMITTED = [$COUNTER (32)],
; %PRINT: [10,0,0,1] (+%O'24')
; 0287 ! Multipoint circuit counter 1001
; L 0288 S_DATA_BLOCKS_RECEIVED = [$COUNTER (32)],
; %PRINT: [12,0,0,1] (+%O'30')
; 0289 ! Multipoint circuit counter 1010
; L 0290 S_DATA_BLOCKS_TRANSMITTED = [$COUNTER (32)],
; %PRINT: [14,0,0,1] (+%O'34')
; 0291 ! Multipoint circuit counter 1011
; L 0292 S_SELECTION_INTERVALS = [$COUNTER (16)],
; %PRINT: [16,0,16,1] (+%O'40')
; 0293 ! Multipoint circuit counter 1050
; L 0294 S_DATA_ERRORS_OUTBOUND = [$COUNTER (8)],
; %PRINT: [17,0,8,1] (+%O'42')
; L 0295 SO_N1 = [$BIT], ! OHBCC - NAK's received
; %PRINT: [17,8,1,0] (+%O'43')
; 0296 ! header block check error
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 9
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (3)
; L 0297 SO_N2 = [$BIT], ! OBDCC - NAK's received
; %PRINT: [17,9,1,0] (+%O'43')
; 0298 ! data block check error
; L 0299 SO_N3 = [$BIT], ! OREP - NAK's received REP response
; %PRINT: [17,10,1,0] (+%O'43')
; 0300 ! Multipoint circuit counter 1021:
; 0301 ! 0 = NAKs received, header block check error
; 0302 ! 1 = NAKs received, data block check error
; 0303 ! 2 = NAKs received, REP response
; 0304 $ALIGN (FULLWORD)
; L 0305 S_DATA_ERRORS_INBOUND = [$COUNTER (8)],
; %PRINT: [18,0,8,1] (+%O'44')
; L 0306 SI_N1 = [$BIT], ! IHBCC - Header block check errors
; %PRINT: [18,8,1,0] (+%O'45')
; L 0307 SI_N2 = [$BIT], ! IDBCC - NAK's sent data block check error
; %PRINT: [18,9,1,0] (+%O'45')
; L 0308 SI_N3 = [$BIT], ! IREP - NAK's sent REP response
; %PRINT: [18,10,1,0] (+%O'45')
; 0309 ! Multipoint circuit counter 1020:
; 0310 ! 0 = NAKs sent, header block check error
; 0311 ! 1 = NAKs sent, data block check error
; 0312 ! 2 = NAKs sent, REP response
; 0313 $ALIGN (FULLWORD)
; L 0314 S_LOCAL_BUFFER_ERRORS = [$COUNTER (8)],
; %PRINT: [19,0,8,1] (+%O'46')
; L 0315 SL_N8 = [$BIT], ! LBTU - NAK's sent
; %PRINT: [19,8,1,0] (+%O'47')
; 0316 ! buffer temporarily unavailable
; L 0317 SL_N16 = [$BIT], ! LBTS - NAK's sent buffer too small
; %PRINT: [19,9,1,0] (+%O'47')
; 0318 ! Multipoint circuit counter 1041:
; 0319 ! 0 = NAKs sent, buffer unavailable
; 0320 ! 1 = NAKs sent, buffer too small
; 0321 $ALIGN (FULLWORD)
; L 0322 S_REMOTE_BUFFER_ERRORS = [$COUNTER (8)],
; %PRINT: [20,0,8,1] (+%O'50')
; L 0323 SR_N8 = [$BIT], ! RBTU - NAK's rcvd
; %PRINT: [20,8,1,0] (+%O'51')
; 0324 ! buffer temporarily unavailable
; L 0325 SR_N16 = [$BIT], ! RBTS - NAK's rcvd buffer too small
; %PRINT: [20,9,1,0] (+%O'51')
; 0326 ! Multipoint circuit counter 1040:
; 0327 ! 0 = NAKs received, buffer unavailable
; 0328 ! 1 = NAKs received, buffer too small
; 0329 $ALIGN (FULLWORD)
; L 0330 S_SELECTION_TIMEOUTS = [$COUNTER (8)],
; %PRINT: [21,0,8,1] (+%O'52')
; L 0331 SS_NRT = [$BIT], ! NRTS - No reply timeout
; %PRINT: [21,8,1,0] (+%O'53')
; L 0332 SS_IRT = [$BIT], ! IRTS - Incomplete reply timeout
; %PRINT: [21,9,1,0] (+%O'53')
; 0333 ! Multipoint circuit counter 1051:
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 10
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (3)
; 0334 ! 0 = no reply to select
; 0335 ! 1 = incomplete reply to select
; 0336 $ALIGN (FULLWORD)
; L 0337 S_LOCAL_REPLY_TIMEOUTS = [$COUNTER (8)],
; %PRINT: [22,0,8,1] (+%O'54')
; 0338 ! Multipoint circuit counter 1031
; L 0339 S_REMOTE_REPLY_TIMEOUTS = [$COUNTER (8)],
; %PRINT: [22,8,8,1] (+%O'55')
; 0340 ! Multipoint circuit counter 1030
; 0341 !
; 0342 ! Station counters
; 0343 !
; L 0344 L_TIME_LINE_ZEROED = [$TIME], ! Line counter 0:
; %PRINT: [23,0,0,1] (+%O'56')
; 0345 ! time since last zeroed
; L 0346 L_REMOTE_STATION_ERRORS = [$COUNTER (8)],
; %PRINT: [25,0,8,1] (+%O'62')
; L 0347 LR_N9 = [$BIT], ! ROVRN - NAK's received receive overrun
; %PRINT: [25,8,1,0] (+%O'63')
; L 0348 LR_N17 = [$BIT], ! RMHFE - NAK's sent message header format error
; %PRINT: [25,9,1,0] (+%O'63')
; L 0349 LR_SEL = [$BIT], ! RSEL - Selection address error
; %PRINT: [25,10,1,0] (+%O'63')
; L 0350 LR_BAB = [$BIT], ! RSTR - Babbling tributaries
; %PRINT: [25,11,1,0] (+%O'63')
; 0351 ! Line counter 1100:
; 0352 ! 0 = NAKs received, receive overrun
; 0353 ! 1 = NAKs sent, header format error
; 0354 ! 2 = selection address errors
; 0355 ! 3 = streaming tributaries
; 0356 $ALIGN (FULLWORD)
; L 0357 L_LOCAL_STATION_ERRORS = [$COUNTER (8)],
; %PRINT: [26,0,8,1] (+%O'64')
; L 0358 LL_N9 = [$BIT], ! LOVRN - NAK's sent receive overrun
; %PRINT: [26,8,1,0] (+%O'65')
; L 0359 LL_NNS = [$BIT], ! LOVR - Receive overruns, NAK not sent
; %PRINT: [26,9,1,0] (+%O'65')
; L 0360 LL_XMT = [$BIT], ! LUNDR - Transmit underruns
; %PRINT: [26,10,1,0] (+%O'65')
; L 0361 LL_N17 = [$BIT], ! LMHFE - NAK's received
; %PRINT: [26,11,1,0] (+%O'65')
; 0362 ! Line counter 1101:
; 0363 ! 0 = NAKs sent, receive overrun
; 0364 ! 1 = receive overruns, NAK not sent
; 0365 ! 2 = transmit underruns
; 0366 ! 3 = NAKs received, header format error
; 0367 $ALIGN (FULLWORD)
; L 0368 L_HEADER_BCC_ERRORS = [$COUNTER (8)], ! Header block check errors
; %PRINT: [27,0,8,1] (+%O'66')
; L 0369 L_MAINTENANCE_BCC_ERRORS = [$COUNTER (8)], ! Maintenance data block check errors
; %PRINT: [27,8,8,1] (+%O'67')
; L 0370 S_R = [$BYTE], ! No. of last message received
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 11
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (3)
; %PRINT: [28,0,8,0] (+%O'70')
; L 0371 S_TM1 = [$BYTE], ! No. of last message queued to transmitter
; %PRINT: [28,8,8,0] (+%O'71')
; L 0372 S_X = [$BYTE], ! No. of last message returned from transmitter
; %PRINT: [29,0,8,0] (+%O'72')
; L 0373 S_N = [$BYTE], ! No. of highest message returned from transmitter
; %PRINT: [29,8,8,0] (+%O'73')
; L 0374 S_A = [$BYTE], ! No. of last acked transmitted message
; %PRINT: [30,0,8,0] (+%O'74')
; L 0375 S_AR = [$BYTE], ! No. of last acked message returned
; %PRINT: [30,8,8,0] (+%O'75')
; L 0376 S_MOTD = [$BYTE], ! Number of messages outstanding to the driver
; %PRINT: [31,0,8,0] (+%O'76')
; L 0377 S_PENDING_NAK_REASON = [$BYTE], ! NAK reason to be sent in NAK message
; %PRINT: [31,8,8,0] (+%O'77')
; L 0378 D_NMX_PIX = [$BYTE], ! NMX process index
; %PRINT: [32,0,8,0] (+%O'100')
; L 0379 K_PRIORITY = [$BYTE], ! KMC device priority
; %PRINT: [32,8,8,0] (+%O'101')
; 0380 $ALIGN (FULLWORD)
; L 0381 K_REGISTER = [$ADDRESS], ! KMC CSR address
; %PRINT: [33,0,16,0] (+%O'102')
; L 0382 K_VECTOR = [$ADDRESS], ! KMC interrupt vector address
; %PRINT: [34,0,16,0] (+%O'104')
; L 0383 D_REGISTER = [$ADDRESS], ! DUP CSR address
; %PRINT: [35,0,16,0] (+%O'106')
; L 0384 L_SERVICE_TIMER = [$SHORT_INTEGER],
; %PRINT: [36,0,16,1] (+%O'110')
; 0385 ! Line parameter 1120:
; 0386 ! 1-65535 milliseconds
; L 0387 L_RETRANSMIT_TIMER = [$SHORT_INTEGER],
; %PRINT: [37,0,16,1] (+%O'112')
; 0388 ! Line parameter 1121:
; 0389 ! 1-65535 milliseconds
; L 0390 S_WAITING_FOR_TRANSMIT = [$LIST_HEAD], ! Pretransmit queue
; %PRINT: [38,0,0,0] (+%O'114')
; L 0391 S_WAITING_FOR_ACK = [$LIST_HEAD], ! Waiting for acknowledge queue
; %PRINT: [40,0,0,0] (+%O'120')
; L 0392 S_CONTROL_CCB = [$ADDRESS], ! Control function pending
; %PRINT: [42,0,16,0] (+%O'124')
; L 0393 S_CIRCUIT_ENTITY = [$SHORT_INTEGER], ! Circuit logging entity identification
; %PRINT: [43,0,16,1] (+%O'126')
; L 0394 S_USER_HANDLE = [$SHORT_INTEGER],
; %PRINT: [44,0,16,1] (+%O'130')
; L 0395 S_TRANSIENT_ERROR = [$SHORT_INTEGER],
; %PRINT: [45,0,16,1] (+%O'132')
; L 0396 S_PERSISTENT_ERROR = [$SHORT_INTEGER],
; %PRINT: [46,0,16,1] (+%O'134')
; L 0397 D_USER_BUFFERS = [$SHORT_INTEGER],
; %PRINT: [47,0,16,1] (+%O'136')
; L 0398 S_CIRCUIT_COST = [$SHORT_INTEGER], ! ** FOR TRANSPORT **
; %PRINT: [48,0,16,1] (+%O'140')
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 12
30-Dec-1982 02:26:28 NETPKG:<DRIVERS>DCPDAT.R16.10 (3)
; L 0399 L_LINE_ENTITY = [$SHORT_INTEGER], ! Line logging entity identification
; %PRINT: [49,0,16,1] (+%O'142')
; L 0400 L_DRIVER_HANDLE = [$SHORT_INTEGER], ! Process handle for driver process
; %PRINT: [50,0,16,1] (+%O'144')
; L 0401 L_MESSAGES_AT_DRIVER = [$BYTE], ! Messages outstanding to the driver
; %PRINT: [51,0,8,0] (+%O'146')
; L 0402 L_MAXIMUM_AT_DRIVER = [$BYTE], ! Maximum data messages pending at the driver.
; %PRINT: [51,8,8,0] (+%O'147')
; 0403 $ALIGN (FULLWORD)
; L 0404 L_PRE_TRANSMIT = [$LIST_HEAD], ! Station pre-transmit queue
; %PRINT: [52,0,0,0] (+%O'150')
; L 0405 L_HEADER = [$SUB_BLOCK (H_LENGTH)], ! Header work area
; %PRINT: [54,0,0,0] (+%O'154')
; 0406 $OVERLAY (L_HEADER)
; L 0407 LI_HDX = [$BIT], ! Half duplex
; %PRINT: [54,0,1,0] (+%O'154')
; 0408 $ALIGN (FULLWORD)
; L 0409 $SKIP_FIELD ($BITS (3))
; %PRINT: [55,0,3,0] (+%O'156')
; L 0410 LI_MPT = [$BIT], ! Multipoint
; %PRINT: [55,3,1,0] (+%O'156')
; L 0411 $SKIP_FIELD ($BIT)
; %PRINT: [55,4,1,0] (+%O'156')
; L 0412 LI_MPS = [$BIT], ! Multipoint slave
; %PRINT: [55,5,1,0] (+%O'156')
; 0413 $CONTINUE
; L 0414 L_BABBLE_COUNT = [$BYTE], ! Babbling count
; %PRINT: [57,0,8,0] (+%O'162')
; L 0415 S_MAXIMUM_TRANSMITS = [$BYTE] ! maximum messages at one shot
; %PRINT: [57,8,8,0] (+%O'163')
; 0416 $ALIGN (FULLWORD)
; 0417 tes;
; 0418
; 0419 literal
; L 0420 D_LENGTH = $FIELD_SET_SIZE, ! Length of data base
; %PRINT: 58 fullwords
; 0421 !
; 0422 ! Station states
; 0423 !
; 0424 SS_HALTED = 0, ! Station is in HALTED state
; 0425 SS_ISTRT = 1, ! Station is in ISTRT state
; 0426 SS_ASTRT = 2, ! Station is in ASTRT state
; 0427 SS_RUNNING = 3, ! Station is in RUN state
; 0428 SS_MAINTENANCE = 4, ! Station is in MAINTENANCE state
; 0429 SS_LOW = min (SS_HALTED, SS_ISTRT, SS_ASTRT, SS_RUNNING, SS_MAINTENANCE),
; 0430 SS_HIGH = max (SS_HALTED, SS_ISTRT, SS_ASTRT, SS_RUNNING, SS_MAINTENANCE);
; 0431
; 0432 !
; 0433 ! [End of DCPDAT]
25-Jan-1983 09:56:28 TOPS-20 Bliss-16 3(552) Page 13
; LIBRARY STATISTICS
;
; -------- Symbols -------- Blocks
; File Total Loaded Percent Read
;
; NETPKG:<BLIS16>XPORT.L16.1 568 36 6 0
; NETPKG:<V3P0>MCBLIB.L16.7 372 4 1 0
; NETPKG:<MCB>NMXLIB.L16.13 200 2 1 0
; Run Time: 00:15.5
; Elapsed Time: 00:50.8
; Memory Used: 22 pages
; Library Precompilation Complete