- return true;
-} CYSadCatch(false) }
-
-static JSValueRef CYObjectiveC_FromFFI(JSContextRef context, sig::Type *type, ffi_type *ffi, void *data, bool initialize, JSObjectRef owner) { CYPoolTry {
- switch (type->primitive) {
- // XXX: do something epic about blocks
- case sig::block_P:
- case sig::object_P:
- if (NSObject *object = *reinterpret_cast<NSObject **>(data)) {
- JSValueRef value(CYCastJSValue(context, object));
- if (initialize)
- [object release];
- return value;
- } else goto null;
-
- case sig::typename_P:
- return CYMakeInstance(context, *reinterpret_cast<Class *>(data), true);
-
- case sig::selector_P:
- if (SEL sel = *reinterpret_cast<SEL *>(data))
- return CYMakeSelector(context, sel);
- else goto null;
-
- null:
- return CYJSNull(context);
- default:
- return NULL;
+ _assert(JSObjectIsFunction(context, object));
+
+ _assert(signature != NULL);
+ _assert(signature->count != 0);
+
+ sig::Signature modified;
+ modified.count = signature->count + 1;
+ modified.elements = new(pool) sig::Element[modified.count];
+
+ modified.elements[0] = signature->elements[0];
+ memcpy(modified.elements + 2, signature->elements + 1, sizeof(sig::Element) * (signature->count - 1));
+
+ modified.elements[1].name = NULL;
+ modified.elements[1].type = new(pool) sig::Object();
+ modified.elements[1].offset = _not(size_t);
+
+ return CYMakeBlock(context, object, modified);
+#else
+ _assert(false);
+#endif
+}
+
+namespace sig {
+
+void Block::PoolFFI(CYPool *pool, JSContextRef context, ffi_type *ffi, void *data, JSValueRef value) const {
+ // XXX: this function might not handle the idea of a null pool
+ *reinterpret_cast<id *>(data) = CYCastNSBlock(*pool, context, value, &signature);
+}
+
+// XXX: assigning to an indirect id * works for return values, but not for properties and fields
+void Object::PoolFFI(CYPool *pool, JSContextRef context, ffi_type *ffi, void *data, JSValueRef value) const {
+ *reinterpret_cast<id *>(data) = CYCastNSObject(pool, context, value);
+}
+
+void Meta::PoolFFI(CYPool *pool, JSContextRef context, ffi_type *ffi, void *data, JSValueRef value) const {
+ *reinterpret_cast<id *>(data) = CYCastNSObject(pool, context, value);
+}
+
+void Selector::PoolFFI(CYPool *pool, JSContextRef context, ffi_type *ffi, void *data, JSValueRef value) const {
+ *reinterpret_cast<SEL *>(data) = CYCastSEL(context, value);
+}
+
+JSValueRef Object::FromFFI(JSContextRef context, ffi_type *ffi, void *data, bool initialize, JSObjectRef owner) const {
+ NSObject *value(*reinterpret_cast<NSObject **>(data));
+ if (value == NULL)
+ return CYJSNull(context);
+ JSObjectRef object(CYMakeInstance(context, value));
+
+ if (initialize) {
+ Instance *internal(reinterpret_cast<Instance *>(JSObjectGetPrivate(object)));
+
+ if ((internal->flags_ & Instance::Uninitialized) != 0) {
+ internal->flags_ = static_cast<Instance::Flags>(internal->flags_ & ~Instance::Uninitialized);
+ _assert(internal->value_ == nil);
+ internal->value_ = value;
+ }
+
+ [value release];