cvs update pthreads

1 files changed, 314 insertions, 303 deletions

diff --git a/pthreads/pthread_win32_attach_detach_np.c b/pthreads/pthread_win32_attach_detach_np.c
index 2f0bc373a..cdb5a73b4 100644
--- a/pthreads/pthread_win32_attach_detach_np.c
+++ b/pthreads/pthread_win32_attach_detach_np.c
@@ -1,303 +1,314 @@
-/*
- * 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);
-}
+/*

+ * 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 _WIN64

+

+/*

+ * InterlockedCompareExchange routine in WIN64 is an intrinsic function.

+ * See PTW32_INTERLOCKED_COMPARE_EXCHANGE implement.h

+ */

+

+#else

+

+#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;

+    }

+

+#endif

+

+  /*

+   * 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);

+}