1/* PLT trampolines.  Sparc 32-bit version.
2   Copyright (C) 2005-2021 Free Software Foundation, Inc.
3   This file is part of the GNU C Library.
4
5   The GNU C Library is free software; you can redistribute it and/or
6   modify it under the terms of the GNU Lesser General Public
7   License as published by the Free Software Foundation; either
8   version 2.1 of the License, or (at your option) any later version.
9
10   The GNU C Library is distributed in the hope that it will be useful,
11   but WITHOUT ANY WARRANTY; without even the implied warranty of
12   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13   Lesser General Public License for more details.
14
15   You should have received a copy of the GNU Lesser General Public
16   License along with the GNU C Library; if not, see
17   <https://www.gnu.org/licenses/>.  */
18
19#include <sysdep.h>
20
21	.text
22	.align	32
23
24	/* %g1:	PLT offset loaded by PLT entry
25	 * %g2: callers PC, which is PLT0 + 4, and we store the
26	 *      link map at PLT0 + 12, therefore we add 8 to get
27	 *      the address of the link map
28	 */
29	.globl	_dl_runtime_resolve
30	.type	_dl_runtime_resolve, @function
31_dl_runtime_resolve:
32	cfi_startproc
33
34	save	%sp, -104, %sp
35	cfi_def_cfa_register(%fp)
36	cfi_window_save
37	cfi_register (%o7, %i7)
38
39	ld	[%g2 + 8], %o0
40	srl	%g1, 10, %o1
41	call	_dl_fixup
42	 sub	%o1, 4*12, %o1
43	jmp	%o0
44	 restore
45
46	cfi_endproc
47
48	.size	_dl_runtime_resolve, .-_dl_runtime_resolve
49
50	/* For the profiling cases we pass in our stack frame
51	 * as the base of the La_sparc32_regs, so it looks
52	 * like:
53	 *	%l0			%sp + (0 * 8)
54	 *	%l1			%sp + (0 * 8) + 4
55	 *	...
56	 *	%l6			%sp + (3 * 8)
57	 *	%l7			%sp + (3 * 8) + 4
58	 *	%i0			%sp + (4 * 8)
59	 *	%i1			%sp + (4 * 8) + 4
60	 *	...
61	 *	%i6			%sp + (7 * 8)
62	 *	%i7			%sp + (7 * 8) + 4
63	 *	struct_ret_ptr		%sp + (8 * 8)
64	 *	framesize		%sp + (9 * 8)
65	 */
66
67	.globl	_dl_profile_save_regs
68	.type	_dl_profile_save_regs, @function
69_dl_profile_save_regs:
70	cfi_startproc
71
72	std	%l0, [%sp + ( 0 * 8)]
73	std	%l2, [%sp + ( 1 * 8)]
74	std	%l4, [%sp + ( 2 * 8)]
75	std	%l6, [%sp + ( 3 * 8)]
76	std	%i0, [%sp + ( 4 * 8)]
77	std	%i2, [%sp + ( 5 * 8)]
78	std	%i4, [%sp + ( 6 * 8)]
79	std	%i6, [%sp + ( 7 * 8)]
80	ld	[%fp + (8 * 8)], %l4
81	retl
82	 st	%l4, [%sp + (8 * 8)]
83
84	cfi_endproc
85
86	.size	_dl_profile_save_regs, .-_dl_profile_save_regs
87
88	/* If we are going to call pltexit, then we must replicate
89	 * the caller's stack frame.
90	 * %o0: PLT resolved function address
91	 */
92	.globl	_dl_profile_invoke
93	.type	_dl_profile_invoke, @function
94_dl_profile_invoke:
95	cfi_startproc
96
97	add	%l0, 7, %l0
98	andn	%l0, 7, %l0
99	add	%l0, 2 * 8, %g1
100
101	sub	%sp, %g1, %sp
102	srl	%l0, 3, %l7
103	mov	%o0, %l1
104	mov	%i0, %o0
105	mov	%i1, %o1
106	mov	%i2, %o2
107	mov	%i3, %o3
108	mov	%i4, %o4
109	mov	%i5, %o5
110	cmp	%l0, 0
111	mov	%fp, %l2
112	be	2f
113	 add	%sp, (11 * 8), %l3
1141:	ldd	[%l2], %g2
115	add	%l2, 0x8, %l2
116	subcc	%l7, 1, %l7
117	std	%g2, [%l3]
118	bne	1b
119	 add	%l3, 0x8, %l3
120
1212:	jmpl	%l1, %o7
122	 nop
123
124	std	%o0, [%sp + ( 9 * 8)]
125	std	%f0, [%sp + (10 * 8)]
126
127	mov	%l5, %o0
128	mov	%l6, %o1
129	add	%sp, (11 * 8), %o2
130	call	_dl_audit_pltexit
131	 add	%sp, ( 9 * 8), %o3
132
133	ldd	[%sp + ( 9 * 8)], %i0
134	ldd	[%sp + (10 * 8)], %f0
135
136	jmpl	%i7 + 8, %g0
137	 restore
138
139	cfi_endproc
140
141	.size	_dl_profile_invoke, .-_dl_profile_invoke
142
143	/* %g1:	PLT offset loaded by PLT entry
144	 * %g2: callers PC, which is PLT0 + 4, and we store the
145	 *      link map at PLT0 + 12, therefore we add 8 to get
146	 *      the address of the link map
147	 */
148	.align	32
149	.globl	_dl_runtime_profile
150	.type	_dl_runtime_profile, @function
151_dl_runtime_profile:
152	cfi_startproc
153
154	save	%sp, -104, %sp
155	cfi_def_cfa_register(%fp)
156	cfi_window_save
157	cfi_register(%o7, %i7)
158
159	ld	[%g2 + 8], %o0
160	srl	%g1, 10, %o1
161	mov	%i7, %o2
162	sub	%o1, 4*12, %o1
163
164	mov	%o0, %l5
165	mov	%o1, %l6
166
167	call	_dl_profile_save_regs
168	 nop
169
170	mov	%sp, %o3
171	call	_dl_profile_fixup
172	 add	%sp, (9 * 8), %o4
173
174	ld	[%sp + (9 * 8)], %l0
175	cmp	%l0, 0
176	bl	1f
177	 nop
178
179	call	_dl_profile_invoke
180	 nop
181
1821:	jmp	%o0
183	 restore
184
185	cfi_endproc
186
187	.size	_dl_runtime_profile, .-_dl_runtime_profile
188