23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
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
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
|
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
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
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
|
-
+
-
+
-
+
-
-
+
+
-
+
-
-
+
+
-
-
+
+
-
-
+
+
+
-
+
+
-
-
-
+
+
+
-
-
+
+
-
-
+
+
+
-
+
+
|
# import "private.h"
#else
# import <objc/runtime.h>
#endif
#import "macros.h"
#if !defined(OF_HAVE_COMPILER_TLS) && defined(OF_HAVE_THREADS)
# import "tlskey.h"
# import "OFTLSKey.h"
#endif
#ifndef OF_OBJFW_RUNTIME
@interface DummyObject
- (void)release;
@end
#endif
#if defined(OF_HAVE_COMPILER_TLS)
static thread_local id *objects = NULL;
static thread_local uintptr_t count = 0;
static thread_local uintptr_t size = 0;
#elif defined(OF_HAVE_THREADS)
static of_tlskey_t objectsKey, countKey, sizeKey;
static OFTLSKey objectsKey, countKey, sizeKey;
#else
static id *objects = NULL;
static uintptr_t count = 0;
static uintptr_t size = 0;
#endif
#if !defined(OF_HAVE_COMPILER_TLS) && defined(OF_HAVE_THREADS)
OF_CONSTRUCTOR()
{
OF_ENSURE(of_tlskey_new(&objectsKey) == 0);
if (OFTLSKeyNew(&objectsKey) != 0 || OFTLSKeyNew(&countKey) != 0 ||
OF_ENSURE(of_tlskey_new(&countKey) == 0);
OF_ENSURE(of_tlskey_new(&sizeKey) == 0);
uintptr_t count = (uintptr_t)of_tlskey_get(countKey);
uintptr_t count = (uintptr_t)OFTLSKeyGet(countKey);
#endif
return (void *)count;
}
void
objc_autoreleasePoolPop(void *pool)
{
#if !defined(OF_HAVE_COMPILER_TLS) && defined(OF_HAVE_THREADS)
id *objects = of_tlskey_get(objectsKey);
uintptr_t count = (uintptr_t)of_tlskey_get(countKey);
id *objects = OFTLSKeyGet(objectsKey);
uintptr_t count = (uintptr_t)OFTLSKeyGet(countKey);
#endif
uintptr_t idx = (uintptr_t)pool;
bool freeMem = false;
if (idx == (uintptr_t)-1) {
idx++;
freeMem = true;
}
for (uintptr_t i = idx; i < count; i++) {
[objects[i] release];
#if !defined(OF_HAVE_COMPILER_TLS) && defined(OF_HAVE_THREADS)
objects = of_tlskey_get(objectsKey);
count = (uintptr_t)of_tlskey_get(countKey);
objects = OFTLSKeyGet(objectsKey);
count = (uintptr_t)OFTLSKeyGet(countKey);
#endif
}
count = idx;
if (freeMem) {
free(objects);
objects = NULL;
#if defined(OF_HAVE_COMPILER_TLS) || !defined(OF_HAVE_THREADS)
size = 0;
#else
OF_ENSURE(of_tlskey_set(objectsKey, objects) == 0);
OF_ENSURE(of_tlskey_set(sizeKey, (void *)0) == 0);
if (OFTLSKeySet(objectsKey, objects) != 0 ||
OFTLSKeySet(sizeKey, (void *)0) != 0)
OBJC_ERROR("Failed to set TLS key!");
#endif
}
#if !defined(OF_HAVE_COMPILER_TLS) && defined(OF_HAVE_THREADS)
OF_ENSURE(of_tlskey_set(countKey, (void *)count) == 0);
if (OFTLSKeySet(countKey, (void *)count) != 0)
OBJC_ERROR("Failed to set TLS key!");
#endif
}
id
_objc_rootAutorelease(id object)
{
#if !defined(OF_HAVE_COMPILER_TLS) && defined(OF_HAVE_THREADS)
id *objects = of_tlskey_get(objectsKey);
uintptr_t count = (uintptr_t)of_tlskey_get(countKey);
uintptr_t size = (uintptr_t)of_tlskey_get(sizeKey);
id *objects = OFTLSKeyGet(objectsKey);
uintptr_t count = (uintptr_t)OFTLSKeyGet(countKey);
uintptr_t size = (uintptr_t)OFTLSKeyGet(sizeKey);
#endif
if (count >= size) {
if (size == 0)
size = 16;
else
size *= 2;
OF_ENSURE((objects =
realloc(objects, size * sizeof(id))) != NULL);
OF_ENSURE(of_tlskey_set(objectsKey, objects) == 0);
OF_ENSURE(of_tlskey_set(sizeKey, (void *)size) == 0);
if (OFTLSKeySet(objectsKey, objects) != 0 ||
OFTLSKeySet(sizeKey, (void *)size) != 0)
OBJC_ERROR("Failed to set TLS key!");
#endif
}
objects[count++] = object;
#if !defined(OF_HAVE_COMPILER_TLS) && defined(OF_HAVE_THREADS)
OF_ENSURE(of_tlskey_set(countKey, (void *)count) == 0);
if (OFTLSKeySet(countKey, (void *)count) != 0)
OBJC_ERROR("Failed to set TLS key!");
#endif
return object;
}
|