private static void GenOverrideFunctionBody(string name, _MethodBase methodBase)
{
sb.AppendLineEx("\r\n\t[MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]");
sb.AppendFormat("\tstatic int {0}(IntPtr L)\r\n", name);
sb.AppendLineEx("\t{");
BeginTry();
sb.AppendLineEx("\t\t\tint count = LuaDLL.lua_gettop(L);");
sb.AppendLineEx();
if (HasAttribute(methodBase.Method, typeof(OverrideDefinedAttribute)))
{
GenOverrideDefinedFunc(methodBase.Method);
sb.AppendFormat("\t\t\treturn 0;\r\n");
}
else
{
int count = methodBase.ProcessParams(3, false, 0);
int ret = methodBase.GetReturnType() == typeof(void) ? 0 : 1;
sb.AppendFormat("\t\t\treturn {0};\r\n", ret + count);
}
EndTry();
sb.AppendLineEx("\t}");
}
static void GenOverrideFuncBody(_MethodBase md, bool beIf, int checkTypeOffset)
{
int offset = md.IsStatic ? 0 : 1;
int ret = md.GetReturnType() == typeof(void) ? 0 : 1;
string strIf = beIf ? "if " : "else if ";
if (HasOptionalParam(md.GetParameters()))
{
ParameterInfo[] paramInfos = md.GetParameters();
ParameterInfo param = paramInfos[paramInfos.Length - 1];
string str = GetTypeStr(param.ParameterType.GetElementType());
if (paramInfos.Length + offset > 1)
{
string strParams = md.GenParamTypes(0);
sb.AppendFormat("\t\t\t{0}(TypeChecker.CheckTypes<{1}>(L, 1) && TypeChecker.CheckParamsType<{2}>(L, {3}, {4}))\r\n", strIf, strParams, str, paramInfos.Length + offset, GetCountStr(paramInfos.Length + offset - 1));
}
else
{
sb.AppendFormat("\t\t\t{0}(TypeChecker.CheckParamsType<{1}>(L, {2}, {3}))\r\n", strIf, str, paramInfos.Length + offset, GetCountStr(paramInfos.Length + offset - 1));
}
}
else
{
ParameterInfo[] paramInfos = md.GetParameters();
if (paramInfos.Length + offset > checkTypeOffset)
{
string strParams = md.GenParamTypes(checkTypeOffset);
sb.AppendFormat("\t\t\t{0}(count == {1} && TypeChecker.CheckTypes<{2}>(L, {3}))\r\n", strIf, paramInfos.Length + offset, strParams, checkTypeOffset + 1);
}
else
{
sb.AppendFormat("\t\t\t{0}(count == {1})\r\n", strIf, paramInfos.Length + offset);
}
}
sb.AppendLineEx("\t\t\t{");
int count = md.ProcessParams(4, false, checkTypeOffset);
sb.AppendFormat("\t\t\t\treturn {0};\r\n", ret + count);
sb.AppendLineEx("\t\t\t}");
}
static void GenFunction(_MethodBase m)
{
string name = GetMethodName(m.Method);
sb.AppendLineEx("\r\n\t[MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]");
sb.AppendFormat("\tstatic int {0}(IntPtr L)\r\n", name == "Register" ? "_Register" : name);
sb.AppendLineEx("\t{");
if (HasAttribute(m.Method, typeof(UseDefinedAttribute)))
{
FieldInfo field = extendType.GetField(name + "Defined");
string strfun = field.GetValue(null) as string;
sb.AppendLineEx(strfun);
sb.AppendLineEx("\t}");
return;
}
ParameterInfo[] paramInfos = m.GetParameters();
int offset = m.IsStatic ? 0 : 1;
bool haveParams = HasOptionalParam(paramInfos);
int rc = m.GetReturnType() == typeof(void) ? 0 : 1;
BeginTry();
if (!haveParams)
{
int count = paramInfos.Length + offset;
if (m.Name == "op_UnaryNegation")
{
count = 2;
}
sb.AppendFormat("\t\t\tToLua.CheckArgsCount(L, {0});\r\n", count);
}
else
{
sb.AppendLineEx("\t\t\tint count = LuaDLL.lua_gettop(L);");
}
rc += m.ProcessParams(3, false, int.MaxValue);
sb.AppendFormat("\t\t\treturn {0};\r\n", rc);
EndTry();
sb.AppendLineEx("\t}");
}
static void GenConstructFunction()
{
if (ctorExtList.Count > 0)
{
if (HasAttribute(ctorExtList[0], typeof(UseDefinedAttribute)))
{
sb.AppendLineEx("\r\n\t[MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]");
sb.AppendFormat("\tstatic int _Create{0}(IntPtr L)\r\n", wrapClassName);
sb.AppendLineEx("\t{");
FieldInfo field = extendType.GetField(extendName + "Defined");
string strfun = field.GetValue(null) as string;
sb.AppendLineEx(strfun);
sb.AppendLineEx("\t}");
return;
}
}
if (ctorList.Count == 0)
{
if (type.IsValueType)
{
DefaultConstruct();
}
return;
}
ctorList.Sort(Compare);
int[] checkTypeMap = CheckCheckTypePos(ctorList);
sb.AppendLineEx("\r\n\t[MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]");
sb.AppendFormat("\tstatic int _Create{0}(IntPtr L)\r\n", wrapClassName);
sb.AppendLineEx("\t{");
BeginTry();
sb.AppendLineEx("\t\t\tint count = LuaDLL.lua_gettop(L);");
sb.AppendLineEx();
_MethodBase md = ctorList[0];
bool hasEmptyCon = ctorList[0].GetParameters().Length == 0 ? true : false;
//处理重载构造函数
if (HasOptionalParam(md.GetParameters()))
{
ParameterInfo[] paramInfos = md.GetParameters();
ParameterInfo param = paramInfos[paramInfos.Length - 1];
string str = GetTypeStr(param.ParameterType.GetElementType());
if (paramInfos.Length > 1)
{
string strParams = md.GenParamTypes(1);
sb.AppendFormat("\t\t\tif (TypeChecker.CheckTypes<{0}>(L, 1) && TypeChecker.CheckParamsType<{1}>(L, {2}, {3}))\r\n", strParams, str, paramInfos.Length, GetCountStr(paramInfos.Length - 1));
}
else
{
sb.AppendFormat("\t\t\tif (TypeChecker.CheckParamsType<{0}>(L, {1}, {2}))\r\n", str, paramInfos.Length, GetCountStr(paramInfos.Length - 1));
}
}
else
{
ParameterInfo[] paramInfos = md.GetParameters();
if (ctorList.Count == 1 || paramInfos.Length == 0 || paramInfos.Length + 1 <= checkTypeMap[0])
{
sb.AppendFormat("\t\t\tif (count == {0})\r\n", paramInfos.Length);
}
else
{
string strParams = md.GenParamTypes(checkTypeMap[0]);
sb.AppendFormat("\t\t\tif (count == {0} && TypeChecker.CheckTypes<{1}>(L, {2}))\r\n", paramInfos.Length, strParams, checkTypeMap[0]);
}
}
sb.AppendLineEx("\t\t\t{");
int rc = md.ProcessParams(4, true, checkTypeMap[0] - 1);
sb.AppendFormat("\t\t\t\treturn {0};\r\n", rc);
sb.AppendLineEx("\t\t\t}");
for (int i = 1; i < ctorList.Count; i++)
{
hasEmptyCon = ctorList[i].GetParameters().Length == 0 ? true : hasEmptyCon;
md = ctorList[i];
ParameterInfo[] paramInfos = md.GetParameters();
if (!HasOptionalParam(md.GetParameters()))
{
string strParams = md.GenParamTypes(checkTypeMap[i]);
if (paramInfos.Length + 1 > checkTypeMap[i])
{
sb.AppendFormat("\t\t\telse if (count == {0} && TypeChecker.CheckTypes<{1}>(L, {2}))\r\n", paramInfos.Length, strParams, checkTypeMap[i]);
}
else
{
sb.AppendFormat("\t\t\telse if (count == {0})\r\n", paramInfos.Length);
}
}
else
{
ParameterInfo param = paramInfos[paramInfos.Length - 1];
string str = GetTypeStr(param.ParameterType.GetElementType());
if (paramInfos.Length > 1)
{
string strParams = md.GenParamTypes(1);
sb.AppendFormat("\t\t\telse if (TypeChecker.CheckTypes<{0}>(L, 1) && TypeChecker.CheckParamsType<{1}>(L, {2}, {3}))\r\n", strParams, str, paramInfos.Length, GetCountStr(paramInfos.Length - 1));
}
else
{
sb.AppendFormat("\t\t\telse if (TypeChecker.CheckParamsType<{0}>(L, {1}, {2}))\r\n", str, paramInfos.Length, GetCountStr(paramInfos.Length - 1));
}
}
sb.AppendLineEx("\t\t\t{");
rc = md.ProcessParams(4, true, checkTypeMap[i] - 1);
sb.AppendFormat("\t\t\t\treturn {0};\r\n", rc);
sb.AppendLineEx("\t\t\t}");
}
if (type.IsValueType && !hasEmptyCon)
{
sb.AppendLineEx("\t\t\telse if (count == 0)");
sb.AppendLineEx("\t\t\t{");
sb.AppendFormat("\t\t\t\t{0} obj = new {0}();\r\n", className);
GenPushStr(type, "obj", "\t\t\t\t");
sb.AppendLineEx("\t\t\t\treturn 1;");
sb.AppendLineEx("\t\t\t}");
}
sb.AppendLineEx("\t\t\telse");
sb.AppendLineEx("\t\t\t{");
sb.AppendFormat("\t\t\t\treturn LuaDLL.luaL_throw(L, \"invalid arguments to ctor method: {0}.New\");\r\n", className);
sb.AppendLineEx("\t\t\t}");
EndTry();
sb.AppendLineEx("\t}");
}
//this[] 非静态函数
static void GenItemPropertyFunction()
{
int flag = 0;
if (getItems.Count > 0)
{
sb.AppendLineEx("\r\n\t[MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]");
sb.AppendLineEx("\tstatic int _get_this(IntPtr L)");
sb.AppendLineEx("\t{");
BeginTry();
if (getItems.Count == 1)
{
_MethodBase m = getItems[0];
int count = m.GetParameters().Length + 1;
sb.AppendFormat("\t\t\tToLua.CheckArgsCount(L, {0});\r\n", count);
m.ProcessParams(3, false, int.MaxValue);
sb.AppendLineEx("\t\t\treturn 1;\r\n");
}
else
{
getItems.Sort(Compare);
int[] checkTypeMap = CheckCheckTypePos(getItems);
sb.AppendLineEx("\t\t\tint count = LuaDLL.lua_gettop(L);");
sb.AppendLineEx();
for (int i = 0; i < getItems.Count; i++)
{
GenOverrideFuncBody(getItems[i], i == 0, checkTypeMap[i]);
}
sb.AppendLineEx("\t\t\telse");
sb.AppendLineEx("\t\t\t{");
sb.AppendFormat("\t\t\t\treturn LuaDLL.luaL_throw(L, \"invalid arguments to operator method: {0}.this\");\r\n", className);
sb.AppendLineEx("\t\t\t}");
}
EndTry();
sb.AppendLineEx("\t}");
flag |= 1;
}
if (setItems.Count > 0)
{
sb.AppendLineEx("\r\n\t[MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]");
sb.AppendLineEx("\tstatic int _set_this(IntPtr L)");
sb.AppendLineEx("\t{");
BeginTry();
if (setItems.Count == 1)
{
_MethodBase m = setItems[0];
int count = m.GetParameters().Length + 1;
sb.AppendFormat("\t\t\tToLua.CheckArgsCount(L, {0});\r\n", count);
m.ProcessParams(3, false, int.MaxValue);
sb.AppendLineEx("\t\t\treturn 0;\r\n");
}
else
{
setItems.Sort(Compare);
int[] checkTypeMap = CheckCheckTypePos(setItems);
sb.AppendLineEx("\t\t\tint count = LuaDLL.lua_gettop(L);");
sb.AppendLineEx();
for (int i = 0; i < setItems.Count; i++)
{
GenOverrideFuncBody(setItems[i], i == 0, checkTypeMap[i]);
}
sb.AppendLineEx("\t\t\telse");
sb.AppendLineEx("\t\t\t{");
sb.AppendFormat("\t\t\t\treturn LuaDLL.luaL_throw(L, \"invalid arguments to operator method: {0}.this\");\r\n", className);
sb.AppendLineEx("\t\t\t}");
}
EndTry();
sb.AppendLineEx("\t}");
flag |= 2;
}
if (flag != 0)
{
sb.AppendLineEx("\r\n\t[MonoPInvokeCallbackAttribute(typeof(LuaCSFunction))]");
sb.AppendLineEx("\tstatic int _this(IntPtr L)");
sb.AppendLineEx("\t{");
BeginTry();
sb.AppendLineEx("\t\t\tLuaDLL.lua_pushvalue(L, 1);");
sb.AppendFormat("\t\t\tLuaDLL.tolua_bindthis(L, {0}, {1});\r\n", (flag & 1) == 1 ? "_get_this" : "null", (flag & 2) == 2 ? "_set_this" : "null");
sb.AppendLineEx("\t\t\treturn 1;");
EndTry();
sb.AppendLineEx("\t}");
}
}
