{\r
List<ResolvedBinding> resolved = new List<ResolvedBinding> ();\r
foreach (Binding b in Bindings) {\r
+ if (b.SourceMember.MemberType == MemberTypes.Event) {\r
+ if (b.Expression.StartsWith("{")){\r
+ CompileEventSource(b);\r
+ continue;\r
+ }\r
+ }\r
ResolvedBinding rb = new ResolvedBinding (b);\r
if (!rb.FindTarget (this))\r
continue;\r
+ if (rb.Binding.SourceMember.MemberType == MemberTypes.Event) {\r
+ //register handler for event\r
+ MethodInfo mi = rb.Member as MethodInfo;\r
+ if (mi == null) {\r
+ Debug.WriteLine ("Handler Method not found: " + rb.Binding.Expression);\r
+ continue;\r
+ }\r
+\r
+ MethodInfo addHandler = rb.Binding.Event.GetAddMethod ();\r
+ Delegate del = Delegate.CreateDelegate (rb.Binding.Event.EventHandlerType, rb.Target, mi);\r
+ addHandler.Invoke (this, new object[] { del });\r
+ continue;\r
+ }\r
resolved.Add (rb); \r
}\r
+ //group;only one dynMethods by target (valuechanged event source)\r
+ //changed value name tested in switch\r
IEnumerable<ResolvedBinding[]> groupedByTarget = resolved.GroupBy (g => g.Target, g => g, (k, g) => g.ToArray ());\r
foreach (ResolvedBinding[] grouped in groupedByTarget) {\r
int i = 0;\r
- object targetValue = grouped [0].Target;//empty binding exp=> bound to target object by default\r
- Type targetType = targetValue.GetType();\r
+ Type targetType = grouped[0].Target.GetType();\r
Type sourceType = this.GetType();\r
\r
DynamicMethod dm = null;\r
jumpTable = new System.Reflection.Emit.Label[grouped.Length];\r
for (i = 0; i < grouped.Length; i++)\r
jumpTable [i] = il.DefineLabel ();\r
- lbMemberName = il.DeclareLocal(typeof(string));\r
- lbValue = il.DeclareLocal(typeof(object));\r
+ il.DeclareLocal(typeof(string));\r
+ il.DeclareLocal(typeof(object));\r
\r
il.Emit(OpCodes.Nop);\r
il.Emit(OpCodes.Ldarg_0);\r
il.Emit(OpCodes.Ldarg_2);\r
FieldInfo fiNewValue = typeof(ValueChangeEventArgs).GetField("NewValue");\r
il.Emit(OpCodes.Ldfld, fiNewValue);\r
- il.Emit(OpCodes.Stloc, lbValue);\r
+ il.Emit(OpCodes.Stloc_1);\r
//push name \r
il.Emit(OpCodes.Ldarg_2);\r
FieldInfo fiMbName = typeof(ValueChangeEventArgs).GetField("MemberName");\r
il.Emit(OpCodes.Ldfld, fiMbName);\r
- il.Emit(OpCodes.Stloc, lbMemberName);\r
- il.Emit(OpCodes.Ldloc, lbMemberName);\r
+ il.Emit(OpCodes.Stloc_0);\r
+ il.Emit(OpCodes.Ldloc_0);\r
il.Emit(OpCodes.Brfalse, endMethod);\r
}\r
#endregion\r
i = 0;\r
foreach (ResolvedBinding rb in grouped) {\r
#region initialize target with actual value\r
+ object targetValue = null;\r
if (rb.Member != null){\r
if (rb.Member.MemberType == MemberTypes.Property)\r
targetValue = (rb.Member as PropertyInfo).GetGetMethod ().Invoke (rb.Target, null);\r
targetValue = mthSrc.Invoke(rb.Target, null);\r
}else\r
throw new Exception ("unandled source member type for binding"); \r
- }\r
+ }else if (string.IsNullOrEmpty(rb.Binding.Expression))\r
+ targetValue= grouped [0].Target;//empty binding exp=> bound to target object by default\r
//TODO: handle other dest type conversions\r
if (rb.Binding.Property.PropertyType == typeof(string)){\r
- if (targetValue != null)\r
+ if (targetValue == null){\r
+ //set default value\r
+\r
+ }else\r
targetValue = targetValue.ToString ();\r
}\r
rb.Binding.Property.GetSetMethod ().Invoke (this, new object[] { targetValue });\r
if (il == null)\r
continue;\r
\r
- il.Emit (OpCodes.Ldloc, lbMemberName);\r
- il.Emit (OpCodes.Ldstr, rb.Member.Name);\r
+ il.Emit (OpCodes.Ldloc_0);\r
+ if (rb.Member != null)\r
+ il.Emit (OpCodes.Ldstr, rb.Member.Name);\r
+ else\r
+ il.Emit (OpCodes.Ldstr, rb.Binding.Expression);\r
il.Emit (OpCodes.Callvirt, stringEquals);\r
il.Emit (OpCodes.Brtrue, jumpTable[i]);\r
i++;\r
foreach (ResolvedBinding rb in grouped) {\r
\r
il.MarkLabel (jumpTable [i]);\r
- il.Emit(OpCodes.Ldloc, lbValue);\r
+ il.Emit(OpCodes.Ldloc_1);\r
\r
//by default, target value type is deducted from source member type to allow\r
//memberless binding, if targetMember exists, it will be used to determine target\r
addHandler.Invoke(grouped [0].Target, new object[] {del});\r
}\r
}\r
+ /// <summary>\r
+ /// Compile events expression in GOML attributes\r
+ /// </summary>\r
+ /// <param name="es">Event binding details</param>\r
+ public void CompileEventSource(Binding binding)\r
+ { \r
+ Type sourceType = this.GetType();\r
+\r
+ #region Retrieve EventHandler parameter type\r
+ MethodInfo evtInvoke = binding.Event.EventHandlerType.GetMethod ("Invoke");\r
+ ParameterInfo[] evtParams = evtInvoke.GetParameters ();\r
+ Type handlerArgsType = evtParams [1].ParameterType;\r
+ #endregion\r
+\r
+ Type[] args = {typeof(object), typeof(object),handlerArgsType};\r
+ DynamicMethod dm = new DynamicMethod("dynHandle",\r
+ typeof(void), \r
+ args,\r
+ sourceType);\r
+\r
+\r
+ #region IL generation\r
+ ILGenerator il = dm.GetILGenerator(256);\r
+\r
+ string src = binding.Expression.Trim();\r
+\r
+ if (! (src.StartsWith("{") || src.EndsWith ("}"))) \r
+ throw new Exception (string.Format("GOML:Malformed {0} Event handler: {1}", binding.SourceMember.Name, binding.Expression));\r
+\r
+ src = src.Substring (1, src.Length - 2);\r
+ string[] srcLines = src.Split (new char[] { ';' });\r
+\r
+ foreach (string srcLine in srcLines) {\r
+ string statement = srcLine.Trim ();\r
+\r
+ string[] operandes = statement.Split (new char[] { '=' });\r
+ if (operandes.Length < 2) //not an affectation\r
+ {\r
+ continue;\r
+ }\r
+ string lop = operandes [0].Trim ();\r
+ string rop = operandes [operandes.Length-1].Trim ();\r
+\r
+ #region LEFT OPERANDES\r
+ GraphicObject lopObj = this; //default left operand base object is \r
+ //the first arg (object sender) of the event handler\r
+\r
+ string[] lopParts = lop.Split (new char[] { '.' });\r
+ if (lopParts.Length == 2) {//should search also for member of es.Source\r
+ lopObj = this.FindByName (lopParts [0]);\r
+ if (lopObj==null)\r
+ throw new Exception (string.Format("GOML:Unknown name: {0}", lopParts[0]));\r
+ //TODO: should create private member holding ref of lopObj, and emit\r
+ //a call to FindByName(lopObjName) during #ctor or in a onLoad func or evt handler\r
+ throw new Exception (string.Format("GOML:obj tree ref not yet implemented", lopParts[0]));\r
+ }else\r
+ il.Emit(OpCodes.Ldarg_0); //load sender ref onto the stack\r
+\r
+ int i = lopParts.Length -1;\r
+\r
+ MemberInfo lopMbi = lopObj.GetType().GetMember (lopParts[i])[0];\r
+ OpCode lopSetOC;\r
+ dynamic lopSetMbi;\r
+ Type lopT = null;\r
+ switch (lopMbi.MemberType) {\r
+ case MemberTypes.Property:\r
+ PropertyInfo lopPi = sourceType.GetProperty (lopParts[i]);\r
+ MethodInfo dstMi = lopPi.GetSetMethod ();\r
+ lopT = lopPi.PropertyType;\r
+ lopSetMbi = dstMi;\r
+ lopSetOC = OpCodes.Callvirt;\r
+ break;\r
+ case MemberTypes.Field:\r
+ FieldInfo dstFi = sourceType.GetField(lopParts[i]);\r
+ lopT = dstFi.FieldType;\r
+ lopSetMbi = dstFi;\r
+ lopSetOC = OpCodes.Stfld;\r
+ break;\r
+ default:\r
+ throw new Exception (string.Format("GOML:member type not handle: {0}", lopParts[i]));\r
+ } \r
+ #endregion\r
+\r
+ #region RIGHT OPERANDES\r
+ if (rop.StartsWith("\'")){\r
+ if (!rop.EndsWith("\'"))\r
+ throw new Exception (string.Format\r
+ ("GOML:malformed string constant in handler: {0}", rop)); \r
+ string strcst = rop.Substring (1, rop.Length - 2);\r
+\r
+ il.Emit(OpCodes.Ldstr,strcst);\r
+\r
+ }else{\r
+ //search for a static field in left operand type named 'rop name'\r
+ FieldInfo ropFi = lopT.GetField (rop, BindingFlags.Static|BindingFlags.Public);\r
+ if (ropFi != null)\r
+ {\r
+ il.Emit (OpCodes.Ldsfld, ropFi);\r
+ }else{\r
+ //search if parsing methods are present\r
+ MethodInfo lopTryParseMi = lopT.GetMethod("TryParse");\r
+ //TODO\r
+ }\r
+ }\r
+\r
+ #endregion\r
+\r
+ //emit left operand assignment\r
+ il.Emit(lopSetOC, lopSetMbi);\r
+ }\r
+\r
+ il.Emit(OpCodes.Ret);\r
+\r
+ #endregion\r
+\r
+ Delegate del = dm.CreateDelegate(binding.Event.EventHandlerType,this);\r
+ MethodInfo addHandler = binding.Event.GetAddMethod ();\r
+ addHandler.Invoke(this, new object[] {del});\r
+ }\r
\r
#region IXmlSerializable\r
public virtual System.Xml.Schema.XmlSchema GetSchema ()\r
continue;\r
}\r
if (mi.MemberType == MemberTypes.Event) {\r
- if (!Interface.DontResoveGOML) {\r
- Interface.GOMLResolver.Add (new DynAttribute { \r
- Source = this, \r
- Value = attValue,\r
- MemberName = attName\r
- });\r
- }\r
+ this.Bindings.Add (new Binding (mi, attValue));\r
continue;\r
}\r
if (mi.MemberType == MemberTypes.Property) {\r
home / projects / jp / crow.git / commitdiff