void __RdosRemoveThread( void ) /*****************************/ { thread_data *tdata; int thread_handle; if( __TlsIndex != NO_INDEX ) { tdata = __tls_get_value( __TlsIndex ); if( tdata == NULL ) return; __RemoveThreadData( tdata->thread_id ); __tls_set_value( __TlsIndex, NULL ); } }
// lookup thread data thread_data *__GetThreadData( void ) { thread_data *tdata = NULL; #ifdef __OS2__ TID tid; tid = GetCurrentThreadId(); if( tid <= __MaxThreads ) { tdata = __AllocInitThreadData( tdata ); if( tdata != NULL ) { if( __initthread( tdata ) ) { __FreeInitThreadData( tdata ); tdata = NULL; } else { __ThreadData[tid].data = tdata; __ThreadData[tid].allocated_entry = tdata->__allocated; } } } else { thread_data_list *tdl; thread_data_list **pprev; _AccessTDList(); tdata = NULL; pprev = &__thread_data_list; for( tdl = *pprev; tdl != NULL ; tdl = tdl->next ) { if( tdl->tid == tid ) { tdata = tdl->data; break; } pprev = &(tdl->next); } if( tdata == NULL ) { tdata = __AllocInitThreadData( tdata ); if( tdata != NULL ) { if( !__AddThreadData( tid, tdata ) ) { __FreeInitThreadData( tdata ); tdata = NULL; } } } else if( *pprev ) { // promote to front *pprev = tdl->next; tdl->next = __thread_data_list; __thread_data_list = tdl; // check for need to resize thread data if( tdata->__resize ) { tdata = __ReallocThreadData(); } } _ReleaseTDList(); } #elif defined(__NT__) if( __NTAddThread( tdata ) ) { tdata = (thread_data *)TlsGetValue( __TlsIndex ); } #elif defined(_NETWARE_LIBC) if( __LibCAddThread( tdata ) ) { if(0 != NXKeyGetValue(__NXSlotID, (void **) &tdata)) tdata = NULL; } #elif defined(__RDOS__) if( __RdosAddThread( tdata ) ) { tdata = (thread_data *)__tls_get_value( __TlsIndex ); } #endif if( tdata == NULL ) { __fatal_runtime_error( "Thread has no thread-specific data", 1 ); } return( tdata ); }
thread_data *__MultipleThread( void ) { #if defined( __NT__ ) /* * Preserve old error code -- important because this code can get * called from _STK. */ DWORD old = GetLastError(); thread_data *tdata; tdata = (thread_data *)TlsGetValue( __TlsIndex ); if( tdata == NULL ) { tdata = __GetThreadData(); } else if( tdata->__resize ) { tdata = __ReallocThreadData(); } SetLastError(old); return( tdata ); #elif defined (_NETWARE_LIBC) /* * Preserve old error code -- important because this code can get * called from _STK. */ int old = GetLastError(); int ccode = 0; thread_data *tdata = NULL; if(0 != (ccode = NXKeyGetValue(__NXSlotID, (void **) &tdata))) tdata = NULL; if( tdata == NULL ) { tdata = __GetThreadData(); } else if( tdata->__resize ) { tdata = __ReallocThreadData(); } SetLastError(old); return( tdata ); #elif defined( __WARP__ ) // 32 bit OS/2 TID tid; thread_data *tdata = NULL; tid = GetCurrentThreadId(); if( tid <= __MaxThreads ) { tdata = __ThreadData[tid].data; } if( tdata == NULL ) { tdata = __GetThreadData(); } else if( tdata->__resize ) { tdata = __ReallocThreadData(); } return( tdata ); #elif defined( __OS2_286__ ) // 16 bit OS/2 return( __ThreadData[GetCurrentThreadId()] ); #elif defined( __QNX__ ) void *tdata; __getmagicvar( &tdata, _m_thread_data ); if( tdata == NULL ) { tdata = __QNXAddThread( tdata ); } return( tdata ); #elif defined( __LINUX__ ) // TODO: Init multiple threads for Linux! return( NULL ); #elif defined( __RDOS__ ) thread_data *tdata; tdata = (thread_data *)__tls_get_value( __TlsIndex ); if( tdata == NULL ) tdata = __GetThreadData(); return( tdata ); #elif defined( __RDOSDEV__ ) return( NULL ); #else return( __ThreadData[GetCurrentThreadId()].data ); #endif }