40
41
42
43
44
45
46
47
48
49
50
51
52
53
|
*
* The reason is that you derive from OFThread and reimplement main.
* If OFThread instead of self would be used here, the reimplemented
* main would never be called.
*/
return [[[self alloc] initWithObject: obj] autorelease];
}
- initWithObject: (id)obj
{
Class c;
self = [super init];
object = obj;
|
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
|
*
* The reason is that you derive from OFThread and reimplement main.
* If OFThread instead of self would be used here, the reimplemented
* main would never be called.
*/
return [[[self alloc] initWithObject: obj] autorelease];
}
+ setObject: (id)obj
forTLSKey: (OFTLSKey*)key
{
id old;
@try {
old = [self objectForTLSKey: key];
} @catch (OFNotInSetException *e) {
[e free];
old = nil;
}
#ifndef _WIN32
if (pthread_setspecific(key->key, obj))
#else
if (!TlsSetValue(key->key, obj))
#endif
/* FIXME: Maybe another exception would be better */
@throw [OFNotInSetException newWithClass: self];
if (obj != nil)
[obj retain];
if (old != nil)
[old release];
return self;
}
+ (id)objectForTLSKey: (OFTLSKey*)key
{
void *ret;
#ifndef _WIN32
ret = pthread_getspecific(key->key);
#else
ret = TlsGetValue(key->key);
#endif
/*
* NULL and nil might be different on some platforms. NULL is returned
* if the key is missing, nil can be returned if it was explicitly set
* to nil to release the old object.
*/
if (ret == NULL || (id)ret == nil)
@throw [OFNotInSetException newWithClass: self];
return (id)ret;
}
- initWithObject: (id)obj
{
Class c;
self = [super init];
object = obj;
|
109
110
111
112
113
114
115
|
CloseHandle(thread);
}
#endif
return [super free];
}
@end
|
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
|
CloseHandle(thread);
}
#endif
return [super free];
}
@end
@implementation OFTLSKey
+ tlsKeyWithDestructor: (void(*)(void*))destructor
{
return [[[OFTLSKey alloc] initWithDestructor: destructor] autorelease];
}
- initWithDestructor: (void(*)(void*))destructor
{
Class c;
self = [super init];
/* FIXME: Call destructor on Win32 */
#ifndef _WIN32
if (pthread_key_create(&key, destructor)) {
#else
if ((key = TlsAlloc()) == TLS_OUT_OF_INDEXES) {
#endif
c = isa;
[super free];
@throw [OFInitializationFailedException newWithClass: c];
}
return self;
}
@end
|