swapcontext.S revision 1.5 1 1.5 joerg /* $NetBSD: swapcontext.S,v 1.5 2014/08/13 15:41:21 joerg Exp $ */
2 1.1 ross
3 1.1 ross /*-
4 1.1 ross * Copyright (c) 2001 The NetBSD Foundation, Inc.
5 1.1 ross * All rights reserved.
6 1.1 ross *
7 1.1 ross * This code is derived from software contributed to The NetBSD Foundation
8 1.1 ross * by Klaus Klein.
9 1.1 ross *
10 1.1 ross * Redistribution and use in source and binary forms, with or without
11 1.1 ross * modification, are permitted provided that the following conditions
12 1.1 ross * are met:
13 1.1 ross * 1. Redistributions of source code must retain the above copyright
14 1.1 ross * notice, this list of conditions and the following disclaimer.
15 1.1 ross * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 ross * notice, this list of conditions and the following disclaimer in the
17 1.1 ross * documentation and/or other materials provided with the distribution.
18 1.1 ross *
19 1.1 ross * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.1 ross * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.1 ross * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.1 ross * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.1 ross * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.1 ross * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.1 ross * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.1 ross * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.1 ross * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.1 ross * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.1 ross * POSSIBILITY OF SUCH DAMAGE.
30 1.1 ross */
31 1.1 ross
32 1.1 ross #include "SYS.h"
33 1.1 ross
34 1.1 ross #if defined(LIBC_SCCS) && !defined(lint)
35 1.1 ross .text
36 1.5 joerg .asciz "$NetBSD: swapcontext.S,v 1.5 2014/08/13 15:41:21 joerg Exp $"
37 1.1 ross #endif /* LIBC_SCCS && !lint */
38 1.1 ross
39 1.1 ross ENTRY(swapcontext)
40 1.2 ross mc_off = 56 # offset of uc_mcontext
41 1.1 ross stdu %r1,-SF_SZ(%r1) # set up new stack frame
42 1.1 ross mflr %r0
43 1.5 joerg std %r0,(SF_SZ+SF_LR)(%r1) # save link register
44 1.2 ross std %r3,SF_PARAM(%r1) # must save oucp (was 8)
45 1.2 ross std %r4,SF_PARAM+8(%r1) # must save ucp (was 12)
46 1.2 ross bl ._getcontext # getcontext(oucp)
47 1.1 ross nop
48 1.1 ross cmpdi %r3,0
49 1.1 ross bne 1f
50 1.1 ross ld %r11,SF_PARAM(%r1) # load oucp for adjustment
51 1.2 ross ld %r0,SF_SZ+SF_LR(%r1) # get LR back
52 1.2 ross std %r0,mc_off+34*8(%r11) # pc <- lr
53 1.1 ross la %r0,16(%r1)
54 1.2 ross std %r0,mc_off+1*8(%r11) # adjust sp
55 1.4 manu ld %r3,SF_PARAM+8(%r1) # load ucp
56 1.4 manu bl PIC_PLT(_C_LABEL(setcontext)) # setcontext(ucp)
57 1.2 ross nop
58 1.1 ross 1:
59 1.1 ross ld %r0,SF_SZ+SF_LR(%r1)
60 1.1 ross mtlr %r0
61 1.1 ross la %r1,SF_SZ(%r1)
62 1.1 ross blr
63