/* Cycript - Optimizing JavaScript Compiler/Runtime
- * Copyright (C) 2009-2014 Jay Freeman (saurik)
+ * Copyright (C) 2009-2015 Jay Freeman (saurik)
*/
/* GNU Affero General Public License, Version 3 {{{ */
#include "cycript.hpp"
-#include "ObjectiveC/Internal.hpp"
+#include <cmath>
+
+#include <map>
+#include <set>
+
+#include <dlfcn.h>
+
+#ifdef __APPLE__
+#include <malloc/malloc.h>
+#include <mach/mach.h>
+#endif
#include <objc/message.h>
#include <objc/runtime.h>
-#include <Foundation/Foundation.h>
-
#ifdef __APPLE__
#include <CoreFoundation/CoreFoundation.h>
#include <JavaScriptCore/JSStringRefCF.h>
#endif
-#ifdef __APPLE__
-#include <malloc/malloc.h>
-#include <mach/mach.h>
-#endif
+#include <Foundation/Foundation.h>
#include "Code.hpp"
#include "Error.hpp"
#include "String.hpp"
#include "Execute.hpp"
-#include <cmath>
-#include <map>
-#include <set>
-
-#include <dlfcn.h>
+#include "ObjectiveC/Internal.hpp"
#define CYObjectiveTry_ { \
try
try
#define CYObjectiveCatch \
catch (const CYException &error) { \
- @throw CYCastNSObject(NULL, context, error.CastJSValue(context)); \
+ @throw CYCastNSObject(NULL, context, error.CastJSValue(context, "Error")); \
} \
}
}
/* }}} */
/* Objective-C Strings {{{ */
-const char *CYPoolCString(CYPool &pool, JSContextRef context, NSString *value) {
- size_t size([value maximumLengthOfBytesUsingEncoding:NSUTF8StringEncoding] + 1);
- char *string(new(pool) char[size]);
+CYUTF8String CYPoolUTF8String(CYPool &pool, JSContextRef context, NSString *value) {
+ size_t size([value maximumLengthOfBytesUsingEncoding:NSUTF8StringEncoding]);
+ char *string(new(pool) char[size + 1]);
if (![value getCString:string maxLength:size encoding:NSUTF8StringEncoding])
throw CYJSError(context, "[NSString getCString:maxLength:encoding:] == NO");
- return string;
+ return CYUTF8String(string, [value lengthOfBytesUsingEncoding:NSUTF8StringEncoding]);
}
-#ifdef __APPLE__
+const char *CYPoolCString(CYPool &pool, JSContextRef context, NSString *value) {
+ CYUTF8String utf8(CYPoolUTF8String(pool, context, value));
+ _assert(memchr(utf8.data, '\0', utf8.size) == NULL);
+ return utf8.data;
+}
+
+#ifdef __clang__
JSStringRef CYCopyJSString(JSContextRef context, NSString *value) {
return JSStringCreateWithCFString(reinterpret_cast<CFStringRef>(value));
}
return NULL;
// XXX: this definition scares me; is anyone using this?!
NSString *string([value description]);
-#ifdef __APPLE__
+#ifdef __clang__
return CYCopyJSString(context, string);
#else
CYPool pool;
- return CYCopyJSString(CYPoolCString(pool, context, string));
+ return CYCopyJSString(CYPoolUTF8String(pool, context, string));
#endif
}
static Class NSCFBoolean_;
static Class NSCFType_;
static Class NSGenericDeallocHandler_;
-static Class NSZombie_;
#else
static Class NSBoolNumber_;
#endif
static Class NSDictionary_;
static Class NSNumber_;
static Class NSString_;
+static Class NSZombie_;
static Class Object_;
static Type_privateData *Object_type;
return [NSString stringWithUTF8String:name];
}
-#ifdef __APPLE__
if (_class == NSZombie_)
return [NSString stringWithFormat:@"<_NSZombie_: %p>", value];
-#endif
SEL sel(@selector(cy$toCYON:inSet:));
}
}
-#ifdef __APPLE__
struct PropertyAttributes {
CYPool pool_;
}
};
-#endif
@interface CYWebUndefined : NSObject {
}
return CYCallAsFunction(context, function, _this, count - 1, values + 1);
}
-static void BlockClosure_(ffi_cif *cif, void *result, void **arguments, void *arg) {
- CYExecuteClosure(cif, result, arguments, arg, &BlockAdapter_);
-}
-
NSBlock *CYMakeBlock(JSContextRef context, JSObjectRef function, sig::Signature &signature) {
_assert(__NSMallocBlock__ != Nil);
BlockLiteral *literal(reinterpret_cast<BlockLiteral *>(malloc(sizeof(BlockLiteral))));
CYBlockDescriptor *descriptor(new CYBlockDescriptor);
memset(&descriptor->d_, 0, sizeof(descriptor->d_));
- descriptor->internal_ = CYMakeFunctor_(context, function, signature, &BlockClosure_);
+ descriptor->internal_ = CYMakeFunctor_(context, function, signature, &BlockAdapter_);
literal->invoke = reinterpret_cast<void (*)(void *, ...)>(descriptor->internal_->GetValue());
literal->isa = __NSMallocBlock__;
[json appendString:@"@["];
bool comma(false);
-#ifdef __APPLE__
+#ifdef __clang__
for (id object in self) {
#else
for (size_t index(0), count([self count]); index != count; ++index) {
[json appendString:@"@{"];
bool comma(false);
-#ifdef __APPLE__
+#ifdef __clang__
for (NSObject *key in self) {
#else
NSEnumerator *keys([self keyEnumerator]);
- (void) cy$getPropertyNames:(JSPropertyNameAccumulatorRef)names inContext:(JSContextRef)context {
[super cy$getPropertyNames:names inContext:context];
-#ifdef __APPLE__
+#ifdef __clang__
for (NSObject *key in self) {
#else
NSEnumerator *keys([self keyEnumerator]);
if ([name isEqualToString:@"length"]) {
// XXX: is this not intelligent?
NSNumber *number(reinterpret_cast<NSNumber *>(value));
-#ifdef __APPLE__
NSUInteger size([number unsignedIntegerValue]);
-#else
- NSUInteger size([number unsignedIntValue]);
-#endif
NSUInteger count([self count]);
if (size < count)
[self removeObjectsInRange:NSMakeRange(size, count - size)];
@end
/* }}} */
+/* Bridge: NSOrderedSet {{{ */
+#ifdef __APPLE__
+@implementation NSOrderedSet (Cycript)
+
+- (NSString *) cy$toCYON:(bool)objective inSet:(std::set<void *> &)objects {
+ _oassert(objects.insert(self).second);
+
+ NSMutableString *json([[[NSMutableString alloc] init] autorelease]);
+ [json appendString:@"[NSOrderedSet orderedSetWithArray:"];
+ [json appendString:CYCastNSCYON([self array], true, objects)];
+ [json appendString:@"]]"];
+ return json;
+}
+
+@end
+#endif
+/* }}} */
/* Bridge: NSProxy {{{ */
@implementation NSProxy (Cycript)
if (!objective)
str << '@';
CYUTF8String string(CYCastUTF8String(self));
- CYStringify(str, string.data, string.size);
+ CYStringify(str, string.data, string.size, true);
std::string value(str.str());
return CYCastNSString(NULL, CYUTF8String(value.c_str(), value.size()));
}
/* }}} */
static bool CYIsClass(id self) {
-#ifdef __APPLE__
return class_isMetaClass(object_getClass(self));
-#else
- return GSObjCIsClass(self);
-#endif
}
Class CYCastClass(CYPool &pool, JSContextRef context, JSValueRef value) {
return [(NSAutoreleasePool *) handle release];
} CYSadCatch() }
-static void CYObjectiveC_CallFunction(JSContextRef context, ffi_cif *cif, void (*function)(), uint8_t *value, void **values) { CYSadTry {
- ffi_call(cif, function, value, values);
+static void CYObjectiveC_CallFunction(CYPool &pool, JSContextRef context, ffi_cif *cif, void (*function)(), void *value, void **values) { CYSadTry {
+ CYCallFunction(pool, context, cif, function, value, values);
} CYSadCatch() }
#ifdef __APPLE__
if (objc_method *method = class_getInstanceMethod(_class, selector)) {
if (!devoid)
return true;
-#if OBJC_API_VERSION >= 2
char type[16];
method_getReturnType(method, type, sizeof(type));
-#else
- const char *type(method_getTypeEncoding(method));
-#endif
if (type[0] != 'v')
return true;
}
return CYCallAsFunction(context, function, _this, count - 2, values + 2);
}
-static void MessageClosure_(ffi_cif *cif, void *result, void **arguments, void *arg) {
- CYExecuteClosure(cif, result, arguments, arg, &MessageAdapter_);
-}
-
static JSObjectRef CYMakeMessage(JSContextRef context, SEL sel, IMP imp, const char *type) {
Message_privateData *internal(new Message_privateData(sel, type, imp));
return JSObjectMake(context, Message_, internal);
CYPool pool;
sig::Signature signature;
sig::Parse(pool, &signature, encoding, &Structor_);
- Closure_privateData *internal(CYMakeFunctor_(context, function, signature, &MessageClosure_));
+ Closure_privateData *internal(CYMakeFunctor_(context, function, signature, &MessageAdapter_));
// XXX: see notes in Library.cpp about needing to leak
return reinterpret_cast<IMP>(internal->GetValue());
}
const char *string(CYPoolCString(pool, context, name));
-#ifdef __APPLE__
if (class_getProperty(_class, string) != NULL)
return true;
-#endif
if (CYHasImplicitProperties(_class))
if (SEL sel = sel_getUid(string))
const char *string(CYPoolCString(pool, context, name));
Class _class(object_getClass(self));
-#ifdef __APPLE__
if (objc_property_t property = class_getProperty(_class, string)) {
PropertyAttributes attributes(property);
SEL sel(sel_registerName(attributes.Getter()));
return CYSendMessage(pool, context, self, NULL, sel, 0, NULL, false);
}
-#endif
if (CYHasImplicitProperties(_class))
if (SEL sel = sel_getUid(string))
const char *string(CYPoolCString(pool, context, name));
Class _class(object_getClass(self));
-#ifdef __APPLE__
if (objc_property_t property = class_getProperty(_class, string)) {
PropertyAttributes attributes(property);
if (const char *setter = attributes.Setter()) {
return true;
}
}
-#endif
size_t length(strlen(string));
CYPool pool;
Class _class(object_getClass(self));
-#ifdef __APPLE__
{
unsigned int size;
objc_property_t *data(class_copyPropertyList(_class, &size));
JSPropertyNameAccumulatorAddName(names, CYJSString(property_getName(data[i])));
free(data);
}
-#endif
if (CYHasImplicitProperties(_class))
for (Class current(_class); current != nil; current = class_getSuperclass(current)) {
id self(internal->GetValue());
const char *name(CYPoolCString(pool, context, property));
-#ifdef __arm64__
- if (strcmp(name, "isa") == 0)
- return CYCastJSValue(context, object_getClass(self));
-#endif
-
if (objc_ivar *ivar = object_getInstanceVariable(self, name, NULL)) {
ptrdiff_t offset(ivar_getOffset(ivar));
void *data(reinterpret_cast<uint8_t *>(self) + offset);
uintptr_t mask((1 << length) - 1);
return CYCastJSValue(context, (field >> shift) & mask);
} else {
+#if defined(__APPLE__) && defined(__LP64__)
+ // XXX: maybe do even more verifications here
+ if (strcmp(name, "isa") == 0)
+ return CYCastJSValue(context, object_getClass(self));
+#endif
+
auto type(new(pool) Type_privateData(encoding));
return CYFromFFI(context, type->type_, type->GetFFI(), data);
}
}
}
-#if OBJC_API_VERSION >= 2
+#ifdef __APPLE__
static JSValueRef ObjectiveC_Image_Classes_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
const char *internal(reinterpret_cast<const char *>(JSObjectGetPrivate(object)));
static JSValueRef ObjectiveC_Images_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
CYPool pool;
- const char *name(CYPoolCString(pool, context, property));
+ CYUTF8String name(CYPoolUTF8String(pool, context, property));
+
unsigned int size;
const char **data(objc_copyImageNames(&size));
+ pool.atexit(free, data);
+
for (size_t i(0); i != size; ++i)
- if (strcmp(name, data[i]) == 0) {
- name = data[i];
- goto free;
+ if (name == data[i]) {
+ JSObjectRef value(JSObjectMake(context, NULL, NULL));
+ CYSetProperty(context, value, CYJSString("classes"), JSObjectMake(context, ObjectiveC_Image_Classes_, const_cast<char *>(data[i])));
+ return value;
}
- name = NULL;
- free:
- free(data);
- if (name == NULL)
- return NULL;
- JSObjectRef value(JSObjectMake(context, NULL, NULL));
- CYSetProperty(context, value, CYJSString("classes"), JSObjectMake(context, ObjectiveC_Image_Classes_, const_cast<char *>(name)));
- return value;
+
+ return NULL;
} CYCatch(NULL) }
static void ObjectiveC_Images_getPropertyNames(JSContextRef context, JSObjectRef object, JSPropertyNameAccumulatorRef names) {
} CYCatch(NULL) }
static void ObjectiveC_Protocols_getPropertyNames(JSContextRef context, JSObjectRef object, JSPropertyNameAccumulatorRef names) {
-#if OBJC_API_VERSION >= 2
unsigned int size;
Protocol **data(objc_copyProtocolList(&size));
for (size_t i(0); i != size; ++i)
JSPropertyNameAccumulatorAddName(names, CYJSString(protocol_getName(data[i])));
free(data);
-#else
- // XXX: fix this!
-#endif
}
static JSValueRef ObjectiveC_Constants_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
continue;
uintptr_t *pointers(reinterpret_cast<uintptr_t *>(data));
-#ifdef __arm64__
+#if defined(__APPLE__) && defined(__LP64__)
Class isa(reinterpret_cast<Class>(pointers[0] & 0x1fffffff8));
#else
Class isa(reinterpret_cast<Class>(pointers[0]));
CYGarbageCollect(context);
CYPool pool;
- Class _class(CYCastNSObject(&pool, context, arguments[0]));
+ id _class(CYCastNSObject(&pool, context, arguments[0]));
vm_address_t *zones(NULL);
unsigned size(0);
);
}
#endif
+#else
+#define CY_NO_STRET
#endif
JSValueRef CYSendMessage(CYPool &pool, JSContextRef context, id self, Class _class, SEL _cmd, size_t count, const JSValueRef arguments[], bool initialize) {
imp = NULL;
CYPoolTry {
- NSMethodSignature *method([self methodSignatureForSelector:_cmd]);
- if (method == nil)
- throw CYJSError(context, "unrecognized selector %s sent to object %p", sel_getName(_cmd), self);
- type = CYPoolCString(pool, context, [method _typeString]);
+ if (NSMethodSignature *method = [self methodSignatureForSelector:_cmd])
+ type = CYPoolCString(pool, context, [method _typeString]);
+ else
+ type = NULL;
} CYPoolCatch(NULL)
+
+ if (type == NULL)
+ throw CYJSError(context, "unrecognized selector %s sent to object %p", sel_getName(_cmd), self);
}
void *setup[2];
sig::sig_ffi_cif(pool, &sig::ObjectiveC, &signature, &cif);
if (imp == NULL) {
-#ifdef __APPLE__
#ifndef CY_NO_STRET
if (stret(cif.rtype))
imp = class_getMethodImplementation_stret(_class, _cmd);
else
#endif
imp = class_getMethodImplementation(_class, _cmd);
-#else
- objc_super super = {self, _class};
- imp = objc_msg_lookup_super(&super, _cmd);
-#endif
}
void (*function)() = reinterpret_cast<void (*)()>(imp);
NSZombie_ = objc_getClass("_NSZombie_");
#else
NSBoolNumber_ = objc_getClass("NSBoolNumber");
+ NSZombie_ = objc_getClass("NSZombie");
#endif
JSClassDefinition definition;
definition.getPropertyNames = &ObjectiveC_Constants_getPropertyNames;
ObjectiveC_Constants_ = JSClassCreate(&definition);
-#if OBJC_API_VERSION >= 2
+#ifdef __APPLE__
definition = kJSClassDefinitionEmpty;
definition.className = "ObjectiveC::Images";
definition.getProperty = &ObjectiveC_Images_getProperty;
CYSetProperty(context, ObjectiveC, CYJSString("constants"), constants);
CYArrayPush(context, alls, constants);
-#if OBJC_API_VERSION >= 2
+#ifdef __APPLE__
CYSetProperty(context, ObjectiveC, CYJSString("images"), JSObjectMake(context, ObjectiveC_Images_, NULL));
#endif
CYSetPrototype(context, CYCastJSObject(context, CYGetProperty(context, Selector, prototype_s)), Function_prototype);
} CYPoolCatch() }
+static void *CYObjectiveC_CastSymbol(const char *name) {
+ if (false);
+#ifdef __GNU_LIBOBJC__
+ else if (strcmp(name, "object_getClass") == 0)
+ return reinterpret_cast<void *>(&object_getClass);
+#endif
+ return NULL;
+}
+
static CYHook CYObjectiveCHook = {
&CYObjectiveC_ExecuteStart,
&CYObjectiveC_ExecuteEnd,
&CYObjectiveC_SetupContext,
&CYObjectiveC_PoolFFI,
&CYObjectiveC_FromFFI,
+ &CYObjectiveC_CastSymbol,
};
CYRegisterHook CYObjectiveC(&CYObjectiveCHook);
-extern "C" void CydgetSetupContext(JSGlobalContextRef context) { CYObjectiveTry_ {
+_extern void CydgetSetupContext(JSGlobalContextRef context) { CYObjectiveTry_ {
CYSetupContext(context);
} CYObjectiveCatch }
-extern "C" void CydgetMemoryParse(const uint16_t **data, size_t *size) { try {
+_extern void CydgetMemoryParse(const uint16_t **data, size_t *size) { try {
CYPool pool;
CYUTF8String utf8(CYPoolUTF8String(pool, CYUTF16String(*data, *size)));
projects / cycript.git / blobdiff