setjmp.S revision 1.10.4.1 1 /* $NetBSD: setjmp.S,v 1.10.4.1 1999/12/27 18:29:35 wrstuden Exp $ */
2
3 /*-
4 * Copyright (c) 1991, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * This code is derived from software contributed to Berkeley by
8 * Ralph Campbell.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the University of
21 * California, Berkeley and its contributors.
22 * 4. Neither the name of the University nor the names of its contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * SUCH DAMAGE.
37 */
38
39 #include <machine/cdefs.h>
40 #include <sys/syscall.h>
41 #include <mips/regnum.h>
42 #include <mips/asm.h>
43 #include <machine/signal.h>
44 #include <machine/setjmp.h>
45
46 #if defined(LIBC_SCCS) && !defined(lint)
47 ASMSTR("from: @(#)setjmp.s 8.1 (Berkeley) 6/4/93")
48 ASMSTR("$NetBSD: setjmp.S,v 1.10.4.1 1999/12/27 18:29:35 wrstuden Exp $")
49 #endif /* LIBC_SCCS and not lint */
50
51 #ifdef ABICALLS
52 .abicalls
53 #endif
54
55 /*
56 * C library -- setjmp, longjmp
57 *
58 * longjmp(a,v)
59 * will generate a "return(v)" from
60 * the last call to
61 * setjmp(a)
62 * by restoring registers from the stack,
63 * and a struct sigcontext, see <signal.h>
64 */
65
66 #define SETJMP_FRAME_SIZE (CALLFRAME_SIZ + 12)
67
68 NON_LEAF(setjmp, SETJMP_FRAME_SIZE, ra)
69 .mask 0x80000000, (CALLFRAME_RA - CALLFRAME_SIZ)
70 #ifdef ABICALLS
71 .set noreorder
72 .cpload t9
73 .set reorder
74 #endif
75 subu sp, sp, SETJMP_FRAME_SIZE # allocate stack frame
76 #ifdef ABICALLS
77 .cprestore 16
78 #endif
79 sw ra, CALLFRAME_RA(sp) # save state
80 sw a0, SETJMP_FRAME_SIZE(sp)
81 move a0, zero # get current signal mask
82 jal _C_LABEL(sigblock)
83 lw v1, SETJMP_FRAME_SIZE(sp) # v1 = jmpbuf
84 sw v0, (1 * 4)(v1) # save sc_mask = sigblock(0)
85 move a0, zero
86 addu a1, sp, CALLFRAME_SIZ # pointer to struct sigaltstack
87 jal _C_LABEL(__sigaltstack14)
88 lw a0, SETJMP_FRAME_SIZE(sp) # restore jmpbuf
89 lw v1, CALLFRAME_SIZ+8(sp) # get old ss_onstack
90 and v1, v1, 1 # extract onstack flag
91 sw v1, 0(a0) # save it in sc_onstack
92 lw ra, CALLFRAME_RA(sp)
93 addu sp, sp, SETJMP_FRAME_SIZE
94 blt v0, zero, botch # check for sigstack() error
95 REG_PROLOGUE
96 REG_S ra, (2 * 4)(a0) # sc_pc = return address
97 REG_LI v0, 0xACEDBADE # sigcontext magic number
98 REG_S v0, (_OFFSETOF_SC_REGS + SZREG * ZERO)(a0) # saved in sc_regs[0]
99 REG_S s0, (_OFFSETOF_SC_REGS + SZREG * S0)(a0)
100 REG_S s1, (_OFFSETOF_SC_REGS + SZREG * S1)(a0)
101 REG_S s2, (_OFFSETOF_SC_REGS + SZREG * S2)(a0)
102 REG_S s3, (_OFFSETOF_SC_REGS + SZREG * S3)(a0)
103 REG_S s4, (_OFFSETOF_SC_REGS + SZREG * S4)(a0)
104 REG_S s5, (_OFFSETOF_SC_REGS + SZREG * S5)(a0)
105 REG_S s6, (_OFFSETOF_SC_REGS + SZREG * S6)(a0)
106 REG_S s7, (_OFFSETOF_SC_REGS + SZREG * S7)(a0)
107 REG_S gp, (_OFFSETOF_SC_REGS + SZREG * GP)(a0)
108 REG_S sp, (_OFFSETOF_SC_REGS + SZREG * SP)(a0)
109 REG_S s8, (_OFFSETOF_SC_REGS + SZREG * S8)(a0)
110 li v0, 1 # be nice if we could tell
111 sw v0, (_OFFSETOF_SC_REGS + 34 * SZREG)(a0) # sc_fpused = 1
112 #ifndef SOFTFLOAT
113 cfc1 v0, $31
114 swc1 $f20, (20 * 4 + _OFFSETOF_SC_FPREGS)(a0)
115 swc1 $f21, (21 * 4 + _OFFSETOF_SC_FPREGS)(a0)
116 swc1 $f22, (22 * 4 + _OFFSETOF_SC_FPREGS)(a0)
117 swc1 $f23, (23 * 4 + _OFFSETOF_SC_FPREGS)(a0)
118 swc1 $f24, (24 * 4 + _OFFSETOF_SC_FPREGS)(a0)
119 swc1 $f25, (25 * 4 + _OFFSETOF_SC_FPREGS)(a0)
120 swc1 $f26, (26 * 4 + _OFFSETOF_SC_FPREGS)(a0)
121 swc1 $f27, (27 * 4 + _OFFSETOF_SC_FPREGS)(a0)
122 swc1 $f28, (28 * 4 + _OFFSETOF_SC_FPREGS)(a0)
123 swc1 $f29, (29 * 4 + _OFFSETOF_SC_FPREGS)(a0)
124 swc1 $f30, (30 * 4 + _OFFSETOF_SC_FPREGS)(a0)
125 swc1 $f31, (31 * 4 + _OFFSETOF_SC_FPREGS)(a0)
126 sw v0, ((32 * 4) + _OFFSETOF_SC_FPREGS)(a0)
127 #endif
128 REG_EPILOGUE
129 move v0, zero
130 j ra
131 END(setjmp)
132
133 LEAF(longjmp)
134 #ifdef ABICALLS
135 .set noreorder
136 .cpload t9
137 .set reorder
138 subu sp, sp, 32
139 .cprestore 16
140 #endif
141 REG_PROLOGUE
142 /* save return value in sc_regs[V0] */
143 REG_S a1, (_OFFSETOF_SC_REGS + V0 * SZREG)(a0)
144 REG_EPILOGUE
145 li v0, SYS_compat_13_sigreturn13
146 syscall
147 botch:
148 jal _C_LABEL(longjmperror)
149 jal _C_LABEL(abort)
150 END(longjmp)
151