setjmp.S revision 1.1 1 1.1 msaitoh /* $NetBSD: setjmp.S,v 1.1 2000/01/05 14:07:34 msaitoh 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.1 msaitoh RCSID("$NetBSD: setjmp.S,v 1.1 2000/01/05 14:07:34 msaitoh 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.1 msaitoh sts.l pr,@-r15
58 1.1 msaitoh mov.l r4,@-r15
59 1.1 msaitoh mov #0, r4
60 1.1 msaitoh mov.l Lsigblock, r0
61 1.1 msaitoh jsr @r0
62 1.1 msaitoh nop
63 1.1 msaitoh mov.l @r15+, r4
64 1.1 msaitoh lds.l @r15+, pr
65 1.1 msaitoh
66 1.1 msaitoh add #4*11, r4
67 1.1 msaitoh mov.l r0, @-r4 # sigmask
68 1.1 msaitoh mov #1, r0
69 1.1 msaitoh mov.l r0, @-r4 # savemask
70 1.1 msaitoh mov.l r15, @-r4
71 1.1 msaitoh mov.l r14, @-r4
72 1.1 msaitoh mov.l r13, @-r4
73 1.1 msaitoh mov.l r12, @-r4
74 1.1 msaitoh mov.l r11, @-r4
75 1.1 msaitoh mov.l r10, @-r4
76 1.1 msaitoh mov.l r9, @-r4
77 1.1 msaitoh mov.l r8, @-r4
78 1.1 msaitoh sts.l pr, @-r4
79 1.1 msaitoh rts
80 1.1 msaitoh xor r0, r0
81 1.1 msaitoh
82 1.1 msaitoh .align 2
83 1.1 msaitoh Lsigblock:
84 1.1 msaitoh .long _sigblock
85 1.1 msaitoh
86 1.1 msaitoh ENTRY(longjmp)
87 1.1 msaitoh mov.l r4, @-r15
88 1.1 msaitoh mov.l r5, @-r15
89 1.1 msaitoh mov r4, r0
90 1.1 msaitoh add #4*10, r0
91 1.1 msaitoh mov.l @r0, r4
92 1.1 msaitoh mov.l Lsigsetmask, r0
93 1.1 msaitoh jsr @r0
94 1.1 msaitoh nop
95 1.1 msaitoh mov.l @r15+, r5
96 1.1 msaitoh mov.l @r15+, r4
97 1.1 msaitoh
98 1.1 msaitoh lds.l @r4+, pr
99 1.1 msaitoh mov.l @r4+, r8
100 1.1 msaitoh mov.l @r4+, r9
101 1.1 msaitoh mov.l @r4+, r10
102 1.1 msaitoh mov.l @r4+, r11
103 1.1 msaitoh mov.l @r4+, r12
104 1.1 msaitoh mov.l @r4+, r13
105 1.1 msaitoh mov.l @r4+, r14
106 1.1 msaitoh mov.l @r4+, r15
107 1.1 msaitoh mov r5, r0
108 1.1 msaitoh tst r0, r0
109 1.1 msaitoh bf .L0
110 1.1 msaitoh add #1, r0
111 1.1 msaitoh .L0:
112 1.1 msaitoh rts
113 1.1 msaitoh nop
114 1.1 msaitoh
115 1.1 msaitoh .align 2
116 1.1 msaitoh Lsigsetmask:
117 1.1 msaitoh .long _sigsetmask
118