#if USE_UNI_LUA using LuaAPI = UniLua.Lua; using RealStatePtr = UniLua.ILuaState; using LuaCSFunction = UniLua.CSharpFunctionDelegate; #else using LuaAPI = XLua.LuaDLL.Lua; using RealStatePtr = System.IntPtr; using LuaCSFunction = XLua.LuaDLL.lua_CSFunction; #endif using XLua; using System.Collections.Generic; <% require "TemplateCommon" local enum_or_op = debug.getmetatable(CS.System.Reflection.BindingFlags.Public).__bor %> namespace XLua.CSObjectWrap { using Utils = XLua.Utils; <%ForEachCsList(types, function(type) local fields = type:GetFields(enum_or_op(CS.System.Reflection.BindingFlags.Public, CS.System.Reflection.BindingFlags.Static)) %> public class <%=CSVariableName(type)%>Wrap { public static void __Register(RealStatePtr L) { ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L); Utils.BeginObjectRegister(typeof(<%=CsFullTypeName(type)%>), L, translator, 0, 0, 0, 0); Utils.EndObjectRegister(typeof(<%=CsFullTypeName(type)%>), L, translator, null, null, null, null, null); Utils.BeginClassRegister(typeof(<%=CsFullTypeName(type)%>), L, null, <%=fields.Length + 1%>, 0, 0); <% ForEachCsList(fields, function(field) if field.Name == "value__" or IsObsolute(field) then return end %> Utils.RegisterObject(L, translator, Utils.CLS_IDX, "<%=field.Name%>", <%=CsFullTypeName(type)%>.<%=UnK(field.Name)%>); <%end)%> Utils.RegisterFunc(L, Utils.CLS_IDX, "__CastFrom", __CastFrom); Utils.EndClassRegister(typeof(<%=CsFullTypeName(type)%>), L, translator); } [MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))] static int __CastFrom(RealStatePtr L) { ObjectTranslator translator = ObjectTranslatorPool.Instance.Find(L); LuaTypes lua_type = LuaAPI.lua_type(L, 1); if (lua_type == LuaTypes.LUA_TNUMBER) { translator.Push<%=CSVariableName(type)%>(L, (<%=CsFullTypeName(type)%>)LuaAPI.xlua_tointeger(L, 1)); } <%if fields.Length > 0 then%> else if(lua_type == LuaTypes.LUA_TSTRING) { <% local is_first = true ForEachCsList(fields, function(field, i) if field.Name == "value__" or IsObsolute(field) then return end %><%=(is_first and "" or "else ")%>if (LuaAPI.xlua_is_eq_str(L, 1, "<%=field.Name%>")) { translator.Push<%=CSVariableName(type)%>(L, <%=CsFullTypeName(type)%>.<%=UnK(field.Name)%>); } <% is_first = false end) %>else { return LuaAPI.luaL_error(L, "invalid string for <%=CsFullTypeName(type)%>!"); } } <%end%> else { return LuaAPI.luaL_error(L, "invalid lua type for <%=CsFullTypeName(type)%>! Expect number or string, got + " + lua_type); } return 1; } } <%end)%> }