|
0
|
1
|
|
|
2 /* Taken with thanks from LinuxThreads 0.6 */
|
|
|
3
|
|
|
4 /* This is no longer necessary with glibc-2.1, which has it's own clone() */
|
|
|
5 #ifdef linux
|
|
|
6 /* Look to see if glibc is available, and if so, what version */
|
|
|
7 #include <features.h>
|
|
|
8
|
|
|
9 #if (__GLIBC__ > 2) || ((__GLIBC__ == 2) && (__GLIBC_MINOR__ >= 1))
|
|
|
10 #define HAVE_CLONE
|
|
|
11 #endif /* glibc 2.1 or newer */
|
|
|
12 #endif /* linux */
|
|
|
13
|
|
|
14 #if defined(linux) && !defined(SDL_USE_PTHREADS) && !defined(HAVE_CLONE)
|
|
|
15
|
|
|
16 #if defined(__i386__)
|
|
|
17 /************************************************************************/
|
|
|
18 /* Copyright (C) 1996, 1997 Free Software Foundation, Inc.
|
|
|
19 Contributed by Richard Henderson (rth@tamu.edu)
|
|
|
20
|
|
|
21 The GNU C Library is free software; you can redistribute it and/or
|
|
|
22 modify it under the terms of the GNU Library General Public License as
|
|
|
23 published by the Free Software Foundation; either version 2 of the
|
|
|
24 License, or (at your option) any later version.
|
|
|
25
|
|
|
26 The GNU C Library is distributed in the hope that it will be useful,
|
|
|
27 but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
28 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
29 Library General Public License for more details.
|
|
|
30
|
|
|
31 You should have received a copy of the GNU Library General Public
|
|
|
32 License along with the GNU C Library; see the file COPYING.LIB. If
|
|
|
33 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
|
|
34
|
|
|
35 #ifdef SAVE_RCSID
|
|
|
36 static char rcsid =
|
|
|
37 "@(#) $Id$";
|
|
|
38 #endif
|
|
|
39 Cambridge, MA 02139, USA. */
|
|
|
40
|
|
|
41 /* clone() is even more special than fork() as it mucks with stacks
|
|
|
42 and invokes a function in the right context after its all over. */
|
|
|
43
|
|
|
44 #include <asm/errno.h>
|
|
|
45 #include <asm/unistd.h>
|
|
|
46
|
|
|
47 /* int clone(int (*fn)(void *arg), void *child_stack, int flags, void *arg); */
|
|
|
48
|
|
|
49 .text
|
|
|
50 .align 4
|
|
|
51 .globl __clone
|
|
|
52 .type __clone,@function
|
|
|
53 .weak clone
|
|
|
54 clone = __clone
|
|
|
55 __clone:
|
|
|
56 /* Sanity check arguments. */
|
|
|
57 movl $-EINVAL,%eax
|
|
|
58 movl 4(%esp),%ecx /* no NULL function pointers */
|
|
|
59 testl %ecx,%ecx
|
|
|
60 jz syscall_error
|
|
|
61 movl 8(%esp),%ecx /* no NULL stack pointers */
|
|
|
62 testl %ecx,%ecx
|
|
|
63 jz syscall_error
|
|
|
64
|
|
|
65 /* Insert the argument onto the new stack. */
|
|
|
66 subl $8,%ecx
|
|
|
67 movl 16(%esp),%eax
|
|
|
68 movl %eax,4(%ecx)
|
|
|
69
|
|
|
70 /* Save the function pointer as the zeroth argument. */
|
|
|
71 /* It will be popped off in the child in the ebx frobbing below. */
|
|
|
72 movl 4(%esp),%eax
|
|
|
73 movl %eax,0(%ecx)
|
|
|
74
|
|
|
75 /* Do the system call */
|
|
|
76 pushl %ebx
|
|
|
77 movl 16(%esp),%ebx
|
|
|
78 movl $__NR_clone,%eax
|
|
|
79 int $0x80
|
|
|
80 popl %ebx
|
|
|
81
|
|
|
82 test %eax,%eax
|
|
|
83 jl syscall_error
|
|
|
84 jz thread_start
|
|
|
85
|
|
|
86 ret
|
|
|
87
|
|
|
88 syscall_error:
|
|
|
89 negl %eax
|
|
|
90 pushl %eax
|
|
|
91 #ifdef __PIC__
|
|
|
92 call __errno_location@PLT
|
|
|
93 #else
|
|
|
94 call __errno_location
|
|
|
95 #endif
|
|
|
96 popl 0(%eax)
|
|
|
97 movl $-1, %eax
|
|
|
98 ret
|
|
|
99
|
|
|
100 thread_start:
|
|
|
101 subl %ebp,%ebp /* terminate the stack frame */
|
|
|
102 call *%ebx
|
|
|
103 pushl %eax
|
|
|
104 #ifdef __PIC__
|
|
|
105 call _exit@PLT
|
|
|
106 #else
|
|
|
107 call _exit
|
|
|
108 #endif
|
|
|
109 /************************************************************************/
|
|
|
110 #elif defined(sparc)
|
|
|
111 /************************************************************************/
|
|
|
112 /* Copyright (C) 1996, 1997 Free Software Foundation, Inc.
|
|
|
113 Contributed by Miguel de Icaza (miguel@nuclecu.unam.mx)
|
|
|
114 Based on code written for the Intel by Richard
|
|
|
115 Henderson (rth@tamu.edu)
|
|
|
116
|
|
|
117 The GNU C Library is free software; you can redistribute it and/or
|
|
|
118 modify it under the terms of the GNU Library General Public License as
|
|
|
119 published by the Free Software Foundation; either version 2 of the
|
|
|
120 License, or (at your option) any later version.
|
|
|
121
|
|
|
122 The GNU C Library is distributed in the hope that it will be useful,
|
|
|
123 but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
124 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
125 Library General Public License for more details.
|
|
|
126
|
|
|
127 You should have received a copy of the GNU Library General Public
|
|
|
128 License along with the GNU C Library; see the file COPYING.LIB. If
|
|
|
129 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
|
|
130 Cambridge, MA 02139, USA. */
|
|
|
131
|
|
|
132 /* clone() is even more special than fork() as it mucks with stacks
|
|
|
133 and invokes a function in the right context after its all over. */
|
|
|
134
|
|
|
135 #include <asm/errno.h>
|
|
|
136 #include <asm/unistd.h>
|
|
|
137
|
|
|
138 /* int clone(int (*fn)(void *arg), void *child_stack, int flags, void *arg); */
|
|
|
139
|
|
|
140 .text
|
|
|
141 .align 4
|
|
|
142 .globl __clone
|
|
|
143 .type __clone,@function
|
|
|
144 .weak clone
|
|
|
145 clone = __clone
|
|
|
146 __clone:
|
|
|
147 save %sp,-96,%sp
|
|
|
148 /* sanity check arguments */
|
|
|
149 tst %i0
|
|
|
150 be __clone_syscall_error
|
|
|
151 tst %i1
|
|
|
152 be __clone_syscall_error
|
|
|
153 nop
|
|
|
154
|
|
|
155 /* Do the system call */
|
|
|
156 mov %i1,%o1
|
|
|
157 mov %i2,%o0
|
|
|
158 set __NR_clone,%g1
|
|
|
159 ta 0x10
|
|
|
160 bcs __clone_syscall_error
|
|
|
161 tst %o1
|
|
|
162 bne __thread_start
|
|
|
163 nop
|
|
|
164 mov %o0,%i0
|
|
|
165 ret
|
|
|
166 restore
|
|
|
167
|
|
|
168 __clone_syscall_error:
|
|
|
169 call __errno_location
|
|
|
170 set EINVAL,%i0
|
|
|
171 st %i0,[%o0]
|
|
|
172 mov -1,%i0
|
|
|
173 ret
|
|
|
174 restore
|
|
|
175
|
|
|
176 __thread_start:
|
|
|
177 call %i0
|
|
|
178 mov %i3,%o0
|
|
|
179 call _exit,0
|
|
|
180 nop
|
|
|
181 /************************************************************************/
|
|
|
182 #else
|
|
|
183 #error "Unknown Linux architecture"
|
|
|
184 #endif
|
|
|
185
|
|
|
186 #endif /* Linux && ! SDL_USE_PTHREADS */
|
