Home | History | Annotate | Line # | Download | only in gen
_setjmp.S revision 1.6.16.1 
      1 /*	$NetBSD: _setjmp.S,v 1.6.16.1 2007/08/28 17:36:29 matt Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1997 Mark Brinicombe
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *	This product includes software developed by Mark Brinicombe
     18  * 4. Neither the name of the University nor the names of its contributors
     19  *    may be used to endorse or promote products derived from this software
     20  *    without specific prior written permission.
     21  *
     22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
     23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
     26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     32  * SUCH DAMAGE.
     33  */
     34 
     35 #include <machine/asm.h>
     36 #include <machine/setjmp.h>
     37 
     38 /*
     39  * C library -- _setjmp, _longjmp
     40  *
     41  *	_longjmp(a,v)
     42  * will generate a "return(v)" from the last call to
     43  *	_setjmp(a)
     44  * by restoring registers from the stack.
     45  * The previous signal state is NOT restored.
     46  *
     47  * Note: r0 is the return value
     48  *       r1-r3 are scratch registers in functions
     49  */
     50 
     51 ENTRY(_setjmp)
     52 #ifdef __thumb__
     53 	push	{r4-r7}
     54 	ldr	r2, .L_setjmp_magic
     55 	add	r1, r0, #4
     56 	str	r2, [r1]
     57 	add	r0, r0, #52
     58 	/* Store integer registers */
     59         stmia	r0!, {r4-r7}
     60 	mov	r4, r8
     61 	mov	r5, r9
     62 	mov	r6, r10
     63 	mov	r7, r11
     64         stmia	r0!, {r4-r7}
     65 	mov	r4, r12
     66 	mov	r5, r13
     67 	mov	r6, r14
     68         stmia	r0!, {r4-r6}
     69 
     70         mov	r0, #0x00000000
     71 #else
     72 	ldr	r1, .L_setjmp_magic
     73 	str	r1, [r0], #4
     74 #ifdef SOFTFLOAT
     75 	add	r0, r0, #52
     76 #else
     77 	/* Store fp registers */
     78 	sfm	f4, 4, [r0], #48
     79 	/* Store fpsr */
     80 	rfs	r1
     81 	str	r1, [r0], #0x0004
     82 #endif	/* SOFTFLOAT */
     83 	/* Store integer registers */
     84         stmia	r0, {r4-r14}
     85 
     86         mov	r0, #0x00000000
     87 #endif /* __thumb__ */
     88 	XPOP	{r4-r7}
     89         RET
     90 
     91 ENTRY(_longjmp)
     92 #ifdef __thumb__
     93 	add	r2, r0, #4
     94 	ldr	r3, [r2]
     95 	ldr	r2, .L_setjmp_magic
     96 	cmp	r2, r3
     97 	bne	.Lbotch
     98 
     99 	add	r0, r0, #52
    100        	/* Restore integer registers */
    101         ldmia	r0!, {r4-r7}
    102 	push	{r4-r7}		/* save for later */
    103 	ldmia	r0!, {r4-r7}
    104 	mov	r8, r4
    105 	mov	r9, r5
    106 	mov	r10, r6
    107 	mov	r11, r7
    108 	ldmia	r0!, {r4-r6}
    109 	mov	r12, r4
    110 
    111 	/* Validate sp and r14 */
    112 	cmp	r5, #0
    113 	beq	.Lbotch
    114 	cmp	r6, #0
    115 	beq	.Lbotch
    116 
    117 	mov	sp, r5
    118 	mov	lr, r6
    119 	/* Set return value */
    120 	mov	r0, r1
    121 	cmp	r0, #0
    122 	bne	1f
    123 	mov	r0, #1
    124 1:	pop	{r4-r7}
    125 	RET
    126 
    127 	/* validation failed, die die die. */
    128 .Lbotch:
    129 	bl	PLT_SYM(_C_LABEL(longjmperror))
    130 	bl	PLT_SYM(_C_LABEL(abort))
    131 	b	. - 8		/* Cannot get here */
    132 
    133 #else
    134 	ldr	r2, .L_setjmp_magic
    135 	ldr	r3, [r0], #4
    136 	teq	r2, r3
    137 	bne	.Lbotch
    138 
    139 #ifdef SOFTFLOAT
    140 	add	r0, r0, #52
    141 #else
    142 	/* Restore fp registers */
    143 	lfm	f4, 4, [r0], #48
    144 	/* Restore fpsr */
    145 	ldr	r4, [r0], #0x0004
    146 	wfs	r4
    147 #endif	/* SOFTFLOAT */
    148        	/* Restore integer registers */
    149         ldmia	r0, {r4-r14}
    150 
    151 	/* Validate sp and r14 */
    152 	teq	sp, #0
    153 	teqne	r14, #0
    154 	beq	.Lbotch
    155 
    156 	/* Set return value */
    157 	mov	r0, r1
    158 	teq	r0, #0x00000000
    159 	moveq	r0, #0x00000001
    160 	RET
    161 
    162 	/* validation failed, die die die. */
    163 .Lbotch:
    164 	bl	PLT_SYM(_C_LABEL(longjmperror))
    165 	bl	PLT_SYM(_C_LABEL(abort))
    166 	b	. - 8		/* Cannot get here */
    167 #endif
    168 
    169 	.p2align 2
    170 .L_setjmp_magic:
    171 	.word	_JB_MAGIC__SETJMP
    172 
    173