version 1.5, 2001/12/25 08:26:09
|
version 1.25, 2002/09/17 18:19:45
|
|
|
//%///////////-*-c++-*-////////////////////////////////////////////////////// |
//%/-*-c++-*-//////////////////////////////////////////////////////////////////////////// |
// | // |
// Copyright (c) 2000, 2001 The Open group, BMC Software, Tivoli Systems, IBM |
// Copyright (c) 2000, 2001, 2002 BMC Software, Hewlett-Packard Company, IBM, |
|
// The Open Group, Tivoli Systems |
// | // |
// 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 |
|
|
#define Pegasus_Thread_h | #define Pegasus_Thread_h |
#include <Pegasus/Common/Config.h> | #include <Pegasus/Common/Config.h> |
#include <Pegasus/Common/IPC.h> | #include <Pegasus/Common/IPC.h> |
#include <Pegasus/Common/Exception.h> |
#include <Pegasus/Common/InternalException.h> |
#include <Pegasus/Common/DQueue.h> | #include <Pegasus/Common/DQueue.h> |
|
#include <Pegasus/Common/Linkage.h> |
// REVIEW: Spend time getting to know this. |
|
| |
PEGASUS_NAMESPACE_BEGIN | PEGASUS_NAMESPACE_BEGIN |
| |
|
|
public: | public: |
static void default_delete(void *data); | static void default_delete(void *data); |
| |
thread_data( Sint8 *key ) : _delete_func(NULL) , _data(NULL), _size(0) |
thread_data( const Sint8 *key ) : _delete_func(NULL) , _data(NULL), _size(0) |
{ | { |
PEGASUS_ASSERT(key != NULL); | PEGASUS_ASSERT(key != NULL); |
size_t keysize = strlen(key); | size_t keysize = strlen(key); |
|
|
| |
} | } |
| |
thread_data(Sint8 *key, size_t size) : _delete_func(default_delete), _size(size) |
thread_data(const Sint8 *key, size_t size) : _delete_func(default_delete), _size(size) |
{ | { |
PEGASUS_ASSERT(key != NULL); | PEGASUS_ASSERT(key != NULL); |
size_t keysize = strlen(key); | size_t keysize = strlen(key); |
|
|
| |
} | } |
| |
thread_data(Sint8 *key, size_t size, void *data) : _delete_func(default_delete), _size(size) |
thread_data(const Sint8 *key, size_t size, void *data) : _delete_func(default_delete), _size(size) |
{ | { |
PEGASUS_ASSERT(key != NULL); | PEGASUS_ASSERT(key != NULL); |
PEGASUS_ASSERT(data != NULL); | PEGASUS_ASSERT(data != NULL); |
|
|
{ | { |
if( _data != NULL) | if( _data != NULL) |
if(_delete_func != NULL) | if(_delete_func != NULL) |
|
{ |
_delete_func( _data ); | _delete_func( _data ); |
|
} |
if( _key != NULL ) | if( _key != NULL ) |
delete [] _key; | delete [] _key; |
} | } |
|
|
| |
} | } |
| |
void copy_data(void **buf, size_t *size) throw(BufferTooSmall, NullPointer) |
void copy_data(void **buf, size_t *size) throw(NullPointer) |
{ | { |
if((buf == NULL) || (size == NULL)) | if((buf == NULL) || (size == NULL)) |
throw NullPointer() ; | throw NullPointer() ; |
|
|
return(true); | return(true); |
return(false); | return(false); |
} | } |
|
|
inline Boolean operator==(const thread_data& b) const | inline Boolean operator==(const thread_data& b) const |
{ | { |
return(operator==((const void *)b._key)); | return(operator==((const void *)b._key)); |
|
|
| |
void thread_switch(void); | void thread_switch(void); |
| |
#ifdef PEGASUS_PLATFORM_LINUX_IX86_GNU |
#if defined(PEGASUS_PLATFORM_LINUX_IX86_GNU) || defined(PEGASUS_PLATFORM_LINUX_GENERIC_GNU) |
// suspend this thread | // suspend this thread |
void suspend(void) ; | void suspend(void) ; |
| |
|
|
void cleanup_pop(Boolean execute = true) throw(IPCException); | void cleanup_pop(Boolean execute = true) throw(IPCException); |
| |
// create and initialize a tsd | // create and initialize a tsd |
inline void create_tsd(Sint8 *key, int size, void *buffer) throw(IPCException) |
inline void create_tsd(const Sint8 *key, int size, void *buffer) throw(IPCException) |
{ | { |
thread_data *tsd = new thread_data(key, size, buffer); | thread_data *tsd = new thread_data(key, size, buffer); |
try { _tsd.insert_first(tsd); } | try { _tsd.insert_first(tsd); } |
|
|
| |
// get the buffer associated with the key | // get the buffer associated with the key |
// NOTE: this call leaves the tsd LOCKED !!!! | // NOTE: this call leaves the tsd LOCKED !!!! |
inline void *reference_tsd(Sint8 *key) throw(IPCException) |
inline void *reference_tsd(const Sint8 *key) throw(IPCException) |
{ | { |
_tsd.lock(); | _tsd.lock(); |
thread_data *tsd = _tsd.reference((void *)key); |
thread_data *tsd = _tsd.reference((const void *)key); |
if(tsd != NULL) | if(tsd != NULL) |
return( (void *)(tsd->_data) ); | return( (void *)(tsd->_data) ); |
else | else |
return(NULL); | return(NULL); |
} | } |
| |
inline void *try_reference_tsd(Sint8 *key) throw(IPCException) |
inline void *try_reference_tsd(const Sint8 *key) throw(IPCException) |
{ | { |
_tsd.try_lock(); | _tsd.try_lock(); |
thread_data *tsd = _tsd.reference((void *)key); |
thread_data *tsd = _tsd.reference((const void *)key); |
if(tsd != NULL) | if(tsd != NULL) |
return((void *)(tsd->_data) ); | return((void *)(tsd->_data) ); |
else | else |
|
|
} | } |
| |
// delete the tsd associated with the key | // delete the tsd associated with the key |
inline void delete_tsd(Sint8 *key) throw(IPCException) |
inline void delete_tsd(const Sint8 *key) throw(IPCException) |
{ | { |
thread_data *tsd = _tsd.remove((void *)key); |
thread_data *tsd = _tsd.remove((const void *)key); |
if(tsd != NULL) | if(tsd != NULL) |
delete tsd; | delete tsd; |
} | } |
| |
inline void *remove_tsd(Sint8 *key) throw(IPCException) |
// Note: Caller must delete the thread_data object returned (if not null) |
|
inline void *remove_tsd(const Sint8 *key) throw(IPCException) |
{ | { |
return(_tsd.remove((void *)key)); |
return(_tsd.remove((const void *)key)); |
} | } |
| |
inline void empty_tsd(void) throw(IPCException) | inline void empty_tsd(void) throw(IPCException) |
{ | { |
_tsd.empty_list(); |
thread_data* tsd; |
|
while (0 != (tsd = _tsd.remove_first())) |
|
{ |
|
delete tsd; |
|
} |
|
//_tsd.empty_list(); |
} | } |
| |
// create or re-initialize tsd associated with the key | // create or re-initialize tsd associated with the key |
// if the tsd already exists, return the existing buffer |
// if the tsd already exists, delete the existing buffer |
thread_data *put_tsd(Sint8 *key, void (*delete_func)(void *), Uint32 size, void *value) |
void put_tsd(const Sint8 *key, void (*delete_func)(void *), Uint32 size, void *value) |
throw(IPCException) | throw(IPCException) |
| |
{ | { |
PEGASUS_ASSERT(key != NULL); | PEGASUS_ASSERT(key != NULL); |
thread_data *tsd ; | thread_data *tsd ; |
tsd = _tsd.remove((void *)key); // may throw an IPC exception |
tsd = _tsd.remove((const void *)key); // may throw an IPC exception |
|
delete tsd; |
thread_data *ntsd = new thread_data(key); | thread_data *ntsd = new thread_data(key); |
ntsd->put_data(delete_func, size, value); | ntsd->put_data(delete_func, size, value); |
try { _tsd.insert_first(ntsd); } | try { _tsd.insert_first(ntsd); } |
catch(IPCException& e) { e = e; delete ntsd; throw; } | catch(IPCException& e) { e = e; delete ntsd; throw; } |
return(tsd); |
|
} | } |
inline PEGASUS_THREAD_RETURN get_exit(void) { return _exit_code; } | inline PEGASUS_THREAD_RETURN get_exit(void) { return _exit_code; } |
inline PEGASUS_THREAD_TYPE self(void) {return pegasus_thread_self(); } | inline PEGASUS_THREAD_TYPE self(void) {return pegasus_thread_self(); } |
|
|
| |
private: | private: |
Thread(); | Thread(); |
inline void create_tsd(Sint8 *key ) throw(IPCException) |
inline void create_tsd(const Sint8 *key ) throw(IPCException) |
{ | { |
thread_data *tsd = new thread_data(key); | thread_data *tsd = new thread_data(key); |
try { _tsd.insert_first(tsd); } | try { _tsd.insert_first(tsd); } |
|
|
public: | public: |
| |
ThreadPool(Sint16 initial_size, | ThreadPool(Sint16 initial_size, |
Sint8 *key, |
const Sint8 *key, |
Sint16 min, | Sint16 min, |
Sint16 max, | Sint16 max, |
struct timeval & alloc_wait, | struct timeval & alloc_wait, |
|
|
struct timeval & deadlock_detect); | struct timeval & deadlock_detect); |
| |
~ThreadPool(void); | ~ThreadPool(void); |
|
|
void allocate_and_awaken(void *parm, | void allocate_and_awaken(void *parm, |
PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL *work)(void *)) |
PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL *work)(void *), |
|
Semaphore *blocking = 0) |
throw(IPCException); | throw(IPCException); |
| |
void kill_dead_threads( void ) |
|
|
Uint32 kill_dead_threads( void ) |
throw(IPCException); | throw(IPCException); |
| |
void get_key(Sint8 *buf, int bufsize); | void get_key(Sint8 *buf, int bufsize); |
|
|
return _running.count(); | return _running.count(); |
} | } |
| |
|
inline Uint32 pool_count(void) |
|
{ |
|
return _pool.count(); |
|
} |
|
inline Uint32 dead_count(void) |
|
{ |
|
return _dead.count(); |
|
} |
|
|
|
|
static Boolean check_time(struct timeval *start, struct timeval *interval); | static Boolean check_time(struct timeval *start, struct timeval *interval); |
| |
|
Boolean operator ==(const ThreadPool & p) |
|
{ |
|
return operator==((const void *)&p); |
|
} |
|
|
|
Boolean operator ==(const void *p) |
|
{ |
|
if((void *)this == p) |
|
return true; |
|
return false; |
|
} |
|
|
|
static void kill_idle_threads(void); |
|
|
private: | private: |
ThreadPool(void); | ThreadPool(void); |
Sint16 _max_threads; | Sint16 _max_threads; |
|
|
struct timeval _deallocate_wait; | struct timeval _deallocate_wait; |
struct timeval _deadlock_detect; | struct timeval _deadlock_detect; |
static PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL _loop(void *); | static PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL _loop(void *); |
Semaphore _waiters; |
|
Sint8 _key[17]; | Sint8 _key[17]; |
Semaphore _pool_sem; |
|
DQueue<Thread> _pool; | DQueue<Thread> _pool; |
DQueue<Thread> _running; | DQueue<Thread> _running; |
DQueue<Thread> _dead; | DQueue<Thread> _dead; |
AtomicInt _dying; | AtomicInt _dying; |
|
|
|
|
static void _sleep_sem_del(void *p); | static void _sleep_sem_del(void *p); |
| |
void _check_deadlock(struct timeval *start) throw(Deadlock); | void _check_deadlock(struct timeval *start) throw(Deadlock); |
|
|
Thread *_init_thread(void) throw(IPCException); | Thread *_init_thread(void) throw(IPCException); |
void _link_pool(Thread *th) throw(IPCException); | void _link_pool(Thread *th) throw(IPCException); |
static PEGASUS_THREAD_RETURN _undertaker(void *); | static PEGASUS_THREAD_RETURN _undertaker(void *); |
|
static DQueue<ThreadPool> _pools; |
}; | }; |
| |
| |
inline void ThreadPool::_sleep_sem_del(void *p) |
|
{ |
|
if(p != 0) |
|
{ |
|
delete (Semaphore *)p; |
|
} |
|
} |
|
|
|
inline void ThreadPool::_check_deadlock(struct timeval *start) throw(Deadlock) |
|
{ |
|
if (true == check_time(start, &_deadlock_detect)) |
|
throw Deadlock(pegasus_thread_self()); |
|
return; |
|
} |
|
|
|
|
|
inline Boolean ThreadPool::_check_deadlock_no_throw(struct timeval *start) |
|
{ |
|
return(check_time(start, &_deadlock_detect)); |
|
} |
|
|
|
inline Boolean ThreadPool::_check_dealloc(struct timeval *start) |
|
{ |
|
return(check_time(start, &_deallocate_wait)); |
|
} |
|
|
|
inline Thread *ThreadPool::_init_thread(void) throw(IPCException) |
|
{ |
|
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", &_sleep_sem_del, sizeof(Semaphore), (void *)sleep_sem); |
|
struct timeval *dldt = (struct timeval *) ::operator new(sizeof(struct timeval)); |
|
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 |
|
th->run(); |
|
_current_threads++; |
|
return th; |
|
} |
|
|
|
inline void ThreadPool::_link_pool(Thread *th) throw(IPCException) |
|
{ |
|
if(th == 0) |
|
throw NullPointer(); |
|
_pool.insert_first(th); |
|
_pool_sem.signal(); |
|
} |
|
| |
| |
#if defined(PEGASUS_OS_TYPE_WINDOWS) | #if defined(PEGASUS_OS_TYPE_WINDOWS) |
# include "ThreadWindows_inline.h" | # include "ThreadWindows_inline.h" |
|
#elif defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM) |
|
# include "ThreadzOS_inline.h" |
#elif defined(PEGASUS_OS_TYPE_UNIX) | #elif defined(PEGASUS_OS_TYPE_UNIX) |
# include "ThreadUnix_inline.h" | # include "ThreadUnix_inline.h" |
#endif | #endif |