public ReferenceData(Step5ProgrammFolder Parent, Project Project)
{
this.Parent = Parent;
this.Project = Project;
Name = "ReferenzDaten";
//Load Referencedata in a Background Thread.
Thread trd = new Thread(new ThreadStart(LoadReferenceData));
trd.Start();
}
public ReferenceData(Step5ProgrammFolder Parent, Project Project)
{
this.Parent = Parent;
this.Project = Project;
Name = "ReferenzDaten";
//Load Referencedata in a Background Thread.
Thread trd = new Thread(new ThreadStart(LoadReferenceData));
trd.Start();
}
public static S5FunctionBlock GetFunctionBlock(ProjectPlcBlockInfo blkInfo, byte[] block, byte[] preHeader, byte[] commentBlock, Step5ProgrammFolder prjBlkFld)
{
S5FunctionBlock retVal = new S5FunctionBlock();
retVal.BlockType = blkInfo.BlockType;
retVal.BlockNumber = blkInfo.BlockNumber;
if (blkInfo.BlockType == PLCBlockType.S5_PB || blkInfo.BlockType == PLCBlockType.S5_SB || blkInfo.BlockType == PLCBlockType.S5_OB)
retVal.AWLCode = GetMC5Rows(block, 10, null, (Step5BlocksFolder) blkInfo.ParentFolder, retVal);
else
{
string fbNM = System.Text.Encoding.GetEncoding("ISO-8859-1").GetString(block, 12, 8);
retVal.Name = fbNM;
List<S5Parameter> pars = GetParameters(block);
retVal.Parameter = pars;
retVal.AWLCode = GetMC5Rows(block, /*10 + spa*2*/ 10 + ((pars.Count*3) + 5)*2, pars, (Step5BlocksFolder) blkInfo.ParentFolder, retVal);
}
//Go throug retval and add Symbols...
if (prjBlkFld != null)
{
if (prjBlkFld.SymbolTable != null)
{
foreach (S5FunctionBlockRow awlRow in retVal.AWLCode)
{
string para = awlRow.Parameter.Replace(" ", "");
awlRow.SymbolTableEntry = prjBlkFld.SymbolTable.GetEntryFromOperand(para);
}
}
}
retVal.Networks = new List<Network>();
S5FunctionBlockNetwork nw = null;
if (retVal.AWLCode != null)
foreach (S5FunctionBlockRow s5FunctionBlockRow in retVal.AWLCode)
{
if (s5FunctionBlockRow.Command == "BLD" && s5FunctionBlockRow.Parameter == "255")
{
if (nw != null)
nw.AWLCode.Add(s5FunctionBlockRow);
nw = new S5FunctionBlockNetwork();
nw.Parent = retVal;
nw.AWLCode = new List<FunctionBlockRow>();
((S5FunctionBlockNetwork) nw).NetworkFunctionBlockRow = s5FunctionBlockRow;
retVal.Networks.Add(nw);
}
else
{
nw.AWLCode.Add(s5FunctionBlockRow);
}
}
if (commentBlock != null)
{
int nr = 26;
int netzwnr = 0;
Dictionary<int, object> commandLineNumerList = new Dictionary<int, object>();
while (nr + 3 < commentBlock.Length)
{
int zeile = commentBlock[nr];
int len = 0x7f & commentBlock[nr + 2];
string cmt = System.Text.Encoding.GetEncoding("ISO-8859-1").GetString(commentBlock, nr + 3, len);
if (commentBlock[nr + 1] == 0x00)
{
netzwnr = zeile;
if (retVal.Networks.Count>netzwnr - 1 && netzwnr>0)
{
((S5FunctionBlockNetwork) retVal.Networks[netzwnr - 1]).Name = cmt;
commandLineNumerList.Clear();
int lineNr = 0;
foreach (S5FunctionBlockRow akRow in retVal.Networks[netzwnr - 1].AWLCode)
{
commandLineNumerList.Add(lineNr, akRow);
lineNr++;
if (IsCall(akRow))
{
foreach (S5Parameter extPar in akRow.ExtParameter)
{
commandLineNumerList.Add(lineNr, extPar);
lineNr++;
}
}
}
}
else
{
//Todo: Throw an error when this happens???
//throw new Exception("Error in Block: " + retVal.BlockName);
}
}
else
{
if (commandLineNumerList.ContainsKey(zeile - 1))
{
object obj = commandLineNumerList[zeile - 1];
if (obj is S5Parameter)
((S5Parameter) obj).Comment = cmt;
else
((S5FunctionBlockRow) obj).Comment = cmt;
}
}
nr += len + 3;
}
}
return retVal;
}
internal override void LoadProject()
{
_projectLoaded = true;
//Read Step5 Project into a Byte-Array
Stream fsProject = _ziphelper.GetReadStream(_projectfilename);
s5ProjectByteArray = new byte[_ziphelper.GetStreamLength(_projectfilename, fsProject)];
fsProject.Read(s5ProjectByteArray, 0, s5ProjectByteArray.Length);
fsProject.Close();
//Read the Project Name
ProjectName = System.Text.Encoding.UTF7.GetString(s5ProjectByteArray, 0x08, 8);
//Read the Project Size
Size = s5ProjectByteArray[0x14] + s5ProjectByteArray[0x15]*0x100;
//Create the main Project Folder
ProjectStructure = new Step5ProgrammFolder() {Project = this, Name = this.ToString()};
//int startpos = s5ProjectByteArray[0x12] * 0x80;
int anz_sections = s5ProjectByteArray[0x16];
List<int> sections_lst = new List<int>();
for (int j = 0; j < anz_sections; j++)
{
int pos = 0x44 + j*19;
sections_lst.Add(s5ProjectByteArray[pos + 15] + s5ProjectByteArray[pos + 16]*0x100);
}
Step5BlocksFolder blkFld = new Step5BlocksFolder() {Name = "Blocks", Project = this, Parent = ProjectStructure};
BlocksFolder = blkFld;
ProjectStructure.SubItems.Add(blkFld);
//int section_start = startpos;
int n = 0;
List<int> ByteAddressOFExistingBlocks = new List<int>();
foreach (int secpos in sections_lst)
{
int section_start = secpos*0x80;
/* The len for a Section is not always calculated right, so if the Section does not begin with the filename add 0x80 until it works */
/* But I don't know why it's wrong */
/*
while (System.Text.Encoding.UTF7.GetString(s5ProjectByteArray, section_start, 8) != ProjectName)
{
section_start += 0x80;
if (section_start>=s5ProjectByteArray.Length)
break;
}
*/
if (section_start >= s5ProjectByteArray.Length)
break;
//if (section_start == 0x1580) //only for debbuging
// section_start = section_start;
//Don't know what this Byte means, maybe it describes wich Blocks are in the Section?
int section_header_type = s5ProjectByteArray[section_start + 8];
int akanz = 0;
int anzbst = s5ProjectByteArray[section_start + 22];
List<byte[]> bstHeaders = new List<byte[]>();
for (int j = 0; j < anzbst; j++)
{
byte[] tmp = new byte[15];
Array.Copy(s5ProjectByteArray, section_start + 68 + j*15, tmp, 0, 15);
bstHeaders.Add(tmp);
}
//int section_size = ((s5ProjectByteArray[section_start + 21] * 0x100) + s5ProjectByteArray[section_start + 20]) * 0x80;
//if (section_size == 0) //only for debbuging
// section_size = section_size;
/*
int section_header_size = anzbst * 15 + 68;
section_header_size = (section_header_size / 0x80) * 0x80;
if ((anzbst * 15 + 68) % 0x80 != 0)
section_header_size += 0x80;
*/
//Don't know wich Information is in the Section Header!
int section_header_size = s5ProjectByteArray[section_start + 18]*0x80;
//Read the Block normaly (using the Section-Headers)
{
//for (int n = blkstart + blkheadersize; n < blkstart + blksize /* s5ProjectByteArray.Length - 2 */; n++)
n = section_start + section_header_size;
//while (s5ProjectByteArray[n] == 0x00 && s5ProjectByteArray[n + 1] == 0x00)
// n += 0x80;
while (akanz < anzbst && n + 1 < s5ProjectByteArray.Length)
//n < section_start + section_size)
{
akanz++;
int len = 0;
ByteAddressOFExistingBlocks.Add(n);
var tmp = AddBlockInfo(s5ProjectByteArray, ref n, blkFld,
bstHeaders[akanz - 1]);
if (tmp != null)
blkFld.step5BlocksinfoList.Add(tmp);
/*
if (s5ProjectByteArray[n] == 0x70 && s5ProjectByteArray[n + 1] == 0x70) //Step5 Block
// && s5ProjectByteArray[n - 1] == 0x00)
{
len = (s5ProjectByteArray[n + 8] * 0x100 + s5ProjectByteArray[n + 9]) * 2;
Step5ProjectBlockInfo tmpBlk = new Step5ProjectBlockInfo();
//S5Block tmpBlk = new S5Block();
//if (((IList<int>)Enum.GetValues(typeof(PLCBlockType))).Contains((s5ProjectByteArray[n + 2] | 0xf00))) //only for debbuging
tmpBlk.BlockType = (PLCBlockType)(s5ProjectByteArray[n + 2] | 0xf00);
//else
// tt_nr = tt_nr;
tmpBlk.BlockNumber = s5ProjectByteArray[n + 3];
tmpBlk._blkHeaderByte = bstHeaders[akanz - 1];
//byte n+4 -> kennungen für das programiergerät
//byte n+5,6,7 -> bib nummer
byte[] code = new byte[len];
Array.Copy(s5ProjectByteArray, n, code, 0, len);
tmpBlk._blkByte = code;
tmpBlk.ParentFolder = blkFld;
blkFld.step5BlocksinfoList.Add(tmpBlk);
//string aa = System.Text.Encoding.GetEncoding("ISO-8859-1").GetString(code);
}
else if (s5ProjectByteArray[n] == 0x06) //DB - Vorkopf
{
len = (s5ProjectByteArray[n + 4] * 0x100 + s5ProjectByteArray[n + 5]) * 2;
Step5ProjectBlockInfo tmpBlk = new Step5ProjectBlockInfo();
//S5Block tmpBlk = new S5Block();
tmpBlk.BlockType = PLCBlockType.S5_DV;
tmpBlk.BlockNumber = s5ProjectByteArray[n + 1];
byte[] code = new byte[len];
Array.Copy(s5ProjectByteArray, n, code, 0, len);
tmpBlk._blkByte = code;
tmpBlk.ParentFolder = blkFld;
blkFld.step5BlocksinfoList.Add(tmpBlk);
}
else if (s5ProjectByteArray[n] == 0x11) //DX - Vorkopf
{
len = (s5ProjectByteArray[n + 4] * 0x100 + s5ProjectByteArray[n + 5]) * 2;
Step5ProjectBlockInfo tmpBlk = new Step5ProjectBlockInfo();
//S5Block tmpBlk = new S5Block();
tmpBlk.BlockType = PLCBlockType.S5_DVX;
tmpBlk.BlockNumber = s5ProjectByteArray[n + 1];
byte[] code = new byte[len];
Array.Copy(s5ProjectByteArray, n, code, 0, len);
tmpBlk._blkByte = code;
tmpBlk.ParentFolder = blkFld;
blkFld.step5BlocksinfoList.Add(tmpBlk);
}
else if (s5ProjectByteArray[n] == 0x0D) //FB - Vorkopf
{
len = (s5ProjectByteArray[n + 4] * 0x100 + s5ProjectByteArray[n + 5]) * 2;
Step5ProjectBlockInfo tmpBlk = new Step5ProjectBlockInfo();
//S5Block tmpBlk = new S5Block();
tmpBlk.BlockType = PLCBlockType.S5_FV;
tmpBlk.BlockNumber = s5ProjectByteArray[n + 1];
byte[] code = new byte[len];
Array.Copy(s5ProjectByteArray, n, code, 0, len);
tmpBlk._blkByte = code;
tmpBlk.ParentFolder = blkFld;
blkFld.step5BlocksinfoList.Add(tmpBlk);
}
else if (s5ProjectByteArray[n] == 0x0A) //FX - Vorkopf
{
len = (s5ProjectByteArray[n + 4] * 0x100 + s5ProjectByteArray[n + 5]) * 2;
Step5ProjectBlockInfo tmpBlk = new Step5ProjectBlockInfo();
//S5Block tmpBlk = new S5Block();
tmpBlk.BlockType = PLCBlockType.S5_FVX;
tmpBlk.BlockNumber = s5ProjectByteArray[n + 1];
byte[] code = new byte[len];
Array.Copy(s5ProjectByteArray, n, code, 0, len);
tmpBlk._blkByte = code;
tmpBlk.ParentFolder = blkFld;
blkFld.step5BlocksinfoList.Add(tmpBlk);
}
else
{
//Here are the $ Blocks woch are not yet implemented!
//akanz--;
len = 0x80;
}
n += (len / 0x80) * 0x80;
if (len % 0x80 != 0)
n += 0x80;
*/
}
}
section_start = n;
//section_start += section_size;
}
if (_showDeleted)
{
//Read also the deleted Blocks, that means, don't use the Section Headers ...
int akpos = s5ProjectByteArray[0x12]*0x80;
while (akpos <= s5ProjectByteArray.Length - 0x80)
{
while (!IsCurrentPosABlockStart(s5ProjectByteArray, akpos) &&
akpos <= s5ProjectByteArray.Length - 0x80)
akpos += 0x80;
if (akpos <= s5ProjectByteArray.Length - 0x80)
{
bool blkExists = ByteAddressOFExistingBlocks.Contains(akpos);
var tmp=AddBlockInfo(s5ProjectByteArray, ref akpos, blkFld, null);
if (!blkExists)
{
tmp.Deleted = true;
blkFld.step5BlocksinfoList.Add(tmp);
}
}
}
}
if (_ziphelper.FileExists(_projectfilename.ToLower().Replace("st.s5d", "z0.seq")))
{
Stream symTabStream = _ziphelper.GetReadStream(_projectfilename.ToLower().Replace("st.s5d", "z0.seq"));
SymbolTable symtab=new SymbolTable();
symtab.LoadSymboltable(symTabStream);
symTabStream.Close();
symtab.Parent = ProjectStructure;
symtab.Project = this;
ProjectStructure.SubItems.Add(symtab);
}
ProjectStructure.SubItems.Add(new ReferenceData((Step5ProgrammFolder)ProjectStructure, this)); // { Parent = ProjectStructure, Project = this });
}
private void LoadReferenceData()
{
ReferenceDataLoaded = false;
Step5ProgrammFolder prgFld = (Step5ProgrammFolder)this.Parent;
Step5BlocksFolder blkFld = (Step5BlocksFolder)prgFld.BlocksFolder;
SymbolTable smyTab = (SymbolTable)prgFld.SymbolTable;
//try
{
foreach (ProjectBlockInfo projectBlockInfo in blkFld.readPlcBlocksList())
{
if (projectBlockInfo.BlockType == PLCBlockType.S5_PB || projectBlockInfo.BlockType == PLCBlockType.S5_FB || projectBlockInfo.BlockType == PLCBlockType.S5_FX || projectBlockInfo.BlockType == PLCBlockType.S5_OB || projectBlockInfo.BlockType == PLCBlockType.S5_SB)
{
S5FunctionBlock blk = (S5FunctionBlock)projectBlockInfo.GetBlock();
int networkNR = 0;
foreach (Blocks.Network network in blk.Networks)
{
int rowNR = 0;
networkNR++;
string akdb = "";
foreach (S5FunctionBlockRow functionBlockRow in network.AWLCode)
{
if (!string.IsNullOrEmpty(functionBlockRow.Label))
{
akdb = "";
}
if (functionBlockRow.Command == "A" || functionBlockRow.Command == "AX")
{
if (functionBlockRow.Parameter == "DB 0" || functionBlockRow.Parameter == "DX 0")
{
akdb = "";
}
else
{
akdb = functionBlockRow.Parameter;
}
}
rowNR++;
if (functionBlockRow.MC5LIB_SYMTAB_Row != null && ((ReferenceDataAccessMode)functionBlockRow.MC5LIB_SYMTAB_Row[9]) != ReferenceDataAccessMode.None)
{
//Normal reference...
string operand = functionBlockRow.Parameter;
if (operand == "DB 0")
{
operand = "DB ??";
}
ReferenceDataEntry entr;
operandIndexList.TryGetValue(operand, out entr);
if (entr == null)
{
SymbolTableEntry symb = null;
if (smyTab != null)
{
symb = smyTab.GetEntryFromOperand(operand);
}
entr = new ReferenceDataEntry()
{
Operand = operand, SymbolTableEntry = symb
};
operandIndexList.Add(operand, entr);
_ReferenceDataEntrys.Add(entr);
}
entr.ReferencePoints.Add(new ReferencePoint()
{
Block = blk, Network = network, NetworkNumber = networkNR, LineNumber = rowNR, BlockRow = functionBlockRow, AccessMode = (ReferenceDataAccessMode)functionBlockRow.MC5LIB_SYMTAB_Row[9]
});
//Reference to DB
if (akdb != "")
{
if (functionBlockRow.Parameter.StartsWith("D ") || functionBlockRow.Parameter.StartsWith("DW") || functionBlockRow.Parameter.StartsWith("DL") || functionBlockRow.Parameter.StartsWith("DR") || functionBlockRow.Parameter.StartsWith("DX"))
{
//Normal reference...
operand = akdb + "." + functionBlockRow.Parameter;
entr = null;
operandIndexList.TryGetValue(operand, out entr);
if (entr == null)
{
SymbolTableEntry symb = null;
if (smyTab != null)
{
symb = smyTab.GetEntryFromOperand(operand);
}
entr = new ReferenceDataEntry()
{
Operand = operand, SymbolTableEntry = symb
};
operandIndexList.Add(operand, entr);
_ReferenceDataEntrys.Add(entr);
}
entr.ReferencePoints.Add(new ReferencePoint()
{
Block = blk, Network = network, NetworkNumber = networkNR, LineNumber = rowNR, BlockRow = functionBlockRow, AccessMode = (ReferenceDataAccessMode)functionBlockRow.MC5LIB_SYMTAB_Row[9]
});
}
}
}
}
}
}
}
}
/*catch (Exception ex)
* {
* MessageBox.Show("There was an error generating the Reference Data! Maybe the Step5 project is broken? \n" + ex.Message);
* }*/
ReferenceDataLoaded = true;
}
