setjmp.S revision 1.5 1 1.5 marcus /* $NetBSD: setjmp.S,v 1.5 2003/07/01 14:35:44 marcus Exp $ */
2 1.1 msaitoh
3 1.1 msaitoh /*-
4 1.1 msaitoh * Copyright (c) 1990 The Regents of the University of California.
5 1.1 msaitoh * All rights reserved.
6 1.1 msaitoh *
7 1.1 msaitoh * This code is derived from software contributed to Berkeley by
8 1.1 msaitoh * William Jolitz.
9 1.1 msaitoh *
10 1.1 msaitoh * Redistribution and use in source and binary forms, with or without
11 1.1 msaitoh * modification, are permitted provided that the following conditions
12 1.1 msaitoh * are met:
13 1.1 msaitoh * 1. Redistributions of source code must retain the above copyright
14 1.1 msaitoh * notice, this list of conditions and the following disclaimer.
15 1.1 msaitoh * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 msaitoh * notice, this list of conditions and the following disclaimer in the
17 1.1 msaitoh * documentation and/or other materials provided with the distribution.
18 1.1 msaitoh * 3. All advertising materials mentioning features or use of this software
19 1.1 msaitoh * must display the following acknowledgement:
20 1.1 msaitoh * This product includes software developed by the University of
21 1.1 msaitoh * California, Berkeley and its contributors.
22 1.1 msaitoh * 4. Neither the name of the University nor the names of its contributors
23 1.1 msaitoh * may be used to endorse or promote products derived from this software
24 1.1 msaitoh * without specific prior written permission.
25 1.1 msaitoh *
26 1.1 msaitoh * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 1.1 msaitoh * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 1.1 msaitoh * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 1.1 msaitoh * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 1.1 msaitoh * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 1.1 msaitoh * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 1.1 msaitoh * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 1.1 msaitoh * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 1.1 msaitoh * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 1.1 msaitoh * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 1.1 msaitoh * SUCH DAMAGE.
37 1.1 msaitoh *
38 1.1 msaitoh * from: @(#)setjmp.s 5.1 (Berkeley) 4/23/90
39 1.1 msaitoh */
40 1.1 msaitoh
41 1.1 msaitoh #include <machine/asm.h>
42 1.1 msaitoh #if defined(LIBC_SCCS)
43 1.5 marcus RCSID("$NetBSD: setjmp.S,v 1.5 2003/07/01 14:35:44 marcus Exp $")
44 1.1 msaitoh #endif
45 1.1 msaitoh
46 1.1 msaitoh /*
47 1.1 msaitoh * C library -- _setjmp, _longjmp
48 1.1 msaitoh *
49 1.1 msaitoh * longjmp(a,v)
50 1.1 msaitoh * will generate a "return(v)" from the last call to
51 1.1 msaitoh * setjmp(a)
52 1.1 msaitoh * by restoring registers from the stack.
53 1.1 msaitoh * The previous signal state is restored.
54 1.1 msaitoh */
55 1.1 msaitoh
56 1.1 msaitoh ENTRY(setjmp)
57 1.4 msaitoh sts.l pr, @-r15
58 1.4 msaitoh mov.l r4, @-r15
59 1.1 msaitoh mov #0, r4
60 1.1 msaitoh mov.l Lsigblock, r0
61 1.5 marcus #ifdef PIC
62 1.5 marcus bsrf r0
63 1.5 marcus nop
64 1.5 marcus 1:
65 1.5 marcus #else
66 1.1 msaitoh jsr @r0
67 1.1 msaitoh nop
68 1.5 marcus #endif
69 1.1 msaitoh mov.l @r15+, r4
70 1.1 msaitoh lds.l @r15+, pr
71 1.4 msaitoh
72 1.1 msaitoh add #4*11, r4
73 1.4 msaitoh mov.l r0, @-r4 /* sigmask */
74 1.1 msaitoh mov #1, r0
75 1.4 msaitoh mov.l r0, @-r4 /* savemask */
76 1.1 msaitoh mov.l r15, @-r4
77 1.1 msaitoh mov.l r14, @-r4
78 1.1 msaitoh mov.l r13, @-r4
79 1.1 msaitoh mov.l r12, @-r4
80 1.1 msaitoh mov.l r11, @-r4
81 1.1 msaitoh mov.l r10, @-r4
82 1.1 msaitoh mov.l r9, @-r4
83 1.1 msaitoh mov.l r8, @-r4
84 1.1 msaitoh sts.l pr, @-r4
85 1.1 msaitoh rts
86 1.1 msaitoh xor r0, r0
87 1.1 msaitoh
88 1.4 msaitoh .align 2
89 1.1 msaitoh Lsigblock:
90 1.5 marcus #ifdef PIC
91 1.5 marcus .long _C_LABEL(sigblock)-1b
92 1.5 marcus #else
93 1.3 msaitoh .long _C_LABEL(sigblock)
94 1.5 marcus #endif
95 1.1 msaitoh
96 1.1 msaitoh ENTRY(longjmp)
97 1.1 msaitoh mov.l r4, @-r15
98 1.1 msaitoh mov.l r5, @-r15
99 1.1 msaitoh mov r4, r0
100 1.1 msaitoh add #4*10, r0
101 1.1 msaitoh mov.l @r0, r4
102 1.1 msaitoh mov.l Lsigsetmask, r0
103 1.5 marcus #ifdef PIC
104 1.5 marcus bsrf r0
105 1.5 marcus nop
106 1.5 marcus 1:
107 1.5 marcus #else
108 1.1 msaitoh jsr @r0
109 1.1 msaitoh nop
110 1.5 marcus #endif
111 1.1 msaitoh mov.l @r15+, r5
112 1.1 msaitoh mov.l @r15+, r4
113 1.4 msaitoh
114 1.1 msaitoh lds.l @r4+, pr
115 1.1 msaitoh mov.l @r4+, r8
116 1.1 msaitoh mov.l @r4+, r9
117 1.1 msaitoh mov.l @r4+, r10
118 1.1 msaitoh mov.l @r4+, r11
119 1.1 msaitoh mov.l @r4+, r12
120 1.1 msaitoh mov.l @r4+, r13
121 1.1 msaitoh mov.l @r4+, r14
122 1.1 msaitoh mov.l @r4+, r15
123 1.1 msaitoh mov r5, r0
124 1.1 msaitoh tst r0, r0
125 1.1 msaitoh bf .L0
126 1.1 msaitoh add #1, r0
127 1.1 msaitoh .L0:
128 1.1 msaitoh rts
129 1.1 msaitoh nop
130 1.1 msaitoh
131 1.1 msaitoh .align 2
132 1.1 msaitoh Lsigsetmask:
133 1.5 marcus #ifdef PIC
134 1.5 marcus .long _C_LABEL(sigsetmask)-1b
135 1.5 marcus #else
136 1.3 msaitoh .long _C_LABEL(sigsetmask)
137 1.5 marcus #endif
138