void DefineAndSet(string name, System.Type type, Object obj)
{
CQ_Value value = new CQ_Value();
value.SetObject(type, obj);
content.DefineAndSet(name, type, value);
}
public void SetValue(string name, object v)
{
CQ_Value val = new CQ_Value();
val.SetObject(v.GetType(), v);
content.DefineAndSet(name, v.GetType(), val);
}
public CQ_Value Execute(string script)
{
var expr = CQ_Compiler.CompileParagraph(script); //语法分析
CQ_Value value = expr.ComputeValue(content); //执行表达式
return(value);
}
CQ_Value SetMember(string name, System.Type type, Object obj)
{
CQ_Value val = new CQ_Value();
val.SetObject(type, obj);
inst.member[name] = val;
return(val);
}
CQ_Value SetMember(string name, CQ_Type type, Object obj)
{
CQ_Value val = new CQ_Value();
val.type = type;
val.value = obj;
inst.member[name] = val;
return(val);
}
public static ICQ_Expression Compiler_Expression_SubValue(Token value)
{
if (value.type == TokenType.VALUE)
{
if (value.text[value.text.Length - 1] == 'f')
{
CQ_Value v = new CQ_Value();
v.SetNumber(typeof(float), -float.Parse(value.text.Substring(0, value.text.Length - 1)));
return(new CQ_Expression_Value(v));
}
else if (value.text.Contains("."))
{
CQ_Value v = new CQ_Value();
v.SetNumber(typeof(double), -double.Parse(value.text));
return(new CQ_Expression_Value(v));
}
else
{
ulong lv = ulong.Parse(value.text);
if (lv > uint.MaxValue)
{
CQ_Value v = new CQ_Value();
v.SetNumber(typeof(long), -(long)lv);
return(new CQ_Expression_Value(v));
}
else
{
CQ_Value v = new CQ_Value();
v.SetNumber(typeof(int), -(int)lv);
return(new CQ_Expression_Value(v));
}
}
}
else
{
DebugUtil.LogError("无法识别的简单表达式" + value);
return(null);
}
}
//不出Block,必须一次解析完,括号为优先级
public static bool Compiler_Expression(IList <Token> tlist, int pos, int posend, out ICQ_Expression value)
{
if (pos > posend)
{
value = null;
return(false);
}
int begin = pos;
value = null;
List <ICQ_Expression> values = new List <ICQ_Expression>();
do
{
if (tlist[begin].type == TokenType.COMMENT)
{
begin++;
continue;
}
if (tlist[begin].type == TokenType.PUNCTUATION && tlist[begin].text == ";")
{
begin++;
continue;
}
int bdep;
//脱一次壳
int end = FindCodeAny(tlist, ref begin, out bdep);
if (end > posend)
{
end = posend;
}
else if (end < posend)
{
bool bMath = false;
for (int i = end + 1; i <= posend; i++)
{
if (tlist[i].type == TokenType.COMMENT)
{
continue;
}
if (tlist[i].type == TokenType.PUNCTUATION && tlist[i].text == ";")
{
continue;
}
bMath = true;
break;
}
if (bMath)
{
end = posend;
//如果表达式一次搞不完，那肯定是优先级问题
value = Compiler_Expression_Math(tlist, begin, posend);
return(true);
}
}
int expend = end;
int expbegin = begin;
if (expbegin > expend)
{
return(true);
}
if (expend == expbegin) //simple
{
if (tlist[expbegin].type == TokenType.KEYWORD)
{
if (tlist[expbegin].text == "return")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_Return(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "表达式编译失败", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
}
else if (tlist[expbegin].text == "yield")
{
if (tlist[expbegin + 1].text == "return")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_YieldReturn(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "不可识别的yield:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
}
else if (tlist[expbegin + 1].text == "break")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_YieldBreak(tlist, expbegin);
if (null == subvalue)
{
//DebugUtil.LogError(tlist, "表达式编译失败", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
}
}
else if (tlist[expbegin].text == "break")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_Break(tlist, expbegin);
if (null == subvalue)
{
//DebugUtil.LogError(tlist, "表达式编译失败", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
}
else if (tlist[expbegin].text == "continue")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_Continue(tlist, expbegin);
if (null == subvalue)
{
return(false);
}
else
{
values.Add(subvalue);
}
}
else if (tlist[expbegin].text == "true")
{
CQ_Value v = new CQ_Value();
v.SetBool(true);
CQ_Expression_Value subvalue = new CQ_Expression_Value(v);
values.Add(subvalue);
}
else if (tlist[expbegin].text == "false")
{
CQ_Value v = new CQ_Value();
v.SetBool(false);
CQ_Expression_Value subvalue = new CQ_Expression_Value(v);
values.Add(subvalue);
}
else if (tlist[expbegin].text == "null")
{
CQ_Expression_Value subvalue = new CQ_Expression_Value(CQ_Value.Null);
values.Add(subvalue);
}
}
else
{
ICQ_Expression subvalue = Compiler_Expression_Value(tlist[expbegin], expbegin);
if (null == subvalue)
{
return(false);
}
else
{
values.Add(subvalue);
}
}
}
else if (bdep == 1) //深层表达式
{
expbegin++;
expend--;
ICQ_Expression subvalue;
bool bsucc = Compiler_Expression(tlist, expbegin, expend, out subvalue);
if (bsucc)
{
if (subvalue != null)
{
values.Add(subvalue);
}
}
else
{
DebugUtil.LogError(tlist, "表达式编译失败", expbegin, expend);
return(false);
}
}
else //尝试各种表达式
{
bool bTest = false;
//取反表达式
if (tlist[expbegin].type == TokenType.PUNCTUATION && tlist[expbegin].text == "-")
{
if (tlist[expend].type == TokenType.VALUE) //负数
{
if (expend == expbegin + 1)
{
ICQ_Expression subvalue = Compiler_Expression_SubValue(tlist[expend]);
if (null == subvalue)
{
return(false);
}
else
{
values.Add(subvalue);
}
}
else
{
ICQ_Expression subvalue = Compiler_Expression_Math(tlist, begin, posend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "表达式编译失败", begin, posend);
return(false);
}
else
{
values.Add(subvalue);
}
}
}
else //负数表达式
{
ICQ_Expression subvalue = Compiler_Expression_NegativeValue(tlist, expbegin + 1, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "表达式编译失败", expbegin + 1, expend);
return(false);
}
else
{
values.Add(subvalue);
}
}
bTest = true;
}
if (tlist[expbegin].type == TokenType.PUNCTUATION && tlist[expbegin].text == "!") //逻辑反表达式
{
ICQ_Expression subvalue = Compiler_Expression_NegativeLogic(tlist, expbegin + 1, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "表达式编译失败", expbegin + 1, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
if (!bTest && tlist[expbegin].type == TokenType.TYPE)
{
if (tlist[expbegin + 1].type == TokenType.IDENTIFIER) //定义表达式或者定义并赋值表达式
{
if (expend == expbegin + 1) //定义表达式
{
ICQ_Expression subvalue = Compiler_Expression_Define(tlist, expbegin, expend);
if (null == subvalue)
{
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (expend > expbegin + 2 && tlist[expbegin + 2].type == TokenType.PUNCTUATION && tlist[expbegin + 2].text == "=") //定义并赋值表达式
{
ICQ_Expression subvalue = Compiler_Expression_DefineAndSet(tlist, expbegin, expend);
if (null == subvalue)
{
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else
{
DebugUtil.LogError(tlist, "无法识别的表达式:", expbegin, expend);
return(false);
}
}
else if (tlist[expbegin + 1].text == "[" && tlist[expbegin + 2].text == "]" && tlist[expbegin + 3].type == TokenType.IDENTIFIER) //定义表达式或者定义并赋值表达式
{
if (expend == expbegin + 3) //定义表达式
{
ICQ_Expression subvalue = Compiler_Expression_DefineArray(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "无法识别的数组:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (expend > expbegin + 4 && tlist[expbegin + 4].type == TokenType.PUNCTUATION && tlist[expbegin + 4].text == "=") //定义并赋值表达式
{
ICQ_Expression subvalue = Compiler_Expression_DefineAndSetArray(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "无法识别的数组:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else
{
DebugUtil.LogError(tlist, "无法识别的表达式:", expbegin, expend);
return(false);
}
}
else if (tlist[expbegin + 1].type == TokenType.PUNCTUATION && tlist[expbegin + 1].text == ".") //静态调用表达式
//if (expend - expbegin > 2)
{
{
ICQ_Expression subvalue = Compiler_Expression_Math(tlist, expbegin, expend);
if (subvalue != null)
{
//subvalue._expressions.Add(subparam);
values.Add(subvalue);
bTest = true;
}
else
{
DebugUtil.LogError(tlist, "无法识别的表达式:", expbegin, expend);
return(false);
}
}
}
}
if (!bTest && tlist[expbegin].type == TokenType.IDENTIFIER)
{
if (expend == expbegin + 1)//一元表达式
{
ICQ_Expression subvalue = Compiler_Expression_MathSelf(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "无法识别的表达式:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
if (!bTest && tlist[expbegin + 1].type == TokenType.PUNCTUATION && tlist[expbegin + 1].text == "=")//赋值表达式
{
ICQ_Expression subvalue = Compiler_Expression_Set(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "无法识别的表达式:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
}
if (!bTest && (tlist[expbegin].type == TokenType.IDENTIFIER || tlist[expbegin].type == TokenType.VALUE || tlist[expbegin].type == TokenType.STRING))
{
//算数表达式
ICQ_Expression subvalue = Compiler_Expression_Math(tlist, expbegin, expend);
if (null != subvalue)
{
values.Add(subvalue);
bTest = true;
}
}
if (!bTest && tlist[expbegin].type == TokenType.KEYWORD)
{
if (tlist[expbegin].text == "for")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_For(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "不可识别的For头:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (tlist[expbegin].text == "switch")
{
// UnityEngine.Debug.Log("SwitchCase : " + GetCodeKeyString(tlist, expbegin, expend));
ICQ_Expression subvalue = Compiler_Expression_Loop_SwitchCase(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "不可识别的switch case：", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (tlist[expbegin].text == "foreach")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_ForEach(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "不可识别的ForEach头:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (tlist[expbegin].text == "while")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_While(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "不可识别的while头:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (tlist[expbegin].text == "do")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_Dowhile(tlist, expbegin, expend);
if (null == subvalue)
{
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (tlist[expbegin].text == "if")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_If(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "不可识别的if判断:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (tlist[expbegin].text == "try")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_Try(tlist, expbegin, expend);
if (null == subvalue)
{
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (tlist[expbegin].text == "return")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_Return(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "不可识别的return:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (tlist[expbegin].text == "yield")
{
if (tlist[expbegin + 1].text == "return")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_YieldReturn(tlist, expbegin, expend);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "不可识别的yield:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (tlist[expbegin + 1].text == "break")
{
ICQ_Expression subvalue = Compiler_Expression_Loop_YieldBreak(tlist, expbegin);
if (null == subvalue)
{
DebugUtil.LogError(tlist, "不可识别的yield:", expbegin, expend);
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
}
else if (tlist[expbegin].text == "throw")
{
ICQ_Expression subvalue = Compiler_Expression_FunctionThrow(tlist, expbegin, expend);
if (null == subvalue)
{
return(false);
}
else
{
values.Add(subvalue);
}
bTest = true;
}
else if (tlist[expbegin].text == "true" || tlist[expbegin].text == "false" || tlist[expbegin].text == "null")
{
//算数表达式
ICQ_Expression subvalue = Compiler_Expression_Math(tlist, expbegin, expend);
if (null != subvalue)
{
values.Add(subvalue);
bTest = true;
}
}
else if (tlist[expbegin].text == "new")
{
//new 表达式
if (tlist[expbegin + 1].type == TokenType.TYPE)
{
ICQ_Expression subvalue = Compiler_Expression_FunctionNew(tlist, pos, posend);
values.Add(subvalue);
bTest = true;
}
}
else
{
DebugUtil.LogError(tlist, "无法识别的表达式:", expbegin, expend);
return(false);
}
}
if (!bTest)
{
DebugUtil.LogError(tlist, "无法识别的表达式:", expbegin, expend);
return(false);
}
}
begin = end + 1;
}while(begin <= posend);
if (values.Count == 1)
{
value = values[0];
}
else if (values.Count > 1)
{
DebugUtil.LogError(tlist, "异常表达式", pos, posend);
}
return(true);
}
public static ICQ_Expression Compiler_Expression_Value(Token value, int pos)
{
if (value.type == TokenType.VALUE)
{
if (value.text[value.text.Length - 1] == 'f')
{
CQ_Value v = new CQ_Value();
v.SetNumber(typeof(float), float.Parse(value.text.Substring(0, value.text.Length - 1)));
return(new CQ_Expression_Value(v));
}
else if (value.text.Contains("."))
{
CQ_Value v = new CQ_Value();
v.SetNumber(typeof(double), double.Parse(value.text));
return(new CQ_Expression_Value(v));
}
else
{
if (value.text.Contains("'"))
{
CQ_Value v = new CQ_Value();
v.SetNumber(typeof(char), (char)value.text[1]);
return(new CQ_Expression_Value(v));
}
else
{
ulong lv = ulong.Parse(value.text);
if (lv > uint.MaxValue)
{
CQ_Value v = new CQ_Value();
v.SetNumber(typeof(long), (long)lv);
return(new CQ_Expression_Value(v));
}
else
{
CQ_Value v = new CQ_Value();
v.SetNumber(typeof(int), (int)lv);
return(new CQ_Expression_Value(v));
}
}
}
}
else if (value.type == TokenType.STRING)
{
CQ_Value v = new CQ_Value();
v.SetObject(typeof(string), value.text.Substring(1, value.text.Length - 2));
return(new CQ_Expression_Value(v));
}
else if (value.type == TokenType.IDENTIFIER)
{
CQ_Expression_GetValue getvalue = new CQ_Expression_GetValue(pos, pos, value.line, value.line);
getvalue.value_name = value.text;
return(getvalue);
}
else if (value.type == TokenType.TYPE)
{
CQ_Expression_GetValue getvalue = new CQ_Expression_GetValue(pos, pos, value.line, value.line);
int l = value.text.LastIndexOf('.');
if (l >= 0)
{
getvalue.value_name = value.text.Substring(l + 1);
}
else
{
getvalue.value_name = value.text;
}
return(getvalue);
}
else
{
DebugUtil.LogError("无法识别的简单表达式" + value);
return(null);
}
}
