1*4a5d661aSToomas Soome/*- 2*4a5d661aSToomas Soome * Copyright (c) 1990 The Regents of the University of California. 3*4a5d661aSToomas Soome * All rights reserved. 4*4a5d661aSToomas Soome * 5*4a5d661aSToomas Soome * This code is derived from software contributed to Berkeley by 6*4a5d661aSToomas Soome * William Jolitz. 7*4a5d661aSToomas Soome * 8*4a5d661aSToomas Soome * Redistribution and use in source and binary forms, with or without 9*4a5d661aSToomas Soome * modification, are permitted provided that the following conditions 10*4a5d661aSToomas Soome * are met: 11*4a5d661aSToomas Soome * 1. Redistributions of source code must retain the above copyright 12*4a5d661aSToomas Soome * notice, this list of conditions and the following disclaimer. 13*4a5d661aSToomas Soome * 2. Redistributions in binary form must reproduce the above copyright 14*4a5d661aSToomas Soome * notice, this list of conditions and the following disclaimer in the 15*4a5d661aSToomas Soome * documentation and/or other materials provided with the distribution. 16*4a5d661aSToomas Soome * 4. Neither the name of the University nor the names of its contributors 17*4a5d661aSToomas Soome * may be used to endorse or promote products derived from this software 18*4a5d661aSToomas Soome * without specific prior written permission. 19*4a5d661aSToomas Soome * 20*4a5d661aSToomas Soome * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 21*4a5d661aSToomas Soome * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22*4a5d661aSToomas Soome * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23*4a5d661aSToomas Soome * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 24*4a5d661aSToomas Soome * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25*4a5d661aSToomas Soome * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26*4a5d661aSToomas Soome * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27*4a5d661aSToomas Soome * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28*4a5d661aSToomas Soome * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29*4a5d661aSToomas Soome * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30*4a5d661aSToomas Soome * SUCH DAMAGE. 31*4a5d661aSToomas Soome */ 32*4a5d661aSToomas Soome 33*4a5d661aSToomas Soome#if defined(LIBC_SCCS) && !defined(lint) 34*4a5d661aSToomas Soome .asciz "@(#)_setjmp.s 5.1 (Berkeley) 4/23/90" 35*4a5d661aSToomas Soome#endif /* LIBC_SCCS and not lint */ 36*4a5d661aSToomas Soome#include <machine/asm.h> 37*4a5d661aSToomas Soome__FBSDID("$FreeBSD$"); 38*4a5d661aSToomas Soome 39*4a5d661aSToomas Soome/* 40*4a5d661aSToomas Soome * C library -- _setjmp, _longjmp 41*4a5d661aSToomas Soome * 42*4a5d661aSToomas Soome * _longjmp(a,v) 43*4a5d661aSToomas Soome * will generate a "return(v)" from the last call to 44*4a5d661aSToomas Soome * _setjmp(a) 45*4a5d661aSToomas Soome * by restoring registers from the environment 'a'. 46*4a5d661aSToomas Soome * The previous signal state is NOT restored. 47*4a5d661aSToomas Soome */ 48*4a5d661aSToomas Soome 49*4a5d661aSToomas SoomeENTRY(_setjmp) 50*4a5d661aSToomas Soome movq %rdi,%rax 51*4a5d661aSToomas Soome movq 0(%rsp),%rdx /* retval */ 52*4a5d661aSToomas Soome movq %rdx, 0(%rax) /* 0; retval */ 53*4a5d661aSToomas Soome movq %rbx, 8(%rax) /* 1; rbx */ 54*4a5d661aSToomas Soome movq %rsp,16(%rax) /* 2; rsp */ 55*4a5d661aSToomas Soome movq %rbp,24(%rax) /* 3; rbp */ 56*4a5d661aSToomas Soome movq %r12,32(%rax) /* 4; r12 */ 57*4a5d661aSToomas Soome movq %r13,40(%rax) /* 5; r13 */ 58*4a5d661aSToomas Soome movq %r14,48(%rax) /* 6; r14 */ 59*4a5d661aSToomas Soome movq %r15,56(%rax) /* 7; r15 */ 60*4a5d661aSToomas Soome fnstcw 64(%rax) /* 8; fpu cw */ 61*4a5d661aSToomas Soome stmxcsr 68(%rax) /* and mxcsr */ 62*4a5d661aSToomas Soome xorq %rax,%rax 63*4a5d661aSToomas Soome ret 64*4a5d661aSToomas SoomeEND(_setjmp) 65*4a5d661aSToomas Soome 66*4a5d661aSToomas Soome .weak CNAME(_longjmp) 67*4a5d661aSToomas SoomeENTRY(_longjmp) 68*4a5d661aSToomas Soome movq %rdi,%rdx 69*4a5d661aSToomas Soome /* Restore the mxcsr, but leave exception flags intact. */ 70*4a5d661aSToomas Soome stmxcsr -4(%rsp) 71*4a5d661aSToomas Soome movl 68(%rdx),%eax 72*4a5d661aSToomas Soome andl $0xffffffc0,%eax 73*4a5d661aSToomas Soome movl -4(%rsp),%edi 74*4a5d661aSToomas Soome andl $0x3f,%edi 75*4a5d661aSToomas Soome xorl %eax,%edi 76*4a5d661aSToomas Soome movl %edi,-4(%rsp) 77*4a5d661aSToomas Soome ldmxcsr -4(%rsp) 78*4a5d661aSToomas Soome movq %rsi,%rax /* retval */ 79*4a5d661aSToomas Soome movq 0(%rdx),%rcx 80*4a5d661aSToomas Soome movq 8(%rdx),%rbx 81*4a5d661aSToomas Soome movq 16(%rdx),%rsp 82*4a5d661aSToomas Soome movq 24(%rdx),%rbp 83*4a5d661aSToomas Soome movq 32(%rdx),%r12 84*4a5d661aSToomas Soome movq 40(%rdx),%r13 85*4a5d661aSToomas Soome movq 48(%rdx),%r14 86*4a5d661aSToomas Soome movq 56(%rdx),%r15 87*4a5d661aSToomas Soome fldcw 64(%rdx) 88*4a5d661aSToomas Soome testq %rax,%rax 89*4a5d661aSToomas Soome jnz 1f 90*4a5d661aSToomas Soome incq %rax 91*4a5d661aSToomas Soome1: movq %rcx,0(%rsp) 92*4a5d661aSToomas Soome ret 93*4a5d661aSToomas SoomeEND(_longjmp) 94