internal RecursiveCodeLog Analyse(SyntaxGroup code)
{
Assignee = code.Component.text;
Operator = code.Operator.text;
Line = code.Component.line;
//If we can detect at least one code block
List <SyntaxGroup> list = code.Operand as List <SyntaxGroup>;
if (list != null)
{
try
{
CodeBlock block = new CodeBlock(Level + 1);
RecursiveCodeLog log = block.Analyse(list);
if (log != null)
{
log.AddToRecursiveChain("Error during analysis chain",
Assignee, Line.ToString());
return(log);
}
Value = block;
}
catch (Exception)
{
//TODO: Add language support
RecursiveCodeLog log = new RecursiveCodeLog();
log.AddToRecursiveChain("Impossible to analyze associated code",
Assignee, Line.ToString());
return(log);
}
}
//If we get pure text
else if (code.Operand is Token)
{
Value = new CodeValue(((Token)code.Operand).text);
}
//If we got a list of tokens, a chain of pure text
else if (code.Operand is List <Token> )
{
Value = new CodeBlock();
((CodeBlock)Value).Analyse((List <Token>)code.Operand);
}
return(null);
}
public Script GetContentAsScript(string[] except, Dictionary <int, string> Comments = null)
{
Script newScript = new Script();
if (Value is CodeBlock)
{
foreach (ICodeStruct codeStruct in ((CodeBlock)Value).Code)
{
Assignation item = (Assignation)codeStruct;
if (!except.Contains(item.Assignee))
{
newScript.Code.Add(item);
}
}
}
else
{
//TODO: Add language support
RecursiveCodeLog log = new RecursiveCodeLog();
log.AddToRecursiveChain("Impossible to obtain content, assigned value is not code",
Assignee, Line.ToString());
newScript.Logger.Errors.Add(new SyntaxError(log.Message));
}
//If no comments are given
if (Comments == null)
{
return(newScript);
}
Assignation firstLine = newScript.Code.Where(i => i is Assignation)
.OrderBy(i => ((Assignation)i).Line).FirstOrDefault() as Assignation;
Assignation lastLine = newScript.Code.Where(i => i is Assignation)
.OrderBy(i => ((Assignation)i).Line).LastOrDefault() as Assignation;
//If no lines were found
if (firstLine == null || lastLine == null)
{
return(newScript);
}
//Try to get the comments
newScript.Comments = Comments.SkipWhile(c => c.Key < firstLine.Line)
.TakeWhile(c => c.Key <= lastLine.Line)
.ToDictionary(c => c.Key, c => c.Value);
return(newScript);
}