version 1.86, 2005/06/24 19:34:23
|
version 1.100.2.5, 2008/10/23 18:58:28
|
|
|
//%2005//////////////////////////////////////////////////////////////////////// |
//%2006//////////////////////////////////////////////////////////////////////// |
// | // |
// Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development | // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development |
// Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems. | // Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems. |
|
|
// IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group. | // IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group. |
// Copyright (c) 2005 Hewlett-Packard Development Company, L.P.; IBM Corp.; | // Copyright (c) 2005 Hewlett-Packard Development Company, L.P.; IBM Corp.; |
// EMC Corporation; VERITAS Software Corporation; The Open Group. | // EMC Corporation; VERITAS Software Corporation; The Open Group. |
|
// Copyright (c) 2006 Hewlett-Packard Development Company, L.P.; IBM Corp.; |
|
// EMC Corporation; Symantec Corporation; The Open Group. |
// | // |
// Permission is hereby granted, free of charge, to any person obtaining a copy | // Permission is hereby granted, free of charge, to any person obtaining a copy |
// of this software and associated documentation files (the "Software"), to | // of this software and associated documentation files (the "Software"), to |
|
|
// | // |
//============================================================================== | //============================================================================== |
// | // |
// Author: Mike Day (mdday@us.ibm.com) |
|
// |
|
// Modified By: Rudy Schuet (rudy.schuet@compaq.com) 11/12/01 |
|
// added nsk platform support |
|
// Roger Kumpf, Hewlett-Packard Company (roger_kumpf@hp.com) |
|
// Amit K Arora, IBM (amita@in.ibm.com) for PEP#101 |
|
// Sean Keenan, Hewlett-Packard Company (sean.keenan@hp.com) |
|
// David Dillard, VERITAS Software Corp. |
|
// (david.dillard@veritas.com) |
|
// |
|
//%///////////////////////////////////////////////////////////////////////////// | //%///////////////////////////////////////////////////////////////////////////// |
| |
#include "Thread.h" | #include "Thread.h" |
|
#include <errno.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) |
|
# include "ThreadWindows.cpp" |
|
#elif defined(PEGASUS_OS_TYPE_UNIX) |
|
# include "ThreadUnix.cpp" |
|
#elif defined(PEGASUS_OS_TYPE_NSK) |
|
# include "ThreadNsk.cpp" |
|
#elif defined(PEGASUS_OS_VMS) |
|
# include "ThreadVms.cpp" |
|
#else |
|
# error "Unsupported platform" |
|
#endif |
|
| |
PEGASUS_USING_STD; | PEGASUS_USING_STD; |
|
|
PEGASUS_NAMESPACE_BEGIN | PEGASUS_NAMESPACE_BEGIN |
| |
|
//============================================================================== |
|
// |
|
// POSIX Threads Implementation: |
|
// |
|
//============================================================================== |
| |
void thread_data::default_delete(void * data) |
#if defined(PEGASUS_HAVE_PTHREADS) |
{ |
|
if( data != NULL) |
|
::operator delete(data); |
|
} |
|
| |
// l10n start |
struct StartWrapperArg |
void language_delete(void * data) |
|
{ | { |
if( data != NULL) |
void *(PEGASUS_THREAD_CDECL * start) (void *); |
|
void *arg; |
|
}; |
|
|
|
extern "C" void *_start_wrapper(void *arg_) |
{ | { |
AutoPtr<AcceptLanguages> al(static_cast<AcceptLanguages *>(data)); |
// Clean up dynamic memory now to prevent a leak if the thread is canceled. |
} |
StartWrapperArg arg; |
} |
arg.start = ((StartWrapperArg *) arg_)->start; |
// l10n end |
arg.arg = ((StartWrapperArg *) arg_)->arg; |
|
delete (StartWrapperArg *) arg_; |
| |
Boolean Thread::_signals_blocked = false; |
// establish cancelability of the thread |
// l10n |
pthread_setcancelstate(PTHREAD_CANCEL_ENABLE, NULL); |
#ifndef PEGASUS_OS_ZOS |
pthread_setcanceltype(PTHREAD_CANCEL_DEFERRED, NULL); |
PEGASUS_THREAD_KEY_TYPE Thread::_platform_thread_key = PEGASUS_THREAD_KEY_TYPE(-1); |
|
#else |
|
PEGASUS_THREAD_KEY_TYPE Thread::_platform_thread_key; |
|
#endif |
|
Boolean Thread::_key_initialized = false; |
|
Boolean Thread::_key_error = false; |
|
| |
|
void *return_value = (*arg.start) (arg.arg); |
| |
void Thread::cleanup_push( void (*routine)(void *), void *parm) |
return return_value; |
{ |
|
AutoPtr<cleanup_handler> cu(new cleanup_handler(routine, parm)); |
|
_cleanup.insert_first(cu.get()); |
|
cu.release(); |
|
return; |
|
} | } |
| |
void Thread::cleanup_pop(Boolean execute) |
void Thread::cancel() |
{ | { |
AutoPtr<cleanup_handler> cu; |
_cancelled = true; |
try |
pthread_cancel(_handle.thid.thread); |
{ |
|
cu.reset(_cleanup.remove_first()); |
|
} |
|
catch(IPCException&) |
|
{ |
|
PEGASUS_ASSERT(0); |
|
} | } |
if(execute == true) |
|
cu->execute(); |
|
} |
|
|
|
| |
//thread_data *Thread::put_tsd(const Sint8 *key, void (*delete_func)(void *), Uint32 size, void *value) |
void Thread::test_cancel() |
|
|
|
|
#ifndef PEGASUS_THREAD_EXIT_NATIVE |
|
void Thread::exit_self(PEGASUS_THREAD_RETURN exit_code) |
|
{ |
|
// execute the cleanup stack and then return |
|
while( _cleanup.count() ) |
|
{ |
|
try |
|
{ | { |
cleanup_pop(true); |
#if defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM) |
|
pthread_testintr(); |
|
#else |
|
pthread_testcancel(); |
|
#endif |
} | } |
catch(IPCException&) |
|
|
Boolean Thread::is_cancelled() |
{ | { |
PEGASUS_ASSERT(0); |
return _cancelled; |
break; |
|
} |
|
} |
|
_exit_code = exit_code; |
|
exit_thread(exit_code); |
|
_handle.thid = 0; |
|
} | } |
| |
|
void Thread::thread_switch() |
|
{ |
|
#if defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM) |
|
pthread_yield(NULL); |
|
#else |
|
sched_yield(); |
#endif | #endif |
|
} |
| |
// l10n start |
/* |
Sint8 Thread::initializeKey() |
ATTN: why are these missing on other platforms? |
|
*/ |
|
#if defined(PEGASUS_PLATFORM_LINUX_GENERIC_GNU) |
|
void Thread::suspend() |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::initializeKey"); |
pthread_kill(_handle.thid.thread, SIGSTOP); |
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) |
void Thread::resume() |
{ | { |
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
pthread_kill(_handle.thid.thread, SIGCONT); |
"Thread: able to create a thread key"); |
|
Thread::_key_initialized = true; |
|
} | } |
else |
#endif |
|
|
|
void Thread::sleep(Uint32 msec) |
{ | { |
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
Threads::sleep(msec); |
"Thread: ERROR - unable to create a thread key"); |
|
Thread::_key_error = true; |
|
return -1; |
|
} |
|
} | } |
| |
PEG_METHOD_EXIT(); |
void Thread::join() |
return 0; |
{ |
|
if (!_is_detached && !Threads::null(_handle.thid)) |
|
pthread_join(_handle.thid.thread, &_exit_code); |
|
|
|
Threads::clear(_handle.thid); |
} | } |
| |
Thread * Thread::getCurrent() |
void Thread::thread_init() |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::getCurrent"); |
#if defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM) |
if (Thread::initializeKey() != 0) |
pthread_setintr(PTHREAD_INTR_ENABLE); |
{ |
pthread_setintrtype(PTHREAD_INTR_ASYNCHRONOUS); |
return NULL; |
#else |
} |
pthread_setcancelstate(PTHREAD_CANCEL_ENABLE, NULL); |
PEG_METHOD_EXIT(); |
pthread_setcanceltype(PTHREAD_CANCEL_DEFERRED, NULL); |
return (Thread *)pegasus_get_thread_specific(_platform_thread_key); |
#endif |
|
_cancel_enabled = true; |
} | } |
| |
void Thread::setCurrent(Thread * thrd) |
void Thread::detach() |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::setCurrent"); |
_is_detached = true; |
if (Thread::initializeKey() == 0) |
#if defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM) |
|
pthread_t thread_id=_handle.thid.thread; |
|
pthread_detach(&thread_id); |
|
#else |
|
pthread_detach(_handle.thid.thread); |
|
#endif |
|
} |
|
|
|
ThreadStatus Thread::run() |
{ | { |
if (pegasus_set_thread_specific( |
StartWrapperArg *arg = new StartWrapperArg; |
Thread::_platform_thread_key, (void *) thrd) == 0) |
arg->start = _start; |
|
arg->arg = this; |
|
|
|
Threads::Type type = |
|
_is_detached ? Threads::THREADS_DETACHED : Threads::THREADS_JOINABLE; |
|
int rc = Threads::create(_handle.thid, type, _start_wrapper, arg); |
|
|
|
// On Linux distributions released prior 2005, the implementation of |
|
// Native POSIX Thread Library returns ENOMEM instead of EAGAIN when |
|
// there |
|
// are no insufficient memory. Hence we are checking for both. See bug |
|
// 386. |
|
|
|
if (rc == -1) |
|
rc = errno; |
|
if ((rc == EAGAIN) || (rc == ENOMEM)) |
{ | { |
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
Threads::clear(_handle.thid); |
"Successful set Thread * into thread specific storage"); |
delete arg; |
|
return PEGASUS_THREAD_INSUFFICIENT_RESOURCES; |
} | } |
else |
else if (rc != 0) |
{ | { |
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
Threads::clear(_handle.thid); |
"ERROR: error setting Thread * into thread specific storage"); |
delete arg; |
} |
return PEGASUS_THREAD_SETUP_FAILURE; |
} | } |
PEG_METHOD_EXIT(); |
return PEGASUS_THREAD_OK; |
} | } |
| |
AcceptLanguages * Thread::getLanguages() |
static sigset_t *block_signal_mask(sigset_t * sig) |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::getLanguages"); |
sigemptyset(sig); |
|
// should not be used for main() |
Thread * curThrd = Thread::getCurrent(); |
sigaddset(sig, SIGHUP); |
if (curThrd == NULL) |
sigaddset(sig, SIGINT); |
return NULL; |
// maybe useless, since KILL can't be blocked according to POSIX |
AcceptLanguages * acceptLangs = |
sigaddset(sig, SIGKILL); |
(AcceptLanguages *)curThrd->reference_tsd("acceptLanguages"); |
|
curThrd->dereference_tsd(); |
sigaddset(sig, SIGABRT); |
PEG_METHOD_EXIT(); |
sigaddset(sig, SIGALRM); |
return acceptLangs; |
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 |
|
#if defined (PEGASUS_PLATFORM_ZOS_ZSERIES_IBM) || defined (PEGASUS_OS_VMS) |
|
sigprocmask(SIG_BLOCK, sig, NULL); |
|
#else |
|
pthread_sigmask(SIG_BLOCK, sig, NULL); |
|
#endif |
|
return sig; |
} | } |
| |
void Thread::setLanguages(AcceptLanguages *langs) //l10n |
/* |
{ |
ATTN: remove this! |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::setLanguages"); |
*/ |
|
#if 1 |
|
static Uint32 _num_threads = 0; |
|
static Mutex _num_threads_mutex; |
|
#endif |
| |
Thread* currentThrd = Thread::getCurrent(); |
Thread::Thread( |
if (currentThrd != NULL) |
ThreadReturnType(PEGASUS_THREAD_CDECL* start) (void*), |
{ |
void* parameter, |
// deletes the old tsd and creates a new one |
Boolean detached) |
currentThrd->put_tsd("acceptLanguages", |
: _is_detached(detached), |
language_delete, |
_cancel_enabled(true), |
sizeof(AcceptLanguages *), |
_cancelled(false), |
langs); |
_start(start), |
} |
_cleanup(), |
|
_tsd(), |
|
_thread_parm(parameter), |
|
_exit_code(0) |
|
{ |
|
/* |
|
ATTN: remove this! |
|
*/ |
|
#if 1 |
|
Uint32 num_threads; |
|
_num_threads_mutex.lock(); |
|
_num_threads++; |
|
num_threads = _num_threads; |
|
printf("Thread::Thread(): num_threads=%u\n", num_threads); |
|
_num_threads_mutex.unlock(); |
|
#endif |
| |
PEG_METHOD_EXIT(); |
Threads::clear(_handle.thid); |
} | } |
| |
void Thread::clearLanguages() //l10n |
Thread::~Thread() |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::clearLanguages"); |
/* |
|
ATTN: remove this! |
|
*/ |
|
#if 1 |
|
Uint32 num_threads; |
|
_num_threads_mutex.lock(); |
|
_num_threads--; |
|
num_threads = _num_threads; |
|
printf("Thread::~Thread(): num_threads=%u\n", num_threads); |
|
_num_threads_mutex.unlock(); |
|
<<<<<<< Thread.cpp |
|
#endif |
|
======= |
|
//printf("Thread::~Thread(): num_threads=%u\n", num_threads); |
|
>>>>>>> 1.100.2.4 |
| |
Thread * currentThrd = Thread::getCurrent(); |
try |
if (currentThrd != NULL) |
|
{ | { |
// deletes the old tsd |
join(); |
currentThrd->delete_tsd("acceptLanguages"); |
empty_tsd(); |
|
} |
|
catch (...) |
|
{ |
|
// Do not allow the destructor to throw an exception |
} | } |
|
|
PEG_METHOD_EXIT(); |
|
} | } |
// l10n end |
|
| |
|
#endif /* PEGASUS_HAVE_PTHREADS */ |
| |
/////////////////////////////////////////////////////////////////////////////// |
//============================================================================== |
// | // |
// ThreadPool |
// Windows Threads Implementation: |
// | // |
/////////////////////////////////////////////////////////////////////////////// |
//============================================================================== |
|
|
ThreadPool::ThreadPool( |
|
Sint16 initialSize, |
|
const char* key, |
|
Sint16 minThreads, |
|
Sint16 maxThreads, |
|
struct timeval& deallocateWait) |
|
: _maxThreads(maxThreads), |
|
_minThreads(minThreads), |
|
_currentThreads(0), |
|
_idleThreads(true), |
|
_runningThreads(true), |
|
_dying(0) |
|
{ |
|
_deallocateWait.tv_sec = deallocateWait.tv_sec; |
|
_deallocateWait.tv_usec = deallocateWait.tv_usec; |
|
|
|
memset(_key, 0x00, 17); |
|
if (key != 0) |
|
{ |
|
strncpy(_key, key, 16); |
|
} |
|
| |
if ((_maxThreads > 0) && (_maxThreads < initialSize)) |
#if defined(PEGASUS_HAVE_WINDOWS_THREADS) |
{ |
|
_maxThreads = initialSize; |
|
} |
|
| |
if (_minThreads > initialSize) |
ThreadStatus Thread::run() |
{ | { |
_minThreads = initialSize; |
// Note: A Win32 thread ID is not the same thing as a pthread ID. |
} |
// Win32 threads have both a thread ID and a handle. The handle |
|
// is used in the wait functions, etc. |
|
// So _handle.thid is actually the thread handle. |
| |
for (int i = 0; i < initialSize; i++) |
unsigned threadid = 0; |
{ |
|
_addToIdleThreadsQueue(_initializeThread()); |
|
} |
|
} |
|
| |
ThreadPool::~ThreadPool() |
ThreadType tt; |
{ |
tt.handle = (HANDLE) _beginthreadex(NULL, 0, _start, this, 0, &threadid); |
PEG_METHOD_ENTER(TRC_THREAD, "ThreadPool::~ThreadPool"); |
_handle.thid = tt; |
| |
try |
if (Threads::null(_handle.thid)) |
{ |
|
// Set the dying flag so all thread know the destructor has been entered |
|
_dying++; |
|
Tracer::trace(TRC_THREAD, Tracer::LEVEL2, |
|
"Cleaning up %d idle threads. ", _currentThreads.value()); |
|
while (_currentThreads.value() > 0) |
|
{ | { |
Thread* thread = _idleThreads.remove_first(); |
if (errno == EAGAIN) |
if (thread != 0) |
|
{ | { |
_cleanupThread(thread); |
return PEGASUS_THREAD_INSUFFICIENT_RESOURCES; |
_currentThreads--; |
|
} | } |
else | else |
{ | { |
pegasus_yield(); |
return PEGASUS_THREAD_SETUP_FAILURE; |
} | } |
} | } |
|
return PEGASUS_THREAD_OK; |
} | } |
catch (...) |
|
|
void Thread::cancel() |
{ | { |
} |
_cancelled = true; |
} | } |
| |
PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL ThreadPool::_loop(void* parm) |
void Thread::test_cancel() |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "ThreadPool::_loop"); |
if (_cancel_enabled && _cancelled) |
|
|
try |
|
{ | { |
Thread* myself = (Thread *)parm; |
exit_self(0); |
PEGASUS_ASSERT(myself != 0); |
} |
|
} |
// Set myself into thread specific storage |
|
// This will allow code to get its own Thread |
|
Thread::setCurrent(myself); |
|
|
|
ThreadPool* pool = (ThreadPool *)myself->get_parm(); |
|
PEGASUS_ASSERT(pool != 0); |
|
| |
Semaphore* sleep_sem = 0; |
Boolean Thread::is_cancelled() |
struct timeval* lastActivityTime = 0; |
{ |
|
return _cancelled; |
|
} |
| |
try |
void Thread::thread_switch() |
{ | { |
sleep_sem = (Semaphore *)myself->reference_tsd("sleep sem"); |
Sleep(0); |
myself->dereference_tsd(); |
|
PEGASUS_ASSERT(sleep_sem != 0); |
|
|
|
lastActivityTime = |
|
(struct timeval *)myself->reference_tsd("last activity time"); |
|
myself->dereference_tsd(); |
|
PEGASUS_ASSERT(lastActivityTime != 0); |
|
} | } |
catch (...) |
|
|
void Thread::sleep(Uint32 milliseconds) |
{ | { |
Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
Sleep(milliseconds); |
"ThreadPool::_loop: Failure getting sleep_sem or " |
|
"lastActivityTime."); |
|
PEGASUS_ASSERT(false); |
|
pool->_idleThreads.remove(myself); |
|
pool->_currentThreads--; |
|
PEG_METHOD_EXIT(); |
|
return((PEGASUS_THREAD_RETURN)1); |
|
} | } |
| |
while (1) |
void Thread::join() |
{ | { |
try |
if (!Threads::null(_handle.thid)) |
{ | { |
sleep_sem->wait(); |
if (!_is_detached) |
} |
|
catch (...) |
|
{ | { |
Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
if (!_cancelled) |
"ThreadPool::_loop: failure on sleep_sem->wait()."); |
|
PEGASUS_ASSERT(false); |
|
pool->_idleThreads.remove(myself); |
|
pool->_currentThreads--; |
|
PEG_METHOD_EXIT(); |
|
return((PEGASUS_THREAD_RETURN)1); |
|
} |
|
|
|
// When we awaken we reside on the _runningThreads queue, not the |
|
// _idleThreads queue. |
|
|
|
PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL* work)(void *) = 0; |
|
void* parm = 0; |
|
Semaphore* blocking_sem = 0; |
|
|
|
try |
|
{ | { |
work = (PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL *)(void *)) |
// Emulate the unix join api. Caller sleeps until thread is |
myself->reference_tsd("work func"); |
// done. |
myself->dereference_tsd(); |
WaitForSingleObject(_handle.thid.handle, INFINITE); |
parm = myself->reference_tsd("work parm"); |
|
myself->dereference_tsd(); |
|
blocking_sem = (Semaphore *)myself->reference_tsd("blocking sem"); |
|
myself->dereference_tsd(); |
|
} | } |
catch (...) |
else |
{ | { |
Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
// Currently this is the only way to ensure this code does |
"ThreadPool::_loop: Failure accessing work func, work parm, " |
// not |
"or blocking sem."); |
// hang forever. |
PEGASUS_ASSERT(false); |
if (WaitForSingleObject(_handle.thid.handle, 10000) == |
pool->_idleThreads.remove(myself); |
WAIT_TIMEOUT) |
pool->_currentThreads--; |
{ |
PEG_METHOD_EXIT(); |
TerminateThread(_handle.thid.handle, 0); |
return((PEGASUS_THREAD_RETURN)1); |
} |
} | } |
| |
if (work == 0) |
DWORD exit_code = 0; |
{ |
GetExitCodeThread(_handle.thid.handle, &exit_code); |
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
_exit_code = (ThreadReturnType) exit_code; |
"ThreadPool::_loop: work func is 0, meaning we should exit."); |
|
break; |
|
} | } |
| |
gettimeofday(lastActivityTime, NULL); |
CloseHandle(_handle.thid.handle); |
|
Threads::clear(_handle.thid); |
|
} |
|
} |
| |
try |
void Thread::thread_init() |
{ | { |
PEG_TRACE_STRING(TRC_THREAD, Tracer::LEVEL4, "Work starting."); |
_cancel_enabled = true; |
work(parm); |
|
PEG_TRACE_STRING(TRC_THREAD, Tracer::LEVEL4, "Work finished."); |
|
} |
|
catch (Exception & e) |
|
{ |
|
PEG_TRACE_STRING(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
|
String("Exception from work in ThreadPool::_loop: ") + |
|
e.getMessage()); |
|
} |
|
#if !defined(PEGASUS_OS_LSB) |
|
catch (const exception& e) |
|
{ |
|
PEG_TRACE_STRING(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
|
String("Exception from work in ThreadPool::_loop: ") + |
|
e.what()); |
|
} | } |
#endif |
|
catch (...) |
void Thread::detach() |
{ | { |
PEG_TRACE_STRING(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
_is_detached = true; |
"Unknown exception from work in ThreadPool::_loop."); |
|
} | } |
| |
// put myself back onto the available list |
Thread::Thread(ThreadReturnType(PEGASUS_THREAD_CDECL * start) (void *), |
try |
void *parameter, |
{ |
Boolean detached):_is_detached(detached), |
gettimeofday(lastActivityTime, NULL); |
_cancel_enabled(true), |
if (blocking_sem != 0) |
_cancelled(false), |
|
_start(start), _cleanup(), _tsd(), _thread_parm(parameter), _exit_code(0) |
{ | { |
blocking_sem->signal(); |
Threads::clear(_handle.thid); |
} | } |
| |
Boolean removed = pool->_runningThreads.remove((void *)myself); |
Thread::~Thread() |
PEGASUS_ASSERT(removed); |
|
|
|
pool->_idleThreads.insert_first(myself); |
|
} |
|
catch (...) |
|
{ | { |
Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
try |
"ThreadPool::_loop: Adding thread to idle pool failed."); |
|
PEGASUS_ASSERT(false); |
|
pool->_currentThreads--; |
|
PEG_METHOD_EXIT(); |
|
return((PEGASUS_THREAD_RETURN)1); |
|
} |
|
} |
|
} |
|
catch (const Exception& e) |
|
{ | { |
PEG_TRACE_STRING(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
join(); |
"Caught exception: \"" + e.getMessage() + "\". Exiting _loop."); |
empty_tsd(); |
} | } |
catch (...) | catch (...) |
{ | { |
PEG_TRACE_STRING(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
|
"Caught unrecognized exception. Exiting _loop."); |
|
} | } |
|
|
PEG_METHOD_EXIT(); |
|
return((PEGASUS_THREAD_RETURN)0); |
|
} | } |
| |
ThreadStatus ThreadPool::allocate_and_awaken( |
#endif /* PEGASUS_HAVE_WINDOWS_THREADS */ |
void* parm, |
|
PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL* work)(void *), |
|
Semaphore* blocking) |
|
{ |
|
PEG_METHOD_ENTER(TRC_THREAD, "ThreadPool::allocate_and_awaken"); |
|
| |
// Allocate_and_awaken will not run if the _dying flag is set. |
//============================================================================== |
// Once the lock is acquired, ~ThreadPool will not change |
// |
// the value of _dying until the lock is released. |
// Common implementation: |
|
// |
|
//============================================================================== |
| |
try |
void thread_data::default_delete(void *data) |
{ |
|
if (_dying.value()) |
|
{ | { |
Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
if (data != NULL) |
"ThreadPool::allocate_and_awaken: ThreadPool is dying(1)."); |
::operator delete(data); |
return PEGASUS_THREAD_UNAVAILABLE; |
|
} | } |
struct timeval start; |
|
gettimeofday(&start, NULL); |
|
Thread* th = 0; |
|
|
|
th = _idleThreads.remove_first(); |
|
| |
if (th == 0) |
void language_delete(void *data) |
{ | { |
if ((_maxThreads == 0) || (_currentThreads < _maxThreads)) |
if (data != NULL) |
{ | { |
th = _initializeThread(); |
AutoPtr < AcceptLanguageList > al(static_cast < |
|
AcceptLanguageList * >(data)); |
} | } |
} | } |
| |
if (th == 0) |
Boolean Thread::_signals_blocked = false; |
|
#ifndef PEGASUS_OS_ZOS |
|
TSDKeyType Thread::_platform_thread_key = TSDKeyType(-1); |
|
#else |
|
TSDKeyType Thread::_platform_thread_key; |
|
#endif |
|
Boolean Thread::_key_initialized = false; |
|
Boolean Thread::_key_error = false; |
|
|
|
void Thread::cleanup_push(void (*routine) (void *), void *parm) |
{ | { |
// ATTN-DME-P3-20031103: This trace message should not be |
AutoPtr < cleanup_handler > cu(new cleanup_handler(routine, parm)); |
// be labeled TRC_DISCARDED_DATA, because it does not |
_cleanup.insert_front(cu.get()); |
// necessarily imply that a failure has occurred. However, |
cu.release(); |
// this label is being used temporarily to help isolate |
return; |
// the cause of client timeout problems. |
|
Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
|
"ThreadPool::allocate_and_awaken: Insufficient resources: " |
|
" pool = %s, running threads = %d, idle threads = %d", |
|
_key, _runningThreads.count(), _idleThreads.count()); |
|
return PEGASUS_THREAD_INSUFFICIENT_RESOURCES; |
|
} | } |
| |
// initialize the thread data with the work function and parameters |
void Thread::cleanup_pop(Boolean execute) |
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, |
{ |
"Initializing thread with work function and parameters: parm = %p", |
AutoPtr < cleanup_handler > cu; |
parm); |
try |
|
{ |
th->delete_tsd("work func"); |
cu.reset(_cleanup.remove_front()); |
th->put_tsd("work func", NULL, |
|
sizeof( PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL *)(void *)), |
|
(void *)work); |
|
th->delete_tsd("work parm"); |
|
th->put_tsd("work parm", NULL, sizeof(void *), parm); |
|
th->delete_tsd("blocking sem"); |
|
if (blocking != 0) |
|
th->put_tsd("blocking sem", NULL, sizeof(Semaphore *), blocking); |
|
|
|
// put the thread on the running list |
|
_runningThreads.insert_first(th); |
|
|
|
// signal the thread's sleep semaphore to awaken it |
|
Semaphore* sleep_sem = (Semaphore *)th->reference_tsd("sleep sem"); |
|
PEGASUS_ASSERT(sleep_sem != 0); |
|
|
|
Tracer::trace(TRC_THREAD, Tracer::LEVEL4, "Signal thread to awaken"); |
|
sleep_sem->signal(); |
|
th->dereference_tsd(); |
|
} | } |
catch (...) |
catch (IPCException &) |
{ | { |
Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
PEGASUS_ASSERT(0); |
"ThreadPool::allocate_and_awaken: Operation Failed."); |
|
PEG_METHOD_EXIT(); |
|
// ATTN: Error result has not yet been defined |
|
return PEGASUS_THREAD_SETUP_FAILURE; |
|
} | } |
PEG_METHOD_EXIT(); |
if (execute == true) |
return PEGASUS_THREAD_OK; |
cu->execute(); |
} | } |
| |
// caller is responsible for only calling this routine during slack periods |
|
// but should call it at least once per _deallocateWait interval. |
|
| |
Uint32 ThreadPool::cleanupIdleThreads() |
void Thread::exit_self(ThreadReturnType exit_code) |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "ThreadPool::cleanupIdleThreads"); |
#if !defined(PEGASUS_PLATFORM_AIX_RS_IBMCXX) \ |
|
&& !defined(PEGASUS_PLATFORM_PASE_ISERIES_IBMCXX) |
Uint32 numThreadsCleanedUp = 0; |
Threads::exit(exit_code); |
|
#else |
Uint32 numIdleThreads = _idleThreads.count(); |
// execute the cleanup stack and then return |
for (Uint32 i = 0; i < numIdleThreads; i++) |
while (_cleanup.size()) |
{ | { |
// Do not dip below the minimum thread count |
try |
if (_currentThreads.value() <= (Uint32)_minThreads) |
|
{ | { |
break; |
cleanup_pop(true); |
} | } |
|
catch (IPCException &) |
Thread* thread = _idleThreads.remove_last(); |
|
|
|
// If there are no more threads in the _idleThreads queue, we're done. |
|
if (thread == 0) |
|
{ | { |
|
PEGASUS_ASSERT(0); |
break; | break; |
} | } |
|
} |
|
_exit_code = exit_code; |
|
Threads::exit(exit_code); |
|
Threads::clear(_handle.thid); |
|
#endif |
|
} |
| |
struct timeval* lastActivityTime; |
Sint8 Thread::initializeKey() |
try |
|
{ | { |
lastActivityTime = (struct timeval *)thread->try_reference_tsd( |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::initializeKey"); |
"last activity time"); |
if (!Thread::_key_initialized) |
PEGASUS_ASSERT(lastActivityTime != 0); |
|
} |
|
catch (...) |
|
{ | { |
PEGASUS_ASSERT(false); |
if (Thread::_key_error) |
_idleThreads.insert_last(thread); |
{ |
break; |
PEG_TRACE_CSTRING(TRC_THREAD, Tracer::LEVEL4, |
|
"Thread: ERROR - thread key error"); |
|
return -1; |
} | } |
| |
Boolean cleanupThisThread = |
if (TSDKey::create(&Thread::_platform_thread_key) == 0) |
_timeIntervalExpired(lastActivityTime, &_deallocateWait); |
{ |
thread->dereference_tsd(); |
PEG_TRACE_CSTRING(TRC_THREAD, Tracer::LEVEL4, |
|
"Thread: able to create a thread key"); |
if (cleanupThisThread) |
Thread::_key_initialized = true; |
{ |
|
_cleanupThread(thread); |
|
_currentThreads--; |
|
numThreadsCleanedUp++; |
|
} | } |
else | else |
{ | { |
_idleThreads.insert_first(thread); |
PEG_TRACE_CSTRING(TRC_THREAD, Tracer::LEVEL4, |
|
"Thread: ERROR - unable to create a thread key"); |
|
Thread::_key_error = true; |
|
return -1; |
} | } |
} | } |
| |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
return numThreadsCleanedUp; |
return 0; |
} | } |
| |
void ThreadPool::_cleanupThread(Thread* thread) |
Thread *Thread::getCurrent() |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "ThreadPool::cleanupThread"); |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::getCurrent"); |
|
if (Thread::initializeKey() != 0) |
// Set the "work func" and "work parm" to 0 so _loop() knows to exit. |
{ |
thread->delete_tsd("work func"); |
return NULL; |
thread->put_tsd( |
} |
"work func", 0, |
|
sizeof(PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL *)(void *)), |
|
(void *) 0); |
|
thread->delete_tsd("work parm"); |
|
thread->put_tsd("work parm", 0, sizeof(void *), 0); |
|
|
|
// signal the thread's sleep semaphore to awaken it |
|
Semaphore* sleep_sem = (Semaphore *)thread->reference_tsd("sleep sem"); |
|
PEGASUS_ASSERT(sleep_sem != 0); |
|
sleep_sem->signal(); |
|
thread->dereference_tsd(); |
|
|
|
thread->join(); |
|
delete thread; |
|
|
|
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
|
return (Thread *) TSDKey::get_thread_specific(_platform_thread_key); |
} | } |
| |
Boolean ThreadPool::_timeIntervalExpired( |
void Thread::setCurrent(Thread * thrd) |
struct timeval* start, |
|
struct timeval* interval) |
|
{ | { |
// never time out if the interval is zero |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::setCurrent"); |
if (interval && (interval->tv_sec == 0) && (interval->tv_usec == 0)) |
if (Thread::initializeKey() == 0) |
{ | { |
return false; |
if (TSDKey:: |
} |
set_thread_specific(Thread::_platform_thread_key, |
|
(void *) thrd) == 0) |
struct timeval now, finish, remaining; |
{ |
Uint32 usec; |
PEG_TRACE_CSTRING(TRC_THREAD, Tracer::LEVEL4, |
pegasus_gettimeofday(&now); |
"Successful set Thread * into thread specific storage"); |
pegasus_gettimeofday(&remaining); // Avoid valgrind error |
|
|
|
finish.tv_sec = start->tv_sec + interval->tv_sec; |
|
usec = start->tv_usec + interval->tv_usec; |
|
finish.tv_sec += (usec / 1000000); |
|
usec %= 1000000; |
|
finish.tv_usec = usec; |
|
|
|
return (timeval_subtract(&remaining, &finish, &now) != 0); |
|
} | } |
|
else |
void ThreadPool::_deleteSemaphore(void *p) |
|
{ | { |
delete (Semaphore *)p; |
PEG_TRACE_CSTRING(TRC_THREAD, Tracer::LEVEL4, |
|
"ERROR: error setting Thread * into thread specific storage"); |
|
} |
|
} |
|
PEG_METHOD_EXIT(); |
} | } |
| |
Thread* ThreadPool::_initializeThread() |
AcceptLanguageList *Thread::getLanguages() |
{ | { |
PEG_METHOD_ENTER(TRC_THREAD, "ThreadPool::_initializeThread"); |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::getLanguages"); |
|
|
Thread* th = (Thread *) new Thread(_loop, this, false); |
|
|
|
// allocate a sleep semaphore and pass it in the thread context |
|
// initial count is zero, loop function will sleep until |
|
// we signal the semaphore |
|
Semaphore* sleep_sem = (Semaphore *) new Semaphore(0); |
|
th->put_tsd( |
|
"sleep sem", &_deleteSemaphore, sizeof(Semaphore), (void *)sleep_sem); |
|
| |
struct timeval* lastActivityTime = |
Thread *curThrd = Thread::getCurrent(); |
(struct timeval *) ::operator new(sizeof(struct timeval)); |
if (curThrd == NULL) |
pegasus_gettimeofday(lastActivityTime); |
return NULL; |
|
AcceptLanguageList *acceptLangs = |
|
(AcceptLanguageList *) curThrd->reference_tsd("acceptLanguages"); |
|
curThrd->dereference_tsd(); |
|
PEG_METHOD_EXIT(); |
|
return acceptLangs; |
|
} |
| |
th->put_tsd("last activity time", thread_data::default_delete, |
void Thread::setLanguages(AcceptLanguageList * langs) |
sizeof(struct timeval), (void *)lastActivityTime); |
{ |
// thread will enter _loop() and sleep on sleep_sem until we signal it |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::setLanguages"); |
| |
if (th->run() != PEGASUS_THREAD_OK) |
Thread *currentThrd = Thread::getCurrent(); |
|
if (currentThrd != NULL) |
{ | { |
Tracer::trace(TRC_THREAD, Tracer::LEVEL2, |
// deletes the old tsd and creates a new one |
"Could not create thread. Error code is %d.", errno); |
currentThrd->put_tsd("acceptLanguages", |
delete th; |
language_delete, |
return 0; |
sizeof (AcceptLanguageList *), langs); |
} | } |
_currentThreads++; |
|
pegasus_yield(); |
|
| |
PEG_METHOD_EXIT(); | PEG_METHOD_EXIT(); |
return th; |
|
} | } |
| |
void ThreadPool::_addToIdleThreadsQueue(Thread* th) |
void Thread::clearLanguages() |
{ | { |
if (th == 0) |
PEG_METHOD_ENTER(TRC_THREAD, "Thread::clearLanguages"); |
{ |
|
Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
|
"ThreadPool::_addToIdleThreadsQueue: Thread pointer is null."); |
|
throw NullPointer(); |
|
} |
|
| |
try |
Thread *currentThrd = Thread::getCurrent(); |
{ |
if (currentThrd != NULL) |
_idleThreads.insert_first(th); |
|
} |
|
catch (...) |
|
{ | { |
Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2, |
// deletes the old tsd |
"ThreadPool::_addToIdleThreadsQueue: _idleThreads.insert_first " |
currentThrd->delete_tsd("acceptLanguages"); |
"failed."); |
|
} | } |
|
|
|
PEG_METHOD_EXIT(); |
} | } |
| |
|
// ATTN: not sure where to put this! |
|
#ifdef PEGASUS_ZOS_SECURITY |
|
bool isEnhancedSecurity = 99; |
|
#endif |
|
|
PEGASUS_NAMESPACE_END | PEGASUS_NAMESPACE_END |