1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
|
//
// Context.cs
//
// Author:
// Jean-Philippe Bruyère <jp.bruyere@hotmail.com>
//
// Copyright (c) 2013-2017 Jean-Philippe Bruyère
//
// Permission is hereby granted, free of charge, to any person obtaining a copy
// of this software and associated documentation files (the "Software"), to deal
// in the Software without restriction, including without limitation the rights
// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
// copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
//
// The above copyright notice and this permission notice shall be included in
// all copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
// THE SOFTWARE.
using System;
using System.Collections.Generic;
using System.Reflection;
using System.Reflection.Emit;
using System.Xml;
namespace Crow.IML
{
public class DataSourceBinding {
public bool TwoWay;
public MemberAddress Source;
public string DataSourceMember;
}
/// <summary>
/// Context while parsing IML, this will store what's needed only while parsing and not during instancing
/// </summary>
public class Context
{
public XmlTextReader reader = null;
public Type RootType = null;
public DynamicMethod dm = null;
public ILGenerator il = null;
//public SubNodeType curSubNodeType;
public NodeStack nodesStack = new NodeStack ();
/// <summary> store addresses of named node for name resolution at end of parsing </summary>
public Dictionary<string, List<NodeAddress>> Names = new Dictionary<string, List<NodeAddress>>();
/// <summary> Store non datasource binding (in tree and template) by origine and orig member </summary>
public Dictionary<NodeAddress, Dictionary<string, List<MemberAddress>>> Bindings =
new Dictionary<NodeAddress, Dictionary<string, List<MemberAddress>>>();
/// <summary> Store binding with name in target, will be resolved at end of parsing </summary>
public List<BindingDefinition> UnresolvedTargets = new List<BindingDefinition>();
public Context (Type rootType)
{
RootType = rootType;
dm = new DynamicMethod ("dyn_instantiator",
CompilerServices.TObject, new Type [] { typeof (Instantiator), typeof (Interface) }, true);
il = dm.GetILGenerator (256);
il.DeclareLocal (typeof (GraphicObject));
il.Emit (OpCodes.Nop);
//set local GraphicObject to root object
il.Emit (OpCodes.Newobj, rootType.GetConstructors () [0]);
il.Emit (OpCodes.Stloc_0);
CompilerServices.emitSetCurInterface (il);
}
public NodeAddress CurrentNodeAddress {
get {
Node[] n = nodesStack.ToArray ();
Array.Reverse (n);
return new NodeAddress(n);
}
}
public Type CurrentNodeType {
get { return nodesStack.Peek().CrowType; }
}
public void StorePropertyBinding(NodeAddress origNA, string origMember, NodeAddress destNA, string destMember){
Dictionary<string, List<MemberAddress>> nodeBindings = null;
if (Bindings.ContainsKey (origNA))
nodeBindings = Bindings [origNA];
else {
nodeBindings = new Dictionary<string, List<MemberAddress>> ();
Bindings [origNA] = nodeBindings;
}
if (!nodeBindings.ContainsKey (origMember))
nodeBindings [origMember] = new List<MemberAddress> ();
nodeBindings [origMember].Add (new MemberAddress (destNA, destMember));
}
public void StorePropertyBinding(BindingDefinition bindDef){
if (bindDef.HasUnresolvedTargetName) {
UnresolvedTargets.Add (bindDef);
return;
}
StorePropertyBinding (bindDef.TargetNA, bindDef.TargetMember, bindDef.SourceNA, bindDef.SourceMember);
if (bindDef.TwoWay)
StorePropertyBinding (bindDef.SourceNA, bindDef.SourceMember, bindDef.TargetNA, bindDef.TargetMember);
}
public void StoreCurrentName(string name){
if (!Names.ContainsKey(name))
Names[name] = new List<NodeAddress>();
Names[name].Add(CurrentNodeAddress);
}
public void ResolveNamedTargets(){//TODO:methodinfo fetching is redundant with early parsing
foreach (BindingDefinition bd in UnresolvedTargets) {
if (bd.HasUnresolvedTargetName) {
try {
ResolveName (bd);
} catch (Exception ex) {
Console.WriteLine (ex.ToString ());
continue;
}
}
if (bd is EventBinding) {
emitHandlerMethodAddition (bd as EventBinding);
continue;
}
MemberInfo miSource = bd.SourceMemberAddress.member;
if (miSource == null)
throw new Exception ("Source member '" + bd.SourceMember + "' not found");
StorePropertyBinding (bd);
}
}
public void ResolveName (BindingDefinition bd){
if (!Names.ContainsKey (bd.TargetName))
throw new Exception ("Target Name '" + bd.TargetName + "' not found");
NodeAddress resolvedNA = null;
foreach (NodeAddress na in Names[bd.TargetName]) {
bool naMatch = true;
for (int i = 0; i < bd.TargetNA.Count; i++) {
if (bd.TargetNA [i] != na [i]) {
naMatch = false;
break;
}
}
if (naMatch) {
resolvedNA = na;
break;
}
}
if (resolvedNA == null)
throw new Exception ("Target Name '" + bd.TargetName + "' not found");
bd.ResolveTargetName (resolvedNA);
}
/// <summary>
/// Emits cached delegate handler addition in the context of instantiator (ctx)
/// </summary>
public void emitCachedDelegateHandlerAddition(int index, EventInfo evt, NodeAddress address = null){
il.Emit(OpCodes.Ldloc_0);//load ref to current graphic object
CompilerServices.emitGetInstance (il, address);
il.Emit(OpCodes.Ldarg_0);//load ref to this instanciator onto the stack
il.Emit(OpCodes.Ldfld, CompilerServices.fiCachedDel);
il.Emit(OpCodes.Ldc_I4, index);//load delegate index
il.Emit(OpCodes.Callvirt, CompilerServices.miGetDelegateListItem);
il.Emit(OpCodes.Callvirt, evt.AddMethod);//call add event
}
/// <summary>
/// Emits the handler method addition, done at end of parsing, Loc_0 is root node instance
/// </summary>
/// <param name="bd">Bd.</param>
/// <param name="evt">passed as arg to prevent refetching it for the 3rd time</param>
public void emitHandlerMethodAddition(EventBinding bd){
//fetch source instance with address for handler addition (as 1st arg of handler.add)
il.Emit (OpCodes.Ldloc_0);//push root
CompilerServices.emitGetInstance (il, bd.SourceNA);
//load handlerType of sourceEvent to create handler delegate (1st arg)
il.Emit (OpCodes.Ldtoken, bd.SourceEvent.EventHandlerType);
il.Emit (OpCodes.Call, CompilerServices.miGetTypeFromHandle);
//load target the where the method is defined (2nd arg)
il.Emit (OpCodes.Ldloc_0);
CompilerServices.emitGetInstance (il, bd.TargetNA);
//load methodInfo (3rd arg)
il.Emit (OpCodes.Ldstr, bd.TargetMember);
il.Emit (OpCodes.Callvirt, CompilerServices.miCreateDel);
il.Emit (OpCodes.Callvirt, bd.SourceEvent.AddMethod);//call add event
}
}
}
|
