]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - sys/arm/arm/exception.S
Merge OpenSSL 1.0.2e.
[FreeBSD/FreeBSD.git] / sys / arm / arm / exception.S
1 /*      $NetBSD: exception.S,v 1.13 2003/10/31 16:30:15 scw Exp $       */
2
3 /*-
4  * Copyright (c) 1994-1997 Mark Brinicombe.
5  * Copyright (c) 1994 Brini.
6  * All rights reserved.
7  *
8  * This code is derived from software written for Brini by Mark Brinicombe
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. All advertising materials mentioning features or use of this software
19  *    must display the following acknowledgement:
20  *      This product includes software developed by Brini.
21  * 4. The name of the company nor the name of the author may be used to
22  *    endorse or promote products derived from this software without specific
23  *    prior written permission.
24  *
25  * THIS SOFTWARE IS PROVIDED BY BRINI ``AS IS'' AND ANY EXPRESS OR IMPLIED
26  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
27  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
28  * IN NO EVENT SHALL BRINI OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
29  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
30  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
31  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35  * SUCH DAMAGE.
36  *
37  * RiscBSD kernel project
38  *
39  * exception.S
40  *
41  * Low level handlers for exception vectors
42  *
43  * Created      : 24/09/94
44  *
45  * Based on kate/display/abort.s
46  *
47  */
48
49 #include "assym.s"
50
51 #include <machine/acle-compat.h>
52 #include <machine/asm.h>
53 #include <machine/armreg.h>
54 #include <machine/asmacros.h>
55 __FBSDID("$FreeBSD$");
56
57 #ifdef KDTRACE_HOOKS
58         .bss
59         .align 4
60         .global _C_LABEL(dtrace_invop_calltrap_addr)
61 _C_LABEL(dtrace_invop_calltrap_addr):
62         .word 0
63         .word 0
64 #endif
65
66         .text
67         .align  2
68
69 /*
70  * ASM macros for pushing and pulling trapframes from the stack
71  *
72  * These macros are used to handle the irqframe and trapframe structures
73  * defined above.
74  */
75
76 /*
77  * PUSHFRAME - macro to push a trap frame on the stack in the current mode
78  * Since the current mode is used, the SVC lr field is not defined.
79  *
80  * NOTE: r13 and r14 are stored separately as a work around for the
81  * SA110 rev 2 STM^ bug
82  */
83 #if __ARM_ARCH < 6
84 #define PUSHFRAME                                                          \
85         sub     sp, sp, #4;             /* Align the stack */              \
86         str     lr, [sp, #-4]!;         /* Push the return address */      \
87         sub     sp, sp, #(4*17);        /* Adjust the stack pointer */     \
88         stmia   sp, {r0-r12};           /* Push the user mode registers */ \
89         add     r0, sp, #(4*13);        /* Adjust the stack pointer */     \
90         stmia   r0, {r13-r14}^;         /* Push the user mode registers */ \
91         mov     r0, r0;                 /* NOP for previous instruction */ \
92         mrs     r0, spsr;               /* Put the SPSR on the stack */    \
93         str     r0, [sp, #-4]!;                                            \
94         ldr     r0, =ARM_RAS_START;                                        \
95         mov     r1, #0;                                                    \
96         str     r1, [r0];                                                  \
97         mov     r1, #0xffffffff;                                           \
98         str     r1, [r0, #4];
99 #else
100 #define PUSHFRAME                                                          \
101         sub     sp, sp, #4;             /* Align the stack */              \
102         str     lr, [sp, #-4]!;         /* Push the return address */      \
103         sub     sp, sp, #(4*17);        /* Adjust the stack pointer */     \
104         stmia   sp, {r0-r12};           /* Push the user mode registers */ \
105         add     r0, sp, #(4*13);        /* Adjust the stack pointer */     \
106         stmia   r0, {r13-r14}^;         /* Push the user mode registers */ \
107         mov     r0, r0;                 /* NOP for previous instruction */ \
108         mrs     r0, spsr;               /* Put the SPSR on the stack */    \
109         str     r0, [sp, #-4]!;
110 #endif
111
112 /*
113  * PULLFRAME - macro to pull a trap frame from the stack in the current mode
114  * Since the current mode is used, the SVC lr field is ignored.
115  */
116
117 #if __ARM_ARCH < 6
118 #define PULLFRAME                                                          \
119         ldr     r0, [sp], #4;           /* Get the SPSR from stack */      \
120         msr     spsr_fsxc, r0;                                             \
121         ldmia   sp, {r0-r14}^;          /* Restore registers (usr mode) */ \
122         mov     r0, r0;                 /* NOP for previous instruction */ \
123         add     sp, sp, #(4*17);        /* Adjust the stack pointer */     \
124         ldr     lr, [sp], #4;           /* Pull the return address */      \
125         add     sp, sp, #4              /* Align the stack */
126 #else
127 #define PULLFRAME                                                          \
128         ldr     r0, [sp], #4    ;       /* Get the SPSR from stack */      \
129         msr     spsr_fsxc, r0;                                             \
130         clrex;                                                             \
131         ldmia   sp, {r0-r14}^;          /* Restore registers (usr mode) */ \
132         mov     r0, r0;                 /* NOP for previous instruction */ \
133         add     sp, sp, #(4*17);        /* Adjust the stack pointer */     \
134         ldr     lr, [sp], #4;           /* Pull the return address */      \
135         add     sp, sp, #4              /* Align the stack */
136 #endif
137
138 /*
139  * PUSHFRAMEINSVC - macro to push a trap frame on the stack in SVC32 mode
140  * This should only be used if the processor is not currently in SVC32
141  * mode. The processor mode is switched to SVC mode and the trap frame is
142  * stored. The SVC lr field is used to store the previous value of
143  * lr in SVC mode.
144  *
145  * NOTE: r13 and r14 are stored separately as a work around for the
146  * SA110 rev 2 STM^ bug
147  */
148 #if __ARM_ARCH < 6
149 #define PUSHFRAMEINSVC                                                     \
150         stmdb   sp, {r0-r3};            /* Save 4 registers */             \
151         mov     r0, lr;                 /* Save xxx32 r14 */               \
152         mov     r1, sp;                 /* Save xxx32 sp */                \
153         mrs     r3, spsr;               /* Save xxx32 spsr */              \
154         mrs     r2, cpsr;               /* Get the CPSR */                 \
155         bic     r2, r2, #(PSR_MODE);    /* Fix for SVC mode */             \
156         orr     r2, r2, #(PSR_SVC32_MODE);                                 \
157         msr     cpsr_c, r2;             /* Punch into SVC mode */          \
158         mov     r2, sp;                 /* Save SVC sp */                  \
159         bic     sp, sp, #7;             /* Align sp to an 8-byte addrress */  \
160         sub     sp, sp, #(4 * 17);      /* Pad trapframe to keep alignment */ \
161                                     /* and for dtrace to emulate push/pop */  \
162         str     r0, [sp, #-4]!;         /* Push return address */          \
163         str     lr, [sp, #-4]!;         /* Push SVC lr */                  \
164         str     r2, [sp, #-4]!;         /* Push SVC sp */                  \
165         msr     spsr_fsxc, r3;          /* Restore correct spsr */         \
166         ldmdb   r1, {r0-r3};            /* Restore 4 regs from xxx mode */ \
167         sub     sp, sp, #(4*15);        /* Adjust the stack pointer */     \
168         stmia   sp, {r0-r12};           /* Push the user mode registers */ \
169         add     r0, sp, #(4*13);        /* Adjust the stack pointer */     \
170         stmia   r0, {r13-r14}^;         /* Push the user mode registers */ \
171         mov     r0, r0;                 /* NOP for previous instruction */ \
172         ldr     r5, =ARM_RAS_START;     /* Check if there's any RAS */     \
173         ldr     r4, [r5, #4];           /* reset it to point at the     */ \
174         cmp     r4, #0xffffffff;        /* end of memory if necessary;  */ \
175         movne   r1, #0xffffffff;        /* leave value in r4 for later  */ \
176         strne   r1, [r5, #4];           /* comparision against PC.      */ \
177         ldr     r3, [r5];               /* Retrieve global RAS_START    */ \
178         cmp     r3, #0;                 /* and reset it if non-zero.    */ \
179         movne   r1, #0;                 /* If non-zero RAS_START and    */ \
180         strne   r1, [r5];               /* PC was lower than RAS_END,   */ \
181         ldrne   r1, [r0, #16];          /* adjust the saved PC so that  */ \
182         cmpne   r4, r1;                 /* execution later resumes at   */ \
183         strhi   r3, [r0, #16];          /* the RAS_START location.      */ \
184         mrs     r0, spsr;                                                  \
185         str     r0, [sp, #-4]!
186 #else
187 #define PUSHFRAMEINSVC                                                     \
188         stmdb   sp, {r0-r3};            /* Save 4 registers */             \
189         mov     r0, lr;                 /* Save xxx32 r14 */               \
190         mov     r1, sp;                 /* Save xxx32 sp */                \
191         mrs     r3, spsr;               /* Save xxx32 spsr */              \
192         mrs     r2, cpsr;               /* Get the CPSR */                 \
193         bic     r2, r2, #(PSR_MODE);    /* Fix for SVC mode */             \
194         orr     r2, r2, #(PSR_SVC32_MODE);                                 \
195         msr     cpsr_c, r2;             /* Punch into SVC mode */          \
196         mov     r2, sp;                 /* Save SVC sp */                  \
197         bic     sp, sp, #7;             /* Align sp to an 8-byte addrress */  \
198         sub     sp, sp, #(4 * 17);      /* Pad trapframe to keep alignment */ \
199                                     /* and for dtrace to emulate push/pop */  \
200         str     r0, [sp, #-4]!;         /* Push return address */          \
201         str     lr, [sp, #-4]!;         /* Push SVC lr */                  \
202         str     r2, [sp, #-4]!;         /* Push SVC sp */                  \
203         msr     spsr_fsxc, r3;          /* Restore correct spsr */         \
204         ldmdb   r1, {r0-r3};            /* Restore 4 regs from xxx mode */ \
205         sub     sp, sp, #(4*15);        /* Adjust the stack pointer */     \
206         stmia   sp, {r0-r12};           /* Push the user mode registers */ \
207         add     r0, sp, #(4*13);        /* Adjust the stack pointer */     \
208         stmia   r0, {r13-r14}^;         /* Push the user mode registers */ \
209         mov     r0, r0;                 /* NOP for previous instruction */ \
210         mrs     r0, spsr;               /* Put the SPSR on the stack */    \
211         str     r0, [sp, #-4]!
212 #endif
213
214 /*
215  * PULLFRAMEFROMSVCANDEXIT - macro to pull a trap frame from the stack
216  * in SVC32 mode and restore the saved processor mode and PC.
217  * This should be used when the SVC lr register needs to be restored on
218  * exit.
219  */
220
221 #if __ARM_ARCH < 6
222 #define PULLFRAMEFROMSVCANDEXIT                                            \
223         ldr     r0, [sp], #4;           /* Get the SPSR from stack */      \
224         msr     spsr_fsxc, r0;          /* restore SPSR */                 \
225         ldmia   sp, {r0-r14}^;          /* Restore registers (usr mode) */ \
226         mov     r0, r0;                 /* NOP for previous instruction */ \
227         add     sp, sp, #(4*15);        /* Adjust the stack pointer */     \
228         ldmia   sp, {sp, lr, pc}^       /* Restore lr and exit */
229 #else
230 #define PULLFRAMEFROMSVCANDEXIT                                            \
231         ldr     r0, [sp], #4;           /* Get the SPSR from stack */      \
232         msr     spsr_fsxc, r0;          /* restore SPSR */                 \
233         clrex;                                                             \
234         ldmia   sp, {r0-r14}^;          /* Restore registers (usr mode) */ \
235         mov     r0, r0;                 /* NOP for previous instruction */ \
236         add     sp, sp, #(4*15);        /* Adjust the stack pointer */     \
237         ldmia   sp, {sp, lr, pc}^       /* Restore lr and exit */
238 #endif
239
240 /*
241  * Unwind hints so we can unwind past functions that use
242  * PULLFRAMEFROMSVCANDEXIT. They are run in reverse order.
243  * As the last thing we do is restore the stack pointer
244  * we can ignore the padding at the end of struct trapframe.
245  */
246 #define UNWINDSVCFRAME                                                     \
247         .save {r13-r15};                /* Restore sp, lr, pc */           \
248         .pad #(2*4);                    /* Skip user sp and lr */          \
249         .save {r0-r12};                 /* Restore r0-r12 */               \
250         .pad #(4)                       /* Skip spsr */
251
252 #define DO_AST                                                             \
253         ldr     r0, [sp];               /* Get the SPSR from stack */      \
254         mrs     r4, cpsr;               /* save CPSR */                    \
255         orr     r1, r4, #(PSR_I|PSR_F);                                    \
256         msr     cpsr_c, r1;             /* Disable interrupts */           \
257         and     r0, r0, #(PSR_MODE);    /* Returning to USR mode? */       \
258         teq     r0, #(PSR_USR32_MODE);                                     \
259         bne     2f;                     /* Nope, get out now */            \
260         bic     r4, r4, #(PSR_I|PSR_F);                                    \
261 1:      GET_CURTHREAD_PTR(r5);                                             \
262         ldr     r1, [r5, #(TD_FLAGS)];                                     \
263         and     r1, r1, #(TDF_ASTPENDING|TDF_NEEDRESCHED);                 \
264         teq     r1, #0;                                                    \
265         beq     2f;                     /* Nope. Just bail */              \
266         msr     cpsr_c, r4;             /* Restore interrupts */           \
267         mov     r0, sp;                                                    \
268         bl      _C_LABEL(ast);          /* ast(frame) */                   \
269         orr     r0, r4, #(PSR_I|PSR_F);                                    \
270         msr     cpsr_c, r0;                                                \
271         b       1b;                                                        \
272 2:
273
274
275 /*
276  * Entry point for a Software Interrupt (SWI).
277  *
278  * The hardware switches to svc32 mode on a swi, so we're already on the
279  * right stack; just build a trapframe and call the handler.
280  */
281 ASENTRY_NP(swi_entry)
282         PUSHFRAME                       /* Build the trapframe on the */
283         mov     r0, sp                  /* scv32 stack, pass it to the */
284         bl      _C_LABEL(swi_handler)   /* swi handler. */
285         /*
286          * The fork_trampoline() code in swtch.S aranges for the MI fork_exit()
287          * to return to swi_exit here, to return to userland.  The net effect is
288          * that a newly created thread appears to return from a SWI just like
289          * the parent thread that created it.
290          */
291 ASEENTRY_NP(swi_exit)
292         DO_AST                          /* Handle pending signals. */
293         PULLFRAME                       /* Deallocate trapframe. */
294         movs    pc, lr                  /* Return to userland. */
295         STOP_UNWINDING                  /* Don't unwind into user mode. */
296 EEND(swi_exit)
297 END(swi_entry)
298
299 /*
300  * Standard exception exit handler.
301  *
302  * This is used to return from all exceptions except SWI.  It uses DO_AST and
303  * PULLFRAMEFROMSVCANDEXIT and can only be called if the exception entry code
304  * used PUSHFRAMEINSVC.
305  *
306  * If the return is to user mode, this uses DO_AST to deliver any pending
307  * signals and/or handle TDF_NEEDRESCHED first.
308  */
309 ASENTRY_NP(exception_exit)
310         DO_AST                          /* Handle pending signals. */
311         PULLFRAMEFROMSVCANDEXIT         /* Return. */
312         UNWINDSVCFRAME                  /* Special unwinding for exceptions. */
313 END(exception_exit)
314
315 /*
316  * Entry point for a Prefetch Abort exception.
317  *
318  * The hardware switches to the abort mode stack; we switch to svc32 before
319  * calling the handler, then return directly to the original mode/stack
320  * on exit (without transitioning back through the abort mode stack).
321  */
322 ASENTRY_NP(prefetch_abort_entry)
323 #ifdef __XSCALE__
324         nop                             /* Make absolutely sure any pending */
325         nop                             /* imprecise aborts have occurred. */
326 #endif
327         sub     lr, lr, #4              /* Adjust the lr. Transition to scv32 */
328         PUSHFRAMEINSVC                  /* mode stack, build trapframe there. */
329         adr     lr, exception_exit      /* Return from handler via standard */
330         mov     r0, sp                  /* exception exit routine.  Pass the */
331         mov     r1, #1                  /* Type flag */
332         b       _C_LABEL(abort_handler)
333 END(prefetch_abort_entry)
334
335 /*
336  * Entry point for a Data Abort exception.
337  *
338  * The hardware switches to the abort mode stack; we switch to svc32 before
339  * calling the handler, then return directly to the original mode/stack
340  * on exit (without transitioning back through the abort mode stack).
341  */
342 ASENTRY_NP(data_abort_entry)
343 #ifdef __XSCALE__
344         nop                             /* Make absolutely sure any pending */
345         nop                             /* imprecise aborts have occurred. */
346 #endif
347         sub     lr, lr, #8              /* Adjust the lr. Transition to scv32 */
348         PUSHFRAMEINSVC                  /* mode stack, build trapframe there. */
349         adr     lr, exception_exit      /* Exception exit routine */
350         mov     r0, sp                  /* Trapframe to the handler */
351         mov     r1, #0                  /* Type flag */
352         b       _C_LABEL(abort_handler)
353 END(data_abort_entry)
354
355 /*
356  * Entry point for an Undefined Instruction exception.
357  *
358  * The hardware switches to the undefined mode stack; we switch to svc32 before
359  * calling the handler, then return directly to the original mode/stack
360  * on exit (without transitioning back through the undefined mode stack).
361  */
362 ASENTRY_NP(undefined_entry)
363         PUSHFRAMEINSVC                  /* mode stack, build trapframe there. */
364         adr     lr, exception_exit      /* Return from handler via standard */
365         mov     r0, sp                  /* exception exit routine.  Pass the */
366         b       undefinedinstruction    /* trapframe to the handler. */
367 END(undefined_entry)
368
369 /*
370  * Entry point for a normal IRQ.
371  *
372  * The hardware switches to the IRQ mode stack; we switch to svc32 before
373  * calling the handler, then return directly to the original mode/stack
374  * on exit (without transitioning back through the IRQ mode stack).
375  */
376 ASENTRY_NP(irq_entry)
377         sub     lr, lr, #4              /* Adjust the lr. Transition to scv32 */
378         PUSHFRAMEINSVC                  /* mode stack, build trapframe there. */
379         adr     lr, exception_exit      /* Return from handler via standard */
380         mov     r0, sp                  /* exception exit routine.  Pass the */
381         b       _C_LABEL(arm_irq_handler)/* trapframe to the handler. */
382 END(irq_entry)
383
384 /*
385  * Entry point for an FIQ interrupt.
386  *
387  * We don't currently support FIQ handlers very much.  Something can
388  * install itself in the FIQ vector using code (that may or may not work
389  * these days) in fiq.c.  If nobody does that and an FIQ happens, this
390  * default handler just disables FIQs and otherwise ignores it.
391  */
392 ASENTRY_NP(fiq_entry)
393         mrs     r8, cpsr                /* FIQ handling isn't supported, */
394         bic     r8, #(PSR_F)            /* just disable FIQ and return.  */
395         msr     cpsr_c, r8              /* The r8 we trash here is the  */
396         subs    pc, lr, #4              /* banked FIQ-mode r8. */
397 END(fiq_entry)
398
399 /*
400  * Entry point for an Address Exception exception.
401  * This is an arm26 exception that should never happen.
402  */
403 ASENTRY_NP(addr_exception_entry)
404         mov     r3, lr
405         mrs     r2, spsr
406         mrs     r1, cpsr
407         adr     r0, Laddr_exception_msg
408         b       _C_LABEL(panic)
409 Laddr_exception_msg:
410         .asciz  "Address Exception CPSR=0x%08x SPSR=0x%08x LR=0x%08x\n"
411         .balign 4
412 END(addr_exception_entry)
413
414 /*
415  * Entry point for the system Reset vector.
416  * This should never happen, so panic.
417  */
418 ASENTRY_NP(reset_entry)
419         mov     r1, lr
420         adr     r0, Lreset_panicmsg
421         b       _C_LABEL(panic)
422         /* NOTREACHED */
423 Lreset_panicmsg:
424         .asciz  "Reset vector called, LR = 0x%08x"
425         .balign 4
426 END(reset_entry)
427
428 /*
429  * page0 and page0_data -- An image of the ARM vectors which is copied to
430  * the ARM vectors page (high or low) as part of CPU initialization.  The
431  * code that does the copy assumes that page0_data holds one 32-bit word
432  * of data for each of the predefined ARM vectors.  It also assumes that
433  * page0_data follows the vectors in page0, but other stuff can appear
434  * between the two.  We currently leave room between the two for some fiq
435  * handler code to be copied in.
436  */
437         .global _C_LABEL(page0), _C_LABEL(page0_data)
438
439 _C_LABEL(page0):
440         ldr     pc, .Lreset_entry
441         ldr     pc, .Lundefined_entry
442         ldr     pc, .Lswi_entry
443         ldr     pc, .Lprefetch_abort_entry
444         ldr     pc, .Ldata_abort_entry
445         ldr     pc, .Laddr_exception_entry
446         ldr     pc, .Lirq_entry
447 .fiqv:  ldr     pc, .Lfiq_entry
448         .space 256      /* room for some fiq handler code */
449
450 _C_LABEL(page0_data):
451 .Lreset_entry:          .word   reset_entry
452 .Lundefined_entry:      .word   undefined_entry
453 .Lswi_entry:            .word   swi_entry
454 .Lprefetch_abort_entry: .word   prefetch_abort_entry
455 .Ldata_abort_entry:     .word   data_abort_entry
456 .Laddr_exception_entry: .word   addr_exception_entry
457 .Lirq_entry:            .word   irq_entry
458 .Lfiq_entry:            .word   fiq_entry
459
460 /*
461  * These items are used by the code in fiq.c to install what it calls the
462  * "null" handler.  It's actually our default vector entry that just jumps
463  * to the default handler which just disables FIQs and returns.
464  */
465         .global _C_LABEL(fiq_nullhandler_code), _C_LABEL(fiq_nullhandler_size)
466
467 _C_LABEL(fiq_nullhandler_code):
468         .word   .fiqv
469 _C_LABEL(fiq_nullhandler_size):
470         .word   4
471
472