Rev 666 | Rev 863 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
529 | jermar | 1 | # |
2 | # Copyright (C) 2005 Jakub Jermar |
||
3 | # All rights reserved. |
||
4 | # |
||
5 | # Redistribution and use in source and binary forms, with or without |
||
6 | # modification, are permitted provided that the following conditions |
||
7 | # are met: |
||
8 | # |
||
9 | # - Redistributions of source code must retain the above copyright |
||
10 | # notice, this list of conditions and the following disclaimer. |
||
11 | # - Redistributions in binary form must reproduce the above copyright |
||
12 | # notice, this list of conditions and the following disclaimer in the |
||
13 | # documentation and/or other materials provided with the distribution. |
||
14 | # - The name of the author may not be used to endorse or promote products |
||
15 | # derived from this software without specific prior written permission. |
||
16 | # |
||
17 | # THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
||
18 | # IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
||
19 | # OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
||
20 | # IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
||
21 | # INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
||
22 | # NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
||
23 | # DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
||
24 | # THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
||
25 | # (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
||
26 | # THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
||
27 | # |
||
28 | |||
29 | /** |
||
634 | jermar | 30 | * This file contains two trap tables. |
31 | * First, trap_table, is the one wich contains handlers implemented by |
||
32 | * kernel. During initialization, these handlers are copied out to |
||
33 | * the second trap table, trap_table_save, and the first table is |
||
34 | * overwritten with copy of OFW's own trap table. The copy is then patched |
||
35 | * from the trap_table_save. |
||
36 | * |
||
37 | * This arrangement is beneficial because kernel handlers stay on their |
||
38 | * link-time addresses which is good for debugging. |
||
529 | jermar | 39 | */ |
666 | jermar | 40 | |
41 | .register %g2, #scratch |
||
42 | .register %g3, #scratch |
||
43 | .register %g6, #scratch |
||
44 | .register %g7, #scratch |
||
45 | |||
529 | jermar | 46 | .text |
47 | |||
630 | jermar | 48 | #include <arch/trap/trap_table.h> |
49 | #include <arch/trap/regwin.h> |
||
663 | jermar | 50 | #include <arch/trap/interrupt.h> |
667 | jermar | 51 | #include <arch/trap/exception.h> |
52 | #include <arch/stack.h> |
||
529 | jermar | 53 | |
54 | #define TABLE_SIZE TRAP_TABLE_SIZE |
||
55 | #define ENTRY_SIZE TRAP_TABLE_ENTRY_SIZE |
||
56 | |||
57 | /* |
||
634 | jermar | 58 | * Kernel trap table. |
529 | jermar | 59 | */ |
60 | .align TABLE_SIZE |
||
61 | .global trap_table |
||
62 | trap_table: |
||
63 | |||
667 | jermar | 64 | /* TT = 0x08, TL = 0, instruction_access_exception */ |
65 | .org trap_table + TT_INSTRUCTION_ACCESS_EXCEPTION*ENTRY_SIZE |
||
66 | .global instruction_access_exception |
||
67 | instruction_access_exception: |
||
68 | SIMPLE_HANDLER do_instruction_access_exc |
||
69 | |||
663 | jermar | 70 | /* TT = 0x24, TL = 0, clean_window handler */ |
634 | jermar | 71 | .org trap_table + TT_CLEAN_WINDOW*ENTRY_SIZE |
630 | jermar | 72 | .global clean_window_handler |
73 | clean_window_handler: |
||
74 | CLEAN_WINDOW_HANDLER |
||
529 | jermar | 75 | |
667 | jermar | 76 | /* TT = 0x34, TL = 0, mem_address_not_aligned */ |
77 | .org trap_table + TT_MEM_ADDRESS_NOT_ALIGNED*ENTRY_SIZE |
||
78 | .global mem_address_not_aligned |
||
79 | mem_address_not_aligned: |
||
80 | SIMPLE_HANDLER do_mem_address_not_aligned |
||
81 | |||
664 | jermar | 82 | /* TT = 0x41, TL = 0, interrupt_level_1 handler */ |
83 | .org trap_table + TT_INTERRUPT_LEVEL_1*ENTRY_SIZE |
||
84 | .global interrupt_level_1_handler |
||
85 | interrupt_level_1_handler: |
||
86 | INTERRUPT_LEVEL_N_HANDLER 1 |
||
87 | |||
88 | /* TT = 0x42, TL = 0, interrupt_level_2 handler */ |
||
89 | .org trap_table + TT_INTERRUPT_LEVEL_2*ENTRY_SIZE |
||
90 | .global interrupt_level_2_handler |
||
91 | interrupt_level_2_handler: |
||
92 | INTERRUPT_LEVEL_N_HANDLER 2 |
||
93 | |||
94 | /* TT = 0x43, TL = 0, interrupt_level_3 handler */ |
||
95 | .org trap_table + TT_INTERRUPT_LEVEL_3*ENTRY_SIZE |
||
96 | .global interrupt_level_3_handler |
||
97 | interrupt_level_3_handler: |
||
98 | INTERRUPT_LEVEL_N_HANDLER 3 |
||
99 | |||
100 | /* TT = 0x44, TL = 0, interrupt_level_4 handler */ |
||
101 | .org trap_table + TT_INTERRUPT_LEVEL_4*ENTRY_SIZE |
||
102 | .global interrupt_level_4_handler |
||
103 | interrupt_level_4_handler: |
||
104 | INTERRUPT_LEVEL_N_HANDLER 4 |
||
105 | |||
106 | /* TT = 0x45, TL = 0, interrupt_level_5 handler */ |
||
107 | .org trap_table + TT_INTERRUPT_LEVEL_5*ENTRY_SIZE |
||
108 | .global interrupt_level_5_handler |
||
109 | interrupt_level_5_handler: |
||
110 | INTERRUPT_LEVEL_N_HANDLER 5 |
||
111 | |||
112 | /* TT = 0x46, TL = 0, interrupt_level_6 handler */ |
||
113 | .org trap_table + TT_INTERRUPT_LEVEL_6*ENTRY_SIZE |
||
114 | .global interrupt_level_6_handler |
||
115 | interrupt_level_6_handler: |
||
116 | INTERRUPT_LEVEL_N_HANDLER 6 |
||
117 | |||
118 | /* TT = 0x47, TL = 0, interrupt_level_7 handler */ |
||
119 | .org trap_table + TT_INTERRUPT_LEVEL_7*ENTRY_SIZE |
||
120 | .global interrupt_level_7_handler |
||
121 | interrupt_level_7_handler: |
||
122 | INTERRUPT_LEVEL_N_HANDLER 7 |
||
123 | |||
124 | /* TT = 0x48, TL = 0, interrupt_level_8 handler */ |
||
125 | .org trap_table + TT_INTERRUPT_LEVEL_8*ENTRY_SIZE |
||
126 | .global interrupt_level_8_handler |
||
127 | interrupt_level_8_handler: |
||
128 | INTERRUPT_LEVEL_N_HANDLER 8 |
||
129 | |||
130 | /* TT = 0x49, TL = 0, interrupt_level_9 handler */ |
||
131 | .org trap_table + TT_INTERRUPT_LEVEL_9*ENTRY_SIZE |
||
132 | .global interrupt_level_9_handler |
||
133 | interrupt_level_9_handler: |
||
134 | INTERRUPT_LEVEL_N_HANDLER 9 |
||
135 | |||
136 | /* TT = 0x4a, TL = 0, interrupt_level_10 handler */ |
||
137 | .org trap_table + TT_INTERRUPT_LEVEL_10*ENTRY_SIZE |
||
138 | .global interrupt_level_10_handler |
||
139 | interrupt_level_10_handler: |
||
140 | INTERRUPT_LEVEL_N_HANDLER 10 |
||
141 | |||
142 | /* TT = 0x4b, TL = 0, interrupt_level_11 handler */ |
||
143 | .org trap_table + TT_INTERRUPT_LEVEL_11*ENTRY_SIZE |
||
144 | .global interrupt_level_11_handler |
||
145 | interrupt_level_11_handler: |
||
146 | INTERRUPT_LEVEL_N_HANDLER 11 |
||
147 | |||
148 | /* TT = 0x4c, TL = 0, interrupt_level_12 handler */ |
||
149 | .org trap_table + TT_INTERRUPT_LEVEL_12*ENTRY_SIZE |
||
150 | .global interrupt_level_12_handler |
||
151 | interrupt_level_12_handler: |
||
152 | INTERRUPT_LEVEL_N_HANDLER 12 |
||
153 | |||
154 | /* TT = 0x4d, TL = 0, interrupt_level_13 handler */ |
||
155 | .org trap_table + TT_INTERRUPT_LEVEL_13*ENTRY_SIZE |
||
156 | .global interrupt_level_13_handler |
||
157 | interrupt_level_13_handler: |
||
158 | INTERRUPT_LEVEL_N_HANDLER 13 |
||
159 | |||
160 | /* TT = 0x4e, TL = 0, interrupt_level_14 handler */ |
||
161 | .org trap_table + TT_INTERRUPT_LEVEL_14*ENTRY_SIZE |
||
162 | .global interrupt_level_14_handler |
||
163 | interrupt_level_14_handler: |
||
164 | INTERRUPT_LEVEL_N_HANDLER 14 |
||
165 | |||
166 | /* TT = 0x4f, TL = 0, interrupt_level_15 handler */ |
||
167 | .org trap_table + TT_INTERRUPT_LEVEL_15*ENTRY_SIZE |
||
168 | .global interrupt_level_15_handler |
||
169 | interrupt_level_15_handler: |
||
170 | INTERRUPT_LEVEL_N_HANDLER 15 |
||
171 | |||
663 | jermar | 172 | /* TT = 0x60, TL = 0, interrupt_vector_trap handler */ |
173 | .org trap_table + TT_INTERRUPT_VECTOR_TRAP*ENTRY_SIZE |
||
174 | .global interrupt_vector_trap_handler |
||
175 | interrupt_vector_trap_handler: |
||
176 | INTERRUPT_VECTOR_TRAP_HANDLER |
||
177 | |||
178 | /* TT = 0x80, TL = 0, spill_0_normal handler */ |
||
634 | jermar | 179 | .org trap_table + TT_SPILL_0_NORMAL*ENTRY_SIZE |
630 | jermar | 180 | .global spill_0_normal |
181 | spill_0_normal: |
||
182 | SPILL_NORMAL_HANDLER |
||
529 | jermar | 183 | |
663 | jermar | 184 | /* TT = 0xc0, TL = 0, fill_0_normal handler */ |
634 | jermar | 185 | .org trap_table + TT_FILL_0_NORMAL*ENTRY_SIZE |
663 | jermar | 186 | .global fill_0_normal |
630 | jermar | 187 | fill_0_normal: |
188 | FILL_NORMAL_HANDLER |
||
189 | |||
529 | jermar | 190 | /* |
663 | jermar | 191 | * Handlers for TL>0. |
529 | jermar | 192 | */ |
193 | |||
667 | jermar | 194 | /* TT = 0x08, TL > 0, instruction_access_exception */ |
195 | .org trap_table + (TT_INSTRUCTION_ACCESS_EXCEPTION+512)*ENTRY_SIZE |
||
196 | .global instruction_access_exception_high |
||
197 | instruction_access_exception_high: |
||
198 | SIMPLE_HANDLER do_instruction_access_exc |
||
199 | |||
663 | jermar | 200 | /* TT = 0x24, TL > 0, clean_window handler */ |
201 | .org trap_table + (TT_CLEAN_WINDOW+512)*ENTRY_SIZE |
||
202 | .global clean_window_handler_high |
||
203 | clean_window_handler_high: |
||
204 | CLEAN_WINDOW_HANDLER |
||
529 | jermar | 205 | |
667 | jermar | 206 | /* TT = 0x34, TL > 0, mem_address_not_aligned */ |
207 | .org trap_table + (TT_MEM_ADDRESS_NOT_ALIGNED+512)*ENTRY_SIZE |
||
208 | .global mem_address_not_aligned_high |
||
209 | mem_address_not_aligned_high: |
||
210 | SIMPLE_HANDLER do_mem_address_not_aligned |
||
529 | jermar | 211 | |
663 | jermar | 212 | /* TT = 0x80, TL > 0, spill_0_normal handler */ |
213 | .org trap_table + (TT_SPILL_0_NORMAL+512)*ENTRY_SIZE |
||
214 | .global spill_0_normal_high |
||
215 | spill_0_normal_high: |
||
216 | SPILL_NORMAL_HANDLER |
||
529 | jermar | 217 | |
663 | jermar | 218 | /* TT = 0xc0, TL > 0, fill_0_normal handler */ |
219 | .org trap_table + (TT_FILL_0_NORMAL+512)*ENTRY_SIZE |
||
220 | .global fill_0_normal_high |
||
221 | fill_0_normal_high: |
||
222 | FILL_NORMAL_HANDLER |
||
634 | jermar | 223 | |
663 | jermar | 224 | |
225 | |||
634 | jermar | 226 | /* |
227 | * Save trap table. |
||
228 | */ |
||
663 | jermar | 229 | .align TABLE_SIZE |
634 | jermar | 230 | .global trap_table_save |
231 | trap_table_save: |
||
232 | .space TABLE_SIZE, 0 |
||
666 | jermar | 233 | |
234 | |||
667 | jermar | 235 | /* Preemptible trap handler. |
666 | jermar | 236 | * |
667 | jermar | 237 | * This trap handler makes arrangements to |
238 | * make calling scheduler() possible. |
||
239 | * |
||
240 | * The caller is responsible for doing save |
||
241 | * and allocating PREEMPTIBLE_HANDLER_STACK_FRAME_SIZE |
||
242 | * bytes on stack. |
||
243 | * |
||
666 | jermar | 244 | * Input registers: |
245 | * %l0 Address of function to call. |
||
246 | * Output registers: |
||
247 | * %l1 - %l7 Copy of %g1 - %g7 |
||
248 | */ |
||
667 | jermar | 249 | .global preemptible_handler |
250 | preemptible_handler: |
||
251 | /* |
||
252 | * Save TSTATE, TPC, TNPC and PSTATE aside. |
||
253 | */ |
||
254 | rdpr %tstate, %g1 |
||
255 | rdpr %tpc, %g2 |
||
256 | rdpr %tnpc, %g3 |
||
257 | rdpr %pstate, %g4 |
||
258 | |||
259 | stx %g1, [%fp + STACK_BIAS + SAVED_TSTATE] |
||
260 | stx %g2, [%fp + STACK_BIAS + SAVED_TPC] |
||
261 | stx %g3, [%fp + STACK_BIAS + SAVED_TNPC] |
||
262 | stx %g4, [%fp + STACK_BIAS + SAVED_PSTATE] |
||
263 | |||
264 | /* |
||
265 | * Write 0 to TL. |
||
266 | */ |
||
267 | wrpr %g0, 0, %tl |
||
268 | |||
269 | /* |
||
270 | * Alter PSTATE. |
||
271 | * - switch to normal globals. |
||
272 | */ |
||
273 | and %g4, ~1, %g4 ! mask alternate globals |
||
274 | wrpr %g4, 0, %pstate |
||
275 | |||
276 | /* |
||
277 | * Save the normal globals. |
||
278 | */ |
||
666 | jermar | 279 | SAVE_GLOBALS |
667 | jermar | 280 | |
281 | /* |
||
282 | * Call the higher-level handler. |
||
283 | */ |
||
666 | jermar | 284 | call %l0 |
285 | nop |
||
667 | jermar | 286 | |
287 | /* |
||
288 | * Restore the normal global register set. |
||
289 | */ |
||
666 | jermar | 290 | RESTORE_GLOBALS |
667 | jermar | 291 | |
292 | /* |
||
293 | * Restore PSTATE from saved copy. |
||
294 | * Alternate globals become active. |
||
295 | */ |
||
296 | ldx [%fp + STACK_BIAS + SAVED_PSTATE], %l4 |
||
297 | wrpr %l4, 0, %pstate |
||
298 | |||
299 | /* |
||
300 | * Write 1 to TL. |
||
301 | */ |
||
302 | wrpr %g0, 1, %tl |
||
303 | |||
304 | /* |
||
305 | * Read TSTATE, TPC and TNPC from saved copy. |
||
306 | */ |
||
307 | ldx [%fp + STACK_BIAS + SAVED_TSTATE], %g1 |
||
308 | ldx [%fp + STACK_BIAS + SAVED_TPC], %g2 |
||
309 | ldx [%fp + STACK_BIAS + SAVED_TNPC], %g3 |
||
310 | |||
311 | /* |
||
312 | * Do restore to match the save instruction from the top-level handler. |
||
313 | */ |
||
314 | restore |
||
315 | |||
316 | /* |
||
317 | * On execution of retry instruction, CWP will be restored from TSTATE register. |
||
318 | * However, because of scheduling, it is possible that CWP in saved TSTATE |
||
319 | * is different from current CWP. The following chunk of code fixes CWP |
||
320 | * in the saved copy of TSTATE. |
||
321 | */ |
||
322 | rdpr %cwp, %g4 ! read current CWP |
||
323 | and %g1, ~0x1f, %g1 ! clear CWP field in saved TSTATE |
||
324 | or %g1, %g4, %g1 ! write current CWP to TSTATE |
||
325 | |||
326 | /* |
||
327 | * Restore TSTATE, TPC and TNPC from saved copies. |
||
328 | */ |
||
329 | wrpr %g1, 0, %tstate |
||
330 | wrpr %g2, 0, %tpc |
||
331 | wrpr %g3, 0, %tnpc |
||
332 | |||
333 | /* |
||
334 | * Return from interrupt. |
||
335 | */ |
||
666 | jermar | 336 | retry |