1/* $NetBSD: __clone.S,v 1.1 2001/07/22 17:18:25 tsubai Exp $ */ 2 3/*- 4 * Copyright (c) 2001 Tsubai Masanari. All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. The name of the author may not be used to endorse or promote products 15 * derived from this software without specific prior written permission. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29#include <sys/errno.h> 30#include "SYS.h" 31 32#ifdef WEAK_ALIAS 33WEAK_ALIAS(clone,__clone) 34#endif 35 36/* 37 * int __clone(int (*fn)(void *), void *stack, int flags, void *arg); 38 */ 39ENTRY(__clone) 40 /* 41 * Sanity checks: func and stack may not be NULL. 42 */ 43 tst r4, r4 44 bt inval 45 tst r5, r5 46 bt inval 47 48 mov r4, r2 49 mov r6, r4 50 mov.l LSYS___clone, r0 51 trapa #0x80 52 bf err 53 54 tst r0, r0 55 bf 1f /* We're the parent, just return. */ 56 57 jsr @r2 /* Call the clone's entry point. */ 58 mov r7, r4 /* arg */ 59 60 mov.l L__exit, r1 61 jsr @r1 62 mov r0, r4 63 64inval: 65 mov #EINVAL, r0 66err: 67 mov.l Lcerror, r1 68 jmp @r1 69 nop 701: 71 rts 72 nop 73 74 .align 2 75LSYS___clone: 76 .long SYS___clone 77L__exit: 78 .long _C_LABEL(_exit) 79Lcerror: 80 .long cerror 81