Home | History | Annotate | Line # | Download | only in gen
_setjmp.S revision 1.7.2.2
      1  1.7.2.2       tls /*	$NetBSD: _setjmp.S,v 1.7.2.2 2013/06/23 06:21:04 tls Exp $	*/
      2      1.1     bjh21 
      3      1.1     bjh21 /*
      4      1.1     bjh21  * Copyright (c) 1997 Mark Brinicombe
      5      1.1     bjh21  * All rights reserved.
      6      1.1     bjh21  *
      7      1.1     bjh21  * Redistribution and use in source and binary forms, with or without
      8      1.1     bjh21  * modification, are permitted provided that the following conditions
      9      1.1     bjh21  * are met:
     10      1.1     bjh21  * 1. Redistributions of source code must retain the above copyright
     11      1.1     bjh21  *    notice, this list of conditions and the following disclaimer.
     12      1.1     bjh21  * 2. Redistributions in binary form must reproduce the above copyright
     13      1.1     bjh21  *    notice, this list of conditions and the following disclaimer in the
     14      1.1     bjh21  *    documentation and/or other materials provided with the distribution.
     15      1.1     bjh21  * 3. All advertising materials mentioning features or use of this software
     16      1.1     bjh21  *    must display the following acknowledgement:
     17      1.1     bjh21  *	This product includes software developed by Mark Brinicombe
     18      1.1     bjh21  * 4. Neither the name of the University nor the names of its contributors
     19      1.1     bjh21  *    may be used to endorse or promote products derived from this software
     20      1.1     bjh21  *    without specific prior written permission.
     21      1.1     bjh21  *
     22      1.1     bjh21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
     23      1.1     bjh21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     24      1.1     bjh21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     25      1.1     bjh21  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
     26      1.1     bjh21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     27      1.1     bjh21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     28      1.1     bjh21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     29      1.1     bjh21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     30      1.1     bjh21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     31      1.1     bjh21  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     32      1.1     bjh21  * SUCH DAMAGE.
     33      1.1     bjh21  */
     34      1.1     bjh21 
     35  1.7.2.1       tls #if !defined(__SOFTFP__) && !defined(__VFP_FP__) && !defined(__ARM_PCS)
     36  1.7.2.1       tls #error FPA is not supported anymore
     37  1.7.2.1       tls #endif
     38  1.7.2.1       tls 
     39  1.7.2.1       tls #ifdef __ARM_EABI__
     40  1.7.2.1       tls 	.fpu	vfp
     41  1.7.2.1       tls #endif
     42  1.7.2.1       tls 
     43      1.1     bjh21 #include <machine/asm.h>
     44      1.1     bjh21 #include <machine/setjmp.h>
     45      1.1     bjh21 
     46      1.1     bjh21 /*
     47      1.1     bjh21  * C library -- _setjmp, _longjmp
     48      1.1     bjh21  *
     49      1.1     bjh21  *	_longjmp(a,v)
     50      1.1     bjh21  * will generate a "return(v)" from the last call to
     51      1.1     bjh21  *	_setjmp(a)
     52      1.1     bjh21  * by restoring registers from the stack.
     53      1.1     bjh21  * The previous signal state is NOT restored.
     54      1.1     bjh21  *
     55      1.1     bjh21  * Note: r0 is the return value
     56  1.7.2.1       tls  *       r1-r3,ip are scratch registers in functions
     57      1.1     bjh21  */
     58      1.1     bjh21 
     59      1.1     bjh21 ENTRY(_setjmp)
     60      1.4   thorpej 	ldr	r1, .L_setjmp_magic
     61  1.7.2.1       tls 
     62  1.7.2.1       tls #ifdef __ARM_EABI__
     63  1.7.2.1       tls 	ldr	r2, .Lfpu_present
     64  1.7.2.1       tls #ifdef PIC
     65  1.7.2.1       tls 	GOT_INIT(r3, .L_setjmp_got, .L_setjmp_gotinit)
     66  1.7.2.1       tls 	ldr	r2, [r2, r3]
     67      1.1     bjh21 #else
     68  1.7.2.1       tls 	ldr	r2, [r2]
     69  1.7.2.1       tls #endif
     70  1.7.2.1       tls 	teq	r2, #0		/* do we have a FPU? */
     71  1.7.2.1       tls 	beq	1f		/*   no, don't save VFP registers */
     72  1.7.2.1       tls 
     73  1.7.2.1       tls 	orr	r1, r1, #(_JB_MAGIC__SETJMP ^ _JB_MAGIC__SETJMP_VFP)
     74  1.7.2.1       tls 				/* change magic to VFP magic */
     75  1.7.2.1       tls 	add	r2, r0, #(_JB_REG_D8 * 4)
     76  1.7.2.1       tls 	vstmia	r2, {d8-d15}
     77  1.7.2.1       tls 	vmrs	r2, fpscr
     78  1.7.2.1       tls 	str	r2, [r0, #(_JB_REG_FPSCR * 4)]
     79  1.7.2.1       tls 1:
     80  1.7.2.1       tls #endif /* __ARM_EABI__ */
     81  1.7.2.1       tls 
     82  1.7.2.1       tls 	str	r1, [r0]
     83  1.7.2.1       tls 
     84  1.7.2.1       tls 	add	r0, r0, #(_JB_REG_R4 * 4)
     85      1.1     bjh21 	/* Store integer registers */
     86      1.1     bjh21         stmia	r0, {r4-r14}
     87      1.1     bjh21 
     88      1.1     bjh21         mov	r0, #0x00000000
     89      1.6  rearnsha         RET
     90      1.1     bjh21 
     91      1.4   thorpej .L_setjmp_magic:
     92      1.1     bjh21 	.word	_JB_MAGIC__SETJMP
     93  1.7.2.1       tls #ifdef __ARM_EABI__
     94  1.7.2.1       tls 	GOT_INITSYM(.L_setjmp_got, .L_setjmp_gotinit)
     95  1.7.2.1       tls .Lfpu_present:
     96  1.7.2.1       tls 	.word	PIC_SYM(_libc_arm_fpu_present, GOTOFF)
     97  1.7.2.1       tls #endif /* __ARM_EABI__ */
     98      1.1     bjh21 
     99      1.1     bjh21 ENTRY(_longjmp)
    100  1.7.2.1       tls 	ldr	r2, [r0]			/* get magic from jmp_buf */
    101  1.7.2.1       tls 	bic	r3, r2, #(_JB_MAGIC__SETJMP ^ _JB_MAGIC__SETJMP_VFP)
    102  1.7.2.1       tls 						/* ignore VFP-ness of magic */
    103  1.7.2.1       tls 	ldr	ip, .L_setjmp_magic		/* load magic */
    104  1.7.2.1       tls 	teq	ip, r3				/* magic correct? */
    105  1.7.2.1       tls 	bne	botch				/*   no, botch */
    106  1.7.2.1       tls 
    107  1.7.2.1       tls #ifdef __ARM_EABI__
    108  1.7.2.1       tls 	teq	r3, r2				/* did magic change? */
    109  1.7.2.1       tls 	beq	1f				/*   no, don't restore VFP */
    110  1.7.2.2       tls 	add	ip, r0, #(_JB_REG_D8 * 4)
    111  1.7.2.2       tls 	vldmia	ip, {d8-d15}
    112  1.7.2.2       tls 	ldr	ip, [r0, #(_JB_REG_FPSCR * 4)]
    113  1.7.2.2       tls 	vmsr	fpscr, ip
    114  1.7.2.1       tls 1:
    115  1.7.2.1       tls #endif /* __ARM_EABI__ */
    116  1.7.2.1       tls 
    117  1.7.2.1       tls 	add	r0, r0, #(_JB_REG_R4 * 4)
    118      1.1     bjh21        	/* Restore integer registers */
    119      1.1     bjh21         ldmia	r0, {r4-r14}
    120      1.1     bjh21 
    121      1.3     chris 	/* Validate sp and r14 */
    122      1.3     chris 	teq	sp, #0
    123      1.3     chris 	teqne	r14, #0
    124      1.1     bjh21 	beq	botch
    125      1.1     bjh21 
    126      1.1     bjh21 	/* Set return value */
    127  1.7.2.2       tls 	movs	r0, r1
    128      1.1     bjh21 	moveq	r0, #0x00000001
    129      1.6  rearnsha 	RET
    130      1.1     bjh21 
    131      1.1     bjh21 	/* validation failed, die die die. */
    132      1.1     bjh21 botch:
    133      1.2      matt 	bl	PIC_SYM(_C_LABEL(longjmperror), PLT)
    134      1.2      matt 	bl	PIC_SYM(_C_LABEL(abort), PLT)
    135      1.1     bjh21 	b	. - 8		/* Cannot get here */
    136