xref: /netbsd-src/sys/arch/arm/include/arm32/frame.h (revision 7788a0781fe6ff2cce37368b4578a7ade0850cb1)
1 /*	$NetBSD: frame.h,v 1.35 2012/10/21 15:46:00 matt 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  * frame.h
40  *
41  * Stack frames structures
42  *
43  * Created      : 30/09/94
44  */
45 
46 #ifndef _ARM32_FRAME_H_
47 #define _ARM32_FRAME_H_
48 
49 #include <arm/frame.h>		/* Common ARM stack frames */
50 
51 #ifndef _LOCORE
52 
53 /*
54  * System stack frames.
55  */
56 
57 struct clockframe {
58 	struct trapframe cf_tf;
59 };
60 
61 /*
62  * Switch frame.
63  *
64  * Should be a multiple of 8 bytes for dumpsys.
65  */
66 
67 struct switchframe {
68 	u_int	sf_r4;
69 	u_int	sf_r5;
70 	u_int	sf_r6;
71 	u_int	sf_r7;
72 	u_int	sf_sp;
73 	u_int	sf_pc;
74 };
75 
76 /*
77  * Stack frame. Used during stack traces (db_trace.c)
78  */
79 struct frame {
80 	u_int	fr_fp;
81 	u_int	fr_sp;
82 	u_int	fr_lr;
83 	u_int	fr_pc;
84 };
85 
86 #ifdef _KERNEL
87 void validate_trapframe(trapframe_t *, int);
88 #endif /* _KERNEL */
89 
90 #else /* _LOCORE */
91 
92 #include "opt_compat_netbsd.h"
93 #include "opt_execfmt.h"
94 #include "opt_multiprocessor.h"
95 #include "opt_cpuoptions.h"
96 #include "opt_arm_debug.h"
97 #include "opt_cputypes.h"
98 
99 #include <machine/cpu.h>
100 
101 /*
102  * This macro is used by DO_AST_AND_RESTORE_ALIGNMENT_FAULTS to process
103  * any pending softints.
104  */
105 #if defined(__HAVE_FAST_SOFTINTS) && !defined(__HAVE_PIC_FAST_SOFTINTS)
106 #define	DO_PENDING_SOFTINTS						\
107 	ldr	r0, [r4, #CI_INTR_DEPTH]/* Get current intr depth */	;\
108 	teq	r0, #0			/* Test for 0. */		;\
109 	bne	10f			/*   skip softints if != 0 */	;\
110 	ldr	r0, [r4, #CI_CPL]	/* Get current priority level */;\
111 	ldr	r1, [r4, #CI_SOFTINTS]	/* Get pending softint mask */	;\
112 	lsrs	r0, r1, r0		/* shift mask by cpl */		;\
113 	blne	_C_LABEL(dosoftints)	/* dosoftints(void) */		;\
114 10:
115 #else
116 #define	DO_PENDING_SOFTINTS		/* nothing */
117 #endif
118 
119 #ifdef MULTIPROCESSOR
120 #define	KERNEL_LOCK							\
121 	mov	r0, #1							;\
122 	mov	r1, #0							;\
123 	bl	_C_LABEL(_kernel_lock)
124 
125 #define	KERNEL_UNLOCK							\
126 	mov	r0, #1							;\
127 	mov	r1, #0							;\
128 	mov	r2, #0							;\
129 	bl	_C_LABEL(_kernel_unlock)
130 #else
131 #define	KERNEL_LOCK			/* nothing */
132 #define	KERNEL_UNLOCK			/* nothing */
133 #endif
134 
135 #ifdef _ARM_ARCH_6
136 #define	GET_CPSR(rb)			/* nothing */
137 #define	CPSID_I(ra,rb)			cpsid	i
138 #define	CPSIE_I(ra,rb)			cpsie	i
139 #else
140 #define	GET_CPSR(rb)							\
141 	mrs	rb, cpsr		/* fetch CPSR */
142 
143 #define	CPSID_I(ra,rb)							\
144 	orr	ra, rb, #(IF32_bits)					;\
145 	msr	cpsr_c, ra		/* Disable interrupts */
146 
147 #define	CPSIE_I(ra,rb)							\
148 	bic	ra, rb, #(IF32_bits)					;\
149 	msr	cpsr_c, ra		/* Restore interrupts */
150 #endif
151 
152 /*
153  * AST_ALIGNMENT_FAULT_LOCALS and ENABLE_ALIGNMENT_FAULTS
154  * These are used in order to support dynamic enabling/disabling of
155  * alignment faults when executing old a.out ARM binaries.
156  *
157  * Note that when ENABLE_ALIGNMENTS_FAULTS finishes r4 will contain
158  * pointer to the cpu's cpu_info.  DO_AST_AND_RESTORE_ALIGNMENT_FAULTS
159  * relies on r4 being preserved.
160  */
161 #ifdef EXEC_AOUT
162 #define	AST_ALIGNMENT_FAULT_LOCALS					\
163 .Laflt_cpufuncs:							;\
164 	.word	_C_LABEL(cpufuncs)
165 
166 /*
167  * This macro must be invoked following PUSHFRAMEINSVC or PUSHFRAME at
168  * the top of interrupt/exception handlers.
169  *
170  * When invoked, r0 *must* contain the value of SPSR on the current
171  * trap/interrupt frame. This is always the case if ENABLE_ALIGNMENT_FAULTS
172  * is invoked immediately after PUSHFRAMEINSVC or PUSHFRAME.
173  */
174 #define	ENABLE_ALIGNMENT_FAULTS						\
175 	and	r7, r0, #(PSR_MODE)	/* Test for USR32 mode */	;\
176 	teq	r7, #(PSR_USR32_MODE)					;\
177 	GET_CURCPU(r4)			/* r4 = cpuinfo */		;\
178 	bne	1f			/* Not USR mode skip AFLT */	;\
179 	ldr	r1, [r4, #CI_CURLWP]	/* get curlwp from cpu_info */	;\
180 	ldr	r1, [r1, #L_MD_FLAGS]	/* Fetch l_md.md_flags */	;\
181 	tst	r1, #MDLWP_NOALIGNFLT					;\
182 	beq	1f			/* AFLTs already enabled */	;\
183 	ldr	r2, .Laflt_cpufuncs					;\
184 	ldr	r1, [r4, #CI_CTRL]	/* Fetch control register */	;\
185 	mov	r0, #-1							;\
186 	mov	lr, pc							;\
187 	ldr	pc, [r2, #CF_CONTROL]	/* Enable alignment faults */	;\
188 1:	KERNEL_LOCK
189 
190 /*
191  * This macro must be invoked just before PULLFRAMEFROMSVCANDEXIT or
192  * PULLFRAME at the end of interrupt/exception handlers.  We know that
193  * r4 points to cpu_info since that is what ENABLE_ALIGNMENT_FAULTS did
194  * for use.
195  */
196 #define	DO_AST_AND_RESTORE_ALIGNMENT_FAULTS				\
197 	DO_PENDING_SOFTINTS						;\
198 	GET_CPSR(r5)			/* save CPSR */			;\
199 	CPSID_I(r1, r5)			/* Disable interrupts */	;\
200 	teq	r7, #(PSR_USR32_MODE)	/* Returning to USR mode? */	;\
201 	bne	3f			/* Nope, get out now */		;\
202 1:	ldr	r1, [r4, #CI_ASTPENDING] /* Pending AST? */		;\
203 	teq	r1, #0x00000000						;\
204 	bne	2f			/* Yup. Go deal with it */	;\
205 	ldr	r1, [r4, #CI_CURLWP]	/* get curlwp from cpu_info */	;\
206 	ldr	r0, [r1, #L_MD_FLAGS]	/* get md_flags from lwp */	;\
207 	tst	r0, #MDLWP_NOALIGNFLT					;\
208 	beq	3f			/* Keep AFLTs enabled */	;\
209 	ldr	r1, [r4, #CI_CTRL]	/* Fetch control register */	;\
210 	ldr	r2, .Laflt_cpufuncs					;\
211 	mov	r0, #-1							;\
212 	bic	r1, r1, #CPU_CONTROL_AFLT_ENABLE  /* Disable AFLTs */	;\
213 	adr	lr, 3f							;\
214 	ldr	pc, [r2, #CF_CONTROL]	/* Set new CTRL reg value */	;\
215 	/* NOTREACHED */						\
216 2:	mov	r1, #0x00000000						;\
217 	str	r1, [r4, #CI_ASTPENDING] /* Clear astpending */		;\
218 	CPSIE_I(r5, r5)			/* Restore interrupts */	;\
219 	mov	r0, sp							;\
220 	bl	_C_LABEL(ast)		/* ast(frame) */		;\
221 	CPSID_I(r0, r5)			/* Disable interrupts */	;\
222 	b	1b			/* Back around again */		;\
223 3:	KERNEL_UNLOCK
224 
225 #else	/* !EXEC_AOUT */
226 
227 #define	AST_ALIGNMENT_FAULT_LOCALS
228 
229 #define	ENABLE_ALIGNMENT_FAULTS						\
230 	and	r7, r0, #(PSR_MODE)	/* Test for USR32 mode */	;\
231 	GET_CURCPU(r4)			/* r4 = cpuinfo */		;\
232 	KERNEL_LOCK
233 
234 #define	DO_AST_AND_RESTORE_ALIGNMENT_FAULTS				\
235 	DO_PENDING_SOFTINTS						;\
236 	GET_CPSR(r5)			/* save CPSR */			;\
237 	CPSID_I(r1, r5)			/* Disable interrupts */	;\
238 	teq	r7, #(PSR_USR32_MODE)					;\
239 	bne	2f			/* Nope, get out now */		;\
240 1:	ldr	r1, [r4, #CI_ASTPENDING] /* Pending AST? */		;\
241 	teq	r1, #0x00000000						;\
242 	beq	2f			/* Nope. Just bail */		;\
243 	mov	r1, #0x00000000						;\
244 	str	r1, [r4, #CI_ASTPENDING] /* Clear astpending */		;\
245 	CPSIE_I(r5, r5)			/* Restore interrupts */	;\
246 	mov	r0, sp							;\
247 	bl	_C_LABEL(ast)		/* ast(frame) */		;\
248 	CPSID_I(r0, r5)			/* Disable interrupts */	;\
249 	b	1b							;\
250 2:	KERNEL_UNLOCK			/* unlock the kernel */
251 #endif /* EXEC_AOUT */
252 
253 #ifndef _ARM_ARCH_6
254 #ifdef ARM_LOCK_CAS_DEBUG
255 #define	LOCK_CAS_DEBUG_LOCALS						 \
256 .L_lock_cas_restart:							;\
257 	.word	_C_LABEL(_lock_cas_restart)
258 
259 #if defined(__ARMEB__)
260 #define	LOCK_CAS_DEBUG_COUNT_RESTART					 \
261 	ble	99f							;\
262 	ldr	r0, .L_lock_cas_restart					;\
263 	ldmia	r0, {r1-r2}		/* load ev_count */		;\
264 	adds	r2, r2, #1		/* 64-bit incr (lo) */		;\
265 	adc	r1, r1, #0		/* 64-bit incr (hi) */		;\
266 	stmia	r0, {r1-r2}		/* store ev_count */
267 #else /* __ARMEB__ */
268 #define	LOCK_CAS_DEBUG_COUNT_RESTART					 \
269 	ble	99f							;\
270 	ldr	r0, .L_lock_cas_restart					;\
271 	ldmia	r0, {r1-r2}		/* load ev_count */		;\
272 	adds	r1, r1, #1		/* 64-bit incr (lo) */		;\
273 	adc	r2, r2, #0		/* 64-bit incr (hi) */		;\
274 	stmia	r0, {r1-r2}		/* store ev_count */
275 #endif /* __ARMEB__ */
276 #else /* ARM_LOCK_CAS_DEBUG */
277 #define	LOCK_CAS_DEBUG_LOCALS		/* nothing */
278 #define	LOCK_CAS_DEBUG_COUNT_RESTART	/* nothing */
279 #endif /* ARM_LOCK_CAS_DEBUG */
280 
281 #define	LOCK_CAS_CHECK_LOCALS						 \
282 .L_lock_cas:								;\
283 	.word	_C_LABEL(_lock_cas)					;\
284 .L_lock_cas_end:							;\
285 	.word	_C_LABEL(_lock_cas_end)					;\
286 LOCK_CAS_DEBUG_LOCALS
287 
288 #define	LOCK_CAS_CHECK							 \
289 	ldr	r0, [sp]		/* get saved PSR */		;\
290 	and	r0, r0, #(PSR_MODE)	/* check for SVC32 mode */	;\
291 	teq	r0, #(PSR_SVC32_MODE)					;\
292 	bne	99f			/* nope, get out now */		;\
293 	ldr	r0, [sp, #(TF_PC)]					;\
294 	ldr	r1, .L_lock_cas_end					;\
295 	cmp	r0, r1							;\
296 	bge	99f							;\
297 	ldr	r1, .L_lock_cas						;\
298 	cmp	r0, r1							;\
299 	strgt	r1, [sp, #(TF_PC)]					;\
300 	LOCK_CAS_DEBUG_COUNT_RESTART					;\
301 99:
302 
303 #else
304 #define	LOCK_CAS_CHECK			/* nothing */
305 #define	LOCK_CAS_CHECK_LOCALS		/* nothing */
306 #endif
307 
308 /*
309  * ASM macros for pushing and pulling trapframes from the stack
310  *
311  * These macros are used to handle the trapframe structure defined above.
312  */
313 
314 /*
315  * PUSHFRAME - macro to push a trap frame on the stack in the current mode
316  * Since the current mode is used, the SVC lr field is not defined.
317  */
318 
319 #ifdef CPU_SA110
320 /*
321  * NOTE: r13 and r14 are stored separately as a work around for the
322  * SA110 rev 2 STM^ bug
323  */
324 #define	PUSHUSERREGS							   \
325 	stmia	sp, {r0-r12};		/* Push the user mode registers */ \
326 	add	r0, sp, #(TF_USR_SP-TF_R0); /* Adjust the stack pointer */ \
327 	stmia	r0, {r13-r14}^		/* Push the user mode registers */
328 #else
329 #define	PUSHUSERREGS							   \
330 	stmia	sp, {r0-r14}^		/* Push the user mode registers */
331 #endif
332 
333 #define PUSHFRAME							   \
334 	str	lr, [sp, #-4]!;		/* Push the return address */	   \
335 	sub	sp, sp, #(TF_PC-TF_R0);	/* Adjust the stack pointer */	   \
336 	PUSHUSERREGS;			/* Push the user mode registers */ \
337 	mov     r0, r0;                 /* NOP for previous instruction */ \
338 	mrs	r0, spsr_all;		/* Get the SPSR */		   \
339 	str	r0, [sp, #-TF_R0]!	/* Push the SPSR on the stack */
340 
341 /*
342  * Push a minimal trapframe so we can dispatch an interrupt from the
343  * idle loop.  The only reason the idle loop wakes up is to dispatch
344  * interrupts so why take the avoid of a full exception when we can do
345  * something minimal.
346  */
347 #define PUSHIDLEFRAME							   \
348 	str	lr, [sp, #-4]!;		/* save SVC32 lr */		   \
349 	str	r6, [sp, #(TF_R6-TF_PC)]!; /* save callee-saved r6 */	   \
350 	str	r4, [sp, #(TF_R4-TF_R6)]!; /* save callee-saved r4 */	   \
351 	mrs	r0, cpsr_all;		/* Get the CPSR */		   \
352 	str	r0, [sp, #(-TF_R4)]!	/* Push the CPSR on the stack */
353 
354 /*
355  * PULLFRAME - macro to pull a trap frame from the stack in the current mode
356  * Since the current mode is used, the SVC lr field is ignored.
357  */
358 
359 #define PULLFRAME							   \
360 	ldr     r0, [sp], #TF_R0;	/* Pop the SPSR from stack */	   \
361 	msr     spsr_all, r0;						   \
362 	ldmia   sp, {r0-r14}^;		/* Restore registers (usr mode) */ \
363 	mov     r0, r0;                 /* NOP for previous instruction */ \
364 	add	sp, sp, #(TF_PC-TF_R0);	/* Adjust the stack pointer */	   \
365  	ldr	lr, [sp], #0x0004	/* Pop the return address */
366 
367 #define PULLIDLEFRAME							   \
368 	add	sp, sp, #TF_R4;		/* Adjust the stack pointer */	   \
369 	ldr	r4, [sp], #(TF_R6-TF_R4); /* restore callee-saved r4 */	   \
370 	ldr	r6, [sp], #(TF_PC-TF_R6); /* restore callee-saved r6 */	   \
371  	ldr	lr, [sp], #4		/* Pop the return address */
372 
373 /*
374  * PUSHFRAMEINSVC - macro to push a trap frame on the stack in SVC32 mode
375  * This should only be used if the processor is not currently in SVC32
376  * mode. The processor mode is switched to SVC mode and the trap frame is
377  * stored. The SVC lr field is used to store the previous value of
378  * lr in SVC mode.
379  *
380  * NOTE: r13 and r14 are stored separately as a work around for the
381  * SA110 rev 2 STM^ bug
382  */
383 
384 #ifdef _ARM_ARCH_6
385 #define	SET_CPSR_MODE(tmp, mode)	\
386 	cps	#(mode)
387 #else
388 #define	SET_CPSR_MODE(tmp, mode)	\
389 	mrs     tmp, cpsr; 		/* Get the CPSR */		   \
390 	bic     tmp, tmp, #(PSR_MODE);	/* Fix for SVC mode */		   \
391 	orr     tmp, tmp, #(mode);					   \
392 	msr     cpsr_c, tmp		/* Punch into SVC mode */
393 #endif
394 
395 #define PUSHFRAMEINSVC							   \
396 	stmdb	sp, {r0-r3};		/* Save 4 registers */		   \
397 	mov	r0, lr;			/* Save xxx32 r14 */		   \
398 	mov	r1, sp;			/* Save xxx32 sp */		   \
399 	mrs	r3, spsr;		/* Save xxx32 spsr */		   \
400 	SET_CPSR_MODE(r2, PSR_SVC32_MODE);				   \
401 	bic	r2, sp, #7;		/* Align new SVC sp */		   \
402 	str	r0, [r2, #-4]!;		/* Push return address */	   \
403 	stmdb	r2!, {sp, lr};		/* Push SVC sp, lr */		   \
404 	mov	sp, r2;			/* Keep stack aligned */	   \
405 	msr     spsr_all, r3;		/* Restore correct spsr */	   \
406 	ldmdb	r1, {r0-r3};		/* Restore 4 regs from xxx mode */ \
407 	sub	sp, sp, #(TF_SVC_SP-TF_R0); /* Adjust the stack pointer */ \
408 	PUSHUSERREGS;			/* Push the user mode registers */ \
409 	mov     r0, r0;                 /* NOP for previous instruction */ \
410 	mrs	r0, spsr_all;		/* Get the SPSR */		   \
411 	str	r0, [sp, #-TF_R0]!	/* Push the SPSR onto the stack */
412 
413 /*
414  * PULLFRAMEFROMSVCANDEXIT - macro to pull a trap frame from the stack
415  * in SVC32 mode and restore the saved processor mode and PC.
416  * This should be used when the SVC lr register needs to be restored on
417  * exit.
418  */
419 
420 #define PULLFRAMEFROMSVCANDEXIT						   \
421 	ldr     r0, [sp], #0x0008;	/* Pop the SPSR from stack */	   \
422 	msr     spsr_all, r0;		/* restore SPSR */		   \
423 	ldmia   sp, {r0-r14}^;		/* Restore registers (usr mode) */ \
424 	mov     r0, r0;	  		/* NOP for previous instruction */ \
425 	add	sp, sp, #(TF_SVC_SP-TF_R0); /* Adjust the stack pointer */ \
426 	ldmia	sp, {sp, lr, pc}^	/* Restore lr and exit */
427 
428 #endif /* _LOCORE */
429 
430 #endif /* _ARM32_FRAME_H_ */
431