#ifndef WTF_ThreadSpecific_h
#define WTF_ThreadSpecific_h
#include "wtf/Noncopyable.h"
#include "wtf/StdLibExtras.h"
#include "wtf/WTF.h"
#include "wtf/WTFExport.h"
#if USE(PTHREADS)
#include <pthread.h>
#elif OS(WIN)
#include <windows.h>
#endif
namespace WTF {
#if OS(WIN)
WTF_EXPORT void ThreadSpecificThreadExit();
#endif
template<typename T> class ThreadSpecific {
WTF_MAKE_NONCOPYABLE(ThreadSpecific);
public:
ThreadSpecific();
bool isSet();
T* operator->();
operator T*();
T& operator*();
private:
#if OS(WIN)
WTF_EXPORT friend void ThreadSpecificThreadExit();
#endif
~ThreadSpecific();
T* get();
void set(T*);
void static destroy(void* ptr);
struct Data {
WTF_MAKE_NONCOPYABLE(Data);
public:
Data(T* value, ThreadSpecific<T>* owner) : value(value), owner(owner) {}
T* value;
ThreadSpecific<T>* owner;
#if OS(WIN)
void (*destructor)(void*);
#endif
};
#if USE(PTHREADS)
pthread_key_t m_key;
#elif OS(WIN)
int m_index;
#endif
};
#if USE(PTHREADS)
typedef pthread_key_t ThreadSpecificKey;
inline void threadSpecificKeyCreate(ThreadSpecificKey* key, void (*destructor)(void *))
{
int error = pthread_key_create(key, destructor);
if (error)
CRASH();
}
inline void threadSpecificKeyDelete(ThreadSpecificKey key)
{
int error = pthread_key_delete(key);
if (error)
CRASH();
}
inline void threadSpecificSet(ThreadSpecificKey key, void* value)
{
pthread_setspecific(key, value);
}
inline void* threadSpecificGet(ThreadSpecificKey key)
{
return pthread_getspecific(key);
}
template<typename T>
inline ThreadSpecific<T>::ThreadSpecific()
{
int error = pthread_key_create(&m_key, destroy);
if (error)
CRASH();
}
template<typename T>
inline T* ThreadSpecific<T>::get()
{
Data* data = static_cast<Data*>(pthread_getspecific(m_key));
return data ? data->value : 0;
}
template<typename T>
inline void ThreadSpecific<T>::set(T* ptr)
{
ASSERT(!get());
pthread_setspecific(m_key, new Data(ptr, this));
}
#elif OS(WIN)
#ifndef TLS_OUT_OF_INDEXES
#define TLS_OUT_OF_INDEXES 0xffffffff
#endif
const int kMaxTlsKeySize = 256;
WTF_EXPORT long& tlsKeyCount();
WTF_EXPORT DWORD* tlsKeys();
class PlatformThreadSpecificKey;
typedef PlatformThreadSpecificKey* ThreadSpecificKey;
WTF_EXPORT void threadSpecificKeyCreate(ThreadSpecificKey*, void (*)(void *));
WTF_EXPORT void threadSpecificKeyDelete(ThreadSpecificKey);
WTF_EXPORT void threadSpecificSet(ThreadSpecificKey, void*);
WTF_EXPORT void* threadSpecificGet(ThreadSpecificKey);
template<typename T>
inline ThreadSpecific<T>::ThreadSpecific()
: m_index(-1)
{
DWORD tlsKey = TlsAlloc();
if (tlsKey == TLS_OUT_OF_INDEXES)
CRASH();
m_index = InterlockedIncrement(&tlsKeyCount()) - 1;
if (m_index >= kMaxTlsKeySize)
CRASH();
tlsKeys()[m_index] = tlsKey;
}
template<typename T>
inline ThreadSpecific<T>::~ThreadSpecific()
{
TlsFree(tlsKeys()[m_index]);
}
template<typename T>
inline T* ThreadSpecific<T>::get()
{
Data* data = static_cast<Data*>(TlsGetValue(tlsKeys()[m_index]));
return data ? data->value : 0;
}
template<typename T>
inline void ThreadSpecific<T>::set(T* ptr)
{
ASSERT(!get());
Data* data = new Data(ptr, this);
data->destructor = &ThreadSpecific<T>::destroy;
TlsSetValue(tlsKeys()[m_index], data);
}
#else
#error ThreadSpecific is not implemented for this platform.
#endif
template<typename T>
inline void ThreadSpecific<T>::destroy(void* ptr)
{
if (isShutdown())
return;
Data* data = static_cast<Data*>(ptr);
#if USE(PTHREADS)
pthread_setspecific(data->owner->m_key, ptr);
#endif
data->value->~T();
fastFree(data->value);
#if USE(PTHREADS)
pthread_setspecific(data->owner->m_key, 0);
#elif OS(WIN)
TlsSetValue(tlsKeys()[data->owner->m_index], 0);
#else
#error ThreadSpecific is not implemented for this platform.
#endif
delete data;
}
template<typename T>
inline bool ThreadSpecific<T>::isSet()
{
return !!get();
}
template<typename T>
inline ThreadSpecific<T>::operator T*()
{
T* ptr = static_cast<T*>(get());
if (!ptr) {
ptr = static_cast<T*>(fastZeroedMalloc(sizeof(T)));
set(ptr);
new (NotNull, ptr) T;
}
return ptr;
}
template<typename T>
inline T* ThreadSpecific<T>::operator->()
{
return operator T*();
}
template<typename T>
inline T& ThreadSpecific<T>::operator*()
{
return *operator T*();
}
}
using WTF::ThreadSpecific;
#endif