| /* |
| * pthread_win32_attach_detach_np.c |
| * |
| * Description: |
| * This translation unit implements non-portable thread functions. |
| * |
| * -------------------------------------------------------------------------- |
| * |
| * Pthreads-win32 - POSIX Threads Library for Win32 |
| * Copyright(C) 1998 John E. Bossom |
| * Copyright(C) 1999,2005 Pthreads-win32 contributors |
| * |
| * Contact Email: rpj@callisto.canberra.edu.au |
| * |
| * The current list of contributors is contained |
| * in the file CONTRIBUTORS included with the source |
| * code distribution. The list can also be seen at the |
| * following World Wide Web location: |
| * http://sources.redhat.com/pthreads-win32/contributors.html |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2 of the License, or (at your option) any later version. |
| * |
| * This library is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library in the file COPYING.LIB; |
| * if not, write to the Free Software Foundation, Inc., |
| * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA |
| */ |
| |
| #include "pthread.h" |
| #include "implement.h" |
| |
| /* |
| * Handle to kernel32.dll |
| */ |
| static HINSTANCE ptw32_h_kernel32; |
| |
| /* |
| * Handle to quserex.dll |
| */ |
| static HINSTANCE ptw32_h_quserex; |
| |
| BOOL |
| pthread_win32_process_attach_np () |
| { |
| BOOL result = TRUE; |
| DWORD_PTR vProcessCPUs; |
| DWORD_PTR vSystemCPUs; |
| |
| result = ptw32_processInitialize (); |
| |
| #ifdef _UWIN |
| pthread_count++; |
| #endif |
| |
| ptw32_features = 0; |
| |
| |
| #if defined(NEED_PROCESS_AFFINITY_MASK) |
| |
| ptw32_smp_system = PTW32_FALSE; |
| |
| #else |
| |
| if (GetProcessAffinityMask (GetCurrentProcess (), |
| &vProcessCPUs, &vSystemCPUs)) |
| { |
| int CPUs = 0; |
| DWORD_PTR bit; |
| |
| for (bit = 1; bit != 0; bit <<= 1) |
| { |
| if (vSystemCPUs & bit) |
| { |
| CPUs++; |
| } |
| } |
| ptw32_smp_system = (CPUs > 1); |
| } |
| else |
| { |
| ptw32_smp_system = PTW32_FALSE; |
| } |
| |
| #endif |
| |
| #ifdef WINCE |
| |
| /* |
| * Load COREDLL and try to get address of InterlockedCompareExchange |
| */ |
| ptw32_h_kernel32 = LoadLibrary (TEXT ("COREDLL.DLL")); |
| |
| #else |
| |
| /* |
| * Load KERNEL32 and try to get address of InterlockedCompareExchange |
| */ |
| ptw32_h_kernel32 = LoadLibrary (TEXT ("KERNEL32.DLL")); |
| |
| #endif |
| |
| ptw32_interlocked_compare_exchange = |
| (PTW32_INTERLOCKED_LONG (WINAPI *) |
| (PTW32_INTERLOCKED_LPLONG, PTW32_INTERLOCKED_LONG, |
| PTW32_INTERLOCKED_LONG)) |
| #if defined(NEED_UNICODE_CONSTS) |
| GetProcAddress (ptw32_h_kernel32, |
| (const TCHAR *) TEXT ("InterlockedCompareExchange")); |
| #else |
| GetProcAddress (ptw32_h_kernel32, (LPCSTR) "InterlockedCompareExchange"); |
| #endif |
| |
| if (ptw32_interlocked_compare_exchange == NULL) |
| { |
| ptw32_interlocked_compare_exchange = ptw32_InterlockedCompareExchange; |
| |
| /* |
| * If InterlockedCompareExchange is not being used, then free |
| * the kernel32.dll handle now, rather than leaving it until |
| * DLL_PROCESS_DETACH. |
| * |
| * Note: this is not a pedantic exercise in freeing unused |
| * resources! It is a work-around for a bug in Windows 95 |
| * (see microsoft knowledge base article, Q187684) which |
| * does Bad Things when FreeLibrary is called within |
| * the DLL_PROCESS_DETACH code, in certain situations. |
| * Since w95 just happens to be a platform which does not |
| * provide InterlockedCompareExchange, the bug will be |
| * effortlessly avoided. |
| */ |
| (void) FreeLibrary (ptw32_h_kernel32); |
| ptw32_h_kernel32 = 0; |
| } |
| else |
| { |
| ptw32_features |= PTW32_SYSTEM_INTERLOCKED_COMPARE_EXCHANGE; |
| } |
| |
| /* |
| * Load QUSEREX.DLL and try to get address of QueueUserAPCEx |
| */ |
| ptw32_h_quserex = LoadLibrary (TEXT ("QUSEREX.DLL")); |
| |
| if (ptw32_h_quserex != NULL) |
| { |
| ptw32_register_cancelation = (DWORD (*)(PAPCFUNC, HANDLE, DWORD)) |
| #if defined(NEED_UNICODE_CONSTS) |
| GetProcAddress (ptw32_h_quserex, |
| (const TCHAR *) TEXT ("QueueUserAPCEx")); |
| #else |
| GetProcAddress (ptw32_h_quserex, (LPCSTR) "QueueUserAPCEx"); |
| #endif |
| } |
| |
| if (NULL == ptw32_register_cancelation) |
| { |
| ptw32_register_cancelation = ptw32_RegisterCancelation; |
| |
| if (ptw32_h_quserex != NULL) |
| { |
| (void) FreeLibrary (ptw32_h_quserex); |
| } |
| ptw32_h_quserex = 0; |
| } |
| else |
| { |
| /* Initialise QueueUserAPCEx */ |
| BOOL (*queue_user_apc_ex_init) (VOID); |
| |
| queue_user_apc_ex_init = (BOOL (*)(VOID)) |
| #if defined(NEED_UNICODE_CONSTS) |
| GetProcAddress (ptw32_h_quserex, |
| (const TCHAR *) TEXT ("QueueUserAPCEx_Init")); |
| #else |
| GetProcAddress (ptw32_h_quserex, (LPCSTR) "QueueUserAPCEx_Init"); |
| #endif |
| |
| if (queue_user_apc_ex_init == NULL || !queue_user_apc_ex_init ()) |
| { |
| ptw32_register_cancelation = ptw32_RegisterCancelation; |
| |
| (void) FreeLibrary (ptw32_h_quserex); |
| ptw32_h_quserex = 0; |
| } |
| } |
| |
| if (ptw32_h_quserex) |
| { |
| ptw32_features |= PTW32_ALERTABLE_ASYNC_CANCEL; |
| } |
| |
| return result; |
| } |
| |
| |
| 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_attach_np () |
| { |
| 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_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_test_features_np (int feature_mask) |
| { |
| return ((ptw32_features & feature_mask) == feature_mask); |
| } |