__setjmp14.S revision 1.5.8.2 1 1.5.8.2 martin /* $NetBSD: __setjmp14.S,v 1.5.8.2 2008/04/28 20:22:56 martin Exp $ */
2 1.5.8.2 martin
3 1.5.8.2 martin /*-
4 1.5.8.2 martin * Copyright (c) 2002 The NetBSD Foundation, Inc.
5 1.5.8.2 martin * All rights reserved.
6 1.5.8.2 martin *
7 1.5.8.2 martin * This code is derived from software contributed to The NetBSD Foundation
8 1.5.8.2 martin * by Matthew Fredette.
9 1.5.8.2 martin *
10 1.5.8.2 martin * Redistribution and use in source and binary forms, with or without
11 1.5.8.2 martin * modification, are permitted provided that the following conditions
12 1.5.8.2 martin * are met:
13 1.5.8.2 martin * 1. Redistributions of source code must retain the above copyright
14 1.5.8.2 martin * notice, this list of conditions and the following disclaimer.
15 1.5.8.2 martin * 2. Redistributions in binary form must reproduce the above copyright
16 1.5.8.2 martin * notice, this list of conditions and the following disclaimer in the
17 1.5.8.2 martin * documentation and/or other materials provided with the distribution.
18 1.5.8.2 martin *
19 1.5.8.2 martin * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.5.8.2 martin * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.5.8.2 martin * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.5.8.2 martin * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.5.8.2 martin * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.5.8.2 martin * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.5.8.2 martin * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.5.8.2 martin * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.5.8.2 martin * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.5.8.2 martin * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.5.8.2 martin * POSSIBILITY OF SUCH DAMAGE.
30 1.5.8.2 martin */
31 1.5.8.2 martin
32 1.5.8.2 martin #include <machine/asm.h>
33 1.5.8.2 martin /* XXX fredette - this is awful */
34 1.5.8.2 martin #define _LOCORE
35 1.5.8.2 martin #include <machine/frame.h>
36 1.5.8.2 martin #undef _LOCORE
37 1.5.8.2 martin #include <machine/psl.h>
38 1.5.8.2 martin
39 1.5.8.2 martin #if defined(LIBC_SCCS) && !defined(lint)
40 1.5.8.2 martin RCSID("$NetBSD: __setjmp14.S,v 1.5.8.2 2008/04/28 20:22:56 martin Exp $")
41 1.5.8.2 martin #endif /* LIBC_SCCS and not lint */
42 1.5.8.2 martin
43 1.5.8.2 martin /*
44 1.5.8.2 martin * C library -- setjmp, longjmp
45 1.5.8.2 martin *
46 1.5.8.2 martin * longjmp(a,v)
47 1.5.8.2 martin * will generate a "return(v)" from
48 1.5.8.2 martin * the last call to
49 1.5.8.2 martin * setjmp(a)
50 1.5.8.2 martin * by restoring registers from the stack,
51 1.5.8.2 martin * and a struct sigcontext, see <signal.h>
52 1.5.8.2 martin */
53 1.5.8.2 martin
54 1.5.8.2 martin ENTRY(__setjmp14,0)
55 1.5.8.2 martin /* Finish our stack frame. */
56 1.5.8.2 martin stw %rp, HPPA_FRAME_CRP(%sp)
57 1.5.8.2 martin stw %arg0, HPPA_FRAME_ARG(0)(%sp)
58 1.5.8.2 martin
59 1.5.8.2 martin /* A sigcontext is at the beginning of our jmp_buf. */
60 1.5.8.2 martin stw %r0, 4(%arg0) ; unused word (old style signal mask)
61 1.5.8.2 martin stw %sp, 8(%arg0) ; sc.sc_sp = %sp
62 1.5.8.2 martin stw %r0, 16(%arg0) ; sc.sc_ap = NULL
63 1.5.8.2 martin mfsp %sr0, %r1
64 1.5.8.2 martin stw %r1, 20(%arg0) ; sc.sc_pcsqh = %sr0
65 1.5.8.2 martin stw %rp, 24(%arg0) ; sc.sc_pcoqh = %rp
66 1.5.8.2 martin stw %r1, 28(%arg0) ; sc.sc_pcsqh = %sr0
67 1.5.8.2 martin ldo 4(%rp), %r1
68 1.5.8.2 martin stw %r1, 32(%arg0) ; sc.sc_pcoqt = %rp + 4
69 1.5.8.2 martin #define PSW_MBS (PSW_C|PSW_Q|PSW_P|PSW_D|PSW_I)
70 1.5.8.2 martin ldil L%PSW_MBS, %r1
71 1.5.8.2 martin ldo R%PSW_MBS(%r1), %r1
72 1.5.8.2 martin stw %r1, 36(%arg0) ; set sc.sc_ps
73 1.5.8.2 martin
74 1.5.8.2 martin /* We store all callee-saved registers after the sigcontext. */
75 1.5.8.2 martin ldo 56(%arg0), %r1
76 1.5.8.2 martin stwm %r3, 4(%r1)
77 1.5.8.2 martin stwm %r4, 4(%r1)
78 1.5.8.2 martin stwm %r5, 4(%r1)
79 1.5.8.2 martin stwm %r6, 4(%r1)
80 1.5.8.2 martin stwm %r7, 4(%r1)
81 1.5.8.2 martin stwm %r8, 4(%r1)
82 1.5.8.2 martin stwm %r9, 4(%r1)
83 1.5.8.2 martin stwm %r10, 4(%r1)
84 1.5.8.2 martin stwm %r11, 4(%r1)
85 1.5.8.2 martin stwm %r12, 4(%r1)
86 1.5.8.2 martin stwm %r13, 4(%r1)
87 1.5.8.2 martin stwm %r14, 4(%r1)
88 1.5.8.2 martin stwm %r15, 4(%r1)
89 1.5.8.2 martin stwm %r16, 4(%r1)
90 1.5.8.2 martin stwm %r17, 4(%r1)
91 1.5.8.2 martin stwm %r18, 4(%r1)
92 1.5.8.2 martin
93 1.5.8.2 martin /*
94 1.5.8.2 martin * Start the stack frame for the calls we will make.
95 1.5.8.2 martin * The minimum frame is 48 bytes, but the stack must
96 1.5.8.2 martin * always be 64-byte aligned; we use the top 4 bytes
97 1.5.8.2 martin * to save our caller's %r3, and the following 12 bytes
98 1.5.8.2 martin * as the stack_t for our sigaltstack call.
99 1.5.8.2 martin * XXX - this assumes that sizeof(stack_t) <= 12
100 1.5.8.2 martin */
101 1.5.8.2 martin copy %r3, %r1
102 1.5.8.2 martin copy %sp, %r3
103 1.5.8.2 martin stwm %r1, HPPA_FRAME_SIZE(%sp)
104 1.5.8.2 martin
105 1.5.8.2 martin /* Get signal stack info. */
106 1.5.8.2 martin ldo 4(%r3), %arg1 ; set up oss
107 1.5.8.2 martin bl __sigaltstack14, %rp
108 1.5.8.2 martin copy %r0, %arg0 ; set up ss
109 1.5.8.2 martin
110 1.5.8.2 martin /* Recover our jmp_buf and extract SS_ONSTACK */
111 1.5.8.2 martin ldw HPPA_FRAME_ARG(0)(%r3), %arg0
112 1.5.8.2 martin ldw 12(%r3), %r1 ; get ss_flags
113 1.5.8.2 martin ldi 1, %r20 ; SS_ONSTACK
114 1.5.8.2 martin and %r1, %r20, %r1
115 1.5.8.2 martin stw %r1, 0(%arg0) ; sc.sc_onstack
116 1.5.8.2 martin
117 1.5.8.2 martin /* Get the signal mask. */
118 1.5.8.2 martin ldo 40(%arg0), %arg2 ; oset = &sc.sc_mask
119 1.5.8.2 martin copy %r0, %arg1 ; set = NULL
120 1.5.8.2 martin bl __sigprocmask14, %rp
121 1.5.8.2 martin copy %r0, %arg0 ; action = 0 <ignored>
122 1.5.8.2 martin
123 1.5.8.2 martin /* Return 0. */
124 1.5.8.2 martin ldo HPPA_FRAME_SIZE(%r3),%sp
125 1.5.8.2 martin ldwm -HPPA_FRAME_SIZE(%sp),%r3
126 1.5.8.2 martin ldw HPPA_FRAME_CRP(%sp), %rp
127 1.5.8.2 martin bv %r0(%rp)
128 1.5.8.2 martin copy %r0, %ret0
129 1.5.8.2 martin EXIT(__setjmp14)
130 1.5.8.2 martin
131 1.5.8.2 martin .end
132