20
21
22
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
|
#include <stdlib.h>
#import "runtime.h"
#import "runtime-private.h"
#import "OFObject.h"
#import "macros.h"
static __thread id *objects = NULL;
static __thread id *top = NULL;
static __thread size_t size = 0;
id
objc_autorelease(id object)
{
return [object autorelease];
}
void*
objc_autoreleasePoolPush()
{
ptrdiff_t offset = top - objects;
return (void*)offset;
}
void
objc_autoreleasePoolPop(void *offset)
{
id *pool = objects + (ptrdiff_t)offset;
id *iter;
for (iter = pool; iter < top; iter++)
[*iter release];
top = pool;
}
id
_objc_rootAutorelease(id object)
{
if (objects == NULL) {
if ((objects = malloc(of_pagesize)) == NULL)
ERROR("Out of memory for autorelease pools!")
top = objects;
}
if ((uintptr_t)top >= (uintptr_t)objects + size) {
ptrdiff_t diff = top - objects;
size += of_pagesize;
if ((objects = realloc(objects, size)) == NULL)
ERROR("Out of memory for autorelease pools!")
top = objects + diff;
}
*top = object;
top++;
return object;
}
|
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
20
21
22
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
|
#include <stdlib.h>
#import "runtime.h"
#import "runtime-private.h"
#import "OFObject.h"
#ifndef OF_COMPILER_TLS
# import "threading.h"
#endif
#import "macros.h"
#ifdef OF_COMPILER_TLS
static __thread id *objects = NULL;
static __thread id *top = NULL;
static __thread size_t size = 0;
#else
static of_tlskey_t objectsKey, topKey, sizeKey;
static void __attribute__((constructor))
init(void)
{
if (!of_tlskey_new(&objectsKey) || !of_tlskey_new(&sizeKey) ||
!of_tlskey_new(&topKey))
ERROR("Unable to create TLS key for autorelease pools!")
}
#endif
id
objc_autorelease(id object)
{
return [object autorelease];
}
void*
objc_autoreleasePoolPush()
{
#ifndef OF_COMPILER_TLS
id *top = of_tlskey_get(topKey);
id *objects = of_tlskey_get(objectsKey);
#endif
ptrdiff_t offset = top - objects;
return (void*)offset;
}
void
objc_autoreleasePoolPop(void *offset)
{
#ifndef OF_COMPILER_TLS
id *top = of_tlskey_get(topKey);
id *objects = of_tlskey_get(objectsKey);
#endif
id *pool = objects + (ptrdiff_t)offset;
id *iter;
for (iter = pool; iter < top; iter++)
[*iter release];
#ifdef OF_COMPILER_TLS
top = pool;
#else
if (!of_tlskey_set(topKey, pool))
ERROR("Failed to set TLS key!")
#endif
}
id
_objc_rootAutorelease(id object)
{
#ifndef OF_COMPILER_TLS
id *top = of_tlskey_get(topKey);
id *objects = of_tlskey_get(objectsKey);
size_t size = (size_t)(uintptr_t)of_tlskey_get(sizeKey);
#endif
if (objects == NULL) {
if ((objects = malloc(of_pagesize)) == NULL)
ERROR("Out of memory for autorelease pools!")
#ifndef OF_COMPILER_TLS
if (!of_tlskey_set(objectsKey, objects))
ERROR("Failed to set TLS key!")
if (!of_tlskey_set(sizeKey, (void*)(uintptr_t)of_pagesize))
ERROR("Failed to set TLS key!")
#endif
top = objects;
}
if ((uintptr_t)top >= (uintptr_t)objects + size) {
ptrdiff_t diff = top - objects;
size += of_pagesize;
if ((objects = realloc(objects, size)) == NULL)
ERROR("Out of memory for autorelease pools!")
#ifndef OF_COMPILER_TLS
if (!of_tlskey_set(objectsKey, objects))
ERROR("Failed to set TLS key!")
if (!of_tlskey_set(sizeKey, (void*)(uintptr_t)size))
ERROR("Failed to set TLS key!")
#endif
top = objects + diff;
}
*top = object;
top++;
#ifndef OF_COMPILER_TLS
if (!of_tlskey_set(topKey, objects))
ERROR("Failed to set TLS key!")
#endif
return object;
}
|