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