_setjmp.S revision 1.13 1 /* $NetBSD: _setjmp.S,v 1.13 2013/09/03 00:30:19 matt Exp $ */
2
3 /*
4 * Copyright (c) 1997 Mark Brinicombe
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by Mark Brinicombe
18 * 4. Neither the name of the University nor the names of its contributors
19 * may be used to endorse or promote products derived from this software
20 * without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * SUCH DAMAGE.
33 */
34
35 #if !defined(__SOFTFP__) && !defined(__VFP_FP__) && !defined(__ARM_PCS)
36 #error FPA is not supported anymore
37 #endif
38
39 #if defined(__ARM_EABI__) && !defined(__ARM_PCS_VFP)
40 .fpu vfp
41 #endif
42
43 #include <machine/asm.h>
44 #include <machine/setjmp.h>
45
46 /*
47 * C library -- _setjmp, _longjmp
48 *
49 * _longjmp(a,v)
50 * will generate a "return(v)" from the last call to
51 * _setjmp(a)
52 * by restoring registers from the stack.
53 * The previous signal state is NOT restored.
54 *
55 * Note: r0 is the return value
56 * r1-r3,ip are scratch registers in functions
57 */
58
59 ENTRY(_setjmp)
60 ldr r1, .L_setjmp_magic
61
62 #if defined(__ARM_EABI__) && (!defined(__thumb__) || defined(_ARM_ARCH_T2))
63 ldr r2, .Lfpu_present
64 #ifdef PIC
65 add r2, r2, pc /* pc = &.LPIC0 */
66 #endif
67 ldr r2, [r2]
68 .LPIC0:
69 #if defined(__thumb__) && defined(_ARM_ARCH_T2)
70 cbz r2, 1f
71 #else
72 cmp r2, #0 /* do we have a FPU? */
73 beq 1f /* no, don't save VFP registers */
74 #endif
75
76 orrs r1, r1, #(_JB_MAGIC__SETJMP ^ _JB_MAGIC__SETJMP_VFP)
77 /* change magic to VFP magic */
78 adds r2, r0, #(_JB_REG_D8 * 4)
79 vstmia r2, {d8-d15}
80 vmrs r2, fpscr
81 str r2, [r0, #(_JB_REG_FPSCR * 4)]
82 1:
83 #endif /* __ARM_EABI__ && (_ARM_ARCH_T2 || !__thumb__) */
84
85 str r1, [r0]
86
87 adds r0, r0, #(_JB_REG_R4 * 4)
88 /* Store integer registers */
89 #if !defined(__thumb__) || defined(_ARCH_ARCH_T2)
90 stmia r0, {r4-r14}
91 #else
92 stmia r0!, {r4-r7}
93 mov r1, r8
94 mov r2, r9
95 mov r3, r10
96 stmia r0!, {r1-r3}
97 mov r2, r11
98 mov r3, r12
99 stmia r0!, {r2-r3}
100 mov r2, sp
101 mov r3, lr
102 stmia r0!, {r2-r3}
103 #endif
104
105 movs r0, #0
106 RET
107
108 #if defined(__ARM_EABI__) && (!defined(__thumb__) || defined(_ARM_ARCH_T2))
109 .align 0
110 .Lfpu_present:
111 .word REL_SYM(_libc_arm_fpu_present, .LPIC0)
112 #endif /* __ARM_EABI__ && (_ARM_ARCH_T2 || !__thumb__) */
113 END(_setjmp)
114
115 ENTRY(_longjmp)
116 ldr r2, [r0] /* get magic from jmp_buf */
117 #if !defined(__thumb__) || defined(_ARM_ARCH_T2)
118 bics r3, r2, #(_JB_MAGIC__SETJMP ^ _JB_MAGIC__SETJMP_VFP)
119 /* ignore VFP-ness of magic */
120 ldr ip, .L_setjmp_magic /* load magic */
121 #else
122 ldr r3, .L_setjmp_magic /* load magic */
123 mov ip, r3
124 movs r3, #(_JB_MAGIC__SETJMP ^ _JB_MAGIC__SETJMP_VFP)
125 ands r3, r3, r2
126 eors r3, r3, r2 /* ignore VFP-ness of magic */
127 #endif
128 cmp ip, r3 /* magic correct? */
129 bne botch /* no, botch */
130
131 #if defined(__ARM_EABI__) && (!defined(__thumb__) || defined(_ARM_ARCH_T2))
132 cmp r3, r2 /* did magic change? */
133 beq 1f /* no, don't restore VFP */
134 adds r3, r0, #(_JB_REG_D8 * 4)
135 vldmia r3, {d8-d15}
136 ldr r3, [r0, #(_JB_REG_FPSCR * 4)]
137 vmsr fpscr, r3
138 #endif /* __ARM_EABI__ && (_ARM_ARCH_T2 || !__thumb__) */
139
140 adds r0, r0, #(_JB_REG_R4 * 4)
141 /* Restore integer registers */
142 #if !defined(__thumb__) || defined(_ARM_ARCH_T2)
143 ldmia r0!, {r4-r12}
144 #else
145 ldmia r0!, {r4-r7}
146 ldmia r0!, {r2-r3}
147 mov r8, r2
148 mov r9, r3
149 ldmia r0!, {r2-r3}
150 mov r10, r2
151 mov r1, r3
152 adds r0, r0, #4 /* skip r12 */
153 #endif
154 ldmia r0!, {r2-r3} /* r2 = sp, r3 = lr */
155
156 /* Validate sp and r14 */
157 #if defined(__thumb__) && defined(_ARM_ARCH_T2)
158 cbz r2, botch
159 #else
160 cmp r2, #0
161 beq botch
162 #endif
163 mov sp, r2
164
165 #if defined(__thumb__) && defined(_ARM_ARCH_T2)
166 cbz r3, botch
167 #else
168 cmp r3, #0
169 beq botch
170 #endif
171 mov lr, r3
172
173 /* Set return value */
174 movs r0, r1
175 #ifdef __thumb__
176 bne 1f
177 movs r0, #1
178 1:
179 #else
180 moveq r0, #1
181 #endif
182 RET
183
184 /* validation failed, die die die. */
185 botch:
186 bl PIC_SYM(_C_LABEL(longjmperror), PLT)
187 bl PIC_SYM(_C_LABEL(abort), PLT)
188 1: b 1b /* Cannot get here */
189
190 .align 0
191 .L_setjmp_magic:
192 .word _JB_MAGIC__SETJMP
193 END(_longjmp)
194