1 /* GNU Objective C Runtime ivar related functions.
2 Copyright (C) 2010 Free Software Foundation, Inc.
3 Contributed by Nicola Pero
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify it under the
8 terms of the GNU General Public License as published by the Free Software
9 Foundation; either version 3, or (at your option) any later version.
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
13 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
16 Under Section 7 of GPL version 3, you are granted additional
17 permissions described in the GCC Runtime Library Exception, version
18 3.1, as published by the Free Software Foundation.
20 You should have received a copy of the GNU General Public License and
21 a copy of the GCC Runtime Library Exception along with this program;
22 see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
23 <http://www.gnu.org/licenses/>. */
25 #include "objc-private/common.h"
26 #include "objc/runtime.h"
27 #include "objc-private/module-abi-8.h" /* For runtime structures */
29 #include "objc-private/runtime.h" /* the kitchen sink */
30 #include <string.h> /* For strcmp */
33 class_getInstanceVariable (Class class_
, const char *name
)
35 if (class_
!= Nil
&& name
!= NULL
&& ! CLS_IS_IN_CONSTRUCTION (class_
))
39 struct objc_ivar_list
*ivars
= class_
->ivars
;
44 for (i
= 0; i
< ivars
->ivar_count
; i
++)
46 struct objc_ivar
*ivar
= &(ivars
->ivar_list
[i
]);
48 if (!strcmp (ivar
->ivar_name
, name
))
54 class_
= class_getSuperclass (class_
);
61 class_getClassVariable (Class class_
, const char *name
)
66 /* Logically, since a class is an instance of its meta-class, and
67 since its class methods are the instance methods of the
68 meta-class, class variables should be instance variables of the
69 meta-class. That is different from the normal use of having
70 'static' variables in the class implementation file, because
71 every class would have its own variables.
73 Anyway, it is all speculative at this stage, but if we get class
74 variables in Objective-C, it is conceivable that this
75 implementation should work. */
76 return class_getInstanceVariable (class_
->class_pointer
, name
);
80 object_getIndexedIvars (id object
)
86 return (void *)(((char *)object
)
87 + object
->class_pointer
->instance_size
);
92 object_getInstanceVariable (id object
, const char *name
, void **returnValue
)
94 if (object
== nil
|| name
== NULL
)
98 struct objc_ivar
* variable
= class_getInstanceVariable (object
->class_pointer
, name
);
100 if (variable
!= NULL
&& returnValue
!= NULL
)
102 char *location
= (char *)object
+ variable
->ivar_offset
;
104 *returnValue
= *((id
*)location
);
112 object_setInstanceVariable (id object
, const char *name
, void *newValue
)
114 if (object
== nil
|| name
== NULL
)
118 struct objc_ivar
* variable
= class_getInstanceVariable (object
->class_pointer
, name
);
120 if (variable
!= NULL
)
122 char *location
= (char *)object
+ variable
->ivar_offset
;
124 *((id
*)location
) = (id
)newValue
;
131 id
object_getIvar (id object
, struct objc_ivar
* variable
)
133 if (object
== nil
|| variable
== NULL
)
137 char *location
= (char *)object
+ variable
->ivar_offset
;
139 return *((id
*)location
);
143 void object_setIvar (id object
, struct objc_ivar
* variable
, id value
)
145 if (object
== nil
|| variable
== NULL
)
149 char *location
= (char *)object
+ variable
->ivar_offset
;
151 *((id
*)location
) = value
;
155 const char * ivar_getName (struct objc_ivar
* variable
)
157 if (variable
== NULL
)
160 return variable
->ivar_name
;
163 ptrdiff_t ivar_getOffset (struct objc_ivar
* variable
)
165 if (variable
== NULL
)
168 return (ptrdiff_t)(variable
->ivar_offset
);
171 const char * ivar_getTypeEncoding (struct objc_ivar
* variable
)
173 if (variable
== NULL
)
176 return variable
->ivar_type
;
179 struct objc_ivar
** class_copyIvarList (Class class_
, unsigned int *numberOfReturnedIvars
)
181 unsigned int count
= 0;
182 struct objc_ivar
**returnValue
= NULL
;
183 struct objc_ivar_list
* ivar_list
;
185 if (class_
== Nil
|| CLS_IS_IN_CONSTRUCTION (class_
))
187 if (numberOfReturnedIvars
)
188 *numberOfReturnedIvars
= 0;
192 /* Count how many ivars we have. */
193 ivar_list
= class_
->ivars
;
194 count
= ivar_list
->ivar_count
;
200 /* Allocate enough memory to hold them. */
201 returnValue
= (struct objc_ivar
**)(malloc (sizeof (struct objc_ivar
*) * (count
+ 1)));
203 /* Copy the ivars. */
204 for (i
= 0; i
< count
; i
++)
206 returnValue
[i
] = &(ivar_list
->ivar_list
[i
]);
209 returnValue
[i
] = NULL
;
212 if (numberOfReturnedIvars
)
213 *numberOfReturnedIvars
= count
;
219 class_addIvar (Class class_
, const char * ivar_name
, size_t size
,
220 unsigned char alignment
, const char *type
)
222 struct objc_ivar_list
*ivars
;
225 || (! CLS_IS_IN_CONSTRUCTION (class_
))
227 || (strcmp (ivar_name
, "") == 0)
232 /* Check if the class has an instance variable with that name
234 ivars
= class_
->ivars
;
240 for (i
= 0; i
< ivars
->ivar_count
; i
++)
242 struct objc_ivar
*ivar
= &(ivars
->ivar_list
[i
]);
244 if (strcmp (ivar
->ivar_name
, ivar_name
) == 0)
251 /* Ok, no direct ivars. Check superclasses. */
252 if (class_getInstanceVariable (objc_getClass ((char *)(class_
->super_class
)),
256 /* Good. Create space for the new instance variable. */
259 int ivar_count
= ivars
->ivar_count
+ 1;
260 int new_size
= sizeof (struct objc_ivar_list
)
261 + (ivar_count
- 1) * sizeof (struct objc_ivar
);
263 ivars
= (struct objc_ivar_list
*) objc_realloc (ivars
, new_size
);
264 ivars
->ivar_count
= ivar_count
;
265 class_
->ivars
= ivars
;
269 int new_size
= sizeof (struct objc_ivar_list
);
271 ivars
= (struct objc_ivar_list
*) objc_malloc (new_size
);
272 ivars
->ivar_count
= 1;
273 class_
->ivars
= ivars
;
276 /* Now ivars is set to a list of instance variables of the right
279 struct objc_ivar
*ivar
= &(ivars
->ivar_list
[ivars
->ivar_count
- 1]);
282 ivar
->ivar_name
= objc_malloc (strlen (ivar_name
) + 1);
283 strcpy ((char *)ivar
->ivar_name
, ivar_name
);
285 ivar
->ivar_type
= objc_malloc (strlen (type
) + 1);
286 strcpy ((char *)ivar
->ivar_type
, type
);
288 /* The new instance variable is placed at the end of the existing
289 instance_size, at the first byte that is aligned with
291 misalignment
= class_
->instance_size
% alignment
;
293 if (misalignment
== 0)
294 ivar
->ivar_offset
= class_
->instance_size
;
296 ivar
->ivar_offset
= class_
->instance_size
- misalignment
+ alignment
;
298 class_
->instance_size
= ivar
->ivar_offset
+ objc_sizeof_type (ivar
->ivar_type
);
306 property_getName (struct objc_property
* property
__attribute__ ((__unused__
)))
308 if (property
== NULL
)
312 /* The current ABI does not have any information on properties. */
317 property_getAttributes (struct objc_property
* property
__attribute__ ((__unused__
)))
319 if (property
== NULL
)
323 /* The current ABI does not have any information on properties. */
327 struct objc_property
*
328 class_getProperty (Class class_
__attribute__ ((__unused__
)),
329 const char *propertyName
__attribute__ ((__unused__
)))
331 if (class_
== NULL
|| propertyName
== NULL
)
335 /* The current ABI does not have any information on class properties. */
339 struct objc_property
**
340 class_copyPropertyList (Class class_
__attribute__ ((__unused__
)),
341 unsigned int *numberOfReturnedProperties
__attribute__ ((__unused__
)))
345 if (numberOfReturnedProperties
)
346 *numberOfReturnedProperties
= 0;
351 /* The current ABI does not have any information on class properties. */
352 if (numberOfReturnedProperties
)
353 *numberOfReturnedProperties
= 0;
359 class_getIvarLayout (Class class_
__attribute__ ((__unused__
)))
365 class_getWeakIvarLayout (Class class_
__attribute__ ((__unused__
)))
371 class_setIvarLayout (Class class_
__attribute__ ((__unused__
)),
372 const char *layout
__attribute__ ((__unused__
)))
378 class_setWeakIvarLayout (Class class_
__attribute__ ((__unused__
)),
379 const char *layout
__attribute__ ((__unused__
)))