public void ParseFunctionBlocks()
{
//The bin files are plain dumps obtained via an call to "PLCConnection.PLCGetBlockInMC7(...)"
//The Awl files are the parsed awl code files for the corresponding files. these files are compared to
//default Simatic manager online only output, in order to ensure correctness of the parsing
//Lengths values are taken from the Simatic Manager Properties dialog
//Set up templates for parsing
string dir = AppDomain.CurrentDomain.BaseDirectory + "\\S7Blocks\\";
byte[] block;
//_____________________________________________________________________________
//Read Simple Function-Block without Instance data
block = File.ReadAllBytes(dir + "FB101.bin");
S7FunctionBlock FB = (S7FunctionBlock)DotNetSiemensPLCToolBoxLibrary.PLCs.S7_xxx.MC7.MC7Converter.GetAWLBlock(block, 0);
Assert.AreEqual(PLCBlockType.FB, FB.BlockType);
Assert.AreEqual(101, FB.BlockNumber);
Assert.AreEqual(128, FB.Length); //Load memory Size
Assert.AreEqual(24, FB.CodeSize); //Code size of pure MC7
Assert.AreEqual(4, FB.LocalDataSize);
Assert.AreEqual(3, FB.Networks.Count);
//Some of the called functions
List <string> tmp = new List <string>(FB.CalledBlocks);
Assert.AreEqual("FC100", tmp[0]);
Assert.AreEqual(File.ReadAllText(dir + "FB101.awl").Trim(), FB.ToString().Trim());
//_____________________________________________________________________________
//Read Function-Block with Instance data
block = File.ReadAllBytes(dir + "FB1001.bin");
FB = (S7FunctionBlock)DotNetSiemensPLCToolBoxLibrary.PLCs.S7_xxx.MC7.MC7Converter.GetAWLBlock(block, 0);
Assert.AreEqual(PLCBlockType.FB, FB.BlockType);
Assert.AreEqual(1001, FB.BlockNumber);
Assert.AreEqual(126, FB.Length); //Load memory Size
Assert.AreEqual(22, FB.CodeSize); //Code size of pure MC7
Assert.AreEqual(0, FB.LocalDataSize); //No temp data, all data is in STAT
Assert.AreEqual(1, FB.Networks.Count);
string t = FB.ToString();
Assert.AreEqual(File.ReadAllText(dir + "FB1001.awl").Trim(), FB.ToString().Trim());
}
public void ParseFunctionCodeBlocks()
{
//The bin files are plain dumps obtained via an call to "PLCConnection.PLCGetBlockInMC7(...)"
//The Awl files are the parsed awl code files for the corresponding files. these files are compared to
//default Simatic manager online only output, in order to ensure correctness of the parsing
//Lengths values are taken from the Simatic Manager Properties dialog
//Set up templates for parsing
string dir = AppDomain.CurrentDomain.BaseDirectory + "\\S7Blocks\\";
byte[] block;
//_____________________________________________________________________________
//Read Simple Function-Code with some calls
//An relatively simple block, a few segments ans calls to sub functions
block = File.ReadAllBytes(dir + "FC1.bin");
S7FunctionBlock FC = (S7FunctionBlock)DotNetSiemensPLCToolBoxLibrary.PLCs.S7_xxx.MC7.MC7Converter.GetAWLBlock(block, 0);
Assert.AreEqual(PLCBlockType.FC, FC.BlockType);
Assert.AreEqual(1, FC.BlockNumber);
Assert.AreEqual(434, FC.Length); //Load memory Size
Assert.AreEqual(342, FC.CodeSize); //Code size of pure MC7
Assert.AreEqual(6, FC.LocalDataSize); //Actually there are no "Temp" but the local data is needed for the "Call"'s
Assert.AreEqual(4, FC.Networks.Count);
//Some of the called functions
List <string> tmp = new List <string>(FC.CalledBlocks);
Assert.AreEqual("FC96", tmp[2]);
Assert.AreEqual("FC97", tmp[7]);
Assert.AreEqual("FC16", tmp[11]);
Assert.AreEqual("FC21", tmp[13]);
Assert.AreEqual(File.ReadAllText(dir + "FC1.awl").Trim(), FC.ToString().Trim());
//_____________________________________________________________________________
//Read complex Function-code
//Complex function with calls, Address-register manipulations, Indirect addressing of DB.
//System functions, and lots of segments. AND indirect FC calls (Call FC[#tempvar])
block = File.ReadAllBytes(dir + "FC100.bin");
FC = (S7FunctionBlock)DotNetSiemensPLCToolBoxLibrary.PLCs.S7_xxx.MC7.MC7Converter.GetAWLBlock(block, 0);
Assert.AreEqual(PLCBlockType.FC, FC.BlockType);
Assert.AreEqual(100, FC.BlockNumber);
Assert.AreEqual(4182, FC.Length); //Load memory Size
Assert.AreEqual(3882, FC.CodeSize); //Code size of pure MC7
Assert.AreEqual(58, FC.LocalDataSize);
Assert.AreEqual(9, FC.Networks.Count);
//Some of the called functions
tmp = new List <string>(FC.CalledBlocks);
Assert.AreEqual("SFC20", tmp[0]);
Assert.AreEqual("FC6", tmp[6]);
Assert.AreEqual("FC[LW16]", tmp[18]);
Assert.AreEqual("SFC20", tmp[22]);
Assert.AreEqual(File.ReadAllText(dir + "FC100.awl").Trim().Replace("\r\n", ""), FC.ToString().Trim().Replace("\r\n", ""));
}
public void ParseFunctionBlocks()
{
byte[] block;
//_____________________________________________________________________________
//Read Simple Function-Block without Instance data
block = File.ReadAllBytes(dir + "FB101.bin");
S7FunctionBlock FB = (S7FunctionBlock)DotNetSiemensPLCToolBoxLibrary.PLCs.S7_xxx.MC7.MC7Converter.GetAWLBlock(block, MnemonicLanguage.German);
Assert.AreEqual(PLCBlockType.FB, FB.BlockType);
Assert.AreEqual(101, FB.BlockNumber);
Assert.AreEqual(128, FB.Length); //Load memory Size
Assert.AreEqual(24, FB.CodeSize); //Code size of pure MC7
Assert.AreEqual(4, FB.LocalDataSize);
Assert.AreEqual(3, FB.Networks.Count);
//Some of the called functions
List <string> tmp = new List <string>(FB.CalledBlocks);
Assert.AreEqual("FC100", tmp[0]);
Assert.AreEqual(File.ReadAllText(dir + "FB101.awl").Trim().Replace("\r\n", "\n"), FB.ToString().Trim().Replace("\r\n", "\n"));
//_____________________________________________________________________________
//Read Function-Block with Instance data
block = File.ReadAllBytes(dir + "FB1001.bin");
FB = (S7FunctionBlock)DotNetSiemensPLCToolBoxLibrary.PLCs.S7_xxx.MC7.MC7Converter.GetAWLBlock(block, MnemonicLanguage.German);
Assert.AreEqual(PLCBlockType.FB, FB.BlockType);
Assert.AreEqual(1001, FB.BlockNumber);
Assert.AreEqual(126, FB.Length); //Load memory Size
Assert.AreEqual(22, FB.CodeSize); //Code size of pure MC7
Assert.AreEqual(0, FB.LocalDataSize); //No temp data, all data is in STAT
Assert.AreEqual(1, FB.Networks.Count);
string t = FB.ToString();
Assert.AreEqual(File.ReadAllText(dir + "FB1001.awl").Trim().Replace("\r\n", "\n"), FB.ToString().Trim().Replace("\r\n", "\n"));
}
public void ParseFunctionCodeBlocks()
{
byte[] block;
//_____________________________________________________________________________
//Read Simple Function-Code with some calls
//An relatively simple block, a few segments ans calls to sub functions
block = File.ReadAllBytes(dir + "FC1.bin");
S7FunctionBlock FC = (S7FunctionBlock)DotNetSiemensPLCToolBoxLibrary.PLCs.S7_xxx.MC7.MC7Converter.GetAWLBlock(block, MnemonicLanguage.German);
Assert.AreEqual(PLCBlockType.FC, FC.BlockType);
Assert.AreEqual(1, FC.BlockNumber);
Assert.AreEqual(434, FC.Length); //Load memory Size
Assert.AreEqual(342, FC.CodeSize); //Code size of pure MC7
Assert.AreEqual(6, FC.LocalDataSize); //Actually there are no "Temp" but the local data is needed for the "Call"'s
Assert.AreEqual(4, FC.Networks.Count);
//Some of the called functions
List <string> tmp = new List <string>(FC.CalledBlocks);
Assert.AreEqual("FC96", tmp[2]);
Assert.AreEqual("FC97", tmp[7]);
Assert.AreEqual("FC16", tmp[11]);
Assert.AreEqual("FC21", tmp[13]);
Assert.AreEqual(File.ReadAllText(dir + "FC1.awl").Trim().Replace("\r\n", "\n"), FC.ToString().Trim().Replace("\r\n", "\n"));
//_____________________________________________________________________________
//Read complex Function-code
//Complex function with calls, Address-register manipulations, Indirect addressing of DB.
//System functions, and lots of segments. AND indirect FC calls (Call FC[#tempvar])
block = File.ReadAllBytes(dir + "FC100.bin");
FC = (S7FunctionBlock)DotNetSiemensPLCToolBoxLibrary.PLCs.S7_xxx.MC7.MC7Converter.GetAWLBlock(block, MnemonicLanguage.German);
Assert.AreEqual(PLCBlockType.FC, FC.BlockType);
Assert.AreEqual(100, FC.BlockNumber);
Assert.AreEqual(4182, FC.Length); //Load memory Size
Assert.AreEqual(3882, FC.CodeSize); //Code size of pure MC7
Assert.AreEqual(58, FC.LocalDataSize);
Assert.AreEqual(9, FC.Networks.Count);
//Some of the called functions
tmp = new List <string>(FC.CalledBlocks);
Assert.AreEqual("SFC20", tmp[0]);
Assert.AreEqual("FC6", tmp[6]);
Assert.AreEqual("FC[LW16]", tmp[18]);
Assert.AreEqual("SFC20", tmp[22]);
Assert.AreEqual(File.ReadAllText(dir + "FC100.awl").Trim().Replace("\r\n", "\n"), FC.ToString().Trim().Replace("\r\n", "\n"));
}