mirror of
https://sourceware.org/git/glibc.git
synced 2025-07-29 11:41:21 +03:00
2.5-18.1
This commit is contained in:
Jakub Jelinek
293
sysdeps/unix/sysv/linux/powerpc/powerpc32/setcontext-common.S
Normal file
293
sysdeps/unix/sysv/linux/powerpc/powerpc32/setcontext-common.S
Normal file
@ -0,0 +1,293 @@
|
||||
/* Jump to a new context powerpc32 common.
|
||||
Copyright (C) 2005, 2006 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, write to the Free
|
||||
Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA
|
||||
02110-1301 USA. */
|
||||
|
||||
/* This is the common implementation of setcontext for powerpc32.
|
||||
It not complete in itself should be included in to a framework that
|
||||
defines:
|
||||
__CONTEXT_FUNC_NAME
|
||||
and if appropriate:
|
||||
__CONTEXT_ENABLE_FPRS
|
||||
__CONTEXT_ENABLE_VRS
|
||||
Any archecture that implements the Vector unit is assumed to also
|
||||
implement the floating unit. */
|
||||
|
||||
/* Stack frame offsets. */
|
||||
#define _FRAME_BACKCHAIN 0
|
||||
#define _FRAME_LR_SAVE 4
|
||||
#define _FRAME_PARM_SAVE1 8
|
||||
#define _FRAME_PARM_SAVE2 12
|
||||
#define _FRAME_PARM_SAVE3 16
|
||||
#define _FRAME_PARM_SAVE4 20
|
||||
|
||||
#ifdef __CONTEXT_ENABLE_VRS
|
||||
.machine "altivec"
|
||||
#endif
|
||||
ENTRY(__CONTEXT_FUNC_NAME)
|
||||
mflr r0
|
||||
stwu r1,-16(r1)
|
||||
cfi_adjust_cfa_offset (16)
|
||||
stw r0,20(r1)
|
||||
cfi_offset (lr, _FRAME_LR_SAVE)
|
||||
stw r31,12(r1)
|
||||
cfi_offset(r31,-4)
|
||||
lwz r31,_UC_REGS_PTR(r3)
|
||||
|
||||
/*
|
||||
* If this ucontext refers to the point where we were interrupted
|
||||
* by a signal, we have to use the rt_sigreturn system call to
|
||||
* return to the context so we get both LR and CTR restored.
|
||||
*
|
||||
* Otherwise, the context we are restoring is either just after
|
||||
* a procedure call (getcontext/swapcontext) or at the beginning
|
||||
* of a procedure call (makecontext), so we don't need to restore
|
||||
* r0, xer, ctr. We don't restore r2 since it will be used as
|
||||
* the TLS pointer.
|
||||
*/
|
||||
lwz r0,_UC_GREGS+(PT_MSR*4)(r31)
|
||||
cmpwi r0,0
|
||||
bne 4f /* L(do_sigret) */
|
||||
|
||||
/* Restore the signal mask */
|
||||
li r5,0
|
||||
addi r4,r3,_UC_SIGMASK
|
||||
li r3,SIG_SETMASK
|
||||
bl __sigprocmask@local
|
||||
cmpwi r3,0
|
||||
bne 3f /* L(error_exit) */
|
||||
|
||||
#ifdef __CONTEXT_ENABLE_FPRS
|
||||
# ifdef __CONTEXT_ENABLE_VRS
|
||||
# ifdef PIC
|
||||
mflr r8
|
||||
# ifdef HAVE_ASM_PPC_REL16
|
||||
bcl 20,31,1f
|
||||
1: mflr r7
|
||||
addis r7,r7,_GLOBAL_OFFSET_TABLE_-1b@ha
|
||||
addi r7,r7,_GLOBAL_OFFSET_TABLE_-1b@l
|
||||
# else
|
||||
bl _GLOBAL_OFFSET_TABLE_@local-4
|
||||
mflr r7
|
||||
# endif
|
||||
# ifdef SHARED
|
||||
lwz r7,_rtld_global_ro@got(r7)
|
||||
mtlr r8
|
||||
lwz r7,RTLD_GLOBAL_RO_DL_HWCAP_OFFSET(r7)
|
||||
# else
|
||||
lwz r7,_dl_hwcap@got(r7)
|
||||
mtlr r8
|
||||
lwz r7,0(r7)
|
||||
# endif
|
||||
# else
|
||||
lis r7,_dl_hwcap@ha
|
||||
lwz r7,_dl_hwcap@l(r7)
|
||||
# endif
|
||||
andis. r7,r7,(PPC_FEATURE_HAS_ALTIVEC >> 16)
|
||||
la r10,(_UC_VREGS)(r31)
|
||||
beq 2f /* L(has_no_vec) */
|
||||
|
||||
lwz r0,(32*16)(r10)
|
||||
li r9,(32*16)
|
||||
cmpwi r0,0
|
||||
mtspr VRSAVE,r0
|
||||
beq 2f /* L(has_no_vec) */
|
||||
|
||||
lvx v19,r9,r10
|
||||
la r9,(16)(r10)
|
||||
|
||||
lvx v0,0,r10
|
||||
lvx v1,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
mtvscr v19
|
||||
lvx v2,0,r10
|
||||
lvx v3,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v4,0,r10
|
||||
lvx v5,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v6,0,r10
|
||||
lvx v7,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v8,0,r10
|
||||
lvx v9,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v10,0,r10
|
||||
lvx v11,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v12,0,r10
|
||||
lvx v13,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v14,0,r10
|
||||
lvx v15,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v16,0,r10
|
||||
lvx v17,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v18,0,r10
|
||||
lvx v19,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v20,0,r10
|
||||
lvx v21,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v22,0,r10
|
||||
lvx v23,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v24,0,r10
|
||||
lvx v25,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v26,0,r10
|
||||
lvx v27,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v28,0,r10
|
||||
lvx v29,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v30,0,r10
|
||||
lvx v31,0,r9
|
||||
addi r10,r10,32
|
||||
addi r9,r9,32
|
||||
|
||||
lvx v10,0,r10
|
||||
lvx v11,0,r9
|
||||
|
||||
2: /* L(has_no_vec): */
|
||||
# endif /* __CONTEXT_ENABLE_VRS */
|
||||
/* Restore the floating-point registers */
|
||||
lfd fp31,_UC_FREGS+(32*8)(r31)
|
||||
lfd fp0,_UC_FREGS+(0*8)(r31)
|
||||
mtfsf 0xff,fp31
|
||||
lfd fp1,_UC_FREGS+(1*8)(r31)
|
||||
lfd fp2,_UC_FREGS+(2*8)(r31)
|
||||
lfd fp3,_UC_FREGS+(3*8)(r31)
|
||||
lfd fp4,_UC_FREGS+(4*8)(r31)
|
||||
lfd fp5,_UC_FREGS+(5*8)(r31)
|
||||
lfd fp6,_UC_FREGS+(6*8)(r31)
|
||||
lfd fp7,_UC_FREGS+(7*8)(r31)
|
||||
lfd fp8,_UC_FREGS+(8*8)(r31)
|
||||
lfd fp9,_UC_FREGS+(9*8)(r31)
|
||||
lfd fp10,_UC_FREGS+(10*8)(r31)
|
||||
lfd fp11,_UC_FREGS+(11*8)(r31)
|
||||
lfd fp12,_UC_FREGS+(12*8)(r31)
|
||||
lfd fp13,_UC_FREGS+(13*8)(r31)
|
||||
lfd fp14,_UC_FREGS+(14*8)(r31)
|
||||
lfd fp15,_UC_FREGS+(15*8)(r31)
|
||||
lfd fp16,_UC_FREGS+(16*8)(r31)
|
||||
lfd fp17,_UC_FREGS+(17*8)(r31)
|
||||
lfd fp18,_UC_FREGS+(18*8)(r31)
|
||||
lfd fp19,_UC_FREGS+(19*8)(r31)
|
||||
lfd fp20,_UC_FREGS+(20*8)(r31)
|
||||
lfd fp21,_UC_FREGS+(21*8)(r31)
|
||||
lfd fp22,_UC_FREGS+(22*8)(r31)
|
||||
lfd fp23,_UC_FREGS+(23*8)(r31)
|
||||
lfd fp24,_UC_FREGS+(24*8)(r31)
|
||||
lfd fp25,_UC_FREGS+(25*8)(r31)
|
||||
lfd fp26,_UC_FREGS+(26*8)(r31)
|
||||
lfd fp27,_UC_FREGS+(27*8)(r31)
|
||||
lfd fp28,_UC_FREGS+(28*8)(r31)
|
||||
lfd fp29,_UC_FREGS+(29*8)(r31)
|
||||
lfd fp30,_UC_FREGS+(30*8)(r31)
|
||||
lfd fp31,_UC_FREGS+(31*8)(r31)
|
||||
#endif /* __CONTEXT_ENABLE_FPRS */
|
||||
|
||||
/* Restore LR and CCR, and set CTR to the NIP value */
|
||||
lwz r3,_UC_GREGS+(PT_LNK*4)(r31)
|
||||
lwz r4,_UC_GREGS+(PT_NIP*4)(r31)
|
||||
lwz r5,_UC_GREGS+(PT_CCR*4)(r31)
|
||||
mtlr r3
|
||||
mtctr r4
|
||||
mtcr r5
|
||||
|
||||
/* Restore the general registers */
|
||||
lwz r1,_UC_GREGS+(PT_R1*4)(r31)
|
||||
lwz r3,_UC_GREGS+(PT_R3*4)(r31)
|
||||
lwz r4,_UC_GREGS+(PT_R4*4)(r31)
|
||||
lwz r5,_UC_GREGS+(PT_R5*4)(r31)
|
||||
lwz r6,_UC_GREGS+(PT_R6*4)(r31)
|
||||
lwz r7,_UC_GREGS+(PT_R7*4)(r31)
|
||||
lwz r8,_UC_GREGS+(PT_R8*4)(r31)
|
||||
lwz r9,_UC_GREGS+(PT_R9*4)(r31)
|
||||
lwz r10,_UC_GREGS+(PT_R10*4)(r31)
|
||||
lwz r11,_UC_GREGS+(PT_R11*4)(r31)
|
||||
lwz r12,_UC_GREGS+(PT_R12*4)(r31)
|
||||
lwz r13,_UC_GREGS+(PT_R13*4)(r31)
|
||||
lwz r14,_UC_GREGS+(PT_R14*4)(r31)
|
||||
lwz r15,_UC_GREGS+(PT_R15*4)(r31)
|
||||
lwz r16,_UC_GREGS+(PT_R16*4)(r31)
|
||||
lwz r17,_UC_GREGS+(PT_R17*4)(r31)
|
||||
lwz r18,_UC_GREGS+(PT_R18*4)(r31)
|
||||
lwz r19,_UC_GREGS+(PT_R19*4)(r31)
|
||||
lwz r20,_UC_GREGS+(PT_R20*4)(r31)
|
||||
lwz r21,_UC_GREGS+(PT_R21*4)(r31)
|
||||
lwz r22,_UC_GREGS+(PT_R22*4)(r31)
|
||||
lwz r23,_UC_GREGS+(PT_R23*4)(r31)
|
||||
lwz r24,_UC_GREGS+(PT_R24*4)(r31)
|
||||
lwz r25,_UC_GREGS+(PT_R25*4)(r31)
|
||||
lwz r26,_UC_GREGS+(PT_R26*4)(r31)
|
||||
lwz r27,_UC_GREGS+(PT_R27*4)(r31)
|
||||
lwz r28,_UC_GREGS+(PT_R28*4)(r31)
|
||||
lwz r29,_UC_GREGS+(PT_R29*4)(r31)
|
||||
lwz r30,_UC_GREGS+(PT_R30*4)(r31)
|
||||
lwz r31,_UC_GREGS+(PT_R31*4)(r31)
|
||||
|
||||
bctr
|
||||
|
||||
3: /* L(error_exit): */
|
||||
lwz r31,12(r1)
|
||||
lwz r0,20(r1)
|
||||
addi r1,r1,16
|
||||
mtlr r0
|
||||
blr
|
||||
|
||||
|
||||
4: /* L(do_sigret): */
|
||||
addi r1,r3,-0xd0
|
||||
li r0,SYS_ify(rt_sigreturn)
|
||||
sc
|
||||
/* NOTREACHED */
|
||||
|
||||
END (__CONTEXT_FUNC_NAME)
|
||||
|
||||
Reference in New Issue
Block a user