1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
|
/* $NetBSD: __sigtramp2.S,v 1.7 2022/06/26 14:37:13 skrll Exp $ */
/*
* Copyright (c) 1998-2001 Michael Shalayeff
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR OR HIS RELATIVES BE LIABLE FOR ANY DIRECT,
* INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
* SERVICES; LOSS OF MIND, USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
* STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
* IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
* THE POSSIBILITY OF SUCH DAMAGE.
*
* Portitions of this file are derived from other sources, see
* the copyrights and acknowledgements below.
*/
/*
* Copyright (c) 1990,1991,1992,1994 The University of Utah and
* the Computer Systems Laboratory (CSL). All rights reserved.
*
* THE UNIVERSITY OF UTAH AND CSL PROVIDE THIS SOFTWARE IN ITS "AS IS"
* CONDITION, AND DISCLAIM ANY LIABILITY OF ANY KIND FOR ANY DAMAGES
* WHATSOEVER RESULTING FROM ITS USE.
*
* CSL requests users of this software to return to csl-dist@cs.utah.edu any
* improvements that they make and grant CSL redistribution rights.
*
* Utah $Hdr: locore.s 1.62 94/12/15$
*/
/*
* (c) Copyright 1988 HEWLETT-PACKARD COMPANY
*
* To anyone who acknowledges that this file is provided "AS IS"
* without any express or implied warranty:
* permission to use, copy, modify, and distribute this file
* for any purpose is hereby granted without fee, provided that
* the above copyright notice and this notice appears in all
* copies, and that the name of Hewlett-Packard Company not be
* used in advertising or publicity pertaining to distribution
* of the software without specific, written prior permission.
* Hewlett-Packard Company makes no representations about the
* suitability of this software for any purpose.
*/
#include "SYS.h"
#include "assym.h"
/*
* The hppa signal trampoline is required to call the handler
* possibily via a PLABEL.
*
* On entry, stack looks like:
*
* sp-> [x]
* r3,arg2-> ucontext structure
* arg1-> siginfo structure [0]
*
* where
* x = HPPA_FRAME_ROUND(sizeof(sigframe_siginfo))
*
* and
* struct sigframe_siginfo {
* siginfo_t sf_si;
* ucontext_t sf_uc;
* };
*
* The DWARF register numbers for the general purpose registers are the
* same as the architected register numbers. For HPPA, there is a DWARF
* pseudo-register for signal handler return addresses.
*/
#if defined(__LIBGCC_DWARF_ALT_FRAME_RETURN_COLUMN__)
#define DWARF_SIGRETURN_REG __LIBGCC_DWARF_ALT_FRAME_RETURN_COLUMN__
#else
#define DWARF_SIGRETURN_REG 89 /* 61 on hppa64 */
#endif
#define CFI_OFFSET_DWARF_REG(d, r) .cfi_offset d, r * 4
#define CFI_OFFSET(r) CFI_OFFSET_DWARF_REG(r, r)
.text
.cfi_startproc
.cfi_signal_frame
.cfi_def_cfa _REG_R30, -SIZEOF_SIGTRAMP + SIZEOF_SIGINFO + _UC_GREGS
CFI_OFFSET(_REG_R1)
CFI_OFFSET(_REG_R2)
CFI_OFFSET(_REG_R3)
CFI_OFFSET(_REG_R4)
CFI_OFFSET(_REG_R5)
CFI_OFFSET(_REG_R6)
CFI_OFFSET(_REG_R7)
CFI_OFFSET(_REG_R8)
CFI_OFFSET(_REG_R9)
CFI_OFFSET(_REG_R10)
CFI_OFFSET(_REG_R11)
CFI_OFFSET(_REG_R12)
CFI_OFFSET(_REG_R13)
CFI_OFFSET(_REG_R14)
CFI_OFFSET(_REG_R15)
CFI_OFFSET(_REG_R16)
CFI_OFFSET(_REG_R17)
CFI_OFFSET(_REG_R18)
CFI_OFFSET(_REG_R19)
CFI_OFFSET(_REG_R20)
CFI_OFFSET(_REG_R21)
CFI_OFFSET(_REG_R22)
CFI_OFFSET(_REG_R23)
CFI_OFFSET(_REG_R24)
CFI_OFFSET(_REG_R25)
CFI_OFFSET(_REG_R26)
CFI_OFFSET(_REG_R27)
CFI_OFFSET(_REG_R28)
CFI_OFFSET(_REG_R29)
CFI_OFFSET(_REG_R30)
CFI_OFFSET(_REG_R31)
.cfi_return_column DWARF_SIGRETURN_REG
CFI_OFFSET_DWARF_REG(DWARF_SIGRETURN_REG, _REG_PCOQH)
/*
* The unwind entry includes one instruction slot prior to the trampoline
* because the unwinder will look up to (return PC - 1 insn) while unwinding.
* Normally this would be the jump / branch, but since there isn't one in
* this case, we place an explicit nop there instead.
*/
nop
ENTRY_NOPROFILE(__sigtramp_siginfo_2, 0)
.call
/*
* Our sendsig() places the address of the signal handler in %arg3.
* It may actually be a PLABEL.
*/
bb,>=,n %arg3, 30, L$sigcode_bounce ; branch if not a PLABEL
depi 0, 31, 2, %arg3 ; zero L bit in PLABEL pointer
ldw 4(%arg3), %r19 ; load shared library linkage
ldw 0(%arg3), %arg3 ; load real catcher address
L$sigcode_bounce:
/*
* This blr puts the address of the following nop in rp.
* It also schedules the nop for execution, which is why
* that instruction has to be a nop, or, rather, not any
* instruction only meant to execute once the signal handler
* returns.
*/
blr %r0, %rp
/*
* This bv schedules the instruction pointed to by arg3
* for execution. So, arg3 is the address of the signal
* handler.
*/
bv,n %r0(%arg3)
nop
/*
* The signal handler has returned. Since r3 is on the list
* of callee-saved registers, it's whatever the sendsig
* code wanted it set to. Since we copy it into arg0,
* it looks like sendsig leaves r3 holding the desired
* single argument to sys_setcontext, i.e., the ucontext_t *.
*/
/* Make a SYS_setcontext system call. */
copy %r3, %arg0
ldil L%SYSCALLGATE, %r1
.call
ble 4(%sr2, %r1)
ldi SYS_setcontext, %t1
/* Make a SYS_exit system call. */
copy %ret0, %arg0
ldil L%SYSCALLGATE, %r1
.call
ble 4(%sr2, %r1)
ldi SYS_exit, %t1
.cfi_endproc
EXIT(__sigtramp_siginfo_2)
|