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