public static List <CodeCommand> Optimize(List <CodeCommand> codes) { List <CodeCommand> opCodes = InternalOptimize(codes); foreach (CodeCommand cmd in opCodes) { switch (cmd.Type) { case CodeType.If: { Debug.Assert(cmd.Info.GetType() == typeof(CodeInfo_If)); CodeInfo_If info = cmd.Info as CodeInfo_If; info.Link = Optimize(info.Link); } break; case CodeType.Else: { Debug.Assert(cmd.Info.GetType() == typeof(CodeInfo_Else)); CodeInfo_Else info = cmd.Info as CodeInfo_Else; info.Link = Optimize(info.Link); } break; } } return(opCodes); }
public static List <CodeCommand> Optimize(List <CodeCommand> codes) { List <CodeCommand> opCodes = InternalOptimize(codes); foreach (CodeCommand cmd in opCodes) { switch (cmd.Type) { case CodeType.If: { CodeInfo_If info = cmd.Info.Cast <CodeInfo_If>(); info.Link = Optimize(info.Link); } break; case CodeType.Else: { CodeInfo_Else info = cmd.Info.Cast <CodeInfo_Else>(); info.Link = Optimize(info.Link); } break; } } return(opCodes); }
public static void If(EngineState s, CodeCommand cmd) { Debug.Assert(cmd.Info.GetType() == typeof(CodeInfo_If)); CodeInfo_If info = cmd.Info as CodeInfo_If; if (CheckBranchCondition(s, info.Condition, out string msg)) { // Condition matched, run it s.Logger.Build_Write(s, new LogInfo(LogState.Success, msg, cmd, s.CurDepth)); int depthBackup = s.CurDepth; Engine.RunCommands(s, cmd.Addr, info.Link, s.CurSectionParams, s.CurDepth + 1, false); s.CurDepth = depthBackup; s.Logger.Build_Write(s, new LogInfo(LogState.Info, $"End of CodeBlock", cmd, s.CurDepth)); s.ElseFlag = false; } else { // Do not run s.Logger.Build_Write(s, new LogInfo(LogState.Ignore, msg, cmd, s.CurDepth)); s.ElseFlag = true; } }
private void InternalValidateCodes(List <CodeCommand> codes, List <LogInfo> logs) { foreach (CodeCommand cmd in codes) { switch (cmd.Type) { case CodeType.If: { Debug.Assert(cmd.Info.GetType() == typeof(CodeInfo_If)); CodeInfo_If info = cmd.Info as CodeInfo_If; if (info.Condition.Type == BranchConditionType.ExistSection) { // Exception Handling for 1-files.script // If,ExistSection,%ScriptFile%,Cache_Delete_B,Run,%ScriptFile%,Cache_Delete_B if (info.Condition.Arg1.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase)) { if (info.Embed.Type == CodeType.Run || info.Embed.Type == CodeType.Exec) { Debug.Assert(info.Embed.Info.GetType() == typeof(CodeInfo_RunExec)); CodeInfo_RunExec subInfo = info.Embed.Info as CodeInfo_RunExec; if (subInfo.ScriptFile.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase)) { if (info.Condition.Arg2.Equals(subInfo.SectionName, StringComparison.OrdinalIgnoreCase)) { continue; } } } } } InternalValidateCodes(info.Link, logs); } break; case CodeType.Else: { Debug.Assert(cmd.Info.GetType() == typeof(CodeInfo_Else)); CodeInfo_Else info = cmd.Info as CodeInfo_Else; InternalValidateCodes(info.Link, logs); } break; case CodeType.Run: case CodeType.Exec: { Debug.Assert(cmd.Info.GetType() == typeof(CodeInfo_RunExec)); CodeInfo_RunExec info = cmd.Info as CodeInfo_RunExec; // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase)) { if (p.Sections.ContainsKey(info.SectionName)) { logs.AddRange(ValidateCodeSection(p.Sections[info.SectionName])); } else if (CodeParser.StringContainsVariable(info.SectionName) == false) { logs.Add(new LogInfo(LogState.Error, $"Section [{info.SectionName}] does not exist", cmd)); } } } break; case CodeType.Loop: { Debug.Assert(cmd.Info.GetType() == typeof(CodeInfo_Loop)); CodeInfo_Loop info = cmd.Info as CodeInfo_Loop; if (info.Break) { continue; } // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase)) { if (p.Sections.ContainsKey(info.SectionName)) { logs.AddRange(ValidateCodeSection(p.Sections[info.SectionName])); } else if (CodeParser.StringContainsVariable(info.SectionName) == false) { logs.Add(new LogInfo(LogState.Error, $"Section [{info.SectionName}] does not exist", cmd)); } } } break; default: break; } } }
private void RecursiveFindCodeSection(IReadOnlyList <CodeCommand> codes, List <LogInfo> logs) { string targetCodeSection = null; string targetInterfaceSection = null; foreach (CodeCommand cmd in codes) { switch (cmd.Type) { #region Check CodeSections case CodeType.If: { CodeInfo_If info = cmd.Info.Cast <CodeInfo_If>(); if (info.Condition.Type == BranchConditionType.ExistSection) { // For recursive section call // Ex) If,ExistSection,%ScriptFile%,DoWork,Run,%ScriptFile%,DoWork if (info.Condition.Arg1.Equals(Script.Const.ScriptFile, StringComparison.OrdinalIgnoreCase) && info.Embed.Type == CodeType.Run || info.Embed.Type == CodeType.RunEx || info.Embed.Type == CodeType.Exec) { CodeInfo_RunExec subInfo = info.Embed.Info.Cast <CodeInfo_RunExec>(); if (subInfo.ScriptFile.Equals(Script.Const.ScriptFile, StringComparison.OrdinalIgnoreCase)) { if (info.Condition.Arg2.Equals(subInfo.SectionName, StringComparison.OrdinalIgnoreCase)) { continue; } } } } RecursiveFindCodeSection(info.Link, logs); } break; case CodeType.Else: { CodeInfo_Else info = cmd.Info.Cast <CodeInfo_Else>(); RecursiveFindCodeSection(info.Link, logs); } break; case CodeType.Run: case CodeType.Exec: case CodeType.RunEx: { CodeInfo_RunExec info = cmd.Info.Cast <CodeInfo_RunExec>(); // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals(Script.Const.ScriptFile, StringComparison.OrdinalIgnoreCase) && !CodeParser.StringContainsVariable(info.SectionName)) { targetCodeSection = info.SectionName; } } break; case CodeType.Loop: case CodeType.LoopLetter: case CodeType.LoopEx: case CodeType.LoopLetterEx: { CodeInfo_Loop info = cmd.Info.Cast <CodeInfo_Loop>(); if (info.Break) { continue; } // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals(Script.Const.ScriptFile, StringComparison.OrdinalIgnoreCase) && !CodeParser.StringContainsVariable(info.SectionName)) { targetCodeSection = info.SectionName; } } break; case CodeType.UserInput: { CodeInfo_UserInput info = cmd.Info.Cast <CodeInfo_UserInput>(); UserInputType type = info.Type; switch (type) { case UserInputType.DirPath: case UserInputType.FilePath: { UserInputInfo_DirFile subInfo = info.SubInfo.Cast <UserInputInfo_DirFile>(); if (info.Type == UserInputType.FilePath) { // Select File if (subInfo.Filter != null) { string filter = StringEscaper.Unescape(subInfo.Filter); if (StringEscaper.IsFileFilterValid(filter) == false) { logs.Add(new LogInfo(LogState.Error, $"File filter pattern [{filter}] is invalid", cmd)); } } } else { // Select Folder if (subInfo.Filter != null) { logs.Add(new LogInfo(LogState.Warning, $"File filters cannot be used for folder selection", cmd)); } } } break; } } break; #endregion #region Check InterfaceSections case CodeType.AddInterface: { CodeInfo_AddInterface info = cmd.Info.Cast <CodeInfo_AddInterface>(); // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals(Script.Const.ScriptFile, StringComparison.OrdinalIgnoreCase) && !CodeParser.StringContainsVariable(info.Section)) { targetInterfaceSection = info.Section; } } break; case CodeType.ReadInterface: { CodeInfo_ReadInterface info = cmd.Info.Cast <CodeInfo_ReadInterface>(); // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals(Script.Const.ScriptFile, StringComparison.OrdinalIgnoreCase) && !CodeParser.StringContainsVariable(info.Section)) { targetInterfaceSection = info.Section; } } break; case CodeType.WriteInterface: { CodeInfo_WriteInterface info = cmd.Info.Cast <CodeInfo_WriteInterface>(); // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals(Script.Const.ScriptFile, StringComparison.OrdinalIgnoreCase) && !CodeParser.StringContainsVariable(info.Section)) { targetInterfaceSection = info.Section; } } break; case CodeType.IniWrite: { // To detect multi-interface without `InterfaceList=`, // Inspect pattern `IniWrite,%ScriptFile%,Main,Interface,<NewInterfaceSection>` CodeInfo_IniWrite info = cmd.Info.Cast <CodeInfo_IniWrite>(); // CodeValidator does not have Variable information, so just check with predefined literal if (info.FileName.Equals(Script.Const.ScriptFile, StringComparison.OrdinalIgnoreCase) && info.Section.Equals(ScriptSection.Names.Main, StringComparison.OrdinalIgnoreCase) && info.Key.Equals(ScriptSection.Names.Interface, StringComparison.OrdinalIgnoreCase) && !CodeParser.StringContainsVariable(info.Value)) { targetInterfaceSection = info.Value; } } break; #endregion } if (targetCodeSection != null) { if (_sc.Sections.ContainsKey(targetCodeSection)) { logs.AddRange(CheckCodeSection(_sc.Sections[targetCodeSection], cmd.RawCode, cmd.LineIdx)); } else { logs.Add(new LogInfo(LogState.Error, $"Section [{targetCodeSection}] does not exist", cmd)); } } if (targetInterfaceSection != null) { if (_sc.Sections.ContainsKey(targetInterfaceSection)) { logs.AddRange(CheckInterfaceSection(_sc.Sections[targetInterfaceSection], cmd.RawCode, cmd.LineIdx)); } else { logs.Add(new LogInfo(LogState.Error, $"Section [{targetInterfaceSection}] does not exist", cmd)); } } } }
private void InternalValidateCodes(CodeCommand[] codes, List <LogInfo> logs) { string targetCodeSection = null; string targetInterfaceSection = null; foreach (CodeCommand cmd in codes) { switch (cmd.Type) { #region Check CodeSections case CodeType.If: { CodeInfo_If info = cmd.Info.Cast <CodeInfo_If>(); if (info.Condition.Type == BranchConditionType.ExistSection) { // For recursive section call // Ex) If,ExistSection,%ScriptFile%,DoWork,Run,%ScriptFile%,DoWork if (info.Condition.Arg1.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase) && info.Embed.Type == CodeType.Run || info.Embed.Type == CodeType.Exec) { CodeInfo_RunExec subInfo = info.Embed.Info.Cast <CodeInfo_RunExec>(); if (subInfo.ScriptFile.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase)) { if (info.Condition.Arg2.Equals(subInfo.SectionName, StringComparison.OrdinalIgnoreCase)) { continue; } } } } InternalValidateCodes(info.Link.ToArray(), logs); } break; case CodeType.Else: { CodeInfo_Else info = cmd.Info.Cast <CodeInfo_Else>(); InternalValidateCodes(info.Link.ToArray(), logs); } break; case CodeType.Run: case CodeType.Exec: case CodeType.RunEx: { CodeInfo_RunExec info = cmd.Info.Cast <CodeInfo_RunExec>(); // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase) && !CodeParser.StringContainsVariable(info.SectionName)) { targetCodeSection = info.SectionName; } } break; case CodeType.Loop: case CodeType.LoopLetter: case CodeType.LoopEx: case CodeType.LoopLetterEx: { CodeInfo_Loop info = cmd.Info.Cast <CodeInfo_Loop>(); if (info.Break) { continue; } // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase) && !CodeParser.StringContainsVariable(info.SectionName)) { targetCodeSection = info.SectionName; } } break; #endregion #region Check InterfaceSections case CodeType.AddInterface: { CodeInfo_AddInterface info = cmd.Info.Cast <CodeInfo_AddInterface>(); // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase) && CodeParser.StringContainsVariable(info.Section)) { targetInterfaceSection = info.Section; } } break; case CodeType.ReadInterface: { CodeInfo_ReadInterface info = cmd.Info.Cast <CodeInfo_ReadInterface>(); // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase) && CodeParser.StringContainsVariable(info.Section)) { targetInterfaceSection = info.Section; } } break; case CodeType.WriteInterface: { CodeInfo_WriteInterface info = cmd.Info.Cast <CodeInfo_WriteInterface>(); // CodeValidator does not have Variable information, so just check with predefined literal if (info.ScriptFile.Equals("%ScriptFile%", StringComparison.OrdinalIgnoreCase) && CodeParser.StringContainsVariable(info.Section)) { targetInterfaceSection = info.Section; } } break; #endregion } if (targetCodeSection != null && !_visitedSections.Contains(targetCodeSection)) { _visitedSections.Add(targetCodeSection); if (_sc.Sections.ContainsKey(targetCodeSection)) { logs.AddRange(ValidateCodeSection(_sc.Sections[targetCodeSection], cmd.RawCode, cmd.LineIdx)); } else { logs.Add(new LogInfo(LogState.Error, $"Section [{targetCodeSection}] does not exist", cmd)); } } if (targetInterfaceSection != null && !_visitedSections.Contains(targetInterfaceSection)) { _visitedSections.Add(targetInterfaceSection); if (_sc.Sections.ContainsKey(targetInterfaceSection)) { logs.AddRange(ValidateInterfaceSection(_sc.Sections[targetInterfaceSection], cmd.RawCode, cmd.LineIdx)); } else { logs.Add(new LogInfo(LogState.Error, $"Section [{targetInterfaceSection}] does not exist", cmd)); } } } }