_setjmp.S revision 1.5 1 1.5 uwe /* $NetBSD: _setjmp.S,v 1.5 2006/01/05 00:18:10 uwe 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.2 agc * 3. Neither the name of the University nor the names of its contributors
19 1.1 msaitoh * may be used to endorse or promote products derived from this software
20 1.1 msaitoh * without specific prior written permission.
21 1.1 msaitoh *
22 1.1 msaitoh * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 1.1 msaitoh * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 1.1 msaitoh * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 1.1 msaitoh * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 1.1 msaitoh * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 1.1 msaitoh * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 1.1 msaitoh * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 1.1 msaitoh * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 1.1 msaitoh * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 1.1 msaitoh * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 1.1 msaitoh * SUCH DAMAGE.
33 1.1 msaitoh *
34 1.1 msaitoh * from: @(#)_setjmp.s 5.1 (Berkeley) 4/23/90
35 1.1 msaitoh */
36 1.1 msaitoh
37 1.1 msaitoh #include <machine/asm.h>
38 1.1 msaitoh #if defined(LIBC_SCCS)
39 1.5 uwe RCSID("$NetBSD: _setjmp.S,v 1.5 2006/01/05 00:18:10 uwe Exp $")
40 1.1 msaitoh #endif
41 1.1 msaitoh
42 1.1 msaitoh /*
43 1.1 msaitoh * C library -- _setjmp, _longjmp
44 1.1 msaitoh *
45 1.1 msaitoh * _longjmp(a,v)
46 1.1 msaitoh * will generate a "return(v)" from the last call to
47 1.1 msaitoh * _setjmp(a)
48 1.1 msaitoh * by restoring registers from the stack.
49 1.1 msaitoh * The previous signal state is NOT restored.
50 1.1 msaitoh */
51 1.1 msaitoh
52 1.1 msaitoh ENTRY(_setjmp)
53 1.1 msaitoh add #4*10, r4
54 1.1 msaitoh mov #0, r0
55 1.1 msaitoh mov.l r0, @-r4
56 1.1 msaitoh mov.l r15, @-r4
57 1.1 msaitoh mov.l r14, @-r4
58 1.1 msaitoh mov.l r13, @-r4
59 1.1 msaitoh mov.l r12, @-r4
60 1.1 msaitoh mov.l r11, @-r4
61 1.1 msaitoh mov.l r10, @-r4
62 1.1 msaitoh mov.l r9, @-r4
63 1.1 msaitoh mov.l r8, @-r4
64 1.1 msaitoh sts.l pr, @-r4
65 1.1 msaitoh rts
66 1.5 uwe xor r0, r0
67 1.5 uwe .size _C_LABEL(_setjmp), .-_C_LABEL(_setjmp)
68 1.1 msaitoh
69 1.1 msaitoh ENTRY(_longjmp)
70 1.1 msaitoh lds.l @r4+, pr
71 1.1 msaitoh mov.l @r4+, r8
72 1.1 msaitoh mov.l @r4+, r9
73 1.1 msaitoh mov.l @r4+, r10
74 1.1 msaitoh mov.l @r4+, r11
75 1.1 msaitoh mov.l @r4+, r12
76 1.1 msaitoh mov.l @r4+, r13
77 1.1 msaitoh mov.l @r4+, r14
78 1.1 msaitoh mov.l @r4+, r15
79 1.1 msaitoh
80 1.1 msaitoh mov r5, r0
81 1.1 msaitoh tst r0, r0
82 1.1 msaitoh bf .L0
83 1.1 msaitoh add #1, r0
84 1.1 msaitoh .L0:
85 1.1 msaitoh rts
86 1.5 uwe nop
87 1.5 uwe .size _C_LABEL(_longjmp), .-_C_LABEL(_longjmp)
88