1 1.3 uwe /* $NetBSD: compat_setjmp.S,v 1.3 2006/01/05 19:21:37 uwe Exp $ */ 2 1.1 uwe 3 1.1 uwe /*- 4 1.1 uwe * Copyright (c) 1990 The Regents of the University of California. 5 1.1 uwe * All rights reserved. 6 1.1 uwe * 7 1.1 uwe * This code is derived from software contributed to Berkeley by 8 1.1 uwe * William Jolitz. 9 1.1 uwe * 10 1.1 uwe * Redistribution and use in source and binary forms, with or without 11 1.1 uwe * modification, are permitted provided that the following conditions 12 1.1 uwe * are met: 13 1.1 uwe * 1. Redistributions of source code must retain the above copyright 14 1.1 uwe * notice, this list of conditions and the following disclaimer. 15 1.1 uwe * 2. Redistributions in binary form must reproduce the above copyright 16 1.1 uwe * notice, this list of conditions and the following disclaimer in the 17 1.1 uwe * documentation and/or other materials provided with the distribution. 18 1.1 uwe * 3. Neither the name of the University nor the names of its contributors 19 1.1 uwe * may be used to endorse or promote products derived from this software 20 1.1 uwe * without specific prior written permission. 21 1.1 uwe * 22 1.1 uwe * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 23 1.1 uwe * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 1.1 uwe * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 1.1 uwe * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 26 1.1 uwe * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 27 1.1 uwe * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 28 1.1 uwe * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 1.1 uwe * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 30 1.1 uwe * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 31 1.1 uwe * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 32 1.1 uwe * SUCH DAMAGE. 33 1.1 uwe * 34 1.1 uwe * from: @(#)setjmp.s 5.1 (Berkeley) 4/23/90 35 1.1 uwe */ 36 1.1 uwe 37 1.1 uwe #include <machine/asm.h> 38 1.2 uwe #include <machine/setjmp.h> 39 1.2 uwe 40 1.1 uwe #if defined(LIBC_SCCS) 41 1.3 uwe RCSID("$NetBSD: compat_setjmp.S,v 1.3 2006/01/05 19:21:37 uwe Exp $") 42 1.1 uwe #endif 43 1.1 uwe 44 1.1 uwe /* 45 1.2 uwe * C library -- setjmp, longjmp 46 1.1 uwe * 47 1.1 uwe * longjmp(a,v) 48 1.1 uwe * will generate a "return(v)" from the last call to 49 1.1 uwe * setjmp(a) 50 1.1 uwe * by restoring registers from the stack. 51 1.1 uwe * The previous signal state is restored. 52 1.1 uwe */ 53 1.1 uwe 54 1.1 uwe ENTRY(setjmp) 55 1.2 uwe PIC_PROLOGUE(.L_got_1) 56 1.2 uwe sts.l pr, @-sp 57 1.2 uwe mov.l r4, @-sp 58 1.2 uwe 59 1.2 uwe mov.l .L_sigblock, r0 60 1.2 uwe 1: CALL r0 /* int mask = sigblock(0); */ 61 1.2 uwe mov #0, r4 62 1.2 uwe 63 1.2 uwe mov.l @sp+, r4 64 1.2 uwe lds.l @sp+, pr 65 1.2 uwe PIC_EPILOGUE 66 1.2 uwe 67 1.2 uwe /* identical to _setjmp except that mask is present */ 68 1.2 uwe add #((_JB_SIGMASK + 1) * 4), r4 69 1.2 uwe mov.l r0, @-r4 /* current mask returned by sigblock */ 70 1.1 uwe mov #1, r0 71 1.2 uwe mov.l r0, @-r4 /* has signal mask */ 72 1.1 uwe mov.l r15, @-r4 73 1.1 uwe mov.l r14, @-r4 74 1.1 uwe mov.l r13, @-r4 75 1.1 uwe mov.l r12, @-r4 76 1.1 uwe mov.l r11, @-r4 77 1.1 uwe mov.l r10, @-r4 78 1.1 uwe mov.l r9, @-r4 79 1.1 uwe mov.l r8, @-r4 80 1.1 uwe sts.l pr, @-r4 81 1.1 uwe rts 82 1.2 uwe xor r0, r0 83 1.1 uwe 84 1.1 uwe .align 2 85 1.2 uwe .L_got_1: PIC_GOT_DATUM 86 1.2 uwe .L_sigblock: CALL_DATUM(_C_LABEL(sigblock), 1b) 87 1.2 uwe SET_ENTRY_SIZE(setjmp) 88 1.2 uwe 89 1.1 uwe 90 1.1 uwe ENTRY(longjmp) 91 1.3 uwe /* we won't return here, so we don't need to save pr and r12 */ 92 1.3 uwe PIC_PROLOGUE_NOSAVE(.L_got_2) 93 1.3 uwe mov.l r5, @-sp 94 1.2 uwe mov.l r4, @-sp 95 1.2 uwe 96 1.2 uwe mov.l .L_sigsetmask, r0 97 1.2 uwe 1: CALL r0 /* sigsetmask(saved mask) */ 98 1.2 uwe mov.l @(_JB_SIGMASK * 4, r4), r4 99 1.2 uwe 100 1.3 uwe mov.l @sp+, r4 101 1.2 uwe mov.l @sp+, r5 102 1.1 uwe 103 1.2 uwe /* identical to _longjmp */ 104 1.1 uwe lds.l @r4+, pr 105 1.1 uwe mov.l @r4+, r8 106 1.1 uwe mov.l @r4+, r9 107 1.1 uwe mov.l @r4+, r10 108 1.1 uwe mov.l @r4+, r11 109 1.1 uwe mov.l @r4+, r12 110 1.1 uwe mov.l @r4+, r13 111 1.1 uwe mov.l @r4+, r14 112 1.1 uwe mov.l @r4+, r15 113 1.2 uwe 114 1.1 uwe mov r5, r0 115 1.2 uwe tst r0, r0 /* make sure return value is non-zero */ 116 1.1 uwe bf .L0 117 1.1 uwe add #1, r0 118 1.1 uwe .L0: 119 1.1 uwe rts 120 1.2 uwe nop 121 1.1 uwe 122 1.1 uwe .align 2 123 1.2 uwe .L_got_2: PIC_GOT_DATUM 124 1.2 uwe .L_sigsetmask: CALL_DATUM(_C_LABEL(sigsetmask), 1b) 125 1.2 uwe SET_ENTRY_SIZE(longjmp) 126