setjmp.S revision 1.10
11.10Smartin/* $NetBSD: setjmp.S,v 1.10 2006/12/28 10:02:43 martin Exp $ */ 21.4Schristos 31.1Scgd/* 41.1Scgd * Copyright (c) 1992, 1993 51.1Scgd * The Regents of the University of California. All rights reserved. 61.1Scgd * 71.1Scgd * This software was developed by the Computer Systems Engineering group 81.1Scgd * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and 91.1Scgd * contributed to Berkeley. 101.1Scgd * 111.1Scgd * Redistribution and use in source and binary forms, with or without 121.1Scgd * modification, are permitted provided that the following conditions 131.1Scgd * are met: 141.1Scgd * 1. Redistributions of source code must retain the above copyright 151.1Scgd * notice, this list of conditions and the following disclaimer. 161.1Scgd * 2. Redistributions in binary form must reproduce the above copyright 171.1Scgd * notice, this list of conditions and the following disclaimer in the 181.1Scgd * documentation and/or other materials provided with the distribution. 191.8Sagc * 3. Neither the name of the University nor the names of its contributors 201.1Scgd * may be used to endorse or promote products derived from this software 211.1Scgd * without specific prior written permission. 221.1Scgd * 231.1Scgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 241.1Scgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 251.1Scgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 261.1Scgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 271.1Scgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 281.1Scgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 291.1Scgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 301.1Scgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 311.1Scgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 321.1Scgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 331.1Scgd * SUCH DAMAGE. 341.1Scgd * 351.1Scgd * from: Header: setjmp.s,v 1.2 92/06/25 03:18:43 torek Exp 361.1Scgd */ 371.1Scgd 381.4Schristos#include <machine/asm.h> 391.1Scgd#if defined(LIBC_SCCS) && !defined(lint) 401.4Schristos#if 0 411.1Scgd .asciz "@(#)setjmp.s 8.1 (Berkeley) 6/4/93" 421.4Schristos#else 431.10Smartin RCSID("$NetBSD: setjmp.S,v 1.10 2006/12/28 10:02:43 martin Exp $") 441.4Schristos#endif 451.1Scgd#endif /* LIBC_SCCS and not lint */ 461.1Scgd 471.1Scgd/* 481.1Scgd * C library -- setjmp, longjmp 491.1Scgd * 501.1Scgd * longjmp(a,v) 511.1Scgd * will generate a "return(v)" from 521.1Scgd * the last call to 531.1Scgd * setjmp(a) 541.1Scgd * by restoring registers from the stack, 551.1Scgd * and a struct sigcontext, see <signal.h> 561.1Scgd */ 571.1Scgd 581.1Scgd#include "SYS.h" 591.1Scgd 601.9SuweENTRY(__setjmp14) 611.10Smartin save %sp, -CCFSZ, %sp 621.9Suwe#ifdef PIC 631.9Suwe PIC_PROLOGUE(%l0,%o0) ! %l0 = _GLOBAL_OFFSET_TABLE 641.9Suwe#endif 651.1Scgd /* 661.9Suwe * local vars on stack: struct sigstack foo @ offset 0x48 671.9Suwe * Note: sc_g1 is not used; sc_o0 is set in longjmp() 681.1Scgd */ 691.9Suwe#ifdef PIC 701.9Suwe ld [%l0 + _C_LABEL(__sigprocmask14)], %g2 711.9Suwe#endif 721.1Scgd mov 1, %o0 /* SIG_BLOCK */ 731.9Suwe add %i0, 32, %o2 /* build sigcontext sc.sc_mask */ 741.9Suwe#ifdef PIC 751.9Suwe call %g2 761.9Suwe#else 771.9Suwe call _C_LABEL(__sigprocmask14) 781.9Suwe#endif 791.9Suwe clr %o1 /* sigprocmask(SIG_BLOCK, NULL, &sc.sc_mask) */ 801.9Suwe 811.9Suwe#ifdef PIC 821.9Suwe ld [%l0 + _C_LABEL(__sigaltstack14)], %g2 831.9Suwe#endif 841.1Scgd add %sp, 0x48, %o1 /* (foo being in arg dump area) */ 851.9Suwe#ifdef PIC 861.9Suwe call %g2 871.9Suwe#else 881.9Suwe call _C_LABEL(__sigaltstack14) 891.9Suwe#endif 901.9Suwe clr %o0 /* sigstack(NULL, &foo) */ 911.9Suwe 921.9Suwe ld [%sp + 0x48 + 8], %o0 /* foo.ss_flags */ 931.1Scgd and %o0, 1, %o1 /* onstack = foo.ss_flags & 1; */ 941.9Suwe st %o1, [%i0 + 0] /* sc.sc_onstack = current onstack; */ 951.9Suwe st %fp, [%i0 + 8] /* sc.sc_sp = (caller's) sp */ 961.9Suwe add %i7, 8, %o0 971.9Suwe st %o0, [%i0 + 12] /* sc.sc_pc = return_pc */ 981.9Suwe add %i7, 12, %o0 991.9Suwe st %o0, [%i0 + 16] /* sc.sc_npc = return_pc + 4 */ 1001.9Suwe st %g0, [%i0 + 20] /* sc.sc_psr = (clean psr) */ 1011.9Suwe ret /* return 0 */ 1021.9Suwe restore %g0, %g0, %o0 1031.1Scgd 104