etisserant@0: #!/usr/bin/env python etisserant@0: # -*- coding: utf-8 -*- etisserant@0: etisserant@0: #This file is part of PLCOpenEditor, a library implementing an IEC 61131-3 editor etisserant@0: #based on the plcopen standard. etisserant@0: # lbessard@58: #Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD etisserant@0: # etisserant@0: #See COPYING file for copyrights details. etisserant@0: # etisserant@0: #This library is free software; you can redistribute it and/or etisserant@5: #modify it under the terms of the GNU General Public etisserant@0: #License as published by the Free Software Foundation; either etisserant@0: #version 2.1 of the License, or (at your option) any later version. etisserant@0: # etisserant@0: #This library is distributed in the hope that it will be useful, etisserant@0: #but WITHOUT ANY WARRANTY; without even the implied warranty of etisserant@0: #MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU lbessard@58: #General Public License for more details. etisserant@0: # etisserant@5: #You should have received a copy of the GNU General Public etisserant@0: #License along with this library; if not, write to the Free Software etisserant@0: #Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA etisserant@0: etisserant@0: from plcopen import plcopen etisserant@0: from plcopen.structures import * etisserant@0: from types import * etisserant@0: lbessard@227: lbessard@227: # Dictionary associating PLCOpen variable categories to the corresponding lbessard@227: # IEC 61131-3 variable categories etisserant@0: varTypeNames = {"localVars" : "VAR", "tempVars" : "VAR_TEMP", "inputVars" : "VAR_INPUT", etisserant@0: "outputVars" : "VAR_OUTPUT", "inOutVars" : "VAR_IN_OUT", "externalVars" : "VAR_EXTERNAL", etisserant@0: "globalVars" : "VAR_GLOBAL", "accessVars" : "VAR_ACCESS"} lbessard@1: lbessard@227: lbessard@227: # Dictionary associating PLCOpen POU categories to the corresponding lbessard@227: # IEC 61131-3 POU categories lbessard@6: pouTypeNames = {"function" : "FUNCTION", "functionBlock" : "FUNCTION_BLOCK", "program" : "PROGRAM"} lbessard@6: lbessard@227: lbessard@227: # Helper function for reindenting text lbessard@1: def ReIndentText(text, nb_spaces): lbessard@1: compute = "" lbessard@1: lines = text.splitlines() lbessard@1: if len(lines) > 0: lbessard@151: line_num = 0 lbessard@151: while line_num < len(lines) and len(lines[line_num].strip()) == 0: lbessard@151: line_num += 1 lbessard@151: if line_num < len(lines): lbessard@151: spaces = 0 lbessard@151: while lines[line_num][spaces] == " ": lbessard@151: spaces += 1 lbessard@151: indent = "" lbessard@151: for i in xrange(spaces, nb_spaces): lbessard@151: indent += " " lbessard@151: for line in lines: lbessard@151: if line != "": lbessard@151: compute += "%s%s\n"%(indent, line) lbessard@151: else: lbessard@151: compute += "\n" lbessard@1: return compute lbessard@1: lbessard@227: lbessard@227: #------------------------------------------------------------------------------- lbessard@227: # Specific exception for PLC generating errors lbessard@227: #------------------------------------------------------------------------------- lbessard@227: lbessard@227: lbessard@227: class PLCGenException(Exception): lbessard@227: pass lbessard@227: lbessard@227: lbessard@227: #------------------------------------------------------------------------------- lbessard@227: # Generator of PLC program lbessard@227: #------------------------------------------------------------------------------- lbessard@227: lbessard@227: lbessard@227: class ProgramGenerator: lbessard@227: lbessard@227: # Create a new PCL program generator lbessard@227: def __init__(self, controler, project): lbessard@227: # Keep reference of the controler and project lbessard@227: self.Controler = controler lbessard@227: self.Project = project lbessard@227: # Reset the internal variables used to generate PLC programs lbessard@227: self.Program = [] lbessard@227: self.DatatypeComputed = {} lbessard@227: self.PouComputed = {} lbessard@227: lbessard@227: # Compute value according to type given lbessard@227: def ComputeValue(self, value, var_type): lbessard@227: base_type = self.Controler.GetBaseType(var_type) lbessard@227: if base_type == "STRING": lbessard@227: return "'%s'"%value lbessard@227: elif base_type == "WSTRING": lbessard@227: return "\"%s\""%value lbessard@227: return value lbessard@227: lbessard@227: # Generate a data type from its name lbessard@227: def GenerateDataType(self, datatype_name): lbessard@227: # Verify that data type hasn't been generated yet lbessard@227: if not self.DatatypeComputed.get(datatype_name, True): lbessard@227: # If not mark data type as computed lbessard@227: self.DatatypeComputed[datatype_name] = True lbessard@227: lbessard@227: # Getting datatype model from project lbessard@227: datatype = self.Project.getdataType(datatype_name) lbessard@227: tagname = self.Controler.ComputeDataTypeName(datatype.getname()) lbessard@227: datatype_def = [(" ", ()), lbessard@227: (datatype.getname(), (tagname, "name")), lbessard@227: (" : ", ())] lbessard@227: basetype_content = datatype.baseType.getcontent() lbessard@227: # Data type derived directly from a string type lbessard@227: if basetype_content["name"] in ["string", "wstring"]: lbessard@227: datatype_def += [(basetype_content["name"].upper(), (tagname, "base"))] lbessard@227: # Data type derived directly from a user defined type lbessard@227: elif basetype_content["name"] == "derived": lbessard@227: basetype_name = basetype_content["value"].getname() lbessard@227: self.GenerateDataType(basetype_name) lbessard@227: datatype_def += [(basetype_name, (tagname, "base"))] lbessard@227: # Data type is a subrange lbessard@227: elif basetype_content["name"] in ["subrangeSigned", "subrangeUnsigned"]: lbessard@227: base_type = basetype_content["value"].baseType.getcontent() lbessard@227: # Subrange derived directly from a user defined type lbessard@227: if base_type["name"] == "derived": lbessard@227: basetype_name = base_type["value"].getname() lbessard@227: self.GenerateDataType(basetype_name) lbessard@227: # Subrange derived directly from an elementary type lbessard@227: else: lbessard@227: basetype_name = base_type["name"] lbessard@227: min_value = basetype_content["value"].range.getlower() lbessard@227: max_value = basetype_content["value"].range.getupper() lbessard@227: datatype_def += [(basetype_name, (tagname, "base")), lbessard@227: (" (", ()), lbessard@227: ("%d"%min_value, (tagname, "lower")), lbessard@227: ("..", ()), lbessard@227: ("%d"%max_value, (tagname, "upper")), lbessard@227: (")",())] lbessard@227: # Data type is an enumerated type lbessard@227: elif basetype_content["name"] == "enum": lbessard@227: values = [[(value.getname(), (tagname, "value", i))] lbessard@227: for i, value in enumerate(basetype_content["value"].values.getvalue())] lbessard@227: datatype_def += [("(", ())] lbessard@227: datatype_def += JoinList([(", ", ())], values) lbessard@227: datatype_def += [(")", ())] lbessard@227: # Data type is an array lbessard@227: elif basetype_content["name"] == "array": lbessard@227: base_type = basetype_content["value"].baseType.getcontent() lbessard@227: # Array derived directly from a user defined type lbessard@227: if base_type["name"] == "derived": lbessard@227: basetype_name = base_type["value"].getname() lbessard@227: self.GenerateDataType(basetype_name) lbessard@227: # Array derived directly from a string type lbessard@227: elif base_type["name"] in ["string", "wstring"]: lbessard@227: basetype_name = base_type["name"].upper() lbessard@227: # Array derived directly from an elementary type lbessard@227: else: lbessard@227: basetype_name = base_type["name"] lbessard@227: dimensions = [[("%d"%dimension.getlower(), (tagname, "range", i, "lower")), lbessard@227: ("..", ()), lbessard@227: ("%d"%dimension.getupper(), (tagname, "range", i, "upper"))] lbessard@227: for i, dimension in enumerate(basetype_content["value"].getdimension())] lbessard@227: datatype_def += [("ARRAY [", ())] lbessard@227: datatype_def += JoinList([(",", ())], dimensions) lbessard@227: datatype_def += [("] OF " , ()), lbessard@227: (basetype_name, (tagname, "base"))] lbessard@227: # Data type derived directly from a elementary type lbessard@141: else: lbessard@227: datatype_def += [(basetype_content["name"], (tagname, "base"))] lbessard@227: # Data type has an initial value lbessard@227: if datatype.initialValue is not None: lbessard@227: datatype_def += [(" := ", ()), lbessard@227: (self.ComputeValue(datatype.initialValue.getvalue(), datatype_name), (tagname, "initial"))] lbessard@227: datatype_def += [(";\n", ())] lbessard@227: return datatype_def lbessard@227: lbessard@227: # Generate a POU from its name lbessard@227: def GeneratePouProgram(self, pou_name): lbessard@227: # Verify that POU hasn't been generated yet lbessard@227: if not self.PouComputed.get(pou_name, True): lbessard@227: # If not mark POU as computed lbessard@227: self.PouComputed[pou_name] = True lbessard@227: lbessard@227: # Getting POU model from project lbessard@227: pou = self.Project.getpou(pou_name) lbessard@227: pou_type = pou.getpouType() lbessard@227: # Verify that POU type exists lbessard@227: if pou_type in pouTypeNames: lbessard@227: # Create a POU program generator lbessard@227: pou_program = PouProgramGenerator(self, pou.getname(), pouTypeNames[pou_type]) lbessard@227: program = pou_program.GenerateProgram(pou) lbessard@227: self.Program += program lbessard@141: else: lbessard@227: raise PLCGenException, "Undefined pou type \"%s\""%pou_type lbessard@227: lbessard@227: # Generate a configuration from its model lbessard@227: def GenerateConfiguration(self, configuration): lbessard@227: tagname = self.Controler.ComputeConfigurationName(configuration.getname()) lbessard@227: config = [("\nCONFIGURATION ", ()), lbessard@227: (configuration.getname(), (tagname, "name")), lbessard@227: ("\n", ())] lbessard@227: var_number = 0 lbessard@227: # Generate any global variable in configuration lbessard@227: for varlist in configuration.getglobalVars(): lbessard@227: # Generate variable block with modifier lbessard@227: config += [(" VAR_GLOBAL", ())] lbessard@227: if varlist.getretain(): lbessard@227: config += [(" RETAIN", (tagname, "variable", (var_number, var_number + len(varlist.getvariable())), "retain"))] lbessard@227: if varlist.getconstant(): lbessard@227: config += [(" CONSTANT", (tagname, "variable", (var_number, var_number + len(varlist.getvariable())), "constant"))] lbessard@227: config += [("\n", ())] lbessard@227: # Generate any variable of this block lbessard@227: for var in varlist.getvariable(): lbessard@227: vartype_content = var.gettype().getcontent() lbessard@227: # Variable type is a user data type lbessard@227: if vartype_content["name"] == "derived": lbessard@227: var_type = vartype_content["value"].getname() lbessard@227: # Variable type is a string type lbessard@227: elif vartype_content["name"] in ["string", "wstring"]: lbessard@227: var_type = vartype_content["name"].upper() lbessard@227: # Variable type is an elementary type lbessard@78: else: lbessard@227: var_type = vartype_content["name"] lbessard@227: config += [(" ", ()), lbessard@227: (var.getname(), (tagname, "variable", var_number, "name")), lbessard@227: (" ", ())] lbessard@227: # Generate variable address if exists lbessard@227: address = var.getaddress() lbessard@227: if address: lbessard@227: config += [("AT ", ()), lbessard@227: (address, (tagename, "variable", var_number, "address")), lbessard@227: (" ", ())] lbessard@227: config += [(": ", ()), lbessard@227: (var_type, (tagename, "variable", var_number, "type"))] lbessard@227: # Generate variable initial value if exists lbessard@227: initial = var.getinitialValue() lbessard@227: if initial: lbessard@227: config += [(" := ", ()), lbessard@227: (self.ComputeValue(initial.getvalue(), var_type), (tagename, "variable", var_number, "initial"))] lbessard@227: config += [(";\n", ())] lbessard@227: var_number += 1 lbessard@227: config += [(" END_VAR\n", ())] lbessard@227: # Generate any resource in the configuration lbessard@227: for resource in configuration.getresource(): lbessard@227: config += self.GenerateResource(resource, configuration.getname()) lbessard@227: config += [("END_CONFIGURATION\n", ())] lbessard@227: return config lbessard@227: lbessard@227: # Generate a resource from its model lbessard@227: def GenerateResource(self, resource, config_name): lbessard@227: tagname = self.Controler.ComputeConfigurationResourceName(config_name, resource.getname()) lbessard@227: resrce = [("\n RESOURCE ", ()), lbessard@227: (resource.getname(), (tagname, "name")), lbessard@227: (" ON PLC\n", ())] lbessard@227: var_number = 0 lbessard@227: # Generate any global variable in configuration lbessard@227: for varlist in resource.getglobalVars(): lbessard@227: # Generate variable block with modifier lbessard@227: resrce += [(" VAR_GLOBAL", ())] lbessard@227: if varlist.getretain(): lbessard@227: resrce += [(" RETAIN", (tagname, "variable", (var_number, var_number + len(varlist.getvariable())), "retain"))] lbessard@227: if varlist.getconstant(): lbessard@227: resrce += [(" CONSTANT", (tagname, "variable", (var_number, var_number + len(varlist.getvariable())), "constant"))] lbessard@227: resrce += "\n" lbessard@227: # Generate any variable of this block lbessard@227: for var in varlist.getvariable(): lbessard@227: vartype_content = var.gettype().getcontent() lbessard@227: # Variable type is a user data type lbessard@227: if vartype_content["name"] == "derived": lbessard@227: var_type = vartype_content["value"].getname() lbessard@227: # Variable type is a string type lbessard@227: elif vartype_content["name"] in ["string", "wstring"]: lbessard@227: var_type = vartype_content["name"].upper() lbessard@227: # Variable type is an elementary type lbessard@78: else: lbessard@227: var_type = vartype_content["name"] lbessard@227: resrce += [(" ", ()), lbessard@227: (var.getname(), (tagname, "variable", var_number, "name")), lbessard@227: (" ", ())] lbessard@227: address = var.getaddress() lbessard@227: # Generate variable address if exists lbessard@227: if address: lbessard@227: resrce += [("AT ", ()), lbessard@227: (address, (tagename, "variable", var_number, "address")), lbessard@227: (" ", ())] lbessard@227: resrce += [(": ", ()), lbessard@227: (var_type, (tagename, "variable", var_number, "type"))] lbessard@227: # Generate variable initial value if exists lbessard@227: initial = var.getinitialValue() lbessard@227: if initial: lbessard@227: resrce += [(" := ", ()), lbessard@227: (self.ComputeValue(initial.getvalue(), var_type), (tagename, "variable", var_number, "initial"))] lbessard@227: resrce += [(";\n", ())] lbessard@227: var_number += 1 lbessard@227: resrce += [(" END_VAR\n", ())] lbessard@227: # Generate any task in the resource lbessard@227: tasks = resource.gettask() lbessard@227: task_number = 0 lbessard@227: for task in tasks: lbessard@227: # Task declaration lbessard@227: resrce += [(" TASK ", ()), lbessard@227: (task.getname(), (tagname, "task", task_number, "name")), lbessard@227: ("(", ())] lbessard@227: args = [] lbessard@227: single = task.getsingle() lbessard@227: # Single argument if exists lbessard@227: if single: lbessard@227: resrce += [("SINGLE := ", ()), lbessard@227: (single, (tagname, "task", task_number, "single")), lbessard@227: (",", ())] lbessard@227: # Interval argument if exists lbessard@227: interval = task.getinterval() lbessard@227: if interval: lbessard@227: resrce += [("INTERVAL := t#", ())] lbessard@227: if interval.hour != 0: lbessard@227: resrce += [("%dh"%interval.hour, (tagname, "task", task_number, "interval", "hour"))] lbessard@227: if interval.minute != 0: lbessard@227: resrce += [("%dm"%interval.minute, (tagname, "task", task_number, "interval", "minute"))] lbessard@227: if interval.second != 0: lbessard@227: resrce += [("%ds"%interval.second, (tagname, "task", task_number, "interval", "second"))] lbessard@227: if interval.microsecond != 0: lbessard@227: resrce += [("%dms"%(interval.microsecond / 1000), (tagname, "task", task_number, "interval", "millisecond"))] lbessard@227: resrce += [(",", ())] lbessard@227: # Priority argument lbessard@227: resrce += [("PRIORITY := ", ()), lbessard@227: ("%d"%task.getpriority(), (tagname, "task", task_number, "priority")), lbessard@227: (");\n", ())] lbessard@227: task_number += 1 lbessard@227: instance_number = 0 lbessard@227: # Generate any program assign to each task lbessard@227: for task in tasks: lbessard@227: for instance in task.getpouInstance(): lbessard@227: resrce += [(" PROGRAM ", ()), lbessard@227: (instance.getname(), (tagname, "instance", instance_number, "name")), lbessard@227: (" WITH ", ()), lbessard@227: (task.getname(), (tagname, "instance", instance_number, "task")), lbessard@227: (" : ", ()), lbessard@227: (instance.gettype(), (tagname, "instance", instance_number, "type")), lbessard@227: (";\n", ())] lbessard@227: instance_number += 1 lbessard@227: # Generate any program assign to no task lbessard@227: for instance in resource.getpouInstance(): lbessard@227: resrce += [(" PROGRAM ", ()), lbessard@227: (instance.getname(), (tagname, "instance", instance_number, "name")), lbessard@227: (" : ", ()), lbessard@227: (instance.gettype(), (tagname, "instance", instance_number, "type")), lbessard@227: (";\n", ())] lbessard@227: instance_number += 1 lbessard@227: resrce += [(" END_RESOURCE\n", ())] lbessard@227: return resrce lbessard@227: lbessard@227: # Generate the entire program for current project lbessard@227: def GenerateProgram(self): lbessard@227: # Find all data types defined lbessard@227: for datatype in self.Project.getdataTypes(): lbessard@227: self.DatatypeComputed[datatype.getname()] = False lbessard@227: # Find all data types defined lbessard@227: for pou in self.Project.getpous(): lbessard@227: self.PouComputed[pou.getname()] = False lbessard@227: # Generate data type declaration structure if there is at least one data lbessard@227: # type defined lbessard@227: if len(self.DatatypeComputed) > 0: lbessard@227: self.Program += [("TYPE\n", ())] lbessard@227: # Generate every data types defined lbessard@227: for datatype_name in self.DatatypeComputed.keys(): lbessard@227: self.Program += self.GenerateDataType(datatype_name) lbessard@227: self.Program += [("END_TYPE\n\n", ())] lbessard@227: # Generate every POUs defined lbessard@227: for pou_name in self.PouComputed.keys(): lbessard@227: self.GeneratePouProgram(pou_name) lbessard@227: # Generate every configurations defined lbessard@227: for config in self.Project.getconfigurations(): lbessard@227: self.Program += self.GenerateConfiguration(config) lbessard@227: lbessard@227: # Return generated program lbessard@227: def GetGeneratedProgram(self): lbessard@227: return self.Program lbessard@227: lbessard@227: lbessard@227: #------------------------------------------------------------------------------- lbessard@227: # Generator of POU programs lbessard@227: #------------------------------------------------------------------------------- lbessard@227: lbessard@227: lbessard@227: class PouProgramGenerator: lbessard@227: lbessard@227: # Create a new POU program generator lbessard@227: def __init__(self, parent, name, type): lbessard@227: # Keep Reference to the parent generator lbessard@227: self.ParentGenerator = parent etisserant@0: self.Name = name etisserant@0: self.Type = type lbessard@227: self.TagName = self.ParentGenerator.Controler.ComputePouName(name) lbessard@227: self.CurrentIndent = " " lbessard@1: self.ReturnType = None lbessard@1: self.Interface = [] lbessard@1: self.InitialSteps = [] lbessard@72: self.ComputedBlocks = {} lbessard@72: self.ComputedConnectors = {} lbessard@125: self.ConnectionTypes = {} lbessard@125: self.RelatedConnections = [] lbessard@1: self.SFCNetworks = {"Steps":{}, "Transitions":{}, "Actions":{}} lbessard@227: self.SFCComputedBlocks = [] lbessard@46: self.ActionNumber = 0 lbessard@227: self.Program = [] lbessard@227: lbessard@227: def GetBlockType(self, type): lbessard@227: return self.ParentGenerator.Controler.GetBlockType(type) lbessard@227: lbessard@227: def IndentLeft(self): lbessard@227: if len(self.CurrentIndent) >= 2: lbessard@227: self.CurrentIndent = self.CurrentIndent[:-2] lbessard@227: lbessard@227: def IndentRight(self): lbessard@227: self.CurrentIndent += " " lbessard@227: lbessard@227: # Generator of unique ID for inline actions lbessard@46: def GetActionNumber(self): lbessard@46: self.ActionNumber += 1 lbessard@46: return self.ActionNumber lbessard@46: lbessard@227: # Test if a variable has already been defined lbessard@1: def IsAlreadyDefined(self, name): lbessard@33: for list_type, retain, constant, located, vars in self.Interface: lbessard@30: for var_type, var_name, var_address, var_initial in vars: lbessard@1: if name == var_name: lbessard@1: return True lbessard@1: return False lbessard@1: lbessard@227: # Return the type of a variable defined in interface lbessard@125: def GetVariableType(self, name): lbessard@125: for list_type, retain, constant, located, vars in self.Interface: lbessard@125: for var_type, var_name, var_address, var_initial in vars: lbessard@125: if name == var_name: lbessard@125: return var_type lbessard@125: return None lbessard@125: lbessard@227: # Return connectors linked by a connection to the given connector lbessard@227: def GetConnectedConnector(self, connector, body): lbessard@227: links = connector.getconnections() lbessard@125: if links and len(links) == 1: lbessard@227: return self.GetLinkedConnector(links[0], body) lbessard@227: return None lbessard@227: lbessard@227: def GetLinkedConnector(self, link, body): lbessard@151: parameter = link.getformalParameter() lbessard@151: instance = body.getcontentInstance(link.getrefLocalId()) lbessard@151: if isinstance(instance, (plcopen.fbdObjects_inVariable, plcopen.fbdObjects_inOutVariable, plcopen.commonObjects_continuation, plcopen.ldObjects_contact, plcopen.ldObjects_coil)): lbessard@125: return instance.connectionPointOut lbessard@151: elif isinstance(instance, plcopen.fbdObjects_block): lbessard@151: outputvariables = instance.outputVariables.getvariable() lbessard@125: if len(outputvariables) == 1: lbessard@125: return outputvariables[0].connectionPointOut lbessard@125: elif parameter: lbessard@125: for variable in outputvariables: lbessard@151: if variable.getformalParameter() == parameter: lbessard@125: return variable.connectionPointOut lbessard@125: else: lbessard@125: point = link.getPosition()[-1] lbessard@125: for variable in outputvariables: lbessard@151: relposition = variable.connectionPointOut.getrelPositionXY() lbessard@151: blockposition = instance.getposition() lbessard@125: if point.x == blockposition.x + relposition[0] and point.y == blockposition.y + relposition[1]: lbessard@125: return variable.connectionPointOut lbessard@151: elif isinstance(instance, plcopen.ldObjects_leftPowerRail): lbessard@151: outputconnections = instance.getconnectionPointOut() lbessard@125: if len(outputconnections) == 1: lbessard@125: return outputconnections[0] lbessard@125: else: lbessard@151: point = link.getposition()[-1] lbessard@125: for outputconnection in outputconnections: lbessard@151: relposition = outputconnection.getrelPositionXY() lbessard@151: powerrailposition = instance.getposition() lbessard@125: if point.x == powerrailposition.x + relposition[0] and point.y == powerrailposition.y + relposition[1]: lbessard@125: return outputconnection lbessard@125: return None lbessard@125: lbessard@125: def ExtractRelatedConnections(self, connection): lbessard@125: for i, related in enumerate(self.RelatedConnections): lbessard@125: if connection in related: lbessard@125: return self.RelatedConnections.pop(i) lbessard@125: return [connection] lbessard@125: lbessard@227: def ComputeInterface(self, pou): lbessard@194: interface = pou.getinterface() lbessard@194: if interface is not None: lbessard@194: body = pou.getbody() lbessard@194: body_content = body.getcontent() lbessard@194: if self.Type == "FUNCTION": lbessard@194: returntype_content = interface.getreturnType().getcontent() lbessard@227: if returntype_content["name"] == "derived": lbessard@227: self.ReturnType = returntype_content["value"].getname() lbessard@227: elif returntype_content["name"] in ["string", "wstring"]: lbessard@227: self.ReturnType = returntype_content["name"].upper() lbessard@227: else: lbessard@194: self.ReturnType = returntype_content["name"] lbessard@194: for varlist in interface.getcontent(): lbessard@194: variables = [] lbessard@194: located = [] lbessard@194: for var in varlist["value"].getvariable(): lbessard@194: vartype_content = var.gettype().getcontent() lbessard@194: if vartype_content["name"] == "derived": lbessard@194: var_type = vartype_content["value"].getname() lbessard@227: blocktype = self.GetBlockType(var_type) lbessard@194: if blocktype is not None: lbessard@227: self.ParentGenerator.GeneratePouProgram(var_type) lbessard@194: if body_content["name"] in ["FBD", "LD", "SFC"]: lbessard@194: block = pou.getinstanceByName(var.getname()) lbessard@191: else: lbessard@194: block = None lbessard@194: for variable in blocktype["initialise"](var_type, var.getname(), block): lbessard@194: if variable[2] is not None: lbessard@194: located.append(variable) lbessard@194: else: lbessard@194: variables.append(variable) lbessard@194: else: lbessard@194: initial = var.getinitialValue() lbessard@194: if initial: lbessard@194: initial_value = initial.getvalue() lbessard@194: else: lbessard@194: initial_value = None lbessard@194: address = var.getaddress() lbessard@194: if address is not None: lbessard@194: located.append((vartype_content["value"].getname(), var.getname(), address, initial_value)) lbessard@194: else: lbessard@194: variables.append((vartype_content["value"].getname(), var.getname(), None, initial_value)) lbessard@125: else: lbessard@151: initial = var.getinitialValue() lbessard@125: if initial: lbessard@151: initial_value = initial.getvalue() lbessard@125: else: lbessard@125: initial_value = None lbessard@151: address = var.getaddress() lbessard@194: if vartype_content["name"] in ["string", "wstring"]: lbessard@194: if address is not None: lbessard@194: located.append((vartype_content["name"].upper(), var.getname(), address, initial_value)) lbessard@194: else: lbessard@194: variables.append((vartype_content["name"].upper(), var.getname(), None, initial_value)) lbessard@194: elif address is not None: lbessard@194: located.append((vartype_content["name"], var.getname(), address, initial_value)) lbessard@191: else: lbessard@194: variables.append((vartype_content["name"], var.getname(), None, initial_value)) lbessard@194: if len(variables) > 0: lbessard@194: self.Interface.append((varTypeNames[varlist["name"]], varlist["value"].getretain(), lbessard@194: varlist["value"].getconstant(), False, variables)) lbessard@194: if len(located) > 0: lbessard@194: self.Interface.append((varTypeNames[varlist["name"]], varlist["value"].getretain(), lbessard@194: varlist["value"].getconstant(), True, located)) lbessard@191: lbessard@227: def ComputeConnectionTypes(self, pou): lbessard@151: body = pou.getbody() lbessard@151: body_content = body.getcontent() lbessard@125: body_type = body_content["name"] lbessard@125: if body_type in ["FBD", "LD", "SFC"]: lbessard@151: for instance in body.getcontentInstances(): lbessard@151: if isinstance(instance, (plcopen.fbdObjects_inVariable, plcopen.fbdObjects_outVariable, plcopen.fbdObjects_inOutVariable)): lbessard@151: expression = instance.getexpression() lbessard@125: var_type = self.GetVariableType(expression) lbessard@151: if expression == pou.getname(): lbessard@151: returntype_content = pou.interface.getreturnType().getcontent() lbessard@141: if returntype_content["name"] == "derived": lbessard@151: var_type = returntype_content["value"].getname() lbessard@141: elif returntype_content["name"] in ["string", "wstring"]: lbessard@141: var_type = returntype_content["name"].upper() lbessard@141: else: lbessard@125: var_type = returntype_content["name"] lbessard@125: elif var_type is None: lbessard@125: var_type = expression.split("#")[0] lbessard@151: if isinstance(instance, (plcopen.fbdObjects_inVariable, plcopen.fbdObjects_inOutVariable)): lbessard@208: for connection in self.ExtractRelatedConnections(instance.connectionPointOut): lbessard@208: self.ConnectionTypes[connection] = var_type lbessard@151: if isinstance(instance, (plcopen.fbdObjects_outVariable, plcopen.fbdObjects_inOutVariable)): lbessard@125: self.ConnectionTypes[instance.connectionPointIn] = var_type lbessard@227: connected = self.GetConnectedConnector(instance.connectionPointIn, body) lbessard@125: if connected and connected not in self.ConnectionTypes: lbessard@125: for connection in self.ExtractRelatedConnections(connected): lbessard@125: self.ConnectionTypes[connection] = var_type lbessard@151: elif isinstance(instance, (plcopen.ldObjects_contact, plcopen.ldObjects_coil)): lbessard@208: for connection in self.ExtractRelatedConnections(instance.connectionPointOut): lbessard@208: self.ConnectionTypes[connection] = "BOOL" lbessard@125: self.ConnectionTypes[instance.connectionPointIn] = "BOOL" lbessard@227: connected = self.GetConnectedConnector(instance.connectionPointIn, body) lbessard@125: if connected and connected not in self.ConnectionTypes: lbessard@125: for connection in self.ExtractRelatedConnections(connected): lbessard@125: self.ConnectionTypes[connection] = "BOOL" lbessard@151: elif isinstance(instance, plcopen.ldObjects_leftPowerRail): lbessard@151: for connection in instance.getconnectionPointOut(): lbessard@208: for related in self.ExtractRelatedConnections(connection): lbessard@208: self.ConnectionTypes[related] = "BOOL" lbessard@151: elif isinstance(instance, plcopen.ldObjects_rightPowerRail): lbessard@151: for connection in instance.getconnectionPointIn(): lbessard@125: self.ConnectionTypes[connection] = "BOOL" lbessard@227: connected = self.GetConnectedConnector(connection, body) lbessard@125: if connected and connected not in self.ConnectionTypes: lbessard@125: for connection in self.ExtractRelatedConnections(connected): lbessard@125: self.ConnectionTypes[connection] = "BOOL" lbessard@151: elif isinstance(instance, plcopen.sfcObjects_transition): lbessard@151: content = instance.condition.getcontent() lbessard@125: if content["name"] == "connection" and len(content["value"]) == 1: lbessard@227: connected = self.GetLinkedConnector(content["value"][0], body) lbessard@125: if connected and connected not in self.ConnectionTypes: lbessard@125: for connection in self.ExtractRelatedConnections(connected): lbessard@125: self.ConnectionTypes[connection] = "BOOL" lbessard@151: elif isinstance(instance, plcopen.fbdObjects_block): lbessard@227: block_infos = self.GetBlockType(instance.gettypeName()) lbessard@125: undefined = {} lbessard@151: for variable in instance.outputVariables.getvariable(): lbessard@151: output_name = variable.getformalParameter() lbessard@125: for oname, otype, oqualifier in block_infos["outputs"]: lbessard@125: if output_name == oname and variable.connectionPointOut not in self.ConnectionTypes: lbessard@125: if otype.startswith("ANY"): lbessard@125: if otype not in undefined: lbessard@125: undefined[otype] = [] lbessard@125: undefined[otype].append(variable.connectionPointOut) lbessard@125: else: lbessard@125: for connection in self.ExtractRelatedConnections(variable.connectionPointOut): lbessard@125: self.ConnectionTypes[connection] = otype lbessard@151: for variable in instance.inputVariables.getvariable(): lbessard@151: input_name = variable.getformalParameter() lbessard@125: for iname, itype, iqualifier in block_infos["inputs"]: lbessard@125: if input_name == iname: lbessard@227: connected = self.GetConnectedConnector(variable.connectionPointIn, body) lbessard@125: if itype.startswith("ANY"): lbessard@125: if itype not in undefined: lbessard@125: undefined[itype] = [] lbessard@125: undefined[itype].append(variable.connectionPointIn) lbessard@125: if connected: lbessard@125: undefined[itype].append(connected) lbessard@125: else: lbessard@125: self.ConnectionTypes[variable.connectionPointIn] = itype lbessard@125: if connected and connected not in self.ConnectionTypes: lbessard@125: for connection in self.ExtractRelatedConnections(connected): lbessard@125: self.ConnectionTypes[connection] = itype lbessard@125: for var_type, connections in undefined.items(): lbessard@125: related = [] lbessard@125: for connection in connections: lbessard@125: if connection in self.ConnectionTypes: lbessard@125: var_type = self.ConnectionTypes[connection] lbessard@125: else: lbessard@125: related.extend(self.ExtractRelatedConnections(connection)) lbessard@125: if var_type.startswith("ANY") and len(related) > 0: lbessard@125: self.RelatedConnections.append(related) lbessard@125: else: lbessard@125: for connection in related: lbessard@125: self.ConnectionTypes[connection] = var_type lbessard@227: lbessard@227: def GetNetworkType(self, connections, body): lbessard@227: network_type = "FBD" lbessard@227: for connection in connections: lbessard@227: localId = connection.getrefLocalId() lbessard@227: next = body.getcontentInstance(localId) lbessard@227: if isinstance(next, plcopen.ldObjects_leftPowerRail) or isinstance(next, plcopen.ldObjects_contact): lbessard@227: return "LD" lbessard@227: elif isinstance(next, plcopen.fbdObjects_block): lbessard@227: for variable in next.inputVariables.getvariable(): lbessard@227: result = self.GetNetworkType(variable.connectionPointIn.getconnections(), body) lbessard@227: if result != "FBD": lbessard@227: return result lbessard@227: elif isinstance(next, plcopen.fbdObjects_inVariable): lbessard@227: return "FBD" lbessard@227: elif isinstance(next, plcopen.fbdObjects_inOutVariable): lbessard@227: return self.GetNetworkType(next.connectionPointIn.getconnections(), body) lbessard@227: else: lbessard@227: return None lbessard@227: return "FBD" lbessard@227: lbessard@227: def ComputeProgram(self, pou): lbessard@151: body = pou.getbody() lbessard@151: body_content = body.getcontent() etisserant@0: body_type = body_content["name"] etisserant@0: if body_type in ["IL","ST"]: lbessard@227: self.Program = [(ReIndentText(body_content["value"].gettext(), len(self.CurrentIndent)), lbessard@227: (self.TagName, "body"))] etisserant@0: elif body_type == "FBD": lbessard@125: orderedInstances = [] lbessard@201: otherInstances = {"outVariables" : [], "block" : [], "connector" : []} lbessard@151: for instance in body.getcontentInstances(): lbessard@151: if isinstance(instance, (plcopen.fbdObjects_outVariable, plcopen.fbdObjects_inOutVariable, plcopen.fbdObjects_block)): lbessard@151: executionOrderId = instance.getexecutionOrderId() lbessard@125: if executionOrderId > 0: lbessard@125: orderedInstances.append((executionOrderId, instance)) lbessard@201: elif isinstance(instance, (plcopen.fbdObjects_outVariable, plcopen.fbdObjects_inOutVariable)): lbessard@201: otherInstances["outVariables"].append(instance) lbessard@201: elif isinstance(instance, plcopen.fbdObjects_block): lbessard@201: otherInstances["block"].append(instance) lbessard@151: elif isinstance(instance, plcopen.commonObjects_connector): lbessard@201: otherInstances["connector"].append(instance) lbessard@125: orderedInstances.sort() lbessard@201: instances = [instance for (executionOrderId, instance) in orderedInstances] lbessard@201: instances.extend(otherInstances["connector"] + otherInstances["outVariables"] + otherInstances["block"]) lbessard@125: for instance in instances: lbessard@151: if isinstance(instance, (plcopen.fbdObjects_outVariable, plcopen.fbdObjects_inOutVariable)): lbessard@151: connections = instance.connectionPointIn.getconnections() etisserant@0: if connections and len(connections) == 1: etisserant@0: expression = self.ComputeFBDExpression(body, connections[0]) lbessard@227: self.Program += [(self.CurrentIndent, ()), lbessard@227: (instance.getexpression(), (self.TagName, "io_variable", instance.getlocalId(), "expression")), lbessard@227: (" := ", ())] lbessard@227: self.Program += expression lbessard@227: self.Program += [(";\n", ())] lbessard@151: elif isinstance(instance, plcopen.fbdObjects_block): lbessard@151: block_type = instance.gettypeName() lbessard@227: self.ParentGenerator.GeneratePouProgram(block_type) lbessard@227: block_infos = self.GetBlockType(block_type) lbessard@78: block_infos["generate"](self, instance, body, None) lbessard@151: elif isinstance(instance, plcopen.commonObjects_connector): lbessard@151: connector = instance.getname() lbessard@72: if self.ComputedConnectors.get(connector, None): lbessard@72: continue lbessard@151: connections = instance.connectionPointIn.getconnections() lbessard@72: if connections and len(connections) == 1: lbessard@72: self.ComputedConnectors[connector] = self.ComputeFBDExpression(body, connections[0]) etisserant@0: elif body_type == "LD": lbessard@151: for instance in body.getcontentInstances(): lbessard@151: if isinstance(instance, plcopen.ldObjects_coil): lbessard@151: paths = self.GenerateLDPaths(instance.connectionPointIn.getconnections(), body) lbessard@104: if len(paths) > 0: lbessard@104: paths = tuple(paths) lbessard@104: else: lbessard@227: paths = paths[0] lbessard@227: coil_info = (self.TagName, "coil", instance.getlocalId()) lbessard@227: variable = self.ExtractModifier(instance, [(instance.getvariable(), coil_info + ("reference",))], coil_info) etisserant@0: expression = self.ComputeLDExpression(paths, True) lbessard@227: self.Program += [(self.CurrentIndent, ())] + variable lbessard@227: self.Program += [(" := ", ())] + expression + [(";\n", ())] etisserant@0: elif body_type == "SFC": lbessard@227: self.IndentRight() lbessard@151: for instance in body.getcontentInstances(): lbessard@151: if isinstance(instance, plcopen.sfcObjects_step): lbessard@1: self.GenerateSFCStep(instance, pou) lbessard@151: elif isinstance(instance, plcopen.commonObjects_actionBlock): lbessard@1: self.GenerateSFCStepActions(instance, pou) lbessard@151: elif isinstance(instance, plcopen.sfcObjects_transition): lbessard@1: self.GenerateSFCTransition(instance, pou) lbessard@151: elif isinstance(instance, plcopen.sfcObjects_jumpStep): etisserant@0: self.GenerateSFCJump(instance, pou) lbessard@227: if len(self.InitialSteps) > 0 and len(self.SFCComputedBlocks) > 0: lbessard@66: action_name = "COMPUTE_FUNCTION_BLOCKS" lbessard@66: action_infos = {"qualifier" : "S", "content" : action_name} lbessard@66: self.SFCNetworks["Steps"][self.InitialSteps[0]]["actions"].append(action_infos) lbessard@227: self.SFCNetworks["Actions"][action_name] = (self.SFCComputedBlocks, ()) lbessard@227: self.Program = [] lbessard@227: self.IndentLeft() lbessard@1: for initialstep in self.InitialSteps: lbessard@1: self.ComputeSFCStep(initialstep) lbessard@227: lbessard@125: def ComputeFBDExpression(self, body, link, order = False): lbessard@151: localid = link.getrefLocalId() lbessard@151: instance = body.getcontentInstance(localid) lbessard@151: if isinstance(instance, (plcopen.fbdObjects_inVariable, plcopen.fbdObjects_inOutVariable)): lbessard@227: return [(instance.getexpression(), (self.TagName, "io_variable", localid, "expression"))] lbessard@151: elif isinstance(instance, plcopen.fbdObjects_block): lbessard@151: block_type = instance.gettypeName() lbessard@227: self.ParentGenerator.GeneratePouProgram(block_type) lbessard@227: block_infos = self.GetBlockType(block_type) lbessard@125: return block_infos["generate"](self, instance, body, link, order) lbessard@151: elif isinstance(instance, plcopen.commonObjects_continuation): lbessard@151: name = instance.getname() lbessard@72: computed_value = self.ComputedConnectors.get(name, None) lbessard@72: if computed_value != None: lbessard@72: return computed_value lbessard@151: for tmp_instance in body.getcontentInstances(): lbessard@151: if isinstance(tmp_instance, plcopen.commonObjects_connector): lbessard@151: if tmp_instance.getname() == name: lbessard@151: connections = tmp_instance.connectionPointIn.getconnections() lbessard@72: if connections and len(connections) == 1: lbessard@125: expression = self.ComputeFBDExpression(body, connections[0], order) lbessard@72: self.ComputedConnectors[name] = expression lbessard@72: return expression lbessard@214: raise PLCGenException, "No connector found corresponding to \"%s\" continuation in \"%s\" POU"%(name, self.Name) etisserant@0: lbessard@66: def GenerateLDPaths(self, connections, body): etisserant@0: paths = [] etisserant@0: for connection in connections: lbessard@151: localId = connection.getrefLocalId() lbessard@151: next = body.getcontentInstance(localId) lbessard@151: if isinstance(next, plcopen.ldObjects_leftPowerRail): etisserant@0: paths.append(None) lbessard@151: elif isinstance(next, plcopen.fbdObjects_block): lbessard@151: block_type = next.gettypeName() lbessard@227: self.ParentGenerator.GeneratePouProgram(block_type) lbessard@227: block_infos = self.GetBlockType(block_type) lbessard@227: paths.append(str(block_infos["generate"](self, next, body, connection))) etisserant@0: else: lbessard@227: contact_info = (self.TagName, "contact", next.getlocalId()) lbessard@227: variable = str(self.ExtractModifier(next, [(next.getvariable(), contact_info + ("reference",))], contact_info)) lbessard@151: result = self.GenerateLDPaths(next.connectionPointIn.getconnections(), body) lbessard@66: if len(result) > 1: lbessard@66: paths.append([variable, tuple(result)]) lbessard@66: elif type(result[0]) == ListType: lbessard@66: paths.append([variable] + result[0]) lbessard@66: elif result[0]: lbessard@66: paths.append([variable, result[0]]) lbessard@66: else: lbessard@66: paths.append(variable) lbessard@66: return paths lbessard@66: lbessard@227: def ComputeLDExpression(self, paths, first = False): lbessard@227: if type(paths) == TupleType: lbessard@227: if None in paths: lbessard@227: return [("TRUE", ())] lbessard@66: else: lbessard@227: vars = [self.ComputeLDExpression(path) for path in paths] lbessard@227: if first: lbessard@227: return JoinList([(" OR ", ())], vars) lbessard@227: else: lbessard@227: return [("(", ())] + JoinList([(" OR ", ())], vars) + [(")", ())] lbessard@227: elif type(paths) == ListType: lbessard@227: vars = [self.ComputeLDExpression(path) for path in paths] lbessard@227: return JoinList([(" AND ", ())], vars) lbessard@227: else: lbessard@227: return eval(paths) lbessard@227: lbessard@227: def ExtractModifier(self, variable, expression, var_info): lbessard@227: if variable.getnegated(): lbessard@227: return [("NOT(", var_info + ("negated",))] + expression + [(")", ())] lbessard@227: else: lbessard@227: edge = variable.getedge() lbessard@227: if edge == "rising": lbessard@227: return self.AddTrigger("R_TRIG", expression, var_info + ("rising",)) lbessard@227: elif edge == "falling": lbessard@227: return self.AddTrigger("F_TRIG", expression, var_info + ("falling",)) lbessard@227: return expression lbessard@227: lbessard@227: def AddTrigger(self, edge, expression, var_info): lbessard@227: if self.Interface[-1][0] != "VAR" or self.Interface[-1][1] or self.Interface[-1][2] or self.Interface[-1][3]: lbessard@227: self.Interface.append(("VAR", False, False, False, [])) lbessard@227: i = 1 lbessard@227: name = "%s%d"%(edge, i) lbessard@227: while self.IsAlreadyDefined(name): lbessard@227: i += 1 lbessard@227: name = "%s%d"%(edge, i) lbessard@227: self.Interface[-1][4].append((edge, name, None, None)) lbessard@227: self.Program += [(self.CurrentIndent, ()), (name, var_info), ("(CLK := ", ())] lbessard@227: self.Program += expression lbessard@227: self.Program += [(");\n", ())] lbessard@227: return [("%s.Q"%name, var_info)] lbessard@66: lbessard@2: def ExtractDivergenceInput(self, divergence, pou): lbessard@151: connectionPointIn = divergence.getconnectionPointIn() lbessard@2: if connectionPointIn: lbessard@151: connections = connectionPointIn.getconnections() lbessard@201: if connections is not None and len(connections) == 1: lbessard@151: instanceLocalId = connections[0].getrefLocalId() lbessard@151: return pou.body.getcontentInstance(instanceLocalId) lbessard@2: return None lbessard@2: lbessard@2: def ExtractConvergenceInputs(self, convergence, pou): lbessard@2: instances = [] lbessard@151: for connectionPointIn in convergence.getconnectionPointIn(): lbessard@151: connections = connectionPointIn.getconnections() lbessard@2: if len(connections) == 1: lbessard@151: instanceLocalId = connections[0].getrefLocalId() lbessard@151: instances.append(pou.body.getcontentInstance(instanceLocalId)) lbessard@2: return instances lbessard@2: lbessard@1: def GenerateSFCStep(self, step, pou): lbessard@151: step_name = step.getname() lbessard@1: if step_name not in self.SFCNetworks["Steps"].keys(): lbessard@151: if step.getinitialStep(): lbessard@1: self.InitialSteps.append(step_name) lbessard@227: step_infos = {"id" : step.getlocalId(), lbessard@227: "initial" : step.getinitialStep(), lbessard@227: "transitions" : [], lbessard@227: "actions" : []} etisserant@0: if step.connectionPointIn: etisserant@0: instances = [] lbessard@151: connections = step.connectionPointIn.getconnections() etisserant@0: if len(connections) == 1: lbessard@151: instanceLocalId = connections[0].getrefLocalId() lbessard@151: instance = pou.body.getcontentInstance(instanceLocalId) lbessard@151: if isinstance(instance, plcopen.sfcObjects_transition): etisserant@0: instances.append(instance) lbessard@151: elif isinstance(instance, plcopen.sfcObjects_selectionConvergence): lbessard@2: instances.extend(self.ExtractConvergenceInputs(instance, pou)) lbessard@151: elif isinstance(instance, plcopen.sfcObjects_simultaneousDivergence): lbessard@2: transition = self.ExtractDivergenceInput(instance, pou) lbessard@2: if transition: lbessard@151: if isinstance(transition, plcopen.sfcObjects_transition): lbessard@1: instances.append(transition) lbessard@151: elif isinstance(transition, plcopen.sfcObjects_selectionConvergence): lbessard@2: instances.extend(self.ExtractConvergenceInputs(transition, pou)) etisserant@0: for instance in instances: lbessard@2: self.GenerateSFCTransition(instance, pou) lbessard@1: if instance in self.SFCNetworks["Transitions"].keys(): lbessard@227: target_info = (self.TagName, "transition", instance.getlocalId(), "to", step_infos["id"]) lbessard@227: self.SFCNetworks["Transitions"][instance]["to"].append([(step_name, target_info)]) lbessard@1: self.SFCNetworks["Steps"][step_name] = step_infos etisserant@0: etisserant@0: def GenerateSFCJump(self, jump, pou): lbessard@151: jump_target = jump.gettargetName() etisserant@0: if jump.connectionPointIn: etisserant@0: instances = [] lbessard@151: connections = jump.connectionPointIn.getconnections() etisserant@0: if len(connections) == 1: lbessard@151: instanceLocalId = connections[0].getrefLocalId() lbessard@151: instance = pou.body.getcontentInstance(instanceLocalId) lbessard@151: if isinstance(instance, plcopen.sfcObjects_transition): etisserant@0: instances.append(instance) lbessard@151: elif isinstance(instance, plcopen.sfcObjects_selectionConvergence): lbessard@2: instances.extend(self.ExtractConvergenceInputs(instance, pou)) lbessard@151: elif isinstance(instance, plcopen.sfcObjects_simultaneousDivergence): lbessard@2: transition = self.ExtractDivergenceInput(instance, pou) lbessard@2: if transition: lbessard@151: if isinstance(transition, plcopen.sfcObjects_transition): lbessard@1: instances.append(transition) lbessard@151: elif isinstance(transition, plcopen.sfcObjects_selectionConvergence): lbessard@2: instances.extend(self.ExtractConvergenceInputs(transition, pou)) etisserant@0: for instance in instances: lbessard@2: self.GenerateSFCTransition(instance, pou) lbessard@1: if instance in self.SFCNetworks["Transitions"].keys(): lbessard@227: target_info = (self.TagName, "jump", jump.getlocalId(), "target") lbessard@227: self.SFCNetworks["Transitions"][instance]["to"].append([(jump_target, target_info)]) lbessard@1: lbessard@1: def GenerateSFCStepActions(self, actionBlock, pou): lbessard@151: connections = actionBlock.connectionPointIn.getconnections() lbessard@201: if connections is not None and len(connections) == 1: lbessard@151: stepLocalId = connections[0].getrefLocalId() lbessard@151: step = pou.body.getcontentInstance(stepLocalId) lbessard@1: self.GenerateSFCStep(step, pou) lbessard@151: step_name = step.getname() lbessard@1: if step_name in self.SFCNetworks["Steps"].keys(): lbessard@151: actions = actionBlock.getactions() lbessard@227: for i, action in enumerate(actions): lbessard@227: action_infos = {"id" : actionBlock.getlocalId(), lbessard@227: "qualifier" : action["qualifier"], lbessard@227: "content" : action["value"], lbessard@227: "num" : i} lbessard@1: if "duration" in action: lbessard@1: action_infos["duration"] = action["duration"] lbessard@1: if "indicator" in action: lbessard@1: action_infos["indicator"] = action["indicator"] lbessard@1: if action["type"] == "reference": lbessard@1: self.GenerateSFCAction(action["value"], pou) lbessard@46: else: lbessard@168: action_name = "%s_INLINE%d"%(step_name.upper(), self.GetActionNumber()) lbessard@227: self.SFCNetworks["Actions"][action_name] = ([(self.CurrentIndent, ()), lbessard@227: (action["value"], (self.TagName, "action_block", action_infos["id"], "action", i, "inline")), lbessard@227: ("\n", ())], ()) lbessard@46: action_infos["content"] = action_name lbessard@1: self.SFCNetworks["Steps"][step_name]["actions"].append(action_infos) lbessard@1: lbessard@1: def GenerateSFCAction(self, action_name, pou): lbessard@1: if action_name not in self.SFCNetworks["Actions"].keys(): lbessard@151: actionContent = pou.getaction(action_name) lbessard@1: if actionContent: lbessard@227: previous_tagname = self.TagName lbessard@227: self.TagName = self.ParentGenerator.Controler.ComputePouActionName(self.Name, action_name) lbessard@227: self.ComputeProgram(actionContent) lbessard@227: self.SFCNetworks["Actions"][action_name] = (self.Program, (self.TagName, "name")) lbessard@227: self.Program = [] lbessard@227: self.TagName = previous_tagname lbessard@1: lbessard@1: def GenerateSFCTransition(self, transition, pou): lbessard@1: if transition not in self.SFCNetworks["Transitions"].keys(): lbessard@1: steps = [] lbessard@151: connections = transition.connectionPointIn.getconnections() lbessard@201: if connections is not None and len(connections) == 1: lbessard@151: instanceLocalId = connections[0].getrefLocalId() lbessard@151: instance = pou.body.getcontentInstance(instanceLocalId) lbessard@151: if isinstance(instance, plcopen.sfcObjects_step): lbessard@2: steps.append(instance) lbessard@151: elif isinstance(instance, plcopen.sfcObjects_selectionDivergence): lbessard@2: step = self.ExtractDivergenceInput(instance, pou) lbessard@2: if step: lbessard@151: if isinstance(step, plcopen.sfcObjects_step): lbessard@2: steps.append(step) lbessard@151: elif isinstance(step, plcopen.sfcObjects_simultaneousConvergence): lbessard@2: steps.extend(self.ExtractConvergenceInputs(step, pou)) lbessard@151: elif isinstance(instance, plcopen.sfcObjects_simultaneousConvergence): lbessard@2: steps.extend(self.ExtractConvergenceInputs(instance, pou)) lbessard@227: transition_infos = {"id" : transition.getlocalId(), lbessard@227: "priority": transition.getpriority(), lbessard@227: "from": [], lbessard@227: "to" : []} lbessard@151: transitionValues = transition.getconditionContent() lbessard@1: if transitionValues["type"] == "inline": lbessard@227: transition_infos["content"] = [("\n%s:= "%self.CurrentIndent, ()), lbessard@227: (transitionValues["value"], (self.TagName, "transition", transition.getlocalId(), "inline")), lbessard@227: (";\n", ())] lbessard@66: elif transitionValues["type"] == "reference": lbessard@151: transitionContent = pou.gettransition(transitionValues["value"]) lbessard@151: transitionType = transitionContent.getbodyType() lbessard@151: transitionBody = transitionContent.getbody() lbessard@227: previous_tagname = self.TagName lbessard@227: self.TagName = self.ParentGenerator.Controler.ComputePouTransitionName(self.Name, transitionValues["value"]) lbessard@1: if transitionType == "IL": lbessard@227: transition_infos["content"] = [(":\n", ()), lbessard@227: (ReIndentText(transitionBody.gettext(), len(self.CurrentIndent)), (self.TagName, "body"))] lbessard@1: elif transitionType == "ST": lbessard@227: transition_infos["content"] = [("\n", ()), lbessard@227: (ReIndentText(transitionBody.gettext(), len(self.CurrentIndent)), (self.TagName, "body"))] lbessard@66: elif transitionType == "FBD": lbessard@151: for instance in transitionBody.getcontentInstances(): lbessard@151: if isinstance(instance, plcopen.fbdObjects_outVariable): lbessard@151: connections = instance.connectionPointIn.getconnections() lbessard@1: if connections and len(connections) == 1: lbessard@66: expression = self.ComputeFBDExpression(transitionBody, connections[0]) lbessard@227: transition_infos["content"] = [("\n%s:= "%self.CurrentIndent, ())] + expression + [(";\n", ())] lbessard@72: self.SFCComputedBlocks += self.Program lbessard@227: self.Program = [] lbessard@66: elif transitionType == "LD": lbessard@151: for instance in transitionBody.getcontentInstances(): lbessard@151: if isinstance(instance, plcopen.ldObjects_coil): lbessard@151: paths = self.GenerateLDPaths(instance.connectionPointIn.getconnections(), transitionBody) lbessard@1: expression = self.ComputeLDExpression(paths, True) lbessard@227: transition_infos["content"] = [("\n%s:= "%self.CurrentIndent, ())] + expression + [(";\n", ())] lbessard@72: self.SFCComputedBlocks += self.Program lbessard@227: self.Program = [] lbessard@227: self.TagName = previous_tagname lbessard@66: elif transitionValues["type"] == "connection": lbessard@151: body = pou.getbody() lbessard@151: connections = transition.getconnections() lbessard@66: network_type = self.GetNetworkType(connections, body) lbessard@66: if network_type == None: lbessard@214: raise PLCGenException, "Type of network connected to transition impossible to define in \"%s\" POU"%self.Name lbessard@66: if len(connections) > 1 or network_type == "LD": lbessard@66: paths = self.GenerateLDPaths(connections, body) lbessard@66: expression = self.ComputeLDExpression(paths, True) lbessard@66: else: lbessard@66: expression = self.ComputeFBDExpression(body, connections[0]) lbessard@227: transition_infos["content"] = [("\n%s:= "%self.CurrentIndent, ())] + expression + [(";\n", ())] lbessard@227: self.SFCComputedBlocks += self.Program lbessard@227: self.Program = [] lbessard@2: for step in steps: lbessard@2: self.GenerateSFCStep(step, pou) lbessard@151: step_name = step.getname() lbessard@1: if step_name in self.SFCNetworks["Steps"].keys(): lbessard@227: transition_infos["from"].append([(step_name, (self.TagName, "transition", transition.getlocalId(), "from", step.getlocalId()))]) lbessard@1: self.SFCNetworks["Steps"][step_name]["transitions"].append(transition) lbessard@1: self.SFCNetworks["Transitions"][transition] = transition_infos lbessard@1: lbessard@1: def ComputeSFCStep(self, step_name): lbessard@1: if step_name in self.SFCNetworks["Steps"].keys(): lbessard@1: step_infos = self.SFCNetworks["Steps"].pop(step_name) lbessard@227: self.Program += [(self.CurrentIndent, ())] lbessard@1: if step_infos["initial"]: lbessard@227: self.Program += [("INITIAL_", ())] lbessard@227: self.Program += [("STEP ", ()), lbessard@227: (step_name, (self.TagName, "step", step_infos["id"], "name")), lbessard@227: (":\n", ())] lbessard@1: actions = [] lbessard@227: self.IndentRight() lbessard@1: for action_infos in step_infos["actions"]: lbessard@227: if action_infos.get("id", None) is not None: lbessard@227: action_info = (self.TagName, "action_block", action_infos["id"], "action", action_infos["num"]) lbessard@227: else: lbessard@227: action_info = () lbessard@1: actions.append(action_infos["content"]) lbessard@227: self.Program += [(self.CurrentIndent, ()), lbessard@227: (action_infos["content"], action_info + ("reference",)), lbessard@227: ("(", ()), lbessard@227: (action_infos["qualifier"], action_info + ("qualifier",))] lbessard@1: if "duration" in action_infos: lbessard@227: self.Program += [(", ", ()), lbessard@227: (action_infos["duration"], action_info + ("duration",))] lbessard@1: if "indicator" in action_infos: lbessard@227: self.Program += [(", ", ()), lbessard@227: (action_infos["indicator"], action_info + ("indicator",))] lbessard@227: self.Program += [(");\n", ())] lbessard@227: self.IndentLeft() lbessard@227: self.Program += [("%sEND_STEP\n\n"%self.CurrentIndent, ())] lbessard@1: for action in actions: lbessard@1: self.ComputeSFCAction(action) lbessard@1: for transition in step_infos["transitions"]: lbessard@1: self.ComputeSFCTransition(transition) lbessard@1: lbessard@1: def ComputeSFCAction(self, action_name): lbessard@1: if action_name in self.SFCNetworks["Actions"].keys(): lbessard@227: action_content, action_info = self.SFCNetworks["Actions"].pop(action_name) lbessard@227: self.Program += [("%sACTION "%self.CurrentIndent, ()), lbessard@227: (action_name, action_info), lbessard@227: (" :\n", ())] lbessard@227: self.Program += action_content lbessard@227: self.Program += [("%sEND_ACTION\n\n"%self.CurrentIndent, ())] lbessard@1: lbessard@1: def ComputeSFCTransition(self, transition): lbessard@1: if transition in self.SFCNetworks["Transitions"].keys(): lbessard@1: transition_infos = self.SFCNetworks["Transitions"].pop(transition) lbessard@227: self.Program += [("%sTRANSITION"%self.CurrentIndent, ())] lbessard@80: if transition_infos["priority"] != None: lbessard@227: self.Program += [(" (PRIORITY := ", ()), lbessard@227: ("%d"%transition_infos["priority"], (self.TagName, "transition", transition_infos["id"], "priority")), lbessard@227: (")", ())] lbessard@227: self.Program += [(" FROM ", ())] lbessard@1: if len(transition_infos["from"]) > 1: lbessard@227: self.Program += [("(", ())] lbessard@227: self.Program += JoinList([(", ", ())], transition_infos["from"]) lbessard@227: self.Program += [(")", ())] lbessard@201: elif len(transition_infos["from"]) == 1: lbessard@227: self.Program += transition_infos["from"][0] lbessard@201: else: lbessard@214: raise PLCGenException, "Transition with content \"%s\" not connected to a previous step in \"%s\" POU"%(transition_infos["content"], self.Name) lbessard@227: self.Program += [(" TO ", ())] lbessard@1: if len(transition_infos["to"]) > 1: lbessard@227: self.Program += [("(", ())] lbessard@227: self.Program += JoinList([(", ", ())], transition_infos["to"]) lbessard@227: self.Program += [(")", ())] lbessard@201: elif len(transition_infos["to"]) == 1: lbessard@227: self.Program += transition_infos["to"][0] lbessard@201: else: lbessard@214: raise PLCGenException, "Transition with content \"%s\" not connected to a next step in \"%s\" POU"%(transition_infos["content"], self.Name) lbessard@1: self.Program += transition_infos["content"] lbessard@227: self.Program += [("%sEND_TRANSITION\n\n"%self.CurrentIndent, ())] lbessard@227: for [(step_name, step_infos)] in transition_infos["to"]: lbessard@1: self.ComputeSFCStep(step_name) lbessard@227: lbessard@227: def GenerateProgram(self, pou): lbessard@227: self.ComputeInterface(pou) lbessard@227: self.ComputeConnectionTypes(pou) lbessard@227: self.ComputeProgram(pou) lbessard@1: lbessard@227: program = [("%s "%self.Type, ()), lbessard@227: (self.Name, (self.TagName, "name"))] lbessard@1: if self.ReturnType: lbessard@227: program += [(" : ", ()), lbessard@227: (self.ReturnType, (self.TagName, "return"))] lbessard@227: program += [("\n", ())] lbessard@214: if len(self.Interface) == 0: lbessard@214: raise PLCGenException, "No variable defined in \"%s\" POU"%self.Name lbessard@227: if len(self.Program) == 0 : lbessard@214: raise PLCGenException, "No body defined in \"%s\" POU"%self.Name lbessard@227: var_number = 0 lbessard@33: for list_type, retain, constant, located, variables in self.Interface: lbessard@227: program += [(" %s"%list_type, ())] lbessard@1: if retain: lbessard@227: program += [(" RETAIN", (self.TagName, "variable", (var_number, var_number + len(variables)), "retain"))] lbessard@1: if constant: lbessard@227: program += [(" CONSTANT", (self.TagName, "variable", (var_number, var_number + len(variables)), "constant"))] lbessard@227: program += [("\n", ())] lbessard@30: for var_type, var_name, var_address, var_initial in variables: lbessard@227: program += [(" ", ())] lbessard@93: if var_name: lbessard@227: program += [(var_name, (self.TagName, "variable", var_number, "name")), lbessard@227: (" ", ())] lbessard@30: if var_address != None: lbessard@227: program += [("AT ", ()), lbessard@227: (var_address, (self.TagName, "variable", var_number, "address")), lbessard@227: (" ", ())] lbessard@227: program += [(": ", ()), lbessard@227: (var_type, (self.TagName, "variable", var_number, "type"))] lbessard@28: if var_initial != None: lbessard@227: program += [(" := ", ()), lbessard@227: (self.ComputeValue(var_initial, var_type), (self.TagName, "variable", var_number, "initial"))] lbessard@227: program += [(";\n", ())] lbessard@227: var_number += 1 lbessard@227: program += [(" END_VAR\n", ())] lbessard@227: program += [("\n", ())] etisserant@0: program += self.Program lbessard@227: program += [("END_%s\n\n"%self.Type, ())] etisserant@0: return program lbessard@71: lbessard@227: def GenerateCurrentProgram(controler, project): lbessard@227: generator = ProgramGenerator(controler, project) lbessard@227: generator.GenerateProgram() lbessard@227: return generator.GetGeneratedProgram() lbessard@227: