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

--- 35 unchanged lines hidden (view full) ---

44 pthread_t pthread;
45
46 /* Block signals: */
47 _thread_kern_sig_block(&status);
48
49 /* Check for invalid calling parameters: */
50 if (p_pthread == NULL || (pthread = *p_pthread) == NULL) {
51 /* Return an invalid argument error: */
52 errno = EINVAL;
53 rval = -1;
54 }
55 /* Check if the thread has not been detached: */
56 else if ((pthread->attr.flags & PTHREAD_DETACHED) == 0) {
57 /* Flag the thread as detached: */
58 pthread->attr.flags |= PTHREAD_DETACHED;
59
60 /* Enter a loop to bring all threads off the join queue: */
61 while ((next_thread = _thread_queue_deq(&pthread->join_queue)) != NULL) {
62 /* Make the thread run: */
63 PTHREAD_NEW_STATE(next_thread,PS_RUNNING);
64 }
65
66 /*
67 * NULL the thread pointer now that the thread has been
68 * detached:
69 */
70 *p_pthread = NULL;
71 } else {
72 /* Return an error: */
73 errno = ESRCH;
74 rval = -1;
75 }
76
77 /* Unblock signals: */
78 _thread_kern_sig_unblock(status);
79
80 /* Return the completion status: */
81 return (rval);
82}
83#endif