summaryrefslogtreecommitdiff
path: root/libc/sysdeps/linux/mips/clone.S
blob: 52b81cb1e50bfe225987f7ff8bf4e2d373e711d3 (plain)
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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
/* Copyright (C) 1996, 1997, 2000 Free Software Foundation, Inc.
   This file is part of the GNU C Library.
   Contributed by Ralf Baechle <ralf@gnu.ai.mit.edu>, 1996.

   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.  */

/* 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 <features.h>
#include <asm/unistd.h>
#include <sys/regdef.h>
#define _ERRNO_H	1
#include <bits/errno.h>
#include <sys/asm.h>

/* int clone(int (*fn)(void *arg), void *child_stack, int flags, void *arg) */

	.text
.globl   clone ;
	.align       2;
	.type         clone,@function;
	.ent        clone, 0;
	
clone:
	.frame	    sp, 4*SZREG, sp
#ifdef __PIC__
#if _MIPS_SIM == _MIPS_SIM_ABI32
	.set		noreorder
	.cpload		$25
	.set		reorder
	subu		sp,32
	.cprestore	16
#else	/* N32 */
	PTR_SUBU	sp,32	/* fn, arg, gp, pad */
	.cpsetup	$25, 16, clone
#endif	/* N32 */
#else
	subu		sp,32
#endif


	/* Sanity check arguments.  */
	li		v0,EINVAL
	beqz		a0,L(error)	/* No NULL function pointers.  */
	beqz		a1,L(error)	/* No NULL stack pointers.  */

#if _MIPS_SIM != _MIPS_SIM_ABI32
	and		a1,~(16-1)	/* force alignment */
#endif
	PTR_SUBU	a1,32		/* Reserve argument save space.  */
	PTR_S		a0,0(a1)	/* Save function pointer.  */
	PTR_S		a3,PTRSIZE(a1)	/* Save argument pointer.  */


	/* Do the system call */
	move		a0,a2
	li		v0,__NR_clone
	syscall

	bnez		a3,L(error)
	beqz		v0,L(__thread_start)

	/* Successful return from the parent */
#if _MIPS_SIM != _MIPS_SIM_ABI32
	.cpreturn
#endif
	PTR_ADDU	sp,32
	j $31  ; nop

	/* Something bad happened -- no child created */
L(error):
#if _MIPS_SIM != _MIPS_SIM_ABI32
	.cpreturn
#endif
	PTR_ADDU	sp,32

	/* uClibc change -- start */
	move		a0,v0		/* Pass return val to C function. */
	/* uClibc change -- stop */

#ifdef __PIC__
	PTR_LA		t9,__syscall_error
	jr		t9
#else
	j		__syscall_error
#endif
	.end  clone

/* Load up the arguments to the function.  Put this block of code in
   its own function so that we can terminate the stack trace with our
   debug info.  */

	.globl  __thread_start;
	.align 2;
	.ent  __thread_start, 0;

__thread_start:
L(__thread_start):
#if _MIPS_SIM == _MIPS_SIM_ABI32
	.frame	sp, 24, sp
	/* cp is already loaded.  */
	.cprestore	16
#endif
	/* The stackframe has been created on entry of clone().  */
	/* Restore the arg for user's function.  */
	PTR_L		t9,0(sp)	/* Function pointer.  */
	PTR_L		a0,PTRSIZE(sp)	/* Argument pointer.  */

	/* Call the user's function.  */
	jal		t9

	/* Call _exit rather than doing it inline for breakpoint purposes.  */
	move		a0,v0
#ifdef __PIC__
        PTR_LA          t9,_exit
        jalr            t9
#else
        jal             _exit
#endif
	.end  __thread_start
weak_alias(clone, __clone)