xref: /minix3/lib/libc/arch/powerpc64/gen/swapcontext.S (revision 0a6a1f1d05b60e214de2f05a7310ddd1f0e590e7)
1*0a6a1f1dSLionel Sambuc/*	$NetBSD: swapcontext.S,v 1.5 2014/08/13 15:41:21 joerg Exp $	*/
22fe8fb19SBen Gras
32fe8fb19SBen Gras/*-
42fe8fb19SBen Gras * Copyright (c) 2001 The NetBSD Foundation, Inc.
52fe8fb19SBen Gras * All rights reserved.
62fe8fb19SBen Gras *
72fe8fb19SBen Gras * This code is derived from software contributed to The NetBSD Foundation
82fe8fb19SBen Gras * by Klaus Klein.
92fe8fb19SBen Gras *
102fe8fb19SBen Gras * Redistribution and use in source and binary forms, with or without
112fe8fb19SBen Gras * modification, are permitted provided that the following conditions
122fe8fb19SBen Gras * are met:
132fe8fb19SBen Gras * 1. Redistributions of source code must retain the above copyright
142fe8fb19SBen Gras *    notice, this list of conditions and the following disclaimer.
152fe8fb19SBen Gras * 2. Redistributions in binary form must reproduce the above copyright
162fe8fb19SBen Gras *    notice, this list of conditions and the following disclaimer in the
172fe8fb19SBen Gras *    documentation and/or other materials provided with the distribution.
182fe8fb19SBen Gras *
192fe8fb19SBen Gras * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
202fe8fb19SBen Gras * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
212fe8fb19SBen Gras * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
222fe8fb19SBen Gras * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
232fe8fb19SBen Gras * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
242fe8fb19SBen Gras * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
252fe8fb19SBen Gras * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
262fe8fb19SBen Gras * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
272fe8fb19SBen Gras * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
282fe8fb19SBen Gras * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
292fe8fb19SBen Gras * POSSIBILITY OF SUCH DAMAGE.
302fe8fb19SBen Gras */
312fe8fb19SBen Gras
322fe8fb19SBen Gras#include "SYS.h"
332fe8fb19SBen Gras
342fe8fb19SBen Gras#if defined(LIBC_SCCS) && !defined(lint)
352fe8fb19SBen Gras	.text
36*0a6a1f1dSLionel Sambuc	.asciz "$NetBSD: swapcontext.S,v 1.5 2014/08/13 15:41:21 joerg Exp $"
372fe8fb19SBen Gras#endif /* LIBC_SCCS && !lint */
382fe8fb19SBen Gras
392fe8fb19SBen GrasENTRY(swapcontext)
402fe8fb19SBen Gras	mc_off	= 56				# offset of uc_mcontext
412fe8fb19SBen Gras	stdu	%r1,-SF_SZ(%r1)			# set up new stack frame
422fe8fb19SBen Gras	mflr	%r0
43*0a6a1f1dSLionel Sambuc	std	%r0,(SF_SZ+SF_LR)(%r1)		# save link register
442fe8fb19SBen Gras	std	%r3,SF_PARAM(%r1)		# must save oucp (was 8)
452fe8fb19SBen Gras	std	%r4,SF_PARAM+8(%r1)		# must save ucp (was 12)
462fe8fb19SBen Gras	bl	._getcontext			# getcontext(oucp)
472fe8fb19SBen Gras	nop
482fe8fb19SBen Gras	cmpdi	%r3,0
492fe8fb19SBen Gras	bne	1f
502fe8fb19SBen Gras	ld	%r11,SF_PARAM(%r1)		# load oucp for adjustment
512fe8fb19SBen Gras	ld	%r0,SF_SZ+SF_LR(%r1)		# get LR back
522fe8fb19SBen Gras	std	%r0,mc_off+34*8(%r11)	# 	pc <- lr
532fe8fb19SBen Gras	la	%r0,16(%r1)
542fe8fb19SBen Gras	std	%r0,mc_off+1*8(%r11)		# adjust sp
552fe8fb19SBen Gras	ld	%r3,SF_PARAM+8(%r1)		# load ucp
56e415d488SLionel Sambuc	bl	PIC_PLT(_C_LABEL(setcontext))	# setcontext(ucp)
572fe8fb19SBen Gras	nop
582fe8fb19SBen Gras1:
592fe8fb19SBen Gras	ld	%r0,SF_SZ+SF_LR(%r1)
602fe8fb19SBen Gras	mtlr	%r0
612fe8fb19SBen Gras	la	%r1,SF_SZ(%r1)
622fe8fb19SBen Gras	blr
63