////////////////////////////////////////////////////////////////////
private static IEnumerable <DynMethod> BuildMethods()
{
yield return(new DynMethod()
{
Names = new[] { MethodSetValue.Name },
Body = MethodSetValue.Execute
});
/*yield return new ExpressionMethod()
* {
* OperationNames = new[] { "check" },
* CalculateValueDelegate = (DynLanContext, Parameters) =>
* {
* Object condition = Parameters != null && Parameters.Count > 0 ? Parameters[0] : null;
* Object ifTrue = Parameters != null && Parameters.Count > 1 ? Parameters[1] : null;
* Object ifFalse = Parameters != null && Parameters.Count > 2 ? Parameters[2] : null;
*
* if (condition != null)
* {
* Type conditionType = condition.GetType();
*
* if ((MyTypeHelper.IsNumeric(conditionType) && Convert.ToDecimal(condition) > 0) ||
* (conditionType == typeof(String) && Convert.ToString(condition).Length > 0))
* {
* return new ExpressionMethodResult(ifTrue);
* }
* else
* {
* return new ExpressionMethodResult(ifFalse);
* }
* }
*
* return new ExpressionMethodResult(null);
* }
* };*/
yield return(new DynMethod()
{
Names = new[] { "getdatetime" },
Body = (DynLanContext, Parameters) =>
{
return new DynMethodResult(DateTime.Now);
}
});
yield return(new DynMethod()
{
Names = new[] { "getdatetimeastext" },
Body = (DynLanContext, Parameters) =>
{
DateTime now = DateTime.Now.Date;
String nowText = StringHelper.FormatDate(now, "yyyymmddThhmiss");
return new DynMethodResult(nowText);
}
});
yield return(new DynMethod()
{
Names = new[] { "getdate" },
Body = (DynLanContext, Parameters) =>
{
return new DynMethodResult(DateTime.Now.Date);
}
});
yield return(new DynMethod()
{
Names = new[] { "getdateastext" },
Body = (DynLanContext, Parameters) =>
{
DateTime now = DateTime.Now.Date;
String nowText = StringHelper.FormatDate(now, "yyyymmdd");
return new DynMethodResult(nowText);
}
});
yield return(new DynMethod()
{
Names = new[] { "return" },
Body = (DynLanContext, Parameters) =>
{
#if !NET20
return new DynMethodResult(Parameters.FirstOrDefault());
#else
return new DynMethodResult(Linq2.FirstOrDefault(Parameters));
#endif
}
});
yield return(new DynMethod()
{
Names = new[] { "substring" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
String str = UniConvert.ToUniString(Parameters[0] ?? "");
if (Parameters.Count > 2)
{
Int32 start = Convert.ToInt32(Parameters[1]);
Int32 len = Convert.ToInt32(Parameters[2]);
if (start < str.Length)
{
if (start + len <= str.Length)
{
return new DynMethodResult(str.Substring(start, len));
}
else
{
return new DynMethodResult(str.Substring(start));
}
}
return new DynMethodResult("");
}
else if (Parameters.Count == 2)
{
Int32 start = Convert.ToInt32(Parameters[1]);
if (start < str.Length)
{
return new DynMethodResult(str.Substring(start));
}
return new DynMethodResult("");
}
return new DynMethodResult(str);
}
return new DynMethodResult("");
}
});
yield return(new DynMethod()
{
Names = new[] { "split" },
Body = (DynLanContext, Parameters) =>
{
#if NETCE
throw new NotImplementedException();
#else
if (Parameters.Count > 0)
{
List <String> list = new List <String>();
String str = UniConvert.ToUniString(Parameters[0] ?? "");
if (Parameters.Count > 1)
{
List <String> splitParams = new List <String>();
for (Int32 i = 1; i < Parameters.Count; i++)
{
splitParams.Add(UniConvert.ToString(Parameters[i] ?? ""));
}
#if NET20
foreach (String item in str.Split(splitParams.ToArray(), StringSplitOptions.None))
#else
foreach (String item in str.Split(splitParams.ToArray(), StringSplitOptions.None))
#endif
{ list.Add(item); }
}
else
{
list.Add(str);
}
return new DynMethodResult(list);
}
return new DynMethodResult("");
#endif
}
});
yield return(new DynMethod()
{
Names = new[] { "str" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
return new DynMethodResult(
UniConvert.ToString(Parameters[0]));
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "lower" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
if (Parameters[0] == null)
{
return null;
}
return new DynMethodResult(
UniConvert.ToString(Parameters[0]).ToLower());
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "upper" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
if (Parameters[0] == null)
{
return null;
}
return new DynMethodResult(
UniConvert.ToString(Parameters[0]).ToUpper());
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "ceil" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
return new DynMethodResult(
UniConvert.ToDecimal(Math.Ceiling(UniConvert.ToDouble(Parameters[0]))));
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "eval" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
#if !NET20
DynLanProgram program = new Compiler().Compile(
UniConvert.ToString(Parameters.First()));
#else
DynLanProgram program = new Compiler().Compile(
UniConvert.ToString(Linq2.FirstOrDefault(Parameters)));
#endif
EvaluatorForMethods.EvaluateMethod(
null,
program,
null,
DynLanContext);
return new DynMethodResult()
{
NewContextCreated = true
};
}
return new DynMethodResult(null);
}
});
/*yield return new ExpressionMethod()
* {
* OperationNames = new[] { "bindtoevent" },
* CalculateValueDelegate = (DynLanContext, Parameters) =>
* {
* if (Parameters.Count > 0)
* {
* Object obj = Parameters != null && Parameters.Count > 0 ? Parameters[0] : null;
* String eventName = ((Parameters != null && Parameters.Count > 1 ? Parameters[1] : null) ?? "").ToString().Trim();
* Object method = Parameters != null && Parameters.Count > 2 ? Parameters[2] : null;
*
* throw new NotImplementedException();
*
* MyReflectionHelper.BindToEvent(
* obj,
* eventName,
* (s, o) =>
* {
*
* });
* }
* return new ExpressionMethodResult(null);
* }
* };*/
/*yield return new ExpressionMethod()
* {
* OperationNames = new[] { "create" },
* CalculateValueDelegate = (DynLanContext, Parameters) =>
* {
* if (Parameters.Count <= 0)
* return new ExpressionMethodResult(null);
*
* String typeName = UniConvert.ToString(Parameters[0]) ?? "";
*
* foreach (var assembly in AppDomain.CurrentDomain.GetAssemblies())
* {
* var type = assembly.GetType(typeName);
* if (type == null)
* continue;
*
* if (type.IsStatic())
* {
* return null;
* }
* else
* {
* var r = Activator.CreateInstance(type);
* return new ExpressionMethodResult(r);
* }
* }
*
* return new ExpressionMethodResult(null);
* }
* };*/
yield return(new DynMethod()
{
Names = new[] { "type" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count <= 0)
{
return new DynMethodResult(null);
}
String typeName = UniConvert.ToString(Parameters[0]) ?? "";
var type = MyAssemblyHelper.FindType(typeName);
return new DynMethodResult(type);
}
});
#if !PCL
yield return(new DynMethod()
{
Names = new[] { "sleep" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Int32 milliseconds = UniConvert.ToInt32(Parameters[0]);
Thread.Sleep(milliseconds);
return new DynMethodResult(milliseconds);
}
return new DynMethodResult(0);
}
});
#endif
yield return(new DynMethod()
{
Names = new[] { "new" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count <= 0)
{
return new DynMethodResult(null);
}
String typeName = UniConvert.ToString(Parameters[0]) ?? "";
var obj = MyAssemblyHelper.CreateType(typeName);
return new DynMethodResult(obj);
}
});
yield return(new DynMethod()
{
Names = new[] { "list" },
Body = (DynLanContext, Parameters) =>
{
return new DynMethodResult(new List <Object>());
}
});
yield return(new DynMethod()
{
Names = new[] { "dictionary" },
Body = (DynLanContext, Parameters) =>
{
return new DynMethodResult(new Dictionary <String, Object>());
}
});
yield return(new DynMethod()
{
Names = new[] { "typeof" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
#if !NET20
if (Parameters.First() != null)
{
return new DynMethodResult(
Parameters.First().GetType());
}
#else
if (Linq2.FirstOrDefault(Parameters) != null)
{
return new DynMethodResult(
Linq2.FirstOrDefault(Parameters).GetType());
}
#endif
}
return new DynMethodResult(null);
}
});
yield return(new DynMethod()
{
Names = new[] { "istypeof" },
Body = (DynLanContext, Parameters) =>
{
Boolean result = false;
if (Parameters.Count > 1)
{
Object obj = Parameters[0];
Object type = Parameters[1];
if (obj != null && type != null)
{
if (type is Type)
{
result = MyTypeHelper.Is(obj.GetType(), (Type)type);
}
else
{
String typeName = UniConvert.ToString(type);
result = MyTypeHelper.Is(obj.GetType(), typeName);
}
}
}
return new DynMethodResult(result);
}
});
yield return(new DynMethod()
{
Names = new[] { "isnottypeof" },
Body = (DynLanContext, Parameters) =>
{
Boolean result = true;
if (Parameters.Count > 1)
{
Object obj = Parameters[0];
Object type = Parameters[1];
if (obj != null && type != null)
{
if (type is Type)
{
result = !MyTypeHelper.Is(obj.GetType(), (Type)type);
}
else
{
String typeName = UniConvert.ToString(type);
result = !MyTypeHelper.Is(obj.GetType(), typeName);
}
}
}
return new DynMethodResult(result);
}
});
yield return(new DynMethod()
{
Names = new[] { "mod" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 1)
{
return new DynMethodResult(
UniConvert.ToDecimal(
UniConvert.ToDecimal(Parameters[0]) % UniConvert.ToDecimal(Parameters[1])));
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "newguid" },
Body = (DynLanContext, Parameters) =>
{
return new DynMethodResult(Guid.NewGuid());
}
});
yield return(new DynMethod()
{
Names = new[] { "trim" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
object val = Parameters[0];
if (val == null)
{
return null;
}
return new DynMethodResult(
UniConvert.ToString(val).Trim());
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "float", "double", "tofloat", "todouble", "decimal", "todecimal" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
return new DynMethodResult(
UniConvert.ToDecimal(Parameters[0]));
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "isfloat", "isdouble", "isdecimal", "isnumeric" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Object val = Parameters[0];
if (val != null)
{
if (MyTypeHelper.IsNumeric(val))
{
return new DynMethodResult(
UniConvert.ToDecimal(true));
}
String strval = UniConvert.ToString(val);
Boolean result = false;
#if NETCE
try
{
Decimal.Parse(strval);
result = true;
}
catch { }
#else
Decimal numval = 0;
if (Decimal.TryParse(strval, out numval))
{
result = true;
}
#endif
return new DynMethodResult(
UniConvert.ToDecimal(result));
}
}
return new DynMethodResult(false);
}
});
yield return(new DynMethod()
{
Names = new[] { "int", "toint" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
return new DynMethodResult(
UniConvert.ToInt64(Parameters[0]));
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "floor" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
return new DynMethodResult(
UniConvert.ToDecimal(
Math.Floor(
UniConvert.ToDouble(Parameters[0]))));
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "round" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
if (Parameters.Count == 1)
{
return new DynMethodResult(
UniConvert.ToDecimal(
Math.Round(
UniConvert.ToDouble(Parameters[0]))));
}
else
{
return new DynMethodResult(
UniConvert.ToDecimal(
Math.Round(
UniConvert.ToDouble(Parameters[0]),
Convert.ToInt32(Parameters[1]))));
}
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "abs" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
if (Parameters.Count == 1)
{
return new DynMethodResult(
UniConvert.ToDecimal(
Math.Abs(
UniConvert.ToDouble(Parameters[0]))));
}
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "coalesce" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
var value = Parameters[0];
if (value == null || value is Undefined)
{
for (var i = 1; i < Parameters.Count; i++)
{
var nextVal = Parameters[i];
if (nextVal != null && !(nextVal is Undefined))
{
return new DynMethodResult(nextVal);
}
}
}
return new DynMethodResult(value);
}
return new DynMethodResult(null);
}
});
yield return(new DynMethod()
{
Names = new[] { "not" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Object val = (Parameters[0] ?? "");
if (val != null && !(val is Undefined))
{
Type type = val.GetType();
if (MyTypeHelper.IsNumeric(type))
{
Decimal numVal = UniConvert.ToDecimal(val);
return new DynMethodResult(Math.Sign(numVal) == 0 ? true : false);
}
else if (type.Name == "String")
{
return new DynMethodResult(
String.IsNullOrEmpty(
(String)val));
}
else
{
return new DynMethodResult(false);
}
}
else
{
return new DynMethodResult(true);
}
}
return new DynMethodResult(null);
}
});
yield return(new DynMethod()
{
Names = new[] { "getyear" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Object val = Parameters[0];
if (val != null && (val.GetType() == typeof(DateTime) || val.GetType() == typeof(DateTime?)))
{
return new DynMethodResult(((DateTime)val).Year);
}
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "len", "length" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
String val = Convert.ToString(Parameters[0] ?? "");
return new DynMethodResult(val.Length);
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "getmonth" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Object val = Parameters[0];
if (val != null && (val.GetType() == typeof(DateTime) || val.GetType() == typeof(DateTime?)))
{
return new DynMethodResult(((DateTime)val).Month);
}
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "getday" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Object val = Parameters[0];
if (val != null && (val.GetType() == typeof(DateTime) || val.GetType() == typeof(DateTime?)))
{
return new DynMethodResult(((DateTime)val).Day);
}
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "hours" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Object val = Parameters[0];
if (val != null && (val.GetType() == typeof(TimeSpan) || val.GetType() == typeof(TimeSpan?)))
{
return new DynMethodResult(Convert.ToDecimal(((TimeSpan)val).TotalHours));
}
if (val != null && (val.GetType() == typeof(DateTime) || val.GetType() == typeof(DateTime?)))
{
return new DynMethodResult(Convert.ToDecimal(TimeSpan.FromTicks(((DateTime)val).Ticks).TotalHours));
}
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "days" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Object val = Parameters[0];
if (val != null && (val.GetType() == typeof(TimeSpan) || val.GetType() == typeof(TimeSpan?)))
{
return new DynMethodResult(Convert.ToDecimal(((TimeSpan)val).TotalDays));
}
if (val != null && (val.GetType() == typeof(DateTime) || val.GetType() == typeof(DateTime?)))
{
return new DynMethodResult(Convert.ToDecimal(TimeSpan.FromTicks(((DateTime)val).Ticks).TotalDays));
}
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "minutes" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Object val = Parameters[0];
if (val != null && (val.GetType() == typeof(TimeSpan) || val.GetType() == typeof(TimeSpan?)))
{
return new DynMethodResult(Convert.ToDecimal(((TimeSpan)val).TotalMinutes));
}
if (val != null && (val.GetType() == typeof(DateTime) || val.GetType() == typeof(DateTime?)))
{
return new DynMethodResult(Convert.ToDecimal(TimeSpan.FromTicks(((DateTime)val).Ticks).TotalMinutes));
}
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "seconds" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Object val = Parameters[0];
if (val != null && (val.GetType() == typeof(TimeSpan) || val.GetType() == typeof(TimeSpan?)))
{
return new DynMethodResult(Convert.ToDecimal(((TimeSpan)val).TotalSeconds));
}
if (val != null && (val.GetType() == typeof(DateTime) || val.GetType() == typeof(DateTime?)))
{
return new DynMethodResult(Convert.ToDecimal(TimeSpan.FromTicks(((DateTime)val).Ticks).TotalSeconds));
}
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "milliseconds" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
Object val = Parameters[0];
if (val != null && (val.GetType() == typeof(TimeSpan) || val.GetType() == typeof(TimeSpan?)))
{
return new DynMethodResult(Convert.ToDecimal(((TimeSpan)val).TotalMilliseconds));
}
if (val != null && (val.GetType() == typeof(DateTime) || val.GetType() == typeof(DateTime?)))
{
return new DynMethodResult(Convert.ToDecimal(TimeSpan.FromTicks(((DateTime)val).Ticks).TotalMilliseconds));
}
}
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "weekofyear" },
Body = (DynLanContext, Parameters) =>
{
Int32?val = null;
if (Parameters.Count > 0)
{
try
{
DateTime?val2 = UniConvert.ToDateTimeN(Parameters[0]);
if (val2 != null)
{
return new DynMethodResult(
(Int32)Math.Floor(val2.Value.DayOfYear / 7.0) + 1);
}
}
catch { }
}
return new DynMethodResult(val);
}
});
yield return(new DynMethod()
{
Names = new[] { "todatetime" },
Body = (DynLanContext, Parameters) =>
{
DateTime date = new DateTime();
if (Parameters.Count > 0)
{
Object val = Parameters[0];
String str = UniConvert.ToUniString(val ?? "");
if (UniConvert.TryParseUniDateTime(str, out date))
{
}
}
return new DynMethodResult(date);
}
});
yield return(new DynMethod()
{
Names = new[] { "todate" },
Body = (DynLanContext, Parameters) =>
{
DateTime date = new DateTime();
if (Parameters.Count > 0)
{
Object val = Parameters[0];
String str = UniConvert.ToUniString(val ?? "");
if (UniConvert.TryParseUniDateTime(str, out date))
{
}
}
return new DynMethodResult(date.Date);
}
});
yield return(new DynMethod()
{
Names = new[] { "format" },
Body = (DynLanContext, Parameters) =>
{
String r = "";
if (Parameters.Count > 1)
{
Object val = Parameters[0];
String format = Convert.ToString(Parameters[1] ?? "");
if (val != null && (val is DateTime || val is DateTime?))
{
r = StringHelper.FormatDate((DateTime)val, format);
}
}
return new DynMethodResult(r);
}
});
yield return(new DynMethod()
{
Names = new[] { "tostring" },
Body = (DynLanContext, Parameters) =>
{
if (Parameters.Count > 0)
{
var result = UniConvert.ToUniString(Parameters[0] ?? "");
if (Parameters.Count > 1)
{
var len = Convert.ToInt32(Parameters[1]);
var txt = (Convert.ToString(Parameters[2]) ?? "");
txt = txt.Replace("\"", "").Replace("'", "");
while (result.Length < len)
{
result = txt + result;
}
}
return new DynMethodResult(result);
}
return new DynMethodResult("");
}
});
yield return(new DynMethod()
{
Names = new[] { "sqrt" },
Body = (DynLanContext, Parameters) =>
{
try
{
if (Parameters.Count > 0)
{
Object val = Parameters[0];
Decimal result = UniConvert.ToDecimal(val);
return new DynMethodResult((decimal)Math.Sqrt((double)result));
}
}
catch { }
return new DynMethodResult(0);
}
});
yield return(new DynMethod()
{
Names = new[] { "adddays" },
Body = (DynLanContext, Parameters) =>
{
try
{
if (Parameters.Count > 0)
{
Object v = Parameters[0];
if (v != null && (v.GetType() == typeof(DateTime) || v.GetType() == typeof(DateTime?)))
{
DateTime date = (DateTime)v;
if (Parameters.Count > 0)
{
var days = UniConvert.ToInt32(Parameters[1]);
date = date.AddDays(days);
}
return new DynMethodResult(date);
}
}
return new DynMethodResult(
new DateTime());
}
catch
{
return new DynMethodResult(0);
}
}
});
yield return(new DynMethod()
{
Names = new[] { "addyears" },
Body = (DynLanContext, Parameters) =>
{
try
{
if (Parameters.Count > 0)
{
Object v = Parameters[0];
if (v != null && (v.GetType() == typeof(DateTime) || v.GetType() == typeof(DateTime?)))
{
DateTime date = (DateTime)v;
if (Parameters.Count > 0)
{
var years = UniConvert.ToInt32(Parameters[1]);
date = date.AddYears(years);
}
return new DynMethodResult(date);
}
}
return new DynMethodResult(new DateTime());
}
catch
{
return new DynMethodResult(0);
}
}
});
yield return(new DynMethod()
{
Names = new[] { "addmonths" },
Body = (DynLanContext, Parameters) =>
{
try
{
if (Parameters.Count > 0)
{
Object v = Parameters[0];
if (v != null && (v.GetType() == typeof(DateTime) || v.GetType() == typeof(DateTime?)))
{
DateTime date = (DateTime)v;
if (Parameters.Count > 0)
{
var months = UniConvert.ToInt32(Parameters[1]);
date = date.AddMonths(months);
}
return new DynMethodResult(date);
}
}
return new DynMethodResult(new DateTime());
}
catch
{
return new DynMethodResult(0);
}
}
});
yield return(new DynMethod()
{
Names = new[] { "rand" },
Body = (DynLanContext, Parameters) =>
{
return new DynMethodResult(
Convert.ToDecimal(
new Random(DateTime.Now.Millisecond).NextDouble()));
}
});
}
public static Boolean EvaluateQueue(
DynContext DynLanContext)
{
ExpressionState expState = DynLanContext.CurrentExpressionState;
ExpressionContext expContext = DynLanContext.CurrentExpressionContext;
// policzenie nastepnego parametru
if (expState.AreParametersCalculating)
{
expState.ParameterIndex++;
if (expState.ParameterIndex < expState.ParameterTokens.Count)
{
Boolean result = false;
ExpressionToken parameterToken = expState.ParameterTokens[expState.ParameterIndex];
if (parameterToken.TokenType == TokenType.VARIABLE)
{
result = ObjectValueGetter.EvaluateValue(
parameterToken.TokenName,
DynLanContext);
}
else if (parameterToken.TokenType == TokenType.VALUE)
{
ExpressionValue operationValue = StringHelper.
GetValueFromText(parameterToken.TokenChars);
Object value = (
operationValue == null ? null : operationValue.Value);
expState.Parameters.Add(value);
}
else
{
throw new DynLanIncorrectExpressionFormatException();
}
return(result);
}
}
// czy zakończyć i zapisać wynik
if (expState.TokenIndex >= expState.Expression.Tokens.Count)
{
Object finResult = null;
if (expState.ValueStack.Count > 0)
{
finResult = MyCollectionsExtenders.Pop(expState.ValueStack);
}
expState.ValueStack.Clear();
expState.Finished = true;
expState.Result = InternalTypeConverter.ToOuter(finResult);
MyCollectionsExtenders.Pop(expContext.Stack);
if (expContext.Current != null)
{
expContext.Current.PushValue(InternalTypeConverter.ToOuter(finResult));
return(false);
}
else
{
expContext.Result = InternalTypeConverter.ToOuter(finResult);
expContext.IsFinished = true;
return(true);
}
}
Boolean isFirstToken = expState.TokenIndex == 0;
ExpressionToken token = expState.
Expression.
Tokens[expState.TokenIndex];
ExpressionTokens sequence = new ExpressionTokens(
new TokenizerQueue().
GetNextTokensOnSameLevel(expState.Expression.Tokens, expState.TokenIndex));
Int32 originalSequenceCount = sequence.Count;
sequence.RemoveBrackets();
// wykonanie następnej operacji
if (token.TokenType == TokenType.BRACKET_BEGIN)
{
IList <ExpressionToken> prevSequenceTokens = new TokenizerQueue().
GetPrevTokensOnSameLevel(expState.Expression.Tokens, expState.TokenIndex - 1);
ExpressionTokens prev_sequence = prevSequenceTokens == null ?
null : new ExpressionTokens(prevSequenceTokens);
// jeśli poprzedni operator to @
if (
prev_sequence != null && prev_sequence.Count == 1 &&
OnpOnpTokenHelper.IsFunctionOperatorToken(prev_sequence[0]))
{
Boolean result = false;
if (sequence.Count == 0 || expState.AreParametersCalculated)
{
Object obj = expState.ValueStack.Count == 1 ?
new EmptyObject() :
MyCollectionsExtenders.Peek(expState.ValueStack, 1);
Object methodObject = MyCollectionsExtenders.
Peek(expState.ValueStack, 0);
result = EvaluatorForMethods.EvaluateMethod(
obj,
methodObject,
expState.Parameters,
DynLanContext);
expState.CleanParametersState();
expState.TokenIndex += originalSequenceCount;
}
else
{
expState.ParameterTokens = GetParameterTokens(sequence);
expState.ParameterIndex = -1;
expState.Parameters = new List <Object>();
result = false;
}
return(result);
}
// jeśli poprzedni operator to .
else if (
prev_sequence != null && prev_sequence.Count == 1 &&
OnpOnpTokenHelper.IsPropertyOperatorToken(prev_sequence[0]))
{
throw new DynLanIncorrectExpressionFormatException();
}
// jeśli brak poprzedniego operatora
else if (
prev_sequence == null &&
sequence.Count == 1)
{
Boolean result = false;
if (sequence[0].TokenType == TokenType.VARIABLE)
{
result = ObjectValueGetter.EvaluateValue(
sequence[0].TokenName,
DynLanContext);
}
else if (sequence[0].TokenType == TokenType.VALUE)
{
ExpressionValue operationValue = StringHelper.
GetValueFromText(sequence[0].TokenChars);
Object value = (
operationValue == null ? null : operationValue.Value);
expState.PushValue(value);
}
else
{
throw new DynLanIncorrectExpressionFormatException();
}
expState.TokenIndex += originalSequenceCount; // -1;
return(result);
}
else
{
throw new DynLanInvalidExpressionException("Incorrect expression " + expState.Expression.Tokens.JoinToString(expState.TokenIndex) + "!");
}
}
else if (token.TokenType == TokenType.VALUE)
{
ExpressionValue operationValue = StringHelper.
GetValueFromText(token.TokenChars);
Object value = (
operationValue == null ? null : operationValue.Value);
if (isFirstToken)
{
expState.PushValue(value);
}
else
{
Object prevValue = MyCollectionsExtenders.Peek(expState.ValueStack);
prevValue = InternalTypeConverter.
ToOuter(prevValue);
Object method = ObjectValueGetter.GetValueFromObject(
prevValue,
UniConvert.ToString(value));
expState.PushValue(method);
}
expState.TokenIndex += originalSequenceCount; // -1
}
else if (token.TokenType == TokenType.PROPERTY_NAME)
{
if (isFirstToken)
{
throw new DynLanIncorrectExpressionFormatException();
}
else
{
Object prevValue = MyCollectionsExtenders.Peek(expState.ValueStack);
prevValue = InternalTypeConverter.
ToOuter(prevValue);
Object value = ObjectValueGetter.GetValueFromObject(
prevValue,
token.TokenName);
expState.PushValue(value);
}
expState.TokenIndex += originalSequenceCount; // -1
}
else if (token.TokenType == TokenType.VARIABLE)
{
Boolean result = false;
ExpressionToken next_token = expState.TokenIndex + 1 < expState.Expression.Tokens.Count ?
expState.Expression.Tokens[expState.TokenIndex + 1] :
null;
Object prevValue = null;
if (isFirstToken)
{
prevValue = new EmptyObject();
/*result = ObjectValueGetter.EvaluateValueOrMethod(
* new EMPTY_OBJECT(),
* sequence[0].TokenName,
* -1,
* DynLanContext);*/
}
else
{
prevValue = (
expState.ValueStack.Count == 0 ?
null :
MyCollectionsExtenders.Peek(expState.ValueStack));
}
prevValue = InternalTypeConverter.
ToOuter(prevValue);
Int32 paramCount = -1;
// jeśli następny operator to operator wołania funkcji @ to pobieramy z niego liczbę parametrów dla funkcji
if (OnpOnpTokenHelper.IsFunctionOperatorToken(next_token) &&
next_token.TokenData != null &&
next_token.TokenData.FunctionParametersCount != null)
{
paramCount = next_token.TokenData.FunctionParametersCount.Value;
}
else
{
paramCount = -1;
}
result = ObjectValueGetter.EvaluateValueOrMethod(
prevValue,
sequence[0].TokenName,
paramCount,
DynLanContext);
if (MyCollectionsExtenders.Peek(DynLanContext.CurrentExpressionState.ValueStack) == null)
{
ExpressionToken next_next_token = expState.TokenIndex + 2 < expState.Expression.Tokens.Count ?
expState.Expression.Tokens[expState.TokenIndex + 2] :
null;
if (next_token.TokenType == TokenType.OPERATOR &&
OnpOnpTokenHelper.IsPropertyOperatorToken(next_token) &&
next_next_token != null)
{
}
else
{
next_next_token = null;
}
if (paramCount < 0)
{
if (next_next_token != null)
{
ExpressionToken next_next_next_next_next_token = expState.TokenIndex + 5 < expState.Expression.Tokens.Count ?
expState.Expression.Tokens[expState.TokenIndex + 5] :
null;
if (next_next_token.TokenName == "__EXT_SET" && next_next_next_next_next_token != null)
{
throw new DynLanMethodNotFoundException("Cannot find property " + next_next_next_next_next_token.TokenName + " in undefined object '" + sequence[0].TokenName + "'");
}
else
{
throw new DynLanMethodNotFoundException("Cannot call method '" + next_next_token.TokenName + "' in undefined object '" + sequence[0].TokenName + "'");
}
}
else
{
throw new DynLanMethodNotFoundException("Undefined object '" + sequence[0].TokenName + "'");
}
}
else
{
throw new DynLanMethodNotFoundException("Undefined method '" + sequence[0].TokenName + "' " + (prevValue == null ? "in undefined object" : ("in object of type " + prevValue.GetType().Name)));
}
}
expState.TokenIndex += originalSequenceCount; // -1
return(result);
}
else if (token.TokenType == TokenType.OPERATOR)
{
if (!OnpOnpTokenHelper.IsFunctionOperatorToken(token) &&
!OnpOnpTokenHelper.IsPropertyOperatorToken(token))
{
throw new DynLanIncorrectExpressionFormatException();
}
expState.TokenIndex += originalSequenceCount; // -1
}
if (MyCollectionsExtenders.Peek(expState.ValueStack) == null)
{
return(false);
}
return(false);
}
