Home | History | Annotate | Line # | Download | only in gen
__setjmp14.S revision 1.7 
      1 /*
      2  * Copyright (c) 1983, 1993
      3  *	The Regents of the University of California.  All rights reserved.
      4  *
      5  * Redistribution and use in source and binary forms, with or without
      6  * modification, are permitted provided that the following conditions
      7  * are met:
      8  * 1. Redistributions of source code must retain the above copyright
      9  *    notice, this list of conditions and the following disclaimer.
     10  * 2. Redistributions in binary form must reproduce the above copyright
     11  *    notice, this list of conditions and the following disclaimer in the
     12  *    documentation and/or other materials provided with the distribution.
     13  * 3. All advertising materials mentioning features or use of this software
     14  *    must display the following acknowledgement:
     15  *	This product includes software developed by the University of
     16  *	California, Berkeley and its contributors.
     17  * 4. Neither the name of the University nor the names of its contributors
     18  *    may be used to endorse or promote products derived from this software
     19  *    without specific prior written permission.
     20  *
     21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     31  * SUCH DAMAGE.
     32  */
     33 
     34 #if defined(LIBC_SCCS) && !defined(lint)
     35 	/* .asciz "@(#)setjmp.s	8.1 (Berkeley) 6/4/93" */
     36 	.asciz "$NetBSD: __setjmp14.S,v 1.7 2002/03/30 05:32:32 matt Exp $"
     37 #endif /* LIBC_SCCS and not lint */
     38 
     39 /*
     40  * C library -- setjmp, longjmp
     41  *
     42  *	longjmp(a,v)
     43  * will generate a "return(v)" from
     44  * the last call to
     45  *	setjmp(a)
     46  * by restoring registers from the stack,
     47  * and a struct sigcontext, see <signal.h>
     48  */
     49 
     50 #include "DEFS.h"
     51 
     52 ENTRY(__setjmp14, R6)
     53 	movl	4(%ap),%r2		# construct sigcontext
     54 	subl2	$12,%sp			# space for current struct sigstack
     55 	pushl	%sp			# get current values
     56 	pushl	$0			# no new values
     57 	calls	$4,_C_LABEL(__sigaltstack14) # pop args plus signal stack value
     58 	movl	4(%ap),%r2		# construct sigcontext
     59 	movl	(%sp)+,(%r2)		# save onsigstack status of caller
     60 	pushal	28(%r2)
     61 	pushl	$0
     62 	pushl	$0
     63 	calls	$3,_C_LABEL(__sigprocmask14) # get signal mask
     64 	addl3	$8,4(%ap),%r2		# point to sp in signal context
     65 	clrl	%r0			# assume no stack arguments
     66 	bbc	$13,6(%fp),1f		# handle callg
     67 	addl3	$1,(%ap),%r0		# get argument count +1 if calls
     68 1:	moval	24(%fp)[%r0],(%r2)+	# save sp of caller
     69 	movl	12(%fp),(%r2)+		# save frame pointer of caller
     70 	movl	8(%fp),(%r2)+		# save argument pointer of caller
     71 	movl	16(%fp),(%r2)+		# save pc of caller
     72 	movpsl	(%r2)			# save current psl
     73 	movw	4(%fp),(%r2)		# save psw of caller
     74 #ifdef __ELF__
     75 	addl3	$44,4(%ap),%r2		# point to past signal context
     76 	movq	%r6,(%r2)+		# save r6/r7
     77 	movq	%r8,(%r2)+		# save r8/r9
     78 	movq	%r10,(%r2)+		# save r10/r11
     79 #endif
     80 	clrl	%r0
     81 	ret
     82 
     83 ENTRY(__longjmp14, 0)
     84 	movl	8(%ap),%r0		# return(v)
     85 	movl	4(%ap),%r1		# fetch buffer
     86 	tstl	12(%r1)			# is fp non-null?
     87 	beql	botch
     88 
     89 #ifdef __ELF__
     90 	moval	44(%r1),%r2		# get ptr to saved registers
     91 	movq	(%r2)+,%r6		# restore r6/r7
     92 	movq	(%r2)+,%r8		# restore r8/r9
     93 	movq	(%r2)+,%r10		# restore r10/r11
     94 #else
     95 loop:
     96 	cmpl	12(%r1),%fp		# are we there yet?
     97 	beql	done
     98 	blssu	botch
     99 	moval	20(%fp),%r2
    100 	blbc	6(%fp),1f		# was %r0 saved?
    101 	movl	%r0,(%r2)+
    102 1:
    103 	bbc	$1,6(%fp),2f		# was %r1 saved?
    104 	movl	%r1,(%r2)
    105 2:
    106 	movab	loop,16(%fp)
    107 	ret				# pop another frame
    108 
    109 done:
    110 #endif /* !__ELF__ */
    111 	pushl	%r1			# pointer to sigcontext
    112 	calls	$1,_C_LABEL(__sigreturn14) # restore previous context
    113 					# we should never return
    114 botch:
    115 	calls	$0,_C_LABEL(longjmperror)
    116 	halt
    117