Initial import from FreeBSD RELENG_4:
[dragonfly.git] / lib / libc_r / uthread / uthread_detach.c
1 /*
2  * Copyright (c) 1995 John Birrell <jb@cimlogic.com.au>.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by John Birrell.
16  * 4. Neither the name of the author nor the names of any co-contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY JOHN BIRRELL AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  *
32  * $FreeBSD: src/lib/libc_r/uthread/uthread_detach.c,v 1.11.2.4 2002/10/22 14:44:03 fjoe Exp $
33  */
34 #include <errno.h>
35 #include <pthread.h>
36 #include "pthread_private.h"
37
38 __weak_reference(_pthread_detach, pthread_detach);
39
40 int
41 _pthread_detach(pthread_t pthread)
42 {
43         int             rval = 0;
44
45         /* Check for invalid calling parameters: */
46         if (pthread == NULL || pthread->magic != PTHREAD_MAGIC)
47                 /* Return an invalid argument error: */
48                 rval = EINVAL;
49
50         /* Check if the thread has not been detached: */
51         else if ((pthread->attr.flags & PTHREAD_DETACHED) == 0) {
52                 /* Flag the thread as detached: */
53                 pthread->attr.flags |= PTHREAD_DETACHED;
54
55                 /*
56                  * Defer signals to protect the scheduling queues from
57                  * access by the signal handler:
58                  */
59                 _thread_kern_sig_defer();
60
61                 /* Check if there is a joiner: */
62                 if (pthread->joiner != NULL) {
63                         struct pthread  *joiner = pthread->joiner;
64
65                         /* Make the thread runnable: */
66                         PTHREAD_NEW_STATE(joiner, PS_RUNNING);
67
68                         /* Set the return value for the woken thread: */
69                         joiner->join_status.error = ESRCH;
70                         joiner->join_status.ret = NULL;
71                         joiner->join_status.thread = NULL;
72
73                         /*
74                          * Disconnect the joiner from the thread being detached:
75                          */
76                         pthread->joiner = NULL;
77                 }
78
79                 /*
80                  * Undefer and handle pending signals, yielding if a
81                  * scheduling signal occurred while in the critical region.
82                  */
83                 _thread_kern_sig_undefer();
84         } else
85                 /* Return an error: */
86                 rval = EINVAL;
87
88         /* Return the completion status: */
89         return (rval);
90 }