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