/*
* Copyright (c) 2008, 2009, 2010, 2011, 2012
* Jonathan Schleifer <js@webkeks.org>
*
* All rights reserved.
*
* This file is part of ObjFW. It may be distributed under the terms of the
* Q Public License 1.0, which can be found in the file LICENSE.QPL included in
* the packaging of this file.
*
* Alternatively, it may be distributed under the terms of the GNU General
* Public License, either version 2 or 3, which can be found in the file
* LICENSE.GPLv2 or LICENSE.GPLv3 respectively included in the packaging of this
* file.
*/
#include "config.h"
#include <string.h>
#import "runtime.h"
#import "runtime-private.h"
#import "OFObject.h"
#import "macros.h"
#ifdef OF_THREADS
# import "threading.h"
# define NUM_SPINLOCKS 8 /* needs to be a power of 2 */
# define SPINLOCK_HASH(p) ((unsigned)((uintptr_t)p >> 4) & (NUM_SPINLOCKS - 1))
static of_spinlock_t spinlocks[NUM_SPINLOCKS];
#endif
#ifdef OF_THREADS
static void __attribute__((constructor))
init(void)
{
size_t i;
for (i = 0; i < NUM_SPINLOCKS; i++)
if (!of_spinlock_new(&spinlocks[i]))
OBJC_ERROR("Failed to initialize spinlocks!")
}
#endif
id
objc_getProperty(id self, SEL _cmd, ptrdiff_t offset, BOOL atomic)
{
if (atomic) {
id *ptr = (id*)(void*)((char*)self + offset);
#ifdef OF_THREADS
unsigned hash = SPINLOCK_HASH(ptr);
OF_ENSURE(of_spinlock_lock(&spinlocks[hash]));
@try {
return [[*ptr retain] autorelease];
} @finally {
OF_ENSURE(of_spinlock_unlock(&spinlocks[hash]));
}
#else
return [[*ptr retain] autorelease];
#endif
}
return *(id*)(void*)((char*)self + offset);
}
void
objc_setProperty(id self, SEL _cmd, ptrdiff_t offset, id value, BOOL atomic,
signed char copy)
{
if (atomic) {
id *ptr = (id*)(void*)((char*)self + offset);
#ifdef OF_THREADS
unsigned hash = SPINLOCK_HASH(ptr);
OF_ENSURE(of_spinlock_lock(&spinlocks[hash]));
@try {
#endif
id old = *ptr;
switch (copy) {
case 0:
*ptr = [value retain];
break;
case 2:
*ptr = [value mutableCopy];
break;
default:
*ptr = [value copy];
}
[old release];
#ifdef OF_THREADS
} @finally {
OF_ENSURE(of_spinlock_unlock(&spinlocks[hash]));
}
#endif
return;
}
id *ptr = (id*)(void*)((char*)self + offset);
id old = *ptr;
switch (copy) {
case 0:
*ptr = [value retain];
break;
case 2:
/*
* Apple uses this to indicate that the copy should be mutable.
* Please hit them for abusing a poor BOOL!
*/
*ptr = [value mutableCopy];
break;
default:
*ptr = [value copy];
}
[old release];
}
/* The following methods are only required for GCC >= 4.6 */
void
objc_getPropertyStruct(void *dest, const void *src, ptrdiff_t size, BOOL atomic,
BOOL strong)
{
if (atomic) {
#ifdef OF_THREADS
unsigned hash = SPINLOCK_HASH(src);
OF_ENSURE(of_spinlock_lock(&spinlocks[hash]));
#endif
memcpy(dest, src, size);
#ifdef OF_THREADS
OF_ENSURE(of_spinlock_unlock(&spinlocks[hash]));
#endif
return;
}
memcpy(dest, src, size);
}
void
objc_setPropertyStruct(void *dest, const void *src, ptrdiff_t size, BOOL atomic,
BOOL strong)
{
if (atomic) {
#ifdef OF_THREADS
unsigned hash = SPINLOCK_HASH(src);
OF_ENSURE(of_spinlock_lock(&spinlocks[hash]));
#endif
memcpy(dest, src, size);
#ifdef OF_THREADS
OF_ENSURE(of_spinlock_unlock(&spinlocks[hash]));
#endif
return;
}
memcpy(dest, src, size);
}