/// <summary>
/// 分解过程,每次分解一行代码
/// </summary>
/// <param name="express"></param>
/// <returns></returns>
private IExpressPart[] ResolveCalStep(string express, int line)
{
if (string.IsNullOrWhiteSpace(express))
{
return(null);
}
//express = new Regex(@";;{1,}").Replace(express, ";");
//这里有问题，比如((5+3)/2)
//express = TrimBrackets(express);
List <IExpressPart> arry = new List <IExpressPart>();
int ifcount = 0;
int bracket = 0;
int pointStart = 0;
int elsePosit = 0;
int thenPosit = 0;
int modelID = 0;
IExpressPart ep = null;
int expressLen = express.Length;
var expressCharArray = express.ToArray();
for (int i = 0; i <= expressLen; i++)
{
if (i == expressLen ||
(bracket == 0 && i > 0 && !IsCanGroup(expressCharArray[i - 1], expressCharArray[i]))
)
{
string es = express.Substring(pointStart, i - pointStart);
es = es.TrimBrackets();
//检查是否是保留字
//if (CalSignFactory.IsProtectWord(es))
//{
// throw new ExpressErrorException(es + "是保留字！");
//}
if (i < expressLen && es[0] == '\'' && expressCharArray[i] == '\'' && ifcount == 0)
{
i++;
StringSign cexp = new StringSign(es.Trim('\''), ++modelID);
cexp.StartIndex = pointStart;
cexp.EndIndex = i;
cexp.CodeLine = line;
arry.Add(cexp);
}
else if (es[0] == '\'' && expressCharArray[i] != '\'' && ifcount == 0)
{
throw new ExpressErrorException("字符串分析错误");
}
else if (es.Equals("if", StringComparison.OrdinalIgnoreCase))
{
if (ifcount == 0)
{
ep = new ConditionSign();
modelID += 2;
ep.CodeLine = line;
ep.ModeID = modelID;
ep.StartIndex = pointStart;
ep.EndIndex = i;
arry.Add(ep);
}
ifcount++;
}
//else if (es.ToLower() == "then")
else if (es.Equals("then", StringComparison.OrdinalIgnoreCase))
{
if (ifcount == 1)
{
//先加上左边的条件
if (i - 6 - ep.EndIndex <= 0)
{
throw new ExpressErrorException("if缺少条件表达式！", line, ep.EndIndex, i, ep);
}
CalExpress cexp = new CalExpress(express.Substring(ep.EndIndex + 1, i - 6 - ep.EndIndex).TrimBrackets(), ep.ModeID - 1);
cexp.StartIndex = ep.EndIndex + 1;
cexp.EndIndex = i - 4;
cexp.CodeLine = line;
arry.Add(cexp);
thenPosit = i - 4;
}
}
//else if (es.ToLower() == "else")
else if (es.Equals("else", StringComparison.OrdinalIgnoreCase))
{
if (ifcount == 0)
{
throw new ExpressErrorException("表达式错误，else缺少if条件！", line, elsePosit, i, ep);
}
if (thenPosit == 0)
{
throw new ExpressErrorException("表达式错误，else前要有then！", line, thenPosit, i, ep);
}
if (ifcount == 1)
{
elsePosit = i - 4;
}
}
//else if (es.ToLower() == "end")
else if (es.Equals("end", StringComparison.OrdinalIgnoreCase))
{
if (ifcount == 1 && thenPosit == 0)
{
throw new ExpressErrorException("if 表达式错误，缺少then！", line, i, i + 3, ep);
}
ifcount--;
if (ifcount == 0)
{
if (elsePosit > 0)
{
modelID += 2;
ElseSign elseSign = new ElseSign();
elseSign.StartIndex = elsePosit;
elseSign.EndIndex = elsePosit + 4;
elseSign.ModeID = modelID;
elseSign.CodeLine = line;
arry.Add(elseSign);
//左边为真条件
if (elsePosit - thenPosit - 6 <= 0)
{
throw new ExpressErrorException("if else 表达式中缺少条件为真的表达式！", line, thenPosit - 1, thenPosit, ep);
}
CalExpress cexp0 = new CalExpress(express.Substring(thenPosit + 5, elsePosit - thenPosit - 6).Trim().TrimBrackets(), modelID - 1);
cexp0.StartIndex = thenPosit + 5;
cexp0.EndIndex = elsePosit - thenPosit - 6;
cexp0.CodeLine = line;
arry.Add(cexp0);
if (i - elsePosit - 9 <= 0)
{
throw new ExpressErrorException("if else 表达式中缺少条件为假的表达式！", line, elsePosit + 4, elsePosit + 5, ep);
}
//右边为假条件
CalExpress cexp = new CalExpress(express.Substring(elsePosit + 5, i - elsePosit - 9).Trim().TrimBrackets(), ++modelID);
cexp.StartIndex = elsePosit + 5;
cexp.EndIndex = i - 4;
cexp.CodeLine = line;
arry.Add(cexp);
}
else
{
//加上右边的操作
if (i - thenPosit - 9 <= 0)
{
throw new ExpressErrorException("if表达式中缺少条件表达式！", line, thenPosit + 4, thenPosit + 5, ep);
}
//右边条件
CalExpress cexp = new CalExpress(express.Substring(thenPosit + 5, i - thenPosit - 9).TrimBrackets(), ++modelID);
cexp.StartIndex = thenPosit + 5;
cexp.EndIndex = i - 4;
arry.Add(cexp);
}
}
}
else if (!string.IsNullOrWhiteSpace(es) && es != ";" && ifcount == 0)
{
CalSign cs;
if (CalSignFactory.TryCreateSign(es, this.CalCurrent, out cs))
{
cs.StartIndex = pointStart;
cs.EndIndex = i;
if (cs is FunSign)
{
FunSign fs = cs as FunSign;
arry.Add(new CalExpress(fs.FunName, ++modelID));
fs.ModeID = ++modelID;
arry.Add(fs);
if (!string.IsNullOrWhiteSpace(fs.ParamString))
{
arry.Add(new CalExpress(fs.ParamString, ++modelID));
}
}
else
{
cs.ModeID = ++modelID;
arry.Add(cs);
}
}
else
{
CalExpress cexp = new CalExpress(es, ++modelID);
cexp.StartIndex = pointStart;
cexp.EndIndex = i;
arry.Add(cexp);
}
}
pointStart = i;
}
if (i < expressLen)
{
if (expressCharArray[i] == '(')
{
bracket++;
}
else if (expressCharArray[i] == ')')
{
bracket--;
}
}
if (i == expressLen && bracket > 0)
{
throw new ExpressErrorException("表达式错误，缺少右)！", line, expressLen, expressLen + 1, ep);
}
if (i == expressLen && ifcount > 0)
{
throw new ExpressErrorException("if表达式错误！", line, expressLen, expressLen + 1, ep);
}
}
return(arry.OrderBy(c => c.ModeID).ToArray());
}
private CalResult CallResult(BinTree <IExpressPart> calBinTree)
{
if (calBinTree.LeftTree == null && calBinTree.RightTree == null)
{
if (calBinTree.TreeNode == null)
{
return(new CalResult
{
Result = ""
});
}
if (calBinTree.TreeNode is CalExpress)
{
CalExpress ce = calBinTree.TreeNode as CalExpress;
return(new CalResult
{
Result = ce.Value,
//ResultType = Comm.GetType(ce.Express)
});
}
}
if (calBinTree.TreeNode is IIteratorCollectionFun && this.CalCurrent.CurrentIndex != -1)
{
var indx = this.CalCurrent.CurrentIndex;
(calBinTree.TreeNode as CalSign).OnBeginOperator += () =>
{
this.CalCurrent.CurrentIndex = indx;
};
this.CalCurrent.CurrentIndex = -1;
}
if (!(calBinTree.TreeNode is CalSign))
{
throw new ExpressErrorException(string.Format("未能计算的表达式：{0}。", calBinTree.TreeNode));
}
var calSign = (calBinTree.TreeNode as CalSign);
//var time1 = DateTime.Now;
CalResult leftResult = null;
CalResult rightResult = null;
if (calBinTree.LeftTree != null)
{
//如果左边是赋值的则不调取值方法
if (calBinTree.TreeNode is SetValueSign)
{
((VarSign)calBinTree.LeftTree.TreeNode).IsSetValue = true;
}
leftResult = CallResult(calBinTree.LeftTree);
}
if (calBinTree.RightTree != null)
{
if (calBinTree.TreeNode is ConditionSign)
{
if (leftResult.Results != null)
{
throw new Exception("条件表达式左值太多");
}
else
{
if (!(leftResult.Result is bool))
{
throw new ExpressErrorException("if then的条件表达式条件必须为bool值！");
}
if (leftResult.Result.ToBool())
{
if (calBinTree.RightTree.TreeNode is ElseSign)
{
rightResult = CallResult(calBinTree.RightTree.LeftTree);
}
else
{
rightResult = CallResult(calBinTree.RightTree);
}
}
else
{
if (calBinTree.RightTree.TreeNode is ElseSign)
{
rightResult = CallResult(calBinTree.RightTree.RightTree);
}
else
{
rightResult = new CalResult
{
Result = null,
ResultType = typeof(bool)
};
}
}
}
}
else
{
rightResult = CallResult(calBinTree.RightTree);
}
}
CalSign cs = calBinTree.TreeNode as CalSign;
cs.LeftVal = leftResult;
cs.RightVal = rightResult;
var result = cs.Operate();
//calSign.ExeTicks += DateTime.Now.Subtract(time1).TotalMilliseconds;
return(result);
}
