1*84d9c625SLionel Sambuc/* $NetBSD: __clone.S,v 1.5 2013/07/16 23:00:15 matt 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 Steve C. Woodford. 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/errno.h> 332fe8fb19SBen Gras#include "SYS.h" 342fe8fb19SBen Gras 352fe8fb19SBen Gras#ifdef WEAK_ALIAS 362fe8fb19SBen GrasWEAK_ALIAS(clone, __clone) 372fe8fb19SBen Gras#endif 382fe8fb19SBen Gras 392fe8fb19SBen Gras/* 402fe8fb19SBen Gras * int clone(int (*fn)(void *), void *stack, int flags, void *arg); 412fe8fb19SBen Gras */ 422fe8fb19SBen GrasENTRY(__clone) 43*84d9c625SLionel Sambuc movl 4(%sp),%d0 /* NULL function pointer? */ 442fe8fb19SBen Gras jeq 2f /* Yup, bomb out */ 452fe8fb19SBen Gras movl %d0,%a1 46*84d9c625SLionel Sambuc movl 8(%sp),%d0 /* NULL stack? */ 472fe8fb19SBen Gras jeq 2f /* Yup, bomb out */ 482fe8fb19SBen Gras movl %d0,%a0 49*84d9c625SLionel Sambuc movl 16(%sp),-(%a0) /* Push clone's `arg' on its new stack */ 50*84d9c625SLionel Sambuc lea -12(%a0),%a0 /* Fake syscall args for the clone */ 51*84d9c625SLionel Sambuc movl %a0,-(%sp) /* Syscall arg: stack */ 52*84d9c625SLionel Sambuc movl 16(%sp),-(%sp) /* Syscall arg: flags */ 53*84d9c625SLionel Sambuc clrl -(%sp) /* Fake return address */ 54*84d9c625SLionel Sambuc SYSTRAP(__clone) /* Note: `fn' in (a1) is preserved */ 55*84d9c625SLionel Sambuc lea 12(%sp),%sp /* Zap syscall args */ 562fe8fb19SBen Gras jcs 3f /* Punt if syscall failed */ 572fe8fb19SBen Gras tstl %d0 582fe8fb19SBen Gras jne 1f /* We're the parent, just return. */ 59*84d9c625SLionel Sambuc jsr (%a1) /* We're the clone, call the function */ 60*84d9c625SLionel Sambuc movl %d0,-(%sp) /* If clone returns, invoke _exit(3) */ 612fe8fb19SBen Gras jbsr PIC_PLT(_C_LABEL(_exit)) 622fe8fb19SBen Gras /* NOTREACHED */ 632fe8fb19SBen Gras1: rts 642fe8fb19SBen Gras2: movl #EINVAL,%d0 65*84d9c625SLionel Sambuc3: jbra CERROR 66*84d9c625SLionel SambucEND(__clone) 67