glibc/sysdeps/unix/sysv/linux/alpha/____longjmp_chk.S
Richard Henderson 68b7efaadb Relocate alpha from ports to libc
Also fixed the following whitespace nits to satisfy the push:

sysdeps/alpha/alphaev6/memset.S:142: space before tab in indent.
sysdeps/alpha/configure:1: new blank line at EOF.
sysdeps/alpha/fpu/e_sqrt.c:126: space before tab in indent.
sysdeps/alpha/preconfigure:1: new blank line at EOF.
sysdeps/unix/sysv/linux/alpha/syscalls.list:1: new blank line at EOF.
2014-02-12 07:00:06 -08:00

145 lines
3.7 KiB
ArmAsm

/* Copyright (C) 1992-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 <jmpbuf-offsets.h>
.section .rodata.str1.1,"aMS",@progbits,1
.type longjmp_msg,@object
longjmp_msg:
.string "longjmp causes uninitialized stack frame"
.size longjmp_msg, .-longjmp_msg
/* Jump to the position specified by ENV, causing the
setjmp call there to return VAL, or 1 if VAL is 0.
void __longjmp (__jmp_buf env, int val). */
.text
.align 4
.globl ____longjmp_chk
.type ____longjmp_chk, @function
.usepv ____longjmp_chk, std
cfi_startproc
____longjmp_chk:
ldgp gp, 0(pv)
#ifdef PROF
.set noat
lda AT, _mcount
jsr AT, (AT), _mcount
.set at
#endif
ldq s2, JB_PC*8(a0)
mov a0, s0
ldq fp, JB_FP*8(a0)
mov a1, s1
ldq s3, JB_SP*8(a0)
cmoveq s1, 1, s1
#ifdef PTR_DEMANGLE
PTR_DEMANGLE(s2, t1)
PTR_DEMANGLE2(s3, t1)
PTR_DEMANGLE2(fp, t1)
#endif
/* ??? While this is a proper test for detecting a longjmp to an
invalid frame within any given stack, the main thread stack is
located *below* almost everything in the address space. Which
means that the test at Lfail vs the signal stack will almost
certainly never pass. We ought bounds check top and bottom of
the current thread's stack. */
cmpule s3, sp, t1
bne t1, $Lfail
.align 4
$Lok:
mov s0, a0
mov s1, v0
mov s3, t0
mov s2, ra
cfi_remember_state
cfi_def_cfa(a0, 0)
cfi_register(sp, t0)
cfi_offset(s0, JB_S0*8)
cfi_offset(s1, JB_S1*8)
cfi_offset(s2, JB_S2*8)
cfi_offset(s3, JB_S3*8)
cfi_offset(s4, JB_S4*8)
cfi_offset(s5, JB_S5*8)
cfi_offset(s3, JB_S3*8)
cfi_offset($f2, JB_F2*8)
cfi_offset($f3, JB_F3*8)
cfi_offset($f4, JB_F4*8)
cfi_offset($f5, JB_F5*8)
cfi_offset($f6, JB_F6*8)
cfi_offset($f7, JB_F7*8)
cfi_offset($f8, JB_F8*8)
cfi_offset($f9, JB_F9*8)
ldq s0, JB_S0*8(a0)
ldq s1, JB_S1*8(a0)
ldq s2, JB_S2*8(a0)
ldq s3, JB_S3*8(a0)
ldq s4, JB_S4*8(a0)
ldq s5, JB_S5*8(a0)
ldt $f2, JB_F2*8(a0)
ldt $f3, JB_F3*8(a0)
ldt $f4, JB_F4*8(a0)
ldt $f5, JB_F5*8(a0)
ldt $f6, JB_F6*8(a0)
ldt $f7, JB_F7*8(a0)
ldt $f8, JB_F8*8(a0)
ldt $f9, JB_F9*8(a0)
mov t0, sp
ret
.align 4
$Lfail:
cfi_restore_state
lda v0, __NR_sigaltstack
lda a0, 0
lda a1, -32(sp)
lda sp, -32(sp)
cfi_adjust_cfa_offset(32)
callsys
ldq t0, 0(sp) /* ss_sp */
ldl t1, 8(sp) /* ss_flags */
ldq t2, 16(sp) /* ss_size */
lda sp, 32(sp)
cfi_adjust_cfa_offset(-32)
/* Without working sigaltstack we cannot perform the test. */
bne a3, $Lok
addq t0, t2, t0 /* t0 = ss_sp + ss_size */
subq t0, s3, t0 /* t0 = (ss_sp + ss_size) - new_sp */
cmpule t2, t0, t0 /* t0 = (t0 >= ss_size) */
and t0, t1, t0 /* t0 = (t0 >= ss_size) & (ss_flags & SS_ONSTACK) */
bne t0, $Lok
ldah a0, longjmp_msg(gp) !gprelhigh
lda a0, longjmp_msg(a0) !gprellow
#ifdef PIC
jsr ra, HIDDEN_JUMPTARGET(__fortify_fail)
#else
bsr ra, HIDDEN_JUMPTARGET(__fortify_fail) !samegp
#endif
bugchk
cfi_endproc
.size ____longjmp_chk, .-____longjmp_chk