2 * Copyright (c) 2005 David Xu <davidxu@freebsd.org>
3 * Copyright (c) 2003 Daniel Eischen <deischen@freebsd.org>
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Neither the name of the author nor the names of any co-contributors
12 * may be used to endorse or promote products derived from this software
13 * without specific prior written permission.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * $FreeBSD: src/lib/libpthread/thread/thr_atfork.c,v 1.1 2003/11/05 03:42:10 davidxu Exp $
31 * Copyright (c) 1995-1998 John Birrell <jb@cimlogic.com.au>
32 * All rights reserved.
34 * Redistribution and use in source and binary forms, with or without
35 * modification, are permitted provided that the following conditions
37 * 1. Redistributions of source code must retain the above copyright
38 * notice, this list of conditions and the following disclaimer.
39 * 2. Redistributions in binary form must reproduce the above copyright
40 * notice, this list of conditions and the following disclaimer in the
41 * documentation and/or other materials provided with the distribution.
42 * 3. All advertising materials mentioning features or use of this software
43 * must display the following acknowledgement:
44 * This product includes software developed by John Birrell.
45 * 4. Neither the name of the author nor the names of any co-contributors
46 * may be used to endorse or promote products derived from this software
47 * without specific prior written permission.
49 * THIS SOFTWARE IS PROVIDED BY JOHN BIRRELL AND CONTRIBUTORS ``AS IS'' AND
50 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
51 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
52 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
53 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
54 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
55 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
56 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
57 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
58 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
61 * $FreeBSD: src/lib/libpthread/thread/thr_fork.c,v 1.34 2003/11/05 18:18:45 deischen Exp $
62 * $DragonFly: src/lib/libthread_xu/thread/thr_fork.c,v 1.6 2006/04/06 13:03:09 davidxu Exp $
65 #include "namespace.h"
66 #include <machine/tls.h>
75 #include "un-namespace.h"
77 #include "libc_private.h"
78 #include "thr_private.h"
80 struct atfork_head _thr_atfork_list
;
81 umtx_t _thr_atfork_lock
;
84 _pthread_atfork(void (*prepare
)(void), void (*parent
)(void),
87 struct pthread
*curthread
;
88 struct pthread_atfork
*af
;
92 if ((af
= malloc(sizeof(struct pthread_atfork
))) == NULL
)
95 curthread
= tls_get_curthread();
96 af
->prepare
= prepare
;
99 THR_UMTX_LOCK(curthread
, &_thr_atfork_lock
);
100 TAILQ_INSERT_TAIL(&_thr_atfork_list
, af
, qe
);
101 THR_UMTX_UNLOCK(curthread
, &_thr_atfork_lock
);
106 * For a while, allow libpthread to work with a libc that doesn't
107 * export the malloc lock.
109 #pragma weak __malloc_lock
116 static umtx_t inprogress
;
120 struct pthread
*curthread
;
121 struct pthread_atfork
*af
;
124 #ifndef __DragonFly__
128 if (!_thr_is_inited())
129 return (__sys_fork());
131 curthread
= tls_get_curthread();
133 THR_UMTX_LOCK(curthread
, &_thr_atfork_lock
);
137 THR_UMTX_UNLOCK(curthread
, &_thr_atfork_lock
);
138 _thr_umtx_wait(&inprogress
, tmp
, NULL
, 0);
139 THR_UMTX_LOCK(curthread
, &_thr_atfork_lock
);
144 THR_UMTX_UNLOCK(curthread
, &_thr_atfork_lock
);
146 /* Run down atfork prepare handlers. */
147 TAILQ_FOREACH_REVERSE(af
, &_thr_atfork_list
, atfork_head
, qe
) {
148 if (af
->prepare
!= NULL
)
152 #ifndef __DragonFly__
154 * Try our best to protect memory from being corrupted in
155 * child process because another thread in malloc code will
156 * simply be kill by fork().
158 if ((_thr_isthreaded() != 0) && (__malloc_lock
!= NULL
)) {
160 _spinlock(__malloc_lock
);
167 * Block all signals until we reach a safe point.
169 _thr_signal_block(curthread
);
171 /* Fork a new process: */
172 if ((ret
= __sys_fork()) == 0) {
176 curthread
->cancelflags
&= ~THR_CANCEL_NEEDED
;
178 * Thread list will be reinitialized, and later we call
179 * _libpthread_init(), it will add us back to list.
181 curthread
->tlflags
&= ~(TLFLAGS_IN_TDLIST
| TLFLAGS_DETACHED
);
183 /* child is a new kernel thread. */
184 curthread
->tid
= _thr_get_tid();
186 /* clear other threads locked us. */
187 _thr_umtx_init(&curthread
->lock
);
188 _thr_umtx_init(&_thr_atfork_lock
);
191 /* reinitialize libc spinlocks, this includes __malloc_lock. */
192 _thr_spinlock_init();
193 _mutex_fork(curthread
);
195 /* reinitalize library. */
196 _libpthread_init(curthread
);
198 /* Ready to continue, unblock signals. */
199 _thr_signal_unblock(curthread
);
201 /* Run down atfork child handlers. */
202 TAILQ_FOREACH(af
, &_thr_atfork_list
, qe
) {
203 if (af
->child
!= NULL
)
210 #ifndef __DragonFly__
212 _spinunlock(__malloc_lock
);
215 /* Ready to continue, unblock signals. */
216 _thr_signal_unblock(curthread
);
218 /* Run down atfork parent handlers. */
219 TAILQ_FOREACH(af
, &_thr_atfork_list
, qe
) {
220 if (af
->parent
!= NULL
)
224 THR_UMTX_LOCK(curthread
, &_thr_atfork_lock
);
227 _thr_umtx_wake(&inprogress
, waiters
);
228 THR_UMTX_UNLOCK(curthread
, &_thr_atfork_lock
);
232 /* Return the process ID: */
236 __strong_reference(_fork
, fork
);
237 __strong_reference(_pthread_atfork
, pthread_atfork
);