glibc/sysdeps/powerpc/powerpc32/fpu/setjmp-common.S

184 lines
4.8 KiB
ArmAsm

/* setjmp for PowerPC.
Copyright (C) 1995-2014 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
The GNU C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; if not, see
<http://www.gnu.org/licenses/>. */
#include <sysdep.h>
#include <stap-probe.h>
#define _ASM
#ifdef __NO_VMX__
# include <novmxsetjmp.h>
#else
# include <jmpbuf-offsets.h>
#endif
.machine "altivec"
ENTRY (__sigsetjmp_symbol)
#ifdef PTR_MANGLE
mr r5,r1
PTR_MANGLE(r5, r6)
stw r5,(JB_GPR1*4)(3)
#else
stw r1,(JB_GPR1*4)(3)
#endif
mflr r0
/* setjmp probe expects longjmp first argument (4@3), second argument
(-4@4), and target address (4@0), respectively. */
LIBC_PROBE (setjmp, 3, 4@3, -4@4, 4@0)
stw r14,((JB_GPRS+0)*4)(3)
stfd fp14,((JB_FPRS+0*2)*4)(3)
#ifdef PTR_MANGLE
PTR_MANGLE2 (r0, r6)
#endif
stw r0,(JB_LR*4)(3)
stw r15,((JB_GPRS+1)*4)(3)
stfd fp15,((JB_FPRS+1*2)*4)(3)
mfcr r0
stw r16,((JB_GPRS+2)*4)(3)
stfd fp16,((JB_FPRS+2*2)*4)(3)
stw r0,(JB_CR*4)(3)
stw r17,((JB_GPRS+3)*4)(3)
stfd fp17,((JB_FPRS+3*2)*4)(3)
stw r18,((JB_GPRS+4)*4)(3)
stfd fp18,((JB_FPRS+4*2)*4)(3)
stw r19,((JB_GPRS+5)*4)(3)
stfd fp19,((JB_FPRS+5*2)*4)(3)
stw r20,((JB_GPRS+6)*4)(3)
stfd fp20,((JB_FPRS+6*2)*4)(3)
stw r21,((JB_GPRS+7)*4)(3)
stfd fp21,((JB_FPRS+7*2)*4)(3)
stw r22,((JB_GPRS+8)*4)(3)
stfd fp22,((JB_FPRS+8*2)*4)(3)
stw r23,((JB_GPRS+9)*4)(3)
stfd fp23,((JB_FPRS+9*2)*4)(3)
stw r24,((JB_GPRS+10)*4)(3)
stfd fp24,((JB_FPRS+10*2)*4)(3)
stw r25,((JB_GPRS+11)*4)(3)
stfd fp25,((JB_FPRS+11*2)*4)(3)
stw r26,((JB_GPRS+12)*4)(3)
stfd fp26,((JB_FPRS+12*2)*4)(3)
stw r27,((JB_GPRS+13)*4)(3)
stfd fp27,((JB_FPRS+13*2)*4)(3)
stw r28,((JB_GPRS+14)*4)(3)
stfd fp28,((JB_FPRS+14*2)*4)(3)
stw r29,((JB_GPRS+15)*4)(3)
stfd fp29,((JB_FPRS+15*2)*4)(3)
stw r30,((JB_GPRS+16)*4)(3)
stfd fp30,((JB_FPRS+16*2)*4)(3)
stw r31,((JB_GPRS+17)*4)(3)
stfd fp31,((JB_FPRS+17*2)*4)(3)
#ifndef __NO_VMX__
# ifdef PIC
mflr r6
cfi_register(lr,r6)
SETUP_GOT_ACCESS(r5,got_label)
addis r5,r5,_GLOBAL_OFFSET_TABLE_-got_label@ha
addi r5,r5,_GLOBAL_OFFSET_TABLE_-got_label@l
mtlr r6
cfi_same_value (lr)
# ifdef SHARED
# ifdef IS_IN_rtld
/* Inside ld.so we use the local alias to avoid runtime GOT
relocations. */
lwz r5,_rtld_local_ro@got(r5)
# else
lwz r5,_rtld_global_ro@got(r5)
# endif
lwz r5,RTLD_GLOBAL_RO_DL_HWCAP_OFFSET+LOWORD(r5)
# else
lwz r5,_dl_hwcap@got(r5)
lwz r5,LOWORD(r5)
# endif
# else
lis r6,(_dl_hwcap+LOWORD)@ha
lwz r5,(_dl_hwcap+LOWORD)@l(r6)
# endif
andis. r5,r5,(PPC_FEATURE_HAS_ALTIVEC >> 16)
beq L(no_vmx)
la r5,((JB_VRS)*4)(3)
andi. r6,r5,0xf
mfspr r0,VRSAVE
stw r0,((JB_VRSAVE)*4)(3)
addi r6,r5,16
beq+ L(aligned_save_vmx)
lvsr v0,0,r5
lvsl v1,0,r5
addi r6,r5,-16
# define save_misaligned_vmx(savevr,prevvr,shiftvr,tmpvr,savegpr,addgpr) \
addi addgpr,addgpr,32; \
vperm tmpvr,prevvr,savevr,shiftvr; \
stvx tmpvr,0,savegpr
/*
* We have to be careful not to corrupt the data below v20 and
* above v31. To keep things simple we just rotate both ends in
* the opposite direction to our main permute so we can use
* the common macro.
*/
/* load and rotate data below v20 */
lvx v2,0,r5
vperm v2,v2,v2,v1
save_misaligned_vmx(v20,v2,v0,v3,r5,r6)
save_misaligned_vmx(v21,v20,v0,v3,r6,r5)
save_misaligned_vmx(v22,v21,v0,v3,r5,r6)
save_misaligned_vmx(v23,v22,v0,v3,r6,r5)
save_misaligned_vmx(v24,v23,v0,v3,r5,r6)
save_misaligned_vmx(v25,v24,v0,v3,r6,r5)
save_misaligned_vmx(v26,v25,v0,v3,r5,r6)
save_misaligned_vmx(v27,v26,v0,v3,r6,r5)
save_misaligned_vmx(v28,v27,v0,v3,r5,r6)
save_misaligned_vmx(v29,v28,v0,v3,r6,r5)
save_misaligned_vmx(v30,v29,v0,v3,r5,r6)
save_misaligned_vmx(v31,v30,v0,v3,r6,r5)
/* load and rotate data above v31 */
lvx v2,0,r6
vperm v2,v2,v2,v1
save_misaligned_vmx(v2,v31,v0,v3,r5,r6)
b L(no_vmx)
L(aligned_save_vmx):
stvx 20,0,r5
addi r5,r5,32
stvx 21,0,r6
addi r6,r6,32
stvx 22,0,r5
addi r5,r5,32
stvx 23,0,r6
addi r6,r6,32
stvx 24,0,r5
addi r5,r5,32
stvx 25,0,r6
addi r6,r6,32
stvx 26,0,r5
addi r5,r5,32
stvx 27,0,r6
addi r6,r6,32
stvx 28,0,r5
addi r5,r5,32
stvx 29,0,r6
addi r6,r6,32
stvx 30,0,r5
stvx 31,0,r6
L(no_vmx):
#endif
b __sigjmp_save_symbol@local
END (__sigsetjmp_symbol)