mirror of
				https://sourceware.org/git/glibc.git
				synced 2025-11-03 20:53:13 +03:00 
			
		
		
		
	
		
			
				
	
	
		
			76 lines
		
	
	
		
			2.5 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			76 lines
		
	
	
		
			2.5 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
/* Copyright (C) 2000-2014 Free Software Foundation, Inc.
 | 
						|
   This file is part of the GNU C Library.
 | 
						|
   Contributed by Martin Schwidefsky (schwidefsky@de.ibm.com).
 | 
						|
 | 
						|
   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, see
 | 
						|
   <http://www.gnu.org/licenses/>.  */
 | 
						|
 | 
						|
/* clone is even more special than fork as it mucks with stacks
 | 
						|
   and invokes a function in the right context after its all over.  */
 | 
						|
 | 
						|
#include <sysdep.h>
 | 
						|
#include <tls.h>
 | 
						|
#define _ERRNO_H	1
 | 
						|
#include <bits/errno.h>
 | 
						|
 | 
						|
/* int __clone(int (*fn)(void *arg), void *child_stack, int flags, void *arg,
 | 
						|
               pid_t *parent_tid, void *tls, pid_t *child_tid);  */
 | 
						|
/* sys_clone  (void *child_stack, unsigned long flags,
 | 
						|
               pid_t *parent_tid, pid_t *child_tid, void *tls);  */
 | 
						|
 | 
						|
	.text
 | 
						|
ENTRY(__clone)
 | 
						|
	st	%r6,24(%r15)		/* store %r6 to save area */
 | 
						|
	cfi_offset (%r6, -72)
 | 
						|
	lr	%r0,%r5			/* move *arg out of the way */
 | 
						|
	ltr     %r1,%r2			/* check fn and move to %r1 */
 | 
						|
	jz      error			/* no NULL function pointers */
 | 
						|
	ltr     %r2,%r3			/* check child_stack and move to %r2 */
 | 
						|
	jz	error			/* no NULL stack pointers */
 | 
						|
	lr	%r3,%r4			/* move flags to %r3 */
 | 
						|
	lr	%r4,%r6			/* move parent_tid to %r4 */
 | 
						|
	l	%r5,100(%r15)		/* load child_tid from stack */
 | 
						|
	l	%r6,96(%r15)		/* load tls from stack */
 | 
						|
	svc	SYS_ify(clone)
 | 
						|
	ltr	%r2,%r2			/* check return code */
 | 
						|
	jz	thread_start
 | 
						|
	l	%r6,24(%r15)		/* restore %r6 */
 | 
						|
	jm	SYSCALL_ERROR_LABEL
 | 
						|
	br	%r14
 | 
						|
error:
 | 
						|
	lhi	%r2,-EINVAL
 | 
						|
	j	SYSCALL_ERROR_LABEL
 | 
						|
PSEUDO_END (__clone)
 | 
						|
 | 
						|
thread_start:
 | 
						|
#ifdef RESET_PID
 | 
						|
	tmh	%r3,1		/* CLONE_THREAD == 0x00010000 */
 | 
						|
	jne	1f
 | 
						|
	lhi	%r2,-1
 | 
						|
	tml	%r3,256		/* CLONE_VM == 0x00000100 */
 | 
						|
	jne	2f
 | 
						|
	svc	SYS_ify(getpid)
 | 
						|
2:	ear	%r3,%a0
 | 
						|
	st	%r2,PID(%r3)
 | 
						|
	st	%r2,TID(%r3)
 | 
						|
1:
 | 
						|
#endif
 | 
						|
	/* fn is in gpr 1, arg in gpr 0 */
 | 
						|
	lr      %r2,%r0         /* set first parameter to void *arg */
 | 
						|
	ahi     %r15,-96        /* make room on the stack for the save area */
 | 
						|
	xc	0(4,%r15),0(%r15)
 | 
						|
	basr    %r14,%r1        /* jump to fn */
 | 
						|
	DO_CALL (exit, 1)
 | 
						|
weak_alias (__clone, clone)
 |