| xf.li | bdd93d5 | 2023-05-12 07:10:14 -0700 | [diff] [blame] | 1 | /* PLT trampolines.  SH version. | 
 | 2 |    Copyright (C) 2005-2016 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 |    <http://www.gnu.org/licenses/>.  */ | 
 | 18 |  | 
 | 19 | #include <sysdep.h> | 
 | 20 |  | 
 | 21 | 	.text | 
 | 22 | 	.globl _dl_runtime_resolve | 
 | 23 | 	.type _dl_runtime_resolve, @function | 
 | 24 | 	cfi_startproc | 
 | 25 | 	.align 5 | 
 | 26 | _dl_runtime_resolve: | 
 | 27 | 	mov.l r2,@-r15 | 
 | 28 | 	cfi_adjust_cfa_offset (4) | 
 | 29 | 	mov.l r3,@-r15 | 
 | 30 | 	cfi_adjust_cfa_offset (4) | 
 | 31 | 	mov.l r4,@-r15 | 
 | 32 | 	cfi_adjust_cfa_offset (4) | 
 | 33 | 	mov.l r5,@-r15 | 
 | 34 | 	cfi_adjust_cfa_offset (4) | 
 | 35 | 	mov.l r6,@-r15 | 
 | 36 | 	cfi_adjust_cfa_offset (4) | 
 | 37 | 	mov.l r7,@-r15 | 
 | 38 | 	cfi_adjust_cfa_offset (4) | 
 | 39 | 	mov.l r12,@-r15 | 
 | 40 | 	cfi_adjust_cfa_offset (4) | 
 | 41 | 	sts.l macl,@-r15 | 
 | 42 | 	cfi_adjust_cfa_offset (4) | 
 | 43 | 	sts.l mach,@-r15 | 
 | 44 | 	cfi_adjust_cfa_offset (4) | 
 | 45 | 	movt r3			! Save T flag. | 
 | 46 | 	mov.l r3,@-r15 | 
 | 47 | 	cfi_adjust_cfa_offset (4) | 
 | 48 | #ifdef HAVE_FPU | 
 | 49 | 	sts.l	fpscr,@-r15 | 
 | 50 | 	cfi_adjust_cfa_offset (4) | 
 | 51 | 	mov	#8,r3 | 
 | 52 | 	swap.w	r3,r3 | 
 | 53 | 	lds	r3,fpscr | 
 | 54 | 	fmov.s	fr11,@-r15 | 
 | 55 | 	cfi_adjust_cfa_offset (4) | 
 | 56 | 	fmov.s	fr10,@-r15 | 
 | 57 | 	cfi_adjust_cfa_offset (4) | 
 | 58 | 	fmov.s	fr9,@-r15 | 
 | 59 | 	cfi_adjust_cfa_offset (4) | 
 | 60 | 	fmov.s	fr8,@-r15 | 
 | 61 | 	cfi_adjust_cfa_offset (4) | 
 | 62 | 	fmov.s	fr7,@-r15 | 
 | 63 | 	cfi_adjust_cfa_offset (4) | 
 | 64 | 	fmov.s	fr6,@-r15 | 
 | 65 | 	cfi_adjust_cfa_offset (4) | 
 | 66 | 	fmov.s	fr5,@-r15 | 
 | 67 | 	cfi_adjust_cfa_offset (4) | 
 | 68 | 	fmov.s	fr4,@-r15 | 
 | 69 | 	cfi_adjust_cfa_offset (4) | 
 | 70 | #endif | 
 | 71 | 	sts.l pr,@-r15 | 
 | 72 | 	cfi_adjust_cfa_offset (4) | 
 | 73 | 	tst r0,r0 | 
 | 74 | 	bt 1f | 
 | 75 | 	mov r0,r2 | 
 | 76 | 1: | 
 | 77 | 	mov r0,r4		! PLT type | 
 | 78 | 	mov r2,r5		! link map address | 
 | 79 | #ifdef SHARED | 
 | 80 | 	mov.l 2f,r2 | 
 | 81 | 	mova 2f,r0 | 
 | 82 | 	add r0,r2		! Get GOT address in r2 | 
 | 83 | 	mov.l 3f,r0 | 
 | 84 | 	add r2,r0 | 
 | 85 | #else | 
 | 86 | 	mov.l 3f,r0 | 
 | 87 | #endif | 
 | 88 | 	jsr @r0			! Call resolver. | 
 | 89 | 	 mov r1,r6		! reloc offset | 
 | 90 | 	lds.l @r15+,pr		! Get register content back. | 
 | 91 | 	cfi_adjust_cfa_offset (-4) | 
 | 92 | #ifdef HAVE_FPU | 
 | 93 | 	fmov.s	@r15+,fr4 | 
 | 94 | 	cfi_adjust_cfa_offset (-4) | 
 | 95 | 	fmov.s	@r15+,fr5 | 
 | 96 | 	cfi_adjust_cfa_offset (-4) | 
 | 97 | 	fmov.s	@r15+,fr6 | 
 | 98 | 	cfi_adjust_cfa_offset (-4) | 
 | 99 | 	fmov.s	@r15+,fr7 | 
 | 100 | 	cfi_adjust_cfa_offset (-4) | 
 | 101 | 	fmov.s	@r15+,fr8 | 
 | 102 | 	cfi_adjust_cfa_offset (-4) | 
 | 103 | 	fmov.s	@r15+,fr9 | 
 | 104 | 	cfi_adjust_cfa_offset (-4) | 
 | 105 | 	fmov.s	@r15+,fr10 | 
 | 106 | 	cfi_adjust_cfa_offset (-4) | 
 | 107 | 	fmov.s	@r15+,fr11 | 
 | 108 | 	cfi_adjust_cfa_offset (-4) | 
 | 109 | 	lds.l	@r15+,fpscr | 
 | 110 | 	cfi_adjust_cfa_offset (-4) | 
 | 111 | #endif | 
 | 112 | 	mov.l @r15+,r3 | 
 | 113 | 	cfi_adjust_cfa_offset (-4) | 
 | 114 | 	shal r3			! Lode T flag. | 
 | 115 | 	lds.l @r15+,mach | 
 | 116 | 	cfi_adjust_cfa_offset (-4) | 
 | 117 | 	lds.l @r15+,macl | 
 | 118 | 	cfi_adjust_cfa_offset (-4) | 
 | 119 | 	mov.l @r15+,r12 | 
 | 120 | 	cfi_adjust_cfa_offset (-4) | 
 | 121 | 	mov.l @r15+,r7 | 
 | 122 | 	cfi_adjust_cfa_offset (-4) | 
 | 123 | 	mov.l @r15+,r6 | 
 | 124 | 	cfi_adjust_cfa_offset (-4) | 
 | 125 | 	mov.l @r15+,r5 | 
 | 126 | 	cfi_adjust_cfa_offset (-4) | 
 | 127 | 	mov.l @r15+,r4 | 
 | 128 | 	cfi_adjust_cfa_offset (-4) | 
 | 129 | 	mov.l @r15+,r3 | 
 | 130 | 	cfi_adjust_cfa_offset (-4) | 
 | 131 | 	jmp @r0			! Jump to function address. | 
 | 132 | 	 mov.l @r15+,r2 | 
 | 133 | 	cfi_adjust_cfa_offset (-4) | 
 | 134 | 	.align 2 | 
 | 135 | #ifdef SHARED | 
 | 136 | 2:	.long _GLOBAL_OFFSET_TABLE_ | 
 | 137 | 3:	.long _dl_fixup@GOTOFF | 
 | 138 | #else | 
 | 139 | 3:	.long _dl_fixup | 
 | 140 | #endif | 
 | 141 | 	cfi_endproc | 
 | 142 | 	.size _dl_runtime_resolve, .-_dl_runtime_resolve | 
 | 143 |  | 
 | 144 |  | 
 | 145 | 	.globl _dl_runtime_profile | 
 | 146 | 	.type _dl_runtime_profile,@function | 
 | 147 | 	cfi_startproc | 
 | 148 | 	.align 5 | 
 | 149 | _dl_runtime_profile: | 
 | 150 | 	mov.l r12,@-r15 | 
 | 151 | 	cfi_adjust_cfa_offset (4) | 
 | 152 | #ifdef HAVE_FPU | 
 | 153 | 	sts.l	fpscr,@-r15 | 
 | 154 | 	cfi_adjust_cfa_offset (4) | 
 | 155 | 	mov	#8,r12 | 
 | 156 | 	swap.w	r12,r12 | 
 | 157 | 	lds	r12,fpscr | 
 | 158 | 	fmov.s	fr11,@-r15 | 
 | 159 | 	cfi_adjust_cfa_offset (4) | 
 | 160 | 	fmov.s	fr10,@-r15 | 
 | 161 | 	cfi_adjust_cfa_offset (4) | 
 | 162 | 	fmov.s	fr9,@-r15 | 
 | 163 | 	cfi_adjust_cfa_offset (4) | 
 | 164 | 	fmov.s	fr8,@-r15 | 
 | 165 | 	cfi_adjust_cfa_offset (4) | 
 | 166 | 	fmov.s	fr7,@-r15 | 
 | 167 | 	cfi_adjust_cfa_offset (4) | 
 | 168 | 	fmov.s	fr6,@-r15 | 
 | 169 | 	cfi_adjust_cfa_offset (4) | 
 | 170 | 	fmov.s	fr5,@-r15 | 
 | 171 | 	cfi_adjust_cfa_offset (4) | 
 | 172 | 	fmov.s	fr4,@-r15 | 
 | 173 | 	cfi_adjust_cfa_offset (4) | 
 | 174 | #else | 
 | 175 | 	add #-36,r15 | 
 | 176 | 	cfi_adjust_cfa_offset (36) | 
 | 177 | #endif | 
 | 178 | 	mov.l r7,@-r15 | 
 | 179 | 	cfi_adjust_cfa_offset (4) | 
 | 180 | 	mov.l r6,@-r15 | 
 | 181 | 	cfi_adjust_cfa_offset (4) | 
 | 182 | 	mov.l r5,@-r15 | 
 | 183 | 	cfi_adjust_cfa_offset (4) | 
 | 184 | 	mov.l r4,@-r15 | 
 | 185 | 	cfi_adjust_cfa_offset (4) | 
 | 186 | 	mov.l r3,@-r15 | 
 | 187 | 	cfi_adjust_cfa_offset (4) | 
 | 188 | 	mov.l r2,@-r15 | 
 | 189 | 	cfi_adjust_cfa_offset (4) | 
 | 190 | 	sts.l macl,@-r15 | 
 | 191 | 	cfi_adjust_cfa_offset (4) | 
 | 192 | 	sts.l mach,@-r15 | 
 | 193 | 	cfi_adjust_cfa_offset (4) | 
 | 194 | 	movt r3			! Save T flag. | 
 | 195 | 	mov.l r3,@-r15 | 
 | 196 | 	cfi_adjust_cfa_offset (4) | 
 | 197 | 	sts.l pr,@-r15 | 
 | 198 | 	cfi_adjust_cfa_offset (4) | 
 | 199 | 	tst r0,r0 | 
 | 200 | 	bt 1f | 
 | 201 | 	mov r0,r2 | 
 | 202 | 1: | 
 | 203 | 	mov r0,r4		! PLT type | 
 | 204 | 	mov r2,r5		! link map address | 
 | 205 | 	sts pr,r7		! return address | 
 | 206 | 	add #-24,r15 | 
 | 207 | 	cfi_adjust_cfa_offset (24) | 
 | 208 | 	mov #40,r0 | 
 | 209 | 	add r15,r0 | 
 | 210 | 	mov.l r0,@r15		! Address of the register structure | 
 | 211 | 	mov #-1,r0 | 
 | 212 | 	mov.l r0,@(8,r15) | 
 | 213 | 	mov #8,r0 | 
 | 214 | 	add r15,r0 | 
 | 215 | 	mov.l r0,@(4,r15) | 
 | 216 | 	mov.l r5,@(12,r15) | 
 | 217 | 	mov.l r1,@(16,r15) | 
 | 218 | #ifdef SHARED | 
 | 219 | 	mov.l 2f,r12 | 
 | 220 | 	mova 2f,r0 | 
 | 221 | 	add r0,r12		! Get GOT address in r12 | 
 | 222 | 	mov.l 3f,r0 | 
 | 223 | 	add r12,r0 | 
 | 224 | #else | 
 | 225 | 	mov.l 3f,r0 | 
 | 226 | #endif | 
 | 227 | 	jsr @r0			! Call resolver. | 
 | 228 | 	 mov r1,r6		! reloc offset | 
 | 229 | 	mov.l @(8,r15),r1 | 
 | 230 | 	cmp/pz r1 | 
 | 231 | 	bt 4f | 
 | 232 | 	add #24,r15 | 
 | 233 | 	cfi_adjust_cfa_offset (-24) | 
 | 234 | 	lds.l @r15+,pr		! Get register content back. | 
 | 235 | 	cfi_adjust_cfa_offset (-4) | 
 | 236 | 	mov.l @r15+,r3 | 
 | 237 | 	cfi_adjust_cfa_offset (-4) | 
 | 238 | 	shal r3			! Lode T flag. | 
 | 239 | 	lds.l @r15+,mach | 
 | 240 | 	cfi_adjust_cfa_offset (-4) | 
 | 241 | 	lds.l @r15+,macl | 
 | 242 | 	cfi_adjust_cfa_offset (-4) | 
 | 243 | 	mov.l @r15+,r2 | 
 | 244 | 	cfi_adjust_cfa_offset (-4) | 
 | 245 | 	mov.l @r15+,r3 | 
 | 246 | 	cfi_adjust_cfa_offset (-4) | 
 | 247 | 	mov.l @r15+,r4 | 
 | 248 | 	cfi_adjust_cfa_offset (-4) | 
 | 249 | 	mov.l @r15+,r5 | 
 | 250 | 	cfi_adjust_cfa_offset (-4) | 
 | 251 | 	mov.l @r15+,r6 | 
 | 252 | 	cfi_adjust_cfa_offset (-4) | 
 | 253 | 	mov.l @r15+,r7 | 
 | 254 | 	cfi_adjust_cfa_offset (-4) | 
 | 255 | #ifdef HAVE_FPU | 
 | 256 | 	fmov.s	@r15+,fr4 | 
 | 257 | 	cfi_adjust_cfa_offset (-4) | 
 | 258 | 	fmov.s	@r15+,fr5 | 
 | 259 | 	cfi_adjust_cfa_offset (-4) | 
 | 260 | 	fmov.s	@r15+,fr6 | 
 | 261 | 	cfi_adjust_cfa_offset (-4) | 
 | 262 | 	fmov.s	@r15+,fr7 | 
 | 263 | 	cfi_adjust_cfa_offset (-4) | 
 | 264 | 	fmov.s	@r15+,fr8 | 
 | 265 | 	cfi_adjust_cfa_offset (-4) | 
 | 266 | 	fmov.s	@r15+,fr9 | 
 | 267 | 	cfi_adjust_cfa_offset (-4) | 
 | 268 | 	fmov.s	@r15+,fr10 | 
 | 269 | 	cfi_adjust_cfa_offset (-4) | 
 | 270 | 	fmov.s	@r15+,fr11 | 
 | 271 | 	cfi_adjust_cfa_offset (-4) | 
 | 272 | 	lds.l	@r15+,fpscr | 
 | 273 | 	cfi_adjust_cfa_offset (-4) | 
 | 274 | #else | 
 | 275 | 	add #36,r15 | 
 | 276 | 	cfi_adjust_cfa_offset (-36) | 
 | 277 | #endif | 
 | 278 | 	jmp @r0			! Jump to function address. | 
 | 279 | 	 mov.l @r15+,r12 | 
 | 280 | 	cfi_adjust_cfa_offset (-4) | 
 | 281 | 	.align 2 | 
 | 282 | #ifdef SHARED | 
 | 283 | 2:	.long _GLOBAL_OFFSET_TABLE_ | 
 | 284 | 3:	.long _dl_profile_fixup@GOTOFF | 
 | 285 | #else | 
 | 286 | 3:	.long _dl_profile_fixup | 
 | 287 | #endif | 
 | 288 |  | 
 | 289 | 	cfi_adjust_cfa_offset (104) | 
 | 290 | 4: | 
 | 291 | 	mov #104,r3 | 
 | 292 | 	add r15,r3		! Original stack | 
 | 293 | 	mov.l r8,@(20,r15) | 
 | 294 | 	cfi_rel_offset (r8, 20) | 
 | 295 | 	mov r15,r8 | 
 | 296 | 	sub r1,r15 | 
 | 297 | 	shlr2 r15 | 
 | 298 | 	shll2 r15 | 
 | 299 | 	mov r15,r4 | 
 | 300 | 	shlr2 r1 | 
 | 301 | 	tst r1,r1 | 
 | 302 | 5: | 
 | 303 | 	bt/s 6f | 
 | 304 | 	 dt r1 | 
 | 305 | 	mov.l @r3+,r2 | 
 | 306 | 	mov.l r2,@r4 | 
 | 307 | 	bra 5b | 
 | 308 | 	 add #4,r4 | 
 | 309 | 6: | 
 | 310 | 	mov.l @r8,r12 | 
 | 311 | 	mov.l @r12+,r2 | 
 | 312 | 	mov.l @r12+,r3 | 
 | 313 | 	mov.l @r12+,r4 | 
 | 314 | 	mov.l @r12+,r5 | 
 | 315 | 	mov.l @r12+,r6 | 
 | 316 | 	mov.l @r12+,r7 | 
 | 317 | #ifdef HAVE_FPU | 
 | 318 | 	fmov.s	@r12+,fr4 | 
 | 319 | 	fmov.s	@r12+,fr5 | 
 | 320 | 	fmov.s	@r12+,fr6 | 
 | 321 | 	fmov.s	@r12+,fr7 | 
 | 322 | 	fmov.s	@r12+,fr8 | 
 | 323 | 	fmov.s	@r12+,fr9 | 
 | 324 | 	fmov.s	@r12+,fr10 | 
 | 325 | 	fmov.s	@r12+,fr11 | 
 | 326 | 	lds.l	@r12+,fpscr | 
 | 327 | #else | 
 | 328 | 	add #36,r2 | 
 | 329 | #endif | 
 | 330 | 	jsr @r0			! Call function. | 
 | 331 | 	 nop | 
 | 332 | 	mov r8,r15 | 
 | 333 | 	mov.l @(12,r15),r4	! link map address | 
 | 334 | 	mov.l @(16,r15),r5	! reloc offset | 
 | 335 | 	mov.l @r15,r6		! input registers | 
 | 336 | #ifdef HAVE_FPU | 
 | 337 | 	mov #16,r8 | 
 | 338 | 	add r15,r8 | 
 | 339 | 	fmov.s fr1,@-r8 | 
 | 340 | 	fmov.s fr0,@-r8 | 
 | 341 | #else | 
 | 342 | 	mov #8,r8 | 
 | 343 | 	add r15,r8 | 
 | 344 | #endif | 
 | 345 | 	mov.l r1,@-r8 | 
 | 346 | 	mov.l r0,@-r8 | 
 | 347 | 	mov.l @(20,r15),r8 | 
 | 348 | 	cfi_restore (r8) | 
 | 349 | #ifdef SHARED | 
 | 350 | 	mov.l 7f,r12 | 
 | 351 | 	mova 7f,r0 | 
 | 352 | 	add r0,r12		! Get GOT address in r12 | 
 | 353 | 	mov.l 8f,r0 | 
 | 354 | 	add r12,r0 | 
 | 355 | #else | 
 | 356 | 	mov.l 8f,r0 | 
 | 357 | #endif | 
 | 358 | 	jsr @r0 | 
 | 359 | 	 mov r15,r7		! output registers | 
 | 360 | 	mov.l @r15+,r0 | 
 | 361 | 	cfi_adjust_cfa_offset (-4) | 
 | 362 | 	mov.l @r15+,r1 | 
 | 363 | 	cfi_adjust_cfa_offset (-4) | 
 | 364 | #ifdef HAVE_FPU | 
 | 365 | 	fmov.s @r15+,fr0 | 
 | 366 | 	cfi_adjust_cfa_offset (-4) | 
 | 367 | 	fmov.s @r15+,fr1 | 
 | 368 | 	cfi_adjust_cfa_offset (-4) | 
 | 369 | 	add #8,r15 | 
 | 370 | 	cfi_adjust_cfa_offset (-8) | 
 | 371 | #else | 
 | 372 | 	add #16,r15 | 
 | 373 | 	cfi_adjust_cfa_offset (-16) | 
 | 374 | #endif | 
 | 375 | 	lds.l @r15+,pr		! Get register content back. | 
 | 376 | 	cfi_adjust_cfa_offset (-4) | 
 | 377 | 	mov.l @r15+,r3 | 
 | 378 | 	cfi_adjust_cfa_offset (-4) | 
 | 379 | 	shal r3			! Lode T flag. | 
 | 380 | 	lds.l @r15+,mach | 
 | 381 | 	cfi_adjust_cfa_offset (-4) | 
 | 382 | 	lds.l @r15+,macl | 
 | 383 | 	cfi_adjust_cfa_offset (-4) | 
 | 384 | 	mov.l @r15+,r2 | 
 | 385 | 	cfi_adjust_cfa_offset (-4) | 
 | 386 | 	mov.l @r15+,r3 | 
 | 387 | 	cfi_adjust_cfa_offset (-4) | 
 | 388 | 	mov.l @r15+,r4 | 
 | 389 | 	cfi_adjust_cfa_offset (-4) | 
 | 390 | 	mov.l @r15+,r5 | 
 | 391 | 	cfi_adjust_cfa_offset (-4) | 
 | 392 | 	mov.l @r15+,r6 | 
 | 393 | 	cfi_adjust_cfa_offset (-4) | 
 | 394 | 	mov.l @r15+,r7 | 
 | 395 | 	cfi_adjust_cfa_offset (-4) | 
 | 396 | #ifdef HAVE_FPU | 
 | 397 | 	fmov.s	@r15+,fr4 | 
 | 398 | 	cfi_adjust_cfa_offset (-4) | 
 | 399 | 	fmov.s	@r15+,fr5 | 
 | 400 | 	cfi_adjust_cfa_offset (-4) | 
 | 401 | 	fmov.s	@r15+,fr6 | 
 | 402 | 	cfi_adjust_cfa_offset (-4) | 
 | 403 | 	fmov.s	@r15+,fr7 | 
 | 404 | 	cfi_adjust_cfa_offset (-4) | 
 | 405 | 	fmov.s	@r15+,fr8 | 
 | 406 | 	cfi_adjust_cfa_offset (-4) | 
 | 407 | 	fmov.s	@r15+,fr9 | 
 | 408 | 	cfi_adjust_cfa_offset (-4) | 
 | 409 | 	fmov.s	@r15+,fr10 | 
 | 410 | 	cfi_adjust_cfa_offset (-4) | 
 | 411 | 	fmov.s	@r15+,fr11 | 
 | 412 | 	cfi_adjust_cfa_offset (-4) | 
 | 413 | 	lds.l	@r15+,fpscr | 
 | 414 | 	cfi_adjust_cfa_offset (-4) | 
 | 415 | #else | 
 | 416 | 	add #36,r15 | 
 | 417 | 	cfi_adjust_cfa_offset (-36) | 
 | 418 | #endif | 
 | 419 | 	rts			! Jump to function address. | 
 | 420 | 	 mov.l @r15+,r12 | 
 | 421 | 	cfi_adjust_cfa_offset (-4) | 
 | 422 | 	cfi_endproc | 
 | 423 | 	.align 2 | 
 | 424 | #ifdef SHARED | 
 | 425 | 7:	.long _GLOBAL_OFFSET_TABLE_ | 
 | 426 | 8:	.long _dl_call_pltexit@GOTOFF | 
 | 427 | #else | 
 | 428 | 8:	.long _dl_call_pltexit | 
 | 429 | #endif | 
 | 430 | 	.size _dl_runtime_profile, .-_dl_runtime_profile |