_setjmp.S revision 1.17
1 1.17 agc /* $NetBSD: _setjmp.S,v 1.17 2003/08/07 16:42:15 agc Exp $ */ 2 1.5 jonathan 3 1.1 glass /*- 4 1.1 glass * Copyright (c) 1991, 1993 5 1.1 glass * The Regents of the University of California. All rights reserved. 6 1.1 glass * 7 1.1 glass * This code is derived from software contributed to Berkeley by 8 1.1 glass * Ralph Campbell. 9 1.1 glass * 10 1.1 glass * Redistribution and use in source and binary forms, with or without 11 1.1 glass * modification, are permitted provided that the following conditions 12 1.1 glass * are met: 13 1.1 glass * 1. Redistributions of source code must retain the above copyright 14 1.1 glass * notice, this list of conditions and the following disclaimer. 15 1.1 glass * 2. Redistributions in binary form must reproduce the above copyright 16 1.1 glass * notice, this list of conditions and the following disclaimer in the 17 1.1 glass * documentation and/or other materials provided with the distribution. 18 1.17 agc * 3. Neither the name of the University nor the names of its contributors 19 1.1 glass * may be used to endorse or promote products derived from this software 20 1.1 glass * without specific prior written permission. 21 1.1 glass * 22 1.1 glass * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 23 1.1 glass * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 1.1 glass * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 1.1 glass * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 26 1.1 glass * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 27 1.1 glass * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 28 1.1 glass * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 1.1 glass * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 30 1.1 glass * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 31 1.1 glass * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 32 1.1 glass * SUCH DAMAGE. 33 1.1 glass */ 34 1.1 glass 35 1.10 castor #include <machine/cdefs.h> 36 1.6 jonathan #include <mips/regnum.h> 37 1.6 jonathan #include <mips/asm.h> 38 1.10 castor #include <machine/setjmp.h> 39 1.11 jonathan #include <machine/signal.h> /* XXX */ 40 1.1 glass 41 1.1 glass #if defined(LIBC_SCCS) && !defined(lint) 42 1.1 glass ASMSTR("from: @(#)_setjmp.s 8.1 (Berkeley) 6/4/93") 43 1.17 agc ASMSTR("$NetBSD: _setjmp.S,v 1.17 2003/08/07 16:42:15 agc Exp $") 44 1.1 glass #endif /* LIBC_SCCS and not lint */ 45 1.1 glass 46 1.16 thorpej #ifdef __ABICALLS__ 47 1.6 jonathan .abicalls 48 1.6 jonathan #endif 49 1.6 jonathan 50 1.1 glass /* 51 1.1 glass * C library -- _setjmp, _longjmp 52 1.1 glass * 53 1.1 glass * _longjmp(a,v) 54 1.1 glass * will generate a "return(v)" from 55 1.1 glass * the last call to 56 1.1 glass * _setjmp(a) 57 1.1 glass * by restoring registers from the stack, 58 1.1 glass * The previous signal state is NOT restored. 59 1.1 glass */ 60 1.1 glass 61 1.1 glass .set noreorder 62 1.1 glass 63 1.3 mycroft LEAF(_setjmp) 64 1.16 thorpej #ifdef __ABICALLS__ 65 1.8 jonathan #.set noreorder 66 1.6 jonathan .cpload t9 67 1.8 jonathan #.set reorder 68 1.7 jonathan #endif 69 1.7 jonathan 70 1.10 castor REG_PROLOGUE 71 1.10 castor REG_LI v0, 0xACEDBADE # sigcontext magic number 72 1.10 castor REG_S ra, (2 * 4)(a0) # sc_pc = return address 73 1.10 castor REG_S v0, (_OFFSETOF_SC_REGS)(a0) # saved in sc_regs[0] 74 1.10 castor REG_S s0, (S0 * SZREG + _OFFSETOF_SC_REGS)(a0) 75 1.10 castor REG_S s1, (S1 * SZREG + _OFFSETOF_SC_REGS)(a0) 76 1.10 castor REG_S s2, (S2 * SZREG + _OFFSETOF_SC_REGS)(a0) 77 1.10 castor REG_S s3, (S3 * SZREG + _OFFSETOF_SC_REGS)(a0) 78 1.10 castor REG_S s4, (S4 * SZREG + _OFFSETOF_SC_REGS)(a0) 79 1.10 castor REG_S s5, (S5 * SZREG + _OFFSETOF_SC_REGS)(a0) 80 1.10 castor REG_S s6, (S6 * SZREG + _OFFSETOF_SC_REGS)(a0) 81 1.10 castor REG_S s7, (S7 * SZREG + _OFFSETOF_SC_REGS)(a0) 82 1.10 castor REG_S sp, (SP * SZREG + _OFFSETOF_SC_REGS)(a0) 83 1.10 castor REG_S s8, (S8 * SZREG + _OFFSETOF_SC_REGS)(a0) 84 1.1 glass cfc1 v0, $31 # too bad cant check if FP used 85 1.10 castor swc1 $f20, (20 * 4 + _OFFSETOF_SC_FPREGS)(a0) 86 1.10 castor swc1 $f21, (21 * 4 + _OFFSETOF_SC_FPREGS)(a0) 87 1.10 castor swc1 $f22, (22 * 4 + _OFFSETOF_SC_FPREGS)(a0) 88 1.10 castor swc1 $f23, (23 * 4 + _OFFSETOF_SC_FPREGS)(a0) 89 1.10 castor swc1 $f24, (24 * 4 + _OFFSETOF_SC_FPREGS)(a0) 90 1.10 castor swc1 $f25, (25 * 4 + _OFFSETOF_SC_FPREGS)(a0) 91 1.10 castor swc1 $f26, (26 * 4 + _OFFSETOF_SC_FPREGS)(a0) 92 1.10 castor swc1 $f27, (27 * 4 + _OFFSETOF_SC_FPREGS)(a0) 93 1.10 castor swc1 $f28, (28 * 4 + _OFFSETOF_SC_FPREGS)(a0) 94 1.10 castor swc1 $f29, (29 * 4 + _OFFSETOF_SC_FPREGS)(a0) 95 1.10 castor swc1 $f30, (30 * 4 + _OFFSETOF_SC_FPREGS)(a0) 96 1.10 castor swc1 $f31, (31 * 4 + _OFFSETOF_SC_FPREGS)(a0) 97 1.13 shin sw v0, (32 * 4 + _OFFSETOF_SC_FPREGS)(a0) 98 1.10 castor REG_EPILOGUE 99 1.1 glass j ra 100 1.1 glass move v0, zero 101 1.3 mycroft END(_setjmp) 102 1.1 glass 103 1.3 mycroft LEAF(_longjmp) 104 1.16 thorpej #ifdef __ABICALLS__ 105 1.6 jonathan .set noreorder 106 1.6 jonathan .cpload t9 107 1.6 jonathan .set reorder 108 1.6 jonathan subu sp, sp, 32 109 1.6 jonathan .cprestore 16 110 1.6 jonathan .set noreorder 111 1.6 jonathan #endif 112 1.10 castor REG_PROLOGUE 113 1.10 castor REG_L v0, (_OFFSETOF_SC_REGS)(a0) # get magic number 114 1.10 castor REG_L ra, (2 * 4)(a0) 115 1.10 castor REG_LI t0, 0xACEDBADE 116 1.10 castor bne v0, t0, botch # jump if error 117 1.9 simonb addu sp, sp, 32 # does not matter, sanity 118 1.10 castor REG_L s0, (S0 * SZREG + _OFFSETOF_SC_REGS)(a0) 119 1.10 castor REG_L s1, (S1 * SZREG + _OFFSETOF_SC_REGS)(a0) 120 1.10 castor REG_L s2, (S2 * SZREG + _OFFSETOF_SC_REGS)(a0) 121 1.10 castor REG_L s3, (S3 * SZREG + _OFFSETOF_SC_REGS)(a0) 122 1.10 castor REG_L s4, (S4 * SZREG + _OFFSETOF_SC_REGS)(a0) 123 1.10 castor REG_L s5, (S5 * SZREG + _OFFSETOF_SC_REGS)(a0) 124 1.10 castor REG_L s6, (S6 * SZREG + _OFFSETOF_SC_REGS)(a0) 125 1.10 castor REG_L s7, (S7 * SZREG + _OFFSETOF_SC_REGS)(a0) 126 1.10 castor lw v0, (32 * 4 + _OFFSETOF_SC_FPREGS)(a0) # get fpu status 127 1.10 castor REG_L sp, (SP * SZREG + _OFFSETOF_SC_REGS)(a0) 128 1.10 castor REG_L s8, (S8 * SZREG + _OFFSETOF_SC_REGS)(a0) 129 1.1 glass ctc1 v0, $31 130 1.10 castor lwc1 $f20, (20 * 4 + _OFFSETOF_SC_FPREGS)(a0) 131 1.10 castor lwc1 $f21, (21 * 4 + _OFFSETOF_SC_FPREGS)(a0) 132 1.10 castor lwc1 $f22, (22 * 4 + _OFFSETOF_SC_FPREGS)(a0) 133 1.10 castor lwc1 $f23, (23 * 4 + _OFFSETOF_SC_FPREGS)(a0) 134 1.10 castor lwc1 $f24, (24 * 4 + _OFFSETOF_SC_FPREGS)(a0) 135 1.10 castor lwc1 $f25, (25 * 4 + _OFFSETOF_SC_FPREGS)(a0) 136 1.10 castor lwc1 $f26, (26 * 4 + _OFFSETOF_SC_FPREGS)(a0) 137 1.10 castor lwc1 $f27, (27 * 4 + _OFFSETOF_SC_FPREGS)(a0) 138 1.10 castor lwc1 $f28, (28 * 4 + _OFFSETOF_SC_FPREGS)(a0) 139 1.10 castor lwc1 $f29, (29 * 4 + _OFFSETOF_SC_FPREGS)(a0) 140 1.10 castor lwc1 $f30, (30 * 4 + _OFFSETOF_SC_FPREGS)(a0) 141 1.10 castor lwc1 $f31, (31 * 4 + _OFFSETOF_SC_FPREGS)(a0) 142 1.6 jonathan 143 1.1 glass j ra 144 1.1 glass move v0, a1 145 1.10 castor REG_EPILOGUE 146 1.1 glass botch: 147 1.3 mycroft jal _C_LABEL(longjmperror) 148 1.1 glass nop 149 1.3 mycroft jal _C_LABEL(abort) 150 1.1 glass nop 151 1.3 mycroft END(_longjmp) 152
Indexes created Sat Oct 25 16:10:12 GMT 2025