/* $NetBSD: setjmp.S,v 1.10.88.1 2024/08/23 16:59:52 martin Exp $ */ /*- * Copyright (c) 1990 The Regents of the University of California. * All rights reserved. * * This code is derived from software contributed to Berkeley by * William Jolitz. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * from: @(#)setjmp.s 5.1 (Berkeley) 4/23/90 */ #include #include #if defined(LIBC_SCCS) RCSID("$NetBSD: setjmp.S,v 1.10.88.1 2024/08/23 16:59:52 martin Exp $") #endif /* * C library -- setjmp, longjmp * * longjmp(a,v) * will generate a "return(v)" from the last call to * setjmp(a) * by restoring registers from the stack. * The previous signal state is restored. */ ENTRY(__setjmp14) PIC_PROLOGUE(.L_got_1) sts.l pr, @-sp mov.l r4, @-sp mov.l .L___sigprocmask14_1, r0 mov r4, r6 mov #1, r4 /* how = SIG_BLOCK */ mov #0, r5 /* new = NULL */ 1: CALL r0 add #(_JB_SIGMASK * 4), r6 /* old = &sigmask */ mov.l @sp+, r4 lds.l @sp+, pr PIC_EPILOGUE /* identical to _setjmp except that _JB_HAS_MASK is non-zero */ add #((_JB_HAS_MASK + 1) * 4), r4 mov #1, r0 mov.l r0, @-r4 /* has signal mask */ mov.l r15, @-r4 mov.l r14, @-r4 mov.l r13, @-r4 mov.l r12, @-r4 mov.l r11, @-r4 mov.l r10, @-r4 mov.l r9, @-r4 mov.l r8, @-r4 sts.l pr, @-r4 rts xor r0, r0 .align 2 .L_got_1: PIC_GOT_DATUM .L___sigprocmask14_1: CALL_DATUM(_C_LABEL(__sigprocmask14), 1b) SET_ENTRY_SIZE(__setjmp14) ENTRY(__longjmp14) // return value can't be zero, adjust to 1 if it is tst r5, r5 bf/s 0f mov.l @(_JB_REG_PR * 4, r4), r0 mov #1, r5 0: // restore context first (callee-saved regs) mov.l @(_JB_REG_R8 * 4, r4), r8 mov.l @(_JB_REG_R9 * 4, r4), r9 mov.l @(_JB_REG_R10 * 4, r4), r10 mov.l @(_JB_REG_R11 * 4, r4), r11 mov.l @(_JB_REG_R12 * 4, r4), r12 mov.l @(_JB_REG_R13 * 4, r4), r13 mov.l @(_JB_REG_R14 * 4, r4), r14 mov.l @(_JB_REG_R15 * 4, r4), r15 // create a frame mov.l r5, @-sp // future return value (pre-adjusted) mov.l r0, @-sp // caller's PR from the jumpbuf PIC_PROLOGUE(.L_got_2) // restore signal mask from &a[_JB_SIGMASK] mov #0, r6 // oset = NULL mov r4, r5 mov.l .L___sigprocmask14_2, r0 add #(_JB_SIGMASK * 4), r5 // set = &a[_JB_SIGMASK] 1: CALL r0 mov #3, r4 // how = SIG_SETMASK // return "from" setjmp PIC_EPILOGUE lds.l @sp+, pr rts mov.l @sp+, r0 .align 2 .L_got_2: PIC_GOT_DATUM .L___sigprocmask14_2: CALL_DATUM(_C_LABEL(__sigprocmask14), 1b) SET_ENTRY_SIZE(__longjmp14)