sysdeps/arm/__longjmp.S

   1 /* longjmp for ARM.
   2    Copyright (C) 1997-2024 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 #include <pointer_guard.h>
  21 #include <stap-probe.h>
  22 #include <bits/setjmp.h>
  23 #include <rtld-global-offsets.h>
  24 #include <arm-features.h>
  25
  26 /* __longjmp(jmpbuf, val) */
  27
  28 ENTRY (__longjmp)
  29         mov     ip, r0
  30
  31 #ifdef CHECK_SP
  32         ldr     r4, [ip]        /* jmpbuf's sp */
  33         cfi_undefined (r4)
  34 #ifdef PTR_DEMANGLE
  35         PTR_DEMANGLE (r4, r4, a3, a4)
  36 #endif
  37         CHECK_SP (r4)
  38 #endif
  39
  40 #ifdef PTR_DEMANGLE
  41         ldr     a4, [ip], #4
  42         PTR_DEMANGLE (a4, a4, a3, r4)
  43         cfi_undefined (r4)
  44         ldr     r4, [ip], #4
  45         PTR_DEMANGLE2 (r4, r4, a3)
  46 #else
  47         ldr     a4, [ip], #4
  48         ldr     r4, [ip], #4
  49         cfi_undefined (r4)
  50 #endif
  51         /* longjmp probe expects longjmp first argument (4@r0), second
  52            argument (-4@r1), and target address (4@r4), respectively.  */
  53         LIBC_PROBE (longjmp, 3, 4@r0, -4@r1, 4@r4)
  54         mov     sp, a4
  55         mov     lr, r4
  56         ldmia   ip!, JMP_BUF_REGLIST
  57         cfi_restore (v1)
  58         cfi_restore (v2)
  59         cfi_restore (v3)
  60         cfi_restore (v4)
  61         cfi_restore (v5)
  62         cfi_restore (v6)
  63         cfi_restore (sl)
  64         cfi_restore (fp)
  65         cfi_restore (sp)
  66         cfi_restore (lr)
  67
  68 #if !defined ARM_ASSUME_NO_IWMMXT || defined __SOFTFP__
  69 # define NEED_HWCAP 1
  70 #endif
  71
  72 #ifdef NEED_HWCAP
  73 # if IS_IN (rtld)
  74         LDST_PCREL (ldr, a4, a3, \
  75                     C_SYMBOL_NAME(_rtld_local_ro) \
  76                     + RTLD_GLOBAL_RO_DL_HWCAP_OFFSET)
  77 # else
  78 #  ifdef SHARED
  79         LDR_GLOBAL (a4, a3, C_SYMBOL_NAME(_rtld_global_ro), \
  80                     RTLD_GLOBAL_RO_DL_HWCAP_OFFSET)
  81 #  else
  82         LDR_GLOBAL (a4, a3, C_SYMBOL_NAME(_dl_hwcap), 0)
  83 #  endif
  84 # endif
  85 #endif
  86
  87 #ifdef __SOFTFP__
  88         tst     a4, #HWCAP_ARM_VFP
  89         beq     .Lno_vfp
  90 #endif
  91
  92         /* Restore the VFP registers.  */
  93         /* Following instruction is vldmia ip!, {d8-d15}.  */
  94         ldc     p11, cr8, [r12], #64
  95 .Lno_vfp:
  96
  97 #ifndef ARM_ASSUME_NO_IWMMXT
  98         tst     a4, #HWCAP_ARM_IWMMXT
  99         beq     .Lno_iwmmxt
 100
 101         /* Restore the call-preserved iWMMXt registers.  */
 102         /* Following instructions are wldrd wr10, [ip], #8 (etc.)  */
 103         ldcl    p1, cr10, [r12], #8
 104         ldcl    p1, cr11, [r12], #8
 105         ldcl    p1, cr12, [r12], #8
 106         ldcl    p1, cr13, [r12], #8
 107         ldcl    p1, cr14, [r12], #8
 108         ldcl    p1, cr15, [r12], #8
 109 .Lno_iwmmxt:
 110 #endif
 111
 112         /* longjmp_target probe expects longjmp first argument (4@r0), second
 113            argument (-4@r1), and target address (4@r14), respectively.  */
 114         LIBC_PROBE (longjmp_target, 3, 4@r0, -4@r1, 4@r14)
 115
 116         movs    r0, r1          /* get the return value in place */
 117         it      eq
 118         moveq   r0, #1          /* can't let setjmp() return zero! */
 119
 120         DO_RET(lr)
 121
 122 END (__longjmp)