public override Boolean Execute(OALProgram OALProgram, EXEScope Scope)
{
//Console.WriteLine("Assignment is being executed");
Boolean Result = false;
String AssignedValue = this.AssignedExpression.Evaluate(Scope, OALProgram.ExecutionSpace);
if (AssignedValue == null)
{
return(Result);
}
// If we are assigning to a variable
if (this.AttributeName == null)
{
//Console.WriteLine("Assigning value: " + AssignedValue + " to variable " + this.VariableName);
EXEPrimitiveVariable Variable = Scope.FindPrimitiveVariableByName(this.VariableName);
// If the variable doesnt exist, we simply create it
if (Variable == null)
{
//Console.WriteLine("Creating new var " + this.VariableName);
Result = Scope.AddVariable(new EXEPrimitiveVariable(this.VariableName, AssignedValue));
}
//If variable exists and its type is UNDEFINED
else if (EXETypes.UnitializedName.Equals(Variable.Type))
{
//Console.WriteLine("Assigning to unitialized var" + this.VariableName);
Result = Variable.AssignValue(Variable.Name, AssignedValue);
}
// If the variable exists and is primitive
else if (!EXETypes.ReferenceTypeName.Equals(Variable.Type))
{
//Console.WriteLine("Assigning to initialized var" + this.VariableName);
// If the types don't match, this fails and returns false
AssignedValue = EXETypes.AdjustAssignedValue(Variable.Type, AssignedValue);
Result = Variable.AssignValue("", AssignedValue);
}
// Variable exists and is not primitive. What to do, what to do?
// We do nothing, we CANNOT ASSIGN TO HANDLES!!!
}
// We are assigning to an attribute of a variable
else
{
EXEReferenceEvaluator RefEvaluator = new EXEReferenceEvaluator();
Result = RefEvaluator.SetAttributeValue(this.VariableName, this.AttributeName, Scope, OALProgram.ExecutionSpace, AssignedValue);
//Console.WriteLine("Tried to assign " + AssignedValue + " to " + this.VariableName + "." + this.AttributeName);
}
//Console.WriteLine("Assignment Result: " + Result);
return(Result);
}
// SetUloh2
public override bool Execute(OALProgram OALProgram, EXEScope Scope)
{
//Create an instance of given class -> will affect ExecutionSpace.
//If ReferencingVariableName is provided (is not ""), create a referencing variable pointing to this instance -> will affect scope
CDClass Class = OALProgram.ExecutionSpace.getClassByName(this.ClassName);
if (Class == null)
{
return(false);
}
EXEReferencingVariable Variable = Scope.FindReferencingVariableByName(this.ReferencingVariableName);
if (Variable != null)
{
if (!String.Equals(this.ClassName, Variable.ClassName))
{
return(false);
}
}
CDClassInstance Instance = Class.CreateClassInstance();
if (Instance == null)
{
return(false);
}
if (!"".Equals(this.ReferencingVariableName))
{
if (Variable != null)
{
Variable.ReferencedInstanceId = Instance.UniqueID;
}
else
{
Variable = new EXEReferencingVariable(this.ReferencingVariableName, Class.Name, Instance.UniqueID);
return(Scope.AddVariable(Variable));
}
}
return(true);
}
// SetUloh2
public override bool Execute(OALProgram OALProgram, EXEScope Scope)
{
//Select instances of given class that match the criteria and assign them to variable with given name
// ClassName tells us which class we are interested in
// Cardinality tells us whether we want one random instance (matching the criteria) or all of them
// "Many" - we create variable EXEReferencingSetVariable, "Any" - we create variable EXEReferencingVariable
// Variable name tells us how to name the newly created referencing variable
// Where condition tells us which instances to select from all instances of the class (just do EXEASTNode.Evaluate and return true if the result "true" and false for "false")
// When making unit tests, do not use the "where" causule yet, because its evaluation is not yet implemented
// If relationship selection does not exists, this is problem
if (this.RelationshipSelection == null)
{
return(false);
}
CDClass Class = OALProgram.ExecutionSpace.getClassByName(this.RelationshipSelection.GetLastClassName());
if (Class == null)
{
return(false);
}
// We need to check, if the variable already exists, it must be of corresponding type
if (Scope.VariableNameExists(this.VariableName))
{
if
(
!(
(EXECommandQuerySelect.CardinalityAny.Equals(this.Cardinality)
&&
this.RelationshipSelection.GetLastClassName() == Scope.FindReferencingVariableByName(this.VariableName).ClassName)
||
(EXECommandQuerySelect.CardinalityMany.Equals(this.Cardinality)
&&
this.RelationshipSelection.GetLastClassName() == Scope.FindSetReferencingVariableByName(this.VariableName).ClassName)
)
)
{
return(false);
}
}
// Evaluate relationship selection. If it fails, execution fails too
List <long> SelectedIds = this.RelationshipSelection.Evaluate(OALProgram.RelationshipSpace, Scope);
if (SelectedIds == null)
{
return(false);
}
// If class has no instances, command may execute successfully, but we better verify references in the WHERE condition
if (SelectedIds.Count() == 0 && this.WhereCondition != null)
{
return(this.WhereCondition.VerifyReferences(Scope, OALProgram.ExecutionSpace));
}
// Now let's evaluate the condition
if (this.WhereCondition != null && SelectedIds.Any())
{
String TempSelectedVarName = "selected";
EXEReferencingVariable SelectedVar = new EXEReferencingVariable(TempSelectedVarName, this.RelationshipSelection.GetLastClassName(), -1);
if (!Scope.AddVariable(SelectedVar))
{
return(false);
}
List <long> ResultIds = new List <long>();
foreach (long Id in SelectedIds)
{
SelectedVar.ReferencedInstanceId = Id;
String ConditionResult = this.WhereCondition.Evaluate(Scope, OALProgram.ExecutionSpace);
//Console.Write(Id + " : " + ConditionResult);
if (!EXETypes.IsValidValue(ConditionResult, EXETypes.BooleanTypeName))
{
Scope.DestroyReferencingVariable(TempSelectedVarName);
return(false);
}
if (EXETypes.BooleanTrue.Equals(ConditionResult))
{
ResultIds.Add(Id);
}
}
SelectedIds = ResultIds;
Scope.DestroyReferencingVariable(TempSelectedVarName);
}
// Now we have ids of selected instances. Let's assign them to a variable
if (EXECommandQuerySelect.CardinalityMany.Equals(this.Cardinality))
{
EXEReferencingSetVariable Variable = Scope.FindSetReferencingVariableByName(this.VariableName);
if (Variable == null)
{
Variable = new EXEReferencingSetVariable(this.VariableName, this.RelationshipSelection.GetLastClassName());
if (!Scope.AddVariable(Variable))
{
return(false);
}
}
foreach (long Id in SelectedIds)
{
Variable.AddReferencingVariable(new EXEReferencingVariable("", Variable.ClassName, Id));
}
}
else if (EXECommandQuerySelect.CardinalityAny.Equals(this.Cardinality))
{
EXEReferencingVariable Variable = Scope.FindReferencingVariableByName(this.VariableName);
if (Variable == null)
{
long ResultId = SelectedIds.Any() ? SelectedIds[new Random().Next(SelectedIds.Count)] : -1;
Variable = new EXEReferencingVariable(this.VariableName, this.RelationshipSelection.GetLastClassName(), ResultId);
if (!Scope.AddVariable(Variable))
{
return(false);
}
}
}
else
{
return(false);
}
return(true);
}
