annotate libobjc/accessors.m @ 158:494b0b89df80 default tip

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 1830386684a0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* GNU Objective C Runtime accessors functions
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
2 Copyright (C) 2010-2020 Free Software Foundation, Inc.
111
kono
parents:
diff changeset
3 Contributed by Nicola Pero
kono
parents:
diff changeset
4
kono
parents:
diff changeset
5 This file is part of GCC.
kono
parents:
diff changeset
6
kono
parents:
diff changeset
7 GCC is free software; you can redistribute it and/or modify it under the
kono
parents:
diff changeset
8 terms of the GNU General Public License as published by the Free Software
kono
parents:
diff changeset
9 Foundation; either version 3, or (at your option) any later version.
kono
parents:
diff changeset
10
kono
parents:
diff changeset
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
kono
parents:
diff changeset
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
kono
parents:
diff changeset
13 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
kono
parents:
diff changeset
14 details.
kono
parents:
diff changeset
15
kono
parents:
diff changeset
16 Under Section 7 of GPL version 3, you are granted additional
kono
parents:
diff changeset
17 permissions described in the GCC Runtime Library Exception, version
kono
parents:
diff changeset
18 3.1, as published by the Free Software Foundation.
kono
parents:
diff changeset
19
kono
parents:
diff changeset
20 You should have received a copy of the GNU General Public License and
kono
parents:
diff changeset
21 a copy of the GCC Runtime Library Exception along with this program;
kono
parents:
diff changeset
22 see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
kono
parents:
diff changeset
23 <http://www.gnu.org/licenses/>. */
kono
parents:
diff changeset
24
kono
parents:
diff changeset
25 #include "objc-private/common.h"
kono
parents:
diff changeset
26 #include "objc/objc.h"
kono
parents:
diff changeset
27 #include "objc/thr.h"
kono
parents:
diff changeset
28 #include <string.h> /* For memcpy */
kono
parents:
diff changeset
29
kono
parents:
diff changeset
30 /* This file contains functions that the compiler uses when
kono
parents:
diff changeset
31 synthesizing accessors (getters/setters) for properties. The
kono
parents:
diff changeset
32 functions are part of the ABI, but are meant to be used by the
kono
parents:
diff changeset
33 compiler and not by users; for this reason, they are not declared
kono
parents:
diff changeset
34 in public header files. The compiler automatically generates
kono
parents:
diff changeset
35 declarations for these functions. */
kono
parents:
diff changeset
36
kono
parents:
diff changeset
37 /* Properties can be "atomic", which requires protecting them from
kono
parents:
diff changeset
38 concurrency issues using a lock. Unfortunately, we can't have a
kono
parents:
diff changeset
39 lock for each property, so we'll go with a small pool of locks.
kono
parents:
diff changeset
40 Any time a property is accessed in an "atomic" way, we pick a
kono
parents:
diff changeset
41 random lock from the pool (random, but always the same one for the
kono
parents:
diff changeset
42 same property of the same object) and use it to protect access to
kono
parents:
diff changeset
43 the property.
kono
parents:
diff changeset
44
kono
parents:
diff changeset
45 The size of the pool is currently 16. A bigger pool can help
kono
parents:
diff changeset
46 reduce contention, ie, reduce the chances that two threads,
kono
parents:
diff changeset
47 operating on unrelated properties, will have to wait for each other
kono
parents:
diff changeset
48 because the properties use the same lock. 16 seems big enough at
kono
parents:
diff changeset
49 the moment. */
kono
parents:
diff changeset
50 #define ACCESSORS_NUMBER_OF_LOCKS 16
kono
parents:
diff changeset
51
kono
parents:
diff changeset
52 #define ACCESSORS_HASH(POINTER) ((((size_t)POINTER >> 8) ^ (size_t)POINTER) & (ACCESSORS_NUMBER_OF_LOCKS - 1))
kono
parents:
diff changeset
53
kono
parents:
diff changeset
54 static objc_mutex_t accessors_locks[ACCESSORS_NUMBER_OF_LOCKS];
kono
parents:
diff changeset
55
kono
parents:
diff changeset
56 /* This is called at startup to setup the locks. */
kono
parents:
diff changeset
57 void
kono
parents:
diff changeset
58 __objc_accessors_init (void)
kono
parents:
diff changeset
59 {
kono
parents:
diff changeset
60 int i;
kono
parents:
diff changeset
61
kono
parents:
diff changeset
62 for (i = 0; i < ACCESSORS_NUMBER_OF_LOCKS; i++)
kono
parents:
diff changeset
63 accessors_locks[i] = objc_mutex_allocate ();
kono
parents:
diff changeset
64 }
kono
parents:
diff changeset
65
kono
parents:
diff changeset
66 /* The property accessors automatically call various methods from the
kono
parents:
diff changeset
67 Foundation library (eg, GNUstep-base). These methods are not
kono
parents:
diff changeset
68 implemented here, but we need to declare them so we can compile the
kono
parents:
diff changeset
69 runtime. The Foundation library will need to provide
kono
parents:
diff changeset
70 implementations of these methods (most likely in the root class,
kono
parents:
diff changeset
71 eg, NSObject) as the accessors only work with objects of classes
kono
parents:
diff changeset
72 that implement these methods. */
kono
parents:
diff changeset
73 @interface _libobjcNSObject
kono
parents:
diff changeset
74 - (id) copyWithZone: (void *)zone;
kono
parents:
diff changeset
75 - (id) mutableCopyWithZone: (void *)zone;
kono
parents:
diff changeset
76 @end
kono
parents:
diff changeset
77 #define COPY(X) [((_libobjcNSObject *)(X)) copyWithZone: NULL]
kono
parents:
diff changeset
78 #define MUTABLE_COPY(X) [((_libobjcNSObject *)(X)) mutableCopyWithZone: NULL]
kono
parents:
diff changeset
79
kono
parents:
diff changeset
80
kono
parents:
diff changeset
81 #if OBJC_WITH_GC
kono
parents:
diff changeset
82
kono
parents:
diff changeset
83 # define AUTORELEASE(X) (X)
kono
parents:
diff changeset
84 # define RELEASE(X)
kono
parents:
diff changeset
85 # define RETAIN(X) (X)
kono
parents:
diff changeset
86
kono
parents:
diff changeset
87 #else
kono
parents:
diff changeset
88
kono
parents:
diff changeset
89 @interface _libobjcNSObject (RetainReleaseMethods)
kono
parents:
diff changeset
90 - (id) autorelease;
kono
parents:
diff changeset
91 - (oneway void) release;
kono
parents:
diff changeset
92 - (id) retain;
kono
parents:
diff changeset
93 @end
kono
parents:
diff changeset
94 # define AUTORELEASE(X) [((_libobjcNSObject *)(X)) autorelease]
kono
parents:
diff changeset
95 # define RELEASE(X) [((_libobjcNSObject *)(X)) release]
kono
parents:
diff changeset
96 # define RETAIN(X) [((_libobjcNSObject *)(X)) retain]
kono
parents:
diff changeset
97
kono
parents:
diff changeset
98 #endif
kono
parents:
diff changeset
99
kono
parents:
diff changeset
100 /* The compiler uses this function when implementing some synthesized
kono
parents:
diff changeset
101 getters for properties of type 'id'. */
kono
parents:
diff changeset
102 id
kono
parents:
diff changeset
103 objc_getProperty (id self, SEL __attribute__((unused)) _cmd, ptrdiff_t offset, BOOL is_atomic)
kono
parents:
diff changeset
104 {
kono
parents:
diff changeset
105 if (self != nil)
kono
parents:
diff changeset
106 {
kono
parents:
diff changeset
107 id *pointer_to_ivar = (id *)((char *)self + offset);
kono
parents:
diff changeset
108
kono
parents:
diff changeset
109
kono
parents:
diff changeset
110 if (is_atomic == NO)
kono
parents:
diff changeset
111 {
kono
parents:
diff changeset
112 /* Note that in this case, we do not RETAIN/AUTORELEASE the
kono
parents:
diff changeset
113 returned value. The programmer should do it if it is
kono
parents:
diff changeset
114 needed. Since access is non-atomic, other threads can be
kono
parents:
diff changeset
115 ignored and the caller has full control of what happens
kono
parents:
diff changeset
116 to the object and whether it needs to be RETAINed or not,
kono
parents:
diff changeset
117 so it makes sense to leave the decision to him/her. This
kono
parents:
diff changeset
118 is also what the Apple/NeXT runtime does. */
kono
parents:
diff changeset
119 return *pointer_to_ivar;
kono
parents:
diff changeset
120 }
kono
parents:
diff changeset
121 else
kono
parents:
diff changeset
122 {
kono
parents:
diff changeset
123 objc_mutex_t lock = accessors_locks[ACCESSORS_HASH (pointer_to_ivar)];
kono
parents:
diff changeset
124 id result;
kono
parents:
diff changeset
125
kono
parents:
diff changeset
126 objc_mutex_lock (lock);
kono
parents:
diff changeset
127 result = RETAIN (*(pointer_to_ivar));
kono
parents:
diff changeset
128 objc_mutex_unlock (lock);
kono
parents:
diff changeset
129
kono
parents:
diff changeset
130 return AUTORELEASE (result);
kono
parents:
diff changeset
131 }
kono
parents:
diff changeset
132 }
kono
parents:
diff changeset
133
kono
parents:
diff changeset
134 return nil;
kono
parents:
diff changeset
135 }
kono
parents:
diff changeset
136
kono
parents:
diff changeset
137 /* The compiler uses this function when implementing some synthesized
kono
parents:
diff changeset
138 setters for properties of type 'id'.
kono
parents:
diff changeset
139
kono
parents:
diff changeset
140 PS: Note how 'should_copy' is declared 'BOOL' but then actually
kono
parents:
diff changeset
141 takes values from 0 to 2. This hack was introduced by Apple; we
kono
parents:
diff changeset
142 do the same for compatibility reasons. */
kono
parents:
diff changeset
143 void
kono
parents:
diff changeset
144 objc_setProperty (id self, SEL __attribute__((unused)) _cmd, ptrdiff_t offset, id new_value, BOOL is_atomic, BOOL should_copy)
kono
parents:
diff changeset
145 {
kono
parents:
diff changeset
146 if (self != nil)
kono
parents:
diff changeset
147 {
kono
parents:
diff changeset
148 id *pointer_to_ivar = (id *)((char *)self + offset);
kono
parents:
diff changeset
149 id retained_value;
kono
parents:
diff changeset
150 #if !OBJC_WITH_GC
kono
parents:
diff changeset
151 id old_value;
kono
parents:
diff changeset
152 #endif
kono
parents:
diff changeset
153
kono
parents:
diff changeset
154 switch (should_copy)
kono
parents:
diff changeset
155 {
kono
parents:
diff changeset
156 case 0: /* retain */
kono
parents:
diff changeset
157 {
kono
parents:
diff changeset
158 if (*pointer_to_ivar == new_value)
kono
parents:
diff changeset
159 return;
kono
parents:
diff changeset
160 retained_value = RETAIN (new_value);
kono
parents:
diff changeset
161 break;
kono
parents:
diff changeset
162 }
kono
parents:
diff changeset
163 case 2: /* mutable copy */
kono
parents:
diff changeset
164 {
kono
parents:
diff changeset
165 retained_value = MUTABLE_COPY (new_value);
kono
parents:
diff changeset
166 break;
kono
parents:
diff changeset
167 }
kono
parents:
diff changeset
168 case 1: /* copy */
kono
parents:
diff changeset
169 default:
kono
parents:
diff changeset
170 {
kono
parents:
diff changeset
171 retained_value = COPY (new_value);
kono
parents:
diff changeset
172 break;
kono
parents:
diff changeset
173 }
kono
parents:
diff changeset
174 }
kono
parents:
diff changeset
175
kono
parents:
diff changeset
176 if (is_atomic == NO)
kono
parents:
diff changeset
177 {
kono
parents:
diff changeset
178 #if !OBJC_WITH_GC
kono
parents:
diff changeset
179 old_value = *pointer_to_ivar;
kono
parents:
diff changeset
180 #endif
kono
parents:
diff changeset
181 *pointer_to_ivar = retained_value;
kono
parents:
diff changeset
182 }
kono
parents:
diff changeset
183 else
kono
parents:
diff changeset
184 {
kono
parents:
diff changeset
185 objc_mutex_t lock = accessors_locks[ACCESSORS_HASH (pointer_to_ivar)];
kono
parents:
diff changeset
186
kono
parents:
diff changeset
187 objc_mutex_lock (lock);
kono
parents:
diff changeset
188 #if !OBJC_WITH_GC
kono
parents:
diff changeset
189 old_value = *pointer_to_ivar;
kono
parents:
diff changeset
190 #endif
kono
parents:
diff changeset
191 *pointer_to_ivar = retained_value;
kono
parents:
diff changeset
192 objc_mutex_unlock (lock);
kono
parents:
diff changeset
193 }
kono
parents:
diff changeset
194 #if !OBJC_WITH_GC
kono
parents:
diff changeset
195 RELEASE (old_value);
kono
parents:
diff changeset
196 #endif
kono
parents:
diff changeset
197 }
kono
parents:
diff changeset
198 }
kono
parents:
diff changeset
199
kono
parents:
diff changeset
200 /* The compiler uses this function when implementing some synthesized
kono
parents:
diff changeset
201 getters for properties of arbitrary C types. The data is just
kono
parents:
diff changeset
202 copied. Compatibility Note: this function does not exist in the
kono
parents:
diff changeset
203 Apple/NeXT runtime. */
kono
parents:
diff changeset
204 void
kono
parents:
diff changeset
205 objc_getPropertyStruct (void *destination, const void *source, ptrdiff_t size, BOOL is_atomic, BOOL __attribute__((unused)) has_strong)
kono
parents:
diff changeset
206 {
kono
parents:
diff changeset
207 if (is_atomic == NO)
kono
parents:
diff changeset
208 memcpy (destination, source, size);
kono
parents:
diff changeset
209 else
kono
parents:
diff changeset
210 {
kono
parents:
diff changeset
211 objc_mutex_t lock = accessors_locks[ACCESSORS_HASH (source)];
kono
parents:
diff changeset
212
kono
parents:
diff changeset
213 objc_mutex_lock (lock);
kono
parents:
diff changeset
214 memcpy (destination, source, size);
kono
parents:
diff changeset
215 objc_mutex_unlock (lock);
kono
parents:
diff changeset
216 }
kono
parents:
diff changeset
217 }
kono
parents:
diff changeset
218
kono
parents:
diff changeset
219 /* The compiler uses this function when implementing some synthesized
kono
parents:
diff changeset
220 setters for properties of arbitrary C types. The data is just
kono
parents:
diff changeset
221 copied. Compatibility Note: this function does not exist in the
kono
parents:
diff changeset
222 Apple/NeXT runtime. */
kono
parents:
diff changeset
223 void
kono
parents:
diff changeset
224 objc_setPropertyStruct (void *destination, const void *source, ptrdiff_t size, BOOL is_atomic, BOOL __attribute__((unused)) has_strong)
kono
parents:
diff changeset
225 {
kono
parents:
diff changeset
226 if (is_atomic == NO)
kono
parents:
diff changeset
227 memcpy (destination, source, size);
kono
parents:
diff changeset
228 else
kono
parents:
diff changeset
229 {
kono
parents:
diff changeset
230 objc_mutex_t lock = accessors_locks[ACCESSORS_HASH (destination)];
kono
parents:
diff changeset
231
kono
parents:
diff changeset
232 objc_mutex_lock (lock);
kono
parents:
diff changeset
233 memcpy (destination, source, size);
kono
parents:
diff changeset
234 objc_mutex_unlock (lock);
kono
parents:
diff changeset
235 }
kono
parents:
diff changeset
236 }
kono
parents:
diff changeset
237
kono
parents:
diff changeset
238 /* This is the function that the Apple/NeXT runtime has instead of
kono
parents:
diff changeset
239 objc_getPropertyStruct and objc_setPropertyStruct. We include it
kono
parents:
diff changeset
240 for API compatibility (just for people who may have used
kono
parents:
diff changeset
241 objc_copyStruct on the NeXT runtime thinking it was a public API);
kono
parents:
diff changeset
242 the compiler never generates calls to it with the GNU runtime.
kono
parents:
diff changeset
243 This function is clumsy because it requires two locks instead of
kono
parents:
diff changeset
244 one. */
kono
parents:
diff changeset
245 void
kono
parents:
diff changeset
246 objc_copyStruct (void *destination, const void *source, ptrdiff_t size, BOOL is_atomic, BOOL __attribute__((unused)) has_strong)
kono
parents:
diff changeset
247 {
kono
parents:
diff changeset
248 if (is_atomic == NO)
kono
parents:
diff changeset
249 memcpy (destination, source, size);
kono
parents:
diff changeset
250 else
kono
parents:
diff changeset
251 {
kono
parents:
diff changeset
252 /* We don't know which one is the property, so we have to lock
kono
parents:
diff changeset
253 both. One of them is most likely a temporary buffer in the
kono
parents:
diff changeset
254 local stack and we really wouldn't want to lock it (our
kono
parents:
diff changeset
255 objc_getPropertyStruct and objc_setPropertyStruct functions
kono
parents:
diff changeset
256 don't lock it). Note that if we're locking more than one
kono
parents:
diff changeset
257 accessor lock at once, we need to always lock them in the
kono
parents:
diff changeset
258 same order to avoid deadlocks. */
kono
parents:
diff changeset
259 objc_mutex_t first_lock;
kono
parents:
diff changeset
260 objc_mutex_t second_lock;
kono
parents:
diff changeset
261
kono
parents:
diff changeset
262 if (ACCESSORS_HASH (source) == ACCESSORS_HASH (destination))
kono
parents:
diff changeset
263 {
kono
parents:
diff changeset
264 /* A lucky collision. */
kono
parents:
diff changeset
265 first_lock = accessors_locks[ACCESSORS_HASH (source)];
kono
parents:
diff changeset
266 objc_mutex_lock (first_lock);
kono
parents:
diff changeset
267 memcpy (destination, source, size);
kono
parents:
diff changeset
268 objc_mutex_unlock (first_lock);
kono
parents:
diff changeset
269 return;
kono
parents:
diff changeset
270 }
kono
parents:
diff changeset
271
kono
parents:
diff changeset
272 if (ACCESSORS_HASH (source) > ACCESSORS_HASH (destination))
kono
parents:
diff changeset
273 {
kono
parents:
diff changeset
274 first_lock = accessors_locks[ACCESSORS_HASH (source)];
kono
parents:
diff changeset
275 second_lock = accessors_locks[ACCESSORS_HASH (destination)];
kono
parents:
diff changeset
276 }
kono
parents:
diff changeset
277 else
kono
parents:
diff changeset
278 {
kono
parents:
diff changeset
279 first_lock = accessors_locks[ACCESSORS_HASH (destination)];
kono
parents:
diff changeset
280 second_lock = accessors_locks[ACCESSORS_HASH (source)];
kono
parents:
diff changeset
281 }
kono
parents:
diff changeset
282
kono
parents:
diff changeset
283 objc_mutex_lock (first_lock);
kono
parents:
diff changeset
284 objc_mutex_lock (second_lock);
kono
parents:
diff changeset
285 memcpy (destination, source, size);
kono
parents:
diff changeset
286 objc_mutex_unlock (second_lock);
kono
parents:
diff changeset
287 objc_mutex_unlock (first_lock);
kono
parents:
diff changeset
288 }
kono
parents:
diff changeset
289 }