1/* $NetBSD: setjmp.S,v 1.14 2013/04/19 13:45:45 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#ifdef __ARM_EABI__ 40 .fpu vfp 41#endif 42 43#include <machine/asm.h> 44#include <machine/setjmp.h> 45 46__FBSDID("$FreeBSD$"); 47 48/* 49 * C library -- setjmp, longjmp 50 * 51 * longjmp(a,v) 52 * will generate a "return(v)" from the last call to 53 * setjmp(a) 54 * by restoring registers from the stack. 55 * The previous signal state is restored. 56 */ 57 58ENTRY(setjmp) 59 /* Block all signals and retrieve the old signal mask */ 60 stmfd sp!, {r0, r14} 61 add r2, r0, #(_JB_SIGMASK * 4) /* oset */ 62 mov r1, #0x00000000 /* set */ 63 mov r0, #0x00000001 /* SIG_BLOCK */ 64 bl PIC_SYM(_C_LABEL(sigprocmask), PLT) 65 ldmfd sp!, {r0, r14} 66 67 ldr r1, .Lsetjmp_magic 68 69#ifdef __ARM_EABI__ 70 ldr r2, .Lfpu_present 71#ifdef PIC 72 GOT_INIT(r3, .Lsetjmp_got, .Lsetjmp_gotinit) 73 ldr r2, [r2, r3] 74#else 75 ldr r2, [r2] 76#endif 77 teq r2, #0 /* do we have a FPU? */ 78 beq 1f /* no, don't save VFP registers */ 79 80 orr r1, r1, #(_JB_MAGIC_SETJMP ^ _JB_MAGIC_SETJMP_VFP) 81 /* change magic to VFP magic */ 82 add r2, r0, #(_JB_REG_D8 * 4) 83 vstmia r2, {d8-d15} 84 vmrs r2, fpscr 85 str r2, [r0, #(_JB_REG_FPSCR * 4)] 861: 87#endif /* __ARM_EABI__ */ 88 89 str r1, [r0] /* store magic */ 90 91 /* Store integer registers */ 92 add r0, r0, #(_JB_REG_R4 * 4) 93#ifndef __thumb__ 94 stmia r0, {r4-r14} 95#else 96 stmia r0, {r4-r12} 97 str r13, [r0, #((_JB_REG_R13 - _JB_REG_R4) * 4)] 98 str r14, [r0, #((_JB_REG_R14 - _JB_REG_R4) * 4)] 99#endif 100 mov r0, #0x00000000 101 RET 102 103.Lsetjmp_magic: 104 .word _JB_MAGIC_SETJMP 105#ifdef __ARM_EABI__ 106 GOT_INITSYM(.Lsetjmp_got, .Lsetjmp_gotinit) 107.Lfpu_present: 108 .word PIC_SYM(_libc_arm_fpu_present, GOTOFF) 109#endif /* __ARM_EABI__ */ 110END(setjmp) 111 112.weak _C_LABEL(longjmp) 113.set _C_LABEL(longjmp), _C_LABEL(__longjmp) 114ENTRY(__longjmp) 115 ldr r2, [r0] 116 ldr ip, .Lsetjmp_magic 117 bic r3, r2, #(_JB_MAGIC_SETJMP ^ _JB_MAGIC_SETJMP_VFP) 118 teq r3, ip 119 bne .Lbotch 120 121 /* Restore the signal mask. */ 122 stmfd sp!, {r0-r2, r14} 123 mov r2, #0x00000000 124 add r1, r0, #(_JB_SIGMASK * 4) /* Signal mask */ 125 mov r0, #3 /* SIG_SETMASK */ 126 bl PIC_SYM(_C_LABEL(sigprocmask), PLT) 127 ldmfd sp!, {r0-r2, r14} 128 129#ifdef __ARM_EABI__ 130 tst r2, #(_JB_MAGIC_SETJMP ^ _JB_MAGIC_SETJMP_VFP) 131 /* is this a VFP magic? */ 132 beq 1f /* no, don't restore VFP */ 133 add ip, r0, #(_JB_REG_D8 * 4) 134 vldmia ip, {d8-d15} 135 ldr ip, [r0, #(_JB_REG_FPSCR * 4)] 136 vmsr fpscr, ip 1371: 138#endif /* __ARM_EABI__ */ 139 140 add r0, r0, #(_JB_REG_R4 * 4) 141 /* Restore integer registers */ 142#ifndef __thumb__ 143 ldmia r0, {r4-r14} 144#else 145 ldmia r0, {r4-r12} 146 ldr r13, [r0, #((_JB_REG_R13 - _JB_REG_R4) * 4)] 147 ldr r14, [r0, #((_JB_REG_R14 - _JB_REG_R4) * 4)] 148#endif 149 150 /* Validate sp and r14 */ 151 teq sp, #0 152 it ne 153 teqne r14, #0 154 it eq 155 beq .Lbotch 156 157 /* Set return value */ 158 movs r0, r1 159 it eq 160 moveq r0, #0x00000001 161 RET 162 163 /* validation failed, die die die. */ 164.Lbotch: 165 bl PIC_SYM(_C_LABEL(longjmperror), PLT) 166 bl PIC_SYM(_C_LABEL(abort), PLT) 1671: b 1b /* Cannot get here */ 168END(__longjmp) 169