native_client_sdk/src/libraries/third_party/pthreads-win32/ptw32_throw.c

   1 /*
   2  * ptw32_throw.c
   3  *
   4  * Description:
   5  * This translation unit implements routines which are private to
   6  * the implementation and may be used throughout it.
   7  *
   8  * --------------------------------------------------------------------------
   9  *
  10  *      Pthreads-win32 - POSIX Threads Library for Win32
  11  *      Copyright(C) 1998 John E. Bossom
  12  *      Copyright(C) 1999,2005 Pthreads-win32 contributors
  13  *
  14  *      Contact Email: rpj@callisto.canberra.edu.au
  15  *
  16  *      The current list of contributors is contained
  17  *      in the file CONTRIBUTORS included with the source
  18  *      code distribution. The list can also be seen at the
  19  *      following World Wide Web location:
  20  *      http://sources.redhat.com/pthreads-win32/contributors.html
  21  *
  22  *      This library is free software; you can redistribute it and/or
  23  *      modify it under the terms of the GNU Lesser General Public
  24  *      License as published by the Free Software Foundation; either
  25  *      version 2 of the License, or (at your option) any later version.
  26  *
  27  *      This library is distributed in the hope that it will be useful,
  28  *      but WITHOUT ANY WARRANTY; without even the implied warranty of
  29  *      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  30  *      Lesser General Public License for more details.
  31  *
  32  *      You should have received a copy of the GNU Lesser General Public
  33  *      License along with this library in the file COPYING.LIB;
  34  *      if not, write to the Free Software Foundation, Inc.,
  35  *      59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  36  */
  37
  38 #include "pthread.h"
  39 #include "implement.h"
  40
  41 #if defined(__CLEANUP_C)
  42 # include <setjmp.h>
  43 #endif
  44
  45 /*
  46  * ptw32_throw
  47  *
  48  * All canceled and explicitly exited POSIX threads go through
  49  * here. This routine knows how to exit both POSIX initiated threads and
  50  * 'implicit' POSIX threads for each of the possible language modes (C,
  51  * C++, and SEH).
  52  */
  53 #if defined(_MSC_VER)
  54 /*
  55  * Ignore the warning:
  56  * "C++ exception specification ignored except to indicate that
  57  * the function is not __declspec(nothrow)."
  58  */
  59 #pragma warning(disable:4290)
  60 #endif
  61 void
  62 ptw32_throw (DWORD exception)
  63 #if defined(__CLEANUP_CXX)
  64   throw(ptw32_exception_cancel,ptw32_exception_exit)
  65 #endif
  66 {
  67   /*
  68    * Don't use pthread_self() to avoid creating an implicit POSIX thread handle
  69    * unnecessarily.
  70    */
  71   ptw32_thread_t * sp = (ptw32_thread_t *) pthread_getspecific (ptw32_selfThreadKey);
  72
  73 #if defined(__CLEANUP_SEH)
  74   DWORD exceptionInformation[3];
  75 #endif
  76
  77   sp->state = PThreadStateExiting;
  78
  79   if (exception != PTW32_EPS_CANCEL && exception != PTW32_EPS_EXIT)
  80     {
  81       /* Should never enter here */
  82       exit (1);
  83     }
  84
  85   if (NULL == sp || sp->implicit)
  86     {
  87       /*
  88        * We're inside a non-POSIX initialised Win32 thread
  89        * so there is no point to jump or throw back to. Just do an
  90        * explicit thread exit here after cleaning up POSIX
  91        * residue (i.e. cleanup handlers, POSIX thread handle etc).
  92        */
  93 #if ! (defined(__MINGW64__) || defined(__MINGW32__)) || defined (__MSVCRT__) || defined (__DMC__)
  94       unsigned exitCode = 0;
  95
  96       switch (exception)
  97         {
  98         case PTW32_EPS_CANCEL:
  99           exitCode = (unsigned)(size_t) PTHREAD_CANCELED;
 100           break;
 101         case PTW32_EPS_EXIT:
 102           if (NULL != sp)
 103             {
 104               exitCode = (unsigned)(size_t) sp->exitStatus;
 105             }
 106           break;
 107         }
 108 #endif
 109
 110 #if defined(PTW32_STATIC_LIB)
 111
 112       pthread_win32_thread_detach_np ();
 113
 114 #endif
 115
 116 #if ! (defined(__MINGW64__) || defined(__MINGW32__)) || defined (__MSVCRT__) || defined (__DMC__)
 117       _endthreadex (exitCode);
 118 #else
 119       _endthread ();
 120 #endif
 121
 122     }
 123
 124 #if defined(__CLEANUP_SEH)
 125
 126
 127   exceptionInformation[0] = (DWORD) (exception);
 128   exceptionInformation[1] = (DWORD) (0);
 129   exceptionInformation[2] = (DWORD) (0);
 130
 131   RaiseException (EXCEPTION_PTW32_SERVICES, 0, 3, exceptionInformation);
 132
 133 #else /* __CLEANUP_SEH */
 134
 135 #if defined(__CLEANUP_C)
 136
 137   ptw32_pop_cleanup_all (1);
 138   longjmp (sp->start_mark, exception);
 139
 140 #else /* __CLEANUP_C */
 141
 142 #if defined(__CLEANUP_CXX)
 143
 144   switch (exception)
 145     {
 146     case PTW32_EPS_CANCEL:
 147       throw ptw32_exception_cancel ();
 148       break;
 149     case PTW32_EPS_EXIT:
 150       throw ptw32_exception_exit ();
 151       break;
 152     }
 153
 154 #else
 155
 156 #error ERROR [__FILE__, line __LINE__]: Cleanup type undefined.
 157
 158 #endif /* __CLEANUP_CXX */
 159
 160 #endif /* __CLEANUP_C */
 161
 162 #endif /* __CLEANUP_SEH */
 163
 164   /* Never reached */
 165 }
 166
 167
 168 void
 169 ptw32_pop_cleanup_all (int execute)
 170 {
 171   while (NULL != ptw32_pop_cleanup (execute))
 172     {
 173     }
 174 }
 175
 176
 177 DWORD
 178 ptw32_get_exception_services_code (void)
 179 {
 180 #if defined(__CLEANUP_SEH)
 181
 182   return EXCEPTION_PTW32_SERVICES;
 183
 184 #else
 185
 186   return (DWORD)0;
 187
 188 #endif
 189 }