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 61void 62ptw32_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 168void 169ptw32_pop_cleanup_all (int execute) 170{ 171 while (NULL != ptw32_pop_cleanup (execute)) 172 { 173 } 174} 175 176 177DWORD 178ptw32_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} 190