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