1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
|
/****************************************************************************
THIS SOFTWARE IS NOT COPYRIGHTED
HP offers the following for use in the public domain. HP makes no
warranty with regard to the software or it's performance and the
user accepts the software "AS IS" with all faults.
HP DISCLAIMS ANY WARRANTIES, EXPRESS OR IMPLIED, WITH REGARD
TO THIS SOFTWARE INCLUDING BUT NOT LIMITED TO THE WARRANTIES
OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
****************************************************************************/
/* Interrupt Vector Table entry macros */
#define cstring(Len,String) .byte Len !\
.string String
#define cstringz(Len,String) .byte Len !\
.stringz String
AdvancePCOQ .macro
mtctl %r0,%pcoq ; throw away iiaoq head pointer, tail->head
mfctl %pcoq,%r1 ; get tail pointer
mtctl %r1,%pcoq ; insert tail pointer
ldo 4(%r1),%r1 ; advance tail pointer
mtctl %r1,%pcoq ; insert new tail pointer, former tail->head
.endm
#ifdef PRINTSTRING_LED
PrintString .macro NString,Num
bl put_led,%mrp
ldi Num+0xa0,%arg2
addil L%NString-$global$,%dp
bl puts,%rp
ldo R%NString-$global$(%r1),%arg0
b,n .
nop
.endm
#endif
#ifdef HALT
PrintString .macro NString,Num
bl,n save_state,%r25
nop
bl print_intr,%rp
ldi NString-Str01,%arg0
bl print_state,%rp
nop
b,n halt
nop
.endm
#endif
#ifdef RECOVER
PrintString .macro NString,Num
bl,n save_state,%r25
nop
bl print_intr,%rp
ldi NString-Str01,%arg0
bl print_state,%rp
nop
b,n recover
nop
.endm
#endif
PrintString .macro NString,Num
bl,n save_state,%r25
nop
bl print_intr,%rp
ldi NString-Str01,%arg0
#ifdef FULL_REPORT
bl print_state,%rp
#else
nop
#endif
nop
b restore_to_STUB
ldi Num,%r1
.endm
/* IVA register array offets */
#define R_sr0 0
#define R_sr1 4
#define R_sr2 8
#define R_sr3 12
#define R_sr4 16
#define R_sr5 20
#define R_sr6 24
#define R_sr7 28
#define R_gr0 32
#define R_gr1 36
#define R_gr2 40
#define R_gr3 44
#define R_gr4 48
#define R_gr5 52
#define R_gr6 56
#define R_gr7 60
#define R_gr8 64
#define R_gr9 68
#define R_gr10 72
#define R_gr11 76
#define R_gr12 80
#define R_gr13 84
#define R_gr14 88
#define R_gr15 92
#define R_gr16 96
#define R_gr17 100
#define R_gr18 104
#define R_gr19 108
#define R_gr20 112
#define R_gr21 116
#define R_gr22 120
#define R_gr23 124
#define R_gr24 128
#define R_gr25 132
#define R_gr26 136
#define R_gr27 140
#define R_gr28 144
#define R_gr29 148
#define R_gr30 152
#define R_gr31 156
#define R_rctr 160
#define R_cpu0 164
#define R_pidr1 168
#define R_pidr2 172
#define R_ccr 176
#define R_sar 180
#define R_pidr3 184
#define R_pidr4 188
#define R_iva 192
#define R_eiem 196
#define R_itmr 200
#define R_pcsqH 204
#define R_pcoqH 208
#define R_iir 212
#define R_pcsqT 216
#define R_pcoqT 220
#define R_isr 224
#define R_ior 228
#define R_ipsw 232
#define R_eirr 236
#define R_tr0 240
#define R_tr1 244
#define R_tr2 248
#define R_tr3 252
#define R_tr4 256
#define R_tr5 260
#define R_tr6 264
#define R_tr7 268
#define R_SIZE 272
|
