xref: /netbsd-src/lib/libc/arch/hppa/sys/__clone.S (revision e5548b402ae4c44fb816de42c7bba9581ce23ef5)
1/*	$NetBSD: __clone.S,v 1.5 2004/07/18 20:48:04 chs Exp $	*/
2
3/*-
4 * Copyright (c) 2001 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Matt Fredette.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 *    notice, this list of conditions and the following disclaimer in the
17 *    documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 *    must display the following acknowledgement:
20 *        This product includes software developed by the NetBSD
21 *        Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 *    contributors may be used to endorse or promote products derived
24 *    from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39#include <sys/errno.h>
40#include "SYS.h"
41
42#ifdef WEAK_ALIAS
43	WEAK_ALIAS(clone, __clone)
44#endif
45
46	.import	__cerror, code
47
48/*
49 * int clone(int (*fn)(void *), void *stack, int flags, void *arg);
50 */
51ENTRY(__clone, 0)
52
53	/*
54	 * Sanity checks: func and stack may not be NULL.
55	 */
56	ldi	EINVAL, %t1
57	comb,=	%r0, %arg0, __cerror
58	nop
59	comb,=	%r0, %arg1, __cerror
60	nop
61
62	/*
63	 * Put the func and arg arguments into a frame in the child's stack.
64	 */
65	ldo	(HPPA_FRAME_SIZE * 2)(%arg1), %arg1
66	stw	%arg0, HPPA_FRAME_ARG(0)(%arg1)
67	stw	%arg3, HPPA_FRAME_ARG(1)(%arg1)
68
69	/*
70	 * The system call expects (flags, stack).
71	 */
72	copy	%arg2, %arg0
73	SYSCALL(__clone)
74	comb,<>,n %r0, %ret1, 9f
75	bv,n	%r0(%rp)
76
779:	/*
78	 * Child: Reload the function and argument from the new stack.
79	 */
80	ldw	HPPA_FRAME_ARG(0)(%sp), %r22
81	ldw	HPPA_FRAME_ARG(1)(%sp), %arg0
82
83	/* Call the clone's entry point. */
84	stw	%r19, HPPA_FRAME_ARG(2)(%sp)
85	bl	$$dyncall, %r31
86	copy	%r31, %rp
87	ldw	HPPA_FRAME_ARG(2)(%sp), %r19
88
89	/* Pass the return value to _exit(). */
90	copy	%ret0, %arg0
91	PIC_CALL(_exit)
92
93	/* NOTREACHED */
94EXIT(__clone)
95