Trailing-Edge
-
PDP-10 Archives
-
BB-P363B-SM_1985
-
mcb/cex/cexslt.lst
There are no other files named cexslt.lst in the archive.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23
CEXSLT.M11 30-DEC-82 00:31 TABLE OF CONTENTS
2624 DECLARATIONS
2656 $DDAST - Send Asynchronous Notification
2716 $DDCCP - Control Complete
2765 $DDCRA - Kill Receives
2813 $DDGET - Get Characteristics
2861 $DDKCP - Kill Complete
2909 $DDKIL - Kill Receives and Transmits
2957 $DDMDB - Get DDM Data Base
3039 $DDRCE - Receive Enable
3087 $DDRCP - Receive Complete
3136 $DDSET - Set Characteristics
3184 $DDSTP - Stop Line
3232 $DDSTR - Start Line
3280 $DDXCP - Transmit Complete
3329 $DDXKL - Kill Transmits
3377 $DDXME - Transmit Enable
3423 $DLAST - Send Asynchronous Notification
3484 $DLCCP - Control Complete
3534 $DLCDB - Get DLC Data Base
3617 $DLGET - Get Characteristics
3665 $DLRCE - Receive Enable
3712 $DLRCP - Receive Complete
3762 $DLSET - Set Characteristics
3810 $DLSTP - Stop Line
3858 $DLSTR - Start Line
3906 $DLXCP - Transmit Complete
3956 $DLXME - Transmit Enable
4002 DDMSM - Set Function and Modifier
4058 DDMSS - Set Function and Status
4113 DDMSF - Set Function
4167 DLCSM - Set Function and Modifier
4223 DLCSS - Set Function and Status
4278 DLCSF - Set Function
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 1
CEXSLT.M11 30-DEC-82 00:31
1 .TITLE CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES
2 .IDENT /003030/
3 .ENABL LC
4
5 ;
6 ; COPYRIGHT (c) 1980, 1981, 1982
7 ; DIGITAL EQUIPMENT CORPORATION
8 ; Maynard, Massachusetts
9 ;
10 ; This software is furnished under a license and may be used
11 ; and copied only in accordance with the terms of such license
12 ; and with the inclusion of the above copyright notice. This
13 ; software or any other copies thereof may not be provided or
14 ; otherwise made available to any other person. No title to
15 ; and ownership of the software is hereby transferred.
16 ;
17 ; The information in this software is subject to change
18 ; without notice and should not be construed as a commitment
19 ; by DIGITAL EQUIPMENT CORPORATION.
20 ;
21 ; DIGITAL assumes no responsibility for the use or reliability
22 ; of its software on equipment which is not supplied by
23 ; DIGITAL.
24 ;
25
26 ;++
27 ; FACILITY: MCB Communications Executive
28 ;
29 ; FUNCTIONAL ABSTRACT:
30 ;
31 ; This module contains the routines to support
32 ; the DLC and DDM interfaces.
33 ;
34 ; ENVIRONMENT: RSX kernel mode with EIS
35 ;
36 ; AUTHOR: Alan D. Peckham, CREATION DATE: 22-Jan-81
37 ;
38 ; MODIFIED BY:
39 ;
40 ; Alan D. Peckham, 30-Jan-80: VERSION 3.2
41 ; 01 - Merged CEXDLC and CEXDDM modules.
42 ; Support expanded C.SRC and C.DST in CCBSC.
43 ; 02 - Support .CRDSP during process context switch.
44 ; 03 - Correct conditionalized D$$BUG code in $DLCDB and $DDMDB.
45 ;--
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 2
CEXSLT.M11 30-DEC-82 00:31 DECLARATIONS
47 .SBTTL DECLARATIONS
48
49 ;
50 ; INCLUDE FILES:
51 ;
52
53 .MCALL CRSH$S
54
55 ;
56 ; MACROS:
57 ;
58
59 .MACRO SLCHK$
60 .IF NE,D$$BUG
61 CALL CCBSL
62 .ENDC
63 .ENDM SLCHK$
64
65 ;
66 ; EQUATED SYMBOLS:
67 ;
68 ; None
69 ;
70 ; OWN STORAGE:
71 ;
72
73 .GLOBL .SLTNM ; Number of system lines.
74 .GLOBL .SLTTA ; System line table address
75
76 .IIF NE,<Z.DAT-4>,.ERROR Z.DAT; must be third word in PD
77 .IIF NE,<Z.PIX-4-Z.DAT>,.ERROR Z.PIX; must follow Z.DAT words
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 3
CEXSLT.M11 30-DEC-82 00:31 $DDAST - SEND ASYNCHRONOUS NOTIFICATION
79 .SBTTL $DDAST - Send Asynchronous Notification
80 ;++
81 ; FUNCTIONAL DESCRIPTION:
82 ;
83 ; This routine attempts to allocate a CCB for the DDM and queue
84 ; it to the DLC with an asynchronous status notification.
85 ;
86 ; If the CCB allocation fails, the call returns with a failure
87 ; indication.
88 ;
89 ; The following information will be inserted into the CCB
90 ; and may be examined by the DLC:
91 ; C.FNC FC.AST
92 ; C.STS given asynchronous status code
93 ; C.LIX given line index
94 ;
95 ; CALLING SEQUENCE:
96 ;
97 ; CALL $DDAST
98 ;
99 ; INPUT PARAMETERS:
100 ;
101 ; R3 = Asynchronous completion status.
102 ; R2 = line index.
103 ;
104 ; IMPLICIT INPUTS:
105 ;
106 ; None
107 ;
108 ; OUTPUT PARAMETERS:
109 ;
110 ; None
111 ;
112 ; IMPLICIT OUTPUTS:
113 ;
114 ; None
115 ;
116 ; CONDITION CODES:
117 ;
118 ; C-bit set = Resource allocation failure.
119 ; C-bit clear = Operation successful.
120 ;
121 ; SIDE EFFECTS:
122 ;
123 ; The routine $CCBGT is called.
124 ;
125 ; Registers R3 and R4 are not preserved.
126 ;--
127
128 000000' .PSECT $CODE$,I,RO
129 000000' $DDAST::PLVL$ ; Crash if not at process level.
130 000000' 004767 000000G CALL $CCBGT ; Try to get a CCB
131 000004' 103407 BCS 90$ ; and if successful
132 000006' 110264 000010 MOVB R2,C.LIX(R4) ; then set line index
133 000012' 105064 000013 CLRB C.MOD(R4) ; and no function modifier.
134 000016' 004567 000500 JSR R5,DDMSS ; Queue with status,
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 3-1
CEXSLT.M11 30-DEC-82 00:31 $DDAST - SEND ASYNCHRONOUS NOTIFICATION
135 000022' 000 000 .BYTE FC.AST,0 ; AST function and new CCB owner.
136
137 000024' 000207 90$: RETURN ; Return in shame.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 4
CEXSLT.M11 30-DEC-82 00:31 $DDCCP - CONTROL COMPLETE
139 .SBTTL $DDCCP - Control Complete
140 ;++
141 ; FUNCTIONAL DESCRIPTION:
142 ;
143 ; Return the given control CCB to the DLC with an
144 ; operation status.
145 ;
146 ; The following information will be inserted into the CCB
147 ; and may be examined by the DLC:
148 ; C.FNC FC.CCP
149 ; C.STS given control status code
150 ;
151 ; CALLING SEQUENCE:
152 ;
153 ; CALL $DDCCP
154 ;
155 ; INPUT PARAMETERS:
156 ;
157 ; R4 = Address of CCB containing:
158 ; C.LIX line index.
159 ; R3 = Operation completion status.
160 ;
161 ; IMPLICIT INPUTS:
162 ;
163 ; None
164 ;
165 ; OUTPUT PARAMETERS:
166 ;
167 ; None
168 ;
169 ; IMPLICIT OUTPUTS:
170 ;
171 ; None
172 ;
173 ; CONDITION CODES:
174 ;
175 ; None
176 ;
177 ; SIDE EFFECTS:
178 ;
179 ; Registers R3 and R4 are not preserved.
180 ;--
181
182 000026' .PSECT $CODE$,I,RO
183 000026' $DDCCP::PLVL$ ; Crash if not at process level.
184 000026' CCBCK$ ; Verify CCB address.
185 000026' 004567 000470 JSR R5,DDMSS ; Queue with status
186 000032' 022 000 .BYTE FC.CCP,0 ; and CCP function.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 5
CEXSLT.M11 30-DEC-82 00:31 $DDCRA - KILL RECEIVES
188 .SBTTL $DDCRA - Kill Receives
189 ;++
190 ; FUNCTIONAL DESCRIPTION:
191 ;
192 ; This call passes a CCB to the DDM with a request to kill
193 ; all outstanding receives.
194 ;
195 ; The following information will be inserted into the CCB
196 ; and may be examined by the DDM:
197 ; C.FNC FC.KIL
198 ; C.MOD FM.CRA
199 ;
200 ; CALLING SEQUENCE:
201 ;
202 ; CALL $DDCRA
203 ;
204 ; INPUT PARAMETERS:
205 ;
206 ; R4 = Address of CCB containing:
207 ; C.LIX line index.
208 ;
209 ; IMPLICIT INPUTS:
210 ;
211 ; None
212 ;
213 ; OUTPUT PARAMETERS:
214 ;
215 ; None
216 ;
217 ; IMPLICIT OUTPUTS:
218 ;
219 ; None
220 ;
221 ; CONDITION CODES:
222 ;
223 ; None
224 ;
225 ; SIDE EFFECTS:
226 ;
227 ; Register R4 is not preserved.
228 ;--
229
230 000034' .PSECT $CODE$,I,RO
231 000034' $DDCRA::PLVL$ ; Crash if not at process level.
232 000034' CCBCK$ ; Verify CCB address.
233 000034' 004567 000444 JSR R5,DDMSM ; Queue with
234 000040' 006 002 .BYTE FC.KIL,FM.CRA ; KIL function and CRA modifier.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 6
CEXSLT.M11 30-DEC-82 00:31 $DDGET - GET CHARACTERISTICS
236 .SBTTL $DDGET - Get Characteristics
237 ;++
238 ; FUNCTIONAL DESCRIPTION:
239 ;
240 ; This call passes a CCB to the DDM with a request to
241 ; get the characteristics of the line.
242 ;
243 ; The following information is inserted into the CCB
244 ; and may be examined by the DDM:
245 ; C.FNC FC.CTL
246 ; C.MOD FM.GET
247 ;
248 ; CALLING SEQUENCE:
249 ;
250 ; CALL $DDGET
251 ;
252 ; INPUT PARAMETERS:
253 ;
254 ; R4 = Address of CCB containing:
255 ; C.LIX line index.
256 ;
257 ; IMPLICIT INPUTS:
258 ;
259 ; None
260 ;
261 ; OUTPUT PARAMETERS:
262 ;
263 ; None
264 ;
265 ; IMPLICIT OUTPUTS:
266 ;
267 ; None
268 ;
269 ; CONDITION CODES:
270 ;
271 ; None
272 ;
273 ; SIDE EFFECTS:
274 ;
275 ; Register R4 is not preserved.
276 ;--
277
278 000042' .PSECT $CODE$,I,RO
279 000042' $DDGET::PLVL$ ; Crash if not at process level.
280 000042' CCBCK$ ; Verify CCB address.
281 000042' 004567 000436 JSR R5,DDMSM ; Queue with
282 000046' 010 014 .BYTE FC.CTL,FM.GET ; CTL function and GET modifier.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 7
CEXSLT.M11 30-DEC-82 00:31 $DDKCP - KILL COMPLETE
284 .SBTTL $DDKCP - Kill Complete
285 ;++
286 ; FUNCTIONAL DESCRIPTION:
287 ;
288 ; Return the given ccb to the DLC with an operation status.
289 ;
290 ; The following information is inserted into the CCB
291 ; and may be examined by the DLC:
292 ; C.FNC FC.KCP
293 ; C.STS given kill status code
294 ;
295 ; CALLING SEQUENCE:
296 ;
297 ; CALL $DDKCP
298 ;
299 ; INPUT PARAMETERS:
300 ;
301 ; R4 = Address of CCB containing:
302 ; C.LIX line index.
303 ; R3 = Operation completion status.
304 ;
305 ; IMPLICIT INPUTS:
306 ;
307 ; None
308 ;
309 ; OUTPUT PARAMETERS:
310 ;
311 ; None
312 ;
313 ; IMPLICIT OUTPUTS:
314 ;
315 ; None
316 ;
317 ; CONDITION CODES:
318 ;
319 ; None
320 ;
321 ; SIDE EFFECTS:
322 ;
323 ; Registers R3 and R4 are not preserved.
324 ;--
325
326 000050' .PSECT $CODE$,I,RO
327 000050' $DDKCP::PLVL$ ; Crash if not at process level.
328 000050' CCBCK$ ; Verify CCB address.
329 000050' 004567 000446 JSR R5,DDMSS ; Queue with status
330 000054' 020 000 .BYTE FC.KCP,0 ; and KCP function.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 8
CEXSLT.M11 30-DEC-82 00:31 $DDKIL - KILL RECEIVES AND TRANSMITS
332 .SBTTL $DDKIL - Kill Receives and Transmits
333 ;++
334 ; FUNCTIONAL DESCRIPTION:
335 ;
336 ; The call passes a CCB to the DDM with a request to kill
337 ; all outstanding transmits and receives.
338 ;
339 ; The following information is inserted into the CCB
340 ; and may be examined by the DDM:
341 ; C.FNC FC.KIL
342 ; C.MOD FM.KIL
343 ;
344 ; CALLING SEQUENCE:
345 ;
346 ; CALL $DDKIL
347 ;
348 ; INPUT PARAMETERS:
349 ;
350 ; R4 = Address of CCB containing:
351 ; C.LIX line index.
352 ;
353 ; IMPLICIT INPUTS:
354 ;
355 ; None
356 ;
357 ; OUTPUT PARAMETERS:
358 ;
359 ; None
360 ;
361 ; IMPLICIT OUTPUTS:
362 ;
363 ; None
364 ;
365 ; CONDITION CODES:
366 ;
367 ; None
368 ;
369 ; SIDE EFFECTS:
370 ;
371 ; Register R4 is not preserved.
372 ;--
373
374 000056' .PSECT $CODE$,I,RO
375 000056' $DDKIL::PLVL$ ; Crash if not at process level.
376 000056' CCBCK$ ; Verify CCB address.
377 000056' 004567 000422 JSR R5,DDMSM ; Queue with
378 000062' 006 000 .BYTE FC.KIL,FM.KIL ; KIL function and KIL modifier.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 9
CEXSLT.M11 30-DEC-82 00:31 $DDMDB - GET DDM DATA BASE
380 .SBTTL $DDMDB - Get DDM Data Base
381 ;++
382 ; FUNCTIONAL DESCRIPTION:
383 ;
384 ; Get access to the DDM data base for a system line.
385 ;
386 ; This call can only be made from the DDM owning the line.
387 ;
388 ; CALLING SEQUENCE:
389 ;
390 ; CALL $DDMDB
391 ;
392 ; INPUT PARAMETERS:
393 ;
394 ; R5 = line index.
395 ;
396 ; IMPLICIT INPUTS:
397 ;
398 ; None
399 ;
400 ; OUTPUT PARAMETERS:
401 ;
402 ; R5 = address of the DDM data base.
403 ;
404 ; IMPLICIT OUTPUTS:
405 ;
406 ; None
407 ;
408 ; CONDITION CODES:
409 ;
410 ; None
411 ;
412 ; SIDE EFFECTS:
413 ;
414 ; None
415 ;--
416
417 000064' .PSECT $CODE$,I,RO
418 000064' $DDMDB::PLVL$ ; Crash if not at process level.
419 000064' PUSH$S R1
420 000066' 010501 MOV R5,R1
421 000070' 005301 DEC R1 ; If line index
422
423 001 .IF NE,D$$BUG
424 CMP .SLTNM,R1 ; is out of range
425 BLO 100$ ; then crash.
426 .IFTF
427
428 000072' 070127 000010 MUL #L.LEN,R1
429 000076' 066701 000000G ADD .SLTTA,R1
430 000102' 116101 000000 MOVB L.DDM(R1),R1
431 000106' 006301 ASL R1
432 000110' 016101 000000G MOV .PDBVB(R1),R1
433
434 .IFT
435 CMP @.CRPDB,(R1) ; If not owning code
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 9-1
CEXSLT.M11 30-DEC-82 00:31 $DDMDB - GET DDM DATA BASE
436 BNE 101$ ; then crash,
437 .IFTF
438
439 000114' 016705 000000G MOV .CRPDB,R5 ; otherwise
440 000120' 005725 TST (R5)+
441 000122' 016725 000000G MOV .CRDSP,(R5)+ ; save old context.
442 000126' 016725 000000G MOV .CRDAT+0,(R5)+
443 000132' 016715 000002G MOV .CRDAT+2,(R5)
444 000136' 010167 000000G MOV R1,.CRPDB ; Set new process
445 000142' 005721 TST (R1)+ ; and pick up
446 000144' 012167 000000G MOV (R1)+,.CRDSP ; dispatch address,
447 000150' MAP$ (R1)
448 000154' 012167 000000G MOV (R1)+,.CRDAT+0 ; bias,
449 000160' 011105 MOV (R1),R5
450 000162' 012167 000002G MOV (R1)+,.CRDAT+2 ; address,
451 000166' 111167 000000G MOVB (R1),.CRPIX ; and index.
452 000172' POP$S R1
453 000174' 000207 RETURN
454
455 .IFT
456 100$: POP$S R1
457 CRSH$S LIX ; Invalid line index
458 101$: POP$S R1
459 CRSH$S DDO ; DDM data base being accessed by stranger
460 000 .ENDC
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 10
CEXSLT.M11 30-DEC-82 00:31 $DDRCE - RECEIVE ENABLE
462 .SBTTL $DDRCE - Receive Enable
463 ;++
464 ; FUNCTIONAL DESCRIPTION:
465 ;
466 ; This routine is used to return CCB/buffers to the DDM
467 ; after the DLC no longer needs them.
468 ;
469 ; The following information is inserted into the CCB
470 ; and may be examined by the DDM:
471 ; C.FNC FC.RCE
472 ; C.MOD FM.DAT
473 ;
474 ; CALLING SEQUENCE:
475 ;
476 ; CALL $DDRCE
477 ;
478 ; INPUT PARAMETERS:
479 ;
480 ; R4 = Address of CCB chain, the first containing:
481 ; C.LIX line index.
482 ;
483 ; IMPLICIT INPUTS:
484 ;
485 ; None
486 ;
487 ; OUTPUT PARAMETERS:
488 ;
489 ; None
490 ;
491 ; IMPLICIT OUTPUTS:
492 ;
493 ; None
494 ;
495 ; CONDITION CODES:
496 ;
497 ; None
498 ;
499 ; SIDE EFFECTS:
500 ;
501 ; Register R4 is not preserved.
502 ;--
503
504 000176' .PSECT $CODE$,I,RO
505 000176' $DDRCE::PLVL$ ; Crash if not at process level.
506 000176' CCBCK$ ; Verify CCB address.
507 000176' 004567 000302 JSR R5,DDMSM ; Queue with
508 000202' 004 000 .BYTE FC.RCE,FM.DAT ; RCE function and DAT modifier.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 11
CEXSLT.M11 30-DEC-82 00:31 $DDRCP - RECEIVE COMPLETE
510 .SBTTL $DDRCP - Receive Complete
511 ;++
512 ; FUNCTIONAL DESCRIPTION:
513 ;
514 ; Pass the given receive RDB to the DLC with an
515 ; operation status.
516 ;
517 ; The following information is inserted into the CCB
518 ; and may be examined by the DLC:
519 ; C.FNC FC.RCP
520 ; C.STS given receive status code
521 ;
522 ; CALLING SEQUENCE:
523 ;
524 ; CALL $DDRCP
525 ;
526 ; INPUT PARAMETERS:
527 ;
528 ; R4 = Address of CCB chain, the first containing:
529 ; C.LIX line index.
530 ; R3 = Operation completion status.
531 ;
532 ; IMPLICIT INPUTS:
533 ;
534 ; None
535 ;
536 ; OUTPUT PARAMETERS:
537 ;
538 ; None
539 ;
540 ; IMPLICIT OUTPUTS:
541 ;
542 ; None
543 ;
544 ; CONDITION CODES:
545 ;
546 ; None
547 ;
548 ; SIDE EFFECTS:
549 ;
550 ; Registers R3 and R4 are not preserved.
551 ;--
552
553 000204' .PSECT $CODE$,I,RO
554 000204' $DDRCP::PLVL$ ; Crash if not at process level.
555 000204' CCBCK$ ; Verify CCB address.
556 000204' 004567 000312 JSR R5,DDMSS ; Queue with status
557 000210' 016 000 .BYTE FC.RCP,0 ; and RCP function.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 12
CEXSLT.M11 30-DEC-82 00:31 $DDSET - SET CHARACTERISTICS
559 .SBTTL $DDSET - Set Characteristics
560 ;++
561 ; FUNCTIONAL DESCRIPTION:
562 ;
563 ; This call passes a CCB to the DDM with a request to set the
564 ; charactersistics of the line.
565 ;
566 ; The following information is inserted into the CCB
567 ; and may be examined by the DDM:
568 ; C.FNC FC.CTL
569 ; C.MOD FM.SET
570 ;
571 ; CALLING SEQUENCE:
572 ;
573 ; CALL $DDSET
574 ;
575 ; INPUT PARAMETERS:
576 ;
577 ; R4 = Address of CCB containing:
578 ; C.LIX line index.
579 ;
580 ; IMPLICIT INPUTS:
581 ;
582 ; None
583 ;
584 ; OUTPUT PARAMETERS:
585 ;
586 ; None
587 ;
588 ; IMPLICIT OUTPUTS:
589 ;
590 ; None
591 ;
592 ; CONDITION CODES:
593 ;
594 ; None
595 ;
596 ; SIDE EFFECTS:
597 ;
598 ; Register R4 is not preserved.
599 ;--
600
601 000212' .PSECT $CODE$,I,RO
602 000212' $DDSET::PLVL$ ; Crash if not at process level.
603 000212' CCBCK$ ; Verify CCB address.
604 000212' 004567 000266 JSR R5,DDMSM ; Queue with
605 000216' 010 012 .BYTE FC.CTL,FM.SET ; CTL function and SET modifier.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 13
CEXSLT.M11 30-DEC-82 00:31 $DDSTP - STOP LINE
607 .SBTTL $DDSTP - Stop Line
608 ;++
609 ; FUNCTIONAL DESCRIPTION:
610 ;
611 ; This call passes a CCB to the DDM with a request to stop
612 ; the specified line.
613 ;
614 ; The following information is inserted into the CCB
615 ; and may be examined by the DDM:
616 ; C.FNC FC.CTL
617 ; C.MOD FM.STP
618 ;
619 ; CALLING SEQUENCE:
620 ;
621 ; CALL $DDSTP
622 ;
623 ; INPUT PARAMETERS:
624 ;
625 ; R4 = Address of CCB containing:
626 ; C.LIX line index.
627 ;
628 ; IMPLICIT INPUTS:
629 ;
630 ; None
631 ;
632 ; OUTPUT PARAMETERS:
633 ;
634 ; None
635 ;
636 ; IMPLICIT OUTPUTS:
637 ;
638 ; None
639 ;
640 ; CONDITION CODES:
641 ;
642 ; None
643 ;
644 ; SIDE EFFECTS:
645 ;
646 ; Register R4 is not preserved.
647 ;--
648
649 000220' .PSECT $CODE$,I,RO
650 000220' $DDSTP::PLVL$ ; Crash if not at process level.
651 000220' CCBCK$ ; Verify CCB address.
652 000220' 004567 000260 JSR R5,DDMSM ; Queue with
653 000224' 010 004 .BYTE FC.CTL,FM.STP ; CTL function and STP modifier.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 14
CEXSLT.M11 30-DEC-82 00:31 $DDSTR - START LINE
655 .SBTTL $DDSTR - Start Line
656 ;++
657 ; FUNCTIONAL DESCRIPTION:
658 ;
659 ; This call passes a CCB to the DDM with a request to start
660 ; the specified line.
661 ;
662 ; The following information is inserted into the CCB
663 ; and may be examined by the DDM:
664 ; C.FNC FC.CTL
665 ; C.MOD FM.STR
666 ;
667 ; CALLING SEQUENCE:
668 ;
669 ; CALL $DDSTR
670 ;
671 ; INPUT PARAMETERS:
672 ;
673 ; R4 = Address of CCB containing:
674 ; C.LIX line index.
675 ;
676 ; IMPLICIT INPUTS:
677 ;
678 ; None
679 ;
680 ; OUTPUT PARAMETERS:
681 ;
682 ; None
683 ;
684 ; IMPLICIT OUTPUTS:
685 ;
686 ; None
687 ;
688 ; CONDITION CODES:
689 ;
690 ; None
691 ;
692 ; SIDE EFFECTS:
693 ;
694 ; Register R4 is not preserved.
695 ;--
696
697 000226' .PSECT $CODE$,I,RO
698 000226' $DDSTR::PLVL$ ; Crash if not at process level.
699 000226' CCBCK$ ; Verify CCB address.
700 000226' 004567 000252 JSR R5,DDMSM ; Queue with
701 000232' 010 002 .BYTE FC.CTL,FM.STR ; CTL function and STR modifier.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 15
CEXSLT.M11 30-DEC-82 00:31 $DDXCP - TRANSMIT COMPLETE
703 .SBTTL $DDXCP - Transmit Complete
704 ;++
705 ; FUNCTIONAL DESCRIPTION:
706 ;
707 ; Return the given transmit CCB/buffer chain to the DLC
708 ; with an operation status.
709 ;
710 ; The following information is inserted into the CCB
711 ; and may be examined by the DLC:
712 ; C.FNC FC.XCP
713 ; C.STS given transmit status code
714 ;
715 ; CALLING SEQUENCE:
716 ;
717 ; CALL $DDXCP
718 ;
719 ; INPUT PARAMETERS:
720 ;
721 ; R4 = Address of CCB chain, the first containing:
722 ; C.LIX line index.
723 ; R3 = Operation completion status.
724 ;
725 ; IMPLICIT INPUTS:
726 ;
727 ; None
728 ;
729 ; OUTPUT PARAMETERS:
730 ;
731 ; None
732 ;
733 ; IMPLICIT OUTPUTS:
734 ;
735 ; None
736 ;
737 ; CONDITION CODES:
738 ;
739 ; None
740 ;
741 ; SIDE EFFECTS:
742 ;
743 ; Registers R3 and R4 are not preserved.
744 ;--
745
746 000234' .PSECT $CODE$,I,RO
747 000234' $DDXCP::PLVL$ ; Crash if not at process level.
748 000234' CCBCK$ ; Verify CCB address.
749 000234' 004567 000262 JSR R5,DDMSS ; Queue with status
750 000240' 014 000 .BYTE FC.XCP,0 ; and XCP function.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 16
CEXSLT.M11 30-DEC-82 00:31 $DDXKL - KILL TRANSMITS
752 .SBTTL $DDXKL - Kill Transmits
753 ;++
754 ; FUNCTIONAL DESCRIPTION:
755 ;
756 ; This call passes a CCB to the DDM with a request to kill
757 ; all outstanding transmits.
758 ;
759 ; The following information is inserted into the CCB
760 ; and may be examined by the DDM:
761 ; C.FNC FC.KIL
762 ; C.MOD FM.XKL
763 ;
764 ; CALLING SEQUENCE:
765 ;
766 ; CALL $DDXKL
767 ;
768 ; INPUT PARAMETERS:
769 ;
770 ; R4 = Address of CCB containing:
771 ; C.LIX line index.
772 ;
773 ; IMPLICIT INPUTS:
774 ;
775 ; None
776 ;
777 ; OUTPUT PARAMETERS:
778 ;
779 ; None
780 ;
781 ; IMPLICIT OUTPUTS:
782 ;
783 ; None
784 ;
785 ; CONDITION CODES:
786 ;
787 ; None
788 ;
789 ; SIDE EFFECTS:
790 ;
791 ; Register R4 is not preserved.
792 ;--
793
794 000242' .PSECT $CODE$,I,RO
795 000242' $DDXKL::PLVL$ ; Crash if not at process level.
796 000242' CCBCK$ ; Verify CCB address.
797 000242' 004567 000236 JSR R5,DDMSM ; Queue with
798 000246' 006 004 .BYTE FC.KIL,FM.XKL ; KIL function and XKL modifier.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 17
CEXSLT.M11 30-DEC-82 00:31 $DDXME - TRANSMIT ENABLE
800 .SBTTL $DDXME - Transmit Enable
801 ;++
802 ; FUNCTIONAL DESCRIPTION:
803 ;
804 ; This call passes a CCB/buffer chain to the DDM for transmission.
805 ;
806 ; The following information is inserted into the CCB
807 ; and may be examined by the DDM:
808 ; C.FNC FC.XME
809 ;
810 ; CALLING SEQUENCE:
811 ;
812 ; CALL $DDXME
813 ;
814 ; INPUT PARAMETERS:
815 ;
816 ; R4 = Address of CCB chain, the first containing:
817 ; C.LIX line index.
818 ;
819 ; IMPLICIT INPUTS:
820 ;
821 ; None
822 ;
823 ; OUTPUT PARAMETERS:
824 ;
825 ; None
826 ;
827 ; IMPLICIT OUTPUTS:
828 ;
829 ; None
830 ;
831 ; CONDITION CODES:
832 ;
833 ; None
834 ;
835 ; SIDE EFFECTS:
836 ;
837 ; Register R4 is not preserved.
838 ;--
839
840 000250' .PSECT $CODE$,I,RO
841 000250' $DDXME::PLVL$ ; Crash if not at process level.
842 000250' CCBCK$ ; Verify CCB address.
843 000250' 004567 000254 JSR R5,DDMSF ; Queue with
844 000254' 002 000 .BYTE FC.XME,0 ; XME function.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 18
CEXSLT.M11 30-DEC-82 00:31 $DLAST - SEND ASYNCHRONOUS NOTIFICATION
846 .SBTTL $DLAST - Send Asynchronous Notification
847 ;++
848 ; FUNCTIONAL DESCRIPTION:
849 ;
850 ; This routine attempts to allocate a CCB for the DLC and
851 ; queue it to the LLC with an asynchronous status notification.
852 ;
853 ; If the CCB allocation fails, the call returns with a failure
854 ; indication.
855 ;
856 ; The following information will be inserted into the CCB and
857 ; may be examined by the LLC:
858 ; C.FNC FC.AST
859 ; C.LIX given line index
860 ; C.PIX 0
861 ; C.STS given asynchronous status code
862 ;
863 ; CALLING SEQUENCE:
864 ;
865 ; CALL $DLAST
866 ;
867 ; INPUT PARAMETERS:
868 ;
869 ; R3 = Asynchronous status code.
870 ; R2 = Line index.
871 ;
872 ; IMPLICIT INPUTS:
873 ;
874 ; None
875 ;
876 ; OUTPUT PARAMETERS:
877 ;
878 ; None
879 ;
880 ; IMPLICIT OUTPUTS:
881 ;
882 ; None
883 ;
884 ; CONDITION CODES:
885 ;
886 ; C-bit set = Resource allocation failure.
887 ; C-bit clear = Operation succeeded.
888 ;
889 ; SIDE EFFECTS:
890 ;
891 ; The routine $CCBGT is called.
892 ;
893 ; Registers R3 and R4 are not preserved.
894 ;--
895
896 000256' .PSECT $CODE$,I,RO
897 000256' $DLAST::PLVL$ ; Crash if not at process level.
898 000256' 004767 000000G CALL $CCBGT ; Try to get a CCB
899 000262' 103407 BCS 90$ ; and if successful
900 000264' 110264 000010 MOVB R2,C.LIX(R4) ; then set line index
901 000270' 105064 000013 CLRB C.MOD(R4) ; and no function modifier.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 18-1
CEXSLT.M11 30-DEC-82 00:31 $DLAST - SEND ASYNCHRONOUS NOTIFICATION
902 000274' 004567 000260 JSR R5,DLCSS ; Queue with status,
903 000300' 000 000 .BYTE FC.AST,0 ; AST function and new CCB owner.
904
905 000302' 000207 90$: RETURN ; Return in shame.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 19
CEXSLT.M11 30-DEC-82 00:31 $DLCCP - CONTROL COMPLETE
907 .SBTTL $DLCCP - Control Complete
908 ;++
909 ; FUNCTIONAL DESCRIPTION:
910 ;
911 ; Return the given control CCB to the LLC with an
912 ; operation status.
913 ;
914 ; The following information will be inserted into the CCB
915 ; and may be examined by the LLC:
916 ; C.FNC FC.CCP
917 ; C.PIX 0
918 ; C.STS given control status code
919 ;
920 ; CALLING SEQUENCE:
921 ;
922 ; CALL $DLCCP
923 ;
924 ; INPUT PARAMETERS:
925 ;
926 ; R4 = Address of CCB containing:
927 ; C.LIX line index.
928 ; R3 = Operation completion status code.
929 ;
930 ; IMPLICIT INPUTS:
931 ;
932 ; None
933 ;
934 ; OUTPUT PARAMETERS:
935 ;
936 ; None
937 ;
938 ; IMPLICIT OUTPUTS:
939 ;
940 ; None
941 ;
942 ; CONDITION CODES:
943 ;
944 ; None
945 ;
946 ; SIDE EFFECTS:
947 ;
948 ; Registers R3 and R4 are not preserved.
949 ;--
950
951 000304' .PSECT $CODE$,I,RO
952 000304' $DLCCP::PLVL$ ; Crash if not at process level.
953 000304' CCBCK$ ; Verify CCB address.
954 000304' 004567 000250 JSR R5,DLCSS
955 000310' 022 000 .BYTE FC.CCP,0
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 20
CEXSLT.M11 30-DEC-82 00:31 $DLCDB - GET DLC DATA BASE
957 .SBTTL $DLCDB - Get DLC Data Base
958 ;++
959 ; FUNCTIONAL DESCRIPTION:
960 ;
961 ; Get access to the DLC data base for a system line.
962 ;
963 ; This call can only be made from the DLC owning the line.
964 ;
965 ; CALLING SEQUENCE:
966 ;
967 ; CALL $DLCDB
968 ;
969 ; INPUT PARAMETERS:
970 ;
971 ; R5 = line index.
972 ;
973 ; IMPLICIT INPUTS:
974 ;
975 ; .CRPIX = process index of current process.
976 ;
977 ; OUTPUT PARAMETERS:
978 ;
979 ; R5 = address of system line table.
980 ;
981 ; IMPLICIT OUTPUTS:
982 ;
983 ; KISAR6 = mapped to the system line table.
984 ;
985 ; CONDITION CODES:
986 ;
987 ; None
988 ;
989 ; SIDE EFFECTS:
990 ;
991 ; None
992 ;--
993
994 000312' .PSECT $CODE$,I,RO
995 000312' $DLCDB::PLVL$ ; Crash if not at process level.
996 000312' PUSH$S R1
997 000314' 010501 MOV R5,R1
998 000316' 005301 DEC R1 ; If line index
999
1000 001 .IF NE,D$$BUG
1001 CMP .SLTNM,R1 ; is out of range
1002 BLO 100$ ; then crash.
1003 .IFTF
1004
1005 000320' 070127 000010 MUL #L.LEN,R1
1006 000324' 066701 000000G ADD .SLTTA,R1
1007 000330' 116101 000002 MOVB L.DLC(R1),R1
1008 000334' 006301 ASL R1
1009 000336' 016101 000000G MOV .PDBVB(R1),R1
1010
1011 .IFT
1012 CMP @.CRPDB,(R1) ; If not owning code
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 20-1
CEXSLT.M11 30-DEC-82 00:31 $DLCDB - GET DLC DATA BASE
1013 BNE 101$ ; then crash,
1014 .IFTF
1015
1016
1017 000342' 016705 000000G MOV .CRPDB,R5 ; otherwise
1018 000346' 005725 TST (R5)+
1019 000350' 016725 000000G MOV .CRDSP,(R5)+ ; save old context.
1020 000354' 016725 000000G MOV .CRDAT+0,(R5)+
1021 000360' 016715 000002G MOV .CRDAT+2,(R5)
1022 000364' 010167 000000G MOV R1,.CRPDB ; Set new process
1023 000370' 005721 TST (R1)+ ; and pick up
1024 000372' 012167 000000G MOV (R1)+,.CRDSP ; dispatch address,
1025 000376' MAP$ (R1)
1026 000402' 012167 000000G MOV (R1)+,.CRDAT+0 ; bias,
1027 000406' 011105 MOV (R1),R5
1028 000410' 012167 000002G MOV (R1)+,.CRDAT+2 ; address,
1029 000414' 111167 000000G MOVB (R1),.CRPIX ; and index.
1030 000420' POP$S R1
1031 000422' 000207 RETURN
1032
1033 .IFT
1034 100$: POP$S R1
1035 CRSH$S LIX ; Invalid line index
1036 101$: POP$S R1
1037 CRSH$S DLO ; DDM data base being accessed by stranger
1038 000 .ENDC
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 21
CEXSLT.M11 30-DEC-82 00:31 $DLGET - GET CHARACTERISTICS
1040 .SBTTL $DLGET - Get Characteristics
1041 ;++
1042 ; FUNCTIONAL DESCRIPTION:
1043 ;
1044 ; This call passes a CCB to the DLC with a request to get
1045 ; the characteristics of the line.
1046 ;
1047 ; The following information will be inserted into the CCB
1048 ; and may be examined by the DLC:
1049 ; C.FNC FC.CTL
1050 ; C.MOD FM.GET
1051 ;
1052 ; CALLING SEQUENCE:
1053 ;
1054 ; CALL $DLGET
1055 ;
1056 ; INPUT PARAMETERS:
1057 ;
1058 ; R4 = Address of CCB containing:
1059 ; C.LIX line index.
1060 ;
1061 ; IMPLICIT INPUTS:
1062 ;
1063 ; None
1064 ;
1065 ; OUTPUT PARAMETERS:
1066 ;
1067 ; None
1068 ;
1069 ; IMPLICIT OUTPUTS:
1070 ;
1071 ; None
1072 ;
1073 ; CONDITION CODES:
1074 ;
1075 ; None
1076 ;
1077 ; SIDE EFFECTS:
1078 ;
1079 ; Register R4 is not preserved.
1080 ;--
1081
1082 000424' .PSECT $CODE$,I,RO
1083 000424' $DLGET::PLVL$ ; Crash if not at process level.
1084 000424' CCBCK$ ; Verify CCB address.
1085 000424' 004567 000112 JSR R5,DLCSM
1086 000430' 010 014 .BYTE FC.CTL,FM.GET
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 22
CEXSLT.M11 30-DEC-82 00:31 $DLRCE - RECEIVE ENABLE
1088 .SBTTL $DLRCE - Receive Enable
1089 ;++
1090 ; FUNCTIONAL DESCRIPTION:
1091 ;
1092 ; This routine is used to return CCB/buffers to the DDM
1093 ; after the LLC no longer needs them.
1094 ;
1095 ; The following information will be inserted in the CCB
1096 ; and may be examined by the DLC:
1097 ; C.FNC FC.RCE
1098 ;
1099 ; CALLING SEQUENCE:
1100 ;
1101 ; CALL $DLRCE
1102 ;
1103 ; INPUT PARAMETERS:
1104 ;
1105 ; R4 = Address of CCB chain, the first containing:
1106 ; C.LIX line index.
1107 ;
1108 ; IMPLICIT INPUTS:
1109 ;
1110 ; None
1111 ;
1112 ; OUTPUT PARAMETERS:
1113 ;
1114 ; None
1115 ;
1116 ; IMPLICIT OUTPUTS:
1117 ;
1118 ; None
1119 ;
1120 ; CONDITION CODES:
1121 ;
1122 ; None
1123 ;
1124 ; SIDE EFFECTS:
1125 ;
1126 ; Register R4 is not preserved.
1127 ;--
1128
1129 000432' .PSECT $CODE$,I,RO
1130 000432' $DLRCE::PLVL$ ; Crash if not at process level.
1131 000432' CCBCK$ ; Verify CCB address.
1132 000432' 004567 000130 JSR R5,DLCSF
1133 000436' 004 000 .BYTE FC.RCE,0
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 23
CEXSLT.M11 30-DEC-82 00:31 $DLRCP - RECEIVE COMPLETE
1135 .SBTTL $DLRCP - Receive Complete
1136 ;++
1137 ; FUNCTIONAL DESCRIPTION:
1138 ;
1139 ; Pass the given chain of CCB/buffers to the LLC with the
1140 ; given operation status.
1141 ;
1142 ; The following information will be inserted into the CCB
1143 ; and may be examined by the LLC:
1144 ; C.FNC FC.RCP
1145 ; C.PIX 0
1146 ; C.STS given receive status code.
1147 ;
1148 ; CALLING SEQUENCE:
1149 ;
1150 ; CALL $DLRCP
1151 ;
1152 ; INPUT PARAMETERS:
1153 ;
1154 ; R4 = Address of CCB chain, the first containing:
1155 ; C.LIX line index.
1156 ; R3 = Operation complete status code.
1157 ;
1158 ; IMPLICIT INPUTS:
1159 ;
1160 ; None
1161 ;
1162 ; OUTPUT PARAMETERS:
1163 ;
1164 ; None
1165 ;
1166 ; IMPLICIT OUTPUTS:
1167 ;
1168 ; None
1169 ;
1170 ; CONDITION CODES:
1171 ;
1172 ; None
1173 ;
1174 ; SIDE EFFECTS:
1175 ;
1176 ; Registers R3 and R4 are not preserved.
1177 ;--
1178
1179 000440' .PSECT $CODE$,I,RO
1180 000440' $DLRCP::PLVL$ ; Crash if not at process level.
1181 000440' CCBCK$ ; Verify CCB address.
1182 000440' 004567 000114 JSR R5,DLCSS
1183 000444' 016 000 .BYTE FC.RCP,0
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 24
CEXSLT.M11 30-DEC-82 00:31 $DLSET - SET CHARACTERISTICS
1185 .SBTTL $DLSET - Set Characteristics
1186 ;++
1187 ; FUNCTIONAL DESCRIPTION:
1188 ;
1189 ; This call passes a CCB to the DLC with a request to set
1190 ; the characteristics of the line.
1191 ;
1192 ; The following information will be inserted into the CCB
1193 ; and may be examined by the DLC:
1194 ; C.FNC FC.CTL
1195 ; C.MOD FM.SET
1196 ;
1197 ; CALLING SEQUENCE:
1198 ;
1199 ; CALL $DLSET
1200 ;
1201 ; INPUT PARAMETERS:
1202 ;
1203 ; R4 = Address of CCB conatining:
1204 ; C.LIX line index.
1205 ;
1206 ; IMPLICIT INPUTS:
1207 ;
1208 ; None
1209 ;
1210 ; OUTPUT PARAMETERS:
1211 ;
1212 ; None
1213 ;
1214 ; IMPLICIT OUTPUTS:
1215 ;
1216 ; None
1217 ;
1218 ; CONDITION CODES:
1219 ;
1220 ; None
1221 ;
1222 ; SIDE EFFECTS:
1223 ;
1224 ; Register R4 is not preserved.
1225 ;--
1226
1227 000446' .PSECT $CODE$,I,RO
1228 000446' $DLSET::PLVL$ ; Crash if not at process level.
1229 000446' CCBCK$ ; Verify CCB address.
1230 000446' 004567 000070 JSR R5,DLCSM
1231 000452' 010 012 .BYTE FC.CTL,FM.SET
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 25
CEXSLT.M11 30-DEC-82 00:31 $DLSTP - STOP LINE
1233 .SBTTL $DLSTP - Stop Line
1234 ;++
1235 ; FUNCTIONAL DESCRIPTION:
1236 ;
1237 ; This call passes a CCB to the DLC with a request to stop
1238 ; the specified line.
1239 ;
1240 ; The following information will be inserted into the CCB
1241 ; and may be examined by the DLC:
1242 ; C.FNC FC.CTL
1243 ; C.MOD FM.STP
1244 ;
1245 ; CALLING SEQUENCE:
1246 ;
1247 ; CALL $DLSTP
1248 ;
1249 ; INPUT PARAMETERS:
1250 ;
1251 ; R4 = Address of CCB containing:
1252 ; C.LIX line index.
1253 ;
1254 ; IMPLICIT INPUTS:
1255 ;
1256 ; None
1257 ;
1258 ; OUTPUT PARAMETERS:
1259 ;
1260 ; None
1261 ;
1262 ; IMPLICIT OUTPUTS:
1263 ;
1264 ; None
1265 ;
1266 ; CONDITION CODES:
1267 ;
1268 ; None
1269 ;
1270 ; SIDE EFFECTS:
1271 ;
1272 ; Register R4 is not preserved.
1273 ;--
1274
1275 000454' .PSECT $CODE$,I,RO
1276 000454' $DLSTP::PLVL$ ; Crash if not at process level.
1277 000454' CCBCK$ ; Verify CCB address.
1278 000454' 004567 000062 JSR R5,DLCSM
1279 000460' 010 004 .BYTE FC.CTL,FM.STP
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 26
CEXSLT.M11 30-DEC-82 00:31 $DLSTR - START LINE
1281 .SBTTL $DLSTR - Start Line
1282 ;++
1283 ; FUNCTIONAL DESCRIPTION:
1284 ;
1285 ; The call passes a CCB to the DLC with a request to start
1286 ; the specified line.
1287 ;
1288 ; The following information will be inserted in the CCB
1289 ; and may be examined by the DLC:
1290 ; C.FNC FC.CTL
1291 ; C.MOD FM.STR
1292 ;
1293 ; CALLING SEQUENCE:
1294 ;
1295 ; CALL $DLSTR
1296 ;
1297 ; INPUT PARAMETERS:
1298 ;
1299 ; R4 = Address of CCB containing:
1300 ; C.LIX line index.
1301 ;
1302 ; IMPLICIT INPUTS:
1303 ;
1304 ; None
1305 ;
1306 ; OUTPUT PARAMETERS:
1307 ;
1308 ; None
1309 ;
1310 ; IMPLICIT OUTPUTS:
1311 ;
1312 ; None
1313 ;
1314 ; CONDITION CODES:
1315 ;
1316 ; None
1317 ;
1318 ; SIDE EFFECTS:
1319 ;
1320 ; Register R4 is not preserved.
1321 ;--
1322
1323 000462' .PSECT $CODE$,I,RO
1324 000462' $DLSTR::PLVL$ ; Crash if not at process level.
1325 000462' CCBCK$ ; Verify CCB address.
1326 000462' 004567 000054 JSR R5,DLCSM
1327 000466' 010 002 .BYTE FC.CTL,FM.STR
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 27
CEXSLT.M11 30-DEC-82 00:31 $DLXCP - TRANSMIT COMPLETE
1329 .SBTTL $DLXCP - Transmit Complete
1330 ;++
1331 ; FUNCTIONAL DESCRIPTION:
1332 ;
1333 ; Return a given transmit CCB/buffer chain to the LLC
1334 ; with an operation status.
1335 ;
1336 ; The following information will be inserted into the CCB
1337 ; and may be examined by the LLC:
1338 ; C.FNC FC.XCP
1339 ; C.PIX 0
1340 ; C.STS given transmit status code.
1341 ;
1342 ; CALLING SEQUENCE:
1343 ;
1344 ; CALL $DLXCP
1345 ;
1346 ; INPUT PARAMETERS:
1347 ;
1348 ; R4 = Address of CCB chain, the first containing:
1349 ; C.LIX line index.
1350 ; R3 = Operation completion status code.
1351 ;
1352 ; IMPLICIT INPUTS:
1353 ;
1354 ; None
1355 ;
1356 ; OUTPUT PARAMETERS:
1357 ;
1358 ; None
1359 ;
1360 ; IMPLICIT OUTPUTS:
1361 ;
1362 ; None
1363 ;
1364 ; CONDITION CODES:
1365 ;
1366 ; None
1367 ;
1368 ; SIDE EFFECTS:
1369 ;
1370 ; Registers R3 and R4 are not preserved.
1371 ;--
1372
1373 000470' .PSECT $CODE$,I,RO
1374 000470' $DLXCP::PLVL$ ; Crash if not at process level.
1375 000470' CCBCK$ ; Verify CCB address.
1376 000470' 004567 000064 JSR R5,DLCSS
1377 000474' 014 000 .BYTE FC.XCP,0
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 28
CEXSLT.M11 30-DEC-82 00:31 $DLXME - TRANSMIT ENABLE
1379 .SBTTL $DLXME - Transmit Enable
1380 ;++
1381 ; FUNCTIONAL DESCRIPTION:
1382 ;
1383 ; Pass the given CCB/buffer chain to the DLC for transmission.
1384 ;
1385 ; The following information will be inserted into the CCB
1386 ; and may examined by the DLC:
1387 ; C.FNC FC.XME
1388 ;
1389 ; CALLING SEQUENCE:
1390 ;
1391 ; R4 = Address of CCB chain, the first containing:
1392 ; C.LIX line index.
1393 ;
1394 ; INPUT PARAMETERS:
1395 ;
1396 ; None
1397 ;
1398 ; IMPLICIT INPUTS:
1399 ;
1400 ; None
1401 ;
1402 ; OUTPUT PARAMETERS:
1403 ;
1404 ; None
1405 ;
1406 ; IMPLICIT OUTPUTS:
1407 ;
1408 ; None
1409 ;
1410 ; CONDITION CODES:
1411 ;
1412 ; None
1413 ;
1414 ; SIDE EFFECTS:
1415 ;
1416 ; Register R4 is not preserved.
1417 ;--
1418
1419 000476' .PSECT $CODE$,I,RO
1420 000476' $DLXME::PLVL$ ; Crash if not at process level.
1421 000476' CCBCK$ ; Verify CCB address.
1422 000476' 004567 000064 JSR R5,DLCSF
1423 000502' 002 000 .BYTE FC.XME,0
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 29
CEXSLT.M11 30-DEC-82 00:31 DDMSM - SET FUNCTION AND MODIFIER
1425 .SBTTL DDMSM - Set Function and Modifier
1426 ;++
1427 ; FUNCTIONAL DESCRIPTION:
1428 ;
1429 ; Set the following information into the given CCB:
1430 ; C.FNC function code
1431 ; C.MOD function modifier
1432 ; C.SRC source process index
1433 ; C.DST destination process index
1434 ; C.OWN destination process index (FC.AST only)
1435 ;
1436 ; CALLING SEQUENCE:
1437 ;
1438 ; JSR R5,DDMSM
1439 ; .BYTE function,modifier
1440 ;
1441 ; INPUT PARAMETERS:
1442 ;
1443 ; R5 = function parameter block:
1444 ; 0(R5) function code.
1445 ; 1(R5) function modifier.
1446 ; R4 = address of CCB containing:
1447 ; C.LIX line index.
1448 ;
1449 ; IMPLICIT INPUTS:
1450 ;
1451 ; On the stack:
1452 ; 0(SP) = original contents of R5.
1453 ; 2(SP) = return address.
1454 ;
1455 ; .CRPIX = process index of current process.
1456 ;
1457 ; OUTPUT PARAMETERS:
1458 ;
1459 ; R5 = original contents of R5.
1460 ;
1461 ; IMPLICIT OUTPUTS:
1462 ;
1463 ; None
1464 ;
1465 ; CONDITION CODES:
1466 ;
1467 ; None
1468 ;
1469 ; SIDE EFFECTS:
1470 ;
1471 ; None
1472 ;--
1473
1474 000504' .PSECT $CODE$,I,RO
1475 000504' DDMSM: SLCHK$ ; Check the line index.
1476 000504' 112564 000012 MOVB (R5)+,C.FNC(R4) ; Set function,
1477 000510' 111564 000013 MOVB (R5),C.MOD(R4) ; modifier,
1478 000514' 004167 000060 JSR R1,CCBSC ; and then do common stuff.
1479 000520' 177772 .WORD L.DLC-L.LEN
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 30
CEXSLT.M11 30-DEC-82 00:31 DDMSS - SET FUNCTION AND STATUS
1481 .SBTTL DDMSS - Set Function and Status
1482 ;++
1483 ; FUNCTIONAL DESCRIPTION:
1484 ;
1485 ; Set the following information into the given CCB.
1486 ; C.FNC function code
1487 ; C.STS completion status
1488 ; C.SRC source process index
1489 ; C.DST destination process index
1490 ; C.OWN destination process index (FC.AST only)
1491 ;
1492 ; CALLING SEQUENCE:
1493 ;
1494 ; JSR R5,DDMSS
1495 ; .BYTE function,0
1496 ;
1497 ; INPUT PARAMETERS:
1498 ;
1499 ; R5 = function parameter block:
1500 ; 0(R5) function code.
1501 ; 1(R5) (unused)
1502 ; R4 = address of CCB containing:
1503 ; C.LIX line index.
1504 ; R3 = completion status.
1505 ;
1506 ; IMPLICIT INPUTS:
1507 ;
1508 ; On the stack:
1509 ; 0(SP) = original contents of R5.
1510 ; 2(SP) = return address.
1511 ;
1512 ; .CRPIX = process index of current process.
1513 ;
1514 ; OUTPUT PARAMETERS:
1515 ;
1516 ; R5 = original contents of R5.
1517 ;
1518 ; IMPLICIT OUTPUTS:
1519 ;
1520 ; None
1521 ;
1522 ; CONDITION CODES:
1523 ;
1524 ; None
1525 ;
1526 ; SIDE EFFECTS:
1527 ;
1528 ; None
1529 ;--
1530
1531 000522' .PSECT $CODE$,I,RO
1532 000522' DDMSS: SLCHK$ ; Check the line index.
1533 000522' 010364 000014 MOV R3,C.STS(R4) ; Set status
1534 000526' 000400 BR DDMSB ; and go to set function.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 31
CEXSLT.M11 30-DEC-82 00:31 DDMSF - SET FUNCTION
1536 .SBTTL DDMSF - Set Function
1537 ;++
1538 ; FUNCTIONAL DESCRIPTION:
1539 ;
1540 ; Set the following information into the given CCB.
1541 ; C.FNC function code
1542 ; C.SRC source process descriptor block
1543 ; C.DST destination process descriptor block
1544 ; C.OWN destination process index (FC.AST only)
1545 ;
1546 ; CALLING SEQUENCE:
1547 ;
1548 ; JSR R5,CCBSF
1549 ; .BYTE function,0
1550 ;
1551 ; INPUT PARAMETERS:
1552 ;
1553 ; R5 = function parameter block:
1554 ; 0(R5) function code.
1555 ; 1(R5) (unused)
1556 ; R4 = address of CCB containing:
1557 ; C.LIX line index.
1558 ;
1559 ; IMPLICIT INPUTS:
1560 ;
1561 ; On the stack:
1562 ; 0(SP) = original contents of R5.
1563 ; 2(SP) = return address.
1564 ;
1565 ; .CRPIX = process index of current process.
1566 ;
1567 ; OUTPUT PARAMETERS:
1568 ;
1569 ; R5 = original contents of R5.
1570 ;
1571 ; IMPLICIT OUTPUTS:
1572 ;
1573 ; None
1574 ;
1575 ; CONDITION CODES:
1576 ;
1577 ; None
1578 ;
1579 ; SIDE EFFECTS:
1580 ;
1581 ; None
1582 ;--
1583
1584 000530' .PSECT $CODE$,I,RO
1585 000530' DDMSF: SLCHK$ ; Check the line index.
1586 000530' 112564 000012 DDMSB: MOVB (R5)+,C.FNC(R4) ; Set function
1587 000534' 004167 000040 JSR R1,CCBSC ; and fall through to common stuff.
1588 000540' 177772 .WORD L.DLC-L.LEN
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 32
CEXSLT.M11 30-DEC-82 00:31 DLCSM - SET FUNCTION AND MODIFIER
1590 .SBTTL DLCSM - Set Function and Modifier
1591 ;++
1592 ; FUNCTIONAL DESCRIPTION:
1593 ;
1594 ; Set the following information into the given CCB:
1595 ; C.FNC function code
1596 ; C.MOD function modifier
1597 ; C.SRC source process index
1598 ; C.DST destination process index
1599 ; C.OWN destination process index (FC.AST only)
1600 ;
1601 ; CALLING SEQUENCE:
1602 ;
1603 ; JSR R5,DLCSM
1604 ; .BYTE function,modifier
1605 ;
1606 ; INPUT PARAMETERS:
1607 ;
1608 ; R5 = function parameter block:
1609 ; 0(R5) function code.
1610 ; 1(R5) function modifier.
1611 ; R4 = address of CCB containing:
1612 ; C.LIX line index.
1613 ;
1614 ; IMPLICIT INPUTS:
1615 ;
1616 ; On the stack:
1617 ; 0(SP) = original contents of R5.
1618 ; 2(SP) = return address.
1619 ;
1620 ; .CRPIX = process index of current process.
1621 ;
1622 ; OUTPUT PARAMETERS:
1623 ;
1624 ; R5 = original contents of R5.
1625 ;
1626 ; IMPLICIT OUTPUTS:
1627 ;
1628 ; None
1629 ;
1630 ; CONDITION CODES:
1631 ;
1632 ; None
1633 ;
1634 ; SIDE EFFECTS:
1635 ;
1636 ; None
1637 ;--
1638
1639 000542' .PSECT $CODE$,I,RO
1640 000542' DLCSM: SLCHK$ ; Check the line index.
1641 000542' 112564 000012 MOVB (R5)+,C.FNC(R4) ; Set function,
1642 000546' 111564 000013 MOVB (R5),C.MOD(R4) ; modifier,
1643 000552' 004167 000022 JSR R1,CCBSC ; and then do common stuff.
1644 000556' 177774 .WORD L.LLC-L.LEN
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 33
CEXSLT.M11 30-DEC-82 00:31 DLCSS - SET FUNCTION AND STATUS
1646 .SBTTL DLCSS - Set Function and Status
1647 ;++
1648 ; FUNCTIONAL DESCRIPTION:
1649 ;
1650 ; Set the following information into the given CCB.
1651 ; C.FNC function code
1652 ; C.STS completion status
1653 ; C.SRC source process index
1654 ; C.DST destination process index
1655 ; C.OWN destination process index (FC.AST only)
1656 ;
1657 ; CALLING SEQUENCE:
1658 ;
1659 ; JSR R5,DLCSS
1660 ; .BYTE function,0
1661 ;
1662 ; INPUT PARAMETERS:
1663 ;
1664 ; R5 = function parameter block:
1665 ; 0(R5) function code.
1666 ; 1(R5) (unused)
1667 ; R4 = address of CCB containing:
1668 ; C.LIX line index.
1669 ; R3 = completion status.
1670 ;
1671 ; IMPLICIT INPUTS:
1672 ;
1673 ; On the stack:
1674 ; 0(SP) = original contents of R5.
1675 ; 2(SP) = return address.
1676 ;
1677 ; .CRPIX = process index of current process.
1678 ;
1679 ; OUTPUT PARAMETERS:
1680 ;
1681 ; R5 = original contents of R5.
1682 ;
1683 ; IMPLICIT OUTPUTS:
1684 ;
1685 ; None
1686 ;
1687 ; CONDITION CODES:
1688 ;
1689 ; None
1690 ;
1691 ; SIDE EFFECTS:
1692 ;
1693 ; None
1694 ;--
1695
1696 000560' .PSECT $CODE$,I,RO
1697 000560' DLCSS: SLCHK$ ; Check the line index.
1698 000560' 010364 000014 MOV R3,C.STS(R4) ; Set status
1699 000564' 000400 BR DLCSB ; and go to set function.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 34
CEXSLT.M11 30-DEC-82 00:31 DLCSF - SET FUNCTION
1701 .SBTTL DLCSF - Set Function
1702 ;++
1703 ; FUNCTIONAL DESCRIPTION:
1704 ;
1705 ; Set the following information into the given CCB.
1706 ; C.FNC function code
1707 ; C.SRC source process descriptor block
1708 ; C.DST destination process descriptor block
1709 ; C.OWN destination process index (FC.AST only)
1710 ;
1711 ; CALLING SEQUENCE:
1712 ;
1713 ; JSR R5,DLCSF
1714 ; .BYTE function,0
1715 ;
1716 ; INPUT PARAMETERS:
1717 ;
1718 ; R5 = function parameter block:
1719 ; 0(R5) function code.
1720 ; 1(R5) (unused)
1721 ; R4 = address of CCB containing:
1722 ; C.LIX line index.
1723 ;
1724 ; IMPLICIT INPUTS:
1725 ;
1726 ; On the stack:
1727 ; 0(SP) = original contents of R5.
1728 ; 2(SP) = return address.
1729 ;
1730 ; .CRPIX = process index of current process.
1731 ;
1732 ; OUTPUT PARAMETERS:
1733 ;
1734 ; R5 = original contents of R5.
1735 ;
1736 ; IMPLICIT OUTPUTS:
1737 ;
1738 ; None
1739 ;
1740 ; CONDITION CODES:
1741 ;
1742 ; None
1743 ;
1744 ; SIDE EFFECTS:
1745 ;
1746 ; None
1747 ;--
1748
1749 000566' .PSECT $CODE$,I,RO
1750 000566' DLCSF: SLCHK$ ; Check the line index.
1751 000566' 112564 000012 DLCSB: MOVB (R5)+,C.FNC(R4) ; Set function
1752 000572' 004167 000002 JSR R1,CCBSC ; and then do common stuff.
1753 000576' 177774 .WORD L.LLC-L.LEN
1754
1755 ;
1756 ; Common code for CCBS* routines.
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 34-1
CEXSLT.M11 30-DEC-82 00:31 DLCSF - SET FUNCTION
1757 ;
1758
1759 000600' CCBSC: PUSH$S (R1) ; Save higher level offset.
1760 000602' 016764 000000G 000040 MOV .CRPDB,C.SRC(R4) ; This is the source process
1761 000610' 105064 000011 CLRB C.PIX(R4) ; and is from system line.
1762 000614' 116401 000010 MOVB C.LIX(R4),R1 ; Get LIX
1763 000620' 070127 000010 MUL #L.LEN,R1 ; and index into
1764 000624' 066701 000000G ADD .SLTTA,R1 ; system line table
1765 000630' 062601 ADD (SP)+,R1 ; and then into entry.
1766 000632' 114505 MOVB -(R5),R5 ; Get function code
1767 000634' 001414 BEQ 10$ ; and if not AST
1768 000636' 122705 000012 CMPB #FC.TIM,R5 ; then check if XCP,RCP,KCP,CCP.
1769 000642' 103413 BLO 20$ ; If not,
1770 000644' 116105 177776 MOVB -2(R1),R5
1771 000650' 006305 ASL R5
1772 000652' 016564 000000G 000036 MOV .PDBVB(R5),C.DST(R4) ; get lower destination
1773 000660' 004767 000000G CALL $CCBQL ; and queue to lower process
1774 000664' 000411 BR 30$ ; otherwise
1775 000666' 111164 000006 10$: MOVB (R1),C.OWN(R4) ; set new CCB owner if AST,
1776 000672' 111105 20$: MOVB (R1),R5
1777 000674' 006305 ASL R5
1778 000676' 016564 000000G 000036 MOV .PDBVB(R5),C.DST(R4) ; higher destination,
1779 000704' 004767 000000G CALL $CCBQH ; and queue to higher process.
1780 000710' 30$: POP$S <R1,R5> ; Recover registers.
1781 000714' 000241 CLC
1782 000716' 000207 RETURN
1783
1784 001 .IF NE,D$$BUG
1785 CCBSL: TSTB C.LIX(R4) ; If line index
1786 BLE 100$ ; is
1787 CMPB .SLTNM,C.LIX(R4) ; out of range
1788 BLO 100$ ; then crash.
1789 RETURN
1790
1791 100$: TST (SP)+
1792 POP$S R5
1793 CRSH$S LIX ; Invalid line index
1794 000 .ENDC
1795
1796 000001 .END
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 35
CEXSLT.M11 30-DEC-82 00:31 CROSS REFERENCE TABLE -- USER SYMBOLS
CCBSC 000600R 002 1478 1587 1643 1752 1759#
C.DST 000036 1772* 1778*
C.FNC 000012 1476* 1586* 1641* 1751*
C.LIX 000010 132* 900* 1762
C.MOD 000013 133* 901* 1477* 1642*
C.OWN 000006 1775*
C.PIX 000011 1761*
C.SRC 000040 1760*
C.STS 000014 1533* 1698*
DDMSB 000530R 002 1534 1586#
DDMSF 000530R 002 843 1585#
DDMSM 000504R 002 233 281 377 507 604 652 700 797 1475#
DDMSS 000522R 002 134 185 329 556 749 1532#
DLCSB 000566R 002 1699 1751#
DLCSF 000566R 002 1132 1422 1750#
DLCSM 000542R 002 1085 1230 1278 1326 1640#
DLCSS 000560R 002 902 954 1182 1376 1697#
D$$BUG= 000000 129 183 184 231 232 279 280 327 328 375 376 418 423
505 506 554 555 602 603 650 651 698 699 747 748 795
796 841 842 897 952 953 995 1000 1083 1084 1130 1131 1180
1181 1228 1229 1276 1277 1324 1325 1374 1375 1420 1421 1475 1532
1585 1640 1697 1750 1784
FC.AST= 000000 135 903
FC.CCP= 000022 186 955
FC.CTL= 000010 282 605 653 701 1086 1231 1279 1327
FC.KCP= 000020 330
FC.KIL= 000006 234 378 798
FC.RCE= 000004 508 1133
FC.RCP= 000016 557 1183
FC.TIM= 000012 1768
FC.XCP= 000014 750 1377
FC.XME= 000002 844 1423
FM.CRA= 000002 234
FM.DAT= 000000 508
FM.GET= 000014 282 1086
FM.KIL= 000000 378
FM.SET= 000012 605 1231
FM.STP= 000004 653 1279
FM.STR= 000002 701 1327
FM.XKL= 000004 798
KISAR6= ****** G 447#* 1025#*
L.DDM 000000 430
L.DLC 000002 1007 1479 1588
L.LEN 000010 428 1005 1479 1588 1644 1753 1763
L.LLC 000004 1644 1753
Z.DAT 000004 76 77
Z.PIX 000010 77
$CCBGT= ****** GX 130* 898*
$CCBQH= ****** GX 1779*
$CCBQL= ****** GX 1773*
$DDAST 000000RG 002 129#
$DDCCP 000026RG 002 183#
$DDCRA 000034RG 002 231#
$DDGET 000042RG 002 279#
$DDKCP 000050RG 002 327#
$DDKIL 000056RG 002 375#
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 35-1
CEXSLT.M11 30-DEC-82 00:31 CROSS REFERENCE TABLE -- USER SYMBOLS
$DDMDB 000064RG 002 418#
$DDRCE 000176RG 002 505#
$DDRCP 000204RG 002 554#
$DDSET 000212RG 002 602#
$DDSTP 000220RG 002 650#
$DDSTR 000226RG 002 698#
$DDXCP 000234RG 002 747#
$DDXKL 000242RG 002 795#
$DDXME 000250RG 002 841#
$DLAST 000256RG 002 897#
$DLCCP 000304RG 002 952#
$DLCDB 000312RG 002 995#
$DLGET 000424RG 002 1083#
$DLRCE 000432RG 002 1130#
$DLRCP 000440RG 002 1180#
$DLSET 000446RG 002 1228#
$DLSTP 000454RG 002 1276#
$DLSTR 000462RG 002 1324#
$DLXCP 000470RG 002 1374#
$DLXME 000476RG 002 1420#
.CRDAT= ****** GX 442 443 448* 450* 1020 1021 1026* 1028*
.CRDSP= ****** GX 441 446* 1019 1024*
.CRPDB= ****** GX 439 444* 1017 1022* 1760
.CRPIX= ****** GX 451* 1029*
.PDBVB= ****** GX 432 1009 1772 1778
.SLTNM= ****** G 73#
.SLTTA= ****** G 74# 429 1006 1764
CEXSLT - COMM/EXEC SUPPORT FOR SYSTEM LINES DNMAC X24.07-563 28-MAY-85 14:23 PAGE 36
CEXSLT.M11 30-DEC-82 00:31 CROSS REFERENCE TABLE -- MACRO NAMES
CCBCK$ 184 232 280 328 376 506 555 603 651 699 748 796 842 953 1084
1131 1181 1229 1277 1325 1375 1421
CRSH$S 53#
MAP$ 447 1025
PLVL$ 129 183 231 279 327 375 418 505 554 602 650 698 747 795 841
897 952 995 1083 1130 1180 1228 1276 1324 1374 1420
POP$S 452 1030 1780
PUSH$S 419 996 1759
SLCHK$ 59# 1475 1532 1585 1640 1697 1750
. ABS. 000000 000 CON RW ABS LCL I
000000 001 CON RW REL LCL I
$CODE$ 000720 002 CON RO REL LCL I
ERRORS DETECTED: 0
DEFAULT GLOBALS GENERATED: 8
CEXSLT,CEXSLT/CR=MCB:RSXLIB/PA:1,MCBLIB/PA:1,CEX:CEXLIB/PA:1,CEXSLT
RUN-TIME: 4 2 .3 SECONDS
RUN-TIME RATIO: 18/8=2.2
CORE USED: 15K (29 PAGES)