Xlua原理 二

一已经介绍了初步的lua与C#通讯的原理，和xlua的LuaEnv的初始化内容。
这边介绍下Wrap文件。
一.Wrap介绍

导入xlua后可以看到会多出上图菜单。
点击后生成一堆wrap文件，这些文件是lua调用C#时举行映射查找用的中间代码。如许就不需要去反射调用节约性能。

这里以Vector3Wrap文件为例：
先看一眼Wrap文件布局

1.    public class UnityEngineVector3Wrap
2.     {
3.         public static void __Register(RealStatePtr L)
4.         {
5.                         ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
6.                         System.Type type = typeof(UnityEngine.Vector3);
7.                         Utils.BeginObjectRegister(type, L, translator, 6, 6, 6, 3);
8.                         Utils.RegisterFunc(L, Utils.OBJ_META_IDX, "__add", __AddMeta);
9.             Utils.RegisterFunc(L, Utils.OBJ_META_IDX, "__sub", __SubMeta);
10.             Utils.RegisterFunc(L, Utils.OBJ_META_IDX, "__unm", __UnmMeta);
11.             Utils.RegisterFunc(L, Utils.OBJ_META_IDX, "__mul", __MulMeta);
12.             Utils.RegisterFunc(L, Utils.OBJ_META_IDX, "__div", __DivMeta);
13.             Utils.RegisterFunc(L, Utils.OBJ_META_IDX, "__eq", __EqMeta);
14.             
15.                         Utils.RegisterFunc(L, Utils.METHOD_IDX, "Set", _m_Set);
16.                         Utils.RegisterFunc(L, Utils.METHOD_IDX, "Scale", _m_Scale);
17.                         Utils.RegisterFunc(L, Utils.METHOD_IDX, "GetHashCode", _m_GetHashCode);
18.                         Utils.RegisterFunc(L, Utils.METHOD_IDX, "Equals", _m_Equals);
19.                         Utils.RegisterFunc(L, Utils.METHOD_IDX, "Normalize", _m_Normalize);
20.                         Utils.RegisterFunc(L, Utils.METHOD_IDX, "ToString", _m_ToString);
21.            ...
22.         }
23.         ...
24.     }   

复制代码

1. private void Demo4()
2.         {
3.             LuaEnv luaenv = new LuaEnv();
4.             luaenv.DoString(@"local v1 = CS.UnityEngine.Vector3(10,10,10)
5.                             local v2 = v1.normalized
6.                             CS.UnityEngine.Debug.Log(v2.x)
7.                             local v3 = v1 + v2
8.                             local v4 = CS.UnityEngine.Vector3.Distance(v1,v2)
9.                             v1:Set(5,6,7)
10.                             CS.UnityEngine.Debug.Log(v1.x)
11.                             ");
12.             luaenv.Dispose();
13.         }

复制代码

以调用到normalized为例

1. Utils.RegisterFunc(L, Utils.GETTER_IDX, "normalized", _g_get_normalized);
3. ....
5. [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
6.         static int _g_get_normalized(RealStatePtr L)
7.         {
8.                     try {
9.                 ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
10.                        
11.                 UnityEngine.Vector3 gen_to_be_invoked;
12.                 translator.Get(L, 1, out gen_to_be_invoked);
13.                 translator.PushUnityEngineVector3(L, gen_to_be_invoked.normalized);
14.             } catch(System.Exception gen_e) {
15.                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
16.             }
17.             return 1;
18.         }

复制代码

上面那步在lua假造机注册normalized，对应是C#里的函数。
函数中先获得Vector3变量然后调用C#中的normalized，末了再举行压栈操作供lua利用。
这块看出来，实际上lua还是去调用C#的代码，而且伴随压栈出栈操作。这就是为什么我们的lua的代码减少 . 如许的调用能节约一些性能的缘故原由。
再换个函数Set

1.        [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
2.         static int _m_Set(RealStatePtr L)
3.         {
4.                     try {
5.             
6.                 ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
7.                 UnityEngine.Vector3 gen_to_be_invoked;translator.Get(L, 1, out gen_to_be_invoked);
8.                 {
9.                     float _newX = (float)LuaAPI.lua_tonumber(L, 2);
10.                     float _newY = (float)LuaAPI.lua_tonumber(L, 3);
11.                     float _newZ = (float)LuaAPI.lua_tonumber(L, 4);
12.                     gen_to_be_invoked.Set( _newX, _newY, _newZ );
13.                     translator.UpdateUnityEngineVector3(L, 1, gen_to_be_invoked);
14.                     return 0;
15.                 }
16.                
17.             } catch(System.Exception gen_e) {
18.                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
19.             }
20.         }

复制代码

前面的部分跟normalized差不多看下UpdateUnityEngineVector3部分

1. public void UpdateUnityEngineVector3(RealStatePtr L, int index, UnityEngine.Vector3 val)
2.         {
3.             if (LuaAPI.lua_type(L, index) == LuaTypes.LUA_TUSERDATA)
4.             {
5.                             if (LuaAPI.xlua_gettypeid(L, index) != UnityEngineVector3_TypeID)
6.                                 {
7.                                     throw new Exception("invalid userdata for UnityEngine.Vector3");
8.                                 }
9.                                
10.                 IntPtr buff = LuaAPI.lua_touserdata(L, index);
11.                 if (!CopyByValue.Pack(buff, 0,  val))
12.                 {
13.                     throw new Exception("pack fail for UnityEngine.Vector3 ,value="+val);
14.                 }
15.             }
16.             else
17.             {
18.                 throw new Exception("try to update a data with lua type:" + LuaAPI.lua_type(L, index));
19.             }
20.         }

复制代码

这里看到对应lua来说C#的布局体、类都是UserData。C#想要去改变lua内的内存利用

1. CopyByValue.Pack函数进行拷贝

复制代码

再拿个GameObject的Component举例，加深下印象：

1. luaenv.DoString(@"local v1 = CS.UnityEngine.GameObject()
2.                   local v2 = v1:AddComponent(typeof(CS.UnityEngine.Camera))
3.                 ");
5. [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
6.         static int _m_AddComponent(RealStatePtr L)
7.         {
8.                     try {
9.             
10.                 ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
11.             
12.             
13.                 UnityEngine.GameObject gen_to_be_invoked = (UnityEngine.GameObject)translator.FastGetCSObj(L, 1);
14.             
15.             
16.                
17.                 {
18.                     System.Type _componentType = (System.Type)translator.GetObject(L, 2, typeof(System.Type));
19.                     
20.                         var gen_ret = gen_to_be_invoked.AddComponent( _componentType );
21.                         translator.Push(L, gen_ret);
22.                     
23.                     
24.                     
25.                     return 1;
26.                 }
27.                
28.             } catch(System.Exception gen_e) {
29.                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
30.             }
31.             
32.         }

复制代码

这里有个函数getCsObj用于取游戏对象

1. private object getCsObj(RealStatePtr L, int index, int udata)
2.         {
3.             object obj;
4.             if (udata == -1)
5.             {
6.                 if (LuaAPI.lua_type(L, index) != LuaTypes.LUA_TUSERDATA) return null;
8.                 Type type = GetTypeOf(L, index);
9.                 if (type == typeof(decimal))
10.                 {
11.                     decimal v;
12.                     Get(L, index, out v);
13.                     return v;
14.                 }
15.                 GetCSObject get;
16.                 if (type != null && custom_get_funcs.TryGetValue(type, out get))
17.                 {
18.                     return get(L, index);
19.                 }
20.                 else
21.                 {
22.                     return null;
23.                 }
24.             }
25.             else if (objects.TryGetValue(udata, out obj))
26.             {
27. #if !UNITY_5 && !XLUA_GENERAL && !UNITY_2017 && !UNITY_2017_1_OR_NEWER && !UNITY_2018
28.                 if (obj != null && obj is UnityEngine.Object && ((obj as UnityEngine.Object) == null))
29.                 {
30.                     //throw new UnityEngine.MissingReferenceException("The object of type '"+ obj.GetType().Name +"' has been destroyed but you are still trying to access it.");
31.                     return null;
32.                 }
33. #endif
34.                 return obj;
35.             }
36.             return null;
37.         }

复制代码

这里从一个objects字典去查找游戏的对象。跟Vector3有区别。lua创建GameObject的过程会走CS的元表方法（在上篇有介绍），调用c#的Import方法，会把这个GameObject举行注册方法，加入到objects举行维护。

额外测试了删除，发现假如不触发gc，object池不会删除对象，哪怕C#实际上已经删除了

总结：Wrap文件是lua与C#通讯中间代码文件，主要实现方式就是从lua堆栈取出lua数据对象，调用C#代码然后把效果再压栈到堆栈中。
像代码 
local v1 = CS.UnityEngine.Vector3(1,2,3)
v1:Set(4,5,6)
性能显着要优于
v1.x = 4
v2.y = 5
v3.z = 6
压栈少了4次，拷贝次数少了2次
二.Wrap文件生成

•流程：
•1.Generator网络这种范例需要导出的对象
•2.通过LuaTemplate把对应的.tpl.txt文件转成可实验的lua代码
•3.在GenOne方法里给上一步生成的lua代码赋值全局变量
•4.实验lua代码生成wrap文件
映射模板目录：

生成中间代码文件部分

XLua.Utils.GetAllTypes:网络工程全部元数据
ps:这步可以直接举行改造，让其直接对有效元数据举行筛选，稍微节约一点编译时间
GetGenConfig：对元数据举行过滤筛选出需要lua与C#通讯的元数据
以Lua通讯C#代码为例：
老师成一个List，然后去获取全部打上LuaCallCSharp标签的元数据，举行添加，末了在用Linq表达式举行一遍筛选。

实验脚本TemplateCommon,在lua里填充table数据，构造好后去生成Wrap文件
对于每个类都会走到GenOne来生成Wrap文件

以GameObjectWrap文件生成为例：
模板对应文件：

1. #if USE_UNI_LUA
2. using LuaAPI = UniLua.Lua;
3. using RealStatePtr = UniLua.ILuaState;
4. using LuaCSFunction = UniLua.CSharpFunctionDelegate;
5. #else
6. using LuaAPI = XLua.LuaDLL.Lua;
7. using RealStatePtr = System.IntPtr;
8. using LuaCSFunction = XLua.LuaDLL.lua_CSFunction;
9. #endif
11. using XLua;
12. using System.Collections.Generic;
13. <%ForEachCsList(namespaces, function(namespace)%>using <%=namespace%>;<%end)%>
14. <%
15. require "TemplateCommon"
17. local OpNameMap = {
18.     op_Addition = "__AddMeta",
19.         op_Subtraction = "__SubMeta",
20.         op_Multiply = "__MulMeta",
21.         op_Division = "__DivMeta",
22.         op_Equality = "__EqMeta",
23.         op_UnaryNegation = "__UnmMeta",
24.         op_LessThan = "__LTMeta",
25.         op_LessThanOrEqual = "__LEMeta",
26.         op_Modulus = "__ModMeta",
27.     op_BitwiseAnd = "__BandMeta",
28.     op_BitwiseOr = "__BorMeta",
29.     op_ExclusiveOr = "__BxorMeta",
30.     op_OnesComplement = "__BnotMeta",
31.     op_LeftShift = "__ShlMeta",
32.     op_RightShift = "__ShrMeta",
33. }
35. local OpCallNameMap = {
36.     op_Addition = "+",
37.         op_Subtraction = "-",
38.         op_Multiply = "*",
39.         op_Division = "/",
40.         op_Equality = "==",
41.         op_UnaryNegation = "-",
42.         op_LessThan = "<",
43.         op_LessThanOrEqual = "<=",
44.         op_Modulus = "%",
45.         op_BitwiseAnd = "&",
46.     op_BitwiseOr = "|",
47.     op_ExclusiveOr = "^",
48.     op_OnesComplement = "~",
49.     op_LeftShift = "<<",
50.     op_RightShift = ">>",
51. }
53. local obj_method_count = 0
54. local obj_getter_count = 0
55. local obj_setter_count = 0
56. local meta_func_count = operators.Count
57. local cls_field_count = 1
58. local cls_getter_count = 0
59. local cls_setter_count = 0
61. ForEachCsList(methods, function(method)
62.     if method.IsStatic then
63.             cls_field_count = cls_field_count + 1
64.         else
65.             obj_method_count = obj_method_count + 1
66.     end
67. end)
69. ForEachCsList(events, function(event)
70.     if event.IsStatic then
71.             cls_field_count = cls_field_count + 1
72.         else
73.             obj_method_count = obj_method_count + 1
74.     end
75. end)
77. ForEachCsList(getters, function(getter)
78.     if getter.IsStatic then
79.             if getter.ReadOnly then
80.                 cls_field_count = cls_field_count + 1
81.             else
82.                     cls_getter_count = cls_getter_count + 1
83.                 end
84.         else
85.             obj_getter_count = obj_getter_count + 1
86.     end
87. end)
89. ForEachCsList(setters, function(setter)
90.     if setter.IsStatic then
91.             cls_setter_count = cls_setter_count + 1
92.         else
93.             obj_setter_count = obj_setter_count + 1
94.     end
95. end)
97. ForEachCsList(lazymembers, function(lazymember)
98.     if lazymember.IsStatic == 'true' then
99.             if 'CLS_IDX' == lazymember.Index then
100.                     cls_field_count = cls_field_count + 1
101.             elseif 'CLS_GETTER_IDX' == lazymember.Index then
102.                     cls_getter_count = cls_getter_count + 1
103.                 elseif 'CLS_SETTER_IDX' == lazymember.Index then
104.                     cls_setter_count = cls_setter_count + 1
105.                 end
106.         else
107.                 if 'METHOD_IDX' == lazymember.Index then
108.                     obj_method_count = obj_method_count + 1
109.             elseif 'GETTER_IDX' == lazymember.Index then
110.                     obj_getter_count = obj_getter_count + 1
111.                 elseif 'SETTER_IDX' == lazymember.Index then
112.                     obj_setter_count = obj_setter_count + 1
113.                 end
114.         end
115. end)
117. local generic_arg_list, type_constraints = GenericArgumentList(type)
119. %>
120. namespace XLua.CSObjectWrap
121. {
122.     using Utils = XLua.Utils;
123.     public class <%=CSVariableName(type)%>Wrap<%=generic_arg_list%> <%=type_constraints%>
124.     {
125.         public static void __Register(RealStatePtr L)
126.         {
127.                         ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
128.                         System.Type type = typeof(<%=CsFullTypeName(type)%>);
129.                         Utils.BeginObjectRegister(type, L, translator, <%=meta_func_count%>, <%=obj_method_count%>, <%=obj_getter_count%>, <%=obj_setter_count%>);
130.                         <%ForEachCsList(operators, function(operator)%>Utils.RegisterFunc(L, Utils.OBJ_META_IDX, "<%=(OpNameMap[operator.Name]):gsub('Meta', ''):lower()%>", <%=OpNameMap[operator.Name]%>);
131.             <%end)%>
132.                         <%ForEachCsList(methods, function(method) if not method.IsStatic then %>Utils.RegisterFunc(L, Utils.METHOD_IDX, "<%=method.Name%>", _m_<%=method.Name%>);
133.                         <% end end)%>
134.                         <%ForEachCsList(events, function(event) if not event.IsStatic then %>Utils.RegisterFunc(L, Utils.METHOD_IDX, "<%=event.Name%>", _e_<%=event.Name%>);
135.                         <% end end)%>
136.                         <%ForEachCsList(getters, function(getter) if not getter.IsStatic then %>Utils.RegisterFunc(L, Utils.GETTER_IDX, "<%=getter.Name%>", _g_get_<%=getter.Name%>);
137.             <%end end)%>
138.                         <%ForEachCsList(setters, function(setter) if not setter.IsStatic then %>Utils.RegisterFunc(L, Utils.SETTER_IDX, "<%=setter.Name%>", _s_set_<%=setter.Name%>);
139.             <%end end)%>
140.                         <%ForEachCsList(lazymembers, function(lazymember) if lazymember.IsStatic == 'false' then %>Utils.RegisterLazyFunc(L, Utils.<%=lazymember.Index%>, "<%=lazymember.Name%>", type, <%=lazymember.MemberType%>, <%=lazymember.IsStatic%>);
141.             <%end end)%>
142.                         Utils.EndObjectRegister(type, L, translator, <% if type.IsArray or ((indexers.Count or 0) > 0) then %>__CSIndexer<%else%>null<%end%>, <%if type.IsArray or ((newindexers.Count or 0) > 0) then%>__NewIndexer<%else%>null<%end%>,
143.                             null, null, null);
145.                     Utils.BeginClassRegister(type, L, __CreateInstance, <%=cls_field_count%>, <%=cls_getter_count%>, <%=cls_setter_count%>);
146.                         <%ForEachCsList(methods, function(method) if method.IsStatic then %>Utils.RegisterFunc(L, Utils.CLS_IDX, "<%=method.Overloads[0].Name%>", _m_<%=method.Name%>);
147.             <% end end)%>
148.                         <%ForEachCsList(events, function(event) if event.IsStatic then %>Utils.RegisterFunc(L, Utils.CLS_IDX, "<%=event.Name%>", _e_<%=event.Name%>);
149.                         <% end end)%>
150.             <%ForEachCsList(getters, function(getter) if getter.IsStatic and getter.ReadOnly then %>Utils.RegisterObject(L, translator, Utils.CLS_IDX, "<%=getter.Name%>", <%=CsFullTypeName(type).."."..getter.Name%>);
151.             <%end end)%>
152.                         <%ForEachCsList(getters, function(getter) if getter.IsStatic and (not getter.ReadOnly) then %>Utils.RegisterFunc(L, Utils.CLS_GETTER_IDX, "<%=getter.Name%>", _g_get_<%=getter.Name%>);
153.             <%end end)%>
154.                         <%ForEachCsList(setters, function(setter) if setter.IsStatic then %>Utils.RegisterFunc(L, Utils.CLS_SETTER_IDX, "<%=setter.Name%>", _s_set_<%=setter.Name%>);
155.             <%end end)%>
156.                         <%ForEachCsList(lazymembers, function(lazymember) if lazymember.IsStatic == 'true' then %>Utils.RegisterLazyFunc(L, Utils.<%=lazymember.Index%>, "<%=lazymember.Name%>", type, <%=lazymember.MemberType%>, <%=lazymember.IsStatic%>);
157.             <%end end)%>
158.                         Utils.EndClassRegister(type, L, translator);
159.         }
160.         
161.         [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
162.         static int __CreateInstance(RealStatePtr L)
163.         {
164.             <%
165.             if constructors.Count == 0 and (not type.IsValueType)  then
166.             %>return LuaAPI.luaL_error(L, "<%=CsFullTypeName(type)%> does not have a constructor!");<%
167.             else %>
168.                         try {
169.                 ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
170.                                 <%
171.                                 local hasZeroParamsCtor = false
172.                                 ForEachCsList(constructors, function(constructor, ci)
173.                                         local parameters = constructor:GetParameters()
174.                                         if parameters.Length == 0 then
175.                                             hasZeroParamsCtor = true
176.                                         end
177.                                         local def_count = constructor_def_vals[ci]
178.                                         local param_count = parameters.Length
179.                                         local in_num = CalcCsList(parameters, function(p) return not (p.IsOut and p.ParameterType.IsByRef) end)
180.                     local out_num = CalcCsList(parameters, function(p) return p.IsOut or p.ParameterType.IsByRef end)
181.                                         local real_param_count = param_count - def_count
182.                     local has_v_params = param_count > 0 and IsParams(parameters[param_count - 1])
183.                                         local in_pos = 0
184.                                 %>if(LuaAPI.lua_gettop(L) <%=has_v_params and ">=" or "=="%> <%=in_num + 1 - def_count - (has_v_params and 1 or 0)%><%ForEachCsList(parameters, function(parameter, pi)
185.                 if pi >= real_param_count then return end
186.                 local parameterType = parameter.ParameterType
187.                 if has_v_params and pi == param_count - 1 then  parameterType = parameterType:GetElementType() end
188.                                 if not (parameter.IsOut and parameter.ParameterType.IsByRef) then in_pos = in_pos + 1
189.                 %> && <%=GetCheckStatement(parameterType, in_pos+1, has_v_params and pi == param_count - 1)%><%
190.                                 end
191.                                 end)%>)
192.                                 {
193.                                         <%ForEachCsList(parameters, function(parameter, pi)
194.                     if pi >= real_param_count then return end
195.                     %><%=GetCasterStatement(parameter.ParameterType, pi+2, LocalName(parameter.Name), true, has_v_params and pi == param_count - 1)%>;
196.                                         <%end)%>
197.                                         var gen_ret = new <%=CsFullTypeName(type)%>(<%ForEachCsList(parameters, function(parameter, pi) if pi >= real_param_count then return end; if pi ~=0 then %><%=', '%><% end ;if parameter.IsOut and parameter.ParameterType.IsByRef then %>out <% elseif parameter.ParameterType.IsByRef and not parameter.IsIn then %>ref <% end %><%=LocalName(parameter.Name)%><% end)%>);
198.                                         <%=GetPushStatement(type, "gen_ret")%>;
199.                     <%local in_pos = 0
200.                     ForEachCsList(parameters, function(parameter, pi)
201.                         if pi >= real_param_count then return end
202.                         if not (parameter.IsOut and parameter.ParameterType.IsByRef) then
203.                             in_pos = in_pos + 1
204.                         end
205.                         if parameter.ParameterType.IsByRef then
206.                         %><%=GetPushStatement(parameter.ParameterType:GetElementType(), LocalName(parameter.Name))%>;
207.                         <%if not parameter.IsOut and parameter.ParameterType.IsByRef and NeedUpdate(parameter.ParameterType) then
208.                   %><%=GetUpdateStatement(parameter.ParameterType:GetElementType(), in_pos+1, LocalName(parameter.Name))%>;
209.                         <%end%>
210.                     <%
211.                         end
212.                     end)
213.                     %>
214.                                         return <%=out_num + 1%>;
215.                                 }
216.                                 <%end)
217.                                 if (not hasZeroParamsCtor) and type.IsValueType then
218.                                 %>
219.                                 if (LuaAPI.lua_gettop(L) == 1)
220.                                 {
221.                                     <%=GetPushStatement(type, "default(" .. CsFullTypeName(type).. ")")%>;
222.                                 return 1;
223.                                 }
224.                                 <%end%>
225.                         }
226.                         catch(System.Exception gen_e) {
227.                                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
228.                         }
229.             return LuaAPI.luaL_error(L, "invalid arguments to <%=CsFullTypeName(type)%> constructor!");
230.             <% end %>
231.         }
232.         
233.                 <% if type.IsArray or ((indexers.Count or 0) > 0) then %>
234.         [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
235.         public static int __CSIndexer(RealStatePtr L)
236.         {
237.                         <%if type.IsArray then %>
238.                         try {
239.                             ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
240.                        
241.                                 if (<%=GetCheckStatement(type, 1)%> && LuaAPI.lua_isnumber(L, 2))
242.                                 {
243.                                         int index = (int)LuaAPI.lua_tonumber(L, 2);
244.                                         <%=GetSelfStatement(type)%>;
245.                                         LuaAPI.lua_pushboolean(L, true);
246.                                         <%=GetPushStatement(type:GetElementType(), "gen_to_be_invoked[index]")%>;
247.                                         return 2;
248.                                 }
249.                         }
250.                         catch(System.Exception gen_e) {
251.                                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
252.                         }
253.                         <%elseif indexers.Count > 0 then
254.                         %>try {
255.                             ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
256.                                 <%
257.                                         ForEachCsList(indexers, function(indexer)
258.                                                 local paramter = indexer:GetParameters()[0]
259.                                 %>
260.                                 if (<%=GetCheckStatement(type, 1)%> && <%=GetCheckStatement(paramter.ParameterType, 2)%>)
261.                                 {
262.                                        
263.                                         <%=GetSelfStatement(type)%>;
264.                                         <%=GetCasterStatement(paramter.ParameterType, 2, "index", true)%>;
265.                                         LuaAPI.lua_pushboolean(L, true);
266.                                         <%=GetPushStatement(indexer.ReturnType, "gen_to_be_invoked[index]")%>;
267.                                         return 2;
268.                                 }
269.                                 <%end)%>
270.                         }
271.                         catch(System.Exception gen_e) {
272.                                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
273.                         }
274.                         <%end%>
275.             LuaAPI.lua_pushboolean(L, false);
276.                         return 1;
277.         }
278.                 <% end %>
279.         
280.                 <%if type.IsArray or ((newindexers.Count or 0) > 0) then%>
281.         [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
282.         public static int __NewIndexer(RealStatePtr L)
283.         {
284.                         <%if type.IsArray or newindexers.Count > 0 then %>ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);<%end%>
285.                         <%if type.IsArray then
286.                                 local elementType = type:GetElementType()
287.                         %>
288.                         try {
289.                                 if (<%=GetCheckStatement(type, 1)%> && LuaAPI.lua_isnumber(L, 2) && <%=GetCheckStatement(elementType, 3)%>)
290.                                 {
291.                                         int index = (int)LuaAPI.lua_tonumber(L, 2);
292.                                         <%=GetSelfStatement(type)%>;
293.                                         <%=GetCasterStatement(elementType, 3, "gen_to_be_invoked[index]")%>;
294.                                         LuaAPI.lua_pushboolean(L, true);
295.                                         return 1;
296.                                 }
297.                         }
298.                         catch(System.Exception gen_e) {
299.                                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
300.                         }
301.                         <%elseif newindexers.Count > 0 then%>
302.                         try {
303.                                 <%ForEachCsList(newindexers, function(newindexer)
304.                                                 local keyType = newindexer:GetParameters()[0].ParameterType
305.                                                 local valueType = newindexer:GetParameters()[1].ParameterType
306.                                 %>
307.                                 if (<%=GetCheckStatement(type, 1)%> && <%=GetCheckStatement(keyType, 2)%> && <%=GetCheckStatement(valueType, 3)%>)
308.                                 {
309.                                        
310.                                         <%=GetSelfStatement(type)%>;
311.                                         <%=GetCasterStatement(keyType, 2, "key", true)%>;
312.                                         <%if IsStruct(valueType) then%><%=GetCasterStatement(valueType, 3, "gen_value", true)%>;
313.                                         gen_to_be_invoked[key] = gen_value;<%else
314.                   %><%=GetCasterStatement(valueType, 3, "gen_to_be_invoked[key]")%>;<%end%>
315.                                         LuaAPI.lua_pushboolean(L, true);
316.                                         return 1;
317.                                 }
318.                                 <%end)%>
319.                         }
320.                         catch(System.Exception gen_e) {
321.                                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
322.                         }
323.                         <%end%>
324.                         LuaAPI.lua_pushboolean(L, false);
325.             return 1;
326.         }
327.                 <% end %>
328.         
329.         <%ForEachCsList(operators, function(operator) %>
330.         [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
331.         static int <%=OpNameMap[operator.Name]%>(RealStatePtr L)
332.         {
333.             <% if operator.Name ~= "op_UnaryNegation" and operator.Name ~= "op_OnesComplement"  then %>
334.                         try {
335.                 ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
336.             <%ForEachCsList(operator.Overloads, function(overload)
337.                 local left_param = overload:GetParameters()[0]
338.                 local right_param = overload:GetParameters()[1]
339.             %>
340.                        
341.                                 if (<%=GetCheckStatement(left_param.ParameterType, 1)%> && <%=GetCheckStatement(right_param.ParameterType, 2)%>)
342.                                 {
343.                                         <%=GetCasterStatement(left_param.ParameterType, 1, "leftside", true)%>;
344.                                         <%=GetCasterStatement(right_param.ParameterType, 2, "rightside", true)%>;
345.                                        
346.                                         <%=GetPushStatement(overload.ReturnType, "leftside " .. OpCallNameMap[operator.Name] .. " rightside")%>;
347.                                        
348.                                         return 1;
349.                                 }
350.             <%end)%>
351.                         }
352.                         catch(System.Exception gen_e) {
353.                                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
354.                         }
355.             return LuaAPI.luaL_error(L, "invalid arguments to right hand of <%=OpCallNameMap[operator.Name]%> operator, need <%=CsFullTypeName(type)%>!");
356.             <%else%>
357.                         ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
358.             try {
359.                 <%=GetCasterStatement(type, 1, "rightside", true)%>;
360.                 <%=GetPushStatement(operator.Overloads[0].ReturnType, OpCallNameMap[operator.Name] .. " rightside")%>;
361.             } catch(System.Exception gen_e) {
362.                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
363.             }
364.             return 1;
365.             <%end%>
366.         }
367.         <%end)%>
368.         
369.         <%ForEachCsList(methods, function(method)%>
370.         [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
371.         static int _m_<%=method.Name%>(RealStatePtr L)
372.         {
373.                     try {
374.             <%
375.             local need_obj = not method.IsStatic
376.             if MethodCallNeedTranslator(method) then
377.             %>
378.                 ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
379.             <%end%>
380.             <%if need_obj then%>
381.                 <%=GetSelfStatement(type)%>;
382.             <%end%>
383.             <%if method.Overloads.Count > 1 then%>
384.                             int gen_param_count = LuaAPI.lua_gettop(L);
385.             <%end%>
386.                 <%ForEachCsList(method.Overloads, function(overload, oi)
387.                 local parameters = MethodParameters(overload)
388.                 local in_num = CalcCsList(parameters, function(p) return not (p.IsOut and p.ParameterType.IsByRef) end)
389.                 local param_offset = method.IsStatic and 0 or 1
390.                 local out_num = CalcCsList(parameters, function(p) return p.IsOut or p.ParameterType.IsByRef end)
391.                 local in_pos = 0
392.                 local has_return = (overload.ReturnType.FullName ~= "System.Void")
393.                 local def_count = method.DefaultValues[oi]
394.                                 local param_count = parameters.Length
395.                 local real_param_count = param_count - def_count
396.                 local has_v_params = param_count > 0 and IsParams(parameters[param_count - 1])
397.                 if method.Overloads.Count > 1 then
398.                 %>if(gen_param_count <%=has_v_params and ">=" or "=="%> <%=in_num+param_offset-def_count - (has_v_params and 1 or 0)%><%
399.                     ForEachCsList(parameters, function(parameter, pi)
400.                         if pi >= real_param_count then return end
401.                         local parameterType = parameter.ParameterType
402.                         if has_v_params and pi == param_count - 1 then  parameterType = parameterType:GetElementType() end
403.                         if not (parameter.IsOut and parameter.ParameterType.IsByRef) then in_pos = in_pos + 1;
404.                         %>&& <%=GetCheckStatement(parameterType , in_pos+param_offset, has_v_params and pi == param_count - 1)%><%
405.                         end
406.                     end)%>) <%end%>
407.                 {
408.                     <%if overload.Name == "get_Item" and overload.IsSpecialName then
409.                                             local keyType = overload:GetParameters()[0].ParameterType%>
410.                                         <%=GetCasterStatement(keyType, 2, "key", true)%>;
411.                                         <%=GetPushStatement(overload.ReturnType, "gen_to_be_invoked[key]")%>;
412.                                         <%elseif overload.Name == "set_Item" and overload.IsSpecialName then
413.                                             local keyType = overload:GetParameters()[0].ParameterType
414.                                                 local valueType = overload:GetParameters()[1].ParameterType%>
415.                                         <%=GetCasterStatement(keyType, 2, "key", true)%>;
416.                                         <%=GetCasterStatement(valueType, 3, "gen_value", true)%>;
417.                     gen_to_be_invoked[key] = gen_value;
418.                     <% else
419.                     in_pos = 0;
420.                     ForEachCsList(parameters, function(parameter, pi)
421.                         if pi >= real_param_count then return end
422.                         %><%if not (parameter.IsOut and parameter.ParameterType.IsByRef) then
423.                             in_pos = in_pos + 1
424.                         %><%=GetCasterStatement(parameter.ParameterType, in_pos+param_offset, LocalName(parameter.Name), true, has_v_params and pi == param_count - 1)%><%
425.                                             else%><%=CsFullTypeName(parameter.ParameterType)%> <%=LocalName(parameter.Name)%><%end%>;
426.                     <%end)%>
427.                     <%
428.                     if has_return then
429.                         %>    var gen_ret = <%
430.                     end
431.                     %><%if method.IsStatic then
432.                     %><%=CsFullTypeName(type).."."..UnK(overload.Name)%><%
433.                     else
434.                     %>gen_to_be_invoked.<%=UnK(overload.Name)%><%
435.                     end%>( <%ForEachCsList(parameters, function(parameter, pi)
436.                         if pi >= real_param_count then return end
437.                         if pi ~= 0 then %>, <% end; if parameter.IsOut and parameter.ParameterType.IsByRef then %>out <% elseif parameter.ParameterType.IsByRef and not parameter.IsIn then %>ref <% end %><%=LocalName(parameter.Name)%><% end) %> );
438.                     <%
439.                     if has_return then
440.                     %>    <%=GetPushStatement(overload.ReturnType, "gen_ret")%>;
441.                     <%
442.                     end
443.                     local in_pos = 0
444.                     ForEachCsList(parameters, function(parameter, pi)
445.                         if pi >= real_param_count then return end
446.                         if not (parameter.IsOut and parameter.ParameterType.IsByRef) then
447.                             in_pos = in_pos + 1
448.                         end
449.                         if parameter.ParameterType.IsByRef then
450.                         %><%=GetPushStatement(parameter.ParameterType:GetElementType(), LocalName(parameter.Name))%>;
451.                         <%if not parameter.IsOut and parameter.ParameterType.IsByRef and NeedUpdate(parameter.ParameterType) then
452.                   %><%=GetUpdateStatement(parameter.ParameterType:GetElementType(), in_pos+param_offset, LocalName(parameter.Name))%>;
453.                         <%end%>
454.                     <%
455.                         end
456.                     end)
457.                                         end
458.                     %>
459.                     <%if NeedUpdate(type) and not method.IsStatic then%>
460.                         <%=GetUpdateStatement(type, 1, "gen_to_be_invoked")%>;
461.                     <%end%>
462.                     
463.                     return <%=out_num+(has_return and 1 or 0)%>;
464.                 }
465.                 <% end)%>
466.             } catch(System.Exception gen_e) {
467.                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
468.             }
469.             <%if method.Overloads.Count > 1 then%>
470.             return LuaAPI.luaL_error(L, "invalid arguments to <%=CsFullTypeName(type)%>.<%=method.Overloads[0].Name%>!");
471.             <%end%>
472.         }
473.         <% end)%>
474.         
475.         
476.         <%ForEachCsList(getters, function(getter)
477.         if getter.IsStatic and getter.ReadOnly then return end --readonly static
478.         %>
479.         [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
480.         static int _g_get_<%=getter.Name%>(RealStatePtr L)
481.         {
482.                     try {
483.             <%if AccessorNeedTranslator(getter) then %>    ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);<%end%>
484.                         <%if not getter.IsStatic then%>
485.                 <%=GetSelfStatement(type)%>;
486.                 <%=GetPushStatement(getter.Type, "gen_to_be_invoked."..UnK(getter.Name))%>;<% else %>    <%=GetPushStatement(getter.Type, CsFullTypeName(type).."."..UnK(getter.Name))%>;<% end%>
487.             } catch(System.Exception gen_e) {
488.                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
489.             }
490.             return 1;
491.         }
492.         <%end)%>
493.         
494.         <%ForEachCsList(setters, function(setter)
495.         local is_struct = IsStruct(setter.Type)
496.         %>
497.         [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
498.         static int _s_set_<%=setter.Name%>(RealStatePtr L)
499.         {
500.                     try {
501.                 <%if AccessorNeedTranslator(setter) then %>ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);<%end%>
502.                         <%if not setter.IsStatic then %>
503.                 <%=GetSelfStatement(type)%>;
504.                 <%if is_struct then %><%=GetCasterStatement(setter.Type, 2, "gen_value", true)%>;
505.                                 gen_to_be_invoked.<%=UnK(setter.Name)%> = gen_value;<% else
506.               %><%=GetCasterStatement(setter.Type, 2, "gen_to_be_invoked." .. UnK(setter.Name))%>;<%end
507.             else
508.                                 if is_struct then %><%=GetCasterStatement(setter.Type, 1, "gen_value", true)%>;
509.                                 <%=CsFullTypeName(type)%>.<%=UnK(setter.Name)%> = gen_value;<%else
510.           %>    <%=GetCasterStatement(setter.Type, 1, CsFullTypeName(type) .."." .. UnK(setter.Name))%>;<%end
511.             end%>
512.             <%if NeedUpdate(type) and not setter.IsStatic then%>
513.                 <%=GetUpdateStatement(type, 1, "gen_to_be_invoked")%>;
514.             <%end%>
515.             } catch(System.Exception gen_e) {
516.                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
517.             }
518.             return 0;
519.         }
520.         <%end)%>
521.                
522.                 <%ForEachCsList(events, function(event) if not event.IsStatic then %>
523.         [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
524.         static int _e_<%=event.Name%>(RealStatePtr L)
525.         {
526.                     try {
527.                 ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
528.                             int gen_param_count = LuaAPI.lua_gettop(L);
529.                         <%=GetSelfStatement(type)%>;
530.                 <%=GetCasterStatement(event.Type, 3, "gen_delegate", true)%>;
531.                 if (gen_delegate == null) {
532.                     return LuaAPI.luaL_error(L, "#3 need <%=CsFullTypeName(event.Type)%>!");
533.                 }
534.                                
535.                                 if (gen_param_count == 3)
536.                                 {
537.                                         <%if event.CanAdd then%>
538.                                         if (LuaAPI.xlua_is_eq_str(L, 2, "+")) {
539.                                                 gen_to_be_invoked.<%=UnK(event.Name)%> += gen_delegate;
540.                                                 return 0;
541.                                         }
542.                                         <%end%>
543.                                         <%if event.CanRemove then%>
544.                                         if (LuaAPI.xlua_is_eq_str(L, 2, "-")) {
545.                                                 gen_to_be_invoked.<%=UnK(event.Name)%> -= gen_delegate;
546.                                                 return 0;
547.                                         }
548.                                         <%end%>
549.                                 }
550.                         } catch(System.Exception gen_e) {
551.                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
552.             }
553.                         LuaAPI.luaL_error(L, "invalid arguments to <%=CsFullTypeName(type)%>.<%=event.Name%>!");
554.             return 0;
555.         }
556.         <%end end)%>
557.                
558.                 <%ForEachCsList(events, function(event) if event.IsStatic then %>
559.         [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]
560.         static int _e_<%=event.Name%>(RealStatePtr L)
561.         {
562.                     try {
563.                 ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);
564.                             int gen_param_count = LuaAPI.lua_gettop(L);
565.                 <%=GetCasterStatement(event.Type, 2, "gen_delegate", true)%>;
566.                 if (gen_delegate == null) {
567.                     return LuaAPI.luaL_error(L, "#2 need <%=CsFullTypeName(event.Type)%>!");
568.                 }
569.                
570.                                 <%if event.CanAdd then%>
571.                                 if (gen_param_count == 2 && LuaAPI.xlua_is_eq_str(L, 1, "+")) {
572.                                         <%=CsFullTypeName(type)%>.<%=UnK(event.Name)%> += gen_delegate;
573.                                         return 0;
574.                                 }
575.                                 <%end%>
576.                                 <%if event.CanRemove then%>
577.                                 if (gen_param_count == 2 && LuaAPI.xlua_is_eq_str(L, 1, "-")) {
578.                                         <%=CsFullTypeName(type)%>.<%=UnK(event.Name)%> -= gen_delegate;
579.                                         return 0;
580.                                 }
581.                                 <%end%>
582.                         } catch(System.Exception gen_e) {
583.                 return LuaAPI.luaL_error(L, "c# exception:" + gen_e);
584.             }
585.                         return LuaAPI.luaL_error(L, "invalid arguments to <%=CsFullTypeName(type)%>.<%=event.Name%>!");
586.         }
587.         <%end end)%>
588.     }
589. }

复制代码

这里很多多少的 如namespace,ForEachCsList，CSVariableName等运行时会被对应的GameObject替换。
再打一下这个文件被预编译后的文件：

1. local __text_gen = {}
2. table.insert(__text_gen, "#if USE_UNI_LUA\r\nusing LuaAPI = UniLua.Lua;\r\nusing RealStatePtr = UniLua.ILuaState;\r\nusing LuaCSFunction = UniLua.CSharpFunctionDelegate;\r\n#else\r\nusing LuaAPI = XLua.LuaDLL.Lua;\r\nusing RealStatePtr = System.IntPtr;\r\nusing LuaCSFunction = XLua.LuaDLL.lua_CSFunction;\r\n#endif\r\n\r\nusing XLua;\r\nusing System.Collections.Generic;\r\n")
3. ForEachCsList(namespaces, function(namespace)
4. table.insert(__text_gen, "using ")
5. table.insert(__text_gen, tostring(namespace))
6. table.insert(__text_gen, ";")
7. end)
8. table.insert(__text_gen, "\r\n")
10. require "TemplateCommon"
12. local OpNameMap = {
13.     op_Addition = "__AddMeta",
14.         op_Subtraction = "__SubMeta",
15.         op_Multiply = "__MulMeta",
16.         op_Division = "__DivMeta",
17.         op_Equality = "__EqMeta",
18.         op_UnaryNegation = "__UnmMeta",
19.         op_LessThan = "__LTMeta",
20.         op_LessThanOrEqual = "__LEMeta",
21.         op_Modulus = "__ModMeta",
22.     op_BitwiseAnd = "__BandMeta",
23.     op_BitwiseOr = "__BorMeta",
24.     op_ExclusiveOr = "__BxorMeta",
25.     op_OnesComplement = "__BnotMeta",
26.     op_LeftShift = "__ShlMeta",
27.     op_RightShift = "__ShrMeta",
28. }
30. local OpCallNameMap = {
31.     op_Addition = "+",
32.         op_Subtraction = "-",
33.         op_Multiply = "*",
34.         op_Division = "/",
35.         op_Equality = "==",
36.         op_UnaryNegation = "-",
37.         op_LessThan = "<",
38.         op_LessThanOrEqual = "<=",
39.         op_Modulus = "%",
40.         op_BitwiseAnd = "&",
41.     op_BitwiseOr = "|",
42.     op_ExclusiveOr = "^",
43.     op_OnesComplement = "~",
44.     op_LeftShift = "<<",
45.     op_RightShift = ">>",
46. }
48. local obj_method_count = 0
49. local obj_getter_count = 0
50. local obj_setter_count = 0
51. local meta_func_count = operators.Count
52. local cls_field_count = 1
53. local cls_getter_count = 0
54. local cls_setter_count = 0
56. ForEachCsList(methods, function(method)
57.     if method.IsStatic then
58.             cls_field_count = cls_field_count + 1
59.         else
60.             obj_method_count = obj_method_count + 1
61.     end
62. end)
64. ForEachCsList(events, function(event)
65.     if event.IsStatic then
66.             cls_field_count = cls_field_count + 1
67.         else
68.             obj_method_count = obj_method_count + 1
69.     end
70. end)
72. ForEachCsList(getters, function(getter)
73.     if getter.IsStatic then
74.             if getter.ReadOnly then
75.                 cls_field_count = cls_field_count + 1
76.             else
77.                     cls_getter_count = cls_getter_count + 1
78.                 end
79.         else
80.             obj_getter_count = obj_getter_count + 1
81.     end
82. end)
84. ForEachCsList(setters, function(setter)
85.     if setter.IsStatic then
86.             cls_setter_count = cls_setter_count + 1
87.         else
88.             obj_setter_count = obj_setter_count + 1
89.     end
90. end)
92. ForEachCsList(lazymembers, function(lazymember)
93.     if lazymember.IsStatic == 'true' then
94.             if 'CLS_IDX' == lazymember.Index then
95.                     cls_field_count = cls_field_count + 1
96.             elseif 'CLS_GETTER_IDX' == lazymember.Index then
97.                     cls_getter_count = cls_getter_count + 1
98.                 elseif 'CLS_SETTER_IDX' == lazymember.Index then
99.                     cls_setter_count = cls_setter_count + 1
100.                 end
101.         else
102.                 if 'METHOD_IDX' == lazymember.Index then
103.                     obj_method_count = obj_method_count + 1
104.             elseif 'GETTER_IDX' == lazymember.Index then
105.                     obj_getter_count = obj_getter_count + 1
106.                 elseif 'SETTER_IDX' == lazymember.Index then
107.                     obj_setter_count = obj_setter_count + 1
108.                 end
109.         end
110. end)
112. local generic_arg_list, type_constraints = GenericArgumentList(type)
115. table.insert(__text_gen, "\r\nnamespace XLua.CSObjectWrap\r\n{\r\n    using Utils = XLua.Utils;\r\n    public class ")
116. table.insert(__text_gen, tostring(CSVariableName(type)))
117. table.insert(__text_gen, "Wrap")
118. table.insert(__text_gen, tostring(generic_arg_list))
119. table.insert(__text_gen, " ")
120. table.insert(__text_gen, tostring(type_constraints))
121. table.insert(__text_gen, "\r\n    {\r\n        public static void __Register(RealStatePtr L)\r\n        {\r\n\t\t\tObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);\r\n\t\t\tSystem.Type type = typeof(")
122. table.insert(__text_gen, tostring(CsFullTypeName(type)))
123. table.insert(__text_gen, ");\r\n\t\t\tUtils.BeginObjectRegister(type, L, translator, ")
124. table.insert(__text_gen, tostring(meta_func_count))
125. table.insert(__text_gen, ", ")
126. table.insert(__text_gen, tostring(obj_method_count))
127. table.insert(__text_gen, ", ")
128. table.insert(__text_gen, tostring(obj_getter_count))
129. table.insert(__text_gen, ", ")
130. table.insert(__text_gen, tostring(obj_setter_count))
131. table.insert(__text_gen, ");\r\n\t\t\t")
132. ForEachCsList(operators, function(operator)
133. table.insert(__text_gen, "Utils.RegisterFunc(L, Utils.OBJ_META_IDX, "")
134. table.insert(__text_gen, tostring((OpNameMap[operator.Name]):gsub('Meta', ''):lower()))
135. table.insert(__text_gen, "", ")
136. table.insert(__text_gen, tostring(OpNameMap[operator.Name]))
137. table.insert(__text_gen, ");\r\n            ")
138. end)
139. table.insert(__text_gen, "\r\n\t\t\t")
140. ForEachCsList(methods, function(method) if not method.IsStatic then
141. table.insert(__text_gen, "Utils.RegisterFunc(L, Utils.METHOD_IDX, "")
142. table.insert(__text_gen, tostring(method.Name))
143. table.insert(__text_gen, "", _m_")
144. table.insert(__text_gen, tostring(method.Name))
145. table.insert(__text_gen, ");\r\n\t\t\t")
146. end end)
147. table.insert(__text_gen, "\r\n\t\t\t")
148. ForEachCsList(events, function(event) if not event.IsStatic then
149. table.insert(__text_gen, "Utils.RegisterFunc(L, Utils.METHOD_IDX, "")
150. table.insert(__text_gen, tostring(event.Name))
151. table.insert(__text_gen, "", _e_")
152. table.insert(__text_gen, tostring(event.Name))
153. table.insert(__text_gen, ");\r\n\t\t\t")
154. end end)
155. table.insert(__text_gen, "\r\n\t\t\t")
156. ForEachCsList(getters, function(getter) if not getter.IsStatic then
157. table.insert(__text_gen, "Utils.RegisterFunc(L, Utils.GETTER_IDX, "")
158. table.insert(__text_gen, tostring(getter.Name))
159. table.insert(__text_gen, "", _g_get_")
160. table.insert(__text_gen, tostring(getter.Name))
161. table.insert(__text_gen, ");\r\n            ")
162. end end)
163. table.insert(__text_gen, "\r\n\t\t\t")
164. ForEachCsList(setters, function(setter) if not setter.IsStatic then
165. table.insert(__text_gen, "Utils.RegisterFunc(L, Utils.SETTER_IDX, "")
166. table.insert(__text_gen, tostring(setter.Name))
167. table.insert(__text_gen, "", _s_set_")
168. table.insert(__text_gen, tostring(setter.Name))
169. table.insert(__text_gen, ");\r\n            ")
170. end end)
171. table.insert(__text_gen, "\r\n\t\t\t")
172. ForEachCsList(lazymembers, function(lazymember) if lazymember.IsStatic == 'false' then
173. table.insert(__text_gen, "Utils.RegisterLazyFunc(L, Utils.")
174. table.insert(__text_gen, tostring(lazymember.Index))
175. table.insert(__text_gen, ", "")
176. table.insert(__text_gen, tostring(lazymember.Name))
177. table.insert(__text_gen, "", type, ")
178. table.insert(__text_gen, tostring(lazymember.MemberType))
179. table.insert(__text_gen, ", ")
180. table.insert(__text_gen, tostring(lazymember.IsStatic))
181. table.insert(__text_gen, ");\r\n            ")
182. end end)
183. table.insert(__text_gen, "\r\n\t\t\tUtils.EndObjectRegister(type, L, translator, ")
184. if type.IsArray or ((indexers.Count or 0) > 0) then
185. table.insert(__text_gen, "__CSIndexer")
186. else
187. table.insert(__text_gen, "null")
188. end
189. table.insert(__text_gen, ", ")
190. if type.IsArray or ((newindexers.Count or 0) > 0) then
191. table.insert(__text_gen, "__NewIndexer")
192. else
193. table.insert(__text_gen, "null")
194. end
195. table.insert(__text_gen, ",\r\n\t\t\t    null, null, null);\r\n\r\n\t\t    Utils.BeginClassRegister(type, L, __CreateInstance, ")
196. table.insert(__text_gen, tostring(cls_field_count))
197. table.insert(__text_gen, ", ")
198. table.insert(__text_gen, tostring(cls_getter_count))
199. table.insert(__text_gen, ", ")
200. table.insert(__text_gen, tostring(cls_setter_count))
201. table.insert(__text_gen, ");\r\n\t\t\t")
202. ForEachCsList(methods, function(method) if method.IsStatic then
203. table.insert(__text_gen, "Utils.RegisterFunc(L, Utils.CLS_IDX, "")
204. table.insert(__text_gen, tostring(method.Overloads[0].Name))
205. table.insert(__text_gen, "", _m_")
206. table.insert(__text_gen, tostring(method.Name))
207. table.insert(__text_gen, ");\r\n            ")
208. end end)
209. table.insert(__text_gen, "\r\n\t\t\t")
210. ForEachCsList(events, function(event) if event.IsStatic then
211. table.insert(__text_gen, "Utils.RegisterFunc(L, Utils.CLS_IDX, "")
212. table.insert(__text_gen, tostring(event.Name))
213. table.insert(__text_gen, "", _e_")
214. table.insert(__text_gen, tostring(event.Name))
215. table.insert(__text_gen, ");\r\n\t\t\t")
216. end end)
217. table.insert(__text_gen, "\r\n            ")
218. ForEachCsList(getters, function(getter) if getter.IsStatic and getter.ReadOnly then
219. table.insert(__text_gen, "Utils.RegisterObject(L, translator, Utils.CLS_IDX, "")
220. table.insert(__text_gen, tostring(getter.Name))
221. table.insert(__text_gen, "", ")
222. table.insert(__text_gen, tostring(CsFullTypeName(type).."."..getter.Name))
223. table.insert(__text_gen, ");\r\n            ")
224. end end)
225. table.insert(__text_gen, "\r\n\t\t\t")
226. ForEachCsList(getters, function(getter) if getter.IsStatic and (not getter.ReadOnly) then
227. table.insert(__text_gen, "Utils.RegisterFunc(L, Utils.CLS_GETTER_IDX, "")
228. table.insert(__text_gen, tostring(getter.Name))
229. table.insert(__text_gen, "", _g_get_")
230. table.insert(__text_gen, tostring(getter.Name))
231. table.insert(__text_gen, ");\r\n            ")
232. end end)
233. table.insert(__text_gen, "\r\n\t\t\t")
234. ForEachCsList(setters, function(setter) if setter.IsStatic then
235. table.insert(__text_gen, "Utils.RegisterFunc(L, Utils.CLS_SETTER_IDX, "")
236. table.insert(__text_gen, tostring(setter.Name))
237. table.insert(__text_gen, "", _s_set_")
238. table.insert(__text_gen, tostring(setter.Name))
239. table.insert(__text_gen, ");\r\n            ")
240. end end)
241. table.insert(__text_gen, "\r\n\t\t\t")
242. ForEachCsList(lazymembers, function(lazymember) if lazymember.IsStatic == 'true' then
243. table.insert(__text_gen, "Utils.RegisterLazyFunc(L, Utils.")
244. table.insert(__text_gen, tostring(lazymember.Index))
245. table.insert(__text_gen, ", "")
246. table.insert(__text_gen, tostring(lazymember.Name))
247. table.insert(__text_gen, "", type, ")
248. table.insert(__text_gen, tostring(lazymember.MemberType))
249. table.insert(__text_gen, ", ")
250. table.insert(__text_gen, tostring(lazymember.IsStatic))
251. table.insert(__text_gen, ");\r\n            ")
252. end end)
253. table.insert(__text_gen, "\r\n\t\t\tUtils.EndClassRegister(type, L, translator);\r\n        }\r\n        \r\n        [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]\r\n        static int __CreateInstance(RealStatePtr L)\r\n        {\r\n            ")
255.             if constructors.Count == 0 and (not type.IsValueType)  then
256.             
257. table.insert(__text_gen, "return LuaAPI.luaL_error(L, "")
258. table.insert(__text_gen, tostring(CsFullTypeName(type)))
259. table.insert(__text_gen, " does not have a constructor!");")
261.             else
262. table.insert(__text_gen, "\r\n\t\t\ttry {\r\n                ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);\r\n\t\t\t\t")
264.                                 local hasZeroParamsCtor = false
265.                                 ForEachCsList(constructors, function(constructor, ci)
266.                                         local parameters = constructor:GetParameters()
267.                                         if parameters.Length == 0 then
268.                                             hasZeroParamsCtor = true
269.                                         end
270.                                         local def_count = constructor_def_vals[ci]
271.                                         local param_count = parameters.Length
272.                                         local in_num = CalcCsList(parameters, function(p) return not (p.IsOut and p.ParameterType.IsByRef) end)
273.                     local out_num = CalcCsList(parameters, function(p) return p.IsOut or p.ParameterType.IsByRef end)
274.                                         local real_param_count = param_count - def_count
275.                     local has_v_params = param_count > 0 and IsParams(parameters[param_count - 1])
276.                                         local in_pos = 0
277.                                
278. table.insert(__text_gen, "if(LuaAPI.lua_gettop(L) ")
279. table.insert(__text_gen, tostring(has_v_params and ">=" or "=="))
280. table.insert(__text_gen, " ")
281. table.insert(__text_gen, tostring(in_num + 1 - def_count - (has_v_params and 1 or 0)))
282. ForEachCsList(parameters, function(parameter, pi)
283.                 if pi >= real_param_count then return end
284.                 local parameterType = parameter.ParameterType
285.                 if has_v_params and pi == param_count - 1 then  parameterType = parameterType:GetElementType() end
286.                                 if not (parameter.IsOut and parameter.ParameterType.IsByRef) then in_pos = in_pos + 1
287.                
288. table.insert(__text_gen, " && ")
289. table.insert(__text_gen, tostring(GetCheckStatement(parameterType, in_pos+1, has_v_params and pi == param_count - 1)))
291.                                 end
292.                                 end)
293. table.insert(__text_gen, ")\r\n\t\t\t\t{\r\n\t\t\t\t\t")
294. ForEachCsList(parameters, function(parameter, pi)
295.                     if pi >= real_param_count then return end
296.                     
297. table.insert(__text_gen, tostring(GetCasterStatement(parameter.ParameterType, pi+2, LocalName(parameter.Name), true, has_v_params and pi == param_count - 1)))
298. table.insert(__text_gen, ";\r\n\t\t\t\t\t")
299. end)
300. table.insert(__text_gen, "\r\n\t\t\t\t\tvar gen_ret = new ")
301. table.insert(__text_gen, tostring(CsFullTypeName(type)))
302. table.insert(__text_gen, "(")
303. ForEachCsList(parameters, function(parameter, pi) if pi >= real_param_count then return end; if pi ~=0 then
304. table.insert(__text_gen, tostring(', '))
305. end ;if parameter.IsOut and parameter.ParameterType.IsByRef then
306. table.insert(__text_gen, "out ")
307. elseif parameter.ParameterType.IsByRef and not parameter.IsIn then
308. table.insert(__text_gen, "ref ")
309. end
310. table.insert(__text_gen, tostring(LocalName(parameter.Name)))
311. end)
312. table.insert(__text_gen, ");\r\n\t\t\t\t\t")
313. table.insert(__text_gen, tostring(GetPushStatement(type, "gen_ret")))
314. table.insert(__text_gen, ";\r\n                    ")
315. local in_pos = 0
316.                     ForEachCsList(parameters, function(parameter, pi)
317.                         if pi >= real_param_count then return end
318.                         if not (parameter.IsOut and parameter.ParameterType.IsByRef) then
319.                             in_pos = in_pos + 1
320.                         end
321.                         if parameter.ParameterType.IsByRef then
322.                         
323. table.insert(__text_gen, tostring(GetPushStatement(parameter.ParameterType:GetElementType(), LocalName(parameter.Name))))
324. table.insert(__text_gen, ";\r\n                        ")
325. if not parameter.IsOut and parameter.ParameterType.IsByRef and NeedUpdate(parameter.ParameterType) then
326.                   
327. table.insert(__text_gen, tostring(GetUpdateStatement(parameter.ParameterType:GetElementType(), in_pos+1, LocalName(parameter.Name))))
328. table.insert(__text_gen, ";\r\n                        ")
329. end
330. table.insert(__text_gen, "\r\n                    ")
332.                         end
333.                     end)
334.                     
335. table.insert(__text_gen, "\r\n\t\t\t\t\treturn ")
336. table.insert(__text_gen, tostring(out_num + 1))
337. table.insert(__text_gen, ";\r\n\t\t\t\t}\r\n\t\t\t\t")
338. end)
339.                                 if (not hasZeroParamsCtor) and type.IsValueType then
340.                                
341. table.insert(__text_gen, "\r\n\t\t\t\tif (LuaAPI.lua_gettop(L) == 1)\r\n\t\t\t\t{\r\n\t\t\t\t    ")
342. table.insert(__text_gen, tostring(GetPushStatement(type, "default(" .. CsFullTypeName(type).. ")")))
343. table.insert(__text_gen, ";\r\n\t\t\t        return 1;\r\n\t\t\t\t}\r\n\t\t\t\t")
344. end
345. table.insert(__text_gen, "\r\n\t\t\t}\r\n\t\t\tcatch(System.Exception gen_e) {\r\n\t\t\t\treturn LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n\t\t\t}\r\n            return LuaAPI.luaL_error(L, "invalid arguments to ")
346. table.insert(__text_gen, tostring(CsFullTypeName(type)))
347. table.insert(__text_gen, " constructor!");\r\n            ")
348. end
349. table.insert(__text_gen, "\r\n        }\r\n        \r\n\t\t")
350. if type.IsArray or ((indexers.Count or 0) > 0) then
351. table.insert(__text_gen, "\r\n        [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]\r\n        public static int __CSIndexer(RealStatePtr L)\r\n        {\r\n\t\t\t")
352. if type.IsArray then
353. table.insert(__text_gen, "\r\n\t\t\ttry {\r\n\t\t\t    ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);\r\n\t\t\t\r\n\t\t\t\tif (")
354. table.insert(__text_gen, tostring(GetCheckStatement(type, 1)))
355. table.insert(__text_gen, " && LuaAPI.lua_isnumber(L, 2))\r\n\t\t\t\t{\r\n\t\t\t\t\tint index = (int)LuaAPI.lua_tonumber(L, 2);\r\n\t\t\t\t\t")
356. table.insert(__text_gen, tostring(GetSelfStatement(type)))
357. table.insert(__text_gen, ";\r\n\t\t\t\t\tLuaAPI.lua_pushboolean(L, true);\r\n\t\t\t\t\t")
358. table.insert(__text_gen, tostring(GetPushStatement(type:GetElementType(), "gen_to_be_invoked[index]")))
359. table.insert(__text_gen, ";\r\n\t\t\t\t\treturn 2;\r\n\t\t\t\t}\r\n\t\t\t}\r\n\t\t\tcatch(System.Exception gen_e) {\r\n\t\t\t\treturn LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n\t\t\t}\r\n\t\t\t")
360. elseif indexers.Count > 0 then
361.                        
362. table.insert(__text_gen, "try {\r\n\t\t\t    ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);\r\n\t\t\t\t")
364.                                         ForEachCsList(indexers, function(indexer)
365.                                                 local paramter = indexer:GetParameters()[0]
366.                                
367. table.insert(__text_gen, "\r\n\t\t\t\tif (")
368. table.insert(__text_gen, tostring(GetCheckStatement(type, 1)))
369. table.insert(__text_gen, " && ")
370. table.insert(__text_gen, tostring(GetCheckStatement(paramter.ParameterType, 2)))
371. table.insert(__text_gen, ")\r\n\t\t\t\t{\r\n\t\t\t\t\t\r\n\t\t\t\t\t")
372. table.insert(__text_gen, tostring(GetSelfStatement(type)))
373. table.insert(__text_gen, ";\r\n\t\t\t\t\t")
374. table.insert(__text_gen, tostring(GetCasterStatement(paramter.ParameterType, 2, "index", true)))
375. table.insert(__text_gen, ";\r\n\t\t\t\t\tLuaAPI.lua_pushboolean(L, true);\r\n\t\t\t\t\t")
376. table.insert(__text_gen, tostring(GetPushStatement(indexer.ReturnType, "gen_to_be_invoked[index]")))
377. table.insert(__text_gen, ";\r\n\t\t\t\t\treturn 2;\r\n\t\t\t\t}\r\n\t\t\t\t")
378. end)
379. table.insert(__text_gen, "\r\n\t\t\t}\r\n\t\t\tcatch(System.Exception gen_e) {\r\n\t\t\t\treturn LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n\t\t\t}\r\n\t\t\t")
380. end
381. table.insert(__text_gen, "\r\n            LuaAPI.lua_pushboolean(L, false);\r\n\t\t\treturn 1;\r\n        }\r\n\t\t")
382. end
383. table.insert(__text_gen, "\r\n        \r\n\t\t")
384. if type.IsArray or ((newindexers.Count or 0) > 0) then
385. table.insert(__text_gen, "\r\n        [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]\r\n        public static int __NewIndexer(RealStatePtr L)\r\n        {\r\n\t\t\t")
386. if type.IsArray or newindexers.Count > 0 then
387. table.insert(__text_gen, "ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);")
388. end
389. table.insert(__text_gen, "\r\n\t\t\t")
390. if type.IsArray then
391.                                 local elementType = type:GetElementType()
392.                        
393. table.insert(__text_gen, "\r\n\t\t\ttry {\r\n\t\t\t\tif (")
394. table.insert(__text_gen, tostring(GetCheckStatement(type, 1)))
395. table.insert(__text_gen, " && LuaAPI.lua_isnumber(L, 2) && ")
396. table.insert(__text_gen, tostring(GetCheckStatement(elementType, 3)))
397. table.insert(__text_gen, ")\r\n\t\t\t\t{\r\n\t\t\t\t\tint index = (int)LuaAPI.lua_tonumber(L, 2);\r\n\t\t\t\t\t")
398. table.insert(__text_gen, tostring(GetSelfStatement(type)))
399. table.insert(__text_gen, ";\r\n\t\t\t\t\t")
400. table.insert(__text_gen, tostring(GetCasterStatement(elementType, 3, "gen_to_be_invoked[index]")))
401. table.insert(__text_gen, ";\r\n\t\t\t\t\tLuaAPI.lua_pushboolean(L, true);\r\n\t\t\t\t\treturn 1;\r\n\t\t\t\t}\r\n\t\t\t}\r\n\t\t\tcatch(System.Exception gen_e) {\r\n\t\t\t\treturn LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n\t\t\t}\r\n\t\t\t")
402. elseif newindexers.Count > 0 then
403. table.insert(__text_gen, "\r\n\t\t\ttry {\r\n\t\t\t\t")
404. ForEachCsList(newindexers, function(newindexer)
405.                                                 local keyType = newindexer:GetParameters()[0].ParameterType
406.                                                 local valueType = newindexer:GetParameters()[1].ParameterType
407.                                
408. table.insert(__text_gen, "\r\n\t\t\t\tif (")
409. table.insert(__text_gen, tostring(GetCheckStatement(type, 1)))
410. table.insert(__text_gen, " && ")
411. table.insert(__text_gen, tostring(GetCheckStatement(keyType, 2)))
412. table.insert(__text_gen, " && ")
413. table.insert(__text_gen, tostring(GetCheckStatement(valueType, 3)))
414. table.insert(__text_gen, ")\r\n\t\t\t\t{\r\n\t\t\t\t\t\r\n\t\t\t\t\t")
415. table.insert(__text_gen, tostring(GetSelfStatement(type)))
416. table.insert(__text_gen, ";\r\n\t\t\t\t\t")
417. table.insert(__text_gen, tostring(GetCasterStatement(keyType, 2, "key", true)))
418. table.insert(__text_gen, ";\r\n\t\t\t\t\t")
419. if IsStruct(valueType) then
420. table.insert(__text_gen, tostring(GetCasterStatement(valueType, 3, "gen_value", true)))
421. table.insert(__text_gen, ";\r\n\t\t\t\t\tgen_to_be_invoked[key] = gen_value;")
422. else
423.                   
424. table.insert(__text_gen, tostring(GetCasterStatement(valueType, 3, "gen_to_be_invoked[key]")))
425. table.insert(__text_gen, ";")
426. end
427. table.insert(__text_gen, "\r\n\t\t\t\t\tLuaAPI.lua_pushboolean(L, true);\r\n\t\t\t\t\treturn 1;\r\n\t\t\t\t}\r\n\t\t\t\t")
428. end)
429. table.insert(__text_gen, "\r\n\t\t\t}\r\n\t\t\tcatch(System.Exception gen_e) {\r\n\t\t\t\treturn LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n\t\t\t}\r\n\t\t\t")
430. end
431. table.insert(__text_gen, "\r\n\t\t\tLuaAPI.lua_pushboolean(L, false);\r\n            return 1;\r\n        }\r\n\t\t")
432. end
433. table.insert(__text_gen, "\r\n        \r\n        ")
434. ForEachCsList(operators, function(operator)
435. table.insert(__text_gen, "\r\n        [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]\r\n        static int ")
436. table.insert(__text_gen, tostring(OpNameMap[operator.Name]))
437. table.insert(__text_gen, "(RealStatePtr L)\r\n        {\r\n            ")
438. if operator.Name ~= "op_UnaryNegation" and operator.Name ~= "op_OnesComplement"  then
439. table.insert(__text_gen, "\r\n\t\t\ttry {\r\n                ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);\r\n            ")
440. ForEachCsList(operator.Overloads, function(overload)
441.                 local left_param = overload:GetParameters()[0]
442.                 local right_param = overload:GetParameters()[1]
443.             
444. table.insert(__text_gen, "\r\n\t\t\t\r\n\t\t\t\tif (")
445. table.insert(__text_gen, tostring(GetCheckStatement(left_param.ParameterType, 1)))
446. table.insert(__text_gen, " && ")
447. table.insert(__text_gen, tostring(GetCheckStatement(right_param.ParameterType, 2)))
448. table.insert(__text_gen, ")\r\n\t\t\t\t{\r\n\t\t\t\t\t")
449. table.insert(__text_gen, tostring(GetCasterStatement(left_param.ParameterType, 1, "leftside", true)))
450. table.insert(__text_gen, ";\r\n\t\t\t\t\t")
451. table.insert(__text_gen, tostring(GetCasterStatement(right_param.ParameterType, 2, "rightside", true)))
452. table.insert(__text_gen, ";\r\n\t\t\t\t\t\r\n\t\t\t\t\t")
453. table.insert(__text_gen, tostring(GetPushStatement(overload.ReturnType, "leftside " .. OpCallNameMap[operator.Name] .. " rightside")))
454. table.insert(__text_gen, ";\r\n\t\t\t\t\t\r\n\t\t\t\t\treturn 1;\r\n\t\t\t\t}\r\n            ")
455. end)
456. table.insert(__text_gen, "\r\n\t\t\t}\r\n\t\t\tcatch(System.Exception gen_e) {\r\n\t\t\t\treturn LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n\t\t\t}\r\n            return LuaAPI.luaL_error(L, "invalid arguments to right hand of ")
457. table.insert(__text_gen, tostring(OpCallNameMap[operator.Name]))
458. table.insert(__text_gen, " operator, need ")
459. table.insert(__text_gen, tostring(CsFullTypeName(type)))
460. table.insert(__text_gen, "!");\r\n            ")
461. else
462. table.insert(__text_gen, "\r\n\t\t\tObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);\r\n            try {\r\n                ")
463. table.insert(__text_gen, tostring(GetCasterStatement(type, 1, "rightside", true)))
464. table.insert(__text_gen, ";\r\n                ")
465. table.insert(__text_gen, tostring(GetPushStatement(operator.Overloads[0].ReturnType, OpCallNameMap[operator.Name] .. " rightside")))
466. table.insert(__text_gen, ";\r\n            } catch(System.Exception gen_e) {\r\n                return LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n            }\r\n            return 1;\r\n            ")
467. end
468. table.insert(__text_gen, "\r\n        }\r\n        ")
469. end)
470. table.insert(__text_gen, "\r\n        \r\n        ")
471. ForEachCsList(methods, function(method)
472. table.insert(__text_gen, "\r\n        [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]\r\n        static int _m_")
473. table.insert(__text_gen, tostring(method.Name))
474. table.insert(__text_gen, "(RealStatePtr L)\r\n        {\r\n\t\t    try {\r\n            ")
476.             local need_obj = not method.IsStatic
477.             if MethodCallNeedTranslator(method) then
478.             
479. table.insert(__text_gen, "\r\n                ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);\r\n            ")
480. end
481. table.insert(__text_gen, "\r\n            ")
482. if need_obj then
483. table.insert(__text_gen, "\r\n                ")
484. table.insert(__text_gen, tostring(GetSelfStatement(type)))
485. table.insert(__text_gen, ";\r\n            ")
486. end
487. table.insert(__text_gen, "\r\n            ")
488. if method.Overloads.Count > 1 then
489. table.insert(__text_gen, "\r\n\t\t\t    int gen_param_count = LuaAPI.lua_gettop(L);\r\n            ")
490. end
491. table.insert(__text_gen, "\r\n                ")
492. ForEachCsList(method.Overloads, function(overload, oi)
493.                 local parameters = MethodParameters(overload)
494.                 local in_num = CalcCsList(parameters, function(p) return not (p.IsOut and p.ParameterType.IsByRef) end)
495.                 local param_offset = method.IsStatic and 0 or 1
496.                 local out_num = CalcCsList(parameters, function(p) return p.IsOut or p.ParameterType.IsByRef end)
497.                 local in_pos = 0
498.                 local has_return = (overload.ReturnType.FullName ~= "System.Void")
499.                 local def_count = method.DefaultValues[oi]
500.                                 local param_count = parameters.Length
501.                 local real_param_count = param_count - def_count
502.                 local has_v_params = param_count > 0 and IsParams(parameters[param_count - 1])
503.                 if method.Overloads.Count > 1 then
504.                
505. table.insert(__text_gen, "if(gen_param_count ")
506. table.insert(__text_gen, tostring(has_v_params and ">=" or "=="))
507. table.insert(__text_gen, " ")
508. table.insert(__text_gen, tostring(in_num+param_offset-def_count - (has_v_params and 1 or 0)))
510.                     ForEachCsList(parameters, function(parameter, pi)
511.                         if pi >= real_param_count then return end
512.                         local parameterType = parameter.ParameterType
513.                         if has_v_params and pi == param_count - 1 then  parameterType = parameterType:GetElementType() end
514.                         if not (parameter.IsOut and parameter.ParameterType.IsByRef) then in_pos = in_pos + 1;
515.                         
516. table.insert(__text_gen, "&& ")
517. table.insert(__text_gen, tostring(GetCheckStatement(parameterType , in_pos+param_offset, has_v_params and pi == param_count - 1)))
519.                         end
520.                     end)
521. table.insert(__text_gen, ") ")
522. end
523. table.insert(__text_gen, "\r\n                {\r\n                    ")
524. if overload.Name == "get_Item" and overload.IsSpecialName then
525.                                             local keyType = overload:GetParameters()[0].ParameterType
526. table.insert(__text_gen, "\r\n\t\t\t\t\t")
527. table.insert(__text_gen, tostring(GetCasterStatement(keyType, 2, "key", true)))
528. table.insert(__text_gen, ";\r\n\t\t\t\t\t")
529. table.insert(__text_gen, tostring(GetPushStatement(overload.ReturnType, "gen_to_be_invoked[key]")))
530. table.insert(__text_gen, ";\r\n\t\t\t\t\t")
531. elseif overload.Name == "set_Item" and overload.IsSpecialName then
532.                                             local keyType = overload:GetParameters()[0].ParameterType
533.                                                 local valueType = overload:GetParameters()[1].ParameterType
534. table.insert(__text_gen, "\r\n\t\t\t\t\t")
535. table.insert(__text_gen, tostring(GetCasterStatement(keyType, 2, "key", true)))
536. table.insert(__text_gen, ";\r\n\t\t\t\t\t")
537. table.insert(__text_gen, tostring(GetCasterStatement(valueType, 3, "gen_value", true)))
538. table.insert(__text_gen, ";\r\n                    gen_to_be_invoked[key] = gen_value;\r\n                    ")
539. else
540.                     in_pos = 0;
541.                     ForEachCsList(parameters, function(parameter, pi)
542.                         if pi >= real_param_count then return end
543.                         
544. if not (parameter.IsOut and parameter.ParameterType.IsByRef) then
545.                             in_pos = in_pos + 1
546.                         
547. table.insert(__text_gen, tostring(GetCasterStatement(parameter.ParameterType, in_pos+param_offset, LocalName(parameter.Name), true, has_v_params and pi == param_count - 1)))
549.                                             else
550. table.insert(__text_gen, tostring(CsFullTypeName(parameter.ParameterType)))
551. table.insert(__text_gen, " ")
552. table.insert(__text_gen, tostring(LocalName(parameter.Name)))
553. end
554. table.insert(__text_gen, ";\r\n                    ")
555. end)
556. table.insert(__text_gen, "\r\n                    ")
558.                     if has_return then
559.                         
560. table.insert(__text_gen, "    var gen_ret = ")
562.                     end
563.                     
564. if method.IsStatic then
565.                     
566. table.insert(__text_gen, tostring(CsFullTypeName(type).."."..UnK(overload.Name)))
568.                     else
569.                     
570. table.insert(__text_gen, "gen_to_be_invoked.")
571. table.insert(__text_gen, tostring(UnK(overload.Name)))
573.                     end
574. table.insert(__text_gen, "( ")
575. ForEachCsList(parameters, function(parameter, pi)
576.                         if pi >= real_param_count then return end
577.                         if pi ~= 0 then
578. table.insert(__text_gen, ", ")
579. end; if parameter.IsOut and parameter.ParameterType.IsByRef then
580. table.insert(__text_gen, "out ")
581. elseif parameter.ParameterType.IsByRef and not parameter.IsIn then
582. table.insert(__text_gen, "ref ")
583. end
584. table.insert(__text_gen, tostring(LocalName(parameter.Name)))
585. end)
586. table.insert(__text_gen, " );\r\n                    ")
588.                     if has_return then
589.                     
590. table.insert(__text_gen, "    ")
591. table.insert(__text_gen, tostring(GetPushStatement(overload.ReturnType, "gen_ret")))
592. table.insert(__text_gen, ";\r\n                    ")
594.                     end
595.                     local in_pos = 0
596.                     ForEachCsList(parameters, function(parameter, pi)
597.                         if pi >= real_param_count then return end
598.                         if not (parameter.IsOut and parameter.ParameterType.IsByRef) then
599.                             in_pos = in_pos + 1
600.                         end
601.                         if parameter.ParameterType.IsByRef then
602.                         
603. table.insert(__text_gen, tostring(GetPushStatement(parameter.ParameterType:GetElementType(), LocalName(parameter.Name))))
604. table.insert(__text_gen, ";\r\n                        ")
605. if not parameter.IsOut and parameter.ParameterType.IsByRef and NeedUpdate(parameter.ParameterType) then
606.                   
607. table.insert(__text_gen, tostring(GetUpdateStatement(parameter.ParameterType:GetElementType(), in_pos+param_offset, LocalName(parameter.Name))))
608. table.insert(__text_gen, ";\r\n                        ")
609. end
610. table.insert(__text_gen, "\r\n                    ")
612.                         end
613.                     end)
614.                                         end
615.                     
616. table.insert(__text_gen, "\r\n                    ")
617. if NeedUpdate(type) and not method.IsStatic then
618. table.insert(__text_gen, "\r\n                        ")
619. table.insert(__text_gen, tostring(GetUpdateStatement(type, 1, "gen_to_be_invoked")))
620. table.insert(__text_gen, ";\r\n                    ")
621. end
622. table.insert(__text_gen, "\r\n                    \r\n                    return ")
623. table.insert(__text_gen, tostring(out_num+(has_return and 1 or 0)))
624. table.insert(__text_gen, ";\r\n                }\r\n                ")
625. end)
626. table.insert(__text_gen, "\r\n            } catch(System.Exception gen_e) {\r\n                return LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n            }\r\n            ")
627. if method.Overloads.Count > 1 then
628. table.insert(__text_gen, "\r\n            return LuaAPI.luaL_error(L, "invalid arguments to ")
629. table.insert(__text_gen, tostring(CsFullTypeName(type)))
630. table.insert(__text_gen, ".")
631. table.insert(__text_gen, tostring(method.Overloads[0].Name))
632. table.insert(__text_gen, "!");\r\n            ")
633. end
634. table.insert(__text_gen, "\r\n        }\r\n        ")
635. end)
636. table.insert(__text_gen, "\r\n        \r\n        \r\n        ")
637. ForEachCsList(getters, function(getter)
638.         if getter.IsStatic and getter.ReadOnly then return end --readonly static
639.         
640. table.insert(__text_gen, "\r\n        [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]\r\n        static int _g_get_")
641. table.insert(__text_gen, tostring(getter.Name))
642. table.insert(__text_gen, "(RealStatePtr L)\r\n        {\r\n\t\t    try {\r\n            ")
643. if AccessorNeedTranslator(getter) then
644. table.insert(__text_gen, "    ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);")
645. end
646. table.insert(__text_gen, "\r\n\t\t\t")
647. if not getter.IsStatic then
648. table.insert(__text_gen, "\r\n                ")
649. table.insert(__text_gen, tostring(GetSelfStatement(type)))
650. table.insert(__text_gen, ";\r\n                ")
651. table.insert(__text_gen, tostring(GetPushStatement(getter.Type, "gen_to_be_invoked."..UnK(getter.Name))))
652. table.insert(__text_gen, ";")
653. else
654. table.insert(__text_gen, "    ")
655. table.insert(__text_gen, tostring(GetPushStatement(getter.Type, CsFullTypeName(type).."."..UnK(getter.Name))))
656. table.insert(__text_gen, ";")
657. end
658. table.insert(__text_gen, "\r\n            } catch(System.Exception gen_e) {\r\n                return LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n            }\r\n            return 1;\r\n        }\r\n        ")
659. end)
660. table.insert(__text_gen, "\r\n        \r\n        ")
661. ForEachCsList(setters, function(setter)
662.         local is_struct = IsStruct(setter.Type)
663.         
664. table.insert(__text_gen, "\r\n        [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]\r\n        static int _s_set_")
665. table.insert(__text_gen, tostring(setter.Name))
666. table.insert(__text_gen, "(RealStatePtr L)\r\n        {\r\n\t\t    try {\r\n                ")
667. if AccessorNeedTranslator(setter) then
668. table.insert(__text_gen, "ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);")
669. end
670. table.insert(__text_gen, "\r\n\t\t\t")
671. if not setter.IsStatic then
672. table.insert(__text_gen, "\r\n                ")
673. table.insert(__text_gen, tostring(GetSelfStatement(type)))
674. table.insert(__text_gen, ";\r\n                ")
675. if is_struct then
676. table.insert(__text_gen, tostring(GetCasterStatement(setter.Type, 2, "gen_value", true)))
677. table.insert(__text_gen, ";\r\n\t\t\t\tgen_to_be_invoked.")
678. table.insert(__text_gen, tostring(UnK(setter.Name)))
679. table.insert(__text_gen, " = gen_value;")
680. else
681.               
682. table.insert(__text_gen, tostring(GetCasterStatement(setter.Type, 2, "gen_to_be_invoked." .. UnK(setter.Name))))
683. table.insert(__text_gen, ";")
684. end
685.             else
686.                                 if is_struct then
687. table.insert(__text_gen, tostring(GetCasterStatement(setter.Type, 1, "gen_value", true)))
688. table.insert(__text_gen, ";\r\n\t\t\t\t")
689. table.insert(__text_gen, tostring(CsFullTypeName(type)))
690. table.insert(__text_gen, ".")
691. table.insert(__text_gen, tostring(UnK(setter.Name)))
692. table.insert(__text_gen, " = gen_value;")
693. else
694.          
695. table.insert(__text_gen, "    ")
696. table.insert(__text_gen, tostring(GetCasterStatement(setter.Type, 1, CsFullTypeName(type) .."." .. UnK(setter.Name))))
697. table.insert(__text_gen, ";")
698. end
699.             end
700. table.insert(__text_gen, "\r\n            ")
701. if NeedUpdate(type) and not setter.IsStatic then
702. table.insert(__text_gen, "\r\n                ")
703. table.insert(__text_gen, tostring(GetUpdateStatement(type, 1, "gen_to_be_invoked")))
704. table.insert(__text_gen, ";\r\n            ")
705. end
706. table.insert(__text_gen, "\r\n            } catch(System.Exception gen_e) {\r\n                return LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n            }\r\n            return 0;\r\n        }\r\n        ")
707. end)
708. table.insert(__text_gen, "\r\n\t\t\r\n\t\t")
709. ForEachCsList(events, function(event) if not event.IsStatic then
710. table.insert(__text_gen, "\r\n        [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]\r\n        static int _e_")
711. table.insert(__text_gen, tostring(event.Name))
712. table.insert(__text_gen, "(RealStatePtr L)\r\n        {\r\n\t\t    try {\r\n                ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);\r\n\t\t\t    int gen_param_count = LuaAPI.lua_gettop(L);\r\n\t\t\t")
713. table.insert(__text_gen, tostring(GetSelfStatement(type)))
714. table.insert(__text_gen, ";\r\n                ")
715. table.insert(__text_gen, tostring(GetCasterStatement(event.Type, 3, "gen_delegate", true)))
716. table.insert(__text_gen, ";\r\n                if (gen_delegate == null) {\r\n                    return LuaAPI.luaL_error(L, "#3 need ")
717. table.insert(__text_gen, tostring(CsFullTypeName(event.Type)))
718. table.insert(__text_gen, "!");\r\n                }\r\n\t\t\t\t\r\n\t\t\t\tif (gen_param_count == 3)\r\n\t\t\t\t{\r\n\t\t\t\t\t")
719. if event.CanAdd then
720. table.insert(__text_gen, "\r\n\t\t\t\t\tif (LuaAPI.xlua_is_eq_str(L, 2, "+")) {\r\n\t\t\t\t\t\tgen_to_be_invoked.")
721. table.insert(__text_gen, tostring(UnK(event.Name)))
722. table.insert(__text_gen, " += gen_delegate;\r\n\t\t\t\t\t\treturn 0;\r\n\t\t\t\t\t} \r\n\t\t\t\t\t")
723. end
724. table.insert(__text_gen, "\r\n\t\t\t\t\t")
725. if event.CanRemove then
726. table.insert(__text_gen, "\r\n\t\t\t\t\tif (LuaAPI.xlua_is_eq_str(L, 2, "-")) {\r\n\t\t\t\t\t\tgen_to_be_invoked.")
727. table.insert(__text_gen, tostring(UnK(event.Name)))
728. table.insert(__text_gen, " -= gen_delegate;\r\n\t\t\t\t\t\treturn 0;\r\n\t\t\t\t\t} \r\n\t\t\t\t\t")
729. end
730. table.insert(__text_gen, "\r\n\t\t\t\t}\r\n\t\t\t} catch(System.Exception gen_e) {\r\n                return LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n            }\r\n\t\t\tLuaAPI.luaL_error(L, "invalid arguments to ")
731. table.insert(__text_gen, tostring(CsFullTypeName(type)))
732. table.insert(__text_gen, ".")
733. table.insert(__text_gen, tostring(event.Name))
734. table.insert(__text_gen, "!");\r\n            return 0;\r\n        }\r\n        ")
735. end end)
736. table.insert(__text_gen, "\r\n\t\t\r\n\t\t")
737. ForEachCsList(events, function(event) if event.IsStatic then
738. table.insert(__text_gen, "\r\n        [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]\r\n        static int _e_")
739. table.insert(__text_gen, tostring(event.Name))
740. table.insert(__text_gen, "(RealStatePtr L)\r\n        {\r\n\t\t    try {\r\n                ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L);\r\n\t\t\t    int gen_param_count = LuaAPI.lua_gettop(L);\r\n                ")
741. table.insert(__text_gen, tostring(GetCasterStatement(event.Type, 2, "gen_delegate", true)))
742. table.insert(__text_gen, ";\r\n                if (gen_delegate == null) {\r\n                    return LuaAPI.luaL_error(L, "#2 need ")
743. table.insert(__text_gen, tostring(CsFullTypeName(event.Type)))
744. table.insert(__text_gen, "!");\r\n                }\r\n                \r\n\t\t\t\t")
745. if event.CanAdd then
746. table.insert(__text_gen, "\r\n\t\t\t\tif (gen_param_count == 2 && LuaAPI.xlua_is_eq_str(L, 1, "+")) {\r\n\t\t\t\t\t")
747. table.insert(__text_gen, tostring(CsFullTypeName(type)))
748. table.insert(__text_gen, ".")
749. table.insert(__text_gen, tostring(UnK(event.Name)))
750. table.insert(__text_gen, " += gen_delegate;\r\n\t\t\t\t\treturn 0;\r\n\t\t\t\t} \r\n\t\t\t\t")
751. end
752. table.insert(__text_gen, "\r\n\t\t\t\t")
753. if event.CanRemove then
754. table.insert(__text_gen, "\r\n\t\t\t\tif (gen_param_count == 2 && LuaAPI.xlua_is_eq_str(L, 1, "-")) {\r\n\t\t\t\t\t")
755. table.insert(__text_gen, tostring(CsFullTypeName(type)))
756. table.insert(__text_gen, ".")
757. table.insert(__text_gen, tostring(UnK(event.Name)))
758. table.insert(__text_gen, " -= gen_delegate;\r\n\t\t\t\t\treturn 0;\r\n\t\t\t\t} \r\n\t\t\t\t")
759. end
760. table.insert(__text_gen, "\r\n\t\t\t} catch(System.Exception gen_e) {\r\n                return LuaAPI.luaL_error(L, "c# exception:" + gen_e);\r\n            }\r\n\t\t\treturn LuaAPI.luaL_error(L, "invalid arguments to ")
761. table.insert(__text_gen, tostring(CsFullTypeName(type)))
762. table.insert(__text_gen, ".")
763. table.insert(__text_gen, tostring(event.Name))
764. table.insert(__text_gen, "!");\r\n        }\r\n        ")
765. end end)
766. table.insert(__text_gen, "\r\n    }\r\n}\r\n")
767. return table.concat(__text_gen)

复制代码

1. 到这里看到模板在内存中对应变成了一个生成的方法，对应传进C#的替换字符。

复制代码

替换比力复杂不一一分析了。大概就是C#对应类的成员变量，静态方法等全部元数据替换成table的表里，一个循环遍历举行插入字符比如下面的GameObject的构造函数

免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！更多信息从访问主页：qidao123.com:ToB企服之家，中国第一个企服评测及商务社交产业平台。