version 1.89.12.2, 2006/06/29 22:50:04
|
version 1.90.2.6, 2006/07/29 01:03:42
|
|
|
| |
#include "Thread.h" | #include "Thread.h" |
#include <exception> | #include <exception> |
#include <Pegasus/Common/IPC.h> |
|
#include <Pegasus/Common/Tracer.h> | #include <Pegasus/Common/Tracer.h> |
|
#include "Time.h" |
| |
#if defined(PEGASUS_OS_TYPE_WINDOWS) |
PEGASUS_USING_STD; |
# include "ThreadWindows.cpp" |
|
#elif defined(PEGASUS_OS_TYPE_UNIX) |
PEGASUS_NAMESPACE_BEGIN |
# include "ThreadUnix.cpp" |
|
#elif defined(PEGASUS_OS_TYPE_NSK) |
//============================================================================== |
# include "ThreadNsk.cpp" |
// |
#elif defined(PEGASUS_OS_VMS) |
// POSIX Threads Implementation: |
# include "ThreadVms.cpp" |
// |
|
//============================================================================== |
|
|
|
#if defined(PEGASUS_HAVE_PTHREADS) |
|
|
|
extern "C" void* _start_wrapper(void* arg_) |
|
{ |
|
StartWrapperArg* arg = (StartWrapperArg*)arg_; |
|
|
|
void* return_value = (*arg->start)(arg->arg); |
|
delete arg; |
|
|
|
return return_value; |
|
} |
|
|
|
static sigset_t *block_signal_mask(sigset_t *sig) |
|
{ |
|
sigemptyset(sig); |
|
// should not be used for main() |
|
sigaddset(sig, SIGHUP); |
|
sigaddset(sig, SIGINT); |
|
// maybe useless, since KILL can't be blocked according to POSIX |
|
sigaddset(sig, SIGKILL); |
|
|
|
sigaddset(sig, SIGABRT); |
|
sigaddset(sig, SIGALRM); |
|
sigaddset(sig, SIGPIPE); |
|
|
|
|
|
// Note: older versions of the linux pthreads library use SIGUSR1 and SIGUSR2 |
|
// internally to stop and start threads that are blocking, the newer ones |
|
// implement this through the kernel's real time signals |
|
// since SIGSTOP/CONT can handle suspend()/resume() on Linux |
|
// block them |
|
// #if defined(PEGASUS_PLATFORM_LINUX_IX86_GNU) |
|
// sigaddset(sig, SIGUSR1); |
|
// sigaddset(sig, SIGUSR2); |
|
// #endif |
|
#ifndef PEGASUS_PLATFORM_ZOS_ZSERIES_IBM |
|
pthread_sigmask(SIG_BLOCK, sig, NULL); |
#else | #else |
# error "Unsupported platform" |
sigprocmask(SIG_BLOCK, sig, NULL); |
#endif | #endif |
|
return sig; |
|
} |
| |
PEGASUS_USING_STD; |
Thread::Thread( |
PEGASUS_NAMESPACE_BEGIN |
ThreadReturnType (PEGASUS_THREAD_CDECL *start)(void *), |
|
void *parameter, |
|
Boolean detached) |
|
: _is_detached(detached), |
|
_cancel_enabled(true), |
|
_cancelled(false), |
|
_start(start), |
|
_cleanup(), |
|
_tsd(), |
|
_thread_parm(parameter), |
|
_exit_code(0) |
|
{ |
|
Threads::clear(_handle.thid); |
|
} |
|
|
|
Thread::~Thread() |
|
{ |
|
try |
|
{ |
|
join(); |
|
empty_tsd(); |
|
} |
|
catch (...) |
|
{ |
|
// Do not allow the destructor to throw an exception |
|
} |
|
} |
| |
|
#endif /* PEGASUS_HAVE_PTHREADS */ |
|
|
|
//============================================================================== |
|
// |
|
// Windows Threads Implementation: |
|
// |
|
//============================================================================== |
|
|
|
#if defined(PEGASUS_HAVE_WINDOWS_THREADS) |
|
|
|
Thread::Thread( |
|
ThreadReturnType ( PEGASUS_THREAD_CDECL *start )( void* ), |
|
void* parameter, |
|
Boolean detached ) |
|
: |
|
_is_detached( detached ), |
|
_cancel_enabled( true ), |
|
_cancelled( false ), |
|
_start( start ), |
|
_cleanup(), |
|
_tsd( ), |
|
_thread_parm( parameter ), |
|
_exit_code( 0 ) |
|
{ |
|
Threads::clear(_handle.thid); |
|
} |
|
|
|
Thread::~Thread() |
|
{ |
|
try |
|
{ |
|
join(); |
|
empty_tsd(); |
|
} |
|
catch(...) |
|
{ |
|
} |
|
} |
|
|
|
#endif /* PEGASUS_HAVE_WINDOWS_THREADS */ |
|
|
|
//============================================================================== |
|
// |
|
// Common implementation: |
|
// |
|
//============================================================================== |
| |
void thread_data::default_delete(void * data) | void thread_data::default_delete(void * data) |
{ | { |
|
|
::operator delete(data); | ::operator delete(data); |
} | } |
| |
// l10n start |
|
void language_delete(void * data) | void language_delete(void * data) |
{ | { |
if( data != NULL) | if( data != NULL) |
|
|
AutoPtr<AcceptLanguageList> al(static_cast<AcceptLanguageList *>(data)); | AutoPtr<AcceptLanguageList> al(static_cast<AcceptLanguageList *>(data)); |
} | } |
} | } |
// l10n end |
|
| |
Boolean Thread::_signals_blocked = false; | Boolean Thread::_signals_blocked = false; |
// l10n |
|
#ifndef PEGASUS_OS_ZOS | #ifndef PEGASUS_OS_ZOS |
PEGASUS_THREAD_KEY_TYPE Thread::_platform_thread_key = PEGASUS_THREAD_KEY_TYPE(-1); |
TSDKeyType Thread::_platform_thread_key = TSDKeyType(-1); |
#else | #else |
PEGASUS_THREAD_KEY_TYPE Thread::_platform_thread_key; |
TSDKeyType Thread::_platform_thread_key; |
#endif | #endif |
Boolean Thread::_key_initialized = false; | Boolean Thread::_key_initialized = false; |
Boolean Thread::_key_error = false; | Boolean Thread::_key_error = false; |
| |
|
|
void Thread::cleanup_push( void (*routine)(void *), void *parm) | void Thread::cleanup_push( void (*routine)(void *), void *parm) |
{ | { |
AutoPtr<cleanup_handler> cu(new cleanup_handler(routine, parm)); | AutoPtr<cleanup_handler> cu(new cleanup_handler(routine, parm)); |
|
|
//thread_data *Thread::put_tsd(const Sint8 *key, void (*delete_func)(void *), Uint32 size, void *value) | //thread_data *Thread::put_tsd(const Sint8 *key, void (*delete_func)(void *), Uint32 size, void *value) |
| |
| |
#ifndef PEGASUS_THREAD_EXIT_NATIVE |
void Thread::exit_self(ThreadReturnType exit_code) |
void Thread::exit_self(PEGASUS_THREAD_RETURN exit_code) |
|
{ | { |
|
#if defined(PEGASUS_PLATFORM_HPUX_ACC) || \ |
|
defined(PEGASUS_PLATFORM_LINUX_GENERIC_GNU) |
|
// NOTE: pthread_exit exhibits unusual behavior on RHEL 3 U2, as |
|
// documented in Bugzilla 3836. Where feasible, it may be advantageous |
|
// to avoid using this function. |
|
pthread_exit(exit_code); |
|
#else |
// execute the cleanup stack and then return | // execute the cleanup stack and then return |
while( _cleanup.size() ) | while( _cleanup.size() ) |
{ | { |
|
|
} | } |
} | } |
_exit_code = exit_code; | _exit_code = exit_code; |
exit_thread(exit_code); |
Threads::exit(exit_code); |
_handle.thid = 0; |
Threads::clear(_handle.thid); |
} |
|
|
|
|
|
#endif | #endif |
|
} |
| |
// l10n start |
|
Sint8 Thread::initializeKey() | Sint8 Thread::initializeKey() |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::initializeKey"); | PEG_METHOD_ENTER(TRC_THREAD, "Thread::initializeKey"); |
|
|
return -1; | return -1; |
} | } |
| |
if (pegasus_key_create(&Thread::_platform_thread_key) == 0) |
if (TSDKey::create(&Thread::_platform_thread_key) == 0) |
{ | { |
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, | Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
"Thread: able to create a thread key"); | "Thread: able to create a thread key"); |
|
|
return NULL; | return NULL; |
} | } |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
return (Thread *)pegasus_get_thread_specific(_platform_thread_key); |
return (Thread *)TSDKey::get_thread_specific(_platform_thread_key); |
} | } |
| |
void Thread::setCurrent(Thread * thrd) | void Thread::setCurrent(Thread * thrd) |
|
|
PEG_METHOD_ENTER(TRC_THREAD, "Thread::setCurrent"); | PEG_METHOD_ENTER(TRC_THREAD, "Thread::setCurrent"); |
if (Thread::initializeKey() == 0) | if (Thread::initializeKey() == 0) |
{ | { |
if (pegasus_set_thread_specific( |
if (TSDKey::set_thread_specific( |
Thread::_platform_thread_key, (void *) thrd) == 0) | Thread::_platform_thread_key, (void *) thrd) == 0) |
{ | { |
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, | Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
|
|
| |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
} | } |
// l10n end |
|
|
|
| |
/////////////////////////////////////////////////////////////////////////////// | /////////////////////////////////////////////////////////////////////////////// |
// | // |
|
|
_dying++; | _dying++; |
Tracer::trace(TRC_THREAD, Tracer::LEVEL2, | Tracer::trace(TRC_THREAD, Tracer::LEVEL2, |
"Cleaning up %d idle threads. ", _currentThreads.get()); | "Cleaning up %d idle threads. ", _currentThreads.get()); |
|
|
while (_currentThreads.get() > 0) | while (_currentThreads.get() > 0) |
{ | { |
Thread* thread = _idleThreads.remove_front(); | Thread* thread = _idleThreads.remove_front(); |
|
|
} | } |
else | else |
{ | { |
pegasus_yield(); |
Threads::yield(); |
} | } |
} | } |
} | } |
|
|
} | } |
} | } |
| |
PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL ThreadPool::_loop(void* parm) |
ThreadReturnType PEGASUS_THREAD_CDECL ThreadPool::_loop(void* parm) |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "ThreadPool::_loop"); | PEG_METHOD_ENTER(TRC_THREAD, "ThreadPool::_loop"); |
| |
|
|
pool->_idleThreads.remove(myself); | pool->_idleThreads.remove(myself); |
pool->_currentThreads--; | pool->_currentThreads--; |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
return((PEGASUS_THREAD_RETURN)1); |
return((ThreadReturnType)1); |
} | } |
| |
while (1) | while (1) |
|
|
pool->_idleThreads.remove(myself); | pool->_idleThreads.remove(myself); |
pool->_currentThreads--; | pool->_currentThreads--; |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
return((PEGASUS_THREAD_RETURN)1); |
return((ThreadReturnType)1); |
} | } |
| |
// When we awaken we reside on the _runningThreads queue, not the | // When we awaken we reside on the _runningThreads queue, not the |
// _idleThreads queue. | // _idleThreads queue. |
| |
PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL* work)(void *) = 0; |
ThreadReturnType (PEGASUS_THREAD_CDECL* work)(void *) = 0; |
void* parm = 0; | void* parm = 0; |
Semaphore* blocking_sem = 0; | Semaphore* blocking_sem = 0; |
| |
try | try |
{ | { |
work = (PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL *)(void *)) |
work = (ThreadReturnType (PEGASUS_THREAD_CDECL *)(void *)) |
myself->reference_tsd("work func"); | myself->reference_tsd("work func"); |
myself->dereference_tsd(); | myself->dereference_tsd(); |
parm = myself->reference_tsd("work parm"); | parm = myself->reference_tsd("work parm"); |
|
|
pool->_idleThreads.remove(myself); | pool->_idleThreads.remove(myself); |
pool->_currentThreads--; | pool->_currentThreads--; |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
return((PEGASUS_THREAD_RETURN)1); |
return((ThreadReturnType)1); |
} | } |
| |
if (work == 0) | if (work == 0) |
|
|
break; | break; |
} | } |
| |
gettimeofday(lastActivityTime, NULL); |
Time::gettimeofday(lastActivityTime); |
| |
try | try |
{ | { |
|
|
// put myself back onto the available list | // put myself back onto the available list |
try | try |
{ | { |
gettimeofday(lastActivityTime, NULL); |
Time::gettimeofday(lastActivityTime); |
if (blocking_sem != 0) | if (blocking_sem != 0) |
{ | { |
blocking_sem->signal(); | blocking_sem->signal(); |
|
|
PEGASUS_ASSERT(false); | PEGASUS_ASSERT(false); |
pool->_currentThreads--; | pool->_currentThreads--; |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
return((PEGASUS_THREAD_RETURN)1); |
return((ThreadReturnType)1); |
} | } |
} | } |
} | } |
|
|
} | } |
| |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
return((PEGASUS_THREAD_RETURN)0); |
return((ThreadReturnType)0); |
} | } |
| |
ThreadStatus ThreadPool::allocate_and_awaken( | ThreadStatus ThreadPool::allocate_and_awaken( |
void* parm, | void* parm, |
PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL* work)(void *), |
ThreadReturnType (PEGASUS_THREAD_CDECL* work)(void *), |
Semaphore* blocking) | Semaphore* blocking) |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "ThreadPool::allocate_and_awaken"); | PEG_METHOD_ENTER(TRC_THREAD, "ThreadPool::allocate_and_awaken"); |
|
|
return PEGASUS_THREAD_UNAVAILABLE; | return PEGASUS_THREAD_UNAVAILABLE; |
} | } |
struct timeval start; | struct timeval start; |
gettimeofday(&start, NULL); |
Time::gettimeofday(&start); |
Thread* th = 0; | Thread* th = 0; |
| |
th = _idleThreads.remove_front(); | th = _idleThreads.remove_front(); |
|
|
| |
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( ThreadReturnType (PEGASUS_THREAD_CDECL *)(void *)), |
(void *)work); | (void *)work); |
th->delete_tsd("work parm"); | th->delete_tsd("work parm"); |
th->put_tsd("work parm", NULL, sizeof(void *), parm); | th->put_tsd("work parm", NULL, sizeof(void *), parm); |
|
|
thread->delete_tsd("work func"); | thread->delete_tsd("work func"); |
thread->put_tsd( | thread->put_tsd( |
"work func", 0, | "work func", 0, |
sizeof(PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL *)(void *)), |
sizeof(ThreadReturnType (PEGASUS_THREAD_CDECL *)(void *)), |
(void *) 0); | (void *) 0); |
thread->delete_tsd("work parm"); | thread->delete_tsd("work parm"); |
thread->put_tsd("work parm", 0, sizeof(void *), 0); | thread->put_tsd("work parm", 0, sizeof(void *), 0); |
|
|
| |
struct timeval now, finish, remaining; | struct timeval now, finish, remaining; |
Uint32 usec; | Uint32 usec; |
pegasus_gettimeofday(&now); |
Time::gettimeofday(&now); |
pegasus_gettimeofday(&remaining); // Avoid valgrind error |
Time::gettimeofday(&remaining); // Avoid valgrind error |
| |
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; |
|
|
usec %= 1000000; | usec %= 1000000; |
finish.tv_usec = usec; | finish.tv_usec = usec; |
| |
return (timeval_subtract(&remaining, &finish, &now) != 0); |
return (Time::subtract(&remaining, &finish, &now) != 0); |
} | } |
| |
void ThreadPool::_deleteSemaphore(void *p) | void ThreadPool::_deleteSemaphore(void *p) |
|
|
| |
struct timeval* lastActivityTime = | struct timeval* lastActivityTime = |
(struct timeval *) ::operator new(sizeof(struct timeval)); | (struct timeval *) ::operator new(sizeof(struct timeval)); |
pegasus_gettimeofday(lastActivityTime); |
Time::gettimeofday(lastActivityTime); |
| |
th->put_tsd("last activity time", thread_data::default_delete, | th->put_tsd("last activity time", thread_data::default_delete, |
sizeof(struct timeval), (void *)lastActivityTime); | sizeof(struct timeval), (void *)lastActivityTime); |
|
|
return 0; | return 0; |
} | } |
_currentThreads++; | _currentThreads++; |
pegasus_yield(); |
Threads::yield(); |
| |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
return th; | return th; |
|
|
} | } |
} | } |
| |
|
// ATTN: not sure where to put this! |
|
#ifdef PEGASUS_ZOS_SECURITY |
|
bool isEnhancedSecurity=99; |
|
#endif |
|
|
PEGASUS_NAMESPACE_END | PEGASUS_NAMESPACE_END |