private IObject ParsString(Dictionary<string, IObject> scope, string str) { if (str == null || str == "" || str == " ") return new IObject(); if (SimpleMethodCall.IsMatch(str)) { string methodName = SimpleMethodCall.Match(str).Groups[1].Value; if (scope.ContainsKey(methodName)) { string methodArgsStr = SimpleMethodCall.Match(str).Groups[2].Value; string[] inParams = Tools.SplitArgs(methodArgsStr); List<IObject> inIObjectParams = new List<IObject>(); for (int i = 0; i < inParams.Length; ++i) { IObject obj = ParsString(scope, inParams[i]); if (!(obj.IType == IObjectType.I_Error || obj.IType == IObjectType.I_Null)) inIObjectParams.Add(obj); } if (scope.ContainsKey(methodName)) { IObject methodObj = GetIObjectFromScope(scope, methodName); IObject ret = methodObj.MethodOperator(inIObjectParams.ToArray()); return ret; } } } else if(SimpleString.IsMatch(str)) { IObject ret = new I_String(SimpleString.Match(str).Groups[1].Value); return ret; } else if (SimpleVariable.IsMatch(str)) { string variableName = SimpleVariable.Match(str).Groups[1].Value; if (scope.ContainsKey(variableName)) { IObject ret = GetIObjectFromScope(scope, variableName); return ret; } if (userdefinedIObjects.ContainsKey(variableName)) { IObject ret = userdefinedIObjects[variableName]; return ret; } } else if (SimpleInteger.IsMatch(str)) { string integerValueStr = SimpleInteger.Match(str).Groups[1].Value; return new I_Int(integerValueStr); } else if (SimpleFloat.IsMatch(str)) { string floatValueStr = SimpleFloat.Match(str).Groups[1].Value; floatValueStr = floatValueStr.Replace('.', ','); if (floatValueStr.Length < 10) { IObject ret = new I_Float(Double.Parse(floatValueStr)); return ret; } else { try { IObject ret = new I_Float(double.Parse(floatValueStr)); return ret; } catch { IObject ret = new I_Error("Float to big. Must be in range (10^k where |k| < 308)."); return ret; } } } else if (SimpleDeclaration.IsMatch(str)) { string type = SimpleDeclaration.Match(str).Groups[1].Value; string name = SimpleDeclaration.Match(str).Groups[2].Value; string operand = SimpleDeclaration.Match(str).Groups[3].Value; string value = SimpleDeclaration.Match(str).Groups[4].Value; if (!types.ContainsKey(type)) return new I_Error("Type not recognized."); IObject_Constructor ioc = types[type]; if (value == "") { if (operand == "") { IObject newInstanse = ioc.GetNewInstans(); IObject ret = AddOrUpdateUserDefinedIObject(name, newInstanse); return ret; } else { variableBracket.Name = name; variableBracket.IType = ioc.GetObjectType(); return new IObject(); } } else { IObject getValue = ParsString(scope, value); IObject[] objInParams = { getValue }; IObject newValue = ioc.GetNewInstans(objInParams); if (newValue.IType == IObjectType.I_Error) { IObject ret = newValue; return ret; } else { IObject ret = AddOrUpdateUserDefinedIObject(name, newValue); return ret; } } } else if (SimpleEqual.IsMatch(str)) { string variableName = SimpleEqual.Match(str).Groups[1].Value; string variableValueStr = SimpleEqual.Match(str).Groups[2].Value; if (userdefinedIObjects.ContainsKey(variableName)) { // The variable exists, need to do a new version of it. IObject compiledValue = ParsString(scope, variableValueStr); IObject previousVersionValue = GetUserDefinedIObject(variableName); IObject newVersionCopy; switch (compiledValue.IType) { case IObjectType.I_Null: newVersionCopy = new IObject(); break; case IObjectType.I_Error: newVersionCopy = new I_Error(((I_Error)compiledValue)); break; default: newVersionCopy = iTypes.GetConstructor(compiledValue.IType).GetNewInstans(compiledValue); break; } AddOrUpdateUserDefinedIObject(variableName, newVersionCopy); newVersionCopy.EqualOperator(compiledValue); return newVersionCopy; } else { IObject compiledValue = ParsString(scope, variableValueStr); AddOrUpdateUserDefinedIObject(variableName, compiledValue); return compiledValue; } } else if (SimpleEqualBracket.IsMatch(str)) { string variableName = SimpleEqualBracket.Match(str).Groups[1].Value; variableBracket.Name = variableName; return new IObject(); } else if (SimpleDotSeparator.IsMatch(str)) { string memberName = SimpleDotSeparator.Match(str).Groups[1].Value; string rest = SimpleDotSeparator.Match(str).Groups[2].Value; Dictionary<string, IObject> newScope = ParsString(scope, memberName).GetMembers(); if (newScope.Count == 0) { newScope = ParsString(preDefinedIObjects, memberName).GetMembers(); } if (newScope.Count == 0 && types.ContainsKey(memberName)) { newScope = types[memberName].GetMembers(); } IObject ret = ParsString(newScope, rest); return ret; } if (operandTree.ContainOperands(str)) { return operandTree.ParseOperands(str, scope); } if (SimpleContainsParentheses.IsMatch(str)) { IObject ret = ParsParentheses(scope, str); if (ret.IType != IObjectType.I_Null) { return ret; } } IObject finalReturn = new I_Error("Command not understood (" + str + ")"); return finalReturn; }
private IObject ParsString(Dictionary <string, IObject> scope, string str) { if (str == null || str == "" || str == " ") { return(new IObject()); } if (SimpleMethodCall.IsMatch(str)) { string methodName = SimpleMethodCall.Match(str).Groups[1].Value; if (scope.ContainsKey(methodName)) { string methodArgsStr = SimpleMethodCall.Match(str).Groups[2].Value; string[] inParams = Tools.SplitArgs(methodArgsStr); List <IObject> inIObjectParams = new List <IObject>(); for (int i = 0; i < inParams.Length; ++i) { IObject obj = ParsString(scope, inParams[i]); if (!(obj.IType == IObjectType.I_Error || obj.IType == IObjectType.I_Null)) { inIObjectParams.Add(obj); } } if (scope.ContainsKey(methodName)) { IObject methodObj = GetIObjectFromScope(scope, methodName); IObject ret = methodObj.MethodOperator(inIObjectParams.ToArray()); return(ret); } } } else if (SimpleString.IsMatch(str)) { IObject ret = new I_String(SimpleString.Match(str).Groups[1].Value); return(ret); } else if (SimpleVariable.IsMatch(str)) { string variableName = SimpleVariable.Match(str).Groups[1].Value; if (scope.ContainsKey(variableName)) { IObject ret = GetIObjectFromScope(scope, variableName); return(ret); } if (userdefinedIObjects.ContainsKey(variableName)) { IObject ret = userdefinedIObjects[variableName]; return(ret); } } else if (SimpleInteger.IsMatch(str)) { string integerValueStr = SimpleInteger.Match(str).Groups[1].Value; return(new I_Int(integerValueStr)); } else if (SimpleFloat.IsMatch(str)) { string floatValueStr = SimpleFloat.Match(str).Groups[1].Value; floatValueStr = floatValueStr.Replace('.', ','); if (floatValueStr.Length < 10) { IObject ret = new I_Float(Double.Parse(floatValueStr)); return(ret); } else { try { IObject ret = new I_Float(double.Parse(floatValueStr)); return(ret); } catch { IObject ret = new I_Error("Float to big. Must be in range (10^k where |k| < 308)."); return(ret); } } } else if (SimpleDeclaration.IsMatch(str)) { string type = SimpleDeclaration.Match(str).Groups[1].Value; string name = SimpleDeclaration.Match(str).Groups[2].Value; string operand = SimpleDeclaration.Match(str).Groups[3].Value; string value = SimpleDeclaration.Match(str).Groups[4].Value; if (!types.ContainsKey(type)) { return(new I_Error("Type not recognized.")); } IObject_Constructor ioc = types[type]; if (value == "") { if (operand == "") { IObject newInstanse = ioc.GetNewInstans(); IObject ret = AddOrUpdateUserDefinedIObject(name, newInstanse); return(ret); } else { variableBracket.Name = name; variableBracket.IType = ioc.GetObjectType(); return(new IObject()); } } else { IObject getValue = ParsString(scope, value); IObject[] objInParams = { getValue }; IObject newValue = ioc.GetNewInstans(objInParams); if (newValue.IType == IObjectType.I_Error) { IObject ret = newValue; return(ret); } else { IObject ret = AddOrUpdateUserDefinedIObject(name, newValue); return(ret); } } } else if (SimpleEqual.IsMatch(str)) { string variableName = SimpleEqual.Match(str).Groups[1].Value; string variableValueStr = SimpleEqual.Match(str).Groups[2].Value; if (userdefinedIObjects.ContainsKey(variableName)) { // The variable exists, need to do a new version of it. IObject compiledValue = ParsString(scope, variableValueStr); IObject previousVersionValue = GetUserDefinedIObject(variableName); IObject newVersionCopy; switch (compiledValue.IType) { case IObjectType.I_Null: newVersionCopy = new IObject(); break; case IObjectType.I_Error: newVersionCopy = new I_Error(((I_Error)compiledValue)); break; default: newVersionCopy = iTypes.GetConstructor(compiledValue.IType).GetNewInstans(compiledValue); break; } AddOrUpdateUserDefinedIObject(variableName, newVersionCopy); newVersionCopy.EqualOperator(compiledValue); return(newVersionCopy); } else { IObject compiledValue = ParsString(scope, variableValueStr); AddOrUpdateUserDefinedIObject(variableName, compiledValue); return(compiledValue); } } else if (SimpleEqualBracket.IsMatch(str)) { string variableName = SimpleEqualBracket.Match(str).Groups[1].Value; variableBracket.Name = variableName; return(new IObject()); } else if (SimpleDotSeparator.IsMatch(str)) { string memberName = SimpleDotSeparator.Match(str).Groups[1].Value; string rest = SimpleDotSeparator.Match(str).Groups[2].Value; Dictionary <string, IObject> newScope = ParsString(scope, memberName).GetMembers(); if (newScope.Count == 0) { newScope = ParsString(preDefinedIObjects, memberName).GetMembers(); } if (newScope.Count == 0 && types.ContainsKey(memberName)) { newScope = types[memberName].GetMembers(); } IObject ret = ParsString(newScope, rest); return(ret); } if (operandTree.ContainOperands(str)) { return(operandTree.ParseOperands(str, scope)); } if (SimpleContainsParentheses.IsMatch(str)) { IObject ret = ParsParentheses(scope, str); if (ret.IType != IObjectType.I_Null) { return(ret); } } IObject finalReturn = new I_Error("Command not understood (" + str + ")"); return(finalReturn); }
public I_Number(I_Float v) { value = v; iType = IObjectType.I_Number; }
public I_Number(I_Float v) { value = v; iType = IObjectType.I_Number; }