plcopen/plcopen.py
author greg
Tue, 02 Jun 2009 17:35:22 +0200
changeset 363 5eb9c5536334
parent 348 09fdd7616a86
child 379 e4c26ee9c998
permissions -rw-r--r--
Fix Bug with Zoom in Viewer
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     1
#!/usr/bin/env python
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     2
# -*- coding: utf-8 -*-
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     3
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     4
#This file is part of PLCOpenEditor, a library implementing an IEC 61131-3 editor
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     5
#based on the plcopen standard. 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     6
#
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
     7
#Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     8
#
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     9
#See COPYING file for copyrights details.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    10
#
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    11
#This library is free software; you can redistribute it and/or
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
    12
#modify it under the terms of the GNU General Public
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    13
#License as published by the Free Software Foundation; either
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    14
#version 2.1 of the License, or (at your option) any later version.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    15
#
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    16
#This library is distributed in the hope that it will be useful,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    17
#but WITHOUT ANY WARRANTY; without even the implied warranty of
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    18
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    19
#General Public License for more details.
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    20
#
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
    21
#You should have received a copy of the GNU General Public
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    22
#License along with this library; if not, write to the Free Software
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    23
#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    24
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
    25
from xmlclass import *
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
    26
from structures import *
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
    27
from types import *
166
de1845119cdd Bug on transition connection fixed
lbessard
parents: 151
diff changeset
    28
import os, re
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    29
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    30
"""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    31
Dictionary that makes the relation between var names in plcopen and displayed values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    32
"""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    33
VarTypes = {"Local" : "localVars", "Temp" : "tempVars", "Input" : "inputVars",
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    34
            "Output" : "outputVars", "InOut" : "inOutVars", "External" : "externalVars",
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    35
            "Global" : "globalVars", "Access" : "accessVars"}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    36
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    37
"""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    38
Define in which order var types must be displayed
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    39
"""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    40
VarOrder = ["Local","Temp","Input","Output","InOut","External","Global","Access"]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    41
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    42
"""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    43
Define which action qualifier must be associated with a duration 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    44
"""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    45
QualifierList = {"N" : False, "R" : False, "S" : False, "L" : True, "D" : True, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    46
    "P" : False, "P0" : False, "P1" : False, "SD" : True, "DS" : True, "SL" : True}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    47
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    48
PLCOpenClasses = GenerateClassesFromXSD(os.path.join(os.path.split(__file__)[0], "TC6_XML_V10_B.xsd"))
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
    49
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
    50
cls = PLCOpenClasses.get("formattedText", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
    51
if cls:
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    52
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    53
        index = self.text.find(old_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    54
        while index != -1:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    55
            if index > 0 and (self.text[index - 1].isalnum() or self.text[index - 1] == "_"):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    56
                index = self.text.find(old_name, index + len(old_name))
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    57
            elif index < len(self.text) - len(old_name) and (self.text[index + len(old_name)].isalnum() or self.text[index + len(old_name)] == "_"):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    58
                index = self.text.find(old_name, index + len(old_name))
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    59
            else:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    60
                self.text = self.text[:index] + new_name + self.text[index + len(old_name):]
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    61
                index = self.text.find(old_name, index + len(new_name))
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    62
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
    63
    
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
    64
cls = PLCOpenClasses.get("project", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
    65
if cls:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
    66
    cls.singleLineAttributes = False
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
    67
    cls.EnumeratedDataTypeValues = {}
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
    68
    cls.CustomDataTypeRange = {}
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
    69
    cls.CustomTypeHierarchy = {}
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
    70
    cls.ElementUsingTree = {}
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
    71
    cls.CustomBlockTypes = []
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
    72
    
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    73
    def setname(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    74
        self.contentHeader.setname(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    75
    setattr(cls, "setname", setname)
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
    76
        
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    77
    def getname(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    78
        return self.contentHeader.getname()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    79
    setattr(cls, "getname", getname)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    80
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    81
    def getfileHeader(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
    82
        fileheader = {}
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    83
        fileheader["companyName"] = self.fileHeader.getcompanyName()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    84
        if self.fileHeader.getcompanyURL():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    85
            fileheader["companyURL"] = self.fileHeader.getcompanyURL()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    86
        fileheader["productName"] = self.fileHeader.getproductName()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    87
        fileheader["productVersion"] = self.fileHeader.getproductVersion()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    88
        if self.fileHeader.getproductRelease():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    89
            fileheader["productRelease"] = self.fileHeader.getproductRelease()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    90
        fileheader["creationDateTime"] = self.fileHeader.getcreationDateTime()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    91
        if self.fileHeader.getcontentDescription():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    92
            fileheader["contentDescription"] = self.fileHeader.getcontentDescription()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
    93
        return fileheader
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    94
    setattr(cls, "getfileHeader", getfileHeader)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    95
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    96
    def setfileHeader(self, fileheader):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    97
        self.fileHeader.setcompanyName(fileheader["companyName"])
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
    98
        if "companyURL" in fileheader:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
    99
            self.fileHeader.setcompanyURL(fileheader["companyURL"])
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   100
        self.fileHeader.setproductName(fileheader["productName"])
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   101
        self.fileHeader.setproductVersion(fileheader["productVersion"])
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   102
        if "productRelease" in fileheader:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   103
            self.fileHeader.setproductRelease(fileheader["productRelease"])
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   104
        self.fileHeader.setcreationDateTime(fileheader["creationDateTime"])
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   105
        if "contentDescription" in fileheader:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   106
            self.fileHeader.setcontentDescription(fileheader["contentDescription"])
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   107
    setattr(cls, "setfileHeader", setfileHeader)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   108
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   109
    def getcontentHeader(self):
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   110
        contentheader = {}
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   111
        contentheader["projectName"] = self.contentHeader.getname()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   112
        if self.contentHeader.getversion():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   113
            contentheader["projectVersion"] = self.contentHeader.getversion()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   114
        if self.contentHeader.getmodificationDateTime():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   115
            contentheader["modificationDateTime"] = self.contentHeader.getmodificationDateTime()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   116
        if self.contentHeader.getorganization():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   117
            contentheader["organization"] = self.contentHeader.getorganization()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   118
        if self.contentHeader.getauthor():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   119
            contentheader["authorName"] = self.contentHeader.getauthor()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   120
        if self.contentHeader.getlanguage():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   121
            contentheader["language"] = self.contentHeader.getlanguage()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   122
        contentheader["pageSize"] = self.contentHeader.getpageSize()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   123
        contentheader["scaling"] = self.contentHeader.getscaling()
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   124
        return contentheader
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   125
    setattr(cls, "getcontentHeader", getcontentHeader)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   126
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   127
    def setcontentHeader(self, contentheader):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   128
        self.contentHeader.setname(contentheader["projectName"])
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   129
        if "projectVersion" in contentheader:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   130
            self.contentHeader.setversion(contentheader["projectVersion"])
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   131
        if "modificationDateTime" in contentheader:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   132
            self.contentHeader.setmodificationDateTime(contentheader["modificationDateTime"])
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   133
        if "organization" in contentheader:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   134
            self.contentHeader.setorganization(contentheader["organization"])
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   135
        if "authorName" in contentheader:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   136
            self.contentHeader.setauthor(contentheader["authorName"])
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   137
        if "language" in contentheader:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   138
            self.contentHeader.setlanguage(contentheader["language"])
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   139
        self.contentHeader.setpageSize(*contentheader["pageSize"])
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   140
        self.contentHeader.setscaling(contentheader["scaling"])
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   141
    setattr(cls, "setcontentHeader", setcontentHeader)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   142
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   143
    def getdataTypes(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   144
        return self.types.getdataTypeElements()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   145
    setattr(cls, "getdataTypes", getdataTypes)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   146
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   147
    def getdataType(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   148
        return self.types.getdataTypeElement(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   149
    setattr(cls, "getdataType", getdataType)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   150
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   151
    def appenddataType(self, name):
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   152
        if name in self.CustomTypeHierarchy:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   153
            raise ValueError, "\"%s\" Data Type already exists !!!"%name
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   154
        self.types.appenddataTypeElement(name)
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   155
        self.AddCustomDataType(self.getdataType(name))
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   156
    setattr(cls, "appenddataType", appenddataType)
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
   157
        
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   158
    def insertdataType(self, index, datatype):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   159
        self.types.insertdataTypeElement(index, datatype)
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   160
        self.AddCustomDataType(datatype)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   161
    setattr(cls, "insertdataType", insertdataType)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   162
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   163
    def removedataType(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   164
        self.types.removedataTypeElement(name)
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   165
        self.RefreshDataTypeHierarchy()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   166
        self.RefreshElementUsingTree()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   167
    setattr(cls, "removedataType", removedataType)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   168
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   169
    def getpous(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   170
        return self.types.getpouElements()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   171
    setattr(cls, "getpous", getpous)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   172
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   173
    def getpou(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   174
        return self.types.getpouElement(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   175
    setattr(cls, "getpou", getpou)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   176
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   177
    def appendpou(self, name, pou_type, body_type):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   178
        self.types.appendpouElement(name, pou_type, body_type)
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   179
        self.AddCustomBlockType(self.getpou(name))
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   180
    setattr(cls, "appendpou", appendpou)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   181
        
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   182
    def insertpou(self, index, pou):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   183
        self.types.insertpouElement(index, pou)
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   184
        self.AddCustomBlockType(pou)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   185
    setattr(cls, "insertpou", insertpou)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   186
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   187
    def removepou(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   188
        self.types.removepouElement(name)
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   189
        self.RefreshCustomBlockTypes()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   190
        self.RefreshElementUsingTree()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   191
    setattr(cls, "removepou", removepou)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   192
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   193
    def getconfigurations(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   194
        configurations = self.instances.configurations.getconfiguration()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   195
        if configurations:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   196
            return configurations
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   197
        return []
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   198
    setattr(cls, "getconfigurations", getconfigurations)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   199
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   200
    def getconfiguration(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   201
        for configuration in self.instances.configurations.getconfiguration():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   202
            if configuration.getname() == name:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   203
                return configuration
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   204
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   205
    setattr(cls, "getconfiguration", getconfiguration)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   206
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   207
    def addconfiguration(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   208
        for configuration in self.instances.configurations.getconfiguration():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   209
            if configuration.getname() == name:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   210
                raise ValueError, "\"%s\" configuration already exists !!!"%name
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   211
        new_configuration = PLCOpenClasses["configurations_configuration"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   212
        new_configuration.setname(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   213
        self.instances.configurations.appendconfiguration(new_configuration)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   214
    setattr(cls, "addconfiguration", addconfiguration)    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   215
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   216
    def removeconfiguration(self, name):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   217
        found = False
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   218
        for idx, configuration in enumerate(self.instances.configurations.getconfiguration()):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   219
            if configuration.getname() == name:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   220
                self.instances.configurations.removeconfiguration(idx)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   221
                found = True
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   222
                break
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   223
        if not found:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   224
            raise ValueError, "\"%s\" configuration doesn't exist !!!"%name
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   225
    setattr(cls, "removeconfiguration", removeconfiguration)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   226
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   227
    def getconfigurationResource(self, config_name, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   228
        configuration = self.getconfiguration(config_name)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   229
        if configuration:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   230
            for resource in configuration.getresource():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   231
                if resource.getname() == name:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   232
                    return resource
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   233
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   234
    setattr(cls, "getconfigurationResource", getconfigurationResource)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   235
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   236
    def addconfigurationResource(self, config_name, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   237
        configuration = self.getconfiguration(config_name)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   238
        if configuration:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   239
            for resource in configuration.getresource():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   240
                if resource.getname() == name:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   241
                    raise ValueError, "\"%s\" resource already exists in \"%s\" configuration !!!"%(name, config_name)
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   242
            new_resource = PLCOpenClasses["configuration_resource"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   243
            new_resource.setname(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   244
            configuration.appendresource(new_resource)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   245
    setattr(cls, "addconfigurationResource", addconfigurationResource)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   246
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   247
    def removeconfigurationResource(self, config_name, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   248
        configuration = self.getconfiguration(config_name)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   249
        if configuration:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   250
            found = False
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   251
            for idx, resource in enumerate(configuration.getresource()):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   252
                if resource.getname() == name:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   253
                    configuration.removeresource(idx)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   254
                    found = True
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   255
                    break
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   256
            if not found:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   257
                raise ValueError, "\"%s\" resource doesn't exist in \"%s\" configuration !!!"%(name, config_name)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   258
    setattr(cls, "removeconfigurationResource", removeconfigurationResource)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   259
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   260
    def updateElementName(self, old_name, new_name):
348
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   261
        for datatype in self.types.getdataTypeElements():
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   262
            datatype_content = datatype.baseType.getcontent()
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   263
            if datatype_content["name"] == "derived" and datatype_content["value"].getname() == old_name:
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   264
                datatype_content["value"].setname(new_name)
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   265
            elif datatype_content["name"] in ["array", "subrangeSigned", "subrangeUnsigned"]:
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   266
                basetype_content = datatype_content["value"].baseType.getcontent()
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   267
                if basetype_content["name"] == "derived" and basetype_content["value"].getname() == old_name:
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   268
                    basetype_content["value"].setname(new_name)
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   269
            elif datatype_content["name"] == "struct":
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   270
                for element in datatype_content["value"].getvariable():
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   271
                    element_type = element.type.getcontent()
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   272
                    if element_type["name"] == "derived" and element_type["value"].getname() == old_name:
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   273
                        element_type["value"].setname(new_name)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   274
        for pou in self.types.getpouElements():
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   275
            pou.updateElementName(old_name, new_name)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   276
        for configuration in self.instances.configurations.getconfiguration():
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   277
            configuration.updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   278
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   279
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   280
    def RefreshDataTypeHierarchy(self):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   281
        self.EnumeratedDataTypeValues = {}
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   282
        self.CustomDataTypeRange = {}
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   283
        self.CustomTypeHierarchy = {}
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   284
        for datatype in self.getdataTypes():
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   285
            self.AddCustomDataType(datatype)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   286
    setattr(cls, "RefreshDataTypeHierarchy", RefreshDataTypeHierarchy)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   287
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   288
    def AddCustomDataType(self, datatype):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   289
        name = datatype.getname()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   290
        basetype_content = datatype.getbaseType().getcontent()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   291
        if basetype_content["value"] is None:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   292
            self.CustomTypeHierarchy[name] = basetype_content["name"]
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   293
        elif basetype_content["name"] in ["string", "wstring"]:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   294
            self.CustomTypeHierarchy[name] = basetype_content["name"].upper()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   295
        elif basetype_content["name"] == "derived":
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   296
            self.CustomTypeHierarchy[name] = basetype_content["value"].getname()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   297
        elif basetype_content["name"] in ["subrangeSigned", "subrangeUnsigned"]:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   298
            range = (basetype_content["value"].range.getlower(), 
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   299
                     basetype_content["value"].range.getupper())
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   300
            self.CustomDataTypeRange[name] = range
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   301
            base_type = basetype_content["value"].baseType.getcontent()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   302
            if base_type["value"] is None:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   303
                self.CustomTypeHierarchy[name] = base_type["name"]
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   304
            else:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   305
                self.CustomTypeHierarchy[name] = base_type["value"].getname()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   306
        else:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   307
            if basetype_content["name"] == "enum":
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   308
                values = []
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   309
                for value in basetype_content["value"].values.getvalue():
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   310
                    values.append(value.getname())
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   311
                self.EnumeratedDataTypeValues[name] = values
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   312
            self.CustomTypeHierarchy[name] = "ANY_DERIVED"
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   313
    setattr(cls, "AddCustomDataType", AddCustomDataType)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   314
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   315
    # Update Block types with user-defined pou added
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   316
    def RefreshCustomBlockTypes(self):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   317
        # Reset the tree of user-defined pou cross-use
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   318
        self.CustomBlockTypes = []
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   319
        for pou in self.getpous():
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   320
            self.AddCustomBlockType(pou)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   321
    setattr(cls, "RefreshCustomBlockTypes", RefreshCustomBlockTypes)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   322
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   323
    def AddCustomBlockType(self, pou): 
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   324
        pou_name = pou.getname()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   325
        pou_type = pou.getpouType()
286
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   326
        block_infos = {"name" : pou_name, "type" : pou_type, "extensible" : False,
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   327
                       "inputs" : [], "outputs" : [], "comment" : "",
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   328
                       "generate" : generate_block, "initialise" : initialise_block}
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   329
        if pou.getinterface():
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   330
            return_type = pou.interface.getreturnType()
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   331
            if return_type:
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   332
                var_type = return_type.getcontent()
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   333
                if var_type["name"] == "derived":
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   334
                    block_infos["outputs"].append(("", var_type["value"].getname(), "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   335
                elif var_type["name"] in ["string", "wstring"]:
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   336
                    block_infos["outputs"].append(("", var_type["name"].upper(), "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   337
                else:
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   338
                    block_infos["outputs"].append(("", var_type["name"], "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   339
            for type, varlist in pou.getvars():
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   340
                if type == "InOut":
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   341
                    for var in varlist.getvariable():
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   342
                        var_type = var.type.getcontent()
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   343
                        if var_type["name"] == "derived":
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   344
                            block_infos["inputs"].append((var.getname(), var_type["value"].getname(), "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   345
                            block_infos["outputs"].append((var.getname(), var_type["value"].getname(), "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   346
                        elif var_type["name"] in ["string", "wstring"]:
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   347
                            block_infos["inputs"].append((var.getname(), var_type["name"].upper(), "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   348
                            block_infos["outputs"].append((var.getname(), var_type["name"].upper(), "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   349
                        else:
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   350
                            block_infos["inputs"].append((var.getname(), var_type["name"], "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   351
                            block_infos["outputs"].append((var.getname(), var_type["name"], "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   352
                elif type == "Input":
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   353
                    for var in varlist.getvariable():
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   354
                        var_type = var.type.getcontent()
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   355
                        if var_type["name"] == "derived":
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   356
                            block_infos["inputs"].append((var.getname(), var_type["value"].getname(), "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   357
                        elif var_type["name"] in ["string", "wstring"]:
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   358
                            block_infos["inputs"].append((var.getname(), var_type["name"].upper(), "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   359
                        else:
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   360
                            block_infos["inputs"].append((var.getname(), var_type["name"], "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   361
                elif type == "Output":
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   362
                    for var in varlist.getvariable():
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   363
                        var_type = var.type.getcontent()
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   364
                        if var_type["name"] == "derived":
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   365
                            block_infos["outputs"].append((var.getname(), var_type["value"].getname(), "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   366
                        elif var_type["name"] in ["string", "wstring"]:
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   367
                            block_infos["outputs"].append((var.getname(), var_type["name"].upper(), "none"))
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   368
                        else:
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   369
                            block_infos["outputs"].append((var.getname(), var_type["name"], "none"))    
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   370
        if pou.getbodyType() in ["FBD","LD","SFC"]:
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   371
            for instance in pou.getinstances():
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   372
                if isinstance(instance, PLCOpenClasses.get("commonObjects_comment", None)):
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   373
                    block_infos["comment"] = instance.getcontentText()
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   374
        self.CustomBlockTypes.append(block_infos)
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   375
    setattr(cls, "AddCustomBlockType", AddCustomBlockType)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   376
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   377
    def RefreshElementUsingTree(self):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   378
        # Reset the tree of user-defined element cross-use
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   379
        self.ElementUsingTree = {}
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   380
        pous = self.getpous()
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   381
        datatypes = self.getdataTypes()
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   382
        # Reference all the user-defined elementu names and initialize the tree of 
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   383
        # user-defined elemnt cross-use
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   384
        elementnames = [datatype.getname() for datatype in datatypes] + \
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   385
                       [pou.getname() for pou in pous]
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   386
        for name in elementnames:
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   387
            self.ElementUsingTree[name] = []
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   388
        # Analyze each datatype
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   389
        for datatype in datatypes:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   390
            name = datatype.getname()
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   391
            basetype_content = datatype.baseType.getcontent()
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   392
            if basetype_content["name"] == "derived":
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   393
                typename = basetype_content["value"].getname()
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   394
                if typename in elementnames and name not in self.ElementUsingTree[typename]:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   395
                    self.ElementUsingTree[typename].append(name)
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   396
            elif basetype_content["name"] in ["subrangeSigned", "subrangeUnsigned", "array"]:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   397
                base_type = basetype_content["value"].baseType.getcontent()
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   398
                if base_type["name"] == "derived":
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   399
                    typename = base_type["value"].getname()
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   400
                    if typename in elementnames and name not in self.ElementUsingTree[typename]:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   401
                        self.ElementUsingTree[typename].append(name)
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   402
            elif basetype_content["name"] == "struct":
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   403
                for element in basetype_content["value"].getvariable():
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   404
                    type_content = element.type.getcontent()
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   405
                    if type_content["name"] == "derived":
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   406
                        typename = type_content["value"].getname()
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   407
                        if typename in elementnames and name not in self.ElementUsingTree[typename]:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   408
                            self.ElementUsingTree[typename].append(name)
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   409
        # Analyze each pou
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   410
        for pou in pous:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   411
            name = pou.getname()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   412
            if pou.interface:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   413
                # Extract variables from every varLists
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   414
                for type, varlist in pou.getvars():
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   415
                    for var in varlist.getvariable():
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   416
                        vartype_content = var.gettype().getcontent()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   417
                        if vartype_content["name"] == "derived":
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   418
                            typename = vartype_content["value"].getname()
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
   419
                            if typename in elementnames and name not in self.ElementUsingTree[typename]:
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   420
                                self.ElementUsingTree[typename].append(name)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   421
    setattr(cls, "RefreshElementUsingTree", RefreshElementUsingTree)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   422
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   423
    def GetParentType(self, type):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   424
        if type in self.CustomTypeHierarchy:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   425
            return self.CustomTypeHierarchy[type]
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   426
        elif type in TypeHierarchy:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   427
            return TypeHierarchy[type]
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   428
        return None
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   429
    setattr(cls, "GetParentType", GetParentType)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   430
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   431
    def GetBaseType(self, type):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   432
        parent_type = self.GetParentType(type)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   433
        if parent_type is not None:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   434
            if parent_type.startswith("ANY"):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   435
                return type
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   436
            else:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   437
                return self.GetBaseType(parent_type)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   438
        return None
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   439
    setattr(cls, "GetBaseType", GetBaseType)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   440
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   441
    def GetSubrangeBaseTypes(self, exclude):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   442
        derived = []
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   443
        for type in self.CustomTypeHierarchy.keys():
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   444
            for base_type in DataTypeRange.keys():
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   445
                if self.IsOfType(type, base_type) and not self.IsOfType(type, exclude):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   446
                    derived.append(type)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   447
                    break
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   448
        return DataTypeRange.keys() + derived
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   449
    setattr(cls, "GetSubrangeBaseTypes", GetSubrangeBaseTypes)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   450
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   451
    """
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   452
    returns true if the given data type is the same that "reference" meta-type or one of its types.
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   453
    """
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   454
    def IsOfType(self, type, reference):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   455
        if reference is None:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   456
            return True
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   457
        elif type == reference:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   458
            return True
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   459
        else:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   460
            parent_type = self.GetParentType(type)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   461
            if parent_type is not None:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   462
                return self.IsOfType(parent_type, reference)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   463
        return False
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   464
    setattr(cls, "IsOfType", IsOfType)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   465
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   466
    # Return if pou given by name is used by another pou
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   467
    def ElementIsUsed(self, name):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   468
        if name in self.ElementUsingTree:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   469
            return len(self.ElementUsingTree[name]) > 0
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   470
        return False
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   471
    setattr(cls, "ElementIsUsed", ElementIsUsed)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   472
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   473
    def DataTypeIsDerived(self, name):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   474
        return name in self.CustomTypeHierarchy.values()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   475
    setattr(cls, "DataTypeIsDerived", DataTypeIsDerived)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   476
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   477
    # Return if pou given by name is directly or undirectly used by the reference pou
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   478
    def ElementIsUsedBy(self, name, reference):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   479
        if name in self.ElementUsingTree:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   480
            list = self.ElementUsingTree[name]
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   481
            # Test if pou is directly used by reference
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   482
            if reference in list:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   483
                return True
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   484
            else:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   485
                # Test if pou is undirectly used by reference, by testing if pous 
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   486
                # that directly use pou is directly or undirectly used by reference
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   487
                used = False
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   488
                for element in list:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   489
                    used |= self.ElementIsUsedBy(element, reference)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   490
                return used
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   491
        return False
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   492
    setattr(cls, "ElementIsUsedBy", ElementIsUsedBy)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   493
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   494
    def GetDataTypeRange(self, type):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   495
        if type in self.CustomDataTypeRange:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   496
            return self.CustomDataTypeRange[type]
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   497
        elif type in DataTypeRange:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   498
            return DataTypeRange[type]
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   499
        else:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   500
            parent_type = self.GetParentType(type)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   501
            if parent_type is not None:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   502
                return self.GetDataTypeRange(parent_type)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   503
        return None
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   504
    setattr(cls, "GetDataTypeRange", GetDataTypeRange)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   505
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   506
    def GetEnumeratedDataTypeValues(self, type = None):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   507
        if type is None:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   508
            all_values = []
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   509
            for values in self.EnumeratedDataTypeValues.values():
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   510
                all_values.extend(values)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   511
            return all_values
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   512
        elif type in self.EnumeratedDataTypeValues:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   513
            return self.EnumeratedDataTypeValues(type)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   514
        return []
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   515
    setattr(cls, "GetEnumeratedDataTypeValues", GetEnumeratedDataTypeValues)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   516
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   517
    # Function that returns the block definition associated to the block type given
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   518
    def GetCustomBlockType(self, type, inputs = None):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   519
        for customblocktype in self.CustomBlockTypes:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   520
            if inputs:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   521
                customblock_inputs = tuple([var_type for name, var_type, modifier in customblocktype["inputs"]])
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   522
                same_inputs = inputs == customblock_inputs
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   523
            else:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   524
                same_inputs = True
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   525
            if customblocktype["name"] == type and same_inputs:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   526
                return customblocktype
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   527
        return None
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   528
    setattr(cls, "GetCustomBlockType", GetCustomBlockType)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   529
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   530
    # Return Block types checking for recursion
251
cc5377a296ea Fix bug in popup menu and function block types in Variable Panel
lbessard
parents: 246
diff changeset
   531
    def GetCustomBlockTypes(self, exclude = "", onlyfunctions = False):
238
389f2046e495 Bug on GetCustomBlockTypes without exclusion or invalid pou fixed
lbessard
parents: 225
diff changeset
   532
        type = None
389f2046e495 Bug on GetCustomBlockTypes without exclusion or invalid pou fixed
lbessard
parents: 225
diff changeset
   533
        if exclude != "":
389f2046e495 Bug on GetCustomBlockTypes without exclusion or invalid pou fixed
lbessard
parents: 225
diff changeset
   534
            pou = self.getpou(exclude)
389f2046e495 Bug on GetCustomBlockTypes without exclusion or invalid pou fixed
lbessard
parents: 225
diff changeset
   535
            if pou is not None:
389f2046e495 Bug on GetCustomBlockTypes without exclusion or invalid pou fixed
lbessard
parents: 225
diff changeset
   536
                type = pou.getpouType()
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   537
        customblocktypes = []
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   538
        for customblocktype in self.CustomBlockTypes:
286
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   539
            if customblocktype["type"] != "program" and customblocktype["name"] != exclude and not self.ElementIsUsedBy(exclude, customblocktype["name"]) and not (onlyfunctions and customblocktype["type"] != "function"):
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   540
                customblocktypes.append(customblocktype)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   541
        return customblocktypes
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   542
    setattr(cls, "GetCustomBlockTypes", GetCustomBlockTypes)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   543
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   544
    # Return Function Block types checking for recursion
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   545
    def GetCustomFunctionBlockTypes(self, exclude = ""):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   546
        customblocktypes = []
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   547
        for customblocktype in self.CustomBlockTypes:
286
67da12c94d2d Bug on custom POU list in plcopen model fixed
lbessard
parents: 282
diff changeset
   548
            if customblocktype["type"] == "functionBlock" and customblocktype["name"] != exclude and not self.ElementIsUsedBy(exclude, customblocktype["name"]):
246
9cf9694e8d66 Bug with GetCustomFunctionBlockTypes without exclusion POU fixed
lbessard
parents: 238
diff changeset
   549
                customblocktypes.append(customblocktype["name"])
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   550
        return customblocktypes
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   551
    setattr(cls, "GetCustomFunctionBlockTypes", GetCustomFunctionBlockTypes)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   552
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   553
    # Return Block types checking for recursion
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   554
    def GetCustomBlockResource(self):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   555
        customblocktypes = []
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   556
        for customblocktype in self.CustomBlockTypes:
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   557
            if customblocktype["type"] == "program":
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   558
                customblocktypes.append(customblocktype["name"])
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   559
        return customblocktypes
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   560
    setattr(cls, "GetCustomBlockResource", GetCustomBlockResource)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   561
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   562
    # Return Data Types checking for recursion
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   563
    def GetCustomDataTypes(self, exclude = ""):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   564
        customdatatypes = []
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   565
        for customdatatype in self.getdataTypes():
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   566
            customdatatype_name = customdatatype.getname()
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   567
            if customdatatype_name != exclude and not self.ElementIsUsedBy(exclude, customdatatype_name):
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   568
                customdatatypes.append(customdatatype_name)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   569
        return customdatatypes
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   570
    setattr(cls, "GetCustomDataTypes", GetCustomDataTypes)
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   571
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   572
cls = PLCOpenClasses.get("project_fileHeader", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   573
if cls:
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   574
    cls.singleLineAttributes = False
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   575
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   576
cls = PLCOpenClasses.get("project_contentHeader", None)
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   577
if cls:
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   578
    cls.singleLineAttributes = False
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   579
    
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   580
    def setpageSize(self, width, height):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   581
        self.coordinateInfo.setpageSize(width, height)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   582
    setattr(cls, "setpageSize", setpageSize)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   583
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   584
    def getpageSize(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   585
        return self.coordinateInfo.getpageSize()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   586
    setattr(cls, "getpageSize", getpageSize)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   587
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   588
    def setscaling(self, scaling):
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   589
        for language, (x, y) in scaling.items():
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   590
            self.coordinateInfo.setscaling(language, x, y)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   591
    setattr(cls, "setscaling", setscaling)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   592
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   593
    def getscaling(self):
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   594
        scaling = {}
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   595
        scaling["FBD"] = self.coordinateInfo.getscaling("FBD")
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   596
        scaling["LD"] = self.coordinateInfo.getscaling("LD")
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   597
        scaling["SFC"] = self.coordinateInfo.getscaling("SFC")
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   598
        return scaling
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   599
    setattr(cls, "getscaling", getscaling)
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   600
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   601
cls = PLCOpenClasses.get("contentHeader_coordinateInfo", None)
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   602
if cls:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   603
    def setpageSize(self, width, height):
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   604
        if width == 0 and height == 0:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   605
            self.deletepageSize()
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   606
        else:
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   607
            if self.pageSize is None:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   608
                self.addpageSize()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   609
            self.pageSize.setx(width)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   610
            self.pageSize.sety(height)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   611
    setattr(cls, "setpageSize", setpageSize)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   612
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   613
    def getpageSize(self):
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   614
        if self.pageSize is not None:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   615
            return self.pageSize.getx(), self.pageSize.gety()
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   616
        return 0, 0
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   617
    setattr(cls, "getpageSize", getpageSize)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   618
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   619
    def setscaling(self, language, x, y):
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   620
        if language == "FBD":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   621
            self.fbd.scaling.setx(x)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   622
            self.fbd.scaling.sety(y)
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   623
        elif language == "LD":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   624
            self.ld.scaling.setx(x)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   625
            self.ld.scaling.sety(y)
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   626
        elif language == "SFC":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   627
            self.sfc.scaling.setx(x)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   628
            self.sfc.scaling.sety(y)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   629
    setattr(cls, "setscaling", setscaling)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   630
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   631
    def getscaling(self, language):
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   632
        if language == "FBD":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   633
            return self.fbd.scaling.getx(), self.fbd.scaling.gety()
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   634
        elif language == "LD":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   635
            return self.ld.scaling.getx(), self.ld.scaling.gety()
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   636
        elif language == "SFC":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   637
            return self.sfc.scaling.getx(), self.sfc.scaling.gety()
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   638
        return 0, 0
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   639
    setattr(cls, "getscaling", getscaling)
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
   640
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   641
cls = PLCOpenClasses.get("configurations_configuration", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   642
if cls:
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   643
    def updateElementName(self, old_name, new_name):
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   644
        for resource in self.getresource():
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   645
            resource.updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   646
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   647
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   648
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   649
cls = PLCOpenClasses.get("configuration_resource", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   650
if cls:
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   651
    def updateElementName(self, old_name, new_name):
187
183486133b96 Bugs in configuration_ressource fixed
lbessard
parents: 166
diff changeset
   652
        for instance in self.getpouInstance():
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   653
            instance.updateElementName(old_name, new_name)
187
183486133b96 Bugs in configuration_ressource fixed
lbessard
parents: 166
diff changeset
   654
        for task in self.gettask():
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   655
            task.updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   656
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   657
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   658
cls = PLCOpenClasses.get("resource_task", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   659
if cls:
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   660
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   661
        if self.single == old_name:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   662
            self.single = new_name
187
183486133b96 Bugs in configuration_ressource fixed
lbessard
parents: 166
diff changeset
   663
        for instance in self.getpouInstance():
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   664
            instance.updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   665
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   666
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   667
cls = PLCOpenClasses.get("pouInstance", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   668
if cls:
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   669
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   670
        if self.type == old_name:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   671
            self.type = new_name
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   672
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   673
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   674
cls = PLCOpenClasses.get("project_types", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   675
if cls:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   676
    def getdataTypeElements(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   677
        return self.dataTypes.getdataType()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   678
    setattr(cls, "getdataTypeElements", getdataTypeElements)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   679
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   680
    def getdataTypeElement(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   681
        elements = self.dataTypes.getdataType()
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
   682
        for element in elements:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   683
            if element.getname() == name:
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
   684
                return element
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
   685
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   686
    setattr(cls, "getdataTypeElement", getdataTypeElement)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   687
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   688
    def appenddataTypeElement(self, name):
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
   689
        new_datatype = PLCOpenClasses["dataTypes_dataType"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   690
        new_datatype.setname(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   691
        new_datatype.baseType.setcontent({"name" : "BOOL", "value" : None})
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   692
        self.dataTypes.appenddataType(new_datatype)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   693
    setattr(cls, "appenddataTypeElement", appenddataTypeElement)
225
7726c8ffda42 Moving Data types and POU types informations into project model
lbessard
parents: 200
diff changeset
   694
    
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   695
    def insertdataTypeElement(self, index, dataType):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   696
        self.dataTypes.insertdataType(index, dataType)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   697
    setattr(cls, "insertdataTypeElement", insertdataTypeElement)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   698
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   699
    def removedataTypeElement(self, name):
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
   700
        found = False
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   701
        for idx, element in enumerate(self.dataTypes.getdataType()):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   702
            if element.getname() == name:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   703
                self.dataTypes.removedataType(idx)
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
   704
                found = True
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
   705
                break
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
   706
        if not found:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
   707
            raise ValueError, "\"%s\" Data Type doesn't exist !!!"%name
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   708
    setattr(cls, "removedataTypeElement", removedataTypeElement)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   709
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   710
    def getpouElements(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   711
        return self.pous.getpou()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   712
    setattr(cls, "getpouElements", getpouElements)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   713
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   714
    def getpouElement(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   715
        elements = self.pous.getpou()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   716
        for element in elements:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   717
            if element.getname() == name:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   718
                return element
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   719
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   720
    setattr(cls, "getpouElement", getpouElement)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   721
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   722
    def appendpouElement(self, name, pou_type, body_type):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   723
        for element in self.pous.getpou():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   724
            if element.getname() == name:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   725
                raise ValueError, "\"%s\" POU already exists !!!"%name
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   726
        new_pou = PLCOpenClasses["pous_pou"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   727
        new_pou.setname(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   728
        new_pou.setpouType(pou_type)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   729
        new_pou.setbody(PLCOpenClasses["body"]())
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   730
        new_pou.setbodyType(body_type)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   731
        self.pous.appendpou(new_pou)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   732
    setattr(cls, "appendpouElement", appendpouElement)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   733
        
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   734
    def insertpouElement(self, index, pou):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   735
        self.pous.insertpou(index, pou)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   736
    setattr(cls, "insertpouElement", insertpouElement)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   737
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   738
    def removepouElement(self, name):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   739
        found = False
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   740
        for idx, element in enumerate(self.pous.getpou()):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   741
            if element.getname() == name:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   742
                self.pous.removepou(idx)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   743
                found = True
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   744
                break
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   745
        if not found:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   746
            raise ValueError, "\"%s\" POU doesn't exist !!!"%name
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   747
    setattr(cls, "removepouElement", removepouElement)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   748
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   749
def setbodyType(self, type):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   750
    if type == "IL":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   751
        self.body.setcontent({"name" : "IL", "value" : PLCOpenClasses["formattedText"]()})
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   752
    elif type == "ST":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   753
        self.body.setcontent({"name" : "ST", "value" : PLCOpenClasses["formattedText"]()})
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   754
    elif type == "LD":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   755
        self.body.setcontent({"name" : "LD", "value" : PLCOpenClasses["body_LD"]()})
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   756
    elif type == "FBD":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   757
        self.body.setcontent({"name" : "FBD", "value" : PLCOpenClasses["body_FBD"]()})
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   758
    elif type == "SFC":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   759
        self.body.setcontent({"name" : "SFC", "value" : PLCOpenClasses["body_SFC"]()})
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   760
    else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   761
        raise ValueError, "%s isn't a valid body type!"%type
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   762
        
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   763
def getbodyType(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   764
    return self.body.getcontent()["name"]
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   765
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   766
def resetexecutionOrder(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   767
    self.body.resetexecutionOrder()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   768
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   769
def compileexecutionOrder(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   770
    self.body.compileexecutionOrder()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   771
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   772
def setelementExecutionOrder(self, instance, new_executionOrder):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   773
    self.body.setelementExecutionOrder(instance, new_executionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   774
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   775
def addinstance(self, name, instance):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   776
    self.body.appendcontentInstance(name, instance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   777
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   778
def getinstances(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   779
    return self.body.getcontentInstances()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   780
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   781
def getinstance(self, id):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   782
    return self.body.getcontentInstance(id)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   783
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   784
def getrandomInstance(self, exclude):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   785
    return self.body.getcontentRandomInstance(exclude)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   786
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   787
def getinstanceByName(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   788
    return self.body.getcontentInstanceByName(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   789
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   790
def removeinstance(self, id):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   791
    self.body.removecontentInstance(id)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   792
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   793
def settext(self, text):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   794
    self.body.settext(text)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   795
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   796
def gettext(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   797
    return self.body.gettext()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   798
setattr(cls, "gettext", gettext)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   799
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   800
cls = PLCOpenClasses.get("pous_pou", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   801
if cls:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   802
    setattr(cls, "setbodyType", setbodyType)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   803
    setattr(cls, "getbodyType", getbodyType)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   804
    setattr(cls, "resetexecutionOrder", resetexecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   805
    setattr(cls, "compileexecutionOrder", compileexecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   806
    setattr(cls, "setelementExecutionOrder", setelementExecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   807
    setattr(cls, "addinstance", addinstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   808
    setattr(cls, "getinstances", getinstances)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   809
    setattr(cls, "getinstance", getinstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   810
    setattr(cls, "getrandomInstance", getrandomInstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   811
    setattr(cls, "getinstanceByName", getinstanceByName)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   812
    setattr(cls, "removeinstance", removeinstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   813
    setattr(cls, "settext", settext)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   814
    setattr(cls, "gettext", gettext)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   815
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   816
    def getvars(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   817
        vars = []
282
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   818
        if self.interface is not None:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   819
            reverse_types = {}
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   820
            for name, value in VarTypes.items():
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   821
                reverse_types[value] = name
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   822
            for varlist in self.interface.getcontent():
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   823
                vars.append((reverse_types[varlist["name"]], varlist["value"]))
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   824
        return vars
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   825
    setattr(cls, "getvars", getvars)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   826
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   827
    def setvars(self, vars):
282
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   828
        if self.interface is None:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   829
            self.interface = PLCOpenClasses["pou_interface"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   830
        self.interface.setcontent([])
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   831
        for vartype, varlist in vars:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   832
            self.interface.appendcontent({"name" : VarTypes[vartype], "value" : varlist})
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   833
    setattr(cls, "setvars", setvars)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   834
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   835
    def addpouVar(self, type, name):
282
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   836
        if self.interface is None:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   837
            self.interface = PLCOpenClasses["pou_interface"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   838
        content = self.interface.getcontent()
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   839
        if len(content) == 0 or content[-1]["name"] != "localVars":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   840
            content.append({"name" : "localVars", "value" : PLCOpenClasses["interface_localVars"]()})
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
   841
        else:
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
   842
            varlist = content[-1]["value"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   843
            variables = varlist.getvariable()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   844
            if varlist.getconstant() or varlist.getretain() or len(variables) > 0 and variables[0].getaddress():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   845
                content.append({"name" : "localVars", "value" : PLCOpenClasses["interface_localVars"]()})
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   846
        var = PLCOpenClasses["varListPlain_variable"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   847
        var.setname(name)
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   848
        var_type = PLCOpenClasses["dataType"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   849
        derived_type = PLCOpenClasses["derivedTypes_derived"]()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   850
        derived_type.setname(type)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   851
        var_type.setcontent({"name" : "derived", "value" : derived_type})
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   852
        var.settype(var_type)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   853
        content[-1]["value"].appendvariable(var)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   854
    setattr(cls, "addpouVar", addpouVar)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   855
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   856
    def changepouVar(self, old_type, old_name, new_type, new_name):
282
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   857
        if self.interface is not None:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   858
            content = self.interface.getcontent()
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   859
            for varlist in content:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   860
                variables = varlist["value"].getvariable()
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   861
                for var in variables:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   862
                    if var.getname() == old_name:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   863
                        vartype_content = var.gettype().getcontent()
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   864
                        if vartype_content["name"] == "derived" and vartype_content["value"].getname() == old_type:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   865
                            var.setname(new_name)
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   866
                            vartype_content["value"].setname(new_type)
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   867
                            return
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   868
    setattr(cls, "changepouVar", changepouVar)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   869
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   870
    def removepouVar(self, type, name):
282
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   871
        if self.interface is not None:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   872
            content = self.interface.getcontent()
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   873
            for varlist in content:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   874
                variables = varlist["value"].getvariable()
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   875
                for var in variables:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   876
                    if var.getname() == name:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   877
                        vartype_content = var.gettype().getcontent()
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   878
                        if vartype_content["name"] == "derived" and vartype_content["value"].getname() == type:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   879
                            variables.remove(var)
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   880
                            break
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   881
                if len(varlist["value"].getvariable()) == 0:
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   882
                    content.remove(varlist)
a18ddbbc5c58 Bugs on pous without interface fixed
lbessard
parents: 278
diff changeset
   883
                    break
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   884
    setattr(cls, "removepouVar", removepouVar)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   885
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   886
    def hasblock(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   887
        if self.getbodyType() in ["FBD", "LD", "SFC"]:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   888
            for instance in self.getinstances():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   889
                if isinstance(instance, PLCOpenClasses["fbdObjects_block"]) and instance.getinstanceName() == name:
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
   890
                    return True
89
a6ff2b3fcc25 Bug on block deletion fixed
lbessard
parents: 77
diff changeset
   891
            if self.transitions:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   892
                for transition in self.transitions.gettransition():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   893
                    result = transition.hasblock(name)
89
a6ff2b3fcc25 Bug on block deletion fixed
lbessard
parents: 77
diff changeset
   894
                    if result:
a6ff2b3fcc25 Bug on block deletion fixed
lbessard
parents: 77
diff changeset
   895
                        return result
a6ff2b3fcc25 Bug on block deletion fixed
lbessard
parents: 77
diff changeset
   896
            if self.actions:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   897
                for action in self.actions.getaction():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   898
                    result = action.hasblock(name)
89
a6ff2b3fcc25 Bug on block deletion fixed
lbessard
parents: 77
diff changeset
   899
                    if result:
a6ff2b3fcc25 Bug on block deletion fixed
lbessard
parents: 77
diff changeset
   900
                        return result
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
   901
        return False
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   902
    setattr(cls, "hasblock", hasblock)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   903
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   904
    def addtransition(self, name, type):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   905
        if not self.transitions:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   906
            self.addtransitions()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   907
            self.transitions.settransition([])
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   908
        transition = PLCOpenClasses["transitions_transition"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   909
        transition.setname(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   910
        transition.setbodyType(type)
200
8a1ed1959c69 Pou execution order id management fixed
lbessard
parents: 193
diff changeset
   911
        if type == "ST":
8a1ed1959c69 Pou execution order id management fixed
lbessard
parents: 193
diff changeset
   912
            transition.settext(":= ;")
8a1ed1959c69 Pou execution order id management fixed
lbessard
parents: 193
diff changeset
   913
        elif type == "IL":
8a1ed1959c69 Pou execution order id management fixed
lbessard
parents: 193
diff changeset
   914
            transition.settext("\tST\t%s"%name)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   915
        self.transitions.appendtransition(transition)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   916
    setattr(cls, "addtransition", addtransition)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   917
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   918
    def gettransition(self, name):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   919
        if self.transitions:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   920
            for transition in self.transitions.gettransition():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   921
                if transition.getname() == name:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   922
                    return transition
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   923
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   924
    setattr(cls, "gettransition", gettransition)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   925
        
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   926
    def gettransitionList(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   927
        if self.transitions:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   928
            return self.transitions.gettransition()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   929
        return []
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   930
    setattr(cls, "gettransitionList", gettransitionList)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   931
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   932
    def removetransition(self, name):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   933
        if self.transitions:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   934
            transitions = self.transitions.gettransition()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   935
            i = 0
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   936
            removed = False
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   937
            while i < len(transitions) and not removed:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   938
                if transitions[i].getname() == name:
46
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 27
diff changeset
   939
                    transitions.pop(i)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   940
                    removed = True
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   941
                i += 1
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   942
            if not removed:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   943
                raise ValueError, "Transition with name %s doesn't exists!"%name
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   944
    setattr(cls, "removetransition", removetransition)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   945
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   946
    def addaction(self, name, type):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   947
        if not self.actions:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   948
            self.addactions()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   949
            self.actions.setaction([])
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   950
        action = PLCOpenClasses["actions_action"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   951
        action.setname(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   952
        action.setbodyType(type)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   953
        self.actions.appendaction(action)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   954
    setattr(cls, "addaction", addaction)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   955
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   956
    def getaction(self, name):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   957
        if self.actions:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   958
            for action in self.actions.getaction():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   959
                if action.getname() == name:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   960
                    return action
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   961
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   962
    setattr(cls, "getaction", getaction)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   963
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   964
    def getactionList(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   965
        if self.actions:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   966
            return self.actions.getaction()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   967
        return []
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   968
    setattr(cls, "getactionList", getactionList)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   969
        
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   970
    def removeaction(self, name):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   971
        if self.actions:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   972
            actions = self.actions.getaction()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   973
            i = 0
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   974
            removed = False
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   975
            while i < len(actions) and not removed:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   976
                if actions[i].getname() == name:
46
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 27
diff changeset
   977
                    actions.pop(i)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   978
                    removed = True
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   979
                i += 1
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   980
            if not removed:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   981
                raise ValueError, "Action with name %s doesn't exists!"%name
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   982
    setattr(cls, "removeaction", removeaction)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
   983
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   984
    def updateElementName(self, old_name, new_name):
348
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   985
        if self.interface:
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   986
            for content in self.interface.getcontent():
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   987
                for var in content["value"].getvariable():
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   988
                    var_type_content = var.gettype().getcontent()
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   989
                    if var_type_content["name"] == "derived":
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   990
                        if var_type_content["value"].getname() == old_name:
09fdd7616a86 Bug preventing variable or datatype type name to change when POU or datatype name changed fixed
greg
parents: 295
diff changeset
   991
                            var_type_content["value"].setname(new_name)
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   992
        self.body.updateElementName(old_name, new_name)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   993
        for action in self.getactionList():
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   994
            action.updateElementName(old_name, new_name)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
   995
        for transition in self.gettransitionList():
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   996
            transition.updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   997
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
   998
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
   999
cls = PLCOpenClasses.get("transitions_transition", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1000
if cls:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1001
    setattr(cls, "setbodyType", setbodyType)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1002
    setattr(cls, "getbodyType", getbodyType)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1003
    setattr(cls, "resetexecutionOrder", resetexecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1004
    setattr(cls, "compileexecutionOrder", compileexecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1005
    setattr(cls, "setelementExecutionOrder", setelementExecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1006
    setattr(cls, "addinstance", addinstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1007
    setattr(cls, "getinstances", getinstances)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1008
    setattr(cls, "getinstance", getinstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1009
    setattr(cls, "getrandomInstance", getrandomInstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1010
    setattr(cls, "getinstanceByName", getinstanceByName)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1011
    setattr(cls, "removeinstance", removeinstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1012
    setattr(cls, "settext", settext)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1013
    setattr(cls, "gettext", gettext)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1014
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1015
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1016
        self.body.updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1017
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1018
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1019
    def hasblock(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1020
        if self.getbodyType() in ["FBD", "LD", "SFC"]:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1021
            for instance in self.getinstances():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1022
                if isinstance(instance, PLCOpenClasses["fbdObjects_block"]) and instance.getinstanceName() == name:
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  1023
                    return True
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  1024
        return False
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1025
    setattr(cls, "hasblock", hasblock)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  1026
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1027
cls = PLCOpenClasses.get("actions_action", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1028
if cls:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1029
    setattr(cls, "setbodyType", setbodyType)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1030
    setattr(cls, "getbodyType", getbodyType)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1031
    setattr(cls, "resetexecutionOrder", resetexecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1032
    setattr(cls, "compileexecutionOrder", compileexecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1033
    setattr(cls, "setelementExecutionOrder", setelementExecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1034
    setattr(cls, "addinstance", addinstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1035
    setattr(cls, "getinstances", getinstances)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1036
    setattr(cls, "getinstance", getinstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1037
    setattr(cls, "getrandomInstance", getrandomInstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1038
    setattr(cls, "getinstanceByName", getinstanceByName)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1039
    setattr(cls, "removeinstance", removeinstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1040
    setattr(cls, "settext", settext)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1041
    setattr(cls, "gettext", gettext)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1042
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1043
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1044
        self.body.updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1045
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1046
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1047
    def hasblock(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1048
        if self.getbodyType() in ["FBD", "LD", "SFC"]:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1049
            for instance in self.getinstances():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1050
                if isinstance(instance, PLCOpenClasses["fbdObjects_block"]) and instance.getinstanceName() == name:
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  1051
                    return True
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  1052
        return False
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1053
    setattr(cls, "hasblock", hasblock)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  1054
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1055
cls = PLCOpenClasses.get("body", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1056
if cls:
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1057
    cls.currentExecutionOrderId = 0
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1058
    
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1059
    def resetcurrentExecutionOrderId(self):
200
8a1ed1959c69 Pou execution order id management fixed
lbessard
parents: 193
diff changeset
  1060
        object.__setattr__(self, "currentExecutionOrderId", 0)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1061
    setattr(cls, "resetcurrentExecutionOrderId", resetcurrentExecutionOrderId)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1062
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1063
    def getnewExecutionOrderId(self):
200
8a1ed1959c69 Pou execution order id management fixed
lbessard
parents: 193
diff changeset
  1064
        object.__setattr__(self, "currentExecutionOrderId", self.currentExecutionOrderId + 1)
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1065
        return self.currentExecutionOrderId
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1066
    setattr(cls, "getnewExecutionOrderId", getnewExecutionOrderId)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1067
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1068
    def resetexecutionOrder(self):
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1069
        if self.content["name"] == "FBD":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1070
            for element in self.content["value"].getcontent():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1071
                if not isinstance(element["value"], (PLCOpenClasses.get("commonObjects_comment", None), 
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1072
                                                     PLCOpenClasses.get("commonObjects_connector", None), 
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1073
                                                     PLCOpenClasses.get("commonObjects_continuation", None))):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1074
                    element["value"].setexecutionOrderId(0)
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1075
        else:
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1076
            raise TypeError, "Can only generate execution order on FBD networks!"
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1077
    setattr(cls, "resetexecutionOrder", resetexecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1078
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1079
    def compileexecutionOrder(self):
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1080
        if self.content["name"] == "FBD":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1081
            self.resetexecutionOrder()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1082
            self.resetcurrentExecutionOrderId()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1083
            for element in self.content["value"].getcontent():
200
8a1ed1959c69 Pou execution order id management fixed
lbessard
parents: 193
diff changeset
  1084
                if isinstance(element["value"], PLCOpenClasses.get("fbdObjects_outVariable", None)) and element["value"].getexecutionOrderId() == 0:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1085
                    connections = element["value"].connectionPointIn.getconnections()
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1086
                    if connections and len(connections) == 1:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1087
                        self.compileelementExecutionOrder(connections[0])
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1088
                    element["value"].setexecutionOrderId(self.getnewExecutionOrderId())
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1089
        else:
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1090
            raise TypeError, "Can only generate execution order on FBD networks!"
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1091
    setattr(cls, "compileexecutionOrder", compileexecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1092
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1093
    def compileelementExecutionOrder(self, link):
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1094
        if self.content["name"] == "FBD":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1095
            localid = link.getrefLocalId()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1096
            instance = self.getcontentInstance(localid)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1097
            if isinstance(instance, PLCOpenClasses.get("fbdObjects_block", None)) and instance.getexecutionOrderId() == 0:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1098
                for variable in instance.inputVariables.getvariable():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1099
                    connections = variable.connectionPointIn.getconnections()
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1100
                    if connections and len(connections) == 1:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1101
                        self.compileelementExecutionOrder(connections[0])
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1102
                instance.setexecutionOrderId(self.getnewExecutionOrderId())
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1103
            elif isinstance(instance, PLCOpenClasses.get("commonObjects_continuation", None)) and instance.getexecutionOrderId() == 0:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1104
                name = instance.getname()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1105
                for tmp_instance in self.getcontentInstances():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1106
                    if isinstance(tmp_instance, PLCOpenClasses.get("commonObjects_connector", None)) and tmp_instance.getname() == name and tmp_instance.getexecutionOrderId() == 0:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1107
                        connections = tmp_instance.connectionPointIn.getconnections()
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1108
                        if connections and len(connections) == 1:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1109
                            self.compileelementExecutionOrder(connections[0])
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1110
        else:
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1111
            raise TypeError, "Can only generate execution order on FBD networks!"
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1112
    setattr(cls, "compileelementExecutionOrder", compileelementExecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1113
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1114
    def setelementExecutionOrder(self, instance, new_executionOrder):
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1115
        if self.content["name"] == "FBD":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1116
            old_executionOrder = instance.getexecutionOrderId()
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1117
            if old_executionOrder is not None and old_executionOrder != 0 and new_executionOrder != 0:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1118
                for element in self.content["value"].getcontent():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1119
                    if element["value"] != instance and not isinstance(element["value"], PLCOpenClasses.get("commonObjects_comment", None)):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1120
                        element_executionOrder = element["value"].getexecutionOrderId()
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1121
                        if old_executionOrder <= element_executionOrder <= new_executionOrder:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1122
                            element["value"].setexecutionOrderId(element_executionOrder - 1)
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1123
                        if new_executionOrder <= element_executionOrder <= old_executionOrder:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1124
                            element["value"].setexecutionOrderId(element_executionOrder + 1)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1125
            instance.setexecutionOrderId(new_executionOrder)
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1126
        else:
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 108
diff changeset
  1127
            raise TypeError, "Can only generate execution order on FBD networks!"
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1128
    setattr(cls, "setelementExecutionOrder", setelementExecutionOrder)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1129
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1130
    def appendcontentInstance(self, name, instance):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1131
        if self.content["name"] in ["LD","FBD","SFC"]:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1132
            self.content["value"].appendcontent({"name" : name, "value" : instance})
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1133
        else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1134
            raise TypeError, "%s body don't have instances!"%self.content["name"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1135
    setattr(cls, "appendcontentInstance", appendcontentInstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1136
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1137
    def getcontentInstances(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1138
        if self.content["name"] in ["LD","FBD","SFC"]:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1139
            instances = []
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1140
            for element in self.content["value"].getcontent():
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1141
                instances.append(element["value"])
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1142
            return instances
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1143
        else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1144
            raise TypeError, "%s body don't have instances!"%self.content["name"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1145
    setattr(cls, "getcontentInstances", getcontentInstances)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1146
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1147
    def getcontentInstance(self, id):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1148
        if self.content["name"] in ["LD","FBD","SFC"]:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1149
            for element in self.content["value"].getcontent():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1150
                if element["value"].getlocalId() == id:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1151
                    return element["value"]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1152
            return None
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1153
        else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1154
            raise TypeError, "%s body don't have instances!"%self.content["name"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1155
    setattr(cls, "getcontentInstance", getcontentInstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1156
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1157
    def getcontentRandomInstance(self, exclude):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1158
        if self.content["name"] in ["LD","FBD","SFC"]:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1159
            for element in self.content["value"].getcontent():
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1160
                if element["value"].getlocalId() not in exclude:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1161
                    return element["value"]
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1162
            return None
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1163
        else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1164
            raise TypeError, "%s body don't have instances!"%self.content["name"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1165
    setattr(cls, "getcontentRandomInstance", getcontentRandomInstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1166
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1167
    def getcontentInstanceByName(self, name):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1168
        if self.content["name"] in ["LD","FBD","SFC"]:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1169
            for element in self.content["value"].getcontent():
193
e18e354a8006 But on getinstanceByName in pou class fixed
lbessard
parents: 187
diff changeset
  1170
                if isinstance(element["value"], PLCOpenClasses.get("fbdObjects_block", None)) and element["value"].getinstanceName() == name:
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1171
                    return element["value"]
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1172
        else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1173
            raise TypeError, "%s body don't have instances!"%self.content["name"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1174
    setattr(cls, "getcontentInstanceByName", getcontentInstanceByName)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1175
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1176
    def removecontentInstance(self, id):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1177
        if self.content["name"] in ["LD","FBD","SFC"]:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1178
            i = 0
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1179
            removed = False
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1180
            elements = self.content["value"].getcontent()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1181
            while i < len(elements) and not removed:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1182
                if elements[i]["value"].getlocalId() == id:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1183
                    self.content["value"].removecontent(i)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1184
                    removed = True
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1185
                i += 1
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1186
            if not removed:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1187
                raise ValueError, "Instance with id %d doesn't exists!"%id
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1188
        else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1189
            raise TypeError, "%s body don't have instances!"%self.content["name"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1190
    setattr(cls, "removecontentInstance", removecontentInstance)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1191
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1192
    def settext(self, text):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1193
        if self.content["name"] in ["IL","ST"]:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1194
            self.content["value"].settext(text)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1195
        else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1196
            raise TypeError, "%s body don't have text!"%self.content["name"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1197
    setattr(cls, "settext", settext)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1198
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1199
    def gettext(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1200
        if self.content["name"] in ["IL","ST"]:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1201
            return self.content["value"].gettext()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1202
        else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1203
            raise TypeError, "%s body don't have text!"%self.content["name"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1204
    setattr(cls, "gettext", gettext)
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1205
    
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1206
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1207
        if self.content["name"] in ["IL", "ST"]:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1208
            self.content["value"].updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1209
        else:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1210
            for element in self.content["value"].getcontent():
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1211
                element["value"].updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1212
    setattr(cls, "updateElementName", updateElementName)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1213
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1214
def getx(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1215
    return self.position.getx()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1216
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1217
def gety(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1218
    return self.position.gety()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1219
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1220
def setx(self, x):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1221
    self.position.setx(x)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1222
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1223
def sety(self, y):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1224
    self.position.sety(y)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1225
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1226
cls = PLCOpenClasses.get("commonObjects_comment", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1227
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1228
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1229
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1230
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1231
    setattr(cls, "sety", sety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1232
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1233
    def setcontentText(self, text):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1234
        self.content.settext(text)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1235
    setattr(cls, "setcontentText", setcontentText)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1236
        
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1237
    def getcontentText(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1238
        return self.content.gettext()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1239
    setattr(cls, "getcontentText", getcontentText)
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1240
    
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1241
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1242
        self.content.updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1243
    setattr(cls, "updateElementName", updateElementName)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1244
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1245
cls = PLCOpenClasses.get("fbdObjects_block", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1246
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1247
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1248
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1249
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1250
    setattr(cls, "sety", sety)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1251
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1252
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1253
        if self.typeName == old_name:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1254
            self.typeName = new_name
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1255
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1256
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1257
cls = PLCOpenClasses.get("ldObjects_leftPowerRail", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1258
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1259
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1260
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1261
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1262
    setattr(cls, "sety", sety)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1263
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1264
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1265
        pass
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1266
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1267
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1268
cls = PLCOpenClasses.get("ldObjects_rightPowerRail", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1269
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1270
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1271
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1272
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1273
    setattr(cls, "sety", sety)
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1274
    
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1275
    def updateElementName(self, old_name, new_name):
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1276
        pass
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1277
    setattr(cls, "updateElementName", updateElementName)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1278
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1279
cls = PLCOpenClasses.get("ldObjects_contact", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1280
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1281
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1282
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1283
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1284
    setattr(cls, "sety", sety)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1285
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1286
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1287
        if self.variable == old_name:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1288
            self.variable = new_name
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1289
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1290
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1291
cls = PLCOpenClasses.get("ldObjects_coil", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1292
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1293
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1294
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1295
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1296
    setattr(cls, "sety", sety)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1297
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1298
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1299
        if self.variable == old_name:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1300
            self.variable = new_name
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1301
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1302
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1303
cls = PLCOpenClasses.get("sfcObjects_step", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1304
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1305
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1306
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1307
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1308
    setattr(cls, "sety", sety)
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1309
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1310
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1311
        pass
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1312
    setattr(cls, "updateElementName", updateElementName)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1313
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1314
cls = PLCOpenClasses.get("sfcObjects_transition", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1315
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1316
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1317
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1318
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1319
    setattr(cls, "sety", sety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1320
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1321
    def setconditionContent(self, type, value):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1322
        if not self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1323
            self.addcondition()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1324
        if type == "reference":
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1325
            condition = PLCOpenClasses["condition_reference"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1326
            condition.setname(value)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1327
        elif type == "inline":
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1328
            condition = PLCOpenClasses["condition_inline"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1329
            condition.setcontent({"name" : "ST", "value" : PLCOpenClasses["formattedText"]()})
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1330
            condition.settext(value)
69
8fbff50141f8 Bug on transition connection fixed
lbessard
parents: 68
diff changeset
  1331
        elif type == "connection":
166
de1845119cdd Bug on transition connection fixed
lbessard
parents: 151
diff changeset
  1332
            condition = [PLCOpenClasses["connection"]()]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1333
        self.condition.setcontent({"name" : type, "value" : condition})
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1334
    setattr(cls, "setconditionContent", setconditionContent)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1335
        
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1336
    def getconditionContent(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1337
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1338
            content = self.condition.getcontent()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1339
            values = {"type" : content["name"]}
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1340
            if values["type"] == "reference":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1341
                values["value"] = content["value"].getname()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1342
            elif values["type"] == "inline":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1343
                values["value"] = content["value"].gettext()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1344
            return values
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1345
        return ""
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1346
    setattr(cls, "getconditionContent", getconditionContent)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1347
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1348
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1349
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1350
            content = self.condition.getcontent()
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1351
            if content["name"] == "reference":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1352
                if content["value"].getname() == old_name:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1353
                    content["value"].setname(new_name)
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1354
            elif content["name"] == "inline":
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1355
                content["value"].updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1356
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1357
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1358
    def addconnection(self):
69
8fbff50141f8 Bug on transition connection fixed
lbessard
parents: 68
diff changeset
  1359
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1360
            content = self.condition.getcontent()
69
8fbff50141f8 Bug on transition connection fixed
lbessard
parents: 68
diff changeset
  1361
            if content["name"] != "connection":
166
de1845119cdd Bug on transition connection fixed
lbessard
parents: 151
diff changeset
  1362
                self.condition.setcontent({"name" : "connection", "value" : [PLCOpenClasses["connection"]()]})
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1363
                content = self.condition.getcontent()
166
de1845119cdd Bug on transition connection fixed
lbessard
parents: 151
diff changeset
  1364
            else:
de1845119cdd Bug on transition connection fixed
lbessard
parents: 151
diff changeset
  1365
                content["value"].append(PLCOpenClasses["connection"]())
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1366
    setattr(cls, "addconnection", addconnection)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1367
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1368
    def removeconnection(self, idx):
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1369
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1370
            content = self.condition.getcontent()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1371
            if content["name"] == "connection":
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1372
                content["value"].pop(idx)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1373
        setattr(cls, "removeconnection", removeconnection)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1374
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1375
    def removeconnections(self):
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1376
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1377
            content = self.condition.getcontent()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1378
            if content["name"] == "connection":
166
de1845119cdd Bug on transition connection fixed
lbessard
parents: 151
diff changeset
  1379
                content["value"] = [PLCOpenClasses["connection"]()]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1380
    setattr(cls, "removeconnections", removeconnections)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1381
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1382
    def getconnections(self):
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1383
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1384
            content = self.condition.getcontent()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1385
            if content["name"] == "connection":
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1386
                return content["value"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1387
    setattr(cls, "getconnections", getconnections)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1388
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1389
    def setconnectionId(self, idx, id):
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1390
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1391
            content = self.condition.getcontent()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1392
            if content["name"] == "connection":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1393
                content["value"][idx].setrefLocalId(id)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1394
    setattr(cls, "setconnectionId", setconnectionId)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1395
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1396
    def getconnectionId(self, idx):
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1397
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1398
            content = self.condition.getcontent()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1399
            if content["name"] == "connection":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1400
                return content["value"][idx].getrefLocalId()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1401
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1402
    setattr(cls, "getconnectionId", getconnectionId)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1403
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1404
    def setconnectionPoints(self, idx, points):
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1405
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1406
            content = self.condition.getcontent()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1407
            if content["name"] == "connection":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1408
                content["value"][idx].setpoints(points)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1409
    setattr(cls, "setconnectionPoints", setconnectionPoints)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1410
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1411
    def getconnectionPoints(self, idx):
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1412
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1413
            content = self.condition.getcontent()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1414
            if content["name"] == "connection":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1415
                return content["value"][idx].getpoints()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1416
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1417
    setattr(cls, "getconnectionPoints", getconnectionPoints)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1418
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1419
    def setconnectionParameter(self, idx, parameter):
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1420
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1421
            content = self.condition.getcontent()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1422
            if content["name"] == "connection":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1423
                content["value"][idx].setformalParameter(parameter)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1424
    setattr(cls, "setconnectionParameter", setconnectionParameter)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1425
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1426
    def getconnectionParameter(self, idx):
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1427
        if self.condition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1428
            content = self.condition.getcontent()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1429
            if content["name"] == "connection":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1430
                return content["value"][idx].getformalParameter()
63
04a02b4b2a57 Adding support for connecting transition to LD rung and FBD network
lbessard
parents: 58
diff changeset
  1431
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1432
    setattr(cls, "getconnectionParameter", getconnectionParameter)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1433
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1434
cls = PLCOpenClasses.get("sfcObjects_selectionDivergence", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1435
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1436
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1437
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1438
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1439
    setattr(cls, "sety", sety)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1440
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1441
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1442
        pass
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1443
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1444
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1445
cls = PLCOpenClasses.get("sfcObjects_selectionConvergence", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1446
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1447
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1448
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1449
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1450
    setattr(cls, "sety", sety)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1451
    
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1452
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1453
        pass
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1454
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1455
    
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1456
cls = PLCOpenClasses.get("sfcObjects_simultaneousDivergence", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1457
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1458
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1459
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1460
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1461
    setattr(cls, "sety", sety)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1462
    
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1463
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1464
        pass
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1465
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1466
    
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1467
cls = PLCOpenClasses.get("sfcObjects_simultaneousConvergence", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1468
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1469
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1470
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1471
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1472
    setattr(cls, "sety", sety)
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1473
    
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1474
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1475
        pass
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1476
    setattr(cls, "updateElementName", updateElementName)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1477
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1478
cls = PLCOpenClasses.get("sfcObjects_jumpStep", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1479
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1480
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1481
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1482
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1483
    setattr(cls, "sety", sety)
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1484
    
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1485
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1486
        pass
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1487
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1488
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1489
cls = PLCOpenClasses.get("actionBlock_action", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1490
if cls:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1491
    def setreferenceName(self, name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1492
        if self.reference:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1493
            self.reference.setname(name)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1494
    setattr(cls, "setreferenceName", setreferenceName)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1495
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1496
    def getreferenceName(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1497
        if self.reference:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1498
            return self.reference.getname()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1499
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1500
    setattr(cls, "getreferenceName", getreferenceName)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1501
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1502
    def setinlineContent(self, content):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1503
        if self.inline:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1504
            self.inline.setcontent({"name" : "ST", "value" : PLCOpenClasses["formattedText"]()})
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1505
            self.inline.settext(content)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1506
    setattr(cls, "setinlineContent", setinlineContent)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1507
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1508
    def getinlineContent(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1509
        if self.inline:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1510
            return self.inline.gettext()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1511
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1512
    setattr(cls, "getinlineContent", getinlineContent)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1513
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1514
    def updateElementName(self, old_name, new_name):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1515
        if self.reference and self.reference.getname() == old_name:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1516
            self.reference.setname(new_name)
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1517
        if self.inline:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1518
            self.inline.updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1519
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1520
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1521
cls = PLCOpenClasses.get("commonObjects_actionBlock", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1522
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1523
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1524
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1525
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1526
    setattr(cls, "sety", sety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1527
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1528
    def setactions(self, actions):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1529
        self.action = []
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1530
        for params in actions:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1531
            action = PLCOpenClasses["actionBlock_action"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1532
            action.setqualifier(params["qualifier"])
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1533
            if params["type"] == "reference":
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1534
                action.addreference()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1535
                action.setreferenceName(params["value"])
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1536
            else:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1537
                action.addinline()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1538
                action.setinlineContent(params["value"])
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1539
            if "duration" in params:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1540
                action.setduration(params["duration"])
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1541
            if "indicator" in params:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1542
                action.setindicator(params["indicator"])
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1543
            self.action.append(action)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1544
    setattr(cls, "setactions", setactions)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1545
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1546
    def getactions(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1547
        actions = []
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1548
        for action in self.action:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1549
            params = {}
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1550
            params["qualifier"] = action.getqualifier()
108
9aa1fdfb7cb2 A lots of bugs fixed
lbessard
parents: 94
diff changeset
  1551
            if params["qualifier"] is None:
9aa1fdfb7cb2 A lots of bugs fixed
lbessard
parents: 94
diff changeset
  1552
                params["qualifier"] = "N"
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1553
            if action.getreference():
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1554
                params["type"] = "reference"
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1555
                params["value"] = action.getreferenceName()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1556
            elif action.getinline():
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1557
                params["type"] = "inline"
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1558
                params["value"] = action.getinlineContent()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1559
            duration = action.getduration()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1560
            if duration:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1561
                params["duration"] = duration
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1562
            indicator = action.getindicator()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1563
            if indicator:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1564
                params["indicator"] = indicator
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1565
            actions.append(params)
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1566
        return actions
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1567
    setattr(cls, "getactions", getactions)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1568
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1569
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1570
        for action in self.action:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1571
            action.updateElementName(old_name, new_name)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1572
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1573
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1574
cls = PLCOpenClasses.get("fbdObjects_inVariable", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1575
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1576
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1577
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1578
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1579
    setattr(cls, "sety", sety)
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1580
    
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1581
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1582
        if self.expression == old_name:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1583
            self.expression = new_name
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1584
    setattr(cls, "updateElementName", updateElementName)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1585
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1586
cls = PLCOpenClasses.get("fbdObjects_outVariable", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1587
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1588
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1589
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1590
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1591
    setattr(cls, "sety", sety)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1592
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1593
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1594
        if self.expression == old_name:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1595
            self.expression = new_name
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1596
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1597
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1598
cls = PLCOpenClasses.get("fbdObjects_inOutVariable", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1599
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1600
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1601
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1602
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1603
    setattr(cls, "sety", sety)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1604
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1605
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1606
        if self.expression == old_name:
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1607
            self.expression = new_name
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1608
    setattr(cls, "updateElementName", updateElementName)
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1609
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1610
cls = PLCOpenClasses.get("commonObjects_continuation", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1611
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1612
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1613
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1614
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1615
    setattr(cls, "sety", sety)
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1616
    
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1617
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1618
        pass
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1619
    setattr(cls, "updateElementName", updateElementName)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1620
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1621
cls = PLCOpenClasses.get("commonObjects_connector", None)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1622
if cls:
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1623
    setattr(cls, "getx", getx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1624
    setattr(cls, "gety", gety)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1625
    setattr(cls, "setx", setx)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1626
    setattr(cls, "sety", sety)
58
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1627
    
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1628
    def updateElementName(self, old_name, new_name):
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1629
        pass
39cd981ff242 Changing file headers
lbessard
parents: 47
diff changeset
  1630
    setattr(cls, "updateElementName", updateElementName)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1631
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1632
cls = PLCOpenClasses.get("connection", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1633
if cls:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1634
    def setpoints(self, points):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1635
        self.position = []
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1636
        for point in points:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1637
            position = PLCOpenClasses["position"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1638
            position.setx(point.x)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1639
            position.sety(point.y)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1640
            self.position.append(position)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1641
    setattr(cls, "setpoints", setpoints)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1642
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1643
    def getpoints(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1644
        points = []
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1645
        for position in self.position:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1646
            points.append((position.getx(),position.gety()))
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1647
        return points
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1648
    setattr(cls, "getpoints", getpoints)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1649
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1650
cls = PLCOpenClasses.get("connectionPointIn", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1651
if cls:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1652
    def setrelPositionXY(self, x, y):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1653
        self.relPosition = PLCOpenClasses["position"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1654
        self.relPosition.setx(x)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1655
        self.relPosition.sety(y)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1656
    setattr(cls, "setrelPositionXY", setrelPositionXY)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1657
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1658
    def getrelPositionXY(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1659
        if self.relPosition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1660
            return self.relPosition.getx(), self.relPosition.gety()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1661
        else:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1662
            return self.relPosition
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1663
    setattr(cls, "getrelPositionXY", getrelPositionXY)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1664
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1665
    def addconnection(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1666
        if not self.content:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1667
            self.content = {"name" : "connection", "value" : [PLCOpenClasses["connection"]()]}
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1668
        else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1669
            self.content["value"].append(PLCOpenClasses["connection"]())
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1670
    setattr(cls, "addconnection", addconnection)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1671
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1672
    def removeconnection(self, idx):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1673
        if self.content:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1674
            self.content["value"].pop(idx)
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1675
        if len(self.content["value"]) == 0:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1676
            self.content = None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1677
    setattr(cls, "removeconnection", removeconnection)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1678
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1679
    def removeconnections(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1680
        if self.content:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1681
            self.content = None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1682
    setattr(cls, "removeconnections", removeconnections)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1683
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1684
    def getconnections(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1685
        if self.content:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1686
            return self.content["value"]
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1687
    setattr(cls, "getconnections", getconnections)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1688
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1689
    def setconnectionId(self, idx, id):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1690
        if self.content:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1691
            self.content["value"][idx].setrefLocalId(id)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1692
    setattr(cls, "setconnectionId", setconnectionId)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1693
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1694
    def getconnectionId(self, idx):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1695
        if self.content:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1696
            return self.content["value"][idx].getrefLocalId()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1697
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1698
    setattr(cls, "getconnectionId", getconnectionId)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1699
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1700
    def setconnectionPoints(self, idx, points):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1701
        if self.content:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1702
            self.content["value"][idx].setpoints(points)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1703
    setattr(cls, "setconnectionPoints", setconnectionPoints)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1704
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1705
    def getconnectionPoints(self, idx):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1706
        if self.content:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1707
            return self.content["value"][idx].getpoints()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1708
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1709
    setattr(cls, "getconnectionPoints", getconnectionPoints)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1710
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1711
    def setconnectionParameter(self, idx, parameter):
27
dae55dd9ee14 Current developping version
lbessard
parents: 6
diff changeset
  1712
        if self.content:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1713
            self.content["value"][idx].setformalParameter(parameter)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1714
    setattr(cls, "setconnectionParameter", setconnectionParameter)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1715
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1716
    def getconnectionParameter(self, idx):
27
dae55dd9ee14 Current developping version
lbessard
parents: 6
diff changeset
  1717
        if self.content:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1718
            return self.content["value"][idx].getformalParameter()
27
dae55dd9ee14 Current developping version
lbessard
parents: 6
diff changeset
  1719
        return None
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1720
    setattr(cls, "getconnectionParameter", getconnectionParameter)
27
dae55dd9ee14 Current developping version
lbessard
parents: 6
diff changeset
  1721
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1722
cls = PLCOpenClasses.get("connectionPointOut", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1723
if cls:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1724
    def setrelPositionXY(self, x, y):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1725
        self.relPosition = PLCOpenClasses["position"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1726
        self.relPosition.setx(x)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1727
        self.relPosition.sety(y)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1728
    setattr(cls, "setrelPositionXY", setrelPositionXY)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1729
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1730
    def getrelPositionXY(self):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1731
        if self.relPosition:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1732
            return self.relPosition.getx(), self.relPosition.gety()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1733
        return self.relPosition
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1734
    setattr(cls, "getrelPositionXY", getrelPositionXY)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1735
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1736
cls = PLCOpenClasses.get("value", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1737
if cls:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1738
    def setvalue(self, value):
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1739
        if value.startswith("[") and value.endswith("]"):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1740
            arrayValue = PLCOpenClasses["value_arrayValue"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1741
            self.content = {"name" : "arrayValue", "value" : arrayValue}
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1742
        elif value.startswith("(") and value.endswith(")"):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1743
            structValue = PLCOpenClasses["value_structValue"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1744
            self.content = {"name" : "structValue", "value" : structValue}
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1745
        else:
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1746
            simpleValue = PLCOpenClasses["value_simpleValue"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1747
            self.content = {"name" : "simpleValue", "value": simpleValue}
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1748
        self.content["value"].setvalue(value)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1749
    setattr(cls, "setvalue", setvalue)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1750
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1751
    def getvalue(self):
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1752
        return self.content["value"].getvalue()
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1753
    setattr(cls, "getvalue", getvalue)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1754
147
5ef987c1b927 Bug on array initial value parsing fixed
lbessard
parents: 145
diff changeset
  1755
def extractValues(values):
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1756
    items = values.split(",")
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1757
    i = 1
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1758
    while i < len(items):
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1759
        opened = items[i - 1].count("(") + items[i - 1].count("[")
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1760
        closed = items[i - 1].count(")") + items[i - 1].count("]")
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1761
        if opened > closed:
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1762
            items[i - 1] = ','.join([items[i - 1], items.pop(i)])
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1763
        elif opened == closed:
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1764
            i += 1
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1765
        else:
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1766
            raise ValueError, "\"%s\" is an invalid value!"%value
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1767
    return items
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1768
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1769
cls = PLCOpenClasses.get("value_arrayValue", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1770
if cls:
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1771
    arrayValue_model = re.compile("([0-9]*)\((.*)\)$")
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1772
    
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1773
    def setvalue(self, value):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1774
        self.value = []
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1775
        for item in extractValues(value[1:-1]):
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1776
            item = item.strip()
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1777
            element = PLCOpenClasses["arrayValue_value"]()
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1778
            result = arrayValue_model.match(item)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1779
            if result is not None:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1780
                groups = result.groups()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1781
                element.setrepetitionValue(int(groups[0]))
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1782
                element.setvalue(groups[1].strip())
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1783
            else:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1784
                element.setvalue(item)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1785
            self.value.append(element)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1786
    setattr(cls, "setvalue", setvalue)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1787
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1788
    def getvalue(self):
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1789
        values = []
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1790
        for element in self.value:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1791
            repetition = element.getrepetitionValue()
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1792
            if repetition is not None and repetition > 1:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1793
                values.append("%d(%s)"%(repetition, element.getvalue()))
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1794
            else:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1795
                values.append(element.getvalue())
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1796
        return "[%s]"%", ".join(values)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1797
    setattr(cls, "getvalue", getvalue)
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1798
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1799
cls = PLCOpenClasses.get("value_structValue", None)
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 63
diff changeset
  1800
if cls:
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1801
    structValue_model = re.compile("(.*):=(.*)")
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1802
    
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1803
    def setvalue(self, value):
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1804
        self.value = []
145
4fb225afddf4 Adding scaling
lbessard
parents: 143
diff changeset
  1805
        for item in extractValues(value[1:-1]):
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
  1806
            result = structValue_model.match(item)
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1807
            if result is not None:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1808
                groups = result.groups()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1809
                element = PLCOpenClasses["structValue_value"]()
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1810
                element.setmember(groups[0].strip())
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1811
                element.setvalue(groups[1].strip())
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 286
diff changeset
  1812
                self.value.append(element)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1813
    setattr(cls, "setvalue", setvalue)
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1814
    
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1815
    def getvalue(self):
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1816
        values = []
2
93bc4c2cf376 PLCGenerator finished
lbessard
parents: 1
diff changeset
  1817
        for element in self.value:
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1818
            values.append("%s := %s"%(element.getmember(), element.getvalue()))
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 118
diff changeset
  1819
        return "(%s)"%", ".join(values)
151
aaa80b48bead Adding support for the new version of xmlclass
lbessard
parents: 147
diff changeset
  1820
    setattr(cls, "getvalue", getvalue)