IT评测·应用市场-qidao123.com

标题: Xlua原理 二 [打印本页]
作者: 花瓣小跑    时间: 2024-7-26 01:59
标题: 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企服之家，中国第一个企服评测及商务社交产业平台。



欢迎光临 IT评测·应用市场-qidao123.com (https://dis.qidao123.com/) Powered by Discuz! X3.4