setjmp.S revision 1.3
1 /* $NetBSD: setjmp.S,v 1.3 2001/11/13 20:03:38 chris 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 #include <machine/asm.h> 36 #include <machine/setjmp.h> 37 38 /* 39 * C library -- setjmp, longjmp 40 * 41 * longjmp(a,v) 42 * will generate a "return(v)" from the last call to 43 * setjmp(a) 44 * by restoring registers from the stack. 45 * The previous signal state is restored. 46 */ 47 48 ENTRY(setjmp) 49 /* Block all signals and retrieve the old signal mask */ 50 stmfd sp!, {r0, r14} 51 mov r0, #0x00000000 52 53 bl PIC_SYM(_C_LABEL(sigblock), PLT) 54 mov r1, r0 55 56 ldmfd sp!, {r0, r14} 57 58 /* Store signal mask */ 59 str r1, [r0, #(25 * 4)] 60 61 ldr r1, Lsetjmp_magic 62 str r1, [r0], #4 63 64 #ifdef SOFTFLOAT 65 add r0, r0, #52 66 #else 67 /* Store fp registers */ 68 sfm f4, 4, [r0], #48 69 /* Store fpsr */ 70 rfs r1 71 str r1, [r0], #0x0004 72 #endif /*SOFTFLOAT*/ 73 /* Store integer registers */ 74 stmia r0, {r4-r14} 75 mov r0, #0x00000000 76 #ifdef __APCS_26__ 77 movs r15, r14 78 #else 79 mov r15, r14 80 #endif 81 82 Lsetjmp_magic: 83 .word _JB_MAGIC_SETJMP 84 85 86 ENTRY(longjmp) 87 ldr r2, Lsetjmp_magic 88 ldr r3, [r0] 89 teq r2, r3 90 bne botch 91 92 /* Fetch signal mask */ 93 ldr r2, [r0, #(25 * 4)] 94 95 /* Set signal mask */ 96 stmfd sp!, {r0, r1, r14} 97 sub sp, sp, #4 /* align the stack */ 98 99 mov r0, r2 100 bl PIC_SYM(_C_LABEL(sigsetmask), PLT) 101 102 add sp, sp, #4 /* unalign the stack */ 103 ldmfd sp!, {r0, r1, r14} 104 105 add r0, r0, #4 106 #ifdef SOFTFLOAT 107 add r0, r0, #52 108 #else 109 /* Restore fp registers */ 110 lfm f4, 4, [r0], #48 111 /* Restore FPSR */ 112 ldr r4, [r0], #0x0004 113 wfs r4 114 #endif /* SOFTFLOAT */ 115 /* Restore integer registers */ 116 ldmia r0, {r4-r14} 117 118 /* Validate sp and r14 */ 119 teq sp, #0 120 teqne r14, #0 121 beq botch 122 123 /* Set return value */ 124 125 mov r0, r1 126 teq r0, #0x00000000 127 moveq r0, #0x00000001 128 #ifdef __ARM_26__ 129 mov r15, r14 130 #else 131 mov r15, r14 132 #endif 133 134 /* validation failed, die die die. */ 135 botch: 136 bl PIC_SYM(_C_LABEL(longjmperror), PLT) 137 bl PIC_SYM(_C_LABEL(abort), PLT) 138 b . - 8 /* Cannot get here */ 139
Indexes created Thu Sep 25 16:09:42 GMT 2025