swapcontext.S revision 1.12
1 1.12 uwe /* $NetBSD: swapcontext.S,v 1.12 2015/04/06 01:50:46 uwe Exp $ */ 2 1.2 thorpej 3 1.2 thorpej /*- 4 1.2 thorpej * Copyright (c) 2001 The NetBSD Foundation, Inc. 5 1.2 thorpej * All rights reserved. 6 1.2 thorpej * 7 1.2 thorpej * This code is derived from software contributed to The NetBSD Foundation 8 1.2 thorpej * by Klaus Klein. 9 1.2 thorpej * 10 1.2 thorpej * Redistribution and use in source and binary forms, with or without 11 1.2 thorpej * modification, are permitted provided that the following conditions 12 1.2 thorpej * are met: 13 1.2 thorpej * 1. Redistributions of source code must retain the above copyright 14 1.2 thorpej * notice, this list of conditions and the following disclaimer. 15 1.2 thorpej * 2. Redistributions in binary form must reproduce the above copyright 16 1.2 thorpej * notice, this list of conditions and the following disclaimer in the 17 1.2 thorpej * documentation and/or other materials provided with the distribution. 18 1.2 thorpej * 19 1.2 thorpej * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 1.2 thorpej * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 1.2 thorpej * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 1.2 thorpej * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 1.2 thorpej * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 1.2 thorpej * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 1.2 thorpej * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 1.2 thorpej * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 1.2 thorpej * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 1.2 thorpej * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 1.2 thorpej * POSSIBILITY OF SUCH DAMAGE. 30 1.2 thorpej */ 31 1.2 thorpej 32 1.2 thorpej #include <machine/asm.h> 33 1.2 thorpej #if defined(SYSLIBC_SCCS) && !defined(lint) 34 1.12 uwe RCSID("$NetBSD: swapcontext.S,v 1.12 2015/04/06 01:50:46 uwe Exp $") 35 1.2 thorpej #endif /* SYSLIBC_SCCS and not lint */ 36 1.2 thorpej 37 1.4 uwe /* 38 1.4 uwe * int 39 1.4 uwe * swapcontext(ucontext_t * restrict oucp, ucontext_t * restrict ucp); 40 1.4 uwe */ 41 1.2 thorpej ENTRY(swapcontext) 42 1.7 uwe PIC_PROLOGUE(.L_got) 43 1.4 uwe sts.l pr, @-sp 44 1.6 uwe 45 1.4 uwe mov.l .L__getcontext, r0 46 1.12 uwe mov.l r5, @-sp 47 1.12 uwe 1: CALL r0 ! _getcontext(oucp) 48 1.4 uwe mov.l r4, @-sp 49 1.12 uwe !! getcontext captures oucp resuming here with r12 (when PIC), 50 1.12 uwe !! pr, r5 and r4 pushed onto the stack 51 1.12 uwe 52 1.2 thorpej tst r0, r0 53 1.12 uwe bf.s 3f ! return error from getcontext 54 1.12 uwe mov.l @sp, r1 ! saved oucp 55 1.4 uwe 56 1.12 uwe !! adjust oucp to resume after setcontext below 57 1.12 uwe mova 3f, r0 58 1.12 uwe mov.l r0, @(36 + 1 * 4, r1) ! _UC_MACHINE_SET_PC(oucp, pr) 59 1.11 uwe 60 1.4 uwe mov.l .L_setcontext, r2 61 1.12 uwe 2: CALL r2 ! setcontext(ucp) 62 1.12 uwe mov.l @(4, sp), r4 ! saved ucp 63 1.12 uwe 64 1.12 uwe .align 2 65 1.12 uwe 3: !! we get here on errors and when resuming oucp 66 1.12 uwe add #8, sp ! skip r4 and r5 67 1.4 uwe lds.l @sp+, pr 68 1.2 thorpej rts 69 1.12 uwe PIC_EPILOGUE_SLOT 70 1.2 thorpej 71 1.2 thorpej .align 2 72 1.6 uwe .L_got: PIC_GOT_DATUM 73 1.6 uwe .L__getcontext: CALL_DATUM(_C_LABEL(_getcontext), 1b) 74 1.6 uwe .L_setcontext: CALL_DATUM(_C_LABEL(setcontext), 2b) 75 1.8 uwe SET_ENTRY_SIZE(swapcontext) 76
Indexes created Mon Sep 29 15:09:53 GMT 2025