projects/dstep: dstep/objc/bridge/Bridge.d annotate

annotate dstep/objc/bridge/Bridge.d @ 2:9fd439a28ce3

Adapted the scripts for the new bridge + a lot more

author	Jacob Carlborg <doob@me.com>
date	Sun, 05 Jul 2009 17:16:19 +0200
parents	033d260cfc9b
children	07194b026fa4

rev	line source
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	1 /**
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	2 * Copyright: Copyright (c) 2009 Jacob Carlborg.
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	3 * Authors: Jacob Carlborg
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	4 * Version: Initial created: Feb 4, 2009
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	5 * License: $(LINK2 http://www.boost.org/LICENSE_1_0.txt, Boost Software License 1.0)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	6 */
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	7 module dstep.objc.bridge.Bridge;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	8
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	9 import mambo.io;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	10
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	11 version (Tango)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	12 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	13 import tango.core.Memory;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	14 import tango.core.Traits : ParameterTupleOf, ReturnTypeOf;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	15
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	16 alias GC.addRoot addRoot;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	17 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	18
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	19 else
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	20 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	21 import std.gc : addRoot;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	22 import std.traits : ParameterTypeTuple, ReturnType;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	23
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	24 alias ReturnType ReturnTypeOf;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	25 alias ParameterTypeTuple ParameterTupleOf;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	26 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	27
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	28 import dstep.internal.String;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	29 import dstep.internal.Tuple;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	30 import dstep.internal.Version;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	31 import dstep.objc.bridge.Capsule;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	32 import dstep.objc.bridge.ClassInitializer;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	33 import dstep.objc.bridge.TypeEncoding;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	34 import dstep.objc.bridge.Wrapper;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	35 import dstep.objc.message;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	36 import dstep.objc.objc;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	37 import dstep.objc.runtime;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	38
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	39 /**
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	40 * Builds a string representing a selector out of the given function
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	41 *
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	42 * It will build the string like this:
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	43 *
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	44 * ---
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	45 * foo (int x, int y); // foo:y:
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	46 * bar (); // bar
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	47 * fooBar (int x); // fooBar:
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	48 * ---
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	49 *
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	50 * Params:
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	51 * func = the function alias to build the selector of
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	52 *
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	53 * Returns: a string representing the selector
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	54 */
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	55 template selector (alias func)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	56 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	57 const selector = buildSelector!(func);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	58 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	59
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	60 template ObjcWrap ()
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	61 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	62 mixin ObjcWrap!(this.stringof);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	63 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	64
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	65 template ObjcWrap (string name)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	66 {
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	67 private
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	68 {
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	69 import dstep.objc.bridge.ClassInitializer : ObjcSubclassInitializer, subclassInit;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	70 import dstep.objc.objc : Class, id, IMP, SEL;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	71
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	72 static Class objcClass_;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	73 static Class objcSuperClass_;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	74 }
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	75
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	76 this ()
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	77 {
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	78 objcObject = invokeObjcSelfClass!(id, "alloc");
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	79 id ret = invokeObjcSelf!(id, "init");
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	80
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	81 if (ret)
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	82 objcObject = ret;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	83
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	84 dObject = this;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	85 }
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	86
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	87 this (id object)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	88 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	89 super(object);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	90 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	91
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	92 static typeof(this) alloc ()
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	93 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	94 return invokeObjcSelfClass!(typeof(this), "alloc");
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	95 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	96
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	97 typeof(this) init ()
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	98 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	99 id ret = invokeObjcSelf!(id, "init");
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	100
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	101 if (!ret)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	102 return null;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	103
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	104 if (ret is objcObject)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	105 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	106 dObject = this;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	107 return this;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	108 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	109
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	110 auto object = new typeof(this) (ret);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	111 object.dObject = this;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	112
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	113 return object;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	114 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	115
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	116 mixin ObjcSubclassInitializer!("D_" ~ name, name);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	117 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	118
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	119 struct ObjcMethodDeclaration (alias imp, R, string name, ARGS...)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	120 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	121 alias imp methodImp;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	122 alias R returnType;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	123 const string methodName = name;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	124 alias ARGS argsType;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	125 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	126
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	127 template ObjcBindMethod (alias method)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	128 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	129 import dstep.objc.bridge.TypeEncoding : buildSelector, encode;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	130
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	131 mixin ObjcBindMethod!(method, buildSelector!(method));
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	132 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	133
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	134 template ObjcBindMethod (alias method, string selector)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	135 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	136 mixin ObjcBindMethod!(method, ReturnTypeOf!(method), selector, ParameterTupleOf!(method));
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	137 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	138
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	139 template ObjcBindMethod (alias method, R, string selector, ARGS...)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	140 {
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	141 private
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	142 {
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	143 import dstep.objc.bridge.Capsule : decapsule, encapsule, isCapsule;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	144 import dstep.objc.bridge.Type : needsEncapsulation, ObjcType;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	145 import dstep.internal.Tuple;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	146
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	147 ObjcMethodDeclaration!(method, R, selector, ARGS) objcMethodDeclaration;
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	148
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	149 R delegate (ARGS) resolveVirtualCall ()
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	150 {
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	151 return null;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	152 }
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	153
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	154 alias ReplaceAllClasses!(id, ARGS) ObjcArgs;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	155
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	156 static ObjcType!(R) forwardVirtualCall (id self, SEL cmd, ObjcArgs objcArgs)
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	157 in
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	158 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	159 assert(isCapsule(self));
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	160 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	161 body
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	162 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	163 R delegate (ARGS) dg;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	164 dg.funcptr = &method;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	165 dg.ptr = Bridge.getDObject(self);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	166
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	167 ARGS args;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	168
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	169 foreach (i, a ; objcArgs)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	170 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	171 alias typeof(args[i]) ArgType;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	172
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	173 args[i] = decapsule!(ArgType)(a);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	174 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	175
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	176 static if (is(R == void))
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	177 dg(args);
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	178
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	179 else
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	180 return encapsule!(R)(dg(args));
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	181 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	182 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	183 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	184
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	185 template ObjcBindClassMethod (alias method, string selector)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	186 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	187 mixin ObjcBindClassMethod!(method, ReturnTypeOf!(method), selector, ParameterTupleOf!(method));
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	188 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	189
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	190 template ObjcBindClassMethod (alias method, R, string selector, ARGS...)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	191 {
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	192 private
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	193 {
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	194 import dstep.objc.bridge.Capsule : decapsule, encapsule, isCapsule, needsEncapsulation, ObjcType;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	195 import dstep.internal.Tuple;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	196
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	197 ObjcMethodDeclaration!(method, R, selector, ARGS) objcClassMethodDeclaration;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	198
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	199 alias ReplaceAllClasses!(id, ARGS) ObjcArgs;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	200
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	201 static ObjcType!(R) forwardStaticCall (id self, SEL cmd, ObjcArgs objcArgs)
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	202 in
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	203 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	204 assert(isCapsule(self));
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	205 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	206 body
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	207 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	208 R function (ARGS) dg = &method;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	209
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	210 ARGS args;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	211
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	212 foreach (i, a ; objcArgs)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	213 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	214 alias typeof(args[i]) ArgType;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	215
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	216 args[i] = decapsule!(ArgType)(a);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	217 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	218
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	219 static if (needsEncapsulation!(R))
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	220 return encapsule!(R)(dg(args));
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	221
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	222 else
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	223 return dg(args);
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	224 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	225 }
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	226 }
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	227
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	228 template ObjcBindFunction (alias func)
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	229 {
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	230 mixin ObjcBindFunction!(func, ReturnTypeOf!(func), ParameterTupleOf!(func));
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	231 }
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	232
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	233 template ObjcBindFunction (alias func, R, ARGS...)
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	234 {
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	235 private
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	236 {
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	237 import dstep.objc.bridge.Capsule : decapsule, encapsule, needsEncapsulation, ObjcType;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	238 import dstep.internal.Tuple;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	239
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	240 ObjcMethodDeclaration!(method, R, selector, ARGS) objcClassMethodDeclaration;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	241
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	242 alias ReplaceAllClasses!(id, ARGS) ObjcArgs;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	243
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	244 extern (C) ObjcType!(R) forwardFunctionCall (ObjcArgs objcArgs)
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	245 {
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	246 ARGS args;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	247
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	248 foreach (i, a ; objcArgs)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	249 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	250 alias typeof(args[i]) ArgType;
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	251
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	252 args[i] = decapsule!(ArgType)(a);
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	253 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	254
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	255 static if (needsEncapsulation!(R))
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	256 return encapsule!(R)(dg(args));
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	257
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	258 else
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	259 return dg(args);
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	260 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	261 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	262 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	263
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	264 struct Bridge
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	265 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	266 static:
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	267
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	268 const objcMethodDeclarationVar = "objcMethodDeclaration";
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	269 const objcClassMethodDeclarationVar = "objcClassMethodDeclaration";
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	270 const dObjectVar = "dObject";
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	271 alias void* DObjectType;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	272 private ClassInfo[string] registeredClasses;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	273
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	274 void registerClass (string className, ClassInfo classInfo)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	275 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	276 if (className.length > 2 && className[0 .. 2] == "D_")
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	277 registeredClasses[className[0 .. 2]] = classInfo;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	278
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	279 else
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	280 registeredClasses[className] = classInfo;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	281 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	282
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	283 Object createRegisteredObject (T) (string className)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	284 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	285 return null;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	286 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	287
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	288 DObjectType getDObject (id self)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	289 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	290 DObjectType dObject;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	291
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	292 self.getInstanceVariable!(DObjectType, dObjectVar)(dObject);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	293
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	294 return dObject;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	295 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	296
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	297 id setDObject (Object dObject, id objcObject)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	298 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	299 auto o = cast(DObjectType) dObject;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	300 addRoot(o);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	301
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	302 objcObject.setInstanceVariable!(DObjectType, Bridge.dObjectVar)(o);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	303
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	304 return objcObject;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	305 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	306
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	307 R invokeObjcMethod (R, string selector, ARGS...) (id self, ARGS args)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	308 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	309 static if (!is(R : void))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	310 R result;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	311
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	312 SEL sel = sel.registerName!(selector);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	313
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	314 alias ReplaceAllClasses!(id, ARGS) ObjcArgs;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	315 ObjcArgs objcArgs;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	316
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	317 foreach (i, a ; args)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	318 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	319 alias typeof(a) ArgType;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	320
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	321 objcArgs[i] = encapsule!(ArgType)(a);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	322 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	323
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	324 static if (is(R == struct))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	325 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	326 self.msgSend_stret(result, sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	327 return result;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	328 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	329
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	330 else static if (is(R == float) \|\| is(R == double) \|\| is(R == real))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	331 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	332 version (X86)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	333 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	334 static if (is(R == float))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	335 return self.msgSend_fpret!(R)(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	336
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	337 else
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	338 return self.msgSend_fpret(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	339 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	340
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	341 else version (X86_64)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	342 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	343 static if (is(R == real))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	344 return self.msgSend_fpret(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	345
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	346 else
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	347 return self.msgSend!(R)(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	348 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	349
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	350 else
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	351 return self.msgSend!(R)(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	352 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	353
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	354 else static if (is(R : ObjcWrapper))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	355 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	356 id r = self.msgSend(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	357
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	358 if (!r)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	359 return null;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	360
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	361 if (isCapsule(r))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	362 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	363 result = decapsule!(R)(r);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	364
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	365 if (result)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	366 return result;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	367 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	368
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	369 return new R(r);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	370 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	371
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	372 else static if (is(R : Object))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	373 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	374 id r = self.msgSend(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	375
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	376 if (!r)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	377 return null;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	378
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	379 return decapsule!(R)(r);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	380 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	381
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	382 else
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	383 return self.msgSend!(R, ObjcArgs)(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	384 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	385
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	386 R invokeObjcClassMethod (R = id, string selector, ARGS...) (Class cls, ARGS args)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	387 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	388 return invokeObjcMethod!(R, selector, ARGS)(cast(id) cls, args);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	389 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	390
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	391 R invokeObjcSuperMethod (R = id, string selector, ARGS...) (objc_super* self, ARGS args)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	392 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	393 R result;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	394 SEL sel = sel.registerName!(selector);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	395
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	396 alias ReplaceAllClasses!(id, ARGS) ObjcArgs;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	397 ObjcArgs objcArgs;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	398
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	399 foreach (i, a ; args)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	400 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	401 alias typeof(a) ArgType;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	402
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	403 objcArgs[i] = encapsule!(ArgType)(a);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	404 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	405
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	406 static if (is(R == struct))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	407 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	408 self.msgSendSuper_stret(result, sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	409 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	410
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	411 else static if (is(R : ObjcWrapper))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	412 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	413 id r = self.msgSendSuper(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	414
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	415 if (isCapsule(r))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	416 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	417 result = decapsule!(R)(r);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	418
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	419 if (result)
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	420 return result;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	421 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	422
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	423 return r ? new R(r) : null;
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	424 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	425
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	426 else static if (is(R : Object))
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	427 {
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	428 id r = self.msgSendSuper(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	429 return decapsule!(R)(r);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	430 }
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	431
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	432 else
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	433 return self.msgSend!(R)(sel, objcArgs);
033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	434 }
2 9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	435
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	436 R invokeObjcFunction (R, alias func, ARGS...) (ARGS args)
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	437 {
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	438 static if (!is(R : void))
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	439 R result;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	440
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	441 auto funcPtr = &func; // use a function pointer instead of the alias because the function can be private.
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	442
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	443 alias ReplaceAllClasses!(id, ARGS) ObjcArgs;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	444 ObjcArgs objcArgs;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	445
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	446 foreach (i, a ; args)
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	447 {
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	448 alias typeof(a) ArgType;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	449
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	450 objcArgs[i] = encapsule!(ArgType)(a);
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	451 }
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	452
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	453 static if (is(R : ObjcWrapper))
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	454 {
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	455 id r = funcPtr(objcArgs);
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	456
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	457 if (!r)
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	458 return null;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	459
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	460 if (isCapsule(r))
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	461 {
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	462 result = decapsule!(R)(r);
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	463
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	464 if (result)
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	465 return result;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	466 }
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	467
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	468 return new R(r);
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	469 }
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	470
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	471 else static if (is(R : Object))
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	472 {
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	473 id r = funcPtr(objcArgs);
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	474
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	475 if (!r)
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	476 return null;
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	477
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	478 return decapsule!(R)(r);
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	479 }
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	480
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	481 else
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	482 return funcPtr(objcArgs);
9fd439a28ce3 Adapted the scripts for the new bridge + a lot more Jacob Carlborg <doob@me.com> parents: 1 diff changeset	483 }
1 033d260cfc9b First upload of the bridge Jacob Carlborg <doob@me.com> parents: diff changeset	484 }

Mercurial > projects > dstep

annotate dstep/objc/bridge/Bridge.d @ 2:9fd439a28ce3