mirror of
				https://sourceware.org/git/glibc.git
				synced 2025-11-03 20:53:13 +03:00 
			
		
		
		
	* All files with FSF copyright notices: Update copyright dates using scripts/update-copyrights. * locale/programs/charmap-kw.h: Regenerated. * locale/programs/locfile-kw.h: Likewise.
		
			
				
	
	
		
			88 lines
		
	
	
		
			2.1 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			88 lines
		
	
	
		
			2.1 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
/* Copyright (C) 1999-2018 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, 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>
 | 
						|
#define _ERRNO_H	1
 | 
						|
#include <bits/errno.h>
 | 
						|
#include <tcb-offsets.h>
 | 
						|
 | 
						|
/* int clone(int (*fn)(void *arg), void *child_stack, int flags, void *arg,
 | 
						|
	     pid_t *ptid, void *tls, pid_t *ctid); */
 | 
						|
 | 
						|
	.text
 | 
						|
ENTRY(__clone)
 | 
						|
	/* sanity check arguments.  */
 | 
						|
	tst	r4, r4
 | 
						|
	bt/s	0f
 | 
						|
	 tst	r5, r5
 | 
						|
	bf	1f
 | 
						|
0:
 | 
						|
	bra	.Lsyscall_error
 | 
						|
	 mov	#-EINVAL,r0
 | 
						|
1:
 | 
						|
	/* insert the args onto the new stack */
 | 
						|
	mov.l	r7, @-r5
 | 
						|
	/* save the function pointer as the 0th element */
 | 
						|
	mov.l	r4, @-r5
 | 
						|
 | 
						|
	/* do the system call */
 | 
						|
	mov	r6, r4
 | 
						|
	mov.l	@r15, r6
 | 
						|
	mov.l	@(8,r15), r7
 | 
						|
	mov.l	@(4,r15), r0
 | 
						|
	mov	#+SYS_ify(clone), r3
 | 
						|
	trapa	#0x15
 | 
						|
	mov     r0, r1
 | 
						|
	mov	#-12, r2
 | 
						|
	shad	r2, r1
 | 
						|
	not	r1, r1			// r1=0 means r0 = -1 to -4095
 | 
						|
	tst	r1, r1			// i.e. error in linux
 | 
						|
	bf	.Lclone_end
 | 
						|
.Lsyscall_error:
 | 
						|
	SYSCALL_ERROR_HANDLER
 | 
						|
.Lclone_end:
 | 
						|
	tst	r0, r0
 | 
						|
	bt	2f
 | 
						|
.Lpseudo_end:
 | 
						|
	rts
 | 
						|
	 nop
 | 
						|
2:
 | 
						|
	/* terminate the stack frame */
 | 
						|
	mov	#0, r14
 | 
						|
 | 
						|
	/* thread starts */
 | 
						|
	mov.l	@r15, r1
 | 
						|
	jsr	@r1
 | 
						|
	 mov.l	@(4,r15), r4
 | 
						|
 | 
						|
	/* we are done, passing the return value through r0  */
 | 
						|
	mov     r0, r4
 | 
						|
	mov	#+SYS_ify(exit), r3
 | 
						|
	trapa	#0x15
 | 
						|
	.align	2
 | 
						|
.LG:
 | 
						|
	.long	_GLOBAL_OFFSET_TABLE_
 | 
						|
.L3:
 | 
						|
	.long	PLTJMP(C_SYMBOL_NAME(_exit))
 | 
						|
PSEUDO_END (__clone)
 | 
						|
 | 
						|
libc_hidden_def (__clone)
 | 
						|
weak_alias (__clone, clone)
 |