NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (1)    3500  HISTORY

   (1)    4400  DECLARATIONS

   (1)    6900  LINK SERVICES RCVD FOR EXISTING LINK

   (1)   17800  PROCESS INBOUND INTERRUPT MESSAGE

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page   1

X01                                                                                                                              (1)



                                     0000   100 

                                     0000   200 	.TITLE	NETINTLS - INT/LS SUBCHANNEL PROCESSING

                                     0000   300 	.IDENT	/X01/

                                     0000   400 

                                     0000   500 ;

                                     0000   600 ; COPYRIGHT (C) 1977, 1978

                                     0000   700 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754

                                     0000   800 ;

                                     0000   900 ; THIS SOFTWARE IS FURNISHED  UNDER A LICENSE FOR USE ONLY ON A SINGLE

                                     0000  1000 ; COMPUTER  SYSTEM AND  MAY BE  COPIED ONLY WITH  THE INCLUSION OF THE

                                     0000  1100 ; ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE, OR ANY OTHER COPIES THEREOF,

                                     0000  1200 ; MAY NOT BE PROVIDED OR  OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON

                                     0000  1300 ; EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE

                                     0000  1400 ; TERMS.  TITLE TO AND  OWNERSHIP OF THE  SOFTWARE  SHALL AT ALL TIMES

                                     0000  1500 ; REMAIN IN DEC.

                                     0000  1600 ;

                                     0000  1700 ; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE

                                     0000  1800 ; AND SHOULD  NOT BE CONSTRUED  AS A COMMITMENT  BY DIGITAL  EQUIPMENT

                                     0000  1900 ; CORPORATION.

                                     0000  2000 ;

                                     0000  2100 ; DEC ASSUMES  NO  RESPONSIBILITY  FOR  THE USE OR  RELIABILITY OF ITS

                                     0000  2200 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.

                                     0000  2300 

                                     0000  2400 ;++

                                     0000  2500 ; FACILITY:	NETWORK ACP

                                     0000  2600 ;

                                     0000  2700 ; ABSTRACT:

                                     0000  2800 ;	THIS MODULE PROCESSES MESSAGES ON THE INTERRUPT/LINK SERVICES

                                     0000  2900 ;	SUBCHANNEL OF A LOGICAL LINK.

                                     0000  3000 ;

                                     0000  3100 ; ENVIRONMENT:

                                     0000  3200 ;	MODE = KERNEL

                                     0000  3300 ;

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page   2

X01             HISTORY                                                                                                          (1)



                                     0000  3500 	.SBTTL	HISTORY

                                     0000  3600 ; AUTHOR:	SCOTT G. DAVIS, CREATION DATE: 10-JUN-77

                                     0000  3700 ;

                                     0000  3800 ; MODIFIED BY:

                                     0000  3900 ;

                                     0000  4000 ;	, : VERSION

                                     0000  4100 ; 01	- 

                                     0000  4200 ;--

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page   3

X01             DECLARATIONS                                                                                                     (1)



                                     0000  4400 	.SBTTL	DECLARATIONS

                                     0000  4500 ;

                                     0000  4600 ; INCLUDE FILES:

                                     0000  4700 ;

                                     0000  4800 	$CXBDEF

                                     0000  4900 	$DRDEF

                                     0000  5000 	$NETMSGDEF

                                     0000  5100 	$MSGDEF

                                     0000  5200 	$SSBDEF

                                     0000  5300 	$UCBDEF

                                     0000  5400 

                                     0000  5500 ;

                                     0000  5600 ; MACROS:

                                     0000  5700 ;

                                     0000  5800 

                                     0000  5900 ;

                                     0000  6000 ; EQUATED SYMBOLS:

                                     0000  6100 ;

                                     0000  6200 

                                     0000  6300 ;

                                     0000  6400 ; OWN STORAGE:

                                     0000  6500 ;

                                     0000  6600 

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page   4

X01             DECLARATIONS                                                                                                     (1)



                                 00000000  6800 	.PSECT	NET_CODE,NOWRT

                                     0000  6900 	.SBTTL	LINK SERVICES RCVD FOR EXISTING LINK

                                     0000  7000 ;++

                                     0000  7100 ; FUNCTIONAL DESCRIPTION:

                                     0000  7200 ;

                                     0000  7300 ; NET$RCV_LNKSRV - A LINK SERVICES MSG HAS BEEN RCVD FOR AN EXISTING LINK.

                                     0000  7400 ;		 THE SEGMENT AND MESSAGE REQUEST COUNTS ARE UPDATED,

                                     0000  7500 ;		 AND SEGMENT TRANSMISSION OCCURS, IF NECESSARY.

                                     0000  7600 ;

                                     0000  7700 ; CALLING SEQUENCE:

                                     0000  7800 ;

                                     0000  7900 ;	ENTERED VIA CASE IN NETTRN

                                     0000  8000 ;

                                     0000  8100 ; INPUT PARAMETERS:

                                     0000  8200 ;

                                     0000  8300 ;	R5 - UCB ADDRESS

                                     0000  8400 ;

                                     0000  8500 ; IMPLICIT INPUTS:

                                     0000  8600 ;

                                     0000  8700 ;	R10 - PTR TO ACKNUM OR SEGNUM FIELD

                                     0000  8800 ;	R11 - PTR BEYOND END OF MSG

                                     0000  8900 ;

                                     0000  9000 ; SIDE EFFECTS:

                                     0000  9100 ;

                                     0000  9200 ;	SEGMENTS MAY BE TRANSMITTED TO PARTNER

                                     0000  9300 ;

                                     0000  9400 ;--

                                     0000  9500 

                                     0000  9600 NET$RCV_LNKSRV::

                          67     10  0000  9700 	BSBB	CHECK_INTLS		; PROCESS PREAMBLE AND REXMIT

                                     0002  9800 ;

                                     0002  9900 ; R2 CONTAINS ADDR OF INT/LS SSB AT THIS POINT

                                     0002 10000 ;

                                     0002 10100 ; PROCESS REMAINDER OF MESSAGE

                                     0002 10200 ;

                                     0002 10300 	BMSGOV	LNKSRV_ERROR,2		; NEED LSFLAGS BYTE AND FCVAL BYTE

            50            8A     9A  000A 10400 	MOVZBL	(R10)+,R0		; GET LSFLAGS

                                     000D 10500 ;

                                     000D 10600 ; CHECK FOR LEGAL VALUES

                                     000D 10700 ;

                                     000D 10800 

                                     000D 10900 	ASSUME	NET$V_REMLFS EQ 4

                                     000D 11000 	ASSUME	NET$S_REMLFS EQ 4

                                     000D 11100 

            50         F0 8F     93  000D 11200 	BITB	#^C<^XF>,R0		; ARE RESERVED BITS CLEAR?

                          38     12  0011 11300 	BNEQ	LNKSRV_ERROR		; IF NEQ NO

                                     0013 11400 

                                     0013 11500 	ASSUME 	NET$C_DATREQ EQ 0

                                     0013 11600 	ASSUME	NET$C_INTREQ EQ 1

                                     0013 11700 	ASSUME	NET$S_FCINT EQ 2

                                     0013 11800 

            51            8A     90  0013 11900 	MOVB	(R10)+,R1		; GET COUNT AND SET CONDITION CODES

            50            03     E0  0016 12000 	BBS	#NET$V_FCINT+1,R0,LNKSRV_ERROR ; IF BS ILLEGAL REQ CNT TYPE

                          31         0019       

            50            02     E0  001A 12100 	BBS	#NET$V_FCINT,R0,35$	; IF BS INTERRUPT REQUEST COUNTS						; FALL THROUGH FOR DA

                          12         001D       

            52         74 A5     D0  001E 12200 	MOVL	UCB$L_NT_DATSSB(R5),R2	; SET SSB ADDRESS FOR DATA SUBCHANNEL

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page   5

X01             LINK SERVICES RCVD FOR EXISTING LINK                                                                             (1)



                          51     95  0022 12300 	TSTB	R1			; CHECK COUNT

                          1E     13  0024 12400 	BEQL	60$			; IF EQL PROCEED

         3D A5            02     E0  0026 12500 	BBS	#UCB$V_SEGFLO,UCB$B_REMSRV(R5),40$ ; IF BS SEG FLOW - PROCEED

                          07         002A       

         3D A5            03     E1  002B 12600 	BBC	#UCB$V_MSGFLO,UCB$B_REMSRV(R5),50$ ; IF BC NO FLOW - ILLEGAL

                          0F         002F       

                                     0030 12700 					; FALL THROUGH TO CHECK FOR NEG COUNTS

                                     0030 12800 35$:

                          0D     19  0030 12900 	BLSS	50$			; IF LSS ILLEGAL

         22 A2            51     80  0032 13000 40$:	ADDB	R1,SSB$B_REQCNT(R2)	; UPDATE THE REQUEST COUNT

                          07     1D  0036 13100 	BVS	50$			; IF VS COUNT IS NG

         80 8F         22 A2     91  0038 13200 	CMPB	SSB$B_REQCNT(R2),#-128	; UNDERFLOW?

                          05     12  003D 13300 	BNEQ	60$			; IF NEQ NO - PROCEED

                                     003F 13400 50$:

            58            18     B0  003F 13500 	MOVW	#NET$C_DR_BADFC,R8	; ILLEGAL FCVAL FOR MSG TYPE

                          3B     11  0042 13600 	BRB	INTLS_TERMIN		; TERMINATE THE LINK

                                     0044 13700 ;

                                     0044 13800 ; DO THE RIGHT THING BY THE BACKPRESSURE BITS

                                     0044 13900 ;

                                     0044 14000 

                                     0044 14100 	ASSUME	NET$V_FCMOD EQ 0

                                     0044 14200 	ASSUME	NET$S_FCMOD EQ 2

                                     0044 14300 

                                     0044 14400 60$:

            0D            50     E9  0044 14500 	BLBC	R0,CHECK_FCMOD		; IF BC PROBABLY NO CHANGE

            50            01     E1  0047 14600 	BBC	#1,R0,STOP_FLOW		; IF BC STOP FLOW

                          03         004A       

                                     004B 14700 					; FALL THROUGH IF ILLEGAL VALUE

                                     004B 14800 ;

                                     004B 14900 ; MESSAGE WAS TOO SHORT OR USED A RESERVED BIT OR VALUE

                                     004B 15000 ;

                                     004B 15100 LNKSRV_ERROR:

                          FFB2'  31  004B 15200 	BRW	NET$PROT_ERROR		; PROTOCOL ERROR

                                     004E 15300 STOP_FLOW:

         3D A5            20     88  004E 15400 	BISB	#UCB$M_BACKP,UCB$B_REMSRV(R5) ; STOP FLOW

                          08     11  0052 15500 	BRB	NO_CHANGE		; FINISH UP

                                     0054 15600 CHECK_FCMOD:

            50            01     E1  0054 15700 	BBC	#1,R0,NO_CHANGE		; IF BC NO CHANGE

                          04         0057       

                                     0058 15800 					; FALL THROUGH TO START FLOW

                                     0058 15900 START_FLOW:

         3D A5            20     8A  0058 16000 	BICB	#UCB$M_BACKP,UCB$B_REMSRV(R5) ; START FLOW

                                     005C 16100 NO_CHANGE:

            52         78 A5     D0  005C 16200 	MOVL	UCB$L_NT_INTSSB(R5),R2	; GET SSB ADDRESS

                          FF9D'  30  0060 16300 	BSBW	NET$XMT_ACK		; TRY TO SEND AN ACK

                          FF9A'  30  0063 16400 	BSBW	NET$USRXMT		; TRY TO TRANSMIT FOR THE USER

                                     0066 16500 INTLS_EXIT:

                          FF97'  31  0066 16600 	BRW	NET$AST_EXIT		; GO TO COMPLETION CODE

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page   6

X01             LINK SERVICES RCVD FOR EXISTING LINK                                                                             (1)



                                     0069 16800 ;

                                     0069 16900 ; THIS ROUTINE PROCESSES THE INITIAL PART OF MESSAGES RECEIVED

                                     0069 17000 ; ON THE INTERRUPT/LINK SERVICES SUBCHANNEL.

                                     0069 17100 ;

                                     0069 17200 ;	OUTPUTS

                                     0069 17300 ;		R2 - INT/LS SSB ADDRESS

                                     0069 17400 CHECK_INTLS:

            52         78 A5     D0  0069 17500 	MOVL	UCB$L_NT_INTSSB(R5),R2	; POINT TO I/LS SUBCHAN BASE

                          FF90'  31  006D 17600 	BRW	NET$PRECHK		; CHECK MSG PREAMBLE AND RETURN

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page   7

X01             PROCESS INBOUND INTERRUPT MESSAGE                                                                                (1)



                                     0070 17800 	.SBTTL	PROCESS INBOUND INTERRUPT MESSAGE

                                     0070 17900 ;++

                                     0070 18000 ; FUNCTIONAL DESCRIPTION:

                                     0070 18100 ;

                                     0070 18200 ; NET$RCV_INTMSG - PROCESS RECEIVED INTERRUPT MESSAGE.

                                     0070 18300 ;	1. PROCESS MESSAGES PREAMBLE

                                     0070 18400 ;	2. IF NO INT MSG WAS SOLICITED, BREAK THE LOGICAL LINK

                                     0070 18500 ;	3. IF THERE IS NO MAILBOX, ACK THE SEGMENT

                                     0070 18600 ;		ELSE:

                                     0070 18700 ;		A.DELIVER THE INTERRUPT MSG TO THE USER'S MAILBOX

                                     0070 18800 ;		B. SOLICIT ANOTHER INTMSG, PIGGYBACK ACK

                                     0070 18900 ;

                                     0070 19000 ; NET$DATA_LOSS - ENTRY FOR TERMINATING LINK DUE TO RECEIVE COUNTER TO FLOW CONTROL

                                     0070 19100 ;

                                     0070 19200 ; CALLING SEQUENCE:

                                     0070 19300 ;

                                     0070 19400 ;	ENTERED VIA CASE IN NET$TRN

                                     0070 19500 ;

                                     0070 19600 ; INPUT PARAMETERS:

                                     0070 19700 ;

                                     0070 19800 ;	R5 - UCB ADDRESS

                                     0070 19900 ;

                                     0070 20000 ; SIDE EFFECTS:

                                     0070 20100 ;

                                     0070 20200 ;	INTERRUPT MESSAGE DELIVERED, IF USER HAS MAILBOX

                                     0070 20300 ;	ANOTHER INT MSG SOLICITED IF USER HAS MAILBOX

                                     0070 20400 ;

                                     0070 20500 ;--

                                     0070 20600 	.ENABL	LSB

                                     0070 20700 

                                     0070 20800 NET$RCV_INTMSG::

                          F7     10  0070 20900 	BSBB	CHECK_INTLS		; DO INITIAL PROCESSING

                                     0072 21000 ;

                                     0072 21100 ; R2 CONTAINS ADDR OF I/LS SSB AT THIS POINT

                                     0072 21200 ;

                       23 A2     97  0072 21300 	DECB	SSB$B_PNDCNT(R2)	; AM I EXPECTING AN INTMSG ON THIS LINK?

                          0B     1E  0075 21400 	BGEQU	10$			; IF GEQU YES

                                     0077 21500 NET$DATA_LOSS::

         5A A5            05     E0  0077 21600 	BBS	#UCB$V_NT_BREAK,UCB$W_DEVSTS(R5),INTLS_EXIT ; IF BS LINK IS INACTIVE

                          EA         007B       

            58            28     B0  007C 21700 	MOVW	#NET$C_DR_LOSS,R8	; DATA LOSS

                                     007F 21800 INTLS_TERMIN:

                          FF7E'  31  007F 21900 	BRW	NET$TERM_LINK		; TERMINATE THE LINK

                                     0082 22000 ;

                                     0082 22100 ; INTERRUPT MESSAGE WAS SOLICITED (POSSIBLY BY VIRTUE OF CONNECT)

                                     0082 22200 ;

                                     0082 22300 10$:

                       54 A5     D5  0082 22400 	TSTL	UCB$L_AMB(R5)		; IS THERE A MAILBOX?

                          05     12  0085 22500 	BNEQ	20$			; IF NEQ YES

                                     0087 22600 ;

                                     0087 22700 ; THERE IS NO MAILBOX - TOSS THE MESSAGE, ACK IT, AND DON'T SOLICIT ANOTHER

                                     0087 22800 ;

                          FF76'  30  0087 22900 	BSBW	NET$XMT_ACK		; SEND THE ACK

                          DA     11  008A 23000 	BRB	INTLS_EXIT		; FINISH IN COMMON CODE

                                     008C 23100 ;

                                     008C 23200 ; INTERRUPT MESSAGE IS DELIVERABLE

                                     008C 23300 ;

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page   8

X01             PROCESS INBOUND INTERRUPT MESSAGE                                                                                (1)



                                     008C 23400 20$:

         1A A2            0F     E2  008C 23500 	BBSS	#SSB$V_ACKP,SSB$W_RCVSEGACK(R2),30$ ; FORCE PIGGYBACKED ACK

                          00         0090       

                                     0091 23600 30$:

            57            35     3C  0091 23700 	MOVZWL	#MSG$_INTMSG,R7		; SET ATTENTION CODE

            5B            5A     C3  0094 23800 	SUBL3	R10,R11,R8		; COMPUTE NO. OF BYTES OF DATA

                          58         0097       

            00'           58     D1  0098 23900 	CMPL	R8,S^#NET$C_MAXINT	; TOO MUCH DATA?

                          AE     1A  009B 24000 	BGTRU	LNKSRV_ERROR		; IF GTRU YES

                          FF60'  30  009D 24100 	BSBW	NET$ATTENTION		; SEND THE ATTENTION

            52         78 A5     D0  00A0 24200 	MOVL	UCB$L_NT_INTSSB(R5),R2	; GET THE SSB ADDRESS

                                     00A4 24300 ;

                                     00A4 24400 ; SOLICIT ANOTHER INT MSG

                                     00A4 24500 ;

                       21 A2     96  00A4 24600 	INCB	SSB$B_FCVAL(R2)		; SOLICIT AN INT MSG

                          FF56'  30  00A7 24700 	BSBW	NET$XMT_LNKSRV		; SEND A LINK SERVICES MSG CUM ACK

                                     00AA 24750 	UPDATE	MSGRCV			; ANOTHER MESSAGE RECEIVED

                          B2     11  00B2 24800 	BRB	INTLS_EXIT		; COMPLETE PROCESSING

                                     00B4 24900 

                                     00B4 25000 	.DSABL	LSB

                                     00B4 25100  

                                     00B4 25200 	.END

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page   9

SYMBOL TABLE                                                                                                                     (1)



BIT...         = 00000000            MSG$_TRMUNSOLIC= 00000001            NET$PRECHK       ********   X   03   

CHECK_FCMOD      00000054 R     03   MSG$_XM_ATTN   = 0000000D            NET$PROT_ERROR   ********   X   03   

CHECK_INTLS      00000069 R     03   MSG$_XM_DATAVL = 0000000B            NET$RCV_INTMSG   00000070 RG    03   

CXB$B_CODE       0000000B            MSG$_XM_SHUTDN = 0000000C            NET$RCV_LNKSRV   00000000 RG    03   

CXB$B_TYPE       0000000A            NET$AST_EXIT     ********   X   03   NET$S_ACKOPT   = 00000001            

CXB$C_DDCCON   = 00000001            NET$ATTENTION    ********   X   03   NET$S_BOM      = 00000001            

CXB$C_DDCDAT   = 00000002            NET$C_ACKM     = 00000001            NET$S_EFMT     = 00000002            

CXB$C_DDCERR   = 00000004            NET$C_ACKOFF   = 00000005            NET$S_EOM      = 00000001            

CXB$C_DDCRCV   = 00000003            NET$C_CC       = 00000002            NET$S_FCINT    = 00000002            

CXB$C_LENGTH     00000018            NET$C_CI       = 00000001            NET$S_FCMOD    = 00000002            

CXB$C_NSPSTART   0000001A            NET$C_CTRLM    = 00000002            NET$S_FCOPT    = 00000002            

CXB$K_LENGTH     00000018            NET$C_DATAM    = 00000000            NET$S_INTLS    = 00000001            

CXB$K_NSPSTART   0000001A            NET$C_DATREQ   = 00000000            NET$S_INTMSG   = 00000001            

CXB$L_BL         00000004            NET$C_DC       = 00000004            NET$S_LTYPE    = 00000002            

CXB$L_FL         00000000            NET$C_DI       = 00000003            NET$S_MPRI     = 00000002            

CXB$L_IRP        00000010            NET$C_DR_ABORT = 00000009            NET$S_MSGFLG   = 00000005            

CXB$L_LINK       00000010            NET$C_DR_ACCESS= 00000022            NET$S_MSGID    = 00000002            

CXB$L_SSB        00000014            NET$C_DR_ACCNT = 00000024            NET$S_MSGTYP   = 00000002            

CXB$W_CHANNEL    00000010            NET$C_DR_BADFC = 00000018            NET$S_REMLFS   = 00000004            

CXB$W_LENGTH     0000000C            NET$C_DR_BADLNK= 00000016            NET$S_RFMT     = 00000001            

CXB$W_OFFSET     0000000E            NET$C_DR_BADSRV= 00000023            NET$S_SUBTYP   = 00000003            

CXB$W_SIZE       00000008            NET$C_DR_CONF  = 0000002A            NET$TERM_LINK    ********   X   03   

GBL...         = 00000000            NET$C_DR_EXIT  = 00000026            NET$UP_COUNTER   ********   X   03   

INTLS_EXIT       00000066 R     03   NET$C_DR_FMT   = 00000005            NET$USRXMT       ********   X   03   

INTLS_TERMIN     0000007F R     03   NET$C_DR_IMLONG= 0000002B            NET$V_ACKOPT   = 00000004            

LNKSRV_ERROR     0000004B R     03   NET$C_DR_LOSS  = 00000028            NET$V_BOM      = 00000005            

MSG$_ABOOPR    = 00000011            NET$C_DR_NOBJ  = 00000004            NET$V_EFMT     = 00000004            

MSG$_ABORT     = 00000030            NET$C_DR_NOCON = 00000020            NET$V_EOM      = 00000006            

MSG$_ACCRSP    = 00000021            NET$C_DR_NOLINK= 00000029            NET$V_FCINT    = 00000002            

MSG$_CONFIRM   = 00000031            NET$C_DR_NONZ  = 00000015            NET$V_FCMOD    = 00000000            

MSG$_CONNECT   = 00000032            NET$C_DR_NOPATH= 00000027            NET$V_FCOPT    = 00000002            

MSG$_CRUNSOLIC = 00000002            NET$C_DR_NORMAL= 00000000            NET$V_INTLS    = 00000004            

MSG$_DELPROC   = 00000003            NET$C_DR_PROTCL= 00000007            NET$V_INTMSG   = 00000005            

MSG$_DELSMB    = 00000014            NET$C_DR_RSU   = 00000001            NET$V_LTYPE    = 00000000            

MSG$_DEVOFFLIN = 00000005            NET$C_DR_SEGSIZ= 00000025            NET$V_MPRI     = 00000002            

MSG$_DEVONLIN  = 00000007            NET$C_DR_SHUT  = 00000003            NET$V_MSGFLG   = 00000002            

MSG$_DISCON    = 00000033            NET$C_DR_THIRD = 00000008            NET$V_MSGID    = 00000000            

MSG$_EXIT      = 00000034            NET$C_DR_ZERO  = 00000017            NET$V_MSGTYP   = 00000002            

MSG$_INIOPR    = 00000010            NET$C_INTREQ   = 00000001            NET$V_REMLFS   = 00000004            

MSG$_INTMSG    = 00000035            NET$C_LOGLNK   = 00000001            NET$V_RFMT     = 00000006            

MSG$_OPREPLY   = 00000009            NET$C_MAXINT     ********   X   03   NET$V_SUBTYP   = 00000004            

MSG$_OPRQST    = 00000008            NET$C_MAXNSPOVH= 00000018            NET$XMT_ACK      ********   X   03   

MSG$_PATHLOST  = 00000036            NET$C_MSGFLG   = 00000000            NET$XMT_LNKSRV   ********   X   03   

MSG$_PROTOCOL  = 00000037            NET$C_NODMSG   = 00000005            NO_CHANGE        0000005C R     03   

MSG$_REJECT    = 00000038            NET$C_NOP      = 00000000            SSB$B_FCVAL      00000021            

MSG$_RESOPR    = 00000013            NET$C_NSPOVH   = 0000000B            SSB$B_PNDCNT     00000023            

MSG$_SCANBAD   = 00000028            NET$C_NSPV3    = 00000000            SSB$B_REQCNT     00000022            

MSG$_SCANRSP   = 00000029            NET$C_PIGGYBACK= 00008000            SSB$B_TIPC       00000020            

MSG$_SMBDON    = 00000009            NET$C_PRINRM   = 00000001            SSB$B_TYPE       0000000A            

MSG$_SMBINI    = 00000008            NET$C_RTHDR    = 00000002            SSB$C_LENGTH     00000024            

MSG$_SMBRSP    = 00000020            NET$C_RTHDROVH = 0000000F            SSB$K_LENGTH     00000024            

MSG$_SNDACC    = 0000000A            NET$DATA_LOSS    00000077 RG    03   SSB$L_UCB        00000014            

MSG$_SNDSMB    = 00000004            NET$GW_MSGRCV    ********   X   03   SSB$L_WACKQBL    00000010            

MSG$_SUSOPR    = 00000012            NET$M_BOM      = 00000020            SSB$L_WACKQFL    0000000C            

MSG$_THIRDPARTY= 00000039            NET$M_EOM      = 00000040            SSB$L_XQBL       00000004            

MSG$_TIMEOUT   = 0000003A            NET$M_INTLS    = 00000010            SSB$L_XQFL       00000000            

MSG$_TRMHANGUP = 00000006            NET$M_INTMSG   = 00000020            SSB$M_ACKP     = 00008000            

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page  10

SYMBOL TABLE                                                                                                                     (1)



SSB$M_NAKP     = 00007000            UCB$L_FR4        00000014            UCB$V_INT      = 00000001            

SSB$S_NAKP     = 00000003            UCB$L_IOQBL      00000044            UCB$V_INTTYPE  = 00000007            

SSB$V_ACKP     = 0000000F            UCB$L_IOQFL      00000040            UCB$V_JOB      = 00000000            

SSB$V_NAKP     = 0000000C            UCB$L_IRP        0000004C            UCB$V_LNKPRI   = 00000006            

SSB$W_RCVSEGACK  0000001A            UCB$L_LINK       0000002C            UCB$V_LTYPE    = 00000000            

SSB$W_RCVSEGNUM  00000018            UCB$L_LOGADR     00000064            UCB$V_MOUNTING = 00000009            

SSB$W_SIZE       00000008            UCB$L_MAXBLOCK   00000084            UCB$V_MSGACK   = 00000004            

SSB$W_XMTSEGACK  0000001E            UCB$L_MEDIA      0000008C            UCB$V_MSGFLO   = 00000003            

SSB$W_XMTSEGNUM  0000001C            UCB$L_NT_DATSSB  00000074            UCB$V_NOCNVRT  = 00000002            

START_FLOW       00000058 R     03   UCB$L_NT_INTSSB  00000078            UCB$V_NT_BFROVF= 00000002            

STOP_FLOW        0000004E R     03   UCB$L_OPCNT      00000060            UCB$V_NT_BREAK = 00000005            

UCB$B_AMOD       00000053            UCB$L_OWNUIC     0000001C            UCB$V_NT_NAME  = 00000004            

UCB$B_CEX        00000077            UCB$L_PID        00000028            UCB$V_ONLINE   = 00000004            

UCB$B_CM1        0000004A            UCB$L_RQBL       00000004            UCB$V_POWER    = 00000005            

UCB$B_CM2        0000004B            UCB$L_RQFL       00000000            UCB$V_PRMMBX   = 00000000            

UCB$B_DEVCLASS   00000038            UCB$L_SVAPTE     00000068            UCB$V_SEGFLO   = 00000002            

UCB$B_DEVTYPE    00000039            UCB$L_SVPN       00000064            UCB$V_TIM      = 00000000            

UCB$B_DIPL       00000052            UCB$L_TTCHAR     0000003C            UCB$V_TIMOUT   = 00000006            

UCB$B_DX_SCTCNT  000000A6            UCB$L_VCB        00000030            UCB$V_TT_NOTIF = 00000002            

UCB$B_ERTCNT     00000070            UCB$M_BACKP    = 00000020            UCB$V_TT_TIMO  = 00000001            

UCB$B_ERTMAX     00000071            UCB$M_BSY      = 00000100            UCB$V_UNLOAD   = 0000000C            

UCB$B_ESCAPE     0000004B            UCB$M_CANCEL   = 00000008            UCB$V_VALID    = 0000000B            

UCB$B_FEX        00000076            UCB$M_DEADMO   = 00000400            UCB$W_BCNT       0000006E            

UCB$B_FIPL       0000000B            UCB$M_DELMBX   = 00000002            UCB$W_BCR        00000096            

UCB$B_LOCSRV     0000003C            UCB$M_DIAGBUF  = 00000002            UCB$W_BOFF       0000006C            

UCB$B_OFFNDX     00000094            UCB$M_DX_WRITE = 00000008            UCB$W_BUFQUO     00000018            

UCB$B_OFFRTC     00000095            UCB$M_ECC      = 00000001            UCB$W_BYTESTOGO  0000003E            

UCB$B_REMSRV     0000003D            UCB$M_ERLOGIP  = 00000004            UCB$W_CHARGE     0000004A            

UCB$B_SECTORS    0000003C            UCB$M_INT      = 00000002            UCB$W_CYLINDERS  0000003E            

UCB$B_SLAVE      00000074            UCB$M_INTTYPE  = 00000080            UCB$W_DA         0000008C            

UCB$B_SPR        00000075            UCB$M_JOB      = 00000001            UCB$W_DC         0000008E            

UCB$B_STATE      00000052            UCB$M_MOUNTING = 00000200            UCB$W_DEVBUFSIZ  0000003A            

UCB$B_TRACKS     0000003D            UCB$M_NOCNVRT  = 00000004            UCB$W_DEVSTS     0000005A            

UCB$B_TYPE       0000000A            UCB$M_NT_BFROVF= 00000004            UCB$W_DIRSEQ     00000088            

UCB$B_VERTSZ     0000003F            UCB$M_NT_BREAK = 00000020            UCB$W_DSTADDR    00000018            

UCB$C_LENGTH     00000074            UCB$M_NT_NAME  = 00000010            UCB$W_DX_BCR     000000A4            

UCB$C_LOGLNK   = 00000001            UCB$M_ONLINE   = 00000010            UCB$W_EC1        00000090            

UCB$K_LENGTH     00000074            UCB$M_POWER    = 00000020            UCB$W_EC2        00000092            

UCB$L_AMB        00000054            UCB$M_PRMMBX   = 00000001            UCB$W_ERRCNT     00000072            

UCB$L_ASTQBL     00000010            UCB$M_TIM      = 00000001            UCB$W_FUNC       0000007E            

UCB$L_ASTQFL     0000000C            UCB$M_TIMOUT   = 00000040            UCB$W_MB_SEED    FFFFFFFC            

UCB$L_CPID       0000005C            UCB$M_TT_NOTIF = 00000004            UCB$W_MSGCNT     00000016            

UCB$L_CRB        00000020            UCB$M_TT_TIMO  = 00000002            UCB$W_MSGMAX     00000014            

UCB$L_DDB        00000024            UCB$M_UNLOAD   = 00001000            UCB$W_NT_CHAN    0000007C            

UCB$L_DEVCHAR    00000034            UCB$M_VALID    = 00000800            UCB$W_OFFSET     0000008A            

UCB$L_DEVDEPEND  0000003C            UCB$S_LNKPRI   = 00000002            UCB$W_REFC       00000050            

UCB$L_DPC        00000080            UCB$S_LTYPE    = 00000002            UCB$W_SIZE       00000008            

UCB$L_DUETIM     0000005C            UCB$T_PARTNER    0000000C            UCB$W_SRCADDR    0000001A            

UCB$L_DX_BFPNT   0000009C            UCB$V_BACKP    = 00000005            UCB$W_STS        00000058            

UCB$L_DX_BUF     00000098            UCB$V_BSY      = 00000008            UCB$W_UNIT       00000048            

UCB$L_DX_RXDB    000000A0            UCB$V_CANCEL   = 00000003            UCB$W_VPROT      0000001A            

UCB$L_EMB        00000078            UCB$V_DEADMO   = 0000000A            

UCB$L_FIRST      00000014            UCB$V_DELMBX   = 00000001            

UCB$L_FPC        0000000C            UCB$V_DIAGBUF  = 00000001            

UCB$L_FQBL       00000004            UCB$V_DX_WRITE = 00000003            

UCB$L_FQFL       00000000            UCB$V_ECC      = 00000000            

UCB$L_FR3        00000010            UCB$V_ERLOGIP  = 00000002            

NETINTLS        - INT/LS SUBCHANNEL PROCESSING                   22-AUG-1978 00:55:44   VAX-11 MACRO X0.3-11               Page  11

PROGRAM SECTION SYNOPSIS                                                                                                         (1)







PROGRAM SECTION SYNOPSIS



.  ABS  .        00000000      00     NOPIC   USR   CON   ABS   LCL NOSHR NOEXE NORD  NOWRT BYTE  

. BLANK .        00000000      01     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT BYTE  

$ABS$            FFFFFFFE      02     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

NET_CODE         000000B4      03     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD  NOWRT BYTE  





THERE WERE NO ERRORS OR WARNINGS.

15360. BYTES LEFT IN FREE MEMORY POOL.

3274. BYTES OF RECLAIMED MEMORY.

OBJ$:NETINTLS,LIS$:NETINTLS/-SP=EXECML$/ML,M1/ML,M2/ML,SRC$:NETINTLS

52 MLB DIR RDS - 584 GETS TO DEFINE 20 MACROS. 38 INTER. FILE WRITES. 

