_setjmp.S revision 1.18 1 /* $NetBSD: _setjmp.S,v 1.18 2025/05/03 19:57:13 riastradh 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 PCREL_GET(r2, .Lfpu_present, .LPIC0)
64 ldr r2, [r2]
65 #if defined(__thumb__) && defined(_ARM_ARCH_T2)
66 cbz r2, 1f
67 #else
68 cmp r2, #0 /* do we have a FPU? */
69 beq 1f /* no, don't save VFP registers */
70 #endif
71
72 orrs r1, r1, #(_JB_MAGIC__SETJMP ^ _JB_MAGIC__SETJMP_VFP)
73 /* change magic to VFP magic */
74 adds r2, r0, #(_JB_REG_D8 * 4)
75 vstmia r2, {d8-d15}
76 vmrs r2, fpscr
77 str r2, [r0, #(_JB_REG_FPSCR * 4)]
78 1:
79 #endif /* __ARM_EABI__ && (_ARM_ARCH_T2 || !__thumb__) */
80
81 str r1, [r0]
82
83 adds r0, r0, #(_JB_REG_R4 * 4)
84 /* Store integer registers */
85 #if !defined(__thumb__) || defined(_ARCH_ARCH_T2)
86 stmia r0, {r4-r14}
87 #else
88 stmia r0!, {r4-r7}
89 mov r1, r8
90 mov r2, r9
91 mov r3, r10
92 stmia r0!, {r1-r3}
93 mov r2, r11
94 mov r3, r12
95 stmia r0!, {r2-r3}
96 mov r2, sp
97 mov r3, lr
98 stmia r0!, {r2-r3}
99 #endif
100
101 movs r0, #0
102 RET
103
104 #if defined(__ARM_EABI__) && (!defined(__thumb__) || defined(_ARM_ARCH_T2))
105 .align 0
106 .Lfpu_present:
107 .word PCREL_SYM(_libc_arm_fpu_present, .LPIC0)
108 #endif /* __ARM_EABI__ && (_ARM_ARCH_T2 || !__thumb__) */
109 END(_setjmp)
110
111 ENTRY(_longjmp)
112 ldr r2, [r0] /* get magic from jmp_buf */
113 #if !defined(__thumb__) || defined(_ARM_ARCH_T2)
114 bics r3, r2, #(_JB_MAGIC__SETJMP ^ _JB_MAGIC__SETJMP_VFP)
115 /* ignore VFP-ness of magic */
116 ldr ip, .L_setjmp_magic /* load magic */
117 #else
118 ldr r3, .L_setjmp_magic /* load magic */
119 mov ip, r3
120 movs r3, #(_JB_MAGIC__SETJMP ^ _JB_MAGIC__SETJMP_VFP)
121 ands r3, r3, r2
122 eors r3, r3, r2 /* ignore VFP-ness of magic */
123 #endif
124 cmp ip, r3 /* magic correct? */
125 bne botch /* no, botch */
126
127 #if defined(__ARM_EABI__) && (!defined(__thumb__) || defined(_ARM_ARCH_T2))
128 cmp r3, r2 /* did magic change? */
129 beq 1f /* no, don't restore VFP */
130 adds r3, r0, #(_JB_REG_D8 * 4)
131 vldmia r3, {d8-d15}
132 ldr r3, [r0, #(_JB_REG_FPSCR * 4)]
133 vmsr fpscr, r3
134 1:
135 #endif /* __ARM_EABI__ && (_ARM_ARCH_T2 || !__thumb__) */
136
137 adds r0, r0, #(_JB_REG_R4 * 4)
138 /* Restore integer registers */
139 #if !defined(__thumb__) || defined(_ARM_ARCH_T2)
140 ldmia r0!, {r4-r12}
141 #else
142 ldmia r0!, {r4-r7}
143 ldmia r0!, {r2-r3}
144 mov r8, r2
145 mov r9, r3
146 ldmia r0!, {r2-r3}
147 mov r10, r2
148 mov r1, r3
149 adds r0, r0, #4 /* skip r12 */
150 #endif
151 ldmia r0!, {r2-r3} /* r2 = sp, r3 = lr */
152
153 /* Validate sp and r14 */
154 #if defined(__thumb__) && defined(_ARM_ARCH_T2)
155 cbz r2, botch
156 #else
157 cmp r2, #0
158 beq botch
159 #endif
160 mov sp, r2
161
162 #if defined(__thumb__) && defined(_ARM_ARCH_T2)
163 cbz r3, botch
164 #else
165 cmp r3, #0
166 beq botch
167 #endif
168 mov lr, r3
169
170 /* Set return value */
171 movs r0, r1
172 #ifdef __thumb__
173 bne 1f
174 movs r0, #1
175 1:
176 #else
177 moveq r0, #1
178 #endif
179 RET
180
181 /* validation failed, die die die. */
182 botch:
183 bl PLT_SYM(_C_LABEL(longjmperror))
184 bl PLT_SYM(_C_LABEL(abort))
185 1: b 1b /* Cannot get here */
186
187 .align 0
188 .L_setjmp_magic:
189 .word _JB_MAGIC__SETJMP
190 END(_longjmp)
191