Trailing-Edge
-
PDP-10 Archives
-
BB-H348C-RM_1982
-
swskit-v21/listings/rsx11s/dnpan.list
There are no other files named dnpan.list in the archive.
DNPAN - DN20 PANIC DUMP MACRO M1110 29-JUN-78 14:57
TABLE OF CONTENTS
2- 28 MACRO AND SYMBOL DEFINITIONS
3- 39 SAVE AREAS
4- 62 PROGRAM INITIALIZATION
5- 87 INTERRUPT ROUTINES
DNPAN - DN20 PANIC DUMP MACRO M1110 29-JUN-78 14:57 PAGE 1
1 .TITLE DNPAN - DN20 PANIC DUMP
2 .IDENT /X03.00/
3 ;
4 ; COPYRIGHT (C) 1978
5 ; DIGITAL EQUIPMENT CORPORATION
6 ;
7 ; THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY ON A
8 ; SINGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH THE
9 ; INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE, OR
10 ; ANY OTHER COPIES THEREOF, MAY NOT BE PROVIDED OR OTHERWISE
11 ; MADE AVAILABLE TO ANY OTHER PERSON EXCEPT FOR USE ON SUCH
12 ; SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE TERMS. TITLE
13 ; TO AND OWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES REMAIN
14 ; IN DEC.
15 ;
16 ; THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
17 ; NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
18 ; EQUIPMENT CORPORATION.
19 ;
20 ; DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF
21 ; ITS SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.
22 ;
23 ; IDENT HISTORY:
24 ; 3.00 RELEASE 3A DN20 DECNET SYSTEM
25 ; L. WEBBER 1-JUN-78
26 ;
DNPAN - DN20 PANIC DUMP MACRO M1110 29-JUN-78 14:57 PAGE 2
MACRO AND SYMBOL DEFINITIONS
28 .SBTTL MACRO AND SYMBOL DEFINITIONS
29
30 .MCALL CALLR
31
32 ;
33 ; I/O PAGE DEFINITIONS
34 ;
35
36 172352 KISAR5 = 172352
37 172354 KISAR6 = 172354
DNPAN - DN20 PANIC DUMP MACRO M1110 29-JUN-78 14:57 PAGE 3
SAVE AREAS
39 .SBTTL SAVE AREAS
40 000000 000000 $DNCOD::.WORD 0 ;ERROR CODE:
41 ; 0 - INVALID
42 ; 1 - CPU ERROR (LOC. 4)
43 ; 2 - ILLEGAL INST. (LOC 10)
44 ; 3 - BPT (LOC 14)
45 ; 4 - I/O TRAP (LOC 20)
46 ; 5 - POWERFAIL (LOC 24)
47 ; 6 - INVALID (LOC 30)
48 ; 7 - INVALID (LOC 34)
49 ; 8 - MEMORY PROTECT. (LOC 250)
50 000002 000000 $DNREG::.WORD 0 ;REGISTER 0
51 000004 000000 .WORD 0 ;REGISTER 1
52 000006 000000 .WORD 0 ;REGISTER 2
53 000010 000000 .WORD 0 ;REGISTER 3
54 000012 000000 .WORD 0 ;REGISTER 4
55 000014 000000 .WORD 0 ;REGISTER 5
56 000016 000000 .WORD 0 ;PROGRAM COUNTER
57 000020 000000 .WORD 0 ;PROGRAM STATUS
58 000022 000000 .WORD 0 ;STACK POINTER
59 000024 000000 .WORD 0 ;KERNEL PAR 5
60 000026 000000 .WORD 0 ;KERNEL PAR 6
DNPAN - DN20 PANIC DUMP MACRO M1110 29-JUN-78 14:57 PAGE 4
PROGRAM INITIALIZATION
62 .SBTTL PROGRAM INITIALIZATION
63 ;
64 ; THIS CODE IS ENTERED WHEN THE DN20 SYSTEM IS LOADED. IT SETS
65 ; UP THE INTERRUPT VECTOR ADDRESSES FOR SYSTEM ERRORS TO POINT
66 ; TO THE ERROR ROUTINES BELOW, AND THEN INVOKES THE RSX11S
67 ; ENTRY POINT '$INITL'.
68 ;
69
70 000030 $DNPAN::
71 000030 000005 RESET
72 000032 012700 000066' MOV #VECTAB,R0 ;ADDRESS VECTOR ADDRESS TABLE
73 000036 012701 000004 MOV #4,R1 ;START AT VECTOR 4
74 000042 012702 000005 MOV #5,R2 ; AND CONTINUE THROUGH VECTOR 24
75 000046 012021 10$: MOV (R0)+,(R1)+ ;MOVE VECTOR ADDRESS IN
76 000050 005721 TST (R1)+ ; LEAVE VECTOR PS ALONE
77 000052 077203 SOB R2,10$
78 000054 012737 000136' 000250 MOV #.MP,@#250 ;MOVE IN MEMORY PROTECTION VECTOR ADDRESS
79 000062 CALLR $INITL ;NOW START RSX-11S
80
81 000066 000100' VECTAB: .OD ;VECTOR ADDRESS TABLE
82 000070 000106' .IL
83 000072 000114' .BE
84 000074 000122' .IO
85 000076 000130' .PF
DNPAN - DN20 PANIC DUMP MACRO M1110 29-JUN-78 14:57 PAGE 5
INTERRUPT ROUTINES
87 .SBTTL INTERRUPT ROUTINES
88 ;
89 ; THESE ENTRY POINTS ARE INVOKED THROUGH INTERRUPT VECTORS 4-24, 34, AND 250
90 ; ON THE OCCURRENCE OF THE CORRESPONDING ERRORS. THEY RESULT IN THE SAVING
91 ; OF THE ERROR CONTEXT AND THE HALTING OF THE DN20.
92 ;
93
94 000100 004767 000040 .OD: CALL TRAP
95 000104 000001 .WORD 1
96 000106 004767 000032 .IL: CALL TRAP
97 000112 000002 .WORD 2
98 000114 004767 000024 .BE: CALL TRAP
99 000120 000003 .WORD 3
100 000122 004767 000016 .IO: CALL TRAP
101 000126 000004 .WORD 4
102 000130 004767 000010 .PF: CALL TRAP
103 000134 000005 .WORD 5
104 ;*** THE 'EMT' AND 'TRAP' VECTORS ARE NOT INTERCEPTED BECAUSE THOSE
105 ;*** INTERRUPTS DO NOT CONSTITUTE AN ERROR
106 000136 004767 000002 .MP: CALL TRAP
107 000142 000010 .WORD 8.
108
109
110 ;
111 ; THIS ROUTINE IS ENTERED WITH ALL INTERRUPTS DISABLED. THE TOP WORD ON
112 ; THE STACK POINTS TO AN ERROR CODE INDICATING THE TYPE OF INTERRUPT WHICH
113 ; CAUSED THE ERROR.
114 ;
115
116 000144 013637 000000' TRAP: MOV @(SP)+,@#$DNCOD ;SAVE THE EROR CODE
117 000150 010037 000002' MOV R0,@#$DNREG ;SAVE R0
118 000154 012700 000004' MOV #$DNREG+2,R0 ;POINT TO THE REST OF THE SAVE AREA
119 000160 010120 MOV R1,(R0)+ ;SAVE
120 000162 010220 MOV R2,(R0)+ ; THE
121 000164 010320 MOV R3,(R0)+ ; REST
122 000166 010420 MOV R4,(R0)+ ; OF THE
123 000170 010520 MOV R5,(R0)+ ; REGISTERS
124 000172 012620 MOV (SP)+,(R0)+ ;SAVE THE PC
125 000174 012620 MOV (SP)+,(R0)+ ;SAVE THE PS
126 000176 010620 MOV SP,(R0)+ ;SAVE THE SP
127 000200 013720 172352 MOV @#KISAR5,(R0)+ ;SAVE KERNEL PAR 5
128 000204 013720 172354 MOV @#KISAR6,(R0)+ ;SAVE KERNEL PAR 6
129 000210 000000 HALT ;DONE - NOW STOP
130 ;
131 ; MAKE SURE THIS MODULE IS DOUBLEWORD LENGTH
132 ;
133 .EVEN
134 000043 $.$ = <.-$DNCOD+2>/4 ;LENGTH IN DOUBLEWORDS
135 000212 .BLKB $.$*4-<.-$DNCOD> ;PAD TO EVEN LENGTH
136 000030' .END $DNPAN
DNPAN - DN20 PANIC DUMP MACRO M1110 29-JUN-78 14:57 PAGE 5-1
SYMBOL TABLE
KISAR5= 172352 VECTAB 000066R $DNREG 000002RG .BE 000114R .MP 000136R
KISAR6= 172354 $DNCOD 000000RG $INITL= ****** GX .IL 000106R .OD 000100R
TRAP 000144R $DNPAN 000030RG $.$ = 000043 .IO 000122R .PF 000130R
. ABS. 000000 000
000214 001
ERRORS DETECTED: 0
VIRTUAL MEMORY USED: 175 WORDS ( 1 PAGES)
DYNAMIC MEMORY: 2668 WORDS ( 10 PAGES)
ELAPSED TIME: 00:00:09
DNPAN,[11,34]DNPAN/CR/-SP=[11,10]DNPAN
DNPAN CREATED BY MACRO ON 29-JUN-78 AT 14:57 PAGE 1
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
KISAR5 = 172352 #2-36 5-127
KISAR6 = 172354 #2-37 5-128
TRAP 000144 R 5-94 5-96 5-98 5-100 5-102 5-106 #5-116
VECTAB 000066 R 4-72 #4-81
$DNCOD 000000 RG #3-40 5-116 5-134 5-135
$DNPAN 000030 RG #4-70 5-136
$DNREG 000002 RG #3-50 5-117 5-118
$INITL = ****** GX 4-79
$.$ = 000043 #5-134 5-135
.BE 000114 R 4-83 #5-98
.IL 000106 R 4-82 #5-96
.IO 000122 R 4-84 #5-100
.MP 000136 R 4-78 #5-106
.OD 000100 R 4-81 #5-94
.PF 000130 R 4-85 #5-102
DNPAN CREATED BY MACRO ON 29-JUN-78 AT 14:57 PAGE 2
MACRO CROSS REFERENCE CREF
MACRO NAME REFERENCES
CALLR #2-30 4-79