__clone.S revision 1.3.2.2 1 1.3.2.2 nathanw /* $NetBSD: __clone.S,v 1.3.2.2 2001/10/08 20:17:49 nathanw Exp $ */
2 1.3.2.2 nathanw
3 1.3.2.2 nathanw /*-
4 1.3.2.2 nathanw * Copyright (c) 2001 The NetBSD Foundation, Inc.
5 1.3.2.2 nathanw * All rights reserved.
6 1.3.2.2 nathanw *
7 1.3.2.2 nathanw * This code is derived from software contributed to The NetBSD Foundation
8 1.3.2.2 nathanw * by Jason R. Thorpe.
9 1.3.2.2 nathanw *
10 1.3.2.2 nathanw * Redistribution and use in source and binary forms, with or without
11 1.3.2.2 nathanw * modification, are permitted provided that the following conditions
12 1.3.2.2 nathanw * are met:
13 1.3.2.2 nathanw * 1. Redistributions of source code must retain the above copyright
14 1.3.2.2 nathanw * notice, this list of conditions and the following disclaimer.
15 1.3.2.2 nathanw * 2. Redistributions in binary form must reproduce the above copyright
16 1.3.2.2 nathanw * notice, this list of conditions and the following disclaimer in the
17 1.3.2.2 nathanw * documentation and/or other materials provided with the distribution.
18 1.3.2.2 nathanw * 3. All advertising materials mentioning features or use of this software
19 1.3.2.2 nathanw * must display the following acknowledgement:
20 1.3.2.2 nathanw * This product includes software developed by the NetBSD
21 1.3.2.2 nathanw * Foundation, Inc. and its contributors.
22 1.3.2.2 nathanw * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.3.2.2 nathanw * contributors may be used to endorse or promote products derived
24 1.3.2.2 nathanw * from this software without specific prior written permission.
25 1.3.2.2 nathanw *
26 1.3.2.2 nathanw * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.3.2.2 nathanw * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.3.2.2 nathanw * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.3.2.2 nathanw * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.3.2.2 nathanw * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.3.2.2 nathanw * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.3.2.2 nathanw * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.3.2.2 nathanw * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.3.2.2 nathanw * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.3.2.2 nathanw * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.3.2.2 nathanw * POSSIBILITY OF SUCH DAMAGE.
37 1.3.2.2 nathanw */
38 1.3.2.2 nathanw
39 1.3.2.2 nathanw #include <sys/errno.h>
40 1.3.2.2 nathanw
41 1.3.2.2 nathanw #include "SYS.h"
42 1.3.2.2 nathanw
43 1.3.2.2 nathanw #ifdef WEAK_ALIAS
44 1.3.2.2 nathanw WEAK_ALIAS(clone, __clone)
45 1.3.2.2 nathanw #endif
46 1.3.2.2 nathanw
47 1.3.2.2 nathanw /*
48 1.3.2.2 nathanw * int __clone(int (*fn)(void *), void *stack, int flags, void *arg);
49 1.3.2.2 nathanw */
50 1.3.2.2 nathanw LEAF(__clone)
51 1.3.2.2 nathanw PIC_PROLOGUE(__clone, t9)
52 1.3.2.2 nathanw
53 1.3.2.2 nathanw /*
54 1.3.2.2 nathanw * Sanity checks: func and stack may not be NULL.
55 1.3.2.2 nathanw */
56 1.3.2.2 nathanw li v0, EINVAL
57 1.3.2.2 nathanw beq a0, zero, 9f
58 1.3.2.2 nathanw beq a1, zero, 9f
59 1.3.2.2 nathanw
60 1.3.2.2 nathanw /*
61 1.3.2.2 nathanw * We need to be able to get at the func and arg arguments
62 1.3.2.2 nathanw * in the child. Luckily, we have a convenient place to
63 1.3.2.2 nathanw * do this; the child's stack.
64 1.3.2.2 nathanw */
65 1.3.2.2 nathanw subu a1, a1, (2 * SZREG)
66 1.3.2.2 nathanw REG_S a0, 0(a1)
67 1.3.2.2 nathanw REG_S a3, SZREG(a1)
68 1.3.2.2 nathanw
69 1.3.2.2 nathanw /*
70 1.3.2.2 nathanw * The system call expects (flags, stack).
71 1.3.2.2 nathanw */
72 1.3.2.2 nathanw move a0, a2
73 1.3.2.2 nathanw SYSTRAP(__clone)
74 1.3.2.2 nathanw bne a3, zero, 8f
75 1.3.2.2 nathanw
76 1.3.2.2 nathanw bne v1, zero, 9f # v1 (rv[1]) == 0, parent, child pid in v0
77 1.3.2.2 nathanw
78 1.3.2.2 nathanw j ra # parent return
79 1.3.2.2 nathanw
80 1.3.2.2 nathanw 8: PIC_CALL(__cerror, t9)
81 1.3.2.2 nathanw /* NOTREACHED */
82 1.3.2.2 nathanw
83 1.3.2.2 nathanw 9: /*
84 1.3.2.2 nathanw * Child: Fetch the function and argument from the new stack,
85 1.3.2.2 nathanw * and pop it back.
86 1.3.2.2 nathanw */
87 1.3.2.2 nathanw REG_L t9, 0(sp)
88 1.3.2.2 nathanw REG_L a0, SZREG(sp)
89 1.3.2.2 nathanw addu sp, sp, (2 * SZREG)
90 1.3.2.2 nathanw
91 1.3.2.2 nathanw #ifdef ABICALLS
92 1.3.2.2 nathanw .cprestore
93 1.3.2.2 nathanw #endif
94 1.3.2.2 nathanw
95 1.3.2.2 nathanw /* Call the clone's entry point. */
96 1.3.2.2 nathanw jal t9
97 1.3.2.2 nathanw
98 1.3.2.2 nathanw /* Pass the return value to _exit(). */
99 1.3.2.2 nathanw move a0, v0
100 1.3.2.2 nathanw PIC_CALL(_exit, t9)
101 1.3.2.2 nathanw
102 1.3.2.2 nathanw /* NOTREACHED */
103 1.3.2.2 nathanw END(__clone)
104