Trailing-Edge
-
PDP-10 Archives
-
BB-H348C-RM_1982
-
swskit-v21/listings/mcb/nsdis.list
There are no other files named nsdis.list in the archive.
NSDIS MACRO M1110 13-OCT-79 10:20
TABLE OF CONTENTS
4- 68 $DISQIO - LOGICAL LINK DISCONNECT QIO (FUNCTION=34) PROCESSOR
5- 112 REJ - REJECT CONNECT (SUBFUNCTION=020)
6- 143 DIS/ABT - DISCONNECT/ABORT LOGICAL LINK (SUBFUNCTIONS=000,010)
NSDIS MACRO M1110 13-OCT-79 10:20 PAGE 3
1 .TITLE NSDIS
2 .IDENT /V01.00/
3
4 ;
5 ; COPYRIGHT (C) 1978 BY
6 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
7 ;
8 ;
9 ; THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED
10 ; ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE
11 ; INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER
12 ; COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY
13 ; OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY
14 ; TRANSFERRED.
15 ;
16 ; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE
17 ; AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
18 ; CORPORATION.
19 ;
20 ; DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
21 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.
22 ;
23 ;
24 ; MODULE DESCRIPTION:
25 ;
26 ; ACP DISCONNECT/CONNECT REJECT PROCESSOR
27 ;
28 ;
29 ;
30 ; DISTRIBUTED SYSTEMS SOFTWARE ENGINEERING
31 ;
32 ; IDENT HISTORY:
33 ;
34 ; 1.00 10-FEB-78
35 ; VERSION 2.0 RELEASE
36 ;
37
38 ; LIBRARY MACROS
39 ;
40
41 .MCALL SAVRG,RESRG,$MVFBF,$MVTBF,MAP,RECMAP
42 .MCALL CCBDF$,NSPSY$
43 000000 CCBDF$ ;DEFINE CCB OFFSETS
44 000000 NSPSY$ ;DEFINE NSP INTERNAL SYMBOLS
45
46 .MCALL MBXDF$,LLWDF$,DVBDF$
47 000000 MBXDF$ ;DEFINE MAILBOX OFFSETS
48 000000 LLWDF$ ;DEFINE WINDOW BLOCK OFFSETS
49 000000 DVBDF$ ;DEFINE VCB OFFSETS
50
51 .MCALL CRBDF$,CNBDF$,NSSYM$
52 000000 CRBDF$ ;DEFINE CONNECT REQUEST BLOCK OFFSETS
53 000000 CNBDF$ ;DEFINE CONNECT PENDING BLOCK OFFSETS
54 000000 NSSYM$ ;DEFINE DEVICE RETURN VALUES
55
56 ;
57 ; LOCAL MACRO DEFINITION
NSDIS MACRO M1110 13-OCT-79 10:20 PAGE 3-1
58 ;
59 ;
60 ; MOVE BYTE TO REGISTER WITH NO SIGN EXTEND
61 ;
62
63 .MACRO MOVBNS X,Y
64 CLR Y
65 BISB X,Y
66 .ENDM MOVBNS
NSDIS MACRO M1110 13-OCT-79 10:20 PAGE 4
$DISQIO - LOGICAL LINK DISCONNECT QIO (FUNCTION=34) PROCESSOR
68 .SBTTL $DISQIO - LOGICAL LINK DISCONNECT QIO (FUNCTION=34) PROCESSOR
69
70 ;+
71 ; ** - $DISQIO - DIS$/ABO$/REJ$ QIOS
72 ;
73 ; THIS ROUTINE PROCESSES QIO REQUESTS WITH FUNCTION CODES OF 34
74 ; (DIS$,ABO$,OR REJ$).
75 ;
76 ; INPUTS:
77 ;
78 ; R1 = SUB-FUNCTION CODE
79 ; = 0 DIS$
80 ; = 10 ABO$
81 ; = 20 REJ$
82 ; R3 -> I/O PACKET
83 ;
84 ; OUTPUTS: (ON DISPATCH TO PROPER PROCESSING ROUTINE)
85 ;
86 ; R3 -> I/O PACKET
87 ; R4 -> VOLUME CONTROL BLOCK
88 ; R5 -> MAILBOX (REJ$) OR WINDOW BLOCK (DIS$ OR ABO$)
89 ;-
90
91 000000 .PSECT $NSACP
92
93 000000 $DISQIO::SWSTK$ RTTSK ;SWITCH TO SYSTEM STATE
94 000004 017305 000000G MOV @I.LN2(R3),R5 ;;GET ADDRESS OF MAILBOX (FOR REJ$, CANNOT BE ZERO)
95 ;;OR WINDOW BLOCK (FOR ABO$ OR DIS$, COULD BE ZERO
96 000010 001406 BEQ 10$ ;;IF EQ, COMPLETE THE I/O REQUEST
97 000012 042705 000001 BIC #1,R5 ;;REMOVE INTERLOCK BIT FROM ADDRESS
98 000016 006201 ASR R1 ;;MAKE SUBFUNCTION CODE AN INDEX
99 000020 006201 ASR R1 ;;...
100 000022 CALLR @F34DSP(R1) ;;DISPATCH TO PROPER PROCESSING ROUTINE
101
102 000026 10$: CALLR IOSUC ;;COMPLETE I/O REQUEST SUCCESSFULLY
103
104 ;
105 ;FUNCTION CODE (34) DISPATCH TABLE
106 ;
107
108 000032 000040' F34DSP: DIS ;DISCONNECT
109 000034 000046' ABT ;ABORT
110 000036 000000' REJ ;CONNECT REJECT
NSDIS MACRO M1110 13-OCT-79 10:20 PAGE 5
REJ - REJECT CONNECT (SUBFUNCTION=020)
112 .SBTTL REJ - REJECT CONNECT (SUBFUNCTION=020)
113
114 ;+
115 ; ** - REJ - REJECT CONNECT
116 ;
117 ; THIS ROUTINE PROCESSES A USER TASK'S REJ$ REQUEST.
118 ; IT REJECTS A CONNECTION THAT THE USER RECEIVED THROUGH
119 ; HIS NETWORK DATA QUEUE.
120 ;
121 ; INPUTS:
122 ;
123 ; R3 -> I/O PACKET
124 ; R5 -> MAILBOX
125 ;-
126
127 000000 .PSECT
128
129 000000 010504 REJ: MOV R5,R4 ;COPY THE ADDRESS OF THE MAILBOX
130 000002 CALL TLACHK ;CHECK TLA RETURNED BY USER
131 000006 010104 MOV R1,R4 ;;COPY CI CCB ADDRESS (TLA)
132 000010 001415 BEQ 10$ ;;IF EQ, INVALID TLA
133 000012 CALL MVDAT ;;COPY OPTIONAL DATA INTO CONBLK
134 000016 SAVRG <R3,R5> ;;SAVE I/O PACKET AND POINTER TO MAILBOX
135 000022 010405 MOV R4,R5 ;;COPY CCB ADDRESS
136 000024 CALL USRREJ ;;CALL NSP TO REJECT THE CONNECTION
137 000030 RESRG <R5,R3> ;;RESTORE REGISTERS
138 000034 105365 000006 DECB M.USE(R5) ;;DECR # OF ACTIVE/PENDING LOGICAL LINKS
139 000040 CALLR IOSUC ;;COMPLETE I/O REQUEST AND RETURN
140
141 000044 10$: CALLR IODUN1 ;;COMPLETE I/O REQUEST IN ERROR
NSDIS MACRO M1110 13-OCT-79 10:20 PAGE 6
DIS/ABT - DISCONNECT/ABORT LOGICAL LINK (SUBFUNCTIONS=000,010)
143 .SBTTL DIS/ABT - DISCONNECT/ABORT LOGICAL LINK (SUBFUNCTIONS=000,010)
144
145 ;+
146 ; ** - DIS - DISCONNECT LOGICAL LINK
147 ;
148 ; THIS ROUTINE PROCESSES A USER TASK'S REQUEST FOR SYNCHRONOUS
149 ; DISCONNECT (DIS). THE DISCONNECT IS SENT AFTER ALL TRANSMIT
150 ; AND INTERRUPT MESSAGES HAVE BEEN TRANSMITTED AND ACKNOWLEDGED.
151 ;
152 ; ** - ABT - ABORT LOGICAL LINK
153 ;
154 ; THIS ROUTINE PROCESSES A USER TASK'S ABORT (ABT) REQUEST. IT ABORTS
155 ; THE LOGICAL LINK.
156 ;
157 ; INPUTS:
158 ;
159 ; R3 -> I/O PACKET
160 ; R5 -> WINDOW BLOCK
161 ;
162 ; OUTPUTS:
163 ;
164 ; SUCCESSFUL -
165 ; ALL I/O ON THE LINK AND NETWORK DATA IN THE MAILBOX
166 ; ASSOCIATED WITH THE LINK IS FLUSHED. THE I/O PACKET
167 ; ADDRESS IS STORED IN THE WINDOW BLOCK AND NSP CALLED
168 ; TO ABORT THE LINK. THE I/O IS COMPLETED LATER IN THE
169 ; DISCONNECT COMPLETE CODE.
170 ;
171 ; UNSUCCESSFUL -
172 ; (ABT) A RESOURCE ERROR HAS OCCURRED AND NSP HAS NOT
173 ; ABORTED THE LINK.
174 ; (DIS) EITHER NSP INCURRED A RESOURCE ERROR OR THERE ARE
175 ; PENDING TRANSMIT OR INTERRUPT MESSAGES. IN EITHER CASE
176 ; RE-QUEUE THE REQUEST AND TRY AGAIN LATER.
177 ;-
178
179 000040 .PSECT $NSACP
180
181 .ENABL LSB
182 000040 005765 000022 DIS: TST W.SNDQ(R5) ;ARE THERE ANY TRANSMIT REQUESTS PENDING?
183 000044 001124 BNE 30$ ;IF NE, YES - DON'T DO DISCONNECT NOW
184
185 000046 152765 000100 000004 ABT: BISB #WS.DIP,W.STAT(R5) ;;SET DISCONNECT IN PROGRESS STATUS
186 000054 142765 000060 000004 BICB #WS.INT!WS.STA,W.STAT(R5) ;;CLEAR ALL WAITING FLAGS
187 ;;STORE DISCONNECT CONTEXT IN I/O PACKET
188 000062 016363 000000G 000012G MOV I.LN2(R3),I.PRM+12(R3) ;; POINTER TO SECOND LUN WORD
189 000070 012763 000000C 000014G MOV #IS.SUC&377,I.PRM+14(R3) ;; SUCCESSFUL COMPLETION STATUS
190 000076 005063 000016G CLR I.PRM+16(R3) ;; BYTE COUNT OF 0
191 000102 005765 000014 TST W.PIO(R5) ;;IS THERE ALREADY A FUNCTION PENDING ? (GTND$ OR CLS$)
192 000106 001105 BNE 40$ ;;IF NE, FLUSH THIS I/O REQUEST
193 000110 010365 000014 MOV R3,W.PIO(R5) ;;ELSE, SAVE I/O PACKET ADDRESS IN WINDOW BLOCK
194 000114 016504 000016 MOV W.MBOX(R5),R4 ;;GET ADDRESS OF MAILBOX
195 000120 MOVBNS W.LUN(R5),R0 ;;GET LOGICAL LINK'S LUN
196 000126 CALL FLSHMB ;;FLUSH ALL EVENTS FOR THIS LOGICAL LINK IN MAILBOX
197 000132 CALL FLSHIO ;;FLUSH ANY PENDING I/O PACKETS (SND$,REC$,XMI$)
198 ;; RETURN THEM ALL BACK TO USER WITH ABORT ERROR CODES
199
NSDIS MACRO M1110 13-OCT-79 10:20 PAGE 6-1
DIS/ABT - DISCONNECT/ABORT LOGICAL LINK (SUBFUNCTIONS=000,010)
200 000136 SAVRG <R5> ;;SAVE ADDRESS OF THE WINDOW BLOCK
201 000140 CALL CCBGT ;;ALLOCATE A CCB
202 000144 103457 BCS 25$ ;;IF CS, ALLOCATION FAILED
203 000146 005064 000016 CLR C.BUF+2(R4) ;;ZERO VIRTUAL ADDRESS WORD
204 000152 005064 000004 CLR C.NSP(R4) ;;SET PDV INDEX TO ZERO (USER INTERFACE)
205 000156 116564 000011 000004 MOVB W.ULA(R5),C.NSP(R4) ;;GET LOGICAL LINK'S ULA (FOR ABT$)
206 000164 116564 000010 000006 MOVB W.LLA(R5),C.LIN(R4) ;;GET LOGICAL LINK'S LLA (FOR DIS$)
207 000172 010300 MOV R3,R0 ;;COPY I/O PACKET ADDRESS
208 000174 010405 MOV R4,R5 ;;CHANGE REGISTER CONVENTIONS
209 000176 016365 000004G 000020 MOV I.PRM+4(R3),C.CNT(R5) ;;GET # OF BYTES OF OPTIONAL DATA
210 000204 001416 BEQ 10$ ;;
211 000206 CALL CCBGT ;;ALLOCATE A CCB FOR AN OPTIONAL DATA BUFFER
212 000212 103431 BCS 20$ ;;ALLOCATION FAILED
213 000214 010402 MOV R4,R2 ;;COPY ADDRESS OF BUFFER CCB
214 000216 010265 000016 MOV R2,C.BUF+2(R5) ;;STORE ADDRESS OF BUFFER IN DISCONNECT CCB
215 000222 016503 000020 MOV C.CNT(R5),R3 ;;GET # OF BYTES OF OPTIONAL DATA
216 000226 $MVFBF R0,I.PRM ;;MOVE OPTIONAL DATA FROM USER'S BUFFER
217
218 000242 105760 000000G 10$: TSTB I.FCN(R0) ;;ABT OR DIS?
219 000246 001003 BNE 15$ ;;IF NE, ABORT (ABT$)
220 000250 CALL USRDIS ;;CALL NSP TO DISCONNECT LOGICAL LINK
221 000254 000402 BR 17$ ;;JOIN COMMON CODE
222
223 000256 15$: CALL USRABT ;;CALL NSP TO ABORT LOGICAL LINK
224 000262 103021 17$: BCC 50$ ;;IF CC, NO RESOURCE ERROR
225 000264 016504 000016 MOV C.BUF+2(R5),R4 ;;OTHERWISE GET ADDRESS OF BUFFER CCB
226 000270 001402 BEQ 20$ ;;IF EQ, NO OPTIONAL DATA BUFFER
227 000272 CALL $CCBRT ;;RETURN IT TO POOL
228 000276 010504 20$: MOV R5,R4 ;;COPY DISCONNECT CCB POINTER
229 000300 CALL $CCBRT ;;RETURN IT TO POOL
230 000304 25$: RESRG <R5> ;;RESTORE ADDRESS OF THE WINDOW BLOCK
231 000306 016503 000014 MOV W.PIO(R5),R3 ;;RECOVER THE ADDRESS OF THE I/O PACKET
232 000312 005065 000014 CLR W.PIO(R5) ;;...AND REMOVE AS THE CURRENT PACKET
233 000316 30$: CALLR IOREDO ;;RE-QUEUE THE I/O REQUEST AND RETURN
234
235 000322 40$: CALLR IOFLS ;;FLUSH THIS I/O REQUEST
236
237 000326 005726 50$: TST (SP)+ ;;CLEAN THE STACK
238 000330 RTTSK: RETURN ;;RETURN TO TASK STATE AND CALLER
239
240 .DSABL LSB
241
242 000001 .END
NSDIS MACRO M1110 13-OCT-79 10:20 PAGE 6-2
SYMBOL TABLE
ABT 000046R 002 C.BID 000003 ER$TCN= 000040 I.LN2 = ****** GX L.NXN 000014
ACKMAS= 170000 C.BUF 000014 ER$TCO= 000041 I.PRM = ****** GX L.PDV 000041
ACKPRE= 100000 C.BUF1 000014 ER$TPA= 000010 K$$CNT= 177546 L.REM 000006
ACKRES= 060000 C.BUF2 000024 ER$UOB= 000004 K$$CSR= 177546 L.RLA 000010
ACKWRA= 010000 C.CNT 000020 E$$XPR= 000000 K$$LDC= 000000 L.RNO 000020
A$$CHK= 000000 C.CNT1 000020 FC.CCP= 000020 K$$TPS= 000074 L.STA 000000
A$$CPS= 000000 C.CNT2 000030 FC.CTL= 000006 LA.ACK= 100000 L.TC 000042
A$$PRI= 000000 C.FLG 000022 FC.KCP= 000016 LA.MSK= 170000 L.TIC 000043
A$$TRP= 000000 C.FLG1 000022 FC.KIL= 000004 LA.NAK= 110000 L.TIPD 000005
A.NAK = 010000 C.FLG2 000032 FC.RCE= 000002 LA.NMS= 010000 L.TIPI 000004
CB.CCB= 000002 C.FNC 000010 FC.RCP= 000014 LA.RES= 060000 L.UDQ 000034
CB.RDB= 000004 C.LIN 000006 FC.TIM= 000010 LD$LP = 000000 L.ULA 000040
CCBGT = ****** GX C.LNK 000000 FC.XCP= 000012 LF.DFL= 000060 L.USA 000030
CE.ABO= 100362 C.MOD 000011 FC.XME= 000000 LF.DSP= 000040 L.USTA 000024
CE.DIS= 100366 C.NSP 000004 FLSHIO= ****** GX LF.DST= 000020 L.XQ1 000046
CE.ERR= 100370 C.RSV 000002 FLSHMB= ****** GX LF.FPN= 000010 L.XQ2 000050
CE.MOP= 100372 C.STA 000007 FS.AST= 000000 LF.HF0= 001000 L.XQ3 000052
CE.NTE= 100361 C.STS 000012 FS.CIB= 002000 LF.HMF= 020000 MA.DA = 000000
CE.RTE= 100376 DF$ADJ= 020000 FS.CRA= 001000 LF.HSF= 010000 MA.IL = 000020
CE.SRC= 100364 DF$DWN= 001000 FS.DIS= 013000 LF.INR= 000100 MC.CC = 000040
CE.TMO= 100374 DF$FRE= 070000 FS.DVC= 001000 LF.INT= 000400 MC.CI = 000020
CF.EOM= 000004 DF$LCL= 040000 FS.ENB= 012000 LF.LCL= 040000 MC.DC = 000100
CF.HDR= 000020 DF$LNK= 004000 FS.GET= 006000 LF.MMF= 100000 MC.DI = 000060
CF.LB = 100000 DF$REM= 010000 FS.INI= 000000 LF.MSF= 040000 MC.NO = 000000
CF.SOM= 000010 DF$RES= 002000 FS.KIL= 000000 LF.NKR= 000200 MC.ST = 000120
CF.SYN= 000040 DF$TMP= 100000 FS.LTM= 001000 LF.NKS= 000400 MD.BM = 000040
CF.TRN= 000100 DIS 000040R 002 FS.MNT= 004000 LF.NPN= 000001 MD.EM = 000100
CL$ACK= 000040 D$CHN 000002 FS.MSN= 014000 LF.NTS= 002000 MD.ILS= 000040
CL$MFL= 000010 D$FLG 000000 FS.RNG= 011000 LF.RSU= 100000 MD.IM = 000020
CL$NRM= 000020 D$LEN 000014 FS.RTN= 001000 LS.DLS= 000200 MF.ACK= 000004
CL$SFL= 000004 D$LNG 000005 FS.SET= 005000 LS.FCC= 000004 MF.CTL= 000010
CL$TYP= 000001 D$NAM 000006 FS.STM= 000000 LS.FC0= 000001 MF.DAT= 000000
CL.MU1= 000001 D$USE 000004 FS.STP= 002000 LS.FC1= 000002 MSGHDR= 000007
CL.MU2= 000002 D$$BUG= 177514 FS.STR= 001000 LS.ILS= 000200 MS.AST= 000010
CL.RES= 177774 D$$ISK= 000000 FS.TRM= 003000 LS.MAK= 000020 MS.CIP= 000200
CS.ABO= 000100 D$$L11= 000001 FS.XKL= 002000 LS.MNK= 000040 MVDAT = ****** GX
CS.BUF= 000200 D$$YNC= 000000 FS.XOF= 010000 LS.RES= 000360 M$$CRB= 000124
CS.DCR= 000400 D$$YNM= 000000 FS.XON= 007000 LS.RSV= 000300 M$$CRX= 000000
CS.DEV= 000002 ER$ABO= 000046 F$$LVL= 000001 L$$ASG= 000000 M$$FCS= 000000
CS.DIS= 000040 ER$ABT= 000011 F34DSP 000032R 002 L$$DRV= 000000 M$$MGE= 000000
CS.ENB= 000020 ER$ACC= 000042 G$$TPP= 000000 L$$P11= 000001 M$$OVR= 000000
CS.EOF= 000001 ER$ACT= 000044 G$$TSS= 000000 L$$11R= 000000 M.MAIL 000012
CS.ERR= 100000 ER$CDI= 000052 G$$TTK= 000000 L.CIQ 000026 M.MAX 000007
CS.HFE= 002000 ER$COM= 000047 G$$WRD= 000000 L.DCR 000036 M.MBL = 000016
CS.LST= 040000 ER$FCF= 000050 IE.NDA= 177662 L.FLG 000012 M.NAST 000005
CS.MTL= 004000 ER$FMT= 000005 IE.NNT= 177660 L.LDA 000024 M.NEXT 000000
CS.RNG= 000010 ER$GEN= 000007 IE.NRJ= 177666 L.LIA 000026 M.SPA 000010
CS.ROV= 000004 ER$IFC= 000030 IE.URJ= 177667 L.LLA 000002 M.STAT 000004
CS.RSN= 010000 ER$ILS= 000043 IODUN1= ****** GX L.LNG1 000054 M.TASK 000002
CS.SUC= 000001 ER$IMG= 000053 IOFLS = ****** GX L.LNO 000022 M.USE 000006
CS.TMO= 020000 ER$MLB= 000006 IOREDO= ****** GX L.LSA 000032 NC.FM0= 000000
CX.GDQ= 000001 ER$NOD= 000002 IOSUC = ****** GX L.LSF 000044 NC.FM1= 000001
CX.REQ= 000002 ER$NSD= 000003 IS.DAO= 000002 L.LVL 000001 NC.FM2= 000002
CX.UNL= 000004 ER$RES= 000001 IS.SUC= ****** GX L.NDA 000034 NETTIM= 000005
C$$CKP= 000000 ER$SSR= 000000 I$$RAR= 000000 L.NIN 000016 NE$ABO= 000046
C$$ORE= 000400 ER$SSS= 000045 I$$RDN= 000000 L.NLA 000036 NE$ABT= 000011
C$$RSH= 177564 ER$STA= 000051 I.FCN = ****** GX L.NSTA 000025 NE$ACC= 000042
NSDIS MACRO M1110 13-OCT-79 10:20 PAGE 6-3
SYMBOL TABLE
NE$ACT= 000044 NS.SUC= 000001 N$STS 000042 N.RNMC 000014 P$$P45= 000000
NE$CDI= 000052 NT$ABO= 000022 N$TCB 000004 N.ROT 000007 P$$WRD= 000000
NE$COM= 000047 NT$ACC= 000002 N$TMP 000012 N.RPS 000056 Q$$OPT= 000010
NE$FCF= 000050 NT$ADS= 000000 N$VER 000036 N.RPSC 000054 REJ 000000R
NE$FMT= 000005 NT$AKD= 000016 N$$DAT= 000030 N.RQDL 000060 RF.CLN= 000000
NE$GEN= 000007 NT$AKI= 000020 N$$DIS= 000020 N.RQID 000062 RF.CTL= 000003
NE$ILS= 000043 NT$CC = 000012 N$$INT= 000020 N.RQL = 000110 RF.TIM= 177400
NE$IMG= 000053 NT$CON= 000000 N$$LDV= 000001 N.RSRV= 000030 RF.TM0= 000400
NE$MLB= 000006 NT$DAT= 000002 N$$MOV= 000010 N.RUS 000012 RF.WTD= 000020
NE$NOD= 000002 NT$DIS= 000010 N$$OPT= 000020 N.SDE 000042 RF.WTM= 000030
NE$NSD= 000003 NT$IDC= 000034 N$$OVR= 000042 N.SDEC 000040 RF.WTS= 000010
NE$RES= 000001 NT$IDN= 000030 N$$SYS= 000001 N.SDL1 000036 RH.CNT= 000001
NE$SSR= 000000 NT$ILN= 000032 N$$USR= 000001 N.SDL2 000042 RH.EFM= 000020
NE$SSS= 000045 NT$IND= 000024 N.ACNT 000116 N.SDS1 000040 RH.HDR= 000002
NE$STA= 000051 NT$INL= 000026 N.ACTL 000114 N.SDS2 000056 RH.PRI= 000014
NE$TCN= 000040 NT$INT= 000004 N.CAC 000120 N.SEG 000006 RH.PR1= 000004
NE$TCO= 000041 NT$LS = 000014 N.CACC 000116 N.SEGZ 000002 RH.RFM= 000100
NE$TPA= 000010 NT$MOD= 000012 N.CBL = 000142 N.SFM 000036 RTTSK 000330R 002
NE$UOB= 000004 NT$NAK= 000022 N.CDA 000142 N.SFMT 000034 R$$DER= 000000
NE.ABO= 177776 NT$OFF= 000026 N.CDAC 000140 N.SGP 000040 R$$K11= 000001
NE.ACT= 177771 NT$ON = 000002 N.CID 000064 N.SGRP 000036 R$$SND= 000000
NE.CLS= 177767 NT$QRY= 000014 N.CIDC 000062 N.SND 000030 R$$11M= 000000
NE.DIS= 177777 NT$REJ= 000004 N.CPS 000106 N.SNM 000046 ST$CC = 000002
NE.FMT= 177770 NT$ROU= 000022 N.CPSC 000104 N.SNMC 000044 ST$CIR= 000003
NE.NDT= 177766 NT$RTI= 000010 N.CTL 000000 N.SOBJ 000035 ST$CIS= 000001
NE.NOD= 177774 NT$RTN= 000000 N.DDE 000010 N.SOT 000037 ST$DAT= 000005
NE.REJ= 177775 NT$SNG= 000006 N.DDEC 000006 N.SUS 000042 ST$DID= 000015
NE.RES= 177773 NT$STP= 000004 N.DDL1 000012 N.SUSR 000040 ST$DIP= 000006
NE.TIM= 177772 NT$XOF= 000020 N.DDL2 000016 PF$EIP= 000100 ST$DIR= 000012
NI.FLI= 000002 NT$XON= 000016 N.DDS1 000014 PF$ENB= 000200 ST$DIS= 000014
NI.FRI= 000004 NT.ABO= 000005 N.DDS2 000020 PF$OFF= 000000 ST$UDI= 000013
NI.FRT= 000001 NT.ABT= 000004 N.DFM 000004 PF$RLI= 000002 ST$UNR= 000011
NI.FUB= 000010 NT.ACK= 000001 N.DFMT 000010 PF$RRI= 000004 S$EMR 000006
NI.INI= 000001 NT.BOM= 000040 N.DGP 000006 PF$RVE= 000001 S$FMT 000012
NI.RLI= 000002 NT.CON= 000001 N.DGRP 000012 PF$RVR= 000040 S$LEN 000040
NI.RRI= 000004 NT.DSC= 000003 N.DNM 000014 PF$SLI= 000002 S$LNK 000022
NI.RVE= 000001 NT.EOM= 000100 N.DNMC 000012 PF$SRI= 000004 S$MLK 000024
NI.VER= 000002 NT.FCN= 037400 N.DOBJ 000011 PF$SRT= 000001 S$NKS 000010
NO.DTR= 000077 NT.INT= 000002 N.DOT 000005 PF$STA= 000003 S$RES 000014
NO.FAL= 000021 NT.LOG= 000011 N.DUS 000010 PF$SUB= 000010 S$SEC 000000
NO.FA1= 000001 NT.MD1= 000420 N.DUSR 000014 PF$UP = 000001 S$SNI 000016
NO.NCU= 000023 NT.MFL= 000002 N.LGTH= 000160 PS$NTI= 000003 S$UMR 000004
NO.RTL= 000022 NT.MOD= 000020 N.NODE 000000 PS$OFF= 000000 S$UMS 000002
NO.TAS= 000000 NT.MOM= 000000 N.OPDL 000136 PS$STR= 000001 S$UNI 000020
NO.TCL= 000017 NT.MOP= 000010 N.OPTD 000140 PS$UP = 000005 S$$WRG= 000000
NO.TC1= 000005 NT.NAK= 000002 N.PASL 000102 PS$VER= 000004 S$$YSZ= 007600
NO.TLK= 000020 NT.NFL= 000000 N.PASS 000104 PS$WT = 000002 TLACHK= ****** GX
NP$RTR= 000003 NT.SFL= 000001 N.RAC 000070 P$CHN 000004 T$$KMG= 000000
NR$IFC= 000030 NT.SOL= 000140 N.RACC 000066 P$CNT 000005 T$$MIN= 000000
NS.BOM= 000040 NT.XOF= 000004 N.RDE 000012 P$FRQ 000012 USRABT= ****** GX
NS.EOM= 000100 NT.XON= 000010 N.RDEC 000010 P$FSP 000013 USRDIS= ****** GX
NS.MFL= 000003 N$ACQ 000000 N.RFM 000006 P$LCD 000002 USRREJ= ****** GX
NS.MOM= 000000 N$ICF 000006 N.RGP 000010 P$LEN 000014 VF$RCV= 100000
NS.NFL= 000001 N$LNI 000010 N.RID 000034 P$LST 000000 VF$XMT= 040000
NS.SET= 000002 N$LVC 000022 N.RIDC 000032 P$NOD 000010 V$FLG 000000
NS.SFL= 000002 N$NOD 000032 N.RND 000000 P$PFQ 000006 V$LEN 000022
NS.SOL= 000140 N$PLD 000026 N.RNM 000016 P$TIM 000003 V$RCV 000002
NSDIS MACRO M1110 13-OCT-79 10:20 PAGE 6-4
SYMBOL TABLE
V$XMT 000012 V.ULTE 000010 WS.MOD= 000010 W.LLA 000010 W.STAT 000004
V$$CTR= 001000 V.VBL = 000026 WS.STA= 000020 W.LUN 000007 W.TASK 000002
V.CULT 000004 V.1CPQ 000022 WS.VE1= 000001 W.MBOX 000016 W.ULA 000011
V.GENQ 000016 WINDOW= 004000 W.CCBU 000006 W.MODC 000005 W.WBL = 000040
V.MBXQ 000012 WS.DIC= 000004 W.CINT 000032 W.PIO 000014 X$$DBT= 000000
V.TIME 000003 WS.DIP= 000100 W.CSND 000020 W.RCVQ 000026 $CCBRT= ****** GX
V.TIMR 000002 WS.EST= 000002 W.CTL 000000 W.SEGZ 000012 $DISQI 000000RG 002
V.TRCT 000000 WS.INT= 000040 W.INTQ 000034 W.SNDQ 000022 $MVFBF= ****** GX
V.ULT 000006 WS.KIP= 000200
. ABS. 000160 000
000050 001
$NSACP 000332 002
ERRORS DETECTED: 0
VIRTUAL MEMORY USED: 20981 WORDS ( 82 PAGES)
DYNAMIC MEMORY: 20620 WORDS ( 79 PAGES)
ELAPSED TIME: 00:00:40
NSDIS,[131,34]NSDIS/CR/-SP=[130,10]NETLIB/ML,RSXMC4/PA:1,[131,10]NSDIS
NSDIS CREATED BY MACRO ON 13-OCT-79 AT 10:21 PAGE 1
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
ABT 000046 R 4-109 #6-185
CCBGT = ****** GX 6-201 6-211
C.BUF 000014 *6-203 *6-214 6-225
C.CNT 000020 *6-209 6-215
C.LIN 000006 *6-206
C.NSP 000004 *6-204 *6-205
DIS 000040 R 4-108 #6-182
FLSHIO = ****** GX 6-197
FLSHMB = ****** GX 6-196
F34DSP 000032 R 4-100 #4-108
IODUN1 = ****** GX 5-141
IOFLS = ****** GX 6-235
IOREDO = ****** GX 6-233
IOSUC = ****** GX 4-102 5-139
IS.SUC = ****** GX 6-189
I.FCN = ****** GX 6-218
I.LN2 = ****** GX 4-94 6-188
I.PRM = ****** GX *6-188 *6-189 *6-190 6-209 6-216 6-216
MVDAT = ****** GX 5-133
M$$MGE = 000000 6-216
M.USE 000006 *5-138
REJ 000000 R 4-110 #5-129
RTTSK 000330 R 4-93 #6-238
TLACHK = ****** GX 5-130
USRABT = ****** GX 6-223
USRDIS = ****** GX 6-220
USRREJ = ****** GX 5-136
WS.DIP = 000100 6-185
WS.INT = 000040 6-186
WS.STA = 000020 6-186
W.LLA 000010 6-206
W.LUN 000007 6-195
W.MBOX 000016 6-194
W.PIO 000014 6-191 *6-193 6-231 *6-232
W.SNDQ 000022 6-182
W.STAT 000004 *6-185 *6-186
W.ULA 000011 6-205
$CCBRT = ****** GX 6-227 6-229
$DISQI 000000 RG #4-93
$MVFBF = ****** GX 6-216
NSDIS CREATED BY MACRO ON 13-OCT-79 AT 10:21 PAGE 2
MACRO CROSS REFERENCE CREF
MACRO NAME REFERENCES
CALL 4-93 5-130 5-133 5-136 6-196 6-197 6-201 6-211 6-220 6-223
6-227 6-229
CALLR #4-100 #4-102 #5-139 #5-141 #6-233 #6-235
CCBDF$ #3-42 #3-43
CNBDF$ #3-51 #3-53
CRBDF$ #3-51 #3-52
DVBDF$ #3-46 3-49
LLWDF$ #3-46 #3-48
MAP #3-41
MBXDF$ #3-46 3-47
MOVBNS #3-63 6-195
NSPSY$ #3-42 #3-44
NSSYM$ #3-51 #3-54
RECMAP #3-41
RESRG #3-41 5-137 6-230
RETURN 6-238
SAVRG #3-41 5-134 6-200
SWSTK$ #4-93
$MVFBF #3-41 6-216
$MVTBF #3-41