1*2fe8fb19SBen Gras/* $NetBSD: __clone.S,v 1.7 2008/04/28 20:22:57 martin Exp $ */ 2*2fe8fb19SBen Gras 3*2fe8fb19SBen Gras/*- 4*2fe8fb19SBen Gras * Copyright (c) 2001 The NetBSD Foundation, Inc. 5*2fe8fb19SBen Gras * All rights reserved. 6*2fe8fb19SBen Gras * 7*2fe8fb19SBen Gras * This code is derived from software contributed to The NetBSD Foundation 8*2fe8fb19SBen Gras * by Jason R. Thorpe. 9*2fe8fb19SBen Gras * 10*2fe8fb19SBen Gras * Redistribution and use in source and binary forms, with or without 11*2fe8fb19SBen Gras * modification, are permitted provided that the following conditions 12*2fe8fb19SBen Gras * are met: 13*2fe8fb19SBen Gras * 1. Redistributions of source code must retain the above copyright 14*2fe8fb19SBen Gras * notice, this list of conditions and the following disclaimer. 15*2fe8fb19SBen Gras * 2. Redistributions in binary form must reproduce the above copyright 16*2fe8fb19SBen Gras * notice, this list of conditions and the following disclaimer in the 17*2fe8fb19SBen Gras * documentation and/or other materials provided with the distribution. 18*2fe8fb19SBen Gras * 19*2fe8fb19SBen Gras * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20*2fe8fb19SBen Gras * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21*2fe8fb19SBen Gras * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22*2fe8fb19SBen Gras * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23*2fe8fb19SBen Gras * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24*2fe8fb19SBen Gras * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25*2fe8fb19SBen Gras * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26*2fe8fb19SBen Gras * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27*2fe8fb19SBen Gras * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28*2fe8fb19SBen Gras * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29*2fe8fb19SBen Gras * POSSIBILITY OF SUCH DAMAGE. 30*2fe8fb19SBen Gras */ 31*2fe8fb19SBen Gras 32*2fe8fb19SBen Gras#include <sys/errno.h> 33*2fe8fb19SBen Gras 34*2fe8fb19SBen Gras#include "SYS.h" 35*2fe8fb19SBen Gras 36*2fe8fb19SBen Gras#ifdef WEAK_ALIAS 37*2fe8fb19SBen GrasWEAK_ALIAS(clone, __clone) 38*2fe8fb19SBen Gras#endif 39*2fe8fb19SBen Gras 40*2fe8fb19SBen Gras/* 41*2fe8fb19SBen Gras * int __clone(int (*fn)(void *), void *stack, int flags, void *arg); 42*2fe8fb19SBen Gras */ 43*2fe8fb19SBen GrasENTRY(__clone) 44*2fe8fb19SBen Gras save %sp, -CC64FSZ, %sp 45*2fe8fb19SBen Gras 46*2fe8fb19SBen Gras /* 47*2fe8fb19SBen Gras * Sanity checks: func and stack may not be NULL. 48*2fe8fb19SBen Gras */ 49*2fe8fb19SBen Gras brz,pn %i0,8f ! func == NULL, bail 50*2fe8fb19SBen Gras orcc %i1, %g0, %o1 ! setup stack arg for syscall, test 51*2fe8fb19SBen Gras bz,pn %xcc, 8f ! stack == NULL, bail 52*2fe8fb19SBen Gras mov %i2, %o0 ! setup flags arg for syscall 53*2fe8fb19SBen Gras 54*2fe8fb19SBen Gras /* 55*2fe8fb19SBen Gras * Allocate "caller's" frame in the child stack as ABI 56*2fe8fb19SBen Gras * requires. Subtract BIAS - it will be 64-bit code. 57*2fe8fb19SBen Gras * 58*2fe8fb19SBen Gras * We pass the function and the argument to the child by 59*2fe8fb19SBen Gras * stashing them at the bottom of the frame. There they are 60*2fe8fb19SBen Gras * safe from window spill would we need to take one as it's 61*2fe8fb19SBen Gras * below the window save area. 62*2fe8fb19SBen Gras */ 63*2fe8fb19SBen Gras sub %o1, CC64FSZ+BIAS, %o1 ! make space 64*2fe8fb19SBen Gras stx %i0, [%o1+CC64FSZ-16+BIAS] ! save func 65*2fe8fb19SBen Gras stx %i3, [%o1+CC64FSZ-8+BIAS] ! save arg 66*2fe8fb19SBen Gras 67*2fe8fb19SBen Gras /* 68*2fe8fb19SBen Gras * Args are now set up for system call as (flags, stack). 69*2fe8fb19SBen Gras */ 70*2fe8fb19SBen Gras mov SYS___clone, %g1 71*2fe8fb19SBen Gras t ST_SYSCALL 72*2fe8fb19SBen Gras bcs,pn %xcc, 9f 73*2fe8fb19SBen Gras tst %o1 ! %o1 (rv[1]) == 0 in parent 74*2fe8fb19SBen Gras bz %xcc, 2f ! yes, parent 75*2fe8fb19SBen Gras ldx [%sp+CC64FSZ-16+BIAS], %l0 ! grab the function... 76*2fe8fb19SBen Gras call %l0 ! Call the clone's entry point. 77*2fe8fb19SBen Gras ldx [%sp+CC64FSZ-8+BIAS], %o0 ! ...and the argument 78*2fe8fb19SBen Gras 79*2fe8fb19SBen Gras JUMP(_exit) 80*2fe8fb19SBen Gras /* NOTREACHED */ 81*2fe8fb19SBen Gras 82*2fe8fb19SBen Gras2: ret 83*2fe8fb19SBen Gras restore %g0, %o0, %o0 84*2fe8fb19SBen Gras 85*2fe8fb19SBen Gras8: restore %g0, EINVAL, %o0 86*2fe8fb19SBen Gras ERROR() 87*2fe8fb19SBen Gras /* NOTREACHED */ 88*2fe8fb19SBen Gras 89*2fe8fb19SBen Gras9: restore %o0, %g0, %o0 90*2fe8fb19SBen Gras ERROR() 91*2fe8fb19SBen Gras /* NOTREACHED */ 92