plugins/svgui/svgui.py
author lbessard
Tue, 01 Jul 2008 18:29:42 +0200
changeset 192 f0482f1ae901
parent 191 5b1fa0e06284
child 198 cf99e75b6dda
permissions -rw-r--r--
Problem with files when launching created program from another directory fixed
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
     1
import os, shutil, sys
20
d3cb5020997b Beremiz plugins definitions.
etisserant
parents: 13
diff changeset
     2
base_folder = os.path.split(sys.path[0])[0]
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
     3
sys.path.append(os.path.join(base_folder, "wxsvg", "SVGUIEditor"))
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
     4
sys.path.append(os.path.join(base_folder, "plcopeneditor", "graphics"))
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
     5
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
     6
import wx
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
     7
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
     8
from SVGUIGenerator import *
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
     9
from SVGUIControler import *
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    10
from SVGUIEditor import *
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    11
from FBD_Objects import *
11
75ae893d5eed Adding plugin support in Beremiz
lbessard
parents:
diff changeset
    12
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    13
from wxPopen import ProcessLogger
189
48ba1ae12ffd Adding support for calculate window size while C generating
lbessard
parents: 186
diff changeset
    14
from wx.wxsvg import SVGDocument
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    15
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    16
[ID_SVGUIEDITORFBDPANEL, 
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    17
] = [wx.NewId() for _init_ctrls in range(1)]
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    18
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    19
SVGUIFB_Types = {ITEM_CONTAINER : "Container",
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    20
                 ITEM_BUTTON : "Button", 
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    21
                 ITEM_TEXT : "TextCtrl", 
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    22
                 ITEM_SCROLLBAR : "ScrollBar", 
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    23
                 ITEM_ROTATING : "RotatingCtrl", 
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    24
                 ITEM_NOTEBOOK : "NoteBook", 
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    25
                 ITEM_TRANSFORM : "Transform"}
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    26
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    27
class _SVGUIEditor(SVGUIEditor):
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    28
    """
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    29
    This Class add IEC specific features to the SVGUIEditor :
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    30
        - FDB preview
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    31
        - FBD begin drag 
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    32
    """
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    33
    
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    34
    def _init_coll_EditorGridSizer_Items(self, parent):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    35
        SVGUIEditor._init_coll_EditorGridSizer_Items(self, parent)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    36
        parent.AddWindow(self.FBDPanel, 0, border=0, flag=wx.GROW)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    37
    
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    38
    def _init_ctrls(self, prnt):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    39
        SVGUIEditor._init_ctrls(self, prnt, False)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    40
        
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    41
        self.FBDPanel = wx.Panel(id=ID_SVGUIEDITORFBDPANEL, 
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    42
                  name='FBDPanel', parent=self.EditorPanel, pos=wx.Point(0, 0),
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    43
                  size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL|wx.SIMPLE_BORDER)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    44
        self.FBDPanel.SetBackgroundColour(wx.WHITE)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    45
        self.FBDPanel.Bind(wx.EVT_LEFT_DOWN, self.OnFBDPanelClick)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    46
        self.FBDPanel.Bind(wx.EVT_PAINT, self.OnPaintFBDPanel)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    47
        
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    48
        setattr(self.FBDPanel, "GetScaling", lambda: None) 
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    49
        
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    50
        self._init_sizers()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    51
    
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    52
    def __init__(self, parent, controler = None, fileOpen = None):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    53
        SVGUIEditor.__init__(self, parent, controler, fileOpen)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    54
        
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    55
        self.FBDBlock = None
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    56
    
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    57
    def RefreshView(self, select_id = None):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    58
        SVGUIEditor.RefreshView(self, select_id)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    59
        self.FBDPanel.Refresh()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    60
    
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    61
    def OnPaintFBDPanel(self,event):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    62
        dc = wx.ClientDC(self.FBDPanel)
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    63
        dc.Clear()
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    64
        selected = self.GetSelected()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    65
        if selected is not None:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    66
            selected_type = self.Controler.GetElementType(selected)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    67
            if selected_type is not None:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    68
                self.FBDBlock = FBD_Block(parent=self.FBDPanel,type=SVGUIFB_Types[selected_type],name=self.Controler.GetElementName(selected))
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    69
                width, height = self.FBDBlock.GetMinSize()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    70
                self.FBDBlock.SetSize(width,height)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    71
                clientsize = self.FBDPanel.GetClientSize()
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    72
                x = (clientsize.width - width) / 2
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    73
                y = (clientsize.height - height) / 2
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    74
                self.FBDBlock.SetPosition(x, y)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    75
                self.FBDBlock.Draw(dc)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    76
        else:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    77
            self.FBDBlock = None
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    78
        event.Skip()
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    79
        
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    80
    def OnFBDPanelClick(self, event):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    81
        if self.FBDBlock:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    82
            data = wx.TextDataObject(str((self.FBDBlock.GetType(), "functionBlock", self.FBDBlock.GetName())))
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    83
            DropSrc = wx.DropSource(self.FBDPanel)
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    84
            DropSrc.SetData(data)
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    85
            DropSrc.DoDragDrop()
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    86
        event.Skip()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    87
    
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    88
    def OnInterfaceTreeItemSelected(self, event):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    89
        self.FBDPanel.Refresh()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    90
        SVGUIEditor.OnInterfaceTreeItemSelected(self, event)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
    91
    
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    92
    def OnGenerate(self,event):
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    93
        self.SaveProject()
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    94
        self.Controler.PlugGenerate_C(sys.path[0],(0,0,4,5),None)
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    95
        event.Skip()    
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    96
    
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    97
TYPECONVERSION = {"BOOL" : "X", "SINT" : "B", "INT" : "W", "DINT" : "D", "LINT" : "L",
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    98
    "USINT" : "B", "UINT" : "W", "UDINT" : "D", "ULINT" : "L", "REAL" : "D", "LREAL" : "L",
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
    99
    "STRING" : "B", "BYTE" : "B", "WORD" : "W", "DWORD" : "D", "LWORD" : "L", "WSTRING" : "W"}
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   100
44
1f5407c0263f Various changes to make SVGUI plugin generated code eventually compile
etisserant
parents: 43
diff changeset
   101
CTYPECONVERSION = {"BOOL" : "IEC_BOOL", "UINT" : "IEC_UINT", "STRING" : "IEC_STRING", "REAL" : "IEC_REAL"}
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   102
CPRINTTYPECONVERSION = {"BOOL" : "d", "UINT" : "d", "STRING" : "s", "REAL" : "f"}
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   103
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   104
class RootClass(SVGUIControler):
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   105
38
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   106
    def __init__(self):
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   107
        SVGUIControler.__init__(self)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   108
        filepath = os.path.join(self.PlugPath(), "gui.xml")
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   109
        
12
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   110
        if os.path.isfile(filepath):
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   111
            svgfile = os.path.join(self.PlugPath(), "gui.svg")
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   112
            if os.path.isfile(svgfile):
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   113
                self.SvgFilepath = svgfile
12
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   114
            self.OpenXMLFile(filepath)
13
f1f0edbeb313 More precise design for plugins.... to be continued...
etisserant
parents: 12
diff changeset
   115
        else:
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   116
            self.CreateNewInterface()
12
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   117
            self.SetFilePath(filepath)
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   118
158
771578d7580e fix bug for svgui
greg
parents: 147
diff changeset
   119
    def IsGUIPlugin(self):
771578d7580e fix bug for svgui
greg
parents: 147
diff changeset
   120
        return True
771578d7580e fix bug for svgui
greg
parents: 147
diff changeset
   121
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   122
    def GetElementIdFromName(self, name):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   123
        element = self.GetElementByName(name)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   124
        if element is not None:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   125
            return element.getid()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   126
        return None
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   127
38
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   128
    _View = None
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   129
    def _OpenView(self, logger):
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   130
        if not self._View:
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   131
            def _onclose():
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   132
                self._View = None
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   133
            def _onsave():
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   134
                self.GetPlugRoot().SaveProject()
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   135
            self._View = _SVGUIEditor(self.GetPlugRoot().AppFrame, self)
38
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   136
            self._View._onclose = _onclose
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   137
            self._View._onsave = _onsave
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   138
            self._View.Show()
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   139
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   140
    def _ImportSVG(self, logger):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   141
        if not self._View:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   142
            dialog = wx.FileDialog(self.GetPlugRoot().AppFrame, "Choose a SVG file", os.getcwd(), "",  "SVG files (*.svg)|*.svg|All files|*.*", wx.OPEN)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   143
            if dialog.ShowModal() == wx.ID_OK:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   144
                svgpath = dialog.GetPath()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   145
                if os.path.isfile(svgpath):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   146
                    shutil.copy(svgpath, os.path.join(self.PlugPath(), "gui.svg"))
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   147
                else:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   148
                    logger.write_error("No such SVG file: %s\n"%svgpath)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   149
            dialog.Destroy()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   150
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   151
    def _ImportXML(self, logger):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   152
        if not self._View:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   153
            dialog = wx.FileDialog(self.GetPlugRoot().AppFrame, "Choose a XML file", os.getcwd(), "",  "XML files (*.xml)|*.xml|All files|*.*", wx.OPEN)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   154
            if dialog.ShowModal() == wx.ID_OK:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   155
                xmlpath = dialog.GetPath()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   156
                if os.path.isfile(xmlpath):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   157
                    shutil.copy(xmlpath, os.path.join(self.PlugPath(), "gui.xml"))
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   158
                else:
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   159
                    logger.write_error("No such XML file: %s\n"%xmlpath)
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   160
            dialog.Destroy()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   161
65
e55d6faee9d1 Adding icons in Beremiz GUI
lbessard
parents: 55
diff changeset
   162
    PluginMethods = [
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 73
diff changeset
   163
        {"bitmap" : os.path.join("images","HMIEditor"),
65
e55d6faee9d1 Adding icons in Beremiz GUI
lbessard
parents: 55
diff changeset
   164
         "name" : "HMI Editor",
e55d6faee9d1 Adding icons in Beremiz GUI
lbessard
parents: 55
diff changeset
   165
         "tooltip" : "HMI Editor",
105
434aed8dc58d Added ability to override plugin methods with arbitrary python code (methods.py) when loading plugins
etisserant
parents: 82
diff changeset
   166
         "method" : "_OpenView"},
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 73
diff changeset
   167
        {"bitmap" : os.path.join("images","ImportSVG"),
65
e55d6faee9d1 Adding icons in Beremiz GUI
lbessard
parents: 55
diff changeset
   168
         "name" : "Import SVG",
e55d6faee9d1 Adding icons in Beremiz GUI
lbessard
parents: 55
diff changeset
   169
         "tooltip" : "Import SVG",
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   170
         "method" : "_ImportSVG"},
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 73
diff changeset
   171
        {"bitmap" : os.path.join("images","ImportDEF"),
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   172
         "name" : "Import XML",
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   173
         "tooltip" : "Import XML",
139
09923f7ee87e fixed typo in svgui.py
greg
parents: 138
diff changeset
   174
         "method" : "_ImportXML"},
65
e55d6faee9d1 Adding icons in Beremiz GUI
lbessard
parents: 55
diff changeset
   175
    ]
38
8cb20bc13a91 SVGUI's DefEditor now runs and generate C code. Swapped __I with __Q
etisserant
parents: 37
diff changeset
   176
    
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   177
    def OnPlugSave(self):
12
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   178
        self.SaveXMLFile()
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   179
        return True
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   180
    
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   181
    def PlugGenerate_C(self, buildpath, locations, logger):
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   182
        progname = "SVGUI_%s"%"_".join(map(str, self.GetCurrentLocation()))
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   183
        
189
48ba1ae12ffd Adding support for calculate window size while C generating
lbessard
parents: 186
diff changeset
   184
        doc = SVGDocument(self.GetSVGFilePath())
48ba1ae12ffd Adding support for calculate window size while C generating
lbessard
parents: 186
diff changeset
   185
        root_element = doc.GetRootElement()
191
5b1fa0e06284 Bug with float window size fixed
lbessard
parents: 189
diff changeset
   186
        window_size = (int(float(root_element.GetAttribute("width"))),
5b1fa0e06284 Bug with float window size fixed
lbessard
parents: 189
diff changeset
   187
                       int(float(root_element.GetAttribute("height"))))
5b1fa0e06284 Bug with float window size fixed
lbessard
parents: 189
diff changeset
   188
192
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   189
        svgfilepath = self.GetSVGFilePath()
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   190
        xmlfilepath = self.GetFilePath()
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   191
        shutil.copy(svgfilepath, buildpath)
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   192
        shutil.copy(xmlfilepath, buildpath)
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   193
        
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   194
        generator = _SVGUICGenerator(self.GetElementsByType(), 
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   195
                                     os.path.split(self.GetSVGFilePath())[1], 
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   196
                                     os.path.split(self.GetFilePath())[1], 
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   197
                                     self.GetCurrentLocation())
189
48ba1ae12ffd Adding support for calculate window size while C generating
lbessard
parents: 186
diff changeset
   198
        generator.GenerateProgram(window_size, buildpath, progname)
47
fd45c291fed0 PLC and plugins compilation with gcc now starts (and fail).
etisserant
parents: 44
diff changeset
   199
        Gen_C_file = os.path.join(buildpath, progname+".cpp" )
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   200
        
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   201
        if wx.Platform == '__WXMSW__':
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   202
            cxx_flags = "-I..\\..\\wxPython-src-2.8.7.1\\bld\\lib\\wx\\include\\msw-unicode-release-2.8 -I..\\..\\wxPython-src-2.8.7.1\\include -I..\\..\\wxPython-src-2.8.7.1\\contrib\\include -I..\\..\\matiec\\lib -DWXUSINGDLL -D__WXMSW__ -mthreads"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   203
            libs = "\"..\\lib\\libwxsvg.a\" \"..\\lib\\libwxsvg_agg.a\" \"..\\lib\\libagg.a\" \"..\\lib\\libaggplatformwin32.a\" \"..\\lib\\libaggfontwin32tt.a\" -L..\\..\\wxPython-src-2.8.7.1\\bld\\lib -mno-cygwin -mwindows -mthreads  -mno-cygwin -mwindows -Wl,--subsystem,windows -mwindows -lwx_mswu_richtext-2.8 -lwx_mswu_aui-2.8 -lwx_mswu_xrc-2.8 -lwx_mswu_qa-2.8 -lwx_mswu_html-2.8 -lwx_mswu_adv-2.8 -lwx_mswu_core-2.8 -lwx_baseu_xml-2.8 -lwx_baseu_net-2.8 -lwx_baseu-2.8"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   204
        else:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   205
            status, result, err_result = ProcessLogger(logger, "wx-config --cxxflags", no_stdout=True).spin()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   206
            if status:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   207
                logger.write_error("Unable to get wx cxxflags\n")
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   208
            cxx_flags = result.strip() + " -I../matiec/lib"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   209
            
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   210
            status, result, err_result = ProcessLogger(logger, "wx-config --libs", no_stdout=True).spin()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   211
            if status:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   212
                logger.write_error("Unable to get wx libs\n")
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   213
            libs = result.strip() + " -lwxsvg"
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   214
        
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   215
        return [(Gen_C_file, cxx_flags)],libs,True
13
f1f0edbeb313 More precise design for plugins.... to be continued...
etisserant
parents: 12
diff changeset
   216
    
12
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   217
    def BlockTypesFactory(self):
73
5e1e3d46c0c9 Adding support for execution order code generation
lbessard
parents: 65
diff changeset
   218
        def generate_svgui_block(generator, block, body, link, order=False):
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   219
            name = block.getinstanceName()
42
2bff00eb6cd0 Correct bugs on svgui plugin code generation
lbessard
parents: 39
diff changeset
   220
            block_id = self.GetElementIdFromName(name)
12
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   221
            if block_id == None:
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   222
                raise ValueError, "No corresponding block found"
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   223
            type = block.gettypeName()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   224
            block_infos = GetBlockType(type)
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   225
            current_location = ".".join(map(str, self.GetCurrentLocation()))
186
ed2a408d79b6 Various bugs fixed
lbessard
parents: 181
diff changeset
   226
            if not generator.ComputedBlocks.get(block, False) and not order:
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   227
                generator.ComputedBlocks[block] = True
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   228
                for num, variable in enumerate(block.inputVariables.getvariable()):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   229
                    connections = variable.connectionPointIn.getconnections()
12
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   230
                    if connections and len(connections) == 1:
47
fd45c291fed0 PLC and plugins compilation with gcc now starts (and fail).
etisserant
parents: 44
diff changeset
   231
                        parameter = "%sQ%s%s.%d.%d"%("%", TYPECONVERSION[block_infos["inputs"][num][1]], current_location, block_id, num+1)
12
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   232
                        value = generator.ComputeFBDExpression(body, connections[0])
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   233
                        generator.Program += ("  %s := %s;\n"%(parameter, generator.ExtractModifier(variable, value)))
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   234
            if link:
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   235
                connectionPoint = link.getposition()[-1]
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   236
                for num, variable in enumerate(block.outputVariables.getvariable()):
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   237
                    blockPointx, blockPointy = variable.connectionPointOut.getrelPositionXY()
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   238
                    if block.getx() + blockPointx == connectionPoint.getx() and block.gety() + blockPointy == connectionPoint.gety():
47
fd45c291fed0 PLC and plugins compilation with gcc now starts (and fail).
etisserant
parents: 44
diff changeset
   239
                        return "%sI%s%s.%d.%d"%("%", TYPECONVERSION[block_infos["outputs"][num][1]], current_location, block_id, num+1)
12
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   240
                raise ValueError, "No output variable found"
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   241
            else:
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   242
                return None
11
75ae893d5eed Adding plugin support in Beremiz
lbessard
parents:
diff changeset
   243
138
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   244
        def initialise_block(type, name, block = None):
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   245
            block_id = self.GetElementIdFromName(name)
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   246
            if block_id == None:
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   247
                raise ValueError, "No corresponding block found"
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   248
            block_infos = GetBlockType(type)
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   249
            current_location = ".".join(map(str, self.GetCurrentLocation()))
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   250
            variables = []
138
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   251
            if block is not None:
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   252
                input_variables = block.inputVariables.getvariable()
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   253
                output_variables = block.outputVariables.getvariable()
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   254
            else:
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   255
                input_variables = None
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   256
                output_variables = None
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   257
            for num, (input_name, input_type, input_modifier) in enumerate(block_infos["inputs"]):
138
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   258
                if input_variables is not None and num < len(input_variables):
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   259
                    connections = input_variables[num].connectionPointIn.getconnections()
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   260
                if input_variables is None or connections and len(connections) == 1:
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   261
                    variables.append((input_type, None, "%sQ%s%s.%d.%d"%("%", TYPECONVERSION[input_type], current_location, block_id, num+1), None))
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   262
            for num, (output_name, output_type, output_modifier) in enumerate(block_infos["outputs"]):
47
fd45c291fed0 PLC and plugins compilation with gcc now starts (and fail).
etisserant
parents: 44
diff changeset
   263
                variables.append((output_type, None, "%sI%s%s.%d.%d"%("%", TYPECONVERSION[input_type], current_location, block_id, num+1), None))
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   264
            return variables
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   265
12
a1f9e514f708 plugin framework organization being defined
etisserant
parents: 11
diff changeset
   266
        return [{"name" : "SVGUI function blocks", "list" :
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   267
                [{"name" : "Container", "type" : "functionBlock", "extensible" : False, 
138
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   268
                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none")], 
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   269
                    "outputs" : [],
42
2bff00eb6cd0 Correct bugs on svgui plugin code generation
lbessard
parents: 39
diff changeset
   270
                    "comment" : "SVGUI Container",
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   271
                    "generate" : generate_svgui_block, "initialise" : initialise_block},
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   272
                {"name" : "Button", "type" : "functionBlock", "extensible" : False, 
186
ed2a408d79b6 Various bugs fixed
lbessard
parents: 181
diff changeset
   273
                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("Value","BOOL","none")], 
138
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   274
                    "outputs" : [("State","BOOL","none")],
42
2bff00eb6cd0 Correct bugs on svgui plugin code generation
lbessard
parents: 39
diff changeset
   275
                    "comment" : "SVGUI Button",
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   276
                    "generate" : generate_svgui_block, "initialise" : initialise_block},
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   277
                {"name" : "TextCtrl", "type" : "functionBlock", "extensible" : False, 
138
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   278
                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("SetText","STRING","none")], 
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   279
                    "outputs" : [("Text","STRING","none")],
42
2bff00eb6cd0 Correct bugs on svgui plugin code generation
lbessard
parents: 39
diff changeset
   280
                    "comment" : "SVGUI Text Control",
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   281
                    "generate" : generate_svgui_block, "initialise" : initialise_block},
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   282
                {"name" : "ScrollBar", "type" : "functionBlock", "extensible" : False, 
138
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   283
                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("SetThumb","UINT","none"),("SetRange","UINT","none"),("SetPosition","UINT","none")], 
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   284
                    "outputs" : [("Position","UINT","none")],
42
2bff00eb6cd0 Correct bugs on svgui plugin code generation
lbessard
parents: 39
diff changeset
   285
                    "comment" : "SVGUI ScrollBar",
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   286
                    "generate" : generate_svgui_block, "initialise" : initialise_block},
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   287
                {"name" : "NoteBook", "type" : "functionBlock", "extensible" : False, 
138
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   288
                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("SetSelected","BOOL","none")], 
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   289
                    "outputs" : [("Selected","UINT","none")],
42
2bff00eb6cd0 Correct bugs on svgui plugin code generation
lbessard
parents: 39
diff changeset
   290
                    "comment" : "SVGUI Notebook",
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   291
                    "generate" : generate_svgui_block, "initialise" : initialise_block},
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   292
                {"name" : "RotatingCtrl", "type" : "functionBlock", "extensible" : False, 
138
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   293
                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("SetAngle","REAL","none")], 
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   294
                    "outputs" : [("Angle","REAL","none")],
42
2bff00eb6cd0 Correct bugs on svgui plugin code generation
lbessard
parents: 39
diff changeset
   295
                    "comment" : "SVGUI Rotating Control",
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   296
                    "generate" : generate_svgui_block, "initialise" : initialise_block},
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   297
                {"name" : "Transform", "type" : "functionBlock", "extensible" : False, 
138
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   298
                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("SetX","REAL","none"),("SetY","REAL","none"),("SetXScale","REAL","none"),("SetYScale","REAL","none"),("SetAngle","REAL","none")], 
3a6ebb01760a Changing SVGUI FunctionBlocks interface
lbessard
parents: 137
diff changeset
   299
                    "outputs" : [("X","REAL","none"),("Y","REAL","none")],
42
2bff00eb6cd0 Correct bugs on svgui plugin code generation
lbessard
parents: 39
diff changeset
   300
                    "comment" : "SVGUI Transform",
43
937640beb464 Adding support for svgui block code generation
lbessard
parents: 42
diff changeset
   301
                    "generate" : generate_svgui_block, "initialise" : initialise_block},
37
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   302
               ]}
625f52bba682 Primary svgui plugin inherited - broken
etisserant
parents: 20
diff changeset
   303
        ]
137
187a4e2412e5 Modifying svgui plugin for following new SVGUIEditor version
lbessard
parents: 105
diff changeset
   304
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   305
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   306
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   307
class _SVGUICGenerator(SVGUICGenerator):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   308
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   309
    def __init__(self, elements, svgfile, xmlfile, current_location):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   310
        SVGUICGenerator.__init__(self, elements, svgfile, xmlfile)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   311
        
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   312
        self.CurrentLocation = current_location
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   313
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   314
    def GenerateProgramHeadersPublicVars(self):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   315
        text = """    void OnPlcOutEvent(wxEvent& event);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   316
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   317
    void Retrieve();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   318
    void Publish();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   319
    void Initialize();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   320
"""
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   321
#        text += "    void Print();\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   322
        return text
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   323
    
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   324
    def GenerateIECVars(self):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   325
        text = ""
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   326
        for element in self.Elements:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   327
            text += "STATE_TYPE out_state_%d;\n"%element.getid()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   328
            text += "STATE_TYPE in_state_%d;\n"%element.getid()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   329
        text +="\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   330
        current_location = "_".join(map(str, self.CurrentLocation))
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   331
        #Declaration des variables
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   332
        for element in self.Elements:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   333
            block_infos = GetBlockType(SVGUIFB_Types[GetElementType(element)])
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   334
            block_id = element.getid()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   335
            for i, input in enumerate(block_infos["inputs"]):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   336
                element_c_type = CTYPECONVERSION[input[1]]
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   337
                variable = "__Q%s%s_%d_%d"%(TYPECONVERSION[input[1]], current_location, block_id, i + 1)
165
f9c6c9e36725 Support for extern pointer for located variables
lbessard
parents: 158
diff changeset
   338
                text += "%s beremiz%s;\n"%(element_c_type, variable)
f9c6c9e36725 Support for extern pointer for located variables
lbessard
parents: 158
diff changeset
   339
                text += "%s* %s = &beremiz%s;\n"%(element_c_type, variable, variable)
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   340
                text += "%s _copy%s;\n"%(element_c_type, variable)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   341
            for i, output in enumerate(block_infos["outputs"]):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   342
                element_c_type = CTYPECONVERSION[output[1]]
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   343
                variable = "__I%s%s_%d_%d"%(TYPECONVERSION[output[1]], current_location, block_id, i + 1)
165
f9c6c9e36725 Support for extern pointer for located variables
lbessard
parents: 158
diff changeset
   344
                text += "%s beremiz%s;\n"%(element_c_type, variable)
f9c6c9e36725 Support for extern pointer for located variables
lbessard
parents: 158
diff changeset
   345
                text += "%s* %s = &beremiz%s;\n"%(element_c_type, variable, variable)
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   346
                text += "%s _copy%s;\n"%(element_c_type, variable)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   347
            text +="\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   348
        return text
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   349
    
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   350
    def GenerateGlobalVarsAndFuncs(self, size):
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   351
        text = """#include "iec_types.h"
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   352
#ifdef __WXMSW__
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   353
#define COMPARE_AND_SWAP_VAL(Destination, comparand, exchange) InterlockedCompareExchange(Destination, exchange, comparand)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   354
#define THREAD_RETURN_TYPE DWORD WINAPI
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   355
#define STATE_TYPE long int
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   356
#else
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   357
#define COMPARE_AND_SWAP_VAL(Destination, comparand, exchange) __sync_val_compare_and_swap(Destination, comparand, exchange)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   358
#define THREAD_RETURN_TYPE void*
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   359
#define STATE_TYPE volatile int
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   360
#endif
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   361
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   362
"""
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   363
        
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   364
        text += self.GenerateIECVars()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   365
        
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   366
        text += """IMPLEMENT_APP_NO_MAIN(SVGViewApp);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   367
IMPLEMENT_WX_THEME_SUPPORT;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   368
SVGViewApp *myapp = NULL;
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   369
wxSemaphore MyInitSem;
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   370
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   371
#ifdef __WXMSW__
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   372
HANDLE wxMainLoop;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   373
DWORD wxMainLoopId;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   374
#else
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   375
pthread_t wxMainLoop;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   376
#endif
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   377
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   378
"""
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   379
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   380
        text += """int myargc = 0;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   381
char** myargv = NULL;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   382
        
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   383
#define UNCHANGED 1
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   384
#define PLC_BUSY 2
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   385
#define CHANGED 3
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   386
#define GUI_BUSY 4
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   387
#ifdef __WXMSW__
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   388
#else
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   389
#endif
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   390
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   391
bool refresh = false;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   392
bool refreshing = false;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   393
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   394
THREAD_RETURN_TYPE InitWxEntry(void* args)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   395
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   396
  wxEntry(myargc,myargv);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   397
  return 0;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   398
}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   399
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   400
"""
189
48ba1ae12ffd Adding support for calculate window size while C generating
lbessard
parents: 186
diff changeset
   401
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   402
        text += """bool SVGViewApp::OnInit()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   403
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   404
  #ifndef __WXMSW__
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   405
    setlocale(LC_NUMERIC, "C");
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   406
  #endif
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   407
"""
189
48ba1ae12ffd Adding support for calculate window size while C generating
lbessard
parents: 186
diff changeset
   408
        
48ba1ae12ffd Adding support for calculate window size while C generating
lbessard
parents: 186
diff changeset
   409
        text += """  frame = new MainFrame(NULL, wxT("Program"),wxDefaultPosition, wxSize(%d, %d));
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   410
  frame->Show();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   411
  myapp = this;
189
48ba1ae12ffd Adding support for calculate window size while C generating
lbessard
parents: 186
diff changeset
   412
"""%size
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   413
        text += """  return true;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   414
}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   415
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   416
extern "C" {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   417
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   418
int __init_%(location)s(int argc, char** argv)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   419
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   420
  myargc = argc;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   421
  myargv = argv;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   422
#ifdef __WXMSW__
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   423
  wxMainLoop = CreateThread(NULL, 0, InitWxEntry, 0, 0, &wxMainLoopId);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   424
#else
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   425
  pthread_create(&wxMainLoop, NULL, InitWxEntry, NULL);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   426
#endif
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   427
  MyInitSem.Wait();
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   428
  return 0;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   429
}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   430
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   431
void __cleanup_%(location)s()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   432
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   433
}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   434
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   435
void __retrieve_%(location)s()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   436
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   437
  if(myapp){
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   438
    myapp->frame->m_svgCtrl->Retrieve();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   439
  }        
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   440
}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   441
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   442
void __publish_%(location)s()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   443
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   444
  if(myapp){
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   445
    myapp->frame->m_svgCtrl->Publish();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   446
  }
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   447
}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   448
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   449
}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   450
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   451
IEC_STRING wxStringToIEC_STRING(wxString s)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   452
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   453
  IEC_STRING res = {0,""};
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   454
  int i;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   455
  for(i = 0; i<s.Length() && i<STR_MAX_LEN; i++)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   456
    res.body[i] = s.GetChar(i);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   457
  res.len = i;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   458
  return res;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   459
}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   460
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   461
"""%{"location" : "_".join(map(str, self.CurrentLocation))}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   462
        
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   463
        return text
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   464
    
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   465
    def GenerateProgramEventTable(self):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   466
        text = """BEGIN_DECLARE_EVENT_TYPES()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   467
DECLARE_LOCAL_EVENT_TYPE( EVT_PLC, wxNewEventType() )
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   468
END_DECLARE_EVENT_TYPES()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   469
         
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   470
DEFINE_LOCAL_EVENT_TYPE( EVT_PLC )
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   471
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   472
"""     
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   473
        #Event Table Declaration
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   474
        text += "BEGIN_EVENT_TABLE(Program, SVGUIWindow)\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   475
        for element in self.Elements:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   476
            element_type = GetElementType(element)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   477
            element_name = element.getname()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   478
            if element_type == ITEM_BUTTON:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   479
                text += "  EVT_BUTTON (SVGUIID(\"%s\"), Program::On%sClick)\n"%(element_name, element_name)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   480
            elif element_type in [ITEM_SCROLLBAR, ITEM_ROTATING, ITEM_TRANSFORM]:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   481
                text += "  EVT_COMMAND_SCROLL_THUMBTRACK (SVGUIID(\"%s\"), Program::On%sChanging)\n"%(element_name, element_name)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   482
            elif element_type == ITEM_NOTEBOOK:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   483
                text += "  EVT_NOTEBOOK_PAGE_CHANGED (SVGUIID(\"%s\"), Program::On%sTabChanged)\n"%(element_name, element_name)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   484
        text += "  EVT_CUSTOM(EVT_PLC, wxID_ANY, Program::OnPlcOutEvent)\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   485
        text += "END_EVENT_TABLE()\n\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   486
        return text
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   487
    
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   488
    def GenerateProgramInitFrame(self):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   489
        text = """MainFrame::MainFrame(wxWindow *parent, const wxString& title, const wxPoint& pos,const wxSize& size, long style): wxFrame(parent, wxID_ANY, title, pos, size, style)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   490
{
192
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   491
  wxFileName apppath(wxTheApp->argv[0]);
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   492
  wxFileName svgfilepath(apppath.GetPath(), wxT("%s"));
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   493
  wxFileName xmlfilepath(apppath.GetPath(), wxT("%s"));
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   494
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   495
  m_svgCtrl = new Program(this);
192
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   496
  if (m_svgCtrl->LoadFiles(svgfilepath.GetFullPath(), xmlfilepath.GetFullPath()))
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   497
  {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   498
    Show(true);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   499
    m_svgCtrl->SetFocus();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   500
    m_svgCtrl->SetFitToFrame(true);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   501
    m_svgCtrl->InitScrollBars();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   502
    m_svgCtrl->Initialize();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   503
    m_svgCtrl->Update();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   504
  }
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   505
  else
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   506
  {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   507
    printf("Error while opening files\\n");
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   508
    exit(0);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   509
  }
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   510
}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   511
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   512
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   513
"""%(self.SVGFilePath, self.XMLFilePath)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   514
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   515
        return text
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   516
    
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   517
    def GenerateProgramInitProgram(self):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   518
        text = "Program::Program(wxWindow* parent):SVGUIWindow(parent)\n{\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   519
        for element in self.Elements:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   520
            text += "    out_state_%d = UNCHANGED;\n"%element.getid()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   521
            text += "    in_state_%d = UNCHANGED;\n"%element.getid()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   522
        text += "}\n\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   523
        return text
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   524
    
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   525
    def GenerateProgramEventFunctions(self):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   526
        text = ""
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   527
        current_location = "_".join(map(str, self.CurrentLocation))
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   528
        for element in self.Elements:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   529
            element_type = GetElementType(element)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   530
            element_lock = """  if (COMPARE_AND_SWAP_VAL(&in_state_%d, CHANGED, GUI_BUSY) == CHANGED ||
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   531
      COMPARE_AND_SWAP_VAL(&in_state_%d, UNCHANGED, GUI_BUSY) == UNCHANGED) {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   532
"""%(element.getid(), element.getid())
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   533
            element_unlock = """    COMPARE_AND_SWAP_VAL(&in_state_%d, GUI_BUSY, CHANGED);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   534
  }
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   535
  else
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   536
      ProcessEvent(event);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   537
"""%element.getid()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   538
            element_name = element.getname()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   539
                
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   540
            if element_type == ITEM_BUTTON:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   541
                text += """void Program::On%sClick(wxCommandEvent& event)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   542
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   543
  SVGUIButton* button = (SVGUIButton*)GetElementByName(wxT("%s"));\n"""%(element_name, element_name)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   544
                text += element_lock
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   545
                text += "    _copy__IX%s_%d_1 = button->GetToggle();\n"%(current_location, element.getid())
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   546
                text += element_unlock
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   547
                text += "  event.Skip();\n}\n\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   548
            elif element_type == ITEM_ROTATING:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   549
                text += """void Program::On%sChanging(wxScrollEvent& event)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   550
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   551
  SVGUIRotatingCtrl* rotating = (SVGUIRotatingCtrl*)GetElementByName(wxT("%s"));
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   552
"""%(element_name, element_name)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   553
                text += element_lock
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   554
                text += "    _copy__ID%s_%d_1 = rotating->GetAngle();\n"%(current_location, element.getid())
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   555
                text += element_unlock
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   556
                text += "  event.Skip();\n}\n\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   557
            elif element_type == ITEM_NOTEBOOK:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   558
                text += """void Program::On%sTabChanged(wxNotebookEvent& event)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   559
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   560
  SVGUINoteBook* notebook = (SVGUINoteBook*)GetElementByName(wxT("%s"));
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   561
"""%(element_name, element_name)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   562
                text += element_lock
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   563
                text += "    _copy__IB%s_%d_1 = notebook->GetCurrentPage();\n"%(current_location, element.getid())
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   564
                text += element_unlock
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   565
                text += "  event.Skip();\n}\n\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   566
            elif element_type == ITEM_TRANSFORM:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   567
                text += """void Program::On%sChanging(wxScrollEvent& event)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   568
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   569
  SVGUITransform* transform = (SVGUITransform*)GetElementByName(wxT("%s"));
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   570
"""%(element_name, element_name)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   571
                text += element_lock
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   572
                text += "    _copy__ID%s_%d_1 = transform->GetX();\n"%(current_location, element.getid())
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   573
                text += "    _copy__ID%s_%d_2 = transform->GetY();\n"%(current_location, element.getid())
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   574
                text += element_unlock
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   575
                text += "  event.Skip();\n}\n\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   576
        
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   577
        text += "/* OnPlcOutEvent update GUI with provided IEC __Q* PLC output variables */\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   578
        text += """void Program::OnPlcOutEvent(wxEvent& event)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   579
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   580
  SVGUIElement* element;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   581
  
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   582
  refreshing = true;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   583
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   584
  wxMutexGuiEnter();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   585
"""
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   586
        for element in self.Elements:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   587
            element_type = GetElementType(element)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   588
            texts = {"location" : current_location, "id" : element.getid()}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   589
            
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   590
            text += """  if (COMPARE_AND_SWAP_VAL(&out_state_%(id)d, CHANGED, GUI_BUSY) == CHANGED)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   591
  {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   592
    element = (SVGUIElement*)GetElementById(wxT("%(id)d"));
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   593
            
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   594
    if (_copy__QX%(location)s_%(id)d_1 != element->IsVisible()) {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   595
      if (_copy__QX%(location)s_%(id)d_1)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   596
        element->Show();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   597
      else
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   598
        element->Hide();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   599
    }
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   600
    if (_copy__QX%(location)s_%(id)d_2 != element->IsEnabled()) {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   601
      if (_copy__QX%(location)s_%(id)d_2)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   602
        element->Enable();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   603
      else
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   604
        element->Disable();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   605
    }
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   606
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   607
            if element_type == ITEM_BUTTON:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   608
                text += """    if (_copy__QX%(location)s_%(id)d_3 != ((SVGUIButton*)element)->GetToggle())
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   609
      ((SVGUIButton*)element)->SetToggle(_copy__QX%(location)s_%(id)d_3);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   610
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   611
            elif element_type == ITEM_TEXT:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   612
                text += """    if (((SVGUITextCtrl*)element)->GetValue().compare(_copy__QX%(location)s_%(id)d_3))
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   613
    {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   614
      wxString str = wxString::FromAscii(_copy__QB%(location)s_%(id)d_3);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   615
      ((SVGUITextCtrl*)element)->SetText(str);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   616
    }
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   617
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   618
            elif  element_type == ITEM_SCROLLBAR:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   619
                text += """    if (_copy__QW%(location)s_%(id)d_3 != ((SVGUIScrollBar*)element)->GetThumbPosition() ||
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   620
        _copy__QW%(location)s_%(id)d_4 != ((SVGUIScrollBar*)element)->GetThumbSize() ||
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   621
        _copy__QW%(location)s_%(id)d_5 != ((SVGUIScrollBar*)element)->GetRange())
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   622
      ((SVGUIScrollBar*)element)->Init_ScrollBar(_copy__QW%(location)s_%(id)d_3, _copy__QW%(location)s_%(id)d_4, _copy__QW%(location)s_%(id)d_5);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   623
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   624
            elif element_type == ITEM_ROTATING:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   625
                text += """    if (_copy__QD%(location)s_%(id)d_3 != ((SVGUIRotatingCtrl*)element)->GetAngle())
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   626
      ((SVGUIRotatingCtrl*)element)->SetAngle(_copy__QD%(location)s_%(id)d_3);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   627
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   628
            elif element_type == ITEM_NOTEBOOK:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   629
                text += """    if (_copy__QB%(location)s_%(id)d_3 != ((SVGUINoteBook*)element)->GetCurrentPage())
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   630
      ((SVGUINoteBook*)element)->SetCurrentPage(_copy__QB%(location)s_%(id)d_3);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   631
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   632
            elif element_type == ITEM_TRANSFORM:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   633
                text += """    if (_copy__QD%(location)s_%(id)d_3 != ((SVGUITransform*)element)->GetX() ||
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   634
        _copy__QD%(location)s_%(id)d_4 != ((SVGUITransform*)element)->GetY())
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   635
      ((SVGUITransform*)element)->Move(_copy__QD%(location)s_%(id)d_3, _copy__QD%(location)s_%(id)d_4);
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   636
    if (_copy__QD%(location)s_%(id)d_5 != ((SVGUITransform*)element)->GetXScale() ||
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   637
        _copy__QD%(location)s_%(id)d_6 != ((SVGUITransform*)element)->GetYScale())
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   638
      ((SVGUITransform*)element)->Scale(_copy__QD%(location)s_%(id)d_5, _copy__QD%(location)s_%(id)d_6);
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   639
    if (_copy__QD%(location)s_%(id)d_7 != ((SVGUITransform*)element)->GetAngle())
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   640
      ((SVGUITransform*)element)->Rotate(_copy__QD%(location)s_%(id)d_7);
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   641
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   642
            text += "    COMPARE_AND_SWAP_VAL(&out_state_%(id)d, GUI_BUSY, UNCHANGED);\n  }\n"%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   643
            
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   644
        text += """  wxMutexGuiLeave();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   645
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   646
  refreshing = false;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   647
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   648
  event.Skip();
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   649
}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   650
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   651
"""
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   652
        return text
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   653
    
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   654
    def GenerateProgramPrivateFunctions(self):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   655
        current_location = "_".join(map(str, self.CurrentLocation))
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   656
        
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   657
        text = "void Program::Retrieve()\n{\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   658
        for element in self.Elements:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   659
            element_type = GetElementType(element)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   660
            texts = {"location" : current_location, "id" : element.getid()}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   661
            block_infos = GetBlockType(SVGUIFB_Types[GetElementType(element)])
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   662
            if len(block_infos["outputs"]) > 0:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   663
                text += """  if (COMPARE_AND_SWAP_VAL(&in_state_%(id)d, CHANGED, PLC_BUSY) == CHANGED) {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   664
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   665
                for i, output in enumerate(block_infos["outputs"]):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   666
                    texts["type"] = TYPECONVERSION[output[1]]
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   667
                    texts["pin"] = i + 1
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   668
                    
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   669
                    variable = "__I%(type)s%(location)s_%(id)d_%(pin)d"%texts
165
f9c6c9e36725 Support for extern pointer for located variables
lbessard
parents: 158
diff changeset
   670
                    text +="    beremiz%s = _copy%s;\n"%(variable, variable)
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   671
                
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   672
                text += """    COMPARE_AND_SWAP_VAL(&in_state_%(id)d, PLC_BUSY, UNCHANGED);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   673
  }
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   674
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   675
        text += "}\n\n" 
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   676
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   677
        text += "void Program::Publish()\n{\n  STATE_TYPE new_state;\n\n"
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   678
        for element in self.Elements:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   679
            element_type = GetElementType(element)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   680
            texts = {"location" : current_location, "id" : element.getid()}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   681
            block_infos = GetBlockType(SVGUIFB_Types[GetElementType(element)])
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   682
            
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   683
            text += """  if ((new_state = COMPARE_AND_SWAP_VAL(&out_state_%(id)d, UNCHANGED, PLC_BUSY)) == UNCHANGED ||
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   684
       (new_state = COMPARE_AND_SWAP_VAL(&out_state_%(id)d, CHANGED, PLC_BUSY)) == CHANGED) {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   685
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   686
            for i, input in enumerate(block_infos["inputs"]):
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   687
                texts["type"] = TYPECONVERSION[input[1]]
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   688
                texts["pin"] = i + 1
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   689
                variable = "__Q%(type)s%(location)s_%(id)d_%(pin)d"%texts
165
f9c6c9e36725 Support for extern pointer for located variables
lbessard
parents: 158
diff changeset
   690
                text += "    if (_copy%s != beremiz%s) {\n"%(variable, variable)
f9c6c9e36725 Support for extern pointer for located variables
lbessard
parents: 158
diff changeset
   691
                text += "      _copy%s = beremiz%s;\n"%(variable, variable)
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   692
                text += "      new_state = CHANGED;\n    }\n"%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   693
            text += """    COMPARE_AND_SWAP_VAL(&out_state_%(id)d, PLC_BUSY, new_state);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   694
    refresh |= new_state == CHANGED;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   695
  }
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   696
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   697
        
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   698
        text += """  /* Replace this with determinist signal if called from RT */
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   699
  if (refresh && !refreshing) {
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   700
    wxCommandEvent event( EVT_PLC );
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   701
    ProcessEvent(event);
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   702
    refresh = false;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   703
  }
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   704
};
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   705
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   706
"""
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   707
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   708
        text += """void Program::Initialize()
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   709
{
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   710
  SVGUIElement* element;
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   711
"""
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   712
        for element in self.Elements:
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   713
            element_type = GetElementType(element)
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   714
            texts = {"location" : current_location, "id" : element.getid()}
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   715
            
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   716
            text += """
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   717
  element = (SVGUIElement*)GetElementById(wxT("%(id)d"));
192
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   718
  beremiz__QX%(location)s_%(id)d_1 = _copy__QX%(location)s_%(id)d_1 = element->IsVisible();
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   719
  beremiz__QX%(location)s_%(id)d_2 = _copy__QX%(location)s_%(id)d_2 = element->IsEnabled();
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   720
"""%texts
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   721
            if element_type == ITEM_BUTTON:
192
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   722
                text += "  beremiz__QX%(location)s_%(id)d_3 = _copy__QX%(location)s_%(id)d_3 = ((SVGUIButton*)element)->GetToggle();\n"%texts
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   723
                text += "  beremiz__IX%(location)s_%(id)d_1 = _copy__IX%(location)s_%(id)d_1 = ((SVGUIButton*)element)->GetToggle();\n"%texts
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   724
            elif element_type == ITEM_TEXT:
192
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   725
                text += "  beremiz__QB%(location)s_%(id)d_3 = _copy__QB%(location)s_%(id)d_3 = ((SVGUITextCtrl*)element)->GetValue();\n"%texts
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   726
                text += "  beremiz__IB%(location)s_%(id)d_1 = _copy__IB%(location)s_%(id)d_1 = ((SVGUITextCtrl*)element)->GetValue();\n"%texts
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   727
            elif element_type == ITEM_SCROLLBAR:
192
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   728
                text += "  beremiz__QW%(location)s_%(id)d_3 = _copy__QW%(location)s_%(id)d_3 = ((SVGUIScrollBar*)element)->GetThumbSize();\n"%texts
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   729
                text += "  beremiz__QW%(location)s_%(id)d_4 = _copy__QW%(location)s_%(id)d_4 = ((SVGUIScrollBar*)element)->GetRange();\n"%texts
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   730
                text += "  beremiz__QW%(location)s_%(id)d_5 = _copy__QW%(location)s_%(id)d_5 = ((SVGUIScrollBar*)element)->GetThumbPosition();\n"%texts
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   731
                text += "  beremiz__IW%(location)s_%(id)d_1 = _copy__IW%(location)s_%(id)d_1 = ((SVGUIScrollBar*)element)->GetThumbPosition();\n"%texts
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   732
            elif element_type == ITEM_ROTATING:
192
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   733
                text += "  beremiz__QD%(location)s_%(id)d_3 = _copy__QD%(location)s_%(id)d_3 = ((SVGUIRotatingCtrl*)element)->GetAngle();\n"%texts
186
ed2a408d79b6 Various bugs fixed
lbessard
parents: 181
diff changeset
   734
                text += "  beremiz__ID%(location)s_%(id)d_1 = _copy__ID%(location)s_%(id)d_1 = ((SVGUIRotatingCtrl*)element)->GetAngle();\n"%texts
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   735
            elif element_type == ITEM_NOTEBOOK:
192
f0482f1ae901 Problem with files when launching created program from another directory fixed
lbessard
parents: 191
diff changeset
   736
                text += "  beremiz__QB%(location)s_%(id)d_3 = _copy__QB%(location)s_%(id)d_3 = ((SVGUINoteBook*)element)->GetCurrentPage();\n"%texts
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   737
                text += "  beremiz__IB%(location)s_%(id)d_1 = _copy__IB%(location)s_%(id)d_1 = ((SVGUINoteBook*)element)->GetCurrentPage();\n"%texts
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   738
            elif element_type == ITEM_TRANSFORM:
181
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   739
                text += "  beremiz__QD%(location)s_%(id)d_3 = _copy__QD%(location)s_%(id)d_3 = ((SVGUITransform*)element)->GetX();\n"%texts
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   740
                text += "  beremiz__QD%(location)s_%(id)d_4 = _copy__QD%(location)s_%(id)d_4 = ((SVGUITransform*)element)->GetY();\n"%texts
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   741
                text += "  beremiz__QD%(location)s_%(id)d_5 = _copy__QD%(location)s_%(id)d_5 = ((SVGUITransform*)element)->GetXScale();\n"%texts
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   742
                text += "  beremiz__QD%(location)s_%(id)d_6 = _copy__QD%(location)s_%(id)d_6 = ((SVGUITransform*)element)->GetYScale();\n"%texts
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   743
                text += "  beremiz__QD%(location)s_%(id)d_7 = _copy__QD%(location)s_%(id)d_7 = ((SVGUITransform*)element)->GetAngle();\n"%texts
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   744
                text += "  beremiz__ID%(location)s_%(id)d_1 = _copy__ID%(location)s_%(id)d_1 = ((SVGUITransform*)element)->GetX();\n"%texts
f01bcc3c9157 Better SCGUITransform value initialization. Added semaphore as a mainloop init barrier
etisserant
parents: 165
diff changeset
   745
                text += "  beremiz__ID%(location)s_%(id)d_2 = _copy__ID%(location)s_%(id)d_2 = ((SVGUITransform*)element)->GetY();\n"%texts
186
ed2a408d79b6 Various bugs fixed
lbessard
parents: 181
diff changeset
   746
        
ed2a408d79b6 Various bugs fixed
lbessard
parents: 181
diff changeset
   747
        text += "\n  MyInitSem.Post();\n}\n\n"
147
ccc5e683583d Improve svgui plugin for following SVGUIEditor modifications
lbessard
parents: 142
diff changeset
   748
        return text