BOOL pthread_win32_thread_detach_np () { if (ptw32_processInitialized) { /* * Don't use pthread_self() - to avoid creating an implicit POSIX thread handle * unnecessarily. */ ptw32_thread_t * sp = (ptw32_thread_t *) pthread_getspecific (ptw32_selfThreadKey); if (sp != NULL) // otherwise Win32 thread with no implicit POSIX handle. { ptw32_callUserDestroyRoutines (sp->ptHandle); (void) pthread_mutex_lock (&sp->cancelLock); sp->state = PThreadStateLast; /* * If the thread is joinable at this point then it MUST be joined * or detached explicitly by the application. */ (void) pthread_mutex_unlock (&sp->cancelLock); if (sp->detachState == PTHREAD_CREATE_DETACHED) { ptw32_threadDestroy (sp->ptHandle); TlsSetValue (ptw32_selfThreadKey->key, NULL); } } } return TRUE; }
BOOL pthread_win32_process_detach_np () { if (ptw32_processInitialized) { pthread_t self = (pthread_t) pthread_getspecific (ptw32_selfThreadKey); /* * Detached threads have their resources automatically * cleaned up upon exit (others must be 'joined'). */ if (self != NULL && self->detachState == PTHREAD_CREATE_DETACHED) { pthread_setspecific (ptw32_selfThreadKey, NULL); ptw32_threadDestroy (self); } /* * The DLL is being unmapped into the process's address space */ ptw32_processTerminate (); if (ptw32_h_kernel32) { (void) FreeLibrary(ptw32_h_kernel32); } } return TRUE; }
BOOL pthread_win32_thread_detach_np () { if (ptw32_processInitialized) { /* * Don't use pthread_self() - to avoid creating an implicit POSIX thread handle * unnecessarily. */ ptw32_thread_t * sp = (ptw32_thread_t *) pthread_getspecific (ptw32_selfThreadKey); if (sp != NULL) // otherwise Win32 thread with no implicit POSIX handle. { ptw32_mcs_local_node_t stateLock; ptw32_callUserDestroyRoutines (sp->ptHandle); ptw32_mcs_lock_acquire (&sp->stateLock, &stateLock); sp->state = PThreadStateLast; /* * If the thread is joinable at this point then it MUST be joined * or detached explicitly by the application. */ ptw32_mcs_lock_release (&stateLock); /* * Robust Mutexes */ while (sp->robustMxList != NULL) { pthread_mutex_t mx = sp->robustMxList->mx; ptw32_robust_mutex_remove(&mx, sp); (void) PTW32_INTERLOCKED_EXCHANGE_LONG( (PTW32_INTERLOCKED_LONGPTR)&mx->robustNode->stateInconsistent, (PTW32_INTERLOCKED_LONG)-1); /* * If there are no waiters then the next thread to block will * sleep, wake up immediately and then go back to sleep. * See pthread_mutex_lock.c. */ SetEvent(mx->event); } if (sp->detachState == PTHREAD_CREATE_DETACHED) { ptw32_threadDestroy (sp->ptHandle); if (ptw32_selfThreadKey) { TlsSetValue (ptw32_selfThreadKey->key, NULL); } } } } return TRUE; }
BOOL pthread_win32_process_detach_np () { if (ptw32_processInitialized) { ptw32_thread_t * sp = (ptw32_thread_t *) pthread_getspecific (ptw32_selfThreadKey); if (sp != NULL) { /* * Detached threads have their resources automatically * cleaned up upon exit (others must be 'joined'). */ if (sp->detachState == PTHREAD_CREATE_DETACHED) { ptw32_threadDestroy (sp->ptHandle); TlsSetValue (ptw32_selfThreadKey->key, NULL); } } /* * The DLL is being unmapped from the process's address space */ ptw32_processTerminate (); if (ptw32_h_quserex) { /* Close QueueUserAPCEx */ BOOL (*queue_user_apc_ex_fini) (VOID); queue_user_apc_ex_fini = (BOOL (*)(VOID)) #if defined(NEED_UNICODE_CONSTS) GetProcAddress (ptw32_h_quserex, (const TCHAR *) TEXT ("QueueUserAPCEx_Fini")); #else GetProcAddress (ptw32_h_quserex, (LPCSTR) "QueueUserAPCEx_Fini"); #endif if (queue_user_apc_ex_fini != NULL) { (void) queue_user_apc_ex_fini (); } (void) FreeLibrary (ptw32_h_quserex); } if (ptw32_h_kernel32) { (void) FreeLibrary (ptw32_h_kernel32); } } return TRUE; }
BOOL pthread_win32_thread_detach_np () { if (ptw32_processInitialized) { pthread_t self = (pthread_t) pthread_getspecific (ptw32_selfThreadKey); /* * Detached threads have their resources automatically * cleaned up upon exit (others must be 'joined'). */ if (self != NULL && self->detachState == PTHREAD_CREATE_DETACHED) { pthread_setspecific (ptw32_selfThreadKey, NULL); ptw32_threadDestroy (self); } } return TRUE; }
BOOL pthread_win32_thread_detach_np () { if (ptw32_processInitialized) { /* * Don't use pthread_self() - to avoid creating an implicit POSIX thread handle * unnecessarily. */ pthread_t self = (pthread_t) pthread_getspecific (ptw32_selfThreadKey); /* * Detached threads have their resources automatically * cleaned up upon exit (others must be 'joined'). */ if (self != NULL && self->detachState == PTHREAD_CREATE_DETACHED) { ptw32_threadDestroy (self); TlsSetValue (ptw32_selfThreadKey->key, NULL); } } return TRUE; }
int pthread_detach (pthread_t thread) /* * ------------------------------------------------------ * DOCPUBLIC * This function detaches the given thread. * * PARAMETERS * thread * an instance of a pthread_t * * * DESCRIPTION * This function detaches the given thread. You may use it to * detach the main thread or to detach a joinable thread. * NOTE: detached threads cannot be joined; * storage is freed immediately on termination. * * RESULTS * 0 successfully detached the thread, * EINVAL thread is not a joinable thread, * ENOSPC a required resource has been exhausted, * ESRCH no thread could be found for 'thread', * * ------------------------------------------------------ */ { int result; BOOL destroyIt = PTW32_FALSE; ptw32_thread_t * tp = (ptw32_thread_t *) thread.p; EnterCriticalSection (&ptw32_thread_reuse_lock); if (NULL == tp || thread.x != tp->ptHandle.x) { result = ESRCH; } else if (PTHREAD_CREATE_DETACHED == tp->detachState) { result = EINVAL; } else { /* * Joinable ptw32_thread_t structs are not scavenged until * a join or detach is done. The thread may have exited already, * but all of the state and locks etc are still there. */ result = 0; if (pthread_mutex_lock (&tp->cancelLock) == 0) { if (tp->state != PThreadStateLast) { tp->detachState = PTHREAD_CREATE_DETACHED; } else if (tp->detachState != PTHREAD_CREATE_DETACHED) { /* * Thread is joinable and has exited or is exiting. */ destroyIt = PTW32_TRUE; } (void) pthread_mutex_unlock (&tp->cancelLock); } else { /* cancelLock shouldn't fail, but if it does ... */ result = ESRCH; } } LeaveCriticalSection (&ptw32_thread_reuse_lock); if (result == 0) { /* Thread is joinable */ if (destroyIt) { /* The thread has exited or is exiting but has not been joined or * detached. Need to wait in case it's still exiting. */ (void) WaitForSingleObject(tp->threadH, INFINITE); ptw32_threadDestroy (thread); } } return (result); } /* pthread_detach */
int pthread_create (pthread_t * tid, const pthread_attr_t * attr, void *(PTW32_CDECL *start) (void *), void *arg) /* * ------------------------------------------------------ * DOCPUBLIC * This function creates a thread running the start function, * passing it the parameter value, 'arg'. The 'attr' * argument specifies optional creation attributes. * The identity of the new thread is returned * via 'tid', which should not be NULL. * * PARAMETERS * tid * pointer to an instance of pthread_t * * attr * optional pointer to an instance of pthread_attr_t * * start * pointer to the starting routine for the new thread * * arg * optional parameter passed to 'start' * * * DESCRIPTION * This function creates a thread running the start function, * passing it the parameter value, 'arg'. The 'attr' * argument specifies optional creation attributes. * The identity of the new thread is returned * via 'tid', which should not be the NULL pointer. * * RESULTS * 0 successfully created thread, * EINVAL attr invalid, * EAGAIN insufficient resources. * * ------------------------------------------------------ */ { pthread_t thread = { 0 }; // init to shut up MSVC2013: warning C4701 : potentially uninitialized local variable 'thread' used ptw32_thread_t * tp; ptw32_thread_t * sp; register pthread_attr_t a; HANDLE threadH = 0; int result = EAGAIN; int run = PTW32_TRUE; ThreadParms *parms = NULL; unsigned int stackSize; int priority; /* * Before doing anything, check that tid can be stored through * without invoking a memory protection error (segfault). * Make sure that the assignment below can't be optimised out by the compiler. * This is assured by conditionally assigning *tid again at the end. */ tid->x = 0; if (NULL == (sp = (ptw32_thread_t *)pthread_self().p)) { goto FAIL0; } if (attr != NULL) { a = *attr; } else { a = NULL; } thread = ptw32_new(); if (thread.p == NULL) { goto FAIL0; } tp = (ptw32_thread_t *) thread.p; priority = tp->sched_priority; if ((parms = (ThreadParms *) malloc (sizeof (*parms))) == NULL) { goto FAIL0; } parms->tid = thread; parms->start = start; parms->arg = arg; /* * Threads inherit their initial sigmask and CPU affinity from their creator thread. */ #if defined(HAVE_SIGSET_T) tp->sigmask = sp->sigmask; #endif #if defined(HAVE_CPU_AFFINITY) tp->cpuset = sp->cpuset; #endif if (a != NULL) { #if defined(HAVE_CPU_AFFINITY) cpu_set_t none; cpu_set_t attr_cpuset; ((_sched_cpu_set_vector_*)&attr_cpuset)->_cpuset = a->cpuset; CPU_ZERO(&none); if (! CPU_EQUAL(&attr_cpuset, &none)) { tp->cpuset = a->cpuset; } #endif stackSize = (unsigned int)a->stacksize; tp->detachState = a->detachstate; priority = a->param.sched_priority; if (a->thrname != NULL) tp->name = _strdup(a->thrname); #if (THREAD_PRIORITY_LOWEST > THREAD_PRIORITY_NORMAL) /* WinCE */ #else /* Everything else */ /* * Thread priority must be set to a valid system level * without altering the value set by pthread_attr_setschedparam(). */ /* * PTHREAD_EXPLICIT_SCHED is the default because Win32 threads * don't inherit their creator's priority. They are started with * THREAD_PRIORITY_NORMAL (win32 value). The result of not supplying * an 'attr' arg to pthread_create() is equivalent to defaulting to * PTHREAD_EXPLICIT_SCHED and priority THREAD_PRIORITY_NORMAL. */ if (PTHREAD_INHERIT_SCHED == a->inheritsched) { /* * If the thread that called pthread_create() is a Win32 thread * then the inherited priority could be the result of a temporary * system adjustment. This is not the case for POSIX threads. */ priority = sp->sched_priority; } #endif } else { /* * Default stackSize */ stackSize = PTHREAD_STACK_MIN; } tp->state = run ? PThreadStateInitial : PThreadStateSuspended; tp->keys = NULL; /* * Threads must be started in suspended mode and resumed if necessary * after _beginthreadex returns us the handle. Otherwise we set up a * race condition between the creating and the created threads. * Note that we also retain a local copy of the handle for use * by us in case thread.p->threadH gets NULLed later but before we've * finished with it here. */ #if ! defined (PTW32_CONFIG_MINGW) || defined (__MSVCRT__) || defined (__DMC__) tp->threadH = threadH = (HANDLE) _beginthreadex ((void *) NULL, /* No security info */ stackSize, /* default stack size */ ptw32_threadStart, parms, (unsigned) CREATE_SUSPENDED, (unsigned *) &(tp->thread)); if (threadH != 0) { if (a != NULL) { (void) ptw32_setthreadpriority (thread, SCHED_OTHER, priority); } #if defined(HAVE_CPU_AFFINITY) SetThreadAffinityMask(tp->threadH, tp->cpuset); #endif if (run) { ResumeThread (threadH); } } #else { ptw32_mcs_local_node_t stateLock; /* * This lock will force pthread_threadStart() to wait until we have * the thread handle and have set the priority. */ ptw32_mcs_lock_acquire(&tp->stateLock, &stateLock); tp->threadH = threadH = (HANDLE) _beginthread (ptw32_threadStart, stackSize, /* default stack size */ parms); /* * Make the return code match _beginthreadex's. */ if (threadH == (HANDLE) - 1L) { tp->threadH = threadH = 0; } else { if (!run) { /* * beginthread does not allow for create flags, so we do it now. * Note that beginthread itself creates the thread in SUSPENDED * mode, and then calls ResumeThread to start it. */ SuspendThread (threadH); } if (a != NULL) { (void) ptw32_setthreadpriority (thread, SCHED_OTHER, priority); } #if defined(HAVE_CPU_AFFINITY) SetThreadAffinityMask(tp->threadH, tp->cpuset); #endif } ptw32_mcs_lock_release (&stateLock); } #endif result = (threadH != 0) ? 0 : EAGAIN; /* * Fall Through Intentionally */ /* * ------------ * Failure Code * ------------ */ FAIL0: if (result != 0) { ptw32_threadDestroy (thread); tp = NULL; if (parms != NULL) { free (parms); } } else { *tid = thread; } #if defined(_UWIN) if (result == 0) pthread_count++; #endif return (result); } /* pthread_create */
int pthread_join (pthread_t thread, void **value_ptr) /* * ------------------------------------------------------ * DOCPUBLIC * This function waits for 'thread' to terminate and * returns the thread's exit value if 'value_ptr' is not * NULL. This also detaches the thread on successful * completion. * * PARAMETERS * thread * an instance of pthread_t * * value_ptr * pointer to an instance of pointer to void * * * DESCRIPTION * This function waits for 'thread' to terminate and * returns the thread's exit value if 'value_ptr' is not * NULL. This also detaches the thread on successful * completion. * NOTE: detached threads cannot be joined or canceled * * RESULTS * 0 'thread' has completed * EINVAL thread is not a joinable thread, * ESRCH no thread could be found with ID 'thread', * ENOENT thread couldn't find it's own valid handle, * EDEADLK attempt to join thread with self * * ------------------------------------------------------ */ { int result; pthread_t self; /* This is the proper way to test for a valid thread ID */ result = pthread_kill (thread, 0); if (0 != result) { return result; } self = pthread_self (); if (NULL == self) { return ENOENT; } if (0 != pthread_equal (self, thread)) { result = EDEADLK; } else if (PTHREAD_CREATE_DETACHED == thread->detachState) { result = EINVAL; } else { /* * Pthread_join is a cancelation point. * If we are canceled then our target thread must not be * detached (destroyed). This is guarranteed because * pthreadCancelableWait will not return if we * are canceled. */ result = pthreadCancelableWait (thread->threadH); if (result == 0) { #if ! defined (__MINGW32__) || defined (__MSVCRT__) if (value_ptr != NULL && !GetExitCodeThread (thread->threadH, (LPDWORD) value_ptr)) { result = ESRCH; } else { /* * The result of making multiple simultaneous calls to * pthread_join() specifying the same target is undefined. */ ptw32_threadDestroy (thread); } #else /* __MINGW32__ && ! __MSVCRT__ */ /* * If using CRTDLL, the thread may have exited, and endthread * will have closed the handle. */ if (value_ptr != NULL) { *value_ptr = thread->exitStatus; } /* * The result of making multiple simultaneous calls to * pthread_join() specifying the same target is undefined. */ ptw32_threadDestroy (thread); #endif /* __MINGW32__ && ! __MSVCRT__ */ } else { result = ESRCH; } } return (result); } /* pthread_join */