about summary refs log tree commit diff
path: root/sysdeps/unix/sysv/linux/ia64/clone2.S
blob: f35c6703f5fba7673cf3cbc7d1f7bf84562d8a0b (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
/* Copyright (C) 2000, 2001, 2003 Free Software Foundation, Inc.
   This file is part of the GNU C Library.

   The GNU C Library is free software; you can redistribute it and/or
   modify it under the terms of the GNU Lesser General Public
   License as published by the Free Software Foundation; either
   version 2.1 of the License, or (at your option) any later version.

   The GNU C Library is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   Lesser General Public License for more details.

   You should have received a copy of the GNU Lesser General Public
   License along with the GNU C Library; if not, write to the Free
   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
   02111-1307 USA.  */


#include <sysdep.h>
#include <asm/errno.h>


/* int  __clone2(int (*fn) (void *arg), void *child_stack_base, 	*/
/* 	         size_t child_stack_size, int flags, void *arg,		*/
/*	         pid_t *child_tid, pid_t *parent_tid, void *tls) */

ENTRY(__clone2)
	alloc r2=ar.pfs,8,2,6,0
	cmp.eq p6,p0=0,in0
	mov r8=EINVAL
(p6)	br.cond.spnt.few __syscall_error
	;;
	flushrs			/* This is necessary, since the child	*/
				/* will be running with the same 	*/
				/* register backing store for a few 	*/
				/* instructions.  We need to ensure	*/
				/* that it will not read or write the	*/
				/* backing store.			*/
	mov loc0=in0		/* save fn	*/
	mov loc1=in4		/* save arg	*/
	mov out0=in3		/* Flags are first syscall argument.	*/
	mov out1=in1		/* Stack address.			*/
	mov out2=in2		/* Stack size.				*/
	mov out3=in5		/* Child TID Pointer			*/
	mov out4=in6		/* Parent TID Pointer			*/
 	mov out5=in7		/* TLS pointer				*/
        DO_CALL (SYS_ify (clone2))
        cmp.eq p6,p0=-1,r10
	;;
(p6)	br.cond.spnt.few __syscall_error

#	define CHILD p6
#	define PARENT p7
	cmp.eq CHILD,PARENT=0,r8 /* Are we the child?	*/
	;;
(CHILD)	ld8 out1=[loc0],8	/* Retrieve code pointer.	*/
(CHILD)	mov out0=loc1		/* Pass proper argument	to fn */
(PARENT) ret
	;;
	ld8 gp=[loc0]		/* Load function gp.		*/
	mov b6=out1
	;;
	br.call.dptk.few rp=b6	/* Call fn(arg) in the child 	*/
	;;
	mov out0=r8		/* Argument to _exit		*/
	.globl _exit
	br.call.dpnt.few rp=_exit /* call _exit with result from fn.	*/
	ret			/* Not reached.		*/

PSEUDO_END(__clone2)

/* For now we leave __clone undefined.  This is unlikely to be a	*/
/* problem, since at least the i386 __clone in glibc always failed	*/
/* with a 0 sp (eventhough the kernel explicitly handled it).		*/
/* Thus all such calls needed to pass an explicit sp, and as a result,	*/
/* would be unlikely to work on ia64.					*/