mirror of git://sourceware.org/git/glibc.git
				
				
				
			
		
			
				
	
	
		
			145 lines
		
	
	
		
			3.7 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
			
		
		
	
	
			145 lines
		
	
	
		
			3.7 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
| /* Copyright (C) 1992-2017 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
 |