version 1.25, 2002/08/31 18:41:01
|
version 1.36.4.6, 2003/08/14 14:26:20
|
|
|
| |
PEGASUS_NAMESPACE_BEGIN | PEGASUS_NAMESPACE_BEGIN |
| |
|
|
void thread_data::default_delete(void * data) | void thread_data::default_delete(void * data) |
{ | { |
if( data != NULL) | if( data != NULL) |
|
|
} | } |
| |
Boolean Thread::_signals_blocked = false; | Boolean Thread::_signals_blocked = false; |
|
// l10n |
|
|
|
|
|
// l10n |
|
PEGASUS_THREAD_KEY_TYPE Thread::_platform_thread_key; |
|
Boolean Thread::_key_initialized = false; |
|
Boolean Thread::_key_error = false; |
| |
// for non-native implementations | // for non-native implementations |
#ifndef PEGASUS_THREAD_CLEANUP_NATIVE | #ifndef PEGASUS_THREAD_CLEANUP_NATIVE |
|
|
| |
#endif | #endif |
| |
|
// l10n start |
|
Sint8 Thread::initializeKey() |
|
{ |
|
PEG_METHOD_ENTER(TRC_THREAD, "Thread::initializeKey"); |
|
if (!Thread::_key_initialized) |
|
{ |
|
if (Thread::_key_error) |
|
{ |
|
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
|
"Thread: ERROR - thread key error"); |
|
return -1; |
|
} |
|
|
|
if (pegasus_key_create(&Thread::_platform_thread_key) == 0) |
|
{ |
|
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
|
"Thread: able to create a thread key"); |
|
Thread::_key_initialized = true; |
|
} |
|
else |
|
{ |
|
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
|
"Thread: ERROR - unable to create a thread key"); |
|
Thread::_key_error = true; |
|
return -1; |
|
} |
|
} |
|
|
|
PEG_METHOD_EXIT(); |
|
return 0; |
|
} |
|
|
|
Thread * Thread::getCurrent() |
|
{ |
|
PEG_METHOD_ENTER(TRC_THREAD, "Thread::getCurrent"); |
|
if (Thread::initializeKey() != 0) |
|
{ |
|
return NULL; |
|
} |
|
PEG_METHOD_EXIT(); |
|
return (Thread *)pegasus_get_thread_specific(_platform_thread_key); |
|
} |
|
|
|
void Thread::setCurrent(Thread * thrd) |
|
{ |
|
PEG_METHOD_ENTER(TRC_THREAD, "Thread::setCurrent"); |
|
if (Thread::initializeKey() == 0) |
|
{ |
|
if (pegasus_set_thread_specific(Thread::_platform_thread_key, |
|
(void *) thrd) == 0) |
|
{ |
|
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
|
"Successful set Thread * into thread specific storage"); |
|
} |
|
else |
|
{ |
|
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
|
"ERROR: got error setting Thread * into thread specific storage"); |
|
} |
|
} |
|
PEG_METHOD_EXIT(); |
|
} |
|
|
|
AcceptLanguages * Thread::getLanguages() |
|
{ |
|
PEG_METHOD_ENTER(TRC_THREAD, "Thread::getLanguages"); |
|
|
|
Thread * curThrd = Thread::getCurrent(); |
|
if (curThrd == NULL) |
|
return NULL; |
|
AcceptLanguages * acceptLangs = |
|
(AcceptLanguages *)curThrd->reference_tsd("acceptLanguages"); |
|
curThrd->dereference_tsd(); |
|
PEG_METHOD_EXIT(); |
|
return acceptLangs; |
|
} |
|
|
|
void Thread::setLanguages(AcceptLanguages *langs) //l10n |
|
{ |
|
PEG_METHOD_ENTER(TRC_THREAD, "Thread::setLanguages"); |
|
|
|
Thread * currentThrd = Thread::getCurrent(); |
|
if (currentThrd != NULL) |
|
{ |
|
// deletes the old tsd and creates a new one |
|
currentThrd->put_tsd("acceptLanguages", |
|
thread_data::default_delete, |
|
sizeof(AcceptLanguages *), |
|
langs); |
|
} |
|
|
|
PEG_METHOD_EXIT(); |
|
} |
|
|
|
void Thread::clearLanguages() //l10n |
|
{ |
|
PEG_METHOD_ENTER(TRC_THREAD, "Thread::clearLanguages"); |
|
|
|
Thread * currentThrd = Thread::getCurrent(); |
|
if (currentThrd != NULL) |
|
{ |
|
// deletes the old tsd |
|
currentThrd->delete_tsd("acceptLanguages"); |
|
} |
|
|
|
PEG_METHOD_EXIT(); |
|
} |
|
// l10n end |
|
|
DQueue<ThreadPool> ThreadPool::_pools(true); | DQueue<ThreadPool> ThreadPool::_pools(true); |
| |
| |
|
|
_link_pool(_init_thread()); | _link_pool(_init_thread()); |
} | } |
_pools.insert_last(this); | _pools.insert_last(this); |
|
|
} | } |
| |
| |
| |
ThreadPool::~ThreadPool(void) | ThreadPool::~ThreadPool(void) |
{ | { |
|
try |
|
{ |
_pools.remove(this); | _pools.remove(this); |
_dying++; | _dying++; |
Thread *th = 0; | Thread *th = 0; |
|
|
delete th; | delete th; |
th = _dead.remove_first(); | th = _dead.remove_first(); |
} | } |
|
} |
|
catch(...) |
|
{ |
|
} |
} | } |
| |
// make this static to the class | // make this static to the class |
|
|
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
throw NullPointer(); | throw NullPointer(); |
} | } |
|
|
|
// l10n |
|
// Set myself into thread specific storage |
|
// This will allow code to get its own Thread |
|
Thread::setCurrent(myself); |
|
|
ThreadPool *pool = (ThreadPool *)myself->get_parm(); | ThreadPool *pool = (ThreadPool *)myself->get_parm(); |
if(pool == 0 ) | if(pool == 0 ) |
{ | { |
|
|
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
myself->exit_self(0); | myself->exit_self(0); |
} | } |
|
catch(...) |
|
{ |
|
PEG_METHOD_EXIT(); |
|
myself->exit_self(0); |
|
} |
|
|
if(sleep_sem == 0 || deadlock_timer == 0) | if(sleep_sem == 0 || deadlock_timer == 0) |
{ | { |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
|
|
{ | { |
gettimeofday(deadlock_timer, NULL); | gettimeofday(deadlock_timer, NULL); |
} | } |
|
|
gettimeofday(deadlock_timer, NULL); | gettimeofday(deadlock_timer, NULL); |
if( blocking_sem != 0 ) | if( blocking_sem != 0 ) |
blocking_sem->signal(); | blocking_sem->signal(); |
|
|
// first go thread the dead q and clean it up as much as possible | // first go thread the dead q and clean it up as much as possible |
while(_dead.count() > 0) | while(_dead.count() > 0) |
{ | { |
|
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, "ThreadPool:: removing and joining dead thread"); |
Thread *dead = _dead.remove_first(); | Thread *dead = _dead.remove_first(); |
if(dead == 0) | if(dead == 0) |
throw NullPointer(); | throw NullPointer(); |
if(dead->_handle.thid != 0) |
dead->join(); |
{ |
|
dead->detach(); |
|
destroy_thread(dead->_handle.thid, 0); |
|
dead->_handle.thid = 0; |
|
while(dead->_cleanup.count() ) |
|
{ |
|
// this may throw a permission exception, |
|
// which I will remove from the code prior to stabilizing |
|
dead->cleanup_pop(true); |
|
} |
|
} |
|
delete dead; | delete dead; |
pegasus_sleep(1); |
|
} | } |
| |
DQueue<Thread> * map[2] = | DQueue<Thread> * map[2] = |
|
|
int i = 0; | int i = 0; |
AtomicInt needed(0); | AtomicInt needed(0); |
| |
|
#ifdef PEGASUS_DISABLE_KILLING_HUNG_THREADS |
|
// This change prevents the thread pool from killing "hung" threads. |
|
// The definition of a "hung" thread is one that has been on the run queue |
|
// for longer than the time interval set when the thread pool was created. |
|
// Cancelling "hung" threads has proven to be problematic. |
|
|
|
// With this change the thread pool will not cancel "hung" threads. This |
|
// may prevent a crash depending upon the state of the "hung" thread. In |
|
// the case that the thread is actually hung, this change causes the |
|
// thread resources not to be reclaimed. |
|
|
|
// Idle threads, those that have not executed a routine for a time |
|
// interval, continue to be destroyed. This is normal and should not |
|
// cause any problems. |
|
for( ; i < 1; i++) |
|
#else |
for( ; i < 2; i++) | for( ; i < 2; i++) |
|
#endif |
{ | { |
q = map[i]; | q = map[i]; |
if(q->count() > 0 ) | if(q->count() > 0 ) |
|
|
| |
if(th != 0) | if(th != 0) |
{ | { |
|
if( i == 0 ) |
|
{ |
th->delete_tsd("work func"); | th->delete_tsd("work func"); |
th->put_tsd("work func", NULL, | th->put_tsd("work func", NULL, |
sizeof( PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL *)(void *)), | sizeof( PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL *)(void *)), |
|
|
throw NullPointer(); | throw NullPointer(); |
} | } |
| |
// put the thread on the dead list |
|
_dead.insert_first(th); |
|
bodies++; | bodies++; |
sleep_sem->signal(); |
|
|
|
th->dereference_tsd(); | th->dereference_tsd(); |
|
_dead.insert_first(th); |
|
sleep_sem->signal(); |
th = 0; | th = 0; |
} | } |
|
else |
|
{ |
|
// deadlocked threads |
|
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, "Killing a deadlocked thread"); |
|
th->cancel(); |
|
delete th; |
|
} |
|
} |
} | } |
th = q->next(th); | th = q->next(th); |
pegasus_sleep(1); | pegasus_sleep(1); |
|
|
| |
struct timeval now, finish, remaining; | struct timeval now, finish, remaining; |
Uint32 usec; | Uint32 usec; |
gettimeofday(&now, NULL); |
pegasus_gettimeofday(&now); |
|
/* remove valgrind error */ |
|
pegasus_gettimeofday(&remaining); |
|
|
| |
finish.tv_sec = start->tv_sec + interval->tv_sec; | finish.tv_sec = start->tv_sec + interval->tv_sec; |
usec = start->tv_usec + interval->tv_usec; | usec = start->tv_usec + interval->tv_usec; |
|
|
return false; | return false; |
} | } |
| |
|
|
PEGASUS_THREAD_RETURN ThreadPool::_undertaker( void *parm ) | PEGASUS_THREAD_RETURN ThreadPool::_undertaker( void *parm ) |
{ | { |
Thread *myself = reinterpret_cast<Thread *>(parm); |
exit_thread((PEGASUS_THREAD_RETURN)1); |
if(myself != 0) |
return (PEGASUS_THREAD_RETURN)1; |
{ |
|
myself->detach(); |
|
myself->_handle.thid = 0; |
|
myself->cancel(); |
|
myself->test_cancel(); |
|
myself->exit_self(0); |
|
} |
|
return((PEGASUS_THREAD_RETURN)0); |
|
} | } |
| |
| |
|
|
th->put_tsd("sleep sem", &_sleep_sem_del, sizeof(Semaphore), (void *)sleep_sem); | th->put_tsd("sleep sem", &_sleep_sem_del, sizeof(Semaphore), (void *)sleep_sem); |
| |
struct timeval *dldt = (struct timeval *) ::operator new(sizeof(struct timeval)); | struct timeval *dldt = (struct timeval *) ::operator new(sizeof(struct timeval)); |
|
pegasus_gettimeofday(dldt); |
|
|
th->put_tsd("deadlock timer", thread_data::default_delete, sizeof(struct timeval), (void *)dldt); | th->put_tsd("deadlock timer", thread_data::default_delete, sizeof(struct timeval), (void *)dldt); |
// thread will enter _loop(void *) and sleep on sleep_sem until we signal it | // thread will enter _loop(void *) and sleep on sleep_sem until we signal it |
|
|
th->run(); | th->run(); |
_current_threads++; | _current_threads++; |
pegasus_yield(); | pegasus_yield(); |
|
|
} | } |
| |
| |
|
|
PEGASUS_NAMESPACE_END | PEGASUS_NAMESPACE_END |
| |