sysdeps/sh/dl-trampoline.S

   1 /* PLT trampolines.  SH version.
   2    Copyright (C) 2005-2014 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